mirror of
https://github.com/deater/dos33fsprogs.git
synced 2025-01-08 03:31:10 +00:00
6 lines
280 B
QBasic
6 lines
280 B
QBasic
0REM~&!:):C&`~:)d)dC:C~dCz`~d)y!~L+T+X2X8V=R@L@I=F8F2L+~N<R<R>N>N<~K.I2H8L=L;N9R9T;T=V7V2T.~K.J3P9T3T.T0P6L1K.~L5L7N8R8S7R5~N3N1R1R3!
|
|
1HGR:HCOLOR=5:DEFFNP(X)=3*PEEK(2054+I+X)-99
|
|
2IFFNP(0)=279THENHPLOTFNP(1),FNP(2):I=I+3
|
|
3HPLOTTOFNP(0),FNP(1):I=I+2:IFFNP(0)GOTO2
|
|
4?"HEAD A SPLODE"
|