17 lines
318 B
Plaintext
17 lines
318 B
Plaintext
10 DATA "Fee fie", "Huff and Puff", "Mirror mirror", "Tick tock"
|
|
20 VC = 0
|
|
30 DIM M$(3)
|
|
40 FOR I = 0 TO 3
|
|
50 READ M$(I)
|
|
60 NEXT I
|
|
70 CLS
|
|
80 FOR I = 0 TO 3
|
|
90 PRINT I+1;" ";M$(I)
|
|
100 NEXT I
|
|
110 PRINT
|
|
120 INPUT "Choice? ", C$
|
|
130 VC = VAL(C$)
|
|
140 IF VC<1 OR VC>4 THEN GOTO 70
|
|
150 PRINT "You picked ", M$(VC-1)
|
|
160 END
|