'--------Для ЖКИ имеющих две кодовые таблицы (Опробовано на МТ-16S2R)
'--------Здесь переключается кодовая таблица
'--------вставлять сразу после инициализации ЖКИ
$asm

Declare Sub Waitt
LDI R20, 1000     'это задержка для кварца 5МГц, пропорционально увеличить или уменьшить для других кварцев.
ldi R16,   &B00100000
ldi R17,   &B00100100
ldi R18,   &B10100000
ldi R19,   &B10100100

Out Portc , R17
Call Waitt
Out Portc , R16
Call Waitt
Out Portc , R18
Call Waitt
Out Portc , R19
Call Waitt
Out Portc , R18
Call Waitt
jmp en

Waitt:
Dec r20
tst   r20
brge Waitt
ret

En:
$end Asm

Cls