TOMBS OF KARNAK gk  TOMBS OF KARNAK( COPYRIGHT SOLO SOFTWARE 1982FG:BG`$ "":PP:,,,@> b:"":HL`:(8);"TOMBS OF KARNAK"? TH:::();"C S S"9 TH4=:PTH,:PTH ,:1"PRESS ANY KEY IF YOU DARE TO ENTER"K$:K$"" B"TOMBS OF KARNAK":""-" Y "/" ' ."0" Y "/" 50 "$" ."0" Y "." ."." T ", " .","" M "*$" " &" ."/(" M .")*"PRESS ANY KEY TO CONTINUE"+K$:K$"" +.," W , ")." .")0" Y 25 ."-2" W "-4" .-6" A Q' "/8" ."0:" Y Q"(<" ."->" U CURSOR "-@" "-B" (1 9)"#D" A "(F" G "(H" P "/I" T ( )"1K"ANY KEY TO MEET THE GUARDIAN OF THE TOMB"LK$:K$"" LN"":`KO"C4R2C1R1C1R1C4R2C4R2E4R2E1R1E1R1E4R2E4R2G4R1G1R1G1R1G4R2G4R2C8C8" P Z"":MX:S$"E1"M[FF$"C4R2C1R1C1R1C4R2C4R2E4R2E1R1E1R1E4R2E4R2G4R1G1R1G1R1G4R2G4R2C8C8"2\TL$"PREPARE YOURSELF FOR THE ORDEAL TO COME"E]FX:"";(TL$,FX):T ::3^TL$"THE DOOR OF THE TOMB OPENS AND YOU ENTER"5_"D7R1D5R1D2R1D7F5E3R1E5D3R1D5#C4D8"D`FX :"";(TL$,FX):T ::"":5aBKH:STH:LKH:Tz:YbNRNR:X@:N:TB:MX:LKLK@:LK LK <c"":T@:[FG,BG]" ":%d[FG,BG]""Xe[FG,BG]" ":BL:BP(())"fPBP,P:/gKX:M(p())+hM [FG,BG](N);"p p": k-iM [FG,BG](N);"ppp p": k%jM [FG,BG](N);"ppp"kK'lNN:NN: nm"": g$n[FG,BG]" ";o[FG,BG]"":RTRT:$pJW(())rPJJWDsJV( ())@:JH(())@(t(P((JV )JH)) s!uP((JV )JH),V:*v:[,`](p);( )1xAO(()):PAO, 1yAI(())@:PAI, zPMAI "";(H);"CONDITION"(H);""&(();"STRENGTH - ";ST;" %"*"";(();"WOUNDS - ";WD;" %"%"";(();"ATTACKS - ";AR%"";(();"JEWELS - ";JC%"";(();"POTIONS - ";NE"TOMB NUMBER";NRRYPPM,J:RYPPM,J :K$(K$( )MV:S$: 'K$()MV:S$: (K$()MV :S$: 'K$()MV :S$: K$"G" ,K$"A" K$"P" XK$"T"  `DS$:DS(DS$): :(MF)(((DS$))((DS$)4)((DS$))) TR:DS$"" 8TRTR:(PPM ) ND: 1(PPMMV)DS:MV: PPM,:PMPMMV2PPM,J:PPM,':ND !PM PMpPM: b1PMyPM (PMp ): bTH:TRDS $ASTRSR:ASAS"STSTAS:STHSTH"";();ST;" % "ST L ,,(PPM )VJP : 6+-(PPM )VJP : 6,.(PPM)VJP: 6+/(PPM)VJP: 6O1(x):[,`]"NO JEWELS WITHIN REACH": :]6JCJC:PPMJP,:[,`]"GOT IT":(x)7"";();JC8 :(x)9MX 3MA(LK()):MAPMX: I :BL:"";(();():"#C0"7"";(();M$;" ":"C0":DMZ( ())@:MH(())@,MP(MZ )MH:(PMP) %PMP,OP:PMP,'MF MF@   PMMPDR: PMMPDR-MM(()):MM MMMM : 8MM(()):MMMM: MMMM &(PMPMM)CDMM: :IPMP,:PMP,':PMPMM,OP:PMPMM,'@MPMPMM:XF( ()):XF@CD: !(PMP )J !(PMP )J !(PMP)J !(PMP)J BMF:[,`]" ":MMFMF:"A1":[,`]"DANGER";MF:&MTMT:MTPMT@/MTM$"B":DK :OPT.MTM$"T":DKH:OP83MT@M$"H-":DKH:OP1MTM$"W-":DKp:OP 0MT M$"V":DK :OPF2MT@M$"S":DK :OPL/MT`M$"Z":DK4:OPd.MTM$"M":DK4:OPX2MTM$"G":DKH:OP<0MT M$"C":DKH:OP.MT0M$"G":DKp:OP41MT@M$"M":DK:OPVCDCD( ()):(CD)(CD)CDCD (PMPCD)IPMP,:PMP,':PMPCD,OP:PMPCD,' MPMPCD,XF( ()):XF ((PPM )OPAP : '(PPM )OPAP : ((PPM)OPAP: '(PPM)OPAP: NMX[,`]"NO MONSTER IN TOMB": :K(x):[,`]"NOT NEAR ENOUGH": :@MF:[,`]" "D[,`]"DETAILS OF BATTLE"G[,`]""YS:HS$PB(@())PBPB$"ARM"PBPB$"LEG"PB@PB$"NECK"PBPB$"SIDE"PB PB$"HEAD"PB@PB$"CHEST"$AN( ())W AN,:[,`]" YOU THRUST AT HIS ";PB$;" AND MISS"Y AN,:[,`]" HE SWIPES AT YOUR ";PB$;" AND MISSES"c AN@,:[,`]" YOU HAVE CUT HIM BADLY ON THE ";PB$:YSYSp AN,:[,`]" HE HAS SLASHED YOUR ";PB$;" SEVERELY":HSHS@:WS@n AN ,:[,`]" HE PARRIES YOUR THRUST AND CUTS YOU":HSHS:WSdAN@,:[,`]" YOU DUCK UNDER HIS SWORD AND CUT HIM":YSYS@aAN`,:[,`]" YOU HAVE CUT HIM ON THE ";PB$:YSYS@iAN,:[,`]" HE HAS WOUNDED YOUR ";PB$:HSHS:WScAN,:[,`]" YOU HAVE SCORED A BLOW TO THE HEAD":YSYSkAN ,:[,`]" HE HAS STRUCK YOU ON THE HEAD":HSHS@:WS@gAN0,:[,`]" HE HAS CUT YOUR ";PB$:HSHS :WS `AN@,:[,`]" YOU HAVE CUT HIS SWORD ARM":YSYS cANP,:[,`]" YOU HAVE CUT HIS ";PB$;" BADLY":YSYSmAN`,:[,`]" HE SLASHES YOUR ";PB$;" DEEPLY":HSHS@:WS@nANp,:[,`]" YOU GET A CRASHING BLOW TO THE HEAD":HSHS@:WS@bAN,:[,`]" HE GETS A SEVERE BLOW TO THE HEAD":YSYS@dAN,:[,`]"YOU AVOID HIS THRUST AND CUT HIS ";PB$:YSYS@oAN,:[,`]"HE DUCKS UNDER YOUR SWORD AND CUTS YOU":HSHS@:WS@kAN,:[,`]" HE SPEARS YOU THROUGH THE LEG":HSHS@:WS@eAN ,:[,`]" YOU HAVE SLASHED HIS ";PB$;" OPEN":YSYS@( :YS(YS(WR)):HSHSSVYSDK &HSBK 06 PWWD:WSWDWDWSSV:WDHWDH!WDPWWDPW:""";();WD;" % ":WS:WDF 0M#ST(ST((SR))):"";();ST;" % ":ST L$"" % [&MKMK:,:[,`]" YOU HAVE GOT HIM ON THE GROUND": _'GG,:[,`] " HE SUBMITS AND BEGS FOR MERCY": : )L(,:[,`]" YOU HAVE FINISHED HIM OFF": U)"";(();" ":ARAR:HS:YS*"";();AR*+PMP,:MX:BK(HWD).,,:[,`]( )-(x):K0[,`]" HE HAS YOU DOWN": [1,:[,`]" HE HAS KILLED YOU":Tz:: XNE1YWD(WD*~):"";();WD;" % "Z"C1G1C1"1[NENE:"";();NE;" "\BKHWD:! (PPM )P *!!(PPM)P *!"(PPM)P *!#(PPM )P *O%(x):[,`]"NO WALLS WITHIN REACH": :U*(x):[,`]"";(0);"WHICH DIRECTION?"'+K$:K$()TP : 0",K$()TP : 0#-K$( )TP: 0".K$()TP: 0 / +"0(PPMTP)PABY1[,`]"";(0);():ABAB:2DW 03PPMTP,: f:PPMTP,P: f:4PPMTP,6STST( SR)8"";();ST;" % ">/"C1B1A1G1F1E1D1C1B1A1G1F1E1D1C1"/" Y "  L"";();" 0 % "/M"C1B1A1G1F1E1D1C1B1A1G1F1E1D1C1".Q" Y "3RYS" " V /"C1B1A1G1F1E1D1C1B1A1G1F1E1D1C1"." Y "  /"C1B1A1G1F1E1D1C1B1A1G1F1E1D1C1"1"Y "  "L:(L);"":#"GAME SCORES"!""*"JEWELS IN HAND ..........";JC* "CREATURES KILLED ........";MK1"JC IRIR:IR`IR`1$JC IRIR:IR@IR@-&MKSRWRWR:WR@WR@-(MKSRWRWR:WR`WR`)WR@W$"DAGGER"*WRW$"HATCHET"+WR W$"RAPIER",WR@W$"BROADSWORD" -WR`W$"MAGIC SWORD"4.NRSR SRSR:SR`SR`4/NRSR@SRSR:SR@SR@*2"TOMBS ENTERED ...........";NR"4L:(L);"":$6"NEW CHARACTER""7""*8"INTELLIGENCE RATING .....";IR*:"STAMINA RATING ..........";SR*<"JEWELS IN HAND ..........";JC'>" YOUR HAND WEAPON IS A ";W$"?L:(L);"":1@"Y - "0A" , ."(B"D ?"DK$:K$"N" xMEK$"Y"WD:MT:NR:MF:AR:RY: N F D+x"CHARACTER DATA RECORDS"'y""0}" H "+~" ."0" D ?"K$:K$"Y" K$"N"   2" CLEARING YOUR CHARACTER FROM MEMORY !!"!Tz::"": @+"CHARACTER DATA RECORDS"'""" T ";N$!" I "*" W "*" P "#" 'M' "K$:K$"" K$"M" @4" RECORD.PLAY":(x):::" W ";N$.TN$:TIR:TSR:TWR:TJC:TSV:TNETTS:TTA:TW$9(x):" C "Tz:!"":Tz:: @+"CHARACTER DATA RECORDS"'""" T ";N$#" I "*" W "*" P """ 'M' "Q$:Q$"" Q$"M" " PLAY":(x)::?TN$:" L ";N$:TIR:TSR:TWR:TJC:TSV:TNETTS:TTA:TW$3(x):" C "Tz:" C ";N$NRHND: PCz:TMH"":PPC,P: T7 J:"";();"ppppppppp"D J:"";();"pppppppppppppppppppp"();"ppppp"E J:"";();"ppppppppppppppppppppp"F();"pppppppppppppppppppppppppppp"> J:"";();"pppppppppppppppppp"A();"ppppppppppppppppppppppppppp"A();"ppppppppppppppppppppppppppp" ();"ppppppppp": J?"";(p);"pppppppppppppppppppppp"K(p);"ppppppppppppppppppppppppppppppppp"K(p);"ppppppppppppppppppppppppppppppppp"K(p);"ppppppppppppppppppppppppppppppppp"Tz:0"";();" ":TH:1"";();" ":TH:2"";();"":TH:T1"";();" ":TH:1"";();" - ":TH:1"";();" {V{ ":TH:1"";();" ":TH:1"";();" ":TH:1"";();" ":TH: FF$9"";(P);"CONGRATULATIONS"  r<"";(`);"T G": r.(P);" T ": r-(@);" "  rTz:9"";(P);" ":"";(P);" "%(0);" "%(0);" "9 "";(P);"W ":  r:"";(0);" C ?": r K$:K$"P"  K$"F" ,  : 9SP((JCL)IR):"":SPHSPH:"W ? ";OF:OF(OF)>OFJC(x):"Y ";JC;" J ": 4: ?OFSP"I , ":JC(JCOF): ""OFSP :SPSP: 7OFSP"S ": O"Tz::"Y ":IR` # ,"";(H);"CONDITION"-(H);""&.(();"STRENGTH - ";ST;" %"*/"";(();"WOUNDS - ";WD;" %"80,p:[,`](p);( )'1DKH:GG: :GG16"T "/7" T G."8MKMK: M@T ::VC(()) :LDH::JTz::TQL$:QRUT@DVPPCQL,n:PPCQR,l:PPCQR,l:PPCQL,n XQLQL$:QRQR:Y8^"O":"A0": @8_"-":"C0": @8`"O":"A0": @9a"-":"#C0": @8b"O":"A0": @9c"-":"#A0": @8d"O":"A0": @8e"-":"G0": @8f"O":"A0": @9g"-":"#F0": @hrDL Es"O":#,VC:(): @Et"-":#,VC:(): @u:( ):&RDRD:RD@RD:RD"I ":=RD"I ' ":=RD@"M, ; T ":<RD"N ":9RD "Y , ":B"D "K$:K$"P" K$"F" ,  5TMTM:TMH r: r: r:TM XTz::,:[,`]" "RTH::[,`]" ":+TH:K$:K$"P"DP :DPDP: XC,:[,`]():Tz::CTz::"";(p);"":Tz::Tz:: "HELLO",4Tz::SVSVTS:TS:,>Tz::SVSVTA:TA:fT ::< LL:"Y G T"1 "". " A " GB:NR- " ." Tz:8 (x):" H ?" K$:K$"N"  K$"Y"  IR"": D (x):" I , ":(x)Z IR@:SR@:WR@:W$"DAGGER":JC:LL:Tz:: E IR@(x):" H ?"J IR" I , ":(x):  K$:K$"N" # K$"Y" :Q$"M""":  Q$"M""": A " T I ":(x):  $ IR( ())@$ SR( ())@$ WR( ())@$ JC(p())( WR@W$"DAGGER" WRW$"RAPIER" WR W$"SABRE" WR@W$"BROADSWORD" WR`W$"MAGIC SWORD"/ `,@:"INTELLIGENCE RATING ";IR/ `,`:"STAMINA RATING ";SR/ `,:"JEWELS ALLOCATED ";JC5 @,:" YOUR HAND WEAPON IS A ";W$E LL, :"Y Q". `,0:"P " K$:K$""  LLLL: Z3 "":"C6R2C6R2C6R1A3R1G3R1A3R1G3R1E6R2E6"0 "Y Q"- ""0 " H ."* "S I:- S S"( " L S") " L A"' " M A"/ " H P": . "A B, S N?" K$:K$"N" Z K$"B"   K$"S" :     TSGB:  @ RD:" D S L S?"- " (P 'S', 'L' 'N' )"A K$:K$"N"" O, , ":  . K$"S"PS :TS:SVSVTS:  . K$"L"PSp:TS:SVSVTS:   9 SPPSIR:" T S ";PS;" J"0 " W ? ";OF$:OF((OF$))E OF(x):" W, ' ": 4:  ? OFJC(x):" Y ";JC;" J ": 4:  8 OFSP" Y , ":JC(JCOF):  + OF(PS) :SPSP:  > " N , . T ":SPSP(IR@):   SPPSSPPS   ! TAGBGB: 0 E RD: :" D L M A?"- " (P 'L', 'M' 'N' )"A K$:K$"N"" O, , ": 0 . K$"L"PSp:TA:SVSVTA: & .! K$"M"PSH:TA:SVSVTA: & "  D& SPPS(IR@):" T A ";PS;" J"0' " W ? ";OF$:OF((OF$))E( OF(x):" I ": 4: 0 ?) OFJC(x):" Y ";JC;" J ": >:  K* OF(SP3333)" Y , ":JC(JCOF):TA: 0 ++ OF(PS) :SPSP: - >, " N , . T ":SPSP(IR@): ' - SPPSSPPS . ' L0 GB" I "61 :" D P?"2 K$:K$"N" Z 3 K$"Y"PE(@IR): 5 4 2 G5 " T ";PE;" J ?":" H ? ";NB:NB(NB)G6 JCNBPE(x):" Y ";JC;" J ":NB: 1 A7 JCJC(NBPE):" S !!!":Tz::NENENB: Z& RDRD:RD@RD8 RD" I ":= RD" N . I .":; RD@" I ' ":; RD" W I - S C":: RD " S , I ":TATS 7" Y "(x): :TS $:RD:" D S?"K$:K$"N" $K$"Y"BP IR:   K" H ? ";HM:HM(HM):BP@BP@"HMBP t:BPBP: J" Y ": :TS:SVSV:JCJCHM: $$TA:%RD:" D A?"&K$:K$"N"'K$"Y"BP@IR: . ( &K." H ? ";HM:HM(HM):BPBP"/HMBP t:BPBP: .G0" Y ": :TA:SVSV:JCJCHM:&tRDRD:RD@RD;uRD" H - ' , ' ":=vRD" N - I .":>wRD@" N , ' ":9xRD" W I - P G"::yRD " S , I ":TSTA." I :-":""6TS"S S"6TS"L S"8TA"L A"6TA"M A"4NE"";NE;" P"5NE"";NE;" P" "":kAN ,:[,`]" HE HAS STRUCK YOU ON THE HEAD":HSHS@:WS@B@,,`,:" T MZ-700"AA" , ":,,,`B,,`,,C"*****************************"+D"* *"+E"* *"+F"* *"+G"* *"+H"* *"+I"* *"+J"* *"=K"****** S O F T W A R E ******":,,,`cL[`,]"":" S S L ",M" U 95 B ",N" B T E W ",O" W WR3 8TJ ",P" ",Q" T. (0905) 58351 "`R[`,]"":Tz::,,`,0S""0T" H R -"UK$:K$"" UVK$"R" W"": PÏ"":OP-QàPz,OP:Pz,'RíK$:K$"" RSÏ(K$): R