'=========================================================================== ' Subject: HAUNTED HOUSE TEXT ADVENTURE Date: 03-09-99 (19:05) ' Author: Nigel Traves Code: QB, QBasic, PDS ' Origin: tarot@ihalliwell.freeserve.co.u Packet: GAMES.ABC '=========================================================================== ' Two versions of the old HAUNTED HOUSE TEXT ADVENTURE GAME DEFINT A-Z:DIM SHARED K,S,B&,Z&:V1 'Created by PostIt! 7.2 SUB V1:OPEN "O",1,"HAUNTED.ZIP",4^6:Z&=9362:?STRING$(50,177); U"%up()%9%'%#-%R*A\J01*]]+4.%%HM%%%0%%%%fi&%Rtq%iSgfgxl)d5aTw7iwn U"y5L(#t9V5AAe6g7;[;*';[)4(]Eb(jcx;Zkg+4I]#[PvG3&;eo(DBIYRtm.Xk;U U"s1aI6R)bCi%3q2HB'D[HuqFBiv.mxkLu_46wwsQK4n2d-gQf#l/3wS_7z4v5YfT U"zHn#4TmHZk#;o[-qr)ZcMG41ULh/8Dw3qpC9t%/+g3RyfdVJEJ\J+VD/kl%t.H; U"UdMhwM2M^_0\o=nC'[kVUHtY U"MZfbZE9lEq-GRW8MnV#Q8Cf9H$qDXy'?b$c'h.t[T$uJW&+me&I2O[[0r29*U[N;GFI U"I)0NKm+O9k1kQ&$g[UjT=C6TV+r8ezmcfu#A6e$zd-CQs*#64XLoPN7VdffO2qV U"%CnItD7R'VA'jdA/xn0NBrBob;SCt-7(ZsAY\^Gx$+/D[B8GPhkC_K6>[A$L4m* U"WoRJp+q2Z)wIC)s,]^R7Q$HD0Ql7PM5LI5WPP6[BQp\yBK=5AQ:Q#c,eb#YSwk+ U")qF\;>O'\j&RfQ:QX=2ZAl[V;b50].Qo,UopF:i]s\>6BV]X5eacW5l?KBv/qD; U"'dQ+lSY;h4n_5,5N#2%=oUBe0 U"P7+c33yNwl48E%4TITDiXZus%3\5vN]B>D(R[%&j^NaGJjjD-Ccz1,2kGdT#mP' U"M0w/q>=[APx8<#bm0]bhPqC:/y*7K)MqkH?u]S#HJNLk;kEQ#ObmybO;3zSD8i4 U"=K4MbSE,A2fYyqf404.fYQBbY[V8)IdlS,['UJ-lS6'Mjx&>fR*EjQJG?V[.q]b U"oE'qRBYuH\q?kA6rPh*+;9BR2%);gGeNZI%5WKeji2/VD?VsoRH/^<5tJ72/Yl$ U"4bgO4)[K/=b4c+Tp7+fm71'WXRCA?S(D2\gvw[fI4u<6tAs1YmP U"j%iCS$YebVFikmEI+hld=N*O=(p'\2qTle%qfnyoXT)(4p$qzK/,*C6$RTDvne5 U"x'=,_z=7s?:h?ruCCFQkGn2HtzDS8V_H)WmX%6UUKi48A% U"o0Fa'LDQ=h6>[^LqG^T3?sfrk%r&)QG$ U"Thv>j%(il)c%L2km5g0bl]qmIAYk2dXJEgg8/$,cc3GrU[SRUt6O/[3* U"sUc54NZ4L).B&S^Lb+Zq-pkY_g9KxN8mp_4Z_k:bpJC+,3r3beVgi'd47m,BkS[ U"hoj+KR1L=a=bseUR#KTcKfz'T&\=skUfogRshbKST4vK+V1cLeDdCo+t[Fe1fYIQ#1YF[4a1HC,L6GkSmHc6t>\.Lqiyi*Z#s>c_Q70^5HWPH+(Gb1n U"joFLNB8Kqd$0LvQ$vLt[8cmb3/ph87iqb_kpqeu:/]10%hA5I')7,xCLsp4jH90 U"K'lr$LF(_6QC6ot50okZ'4_^FdwELD(sT*e7nAKd7JIiI5h)/7pYIj.;>$dL=#v U"K$.$IZ(^*;qC]aq+'B3gEE&qUA(aoLiTA1SVDY U"E'cg=:*RjG;o?**C/l]e1tU%kf\]#_.1%7TuBXGQKSmW,2lTATl5_0It2O[]V'aT=4FVRs+:%%d&I5-?7 U"%[Bq1>mR&<6=LEYaHBs0n^Xh^OM U"\)aRmG/r:3\-'_Y)0c?_/%4vIN_eseB+__lRxpvXFx:7ZSa**CALuE7AX U"lj6EU1p16x-,ZNJjwtMV5ljzragCCsWyM6kOchu6-wY%Wolo5s4VU%z4GM)0soM U"v(g&Wxj9TN.^r.70aH.ME70?esf,ZA'9o)JwO]v&HAtXUgAls.+;]CS0WDnc1l3 U"CDm+C$B#X]^h6?eKrdSA4gOG&66lZsQ52<7SayMU)6ii=wvbC$bR[aE&ZVQ2=7Y'ixVV(cUt)iD/swNrVL4 U"[\v4<=*Pfn(WN_DT'cZ)MVx-cf*#4e1+5+jNnzsACb6jj00LHl6*w4+obrp#R<4 U"?5_XN>O]tA8^Q1U/UMrsKdIsFZ2H3]+NU8J1XFb=)woQcDn>v3mSQC\v+V U"(F-LM0X#aS+K*3oEJ)ES7bE'V-Kpy5yEn9rp_<33sMY*Z#b6&NbqS,6%bA>ZhY7 U"+<8JDj#l..UZ2Y6i\-(_\7hV^M&InkCIyL)5M:t'\GNk\Y U"_o<>FW,TD'vofntu\RHw;<#YE$-PM*jTUL6Z%WBvL[H^*uwQfi3+)83F4+gZ;up U"_8&H&t4,,.H*_zi;Zk$2W2ddDh&:tgzqp0b U"oqA69+o*iapss+H6kuN*wjDZ?h1^H;fKY2jdCmp][Q^'IUSNY70]Gv=O0[sAAoL U"v.vl=lY_:d%5,ok[d.cCgiP-\1Hl:o;lJnh0j7?\LhGrcFKtwK)><6vyhYv&7uj U"tXM%$%WlQsH]Z($Zi&6NGAliP\C U"V-d:/KT049\P8'^8.*6oc_/zPCPI)7e,Rv%61P&9FZH*?Sp[<4WXqVG=/Y#;-mV U"LNk&&*Mi^%s3%uay\NB=17BbX56:bXn;e18QY\U2lU>>-5\WsI3JW13TQ)IQ;p] U"l7tiD,rl6XOlY0k/Z)Is;DH U"CU:8sbLII1L,SMmSe0m.Mi-cOtvg]pCUUMSpxTrob1et#K;aJk(kb&#-b]1l:9# U"\%,S,q%M.6M$2VX(+7nzjX_UpIsiB&7U_Gj:^))6TB)G+kG%eM7W6?KSpO8 U"oIX80sGB5teTER^X1Oy-E\mu]\1-,0d>%bAtq/P&cn>/1iI5eh4LA$OW^)sURir U"g\+QhJXukOfMq$6U>k(GiSVoPzH'K9[k4n;1JVnXKIrh^Z)MTlF,G1^2*q\i[0e U"=GntI0GZ2/TPx;$2sqY''Y2(+<.Rd9=qZmTSt79%OO/p_-rmR]g=j.f:_MI*;RW U"LeQfZu)g:7B7.(OK(W^AI,*u9Ipq U"r[u\,Vx'u%p()9%%'%-I%5y^OJM0H(wF5%+%_z%%%0%%#%fi%#Rsj&%SgfxKfa: U"BoT[/X^Xbd))n/r$JXxs:N6;FjK1h$_]=Vja^'s:p^#s U"=0miD86g*%anIXaGtkI(AO3V3Q?Y)<)ihM29BQO9fYgteFATX\Irp?qlorlQ&j3 U"etPUG.:pvKr-yM]#;W\^O\giMq4mpaExWcrrL=/drC,XAl'G(UXZlOBG2Z,KBjD U"?wfW+;AIta%CYy1:sobI5=*gR[#q?p+o;:xSr8vFeQc)sY U"S)0>LYLQO=yk$GNiNGnbuw=DXcFn>iPZ>:<;*^kAS5gqDA2x+:./9]-uWf.Lj$Q U"qs_dn;Plxgj^BE#WT&(INDK.Khj-S?b6Ur(M,>X1Njhs9gBwNJW^Q)OZi0>_q1U U"q7^'MF%&fFI.%^-+:ab_F)9JlI9O._nQ/E^m%dlIWz9:o8)S\rNN$C)&<;tw*G* U"SOOfF-TMcPn7$H0GD3*5358\vhI\]-?Z4OLv5L3_19/7mW[auMpa*P7M9ZNYZf+NLr0Z U".?G54:1BYoo[7T1oDLqkMK,PNW5\1e:qD^pIlY\#]*hicE8udZP)N?;&F:b9v/F U"aJ'T%Fc90fE9p.tog'Zo^(rp%wL]CVKDq:dc-:>6]t[S#8ogKc<4=Fvg,)&VVDF U"r8Kf[RZi(FuKebT8x/$0lv?M%DcW.mQX8R'kKmK9]3+(3\VCsyC;.o0f0G=/r'P U">gR\x$8q;3>FP*V$N2?.1cfLw9_:teWQemWcR68ucOSJ#)xY#$FD3v7wy U"+z#sgtZ'^7b0F;$C)/HtQfrTFPE6n8HPIdkd947q;zlZ]Vp>x_AGFF-oa+GCFY^ U"JNhxcG,t;f?uu29_'dKn5FOAL%s4vA#vN]7M*50QI4eo#cB3Njg&F(sg<$6FYEboQZJH?b U"$h/]:ZGxy,^p]NA5[&xYP#.wW4Fw?dhVTc#Qb.BWXxJ'Xck U"Dmut?EKg[1=GH5el/E*#(4Li$8s)Gf<;1D0:bi:nCbxL)m_IH']Qs/l,1fCIj/m U"CFKcPG:r.G?Mw7)O0iKGYK[Evx)Eb5qLM:Svp)rA\0%2(g05/iWy7HGJ:0VR<5P U"%4L+vIR)ZRVsMKG)3>#:>LWvTI?82i1Cn'J8Pfrm[l4PhNb.wd^D&d&r]p$+ZD( U">rSbpZ[k:^T3eFjkuA3Z47mSeSwntSOo^f U"G_.H2dAU_v,_Z_mOrppXV9vWOt8^t U"/35F3OeUH4Z=v8Q?\gb&4A0.>Y#xtWm_Sjo2ya4W_4xqZ0\HSEN,NDf4p]<'$]L U"j:i6ZQ.l4Vv],au3v>MJ2J#yYLE^06j42TMvKhtrJHs4u)cc.k'-eC((vYImw?; U"*t1XL$RM1O8.,-r-^,thQ=k$+J#o:#QDOSkY3D9t0[64b:4fZ> U"T<HXUz$d__#GHZf0)v.\mo:VgKi4L?$;V_JRLKr*F0TBl U"LlX',pQTlm9:ev+=^u9UVC7RF.McX=aq)4;g%n2X]_>1+UhJCRt->csk<[rOfjz U"E=4>h1$0P,Aa;vax^7r-qIN[Na=RSLGgIe U"C,(?hdux&Jb[+pw3;T3sE]TaE>r,kqa3a[%^b4^*;LW[05.Wwe:tZYCAY:SIlp^ U"F>mAOeVqz3gwq#pEtfFi];ol]]rb7*gG./NUs?YUDAiRsxi8:,9Mtn]mJb>a%wm U"[CU1lHW9w-lHdD0a0lkP5xY8K*v9;AeC#>2O-aKqjtC?FI6I4f7ME$1nLOz+zu$KF_Cs=x>Gk.4V5b&9:8ec<&u)?WKg*N U"$$kBGAReyx6D%fV^N0DWt*_rqBqJrXF$,Rg*vl&PYr;64Wa6LF1zm;BeneY39H& U"9lL-Ioc)H^M'a3V?%n<0bar$?$Jn4TUk.JYT$0\73fvL5'g%bt,V%6,V)o*FP U"hWngRFVlN+j]U7c>uJa;0R$oCpEpogAu:S(bDl6=dGhm(4G%;VyRmXDK-JmrP/i U"iMd/lfo&LnUM<,Q.dYL._A)l:-\5%='i\vOHJflZfQ5-5h7LwHAmnpX8.TD6n:n;nPq'W U",9H.jcLvv_qPv,-VEIn&tIsh8;r^a4W$E,HnSz96eZk2C^R][XKoBzkQ6a+tKLR U"FEm/tP8Q5_G%)'Bad$w>fl0N0il6x&7[;fCoVN8M#KF^(8+QpVgy0Q\#WYJb?8Q U"52Bt4nC:$$&Ij:+,p>*YjnC>s9LDc]=+v':mlkt]f$5tBgdy((pbp?XZGqx$Rwq U"SINRbyAc:-XiXI:0K].zasl;w'Z#_/s^k.o(s77aj7]fN;sft%cUOHgyTm*c&V1I)cESc/s U">c>uG#i,Z=cF<^X&c:DNTX$-4:l?x*n'GSZ#^'Gt/>IP'N%;IE#RJT://i/hMag U"$Kq4ic0A24?HzWjx?(bU:P61FUdtt?(PZ4l7RGa)]c0 U"Ha\a6>K__GU./$*Ul=*;?D:-<.ZAS,j;?qEY^Jeg)pb[HQpd_'%9*TUi\7UX\^M U"j9TkYP?>\4sk>KX[U=/W&yxg8:(6kTqnt7j>wX]]pA1G]%[pA+I?,]E=9bQuF(#1FOK U"e7xcMhS0GjRCWJ)hXk/3LWX,cPAuQDWo>t'Sy\-'7;Bm.YXJU-Ir]'#WHij^Oe_ U"?[h/w>3O'&TOvm2/RMAW&A7Vgq%.Fgi,VZp1#VVRu/gOPe)?x0ep'Hm8F1dHuXt U"A.g#kT*lG+.2R3):svKCGW[fK.ibTO=bubg?&/q5BI+3;_4X%kQ^-MzU7P9qSQ- U"T*0K27s]5:\5p;57,rwwL12u+\2NQ>[uN=K(iPU0#R%[i1doeJd-6Bqgy6_L.Qj U"65,%i1e7t:r/F?E2L[_*;1(juA1nG]-90(Gt./iz5t%++5_p8giAp5''01%uc?A U"OKYESLG^Ulh#1I0l U"h#jzYQ'ya)+1=0?t^A-ZY(x1=A>^ U"a9EF;_OrhQ0dc^50+.%:[xX-02Cwym%]8-j,S\Pj-.f.CCMejgRS?qg&-6(P U"M.Wo:FOQ+BIz-rk#?6AK1n1nVaN,e%6/qF+_P[M[gDJYZ'qG;.*1_eE:McnI]%V U"*-O-?TtC\sH4539pVjkP():y1AMjIONu-\x%u%p()9%%'%-I%F)6.K/KM+.T(%% U"%^,%%%/%%%%wjf%irjS#VxyDdyr>T7m160TIDaX/V*a%SY\f1=0$aK_=9Ed:Q90 U"*'o[?v0OEr>rhKAJ38.aw8i)Q+_]4n]>j#pmBg$8P+cC&c,0IKGm=,rQVw3UP2m U":RS,Po2gC#K4x:h7M=u:0u4gQef.Cn?1-)2[cis]xq$ENV/e5&Dz/ZwZ(^iDz:9 U"&s<<:FF2&R/O0mZe]e+g8:1Qe]k5xAU_43zDu_4o.$:csO=qL^KCvIjRR]N2J+% U";oHnRZ4Z:e%Xa854;DewBQic0DtuvkZwkEj8.K\?x3e>#w6PNu((Y(58-D-lr_& U"CtoiaG^BGo^g(U#-^>:Ga:m^gyQO6XDa_DdNQ8l>+em/\u\9Wgwx]]VQB_G6p)N U"]>j[hCGEXcl]>0O=ARzZ)Pu+9t/Ac9(d68wSS6co(XN'oDGtJpCe(M:x#,CsC?w U"E3FEux.kQ/2p1m(C&K1X3(a\;TJfB>;]hNMPpyeItF6\>U]9GN,>c^jfOQ?&hP\ U"kJ1(fQO%3(H-?6dm6?M_'Qrk82.4JD6L,p;q2K\.K1P]6iVdTn]getBM[(FY9C' U"TN2u<#u&sOLUE1#I=W(aj=L/vV2h(C72K_:tb.]Vx(-G6qG*E,qWTd3nrrIsESj U"x:[Bp2r1HLAmOk\\)cDiR5vr.QF3?QK:74(<4v;%$FiVYrH=DLE=X4Odr.3T6eH U",dR'('49F4B7m-ax5qRXHBcp*;RuC>yL/s;not<^Evh.KQEc)b)LDLCvUh U"ZF_rH/-BsG4>S)ZKqAs'ZCUUOkY95lAdr(0HSlCa[6Y_qcaTig2\e/M#TK>Qe]= U")w)#=;yuJvslcw0/7t=g7i?n(FRqL>/46vP8#3*Sm#BGB-UfU.C'2eexEe\lK>> U"em[;,T?)96D91o4WaRWt%NE]n+;B/_Q,*d^/Myimri46Qq2\CC3PPH7cmWDL(Fl U"7U7_EC$iWH*'tqno7;?,=aUM6A#;_ZH]Xeb7L>J0Kio4Lxip((5DPT\w_J8k+,i U"p?^mm3BE%q(Eu-?F#IC$:C#ViCR5M=9&G3T[#ob69AbRsfMm.RNZ]$?Sb0Af(Di U"h8V:H/eKm)DhYcBt:aGYgeqR?J_9#/s5K]M=>V:+;Wgl.:3-/8Ivk:vMpqQ33M% U"=aDx$qU*Gb=W96AI?'Pq9N3&e