1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-11-15 03:18:05 +11:00
collapseos/arch/z80/sms/blk/608

11 lines
295 B
Plaintext
Raw Normal View History

2020-05-16 02:14:27 +10:00
: VDP$
9 0 DO _idat I 2 * + @ _ctl LOOP _blank
( palettes )
0xc000 _ctl
( BG ) 1 _zero 0x3f _data 14 _zero
( sprite, inverted colors ) 0x3f _data 15 _zero
0x4000 _ctl 0x5e 0 DO ~FNT I 7 * + _sfont LOOP
0 XYPOS !
2020-05-16 11:49:10 +10:00
( bit 6, enable display, bit 7, ?? ) 0x81c0 _ctl
2020-05-16 02:14:27 +10:00
;