Реферат: Синтаксический распознаватель арифметического оператора условного перехода языка FORTRAN

break;

case EASC_Up:

if(y>1)

{

if(com>0)

window(3,2,47,24);

else

window(3,2,77,24);

y--;

gotoxy(1,y);

textattr(63);

clreol();

cputs(file1[y-1]);

gotoxy(1,y+1);

textattr(31);

clreol();

cputs(file1[y]);

gotoxy(5,23);

cprintf(" %d ",y);

if(com>0)

Message(y-1);

}

break;

case EASC_Down:

if(y<22)

{

if(com>0)

window(3,2,47,24);

else