CodeVision AVR в вопросах и ответах

[edisson]

спасибо Oxford.

вот тут собственно изначальный архив с рабочей моделью протеуса:
https://drive.google.com/open?id=1UsX8r ... _E2kVJ9fbb

тут готовый проэкт для codevision с кучами ошибок (только в место main.c переименовал в menu_01.c).
https://drive.google.com/open?id=1Of-MS ... u9nvFrqGg8

тут со всеми что сумел "напортачить". думаю в "исправленных ошибок или несогласиях" которых я проделал будут кучи моих ошибок, потому лучше чтобы опытные пользователи началибы портирование с хотабы с предыдущего архива например с ругания компилятора о том чтобы "This library requires AVR-GCC 3.3 or later, update to newer AVR-GCC compiler !" я просто закоментировал. потом еше codevision выдавал ошибку ссылавшего на файл pgmspace.h, в место него воткнул в папку AVR-GCC-овский файл pgmspace и назвал его avr_pgmspace и т.д.
https://drive.google.com/open?id=1CEmjv ... OEhwjAKlHg

[edisson]

упростил вопросс, убрал все лишнее (может не все), остались 2 ошибки на данный момент. зачем ругается компилятор ?

Error: D:\C prog\cvavreval\MY PROJ\tests\test_328_2\generator.c(86): a value of type 'flash pchar flash *' can't be used to initialize an entity of type 'f_get_txt'
Error: D:\C prog\cvavreval\MY PROJ\tests\test_328_2\generator.c(126): incompatible return expression of type 'unsigned char [16]', expect a 'flash pchar'

вот собственно код:


#include <mega328.h>
#include <delay.h>
#include <string.h>
#include <stdlib.h>
#ifndef NULL
#define NULL (void*)(0)
#endif
#define PSTR(str) (str)

#define item_sim(t, v) { \
.id = M_SUBMENU + v, \
.item.smi.text = t, \
.item.smi.sub_cnt = 0, \
.item.smi.subm = NULL}

#define item_opt(f, d, o) { \
.id = M_OPTMENU, \
.item.omi.get_text = f, \
.item.omi.data = d, \
.item.omi.optid = o}

static char tr[16];
typedef char flash *pchar;
typedef enum{
EV_NONE = 0,
EV_PREV = 1,
EV_NEXT = 2,
EV_ENTER = 3,
EV_ESCAPE = 4
} EVENT;

static pchar ed_uint(void* data, unsigned char v, unsigned char ch);

flash char mmm1[] = "ONE LINE";
flash char mmm2[] = "MULTI LINE";
#define menu_one 1
#define menu_multi 2
static unsigned int number1 = 100;
typedef char prog_char;
typedef char* (*f_get_txt)(void*, unsigned char , unsigned char);
unsigned int edit_uint (unsigned char y, prog_char *msg, unsigned int val, unsigned int min, unsigned int max);
typedef struct Node* tag_menu;
typedef unsigned char byte;
typedef struct {
int a;
char b[5];
} struct_type;

typedef enum {
M_SUBMENU = 0x00,
M_OPTMENU = 0x80
} MENU_ITEM_TYPE;

typedef struct {
pchar text;
unsigned char sub_cnt;
tag_menu subm;
} MENU_SUB_ITEM;


typedef struct {
f_get_txt get_text;
void* data;
unsigned char optid;
} MENU_OPT_ITEM;

typedef union{
MENU_SUB_ITEM smi;
MENU_OPT_ITEM omi;
} MENU_ITEM;

typedef struct Node{
MENU_ITEM_TYPE id;
MENU_ITEM item;
} t_menu;



flash t_menu m_mode[] = {
item_sim(mmm1,menu_one),
item_sim(mmm2,menu_multi)
};

flash t_menu m_edit[] = {
item_opt(ed_uint, &number1, 0)
};

