mirror of
https://github.com/deater/dos33fsprogs.git
synced 2025-01-07 12:31:57 +00:00
4 lines
255 B
QBasic
4 lines
255 B
QBasic
0REM' G 4 G55- G6O CD9;/CD88%AB;; *+;=/*+::%()== 89<>/89;;%67>> /1@D//1??%-.DD EGBF/EGAA%CDFF :=CI/:=BB%79II $'EK/$'DD%!#KK%!#KK
|
|
1DEFFNP(X)=PEEK(2054+I*5+X)-32:GR:POKE49234,0:FORI=0TO24:COLOR=FNP(0):FORY=FNP(3)TOFNP(4):HLINFNP(1),FNP(2)ATY:NEXTY,I:GETA
|
|
|