int16_t putchar(int16_t c_in) // Вывести символ в кодировке Win. с управляющими символами
{
uint8_t c;
uint8_t static cr_direct_flag; // Флаг прямой адресации курсора

c = c_in; // Привести к байту
if(cr_direct_flag==1){
cr_direct_flag=0; // Сбросить
GotoXY(c & 0x1f,c>>5); // Выполнить прямую адресацию курсора
}
else{
if((c>=8) && (c<0x20)){
switch©{
case CR_TAB:
WaitEndData(' '); // вывести ' '
WaitEndData(' '); // вывести ' '
WaitEndData(' '); // вывести ' '
WaitEndData(' '); // вывести ' '
break;
case CR_LEFT:
cr_left();
case CR_RIGHT:
cr_right();
break;
case CR_BS:
if(cr_left()>=0){
WaitEndData(' '); // вывести ' '
cr_left();
}
break;
case CR_CURSHOW:
CURSHOW; // Курсор показать
break;
case CR_CURHIDE:
CURHIDE; // Курсор погасить
break;
case CR_DOWN:
case CR_LF:
cr_down(); // Курсор вниз
break;
case CR_UP:
cr_down(); // Курсор вверх
break;
case CR_ENTER:
cr_home(); // Курсор в начало строки
break;
case CR_HOME:
WaitEndCom(0x80); // Курсор в нулевую позицию.
break;
case CR_NEW:
CLEARLCD; // Очистить дисплей.
break;
case CR_CURDIRECT:
cr_direct_flag=1; // Адресовать курсор
break;
case CR_BEEP:
break;
}
}
else{
if(c>=0x80){ // Если символ не латинский, то
c -= 0x80; // Уменьшить таблицу
c = TabWin[c]; // Перекодировать
}
WaitEndData©; // и вывести
}
}
return(1);
}