void main(void)
{
// Declare your local variables here

// Crystal Oscillator division factor: 1
#pragma optsize-
CLKPR=(1<<CLKPCE);
CLKPR=(0<<CLKPCE) | (0<<CLKPS3) | (0<<CLKPS2) | (0<<CLKPS1) | (0<<CLKPS0);
#ifdef _OPTIMIZE_SIZE_
#pragma optsize+
#endif


// Global enable interrupts
#asm("sei")

while (1)
{
// Place your code here
PORTC.0 = 1;
#asm("nop")
#asm("nop")

PORTC.0 = 0;
}
}

static pchar ed_uint(void* data, unsigned char v, unsigned char ch){
char ts[6];
if(ch){

*(unsigned int*)data = edit_uint(0,PSTR("Unsigned: "),*(unsigned int*)data,50,20000);
}

strcpyf(tr,PSTR("UINT EDIT "));
ltoa((unsigned int)(*(unsigned int*)data),ts);
strcat(tr,ts);
return tr;
}

unsigned int edit_uint(unsigned char y, prog_char *msg, unsigned int val, unsigned int min, unsigned int max)
{
return 1;
}

[Ivanoff-iv]

Делал свою систему распределения времени подзадач вот что у меня вышло...(пример для опроса DS18b20)

Спойлер

Код: Выделить всё

#define DDRTEMP           DDRD                                    // Установить порт к которому подключен датчик температуры на выход
#define PINTEMP           PIND                                    // Установить порт к которому подключен датчик температуры на вход
#define BT                   0                                    // Пин порта к которому подключен датчик температуры
#define Speed_temp       0.122                                    // частота таймера в кГц

//#define StartDelay(x,t)  if (t) {(t)--;} else {switch (x){case 0: (t)=-1; 
#define StartDelay(x,t)  if (t) {if (~(t)) (t)--;} else {switch (x){case 0: (t)=-1;
#define Delay(num,te,x,t)  (x)=(num); (t)=(te)*Speed_temp; break; case(num): (t)=-1; 
#define EndDelay(te,x,t) (t)=(te)*Speed_temp; default: (x)=0;};};
//переменные:
//num - порядковый номер задержки (пока не придумал как автоматизировать), главное чтобы не повторялись внутри одной группы задержек
//te  - время задержки в миллисекундах
//x   - статик переменная, хранит адрес возврата (номер точки)
//t   - статик переменная, счетчик задержки

void GetTemp(void)    //процедура получения температуры
 {
 static   unsigned char DelyGetTemp = 1000*Speed_temp;                         //задержка перед первым измерением 1 сек.
 static   unsigned char  StepGetTemp = 0;     
 static   unsigned char TermH, TermL;
 StartDelay(StepGetTemp,DelyGetTemp)                        //это разделители, чтобы подпрограмма не выполнялась слишком долго, а перезапускалась и при перезапуске продолжалась с места остановки
 DS18B20_init();                                            // Инициализация DS18B20    
 Delay(1,0,StepGetTemp,DelyGetTemp)                                              
 write_18b20(0xCC);                                         // Проверка кода датчика
 Delay(2,0,StepGetTemp,DelyGetTemp)
 write_18b20(0x44);                                         // Запуск температурного преобразования                                         
 Delay(3,850,StepGetTemp,DelyGetTemp)                       // Пауза >750 мс
 DS18B20_init();                                            // Инициализация DS18B20
 Delay(4,0,StepGetTemp,DelyGetTemp)                                           
 write_18b20(0xCC);                                         // Проверка кода датчика
 Delay(5,0,StepGetTemp,DelyGetTemp) 
 write_18b20(0xBE);                                         // Считываем содержимое ОЗУ
 Delay(6,0,StepGetTemp,DelyGetTemp)
 TermL = read_18b20();                                      // Читаем младший байт блокнота
 Delay(7,0,StepGetTemp,DelyGetTemp)
 TermH = read_18b20();                                      // Читаем старший байт блокнота      
 Delay(8,0,StepGetTemp,DelyGetTemp)  
 Temperature=((((TermH<<8)+TermL)*10)>>4)+Corr; 
 if (OK_Flag != 0) {Temperature = -2000; Count=0;};   
 Count+=(~Count)? 1:0;                                     //это моё- счет правильныхъ измерений - для исключения ложных переключений компрессора
 EndDelay(150,StepGetTemp,DelyGetTemp)                     //задержка перед следующим измерением до 1сек
 } 

