VTech PreComputer 2000 Manual page 54

6 YOUR FUTURE
10 INPUT "HOW OLD ARE YOU";AGE
20 PRINT "WHAT DO YOU WANT" ·
30 PRINT "TO BE WHEN YOU"
40 INPUT "GROW UP";JOB$
50 PRINT "ARE YOU A"
60 INPUT "BOY OR GIRL";SEX$
70 INPUT "YOUR LAST NAME";NAME$
80 PRINT ABS(21-AGE); "YEARS FROM NOW"
90 IF SEX$="BOY" THEN PRINT "MR. ";NAME$
100 IF SEX$="GIRL" THEN PRINT "MS. ";NAME$
110 PRINT "YOUR JOB IS ";JOB$
120 END
7 CASINO
10 PRINT "2 TO 6 SMALL"
20 PRINT "7 TO 12 LARGE"
30 INPUT "(SM)ALL OR (LA)RGE";A$
40 D1=1NT(RND(0)* 6)+1
50 D2=1NT(RND(0)*6)+ 1
60 PRINT D1 ;"
AND -
";D2
70 PRINT D1 +D2;
80 IF D1+D2>6 THEN GOTO 130
90 PRINT "SMALL"
100 IF A$="SM" THEN PRINT "YOU WIN!"
110 IF A$="LA" THEN PRINT "YOU LOSE!"
120 GOTO 160
130 PRINT "LARGE"
140 IF A$="LA" THEN PRINT "YOU WIN!"
150 IF A$="SM" THEN PRINT "YOU LOSE!"
160 INPUT "AGAIN(YES/NO)";Y$
170 IF Y$="YES" THEN GOTO 30
999 END
53