VTech Power Pad Precomputer Power Pad Plus User Manual page 74

MAD LIB'S
10 REM * MAD LIB'S *
20 PRINT "Mad Lib's"
30 INPUT "Adjective"; A1$
40 INPUT "Verb"; V$
50 INPUT "Adverb"; A2$
60 PRINT "Once upon a time"
70 PRINT "there was a "; A1$
80 PRINT "dog that decided to"
90 PRINT V$; " "; A2$;" down the"
100 PRINT "hill to fetch its"
110 PRINT "bone."
120 END
SECRET NUMBER
0 REM **Secret Number**
10 NO = RND(100)
20 PRINT "Hi! I've got a secret number"
30 PRINT "between 1 and 100."
40 INPUT "Guess it by typing a number"; ANSWER
50 IF ANSWER = NO THEN GOTO 200
60 IF ANSWER > NO THEN GOTO 100
70 PRINT "No! The secret number is bigger."
70