при развертывании дефайнов код разворачивается в обычный свитч-кейс...
_______________
я уже выкладывал эту идею на обозрение на этом форуме - меня попросили избавиться от ГОТО (я избавился) и предложили идею как узнавать текущий программ каунтер - через стек (он сохраняется в стеке при вызове подпрограммы) - пошел по этому пути, т.к. считаю, что на подзадачах код будет более компактным (а для тини это важно)
но у меня ничего не вышло...
______________
пробовал через указатели - не получается в указатель загрузить данные из регистра SP... пишет про несоответствие типов
пробовал через ассемблерные вставки - не получается вставке передать метку (из С кода) и как параметр метку тоже применить не получилось (чтобы взять адрес из неё)
пишу здесь, т.к. работаю в КВАВР и если возможно, предпочел бы (но не обязательно) получить подсказку по нюансам именно этого компилятора ...
может есть у кого какие наработки или мысли...

[Ivanoff-iv]

Сделал на подпрограммах - вроде всё понял... и квавр уже не ругается и 100 слов кода сэкономилось... но... ничего не работает и не понятно почему...
весь код остался прежним, изменилось содержимое дефайнов:

Спойлер

Код: Выделить всё

#pragma warn- // this will prevent warnings
void Set_PC(unsigned int x) 
{
#asm
    ;ldd   R26,Y+1    ;R26=xL  загрузка параметра в X
    ;ld    R27,Y     ;R27=xH 
    ;закомментировал, т.к. значение х уже в этих регистрах
    in    R30,SPL  ;загрузка SPL в Z 
    ;in    r31,SPH  ; для меги
    clr   R31      ; для тини
    ADIW  r30,0x01 ;Z=Z+1       
    st    Z+,r26    ;обновляем точку перехода в ОЗУ
    st    Z, r27   
#endasm
}

unsigned int Get_PC(void) 
{
#asm 
    IN    R26,SPL    ;SP->X
    ;IN    R27,SPH    ;SP->X для мег
    CLR   R27       ;для тини
    ADIW  r26,0x01  ;X=X+1  
    LD    r30,X+    ;результат из ОЗУ по X
    LD    r31,X   
#endasm
}
#pragma warn+ // enable warnings

#define StartDelay(x,t)  if (t) {if (~(t)) (t)--; goto Label##x;} else {if ((x)) Set_PC((x)); (t)=-1;};
#define Delay(num,te,x,t)   (t)=(te)*Speed_temp; (x)=Get_PC(); (t)=-1; goto Label##x;
#define EndDelay(te,x,t) (t)=(te)*Speed_temp; (x)=0; Label##x:;

описание подпрограмм:
Set_PC(х) - получает параметр и записывает его в ячейку памяти, по которой осуществится переход при завершении подпрограммы (аналог JMP но по переменной, а не по метке)
Get_PC() - возвращает значение PC точки, откуда был вызван
StartDelay(x,t) - проверяет вышло ли время ожидания, и если вышло - переходит по сохраненному адресу, если нет переходит к концу программного блока
Delay(num,te,x,t) - записывает время в переменную ожидания, адрес в переменную возврата и выходит из блока...
(num теперь не нужна, но пока осталась для совместимости со старым кодом)
EndDelay(te,x,t) - обозначает конец программного блока (метка), + добавлена задержка следующего запуска блока кода

[Аlex]

Ivanoff-iv, Вы изобретаете велик.
Любая ОС делает всё это более экономней, и код получается прозрачней.

[Ivanoff-iv]

Да, я знаю, что любая ОС это делает, но не любая ОС влезет в тини, чтобы ещё и место полезное осталось...

[Аlex]

