Fun With Basic

10   PRINT “Do you have a problem? (Y or N)” 20   INPUT $A 30   IF $A = “N” GOTO 120 40   PRINT “Can someone else help? (Y or N)” 50   INPUT $B 60   IF $B = “Y” GOTO 120 70   … Continued

10   PRINT “Do you have a problem? (Y or N)”

20   INPUT $A

30   IF $A = “N” GOTO 120

40   PRINT “Can someone else help? (Y or N)”

50   INPUT $B

60   IF $B = “Y” GOTO 120

70   PRINT “Can you find them? (Y or N)”

80   INPUT $C

90   IF $C = “N” GOTO 120

100 PRINT “Maybe you can hire… the A-Team.”

110 GOTO 130

120 PRINT “You cannot hire the A-Team.”

130 END

7 Comments on “Fun With Basic”

  1. lee OTI Staff #

    I love it when a program comes together.

    Reply

  2. mlawski OTI Staff #

    Oh man! I made a basic joke in one of my future posts!

    Well, when it comes up, be aware I didn’t steal it from Belinkie.

    Really! (Also, mine doesn’t actually work as a program, so I guess Belinkie wins this round. Next time, Gadget! Next time!)

    Reply

  3. Surdo #

    I lol’ed.

    Reply

  4. Rob #

    10 PRNIT “Why didn’t John McCain pay taxes on his winnings at the craps table?”
    ?SYNTAX ERROR

    Reply

  5. Professor Coldheart #

    Definitely need a GOSUB after line 70, in which the user can check out the hook while a DJ revolves it.

    Reply

  6. H-S-D-O #

    I dont get it

    Reply

Add a Comment