2020-05-08 21:56:34 +10:00
|
|
|
( Required config: TI_MEM )
|
|
|
|
: TI_MEM+ [ TI_MEM LITN ] @ + ;
|
2020-05-08 23:07:44 +10:00
|
|
|
TI_MEM : TI_MEM [ LITN ] ;
|
2020-05-08 21:56:34 +10:00
|
|
|
: LCD_PORT_CMD 0x10 ; : LCD_PORT_DATA 0x11 ;
|
|
|
|
: FNTW 3 ; : FNTH 5 ;
|
|
|
|
( Wait until the lcd is ready to receive a command. It's a bit
|
|
|
|
weird to implement a waiting routine in asm, but the forth
|
|
|
|
version is a bit heavy and we don't want to wait longer than
|
|
|
|
we have to. )
|
2020-05-08 23:07:44 +10:00
|
|
|
CODE LCDWAIT
|
2020-05-08 21:56:34 +10:00
|
|
|
BEGIN,
|
2020-05-08 23:07:44 +10:00
|
|
|
0x10 INAn,
|
2020-05-08 21:56:34 +10:00
|
|
|
RLA, ( When 7th bit is clr, we can send a new cmd )
|
|
|
|
JRC, AGAIN,
|
|
|
|
;CODE
|