А у Вас цель - впихнуть невпихуемое ? Задача в целом какая ?

PS: Ёжики плакали, рыдали, но продолжали есть кактусы...

[Ivanoff-iv]

Почему невпихуемое? уже несколько проектов шустро крутятся на тини 2313... например термостат, на DS18b20 и семисегментнике, с настройкой уставок, коррекции измерения датчика, и плавным изменением яркости индикатора, с высоким приоритетом пользовательского интерфейса (нет ни малейшего подмаргивания экрана, четкие измерения длительности нажатия клавиш... хотел ещё в меню вывести направление регулирования, но флеш предательски закончился... если я заведу свой новый код - влезет и он и ещё место останется...), неужели ради простого термостата или таймера обязательно мегу или стм покупать?

[Аlex]

Почему невпихуемое?

потому, что

флеш предательски закончился...

И Вы пытаетесь что-то изобретать, дабы впихнуть невпихуемое

Вы хотите сделать красивый линейный код, изобретая обёртки, которые разворачиваются в ужасные switch-case'ы.
Подглядите, как это делают в элементарных кооперативных ОС. Откроете для себя кое-что новенькое

[Ivanoff-iv]

[uquote="Аlex",url="/forum/viewtopic.php?p=3728074#p3728074"]обёртки, которые разворачиваются в ужасные switch-case'ы.[/uquote] ну... уже не разворачиваются...[uquote="Аlex",url="/forum/viewtopic.php?p=3728074#p3728074"]Подглядите, как это делают в элементарных кооперативных ОС...[/uquote] Если порекомендуете, куда глянуть, буду благодарен...

[Аlex]

OSA

[ARV]

Подглядите, как это делают в элементарных кооперативных ОС

в OSA "разворачивается" все намного страшнее... там даже для сборки не так все просто организовано. имхо, с точки зрения красоты кода OSA далеко не лучший пример. я очень в ней разочаровался, а от внутренней "механике" вообще в ужасе.
имхо.

[Аlex]

Каждому своё...
Много лет уже ей пользуюсь и ни разу в ней не разочаровался...
На сколько помню, ты был слишком требователен к искомой ОСи. Не забывай, OSA - простая и кооперативная ОСь !

Да и разговор был не совсем об операционках и их качествах. А о том, что человек делает планировщик, только через одно место. В то время, когда уже давно придумали другой способ реализации подобных алгоритмов.

[Ivanoff-iv]

OSA - штука интересная, но для тини немного крупновата... (почитал доки, пошарил коды, поставить пока не вышло...)
_____
Мой код не заработал... я нашел и убрал свои косяки... но, если задержек больше одной, то оптимизатор код так закручивает, что функции Гет и Сет РС оказываются на разных уровнях вложенности и перескок из одной в другую оказывается невозможен...

[prw07]

Как в CVAVR выключить оптимизатор кода ?

[Ivanoff-iv]

#pragma optsize-
или в настройках проекта

[prw07]

или в настройках проекта

искал в настройках, но не нашел отключения. Только способ оптимизации и уровень оптимизации.

[shrus43]

Здравствуйте профессионалы,помогите пожалуйста новичку,только начал изучать программирование,начал с камня атмега 16,попробовал зажечь светодиод,потом как и все,попробовал зажечь светодиод через кнопку,все получилось,только вот беда,контролер запитан у меня через программатор усбас,при подаче питания на микроконтроллер сразу без нажатия кнопки загорается светодиод и тухнет-это из за чего такое?

Спойлер

#include <mega16.h>
#include <delay.h>


void main(void)
{
PORTB=0x02;//вторая ножка порта В установлена как выход 00000010
DDRB=0x01;//на первой ножке порта В +5(высокий сигнал 1)00000001

while (1)
{
if(PINB.1==0)//если на ножке 1 порта В подключили землю(0 потенциал),
//то выполняется код в фигурных скобках
//выполнение кода в фигурных скобках
{
PORTB.0=1;//включился
delay_ms(100);//задержка
PORTB.0=0;//выключился
delay_ms(100);//задержка

PORTB.0=1;//включился
delay_ms(1000);//задержка
PORTB.0=0;//выключился
delay_ms(1000);//задержка
}
}
}

