Quote:
|
Originally Posted by Clodfobble
Will my best friend's baby be a boy (her first) or a girl (her third)?
|
10 HOME
20 GET A$; "IS HUSBAND FATHER? (Y/N)"
30 IF A = "Y" THEN GOTO 500
40 GET B$; "IS BEST FRIEND FATHER? (Y/N)"
50 IF B="Y" THEN GOTO 600
60 PRINT "BABY IS PRODUCT OF MIDOCLORIAN CONCENTRATION. WILL BE MALE"
70 GOTO 4242
500 GET C$; "IS HUSBAND MALE? (Y/N)"
510 IF C$ = "Y", GOTO 900
520 IF C$ = "N", THEN GET {IP SIGNIFIER} FORWARD TO
JERRYFALWELL@PROFAMILYAMERICA.ORG
530 PRINT = "PLEASE DO NOT LEAVE YOUR HOME. SOMEONE WILL BE TO SEE YOU SHORTLY."
540 GOTO 900
600 GET D$; "IS BEST FRIEND AWARE THAT HE IS FATHER? (Y/N)"
610 IF D$ = "N" THEN PRINT "PLEASE CALL 1-800-96-JERRY"
620 GOTO 900
900 X$=RND{1-468}
910 IF X$ = 1, THEN PRINT "IT'S A GIRL!!"
920 IF X$ = 1, THEN GOTO 4242
930 PRINT "IT'S A BOY!!!"
940 PRINT "YOU BROKE YOUR ... ANKLE, ARM, LEG, ARM, HEAD, ARM, PRIDE, BIKE, ARM, LEG, TEETH. WOULD YOU LIKE TO JUMP AGAIN? (Y/N)"
4242 END