mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-09-17 08:54:50 +00:00
13 lines
419 B
QBasic
13 lines
419 B
QBasic
5 HOME
|
|
10 PRINT "FIRE DEMO V1.2 BY DEATER"
|
|
40 PRINT:PRINT
|
|
50 PRINT "WHICH DEMO DO YOU WISH TO RUN?"
|
|
60 PRINT "1. FIRE_TINY (105 BYTES)"
|
|
70 PRINT "2. FIRE_FIRMWARE (80 BYTES)"
|
|
80 PRINT "3. FIRE_EXTREME (64 BYTES)"
|
|
90 INPUT A
|
|
100 IF A=1 THEN PRINT CHR$ (4)"BRUN FIRE_TINY"
|
|
110 IF A=2 THEN PRINT CHR$ (4)"BRUN FIRE_FIRMWARE"
|
|
120 IF A=3 THEN PRINT CHR$ (4)"BRUN FIRE_EXTREME"
|
|
130 GOTO 5
|