Добавлено after 7 minutes 33 seconds:
Еще подскажите пожалуйста,также начал осваивать протеус,по началу светодиоды мигали,а потом перестали,может я что-то натыкал,как это исправить?

[Zlobujan]

Товарищи, помогите не сойти с ума.
Имею простенький проект на аттини25, тактируюсь PWM.

Спойлер

#include <tiny25.h>

#include <delay.h>

// Declare your global variables here
unsigned char TIM1;
unsigned char TIM2;
unsigned char TIM3;
unsigned char AVAR;
unsigned char HALF;
unsigned char DLIT;
unsigned char CIKL;
unsigned char MINUS;
unsigned char TYPE;




// Timer 0 output compare A interrupt service routine
interrupt [TIM0_COMPA] void timer0_compa_isr(void)
{
if (HALF) {
#asm("NOP");
PORTB.1=0;
HALF=0;
goto _ENDINT;
};

PORTB.1=1;
HALF=1;
if (AVAR) {
goto _ENDINT;
};
DLIT++;

if (MINUS) {

if (DLIT>254) {
DLIT=0;
OCR0A--;
CIKL++;

if (CIKL>39) {
MINUS=0;
CIKL=0;
};

};

goto _ENDINT;
};

if (DLIT>254) {
DLIT=0;
OCR0A++;
CIKL++;

if (CIKL>19) {
MINUS=1;
};

};

_ENDINT:
}

// Voltage Reference: AVCC pin
#define ADC_VREF_TYPE ((0<<REFS1) | (0<<REFS0) | (0<<REFS2) | (0<<ADLAR))

// Read the AD conversion result
unsigned int read_adc(unsigned char adc_input)
{
ADMUX=0b00001011;
// Delay needed for the stabilization of the ADC input voltage
delay_us(10);
// Start the AD conversion
ADCSRA|=0x40;
// Wait for the AD conversion to complete
while ((ADCSRA & 0x10)==0);
ADCSRA|=0x10;
return ADCW;
}

