REM SPOOKY HOUSE BY: RICHARD GRUBE
CLS
PRINT "SPOOKY HOUSE"
PRINT "By: RICHARD GRUBE"
PRINT "The object of this game is to get to the exit with 1 treasure without getting killed."
PRINT "To play, enter the number choice that the words give you and press enter."
PRINT
PRINT
10 : INPUT "You enter the spooky house. Would you like to go upstairs (2)  or stay on the floor you're on (1)?", a%
IF a% = 1 THEN GOTO 1
IF a% = 2 THEN GOTO 2
IF a% < 1 THEN GOTO 10
IF a% > 2 THEN GOTO 10
1 : INPUT "You enter the dining room. Would you like to go to the kitchen (1) or the living room (2)?", b%
IF b% = 1 THEN GOTO 6
IF b% = 2 THEN GOTO 7
IF b% > 2 THEN GOTO 1
IF b% < 1 THEN GOTO 1
2 : INPUT "You go upstairs and see three doors which one would you like to go in? (1-3)", c%
IF c% = 1 THEN GOTO 3
IF c% = 2 THEN GOTO 4
IF c% = 3 THEN GOTO 3
IF c% < 1 THEN GOTO 2
IF c% > 3 THEN GOTO 2
3 : PRINT "You open the door and find a ghost. You are dead."
END
4 : INPUT "You open the door and find a ghost. You are so scared you run downstairs to the front door. Hit 7 to go back.", d%
IF d% = 7 THEN GOTO 10
IF d% < 7 THEN GOTO 4
IF d% > 7 THEn GOTO 4
6 : INPUT "You enter the kitchen. If you want to eat something hit 1. If you want to go back to the dining room hit 2.", e%
IF e% = 1 THEN GOTO 8
IF e% = 2 THEN GOTO 1
IF e% > 2 THEN GOTO 6
IF e% < 1 THEN GOTO 6
8 : PRINT "The food is poisonous. You are dead."
END
7 : INPUT "You enter the living room. Will you turn on the radio (1) or go to the hallway (2)?", f%
IF f% = 1 THEN GOTO 11
IF f% = 2 THEN GOTO 9
IF f% = > 2 THEN GOTO 7
IF f% = < 1 THEN GOTO 7
9 : INPUT "You enter the hallway. Will you go to the next room (1) or the exit (2)?", g%
IF g% = 1 THEN GOTO 12
IF g% = 2 AND t% = 1 THEN GOTO 20
IF g% = 2 AND t% = 0 THEN GOTO 19
IF g% < 1 THEN GOTO 9
IF g% > 2 THEN GOTO 9
11 : PRINT "The radio electrocutes you. You are dead."
END
12 : INPUT "You find a treasure! Hit 1 to save the treasure.", t%
IF t% < 1 THEN GOTO 12
IF t% > 1 THEN GOTO 12
13 : INPUT "Will you go back to the hall (1) or to the next room (2)?", h%
IF h% = 1 THEN GOTO 9
IF h% = 2 THEN GOTO 3
IF h% < 1 THEN GOTO 13
IF h% > 2 THEN GOTO 13
19 : INPUT "Sorry, you don't have enough treasures. Hit 1 to start over.", i%
IF i% = 1 THEN GOTO 10
IF i% > 1 THEN GOTO 19
IF 1% < 1 THEN GOTO 19
20 : PRINT "You win!"
END