dos33fsprogs/basic/appleiibot/plasma.bas
2021-01-09 15:48:29 -05:00

3 lines
287 B
QBasic

1REM,=n9D`M1X/5Z.NO.MO-AS'1k-1b3kR4jjk/3bbnXA3k0j_E`>0S91X1P2(02ImRB28=mY8J0N9:W3T/JhO;X/OoI73)mZ[/3/1BQ]M2Q<63nWoR,gb1`<QC8:JoLE0#.1+01,/omnngmoP(L3748DA$ 2@-$ 1CKJA"3'--&)KTA1MF$(*@,F^'W<3'=
2FORI=0TO141:POKE3072+I,4*PEEK(2054+I)-192+(PEEK(2195+I/3)-32)/4^(I-INT(I/3)*3):NEXT:CALL3072