ZXTape! 0Created with Ramsoft MakeTZXHaunted D7)F7  HAUNTED HOUSE ADVENTURE  *********************** % THIS VERSION FOR "MICROSOFT" BASIC ( REQUIRES A MINIMUM OF 16K 2" SELECT "TEXT MODE" IF NECESSARY < F$=" " A F% V=25:W=36$:G=18 P 1600@ Z :"HAUNTED HOUSE" d "-------------" n "YOUR LOCATION" x D$(RM+1) "EXITS:";  I=1 ̱(R$(RM+1))  R$(RM+1)(I I);",";  I   I=1 G 5 L(I)=RM F(I)=0 "YOU CAN SEE";O$(I);"HERE"  I  "========================="  M$:M$="WHAT"  "WHAT WILL YOU DO NOW":Q$ ' X$="":W$="":VB=0:OB=0  I=1 ̱(Q$)-1 * Q$(I I)=" " X$="" X$=Q$(I-1) L Q$(I+1 I+1)" " X$"" W$=Q$(I+1 ):I=(Q$)-1  I " W$="" X$=Q$ ') (X$)>(V$(1))X$="" 325E ($ X$=X$+F$(((V$(1))-(X$))) , I=1 V 6 X$=V$(I) VB=I @ I E* W$="" ű(W$)>(O$(1)) 360h F$ W$=W$+F$(((O$(1))-(W$))) J I=1 V T W$=O$(I) OB=I ^ I h( W$>"" OB=0 M$="THAT'S SILLY" r VB=0 VB=V+1 | W$="" M$="I NEED TWO WORDS" , VB>V OB>0 M$="YOU CAN'T'"+Q$+"'" / VB>V OB=0 M$="YOU DON'T MAKE SENSE"  OB=0 420 < VB0 C(OB)=0 M$="YOU DON'T HAVE'"+W$ n F(26)=1 RM=13  ƺ(*3+1)3 VB21 M$="BATS ATTACKING":90Z O RM=44 ,ƺ(*2)=1 F(24)1 F(27)=1 & F(20)=1 LL=LL-1 # LL<1 F(20)=0  500*(VB=1)+570:*(VB=2)+640*(VB>2 VB<10 )+980*(VB=10  VB=11 )+1030*(VB=12 )+1070.*(VB=13 )+1140t*(VB=14)+1180*(VB=15)+1220*(VB=16)+1250*(VB=17)+1300*(VB=18)+1340<*(VB=19)+1380d*(VB=20)+1400x*(VB=21)+1430*(VB=22)+1460*(VB=23)+1490*(VB=24)+1510*(VB=25)+15906*(VB=26) , LL=10  M$="YOUR CANDLE IS WANING!" ( LL=1 M$="YOUR CANDLE IS OUT!"  90Z  "WORDS I KNOW:"  I = 1 V  V$(I);",";  I  M$="": & 1580, 0 : "YOU ARE CARRYING:" D I=1 G N C(I)=1 O$(I);","; X I b M$="": l 1580, v  D=0  OB=0 D=VB-3  OB=19 D=1  OB=20 D=2  OB=21 D=3  OB=22 D=4  OB=23 D=5  OB=24 D=6 % RM=20 D=5 D=1 % RM=20 D=6 D=3 % RM=22 D=6 D=2 % RM=22 D=5 D=3 % RM=36 $D=6 D=1 % RM=36 $D=5 D=2  U F(14)=1 M$="CRASH! YOU FELL OUT OF THE TREE!":F(14)=0: I F(27)=1 RM=52 4M$="GHOSTS WILL NOT LET YOU MOVE":  ^ RM=45 -C(1)=1 F(34")=0 M$="A MAGICAL BARRIER TO THE WEST": *W (RM=26 F(20)=0) (D=1 D=4) M$="YOU NEED A LIGHT": 4: RM=54 6C(15)1 M$="YOU'RE STUCK!": >n C(15)=1 (RM=53 5RM=54 6RM=55 7RM=47/) M$="YOU CAN'T CARRY A BOAT!": HL (RM>26 RM<30) F(20)=0 M$="TOO DARK TO MOVE": R, F(35#)=0:RL=(R$(RM+1)) \ I=1 RL f U$=R$(RM+1) (I I) pP (U$="N" D=1 F(35#)=0 )RM=RM-8:F(35#)=1 zN (U$="S"D=2 F(35#)=0)RM=RM+8:F(35#)=1 P (U$="W" D=3 F(35#)=0) RM=RM-1:F(35#)=1 Q (U$="E" D=4 F(35#)=0) RM=RM+1:F(35#)=1  I  M$="OK" 0 F(35#)=0 M$="CAN'T GO THAT WAY!"  D<1 M$="GO WHERE?" g RM=41 )F(23)=1 R$(502)="SW":M$="THE DOOR SLAMS SHUT!":F(23)=0  + OB>G OB=0 M$="I CAN'T GET"+W$: ! L(OB)RM M$="IT ISN'T HERE" # F(OB)0 M$="WHAT"+W$+"?" + C(OB)=1 M$="YOU ALREADY HAVE IT" \ OB>0 L(OB)=RM F(OB)=0 C(OB)=1:L(OB)=65A:M$="YOU HAVE THE"+W$  R RM=43 +(OB=28 OB=29) F(17)=0:M$="DRAWER OPEN" . RM=28 OB=25 M$="IT'S LOCKED" E RM=38 &OB=32  M$="THAT'S CREEPY!":F(2)=0 $ .: OB=30 F(18)=0:M$="SOMETHING HERE!" 8( OB=31 M$="THAT'S DISGUSTING!" B6 (OB=28 OB=29) M$="THERE IS A DRAWER" L' OB=33 !OB=5 1140t V> RM=43 +OB=35 #M$="THERE IS SOMETHING BEYOND.." ` OB=32  1030 j t9 RM=42 *OB=33 !M$="THEY ARE DEMONIC WORKS" ~n (OB=3 OB=36$) C(3)=1 F(34")=0 M$="USE THIS WORD WITH CARE 'XZANFAR'" I C(5)=1 OB=5 M$="THE SCRIPT IS IN AN ALIEN TONGUE"   M$="OK '"+W$+"'" X C(3)=1 OB=34 "M$="*MAGIC OCCURS*":RM45 -RM=(*64@) E C(3)=1 OB=34 "RM=45 -F(34")=1  - C(12 )=1 M$="YOU MADE A HOLE" t C(12 )=1 RM=30 M$="DUG THE BARS OUT":D$(RM+1)="HOLE IN THE WALL":R$(RM+1)="NSE"  G C(14)1 RM=7 M$="THIS IS NO TIME TO PLAY GAMES" 7 OB=14 C(14)=1 M$="YOU SWUNG IT" 2 OB=13  C(13 )=1 M$="WHOOSH!"  OB=13  C(13 )=1 RM=43 +R$(RM+1)="WN":D$(RM+1)="STUDY WITH SECRET ROOM":M$="YOU BROKE THE THIN WALL"   G OB=14 C(14)=1M$="IT ISN'T ATTACHED TO ANYTHING"  OB=14 C(14)1 RM=7 F(14)=0 M$="YOU SEE THICK FOREST AND CLIFF SOUTH":F(14)=1: (l OB=14 C(14)1 RM=7 F(14)=1 M$="GOING DOWN!":F(14)=0 2