void main(void)
{
// Declare your local variables here

// Crystal Oscillator division factor: 1
#pragma optsize-
CLKPR=(1<<CLKPCE);
CLKPR=(0<<CLKPCE) | (0<<CLKPS3) | (0<<CLKPS2) | (0<<CLKPS1) | (0<<CLKPS0);
#ifdef _OPTIMIZE_SIZE_
#pragma optsize+
#endif

// Input/Output Ports initialization
// Port B initialization
// Function: Bit5=In Bit4=In Bit3=In Bit2=In Bit1=Out Bit0=Out
DDRB=(0<<DDB5) | (0<<DDB4) | (0<<DDB3) | (0<<DDB2) | (1<<DDB1) | (1<<DDB0);
// State: Bit5=T Bit4=P Bit3=P Bit2=T Bit1=0 Bit0=0
PORTB=(0<<PORTB5) | (1<<PORTB4) | (1<<PORTB3) | (0<<PORTB2) | (0<<PORTB1) | (0<<PORTB0);

// Timer/Counter 0 initialization
// Clock source: System Clock
// Clock value: 16000,000 kHz
// Mode: CTC top=OCR0A
// OC0A output: Disconnected
// OC0B output: Disconnected
// Timer Period: 6,9375 us
TCCR0A=(0<<COM0A1) | (0<<COM0A0) | (0<<COM0B1) | (0<<COM0B0) | (1<<WGM01) | (0<<WGM00);
TCCR0B=(0<<WGM02) | (0<<CS02) | (0<<CS01) | (1<<CS00);
TCNT0=0x00;
OCR0A=0x6E;
OCR0B=0x00;

// Timer(s)/Counter(s) Interrupt(s) initialization
TIMSK=0x10;

// ADC initialization
// ADC Clock frequency: 1000,000 kHz
// ADC Voltage Reference: AVCC pin
// ADC Bipolar Input Mode: Off
// ADC Reverse Input Polarity: Off
// ADC Auto Trigger Source: Free Running
// Digital input buffers on ADC0: On, ADC1: On, ADC2: Off, ADC3: Off
DIDR0&=0x03;
DIDR0|=0x18;
ADMUX=0b00001011;
ADCSRA=0xA4;
ADCSRB&=0x58;


// Watchdog Timer initialization
// Watchdog Timer Prescaler: OSC/1024k
// Watchdog timeout action: Reset
#pragma optsize-
#asm("wdr")
WDTCR=0x1E;
WDTCR=0x0E;
#ifdef _OPTIMIZE_SIZE_
#pragma optsize+
#endif

// Globally enable interrupts
#asm("sei")

while (1)
{
TIM1++;
TYPE=PINB;
TYPE&=0b00010000;
if (TIM1>20) {
TIM1=0;
TIM2=0;
TIM3=0;
};
read_adc (1);

if (TYPE==16){
if (ADCW>40) {
if (AVAR) {
goto _ENDPR;
};
TIM2++;
if (TIM2>14) {
TIM3=0;
AVAR=1;
PORTB.0=1;
};
goto _ENDPR;
};

if (AVAR) {
TIM3++;
if (TIM3>14) {
AVAR=0;
TIM1=0;
TIM2=0;
TIM3=0;
PORTB.0=0;
};
};
}
else
{


if (ADCW>520 | ADCW<40) {
if (AVAR) {
goto _ENDPR;
};
TIM2++;
if (TIM2>14) {
TIM3=0;
AVAR=1;
PORTB.0=1;
};
goto _ENDPR;
};

if (AVAR) {
TIM3++;
if (TIM3>14) {
AVAR=0;
TIM1=0;
TIM2=0;
TIM3=0;
PORTB.0=0;
};
};

};


_ENDPR:
};



}

Пытаюсь по сигналу на PB4 бегать по разным веткам

Спойлер

TIM1++;
TYPE=PINB;
TYPE&=0b00010000;
if (TIM1>20) {
TIM1=0;
TIM2=0;
TIM3=0;
};
read_adc (1);

if (TYPE==16){
if (ADCW>40) {
if (AVAR) {
goto _ENDPR;
};
TIM2++;
if (TIM2>14) {
TIM3=0;
AVAR=1;
PORTB.0=1;
};
goto _ENDPR;
};

if (AVAR) {
TIM3++;
if (TIM3>14) {
AVAR=0;
TIM1=0;
TIM2=0;
TIM3=0;
PORTB.0=0;
};
};
}
else
{


if (ADCW>520 | ADCW<40) {
if (AVAR) {
goto _ENDPR;
};
TIM2++;
if (TIM2>14) {
TIM3=0;
AVAR=1;
PORTB.0=1;
};
goto _ENDPR;
};

if (AVAR) {
TIM3++;
if (TIM3>14) {
AVAR=0;
TIM1=0;
TIM2=0;
TIM3=0;
PORTB.0=0;
};
};

};

, но что-то идет не так. как будто всегда висит ноль на входе (в железе уровень меняется).
Что я делаю не так? Помогите

Вопрос снят, разобрался. Предшественник выключил цифровой буфер на входе.

[Kotto]

Здравствуйте! Задумался над тем, как авторы часов на ВЛИ и ГРИ реализуют различные спец эффекты, к примеру скроллинг цифр в разные стороны, затухание и подобные. Могли бы рассказать как все это работает, особенно сочетание с динамической индикацией... Думал думал и никак не соображу, очень хочется сделать это в своих часах. Изучал исходники, но мало что понял, свой код то писать сложно, а уж понять чужой.

Единственная мысль которая возникла, это массив с набором параметров каких то, но до конца мысль сформировать не могу. Буду благодарен за помощь. В первую очередь интересно не готовое решение, а сам принцип. Хочу понять досконально как оно работает.

Спасибо!