Добавил:
ktotogdetotam
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:БЭМЗ полищук доки / mogilev yst / МК7007БМ / SINGL_CO
.C/*”гЄжЁп ўў®¤ ®¤®Ј® Ї®Їа ў®з®Ј® Є®ндд. ЊЉ7006 ь30*/
/*Ї®¤Є«о票Ґ § Ј®«®ўЄ®ў ўгв२е ॣЁбва®ў 80‘31*/
#include <io51.h>
/*Ї®¤Є«о票Ґ § Ј®«®ўЄ®ў ЎЁЎ«Ё®вҐзле дгЄжЁ©*/
#include <stdlib.h>
extern unsigned char num_key(void);
extern void move_dir(char);
extern void mov_read(char);
extern void mov_write(char,char);
/*®ЇаҐ¤Ґ«ҐЁҐ вЁЇ ЇҐаҐ¬Ґле*/
extern float m_cor_flt[81];
extern unsigned char poz;
unsigned char poz1;
unsigned char m_cor[8];
extern unsigned char i;
extern unsigned char j;
extern unsigned char number;
extern unsigned char nom;
void singl_cor(unsigned char nom)
{
singl_cor_0:
poz1=poz;
singl_cor_1:
move_dir(poz1);
number=num_key(); /*®ЇаҐ¤Ґ«ҐЁҐ ®¬Ґа ¦ в®© Є®ЇЄЁ*/
if(number!=12&&number!=13&&number!=14&&number!=15&&number!=16)
{
switch (number) { /*ЇҐаҐе®¤л Ї® ®¬Ґаг Є®ЇЄЁ*/
case 1 : i=0x37;
break;
case 2 : i=0x34;
break;
case 3 : i=0x31;
break;
case 4 : i=0x30;
break;
case 5 : i=0x38;
break;
case 6 : i=0x35;
break;
case 7 : i=0x32;
break;
case 8 : i=0x2c;
break;
case 9 : i=0x39;
break;
case 10 : i=0x36;
break;
case 11 : i=0x33;
break;
}
mov_write(poz1,i);
poz1=poz1+1;
if(poz1>(poz+6))poz1=poz1-7;
goto singl_cor_1;
}
if(number==13||number==16)return;
if(number==14)
{
for(poz1=poz,j=0;j<=6;poz1++,j++)
{
mov_read(poz1);
if(i==0x2c)i=0x2e;
m_cor[j]=i;
}
m_cor[7]=0x2f;
m_cor_flt[nom]=atof(m_cor);
return;
}
goto singl_cor_1;
}
Соседние файлы в папке МК7007БМ