mirror of
https://github.com/deater/dos33fsprogs.git
synced 2025-01-03 18:29:53 +00:00
14 lines
382 B
QBasic
14 lines
382 B
QBasic
5 HOME
|
|
10 PRINT " BUBBLE UNIVERSE EXPERIMENTS"
|
|
15 PRINT " BY DEATER / FAST CODE BY SERATO_FIG"
|
|
20 PRINT
|
|
25 PRINT "THIS VERSION YOU CAN CHANGE"
|
|
27 PRINT "PARAMETERS ON THE FLY"
|
|
28 PRINT "+ TRY PRESSING A/Z TO INC/DEC I"
|
|
29 PRINT "+ TRY PRESSING J/M TO INC/DEC J"
|
|
30 PRINT:PRINT "PRESS ANY KEY TO START"
|
|
40 GET A$
|
|
50 IF A$="Q" THEN END
|
|
60 PRINT:PRINT CHR$(4)"BRUN BUBBLE_BLOB"
|
|
|