Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 06.04.2019, 22:27   #1
Witcher1990
Новичок
Джуниор
 
Регистрация: 06.04.2019
Сообщений: 1
По умолчанию Есть специалисты по блок-схемам по коду с полным описанием ее элементов? Если не сложно, помогите!

Всем привет. Есть специалисты по блок-схемам по коду с полным описанием ее элементов? Если не сложно, помогите! я далеко не специалист,поэтому прошу прощения за,наверное, глупую просьбу. Кода два. Один на C++? Второй на асемблер. Текстовый документ с асемблером прикреплен к сообщением
Код:
#include "inpic.h"
#include "io12f629.h"
unsigned char debounceon=0;
unsigned char debounceoff=0;
unsigned char waswrite=1;
unsigned char LED;
unsigned char serv;
unsigned long limit;  
unsigned long time;   
char time0=0;
char time1=0;
char time2=0;
char time3=0;
char readmem( char addr )
{    
RP0 = 1;          
EEADR=addr;
RD =1;         
serv = EEDATA;
RP0 = 0;             
return serv;
}
writemem(char addr,char data)
{    
GIE = 0;
RP0 = 1;
EEADR = addr;
EEDATA = data;
WREN = 1
EECON2 = 0x55;
EECON2 = 0xAA;
WR = 1;
WREN = 0;       
RP0 = 0;
}
wait (unsigned short number)
{ 
unsigned short current;
for (current=0;current<number;current++)
}
main  (c_tack)
{
GPIO=0;//relay off   
GPIO=0;//relay off 
LOOP:
__set_configuration_word(0x11CC); 
b'01000111001001' 0x11C9
GIE = 0;
T1CON = 0;          
CMCON = 7;            
RP0 = 1;             
asm ("call 0x3FF") ;   
asm ("movwf 0x90") ;   
GIE = 0;               
VRCON = 0; 
TRISIO = 8;             
OPTION = 0xBF;                                 
RP0 = 0;  
time++;
LED++;
if (LED==5) {LED=0; GPIO ^= (1<<2);
} 
if (!(GPIO&8))  debounceon++;
else debounceon = 0;
if (debounceon==5) 
{ 
time=0;
waswrite=0;//now we can write to EEPROM
writemem (0,0xff);wait (9090);
writemem (1,0xff);wait (9090);
writemem (2,0xff);wait (9090);
writemem (3,0xff);
}
if (GPIO&8) debounceoff++;
else debounceoff = 0;       
if ((debounceoff==5)&&(!waswrite)
{
time0=time&0x000000FF;
time = time>>8;
time1=time&0x000000FF;
time = time>>8;
time2=time&0x000000FF;
time = time>>8;
time3=time&0x000000FF;
writemem (0,time0);wait (9090);
writemem (1,time1);wait (9090);
writemem (2,time2);wait (9090);
writemem (3,time3); 
waswrite=1;
time=0;
}
limit=readmem (3);
limit=limit<<8;
limit |=readmem (2);
limit=limit<<8;
limit |=readmem (1);
limit=limit<<8;
limit |=readmem (0);
if (time>limit)
{
while (1)
{
GPIO |= (1<<1); 
GPIO |= (1<<1); 
GPIO ^= (1<<2);
__clear_watchdog_timer ();
wait (10000);
}
}
if (debounceon>250) debounceon=250;
if (debounceoff>250) debounceoff=250;     
wait (9030);
__clear_watchdog_timer ();
goto LOOP;  
}
Пожалуйста, оформляйте Ваш код согласно правилам.
Вложения
Тип файла: txt CIJ628.txt (19.0 Кб, 124 просмотров)

Последний раз редактировалось Вадим Мошев; 06.04.2019 в 22:33.
Witcher1990 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите составить программы по блок-схемам leroy_atr Помощь студентам 1 01.11.2017 15:43
Помогите на паскале если не сложно=) Ddradok Помощь студентам 0 17.12.2014 20:32
Есть вопрос по блок-схемам Новичёк_Delphi Помощь студентам 1 13.12.2012 20:36
помогите решить задачи на паскале, если можно с полным решением вадимкО Помощь студентам 4 13.12.2009 13:04
Помогите немного если не сложно,оч надо(Pascal) Bremen Помощь студентам 7 27.07.2008 12:52