mirror of
https://github.com/hsoft/collapseos.git
synced 2024-11-24 00:58:05 +11:00
4e98ef11bd
I need RSHIFT and LSHIFT first...
6 lines
138 B
Plaintext
6 lines
138 B
Plaintext
: _glyph> ( a -- )
|
|
LCD_CURY C@ _row! LCD_CURX C@ 8 /MOD _col! ( a coff )
|
|
0x05 ( XINC ) _cmd _data@ DROP
|
|
FNT_HEIGHT 0 DO LOOP
|
|
|