VTech Precomputer Power Pad Plus - Manual (Page 72)

68
THE FORTUNE TELLER
10 DIM N$(5)
20 PRINT “The Fortune Teller”
30 INPUT “Are you a boy or a girl” ;S$
40 INPUT “Pick a number between 2-5”; NUMBER
50 FOR COUNT = 1 TO NUMBER
60 IF S$ = “boy” OR S$=“BOY” THEN 70 ELSE 90
70 INPUT “Enter a girl’s name”; N$ (COUNT)
80 NEXT
85 GOTO 110
90 INPUT “Enter a boy’s name”; N$ (COUNT)
100 NEXT COUNT
110 Y= INT (RND (NUMBER))
120 TG$ = N$ (Y)
130 PRINT “The person of your”
140 PRINT “dreams is ” ; TG$
RUN