mirror of
https://github.com/hsoft/collapseos.git
synced 2024-11-30 22:18:06 +11:00
9 lines
217 B
Plaintext
9 lines
217 B
Plaintext
|
: COLS 80 ; : LINES 25 ;
|
||
|
CODE AT-XY ( x y )
|
||
|
( DH=row DL=col BH=page )
|
||
|
AX POPx, BX POPx, DX PUSHx, ( protect )
|
||
|
DH AL MOVrr, DL BL MOVrr, BX BX XORxx, AH 2 MOVri,
|
||
|
0x10 INT, DX POPx, ( unprotect )
|
||
|
;CODE
|
||
|
|