home *** CD-ROM | disk | FTP | other *** search
GW-BASIC | 1994-02-04 | 384 b | 18 lines |
- 10 CLS:KEY OFF
- 12 ' replace data files for spellbee.bas
- 15 OPEN "O",1, "spell1.dat"
- 17 'Use 1,2,3,or 4 /|\
- 30 READ A$
- 35 IF A$ = "zodiac" THEN 60
- 40 PRINT #1, A$
- 50 GOTO 30
- 60 CLOSE 1
- 70 END
- 100 DATA apple,any,more,ETC
- 110 '
- 120 '
- 130 ' Place data statements here
- 140 '
- 150 '
- 1000 DATA zodiac
-