6, 0, 9, 105, 5 0, 0, 0, 0, 10 0, 10, 0, 0, 0 0, 0, 0, 2, 1 2, 5, 1, 2, 3 3, 4, 1, 1, 6 1, 1, 3, 1, 1 2, 1, 1, 2, 1 1, 1, 9, 4, 9 22, 4, 9, 13, 13 13, 5, 5, 25, 0 0, 1, 0, 0, 1 0, 0, 3, 3, 2 0, 11, 6, 6, 15 3, 7, 18, 6, 15 6, 6, 15, 5, 4 2, 0, 3, 0, 2 1, 6, 3, 4, 4 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 3, 1, 3, 0 0, 9, 0, 1, 0 0, 0, 0, 0, 21 40, 10, 10, 5, 10 0, 0, 4, 0, 0 0, 5, 5, 5, 1 3, 3, 5, 5, 5 7, 12, 10, 6, 65 78, 84, 77, 65, 78 6, 65, 78, 84, 77 65, 78, 5, 71, 72 79, 85, 76, 12, 71 73, 65, 78, 84, 32 65, 77, 79, 69, 66 65, 6, 65, 78, 84 77, 65, 78, 6, 90 79, 77, 66, 73, 69 12, 71, 73, 65, 78 84, 32, 83, 80, 73 68, 69, 82, 9, 71 73, 65, 78, 84, 32 82, 65, 84, 6, 65 78, 84, 77, 65, 78 10, 71, 73, 65, 78 84, 32, 84, 73, 67 75, 12, 83, 75, 69 76, 69, 84, 65, 76 32, 66, 65, 84, 12 71, 73, 65, 78, 84 32, 77, 65, 78, 84 73, 83, 30, 108, 6 1, 123, 74, 73, 77 32, 32, 32, 32, 32 32, 32, 32, 0, 0 0, 0, 0, 0, 3 18, 5, 120, 1, 8 81, 8, 4, 3, 0 5, 7, 13, 19, 18 18, 18, 18, 18, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 142, 14, 128, 0, 0 141, 57, 40, 0, 0 131, 0, 0, 0, 0 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 ",+f@128,"MAY PICK UP WEAPONS AS YOU GO,",Vh@160,"BUT MAY HAVE TO PUT SOME DOWN.",j@192,"SOME WEAPONS ARE MORE EFFECTIVE",l@224,"THAN OTHERS AGAINST CREATURES ",n@256,"YOU MAY MEET. YOU GET POINTS ",p@288,"FOR CREATURES YOU KILL. HIT"-&r@320,"ENTER TO BEGIN. GOOD LUCK!"-/s A$-BwW(1)7:W(2)20-`x:20 IS NO WEAPON CARRIED-o|A(PX,PY)0-u-"YOU ARE IN A DARK PASSAGE."--A(PX,PY)0 3000-NA(PX,PY1)-SA(PX,PY1)-EA(PX1,PY)-WA(PX1,PY).LXPX:LYPY.C̅ N1 N7 S1 S7 E1 E7 W1 W7 510.SLXPX:LYPY.]520.|"THERE IS A SOUND NEARBY"..:"WHICH DIRECTION DO YOU GO?". N1 550."NORTH-ENTER 1".& S1 570.0"SOUTH-ENTER 2"/: E1 590/D"EAST -ENTER 3"/%N W1 610/:X"WEST -ENTER 4"/xb D: N1 D1 S1 D2 E1 D3 W1 D4 610/l D 650,670,690,710/v"INVALID CHOICE-REENTER"/610/PYPY1/720/PYPY1/720/PXPX1/7200 PXPX10"Ѕ A(PX,PY)1 30000<:3000 IS WIN ROUTINE0SՅ A(PX,PY)2 3900xم A(PX,PY)1 A(PX,PY)7 10800~ڞ0@0,"YOU ARE PRESENTLY CARRYING "0 I12:I2W(2)20 @64,"AND ";0 I2 W(2)20 8401(W(I)6) 5000,5010,5020,5030,5040,5050,50601!HI1'R1AW:WEAPONS P/U ROUTINE1b\:"IN THIS PLACE YOU FIND "1f A(PX,PY)6 5000,5010,5020,5030,5040,5050,50601p::"WILL YOU PICK IT UP (Y OR N)";A$1z A$"Y" 9201 A$"N" 10301 8802 W(1)20 W(2)20 10402::"WHAT DO YOU WISH TO LEAVE?"2o (W(1)6) 5000,5010,5020,5030,5040,5050,50602y"-1"2 (W(2)6) 5000,5010,5020,5030,5040,5050,50602"-2"2 A2ʅ A1 10002ԅ A2 10202އ"INVALID":9603GA(PX,PY):A(PX,PY)W(1):W(1)G:G03*10303RGA(PX,PY):A(PX,PY)W(2):W(2)G:G03\3903r W(1)20 10603W(1)A(PX,PY):A(PX,PY)033903$W(2)A(PX,PY):A(PX,PY)03.39038:CREATURE ATTACK ROUTINE4B:"YOU HAVE ENTERED A ROOM WITH"41L A(PX,PY)1 5070,5080,5090,5100,51104NV:"YOU ARE ARMED WITH "4u[ W(1)20 W(2)20 "NOTHING!"4` W(1)20 11504e W(1)6 5000,5010,5020,5030,5040,5050,50604j W(1)20 W(2)20 11504t" AND ";4~ W(2)20 116052 W(2)6 5000,5010,5020,5030,5040,5050,50605^:"WILL YOU ATTACK OR RUN (A OR R)";A$5r A$"R" 12005 A$"A" 13005"INVALID":11605:RUN ROUTINE5RN(6)5D05:D=1 -YOU'RE DEAD,RUN=PROBABILITY,LX,LY=LAST PX,PY6؅ A(PX,PY)2 RN4 D168݅ A(PX,PY)2 RN2 D16I D0 12706v: I1 16:"TOO SLOW-YOU'RE DEAD": I6I1500:I680006PXLX:PYLY6:"YOU RUN BACK THE WAY YOU CAME":I11000:I6 3906:ATTACK ROUTINE79 W(1)20 W(2)20 "YOU HAVE NO WEAPONS-YOU MUST RUN":11607?7K# I127`% W(I)20 13407(W(I)6 5000,5010,5020,5030,5040,5050,506072"-";I7N((0)3),RH G0 N,\RC$"",j\ F0 8,vfIF91,pC$C$(B$,I3,6)(B$,I,3) ,z F,B$C$, G: SAVE THE BOARD IN THE PARENT,N1, Y1 9, X1 9- G((B$,N,1))-,T(Y,X)G:V(Y,X)G:M(Y,X)1 -6NN1->ԋ X-Wދ Y: HIDE THE CELLS-aN8L-o F1 N-X((0)9)1:Y((0)9)1-  T(Y,X)0 2300- T(Y,X)0:M(Y,X)0-  F: PRINT SUDOKU- ā 4000.' ·@32,;: (138)(9,131)(129)(9,131)(129)(9,131)(133).5 ؀ F1 3.C I1 3. (138)" "(133)" "(133)" "(133). I. F3 (138)(9,131)(129)(9,131)(129)(9,131)(133). F/ (138)(9,140)(132)(9,1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 2, 0, 9 10, 11, 2, 5, 0 7, 0, 0, 0, 0 0, 8, 0, 21, 0 0, 0, 0, 6, 0 0, 0, 0, 0, 0 0, 0, 4, 33, 55 32, 56, 57, 35, 0 0, 50, 49, 48, 47 0, 0, 0, 0, 0 0, 0, 0, 43, 44 45, 46, 0, 0, 0 0, 0, 0, 2, 3 4, 33, 28, 26, 0 21, 0, 0, 0, 7 8, 0, 16, 22, 19 20, 6, 5, 23, 24 25, 0, 0, 27, 0 29, 0, 0, 0, 0 34, 35, 37, 39, 38 0, 40, 41, 42, 0 0, 43, 44, 45, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 46 0, 0, 0, 0, 5 0, 30, 6, 21, 8 14, 2, 3, 4, 0 0, 0, 0, 0, 0 0, 0, 0, 16, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 33 31, 0, 36, 0, 0 0, 0, 0, 0, 0 51, 52, 53, 54, 42 41, 40, 39, 0, 0 0, 0, 32, 34, 35 0, 0, 0, 0, 1 2, 3, 20, 19, 12 13, 0, 0, 0, 0 0, 0, 0, 15, 0 0, 17, 18, 8, 16 21, 22, 23, 6, 26 5, 28, 0, 0, 0 4, 33, 34, 0, 35 37, 36, 39, 40, 41 44, 45, 46, 57, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 58, 58, 58, 0, 2 2, 2, 1, 1, 0 1, 0, 0, 0, 0 0, 3, 0, 3, 0 0, 0, 0, 1, 0 0, 0, 0, 0, 0 0, 0, 2, 2, 1 1, 2, 1, 1, 0 0, 2, 2, 2, 2 0, 0, 0, 0, 0 0, 0, 0, 2, 2 2, 2, 0, 0, 0 0, 0, 0, 1, 1 1, 3, 2, 2, 0 1, 0, 0, 0, 2 2, 0, 2, 2, 2 2, 2, 2, 3, 2 2, 0, 0, 2, 0 2, 0, 0, 0, 0 1, 2, 3, 1, 1 0, 1, 1, 1, 0 0, 1, 1, 1, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 1 0, 0, 0, 0, 1 0, 2, 1, 1, 1 3, 2, 3, 2, 0 0, 0, 0, 0, 0 0, 0, 0, 3, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 1 2, 0, 1, 0, 0 0, 0, 0, 0, 0 2, 2, 2, 2, 2 2, 2, 2, 0, 0 0, 0, 1, 2, 1 0, 0, 0, 1, 1 1, 1, 2, 2, 2 2, 0, 0, 0, 0 0, 0, 0, 2, 0 0, 2, 2, 1, 2 3, 2, 2, 2, 2 2, 2, 0, 0, 0 3, 1, 2, 0, 3 1, 1, 1, 1, 1 1, 1, 1, 1, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 3 2, 16, 2, 2, 0 2, 2, 2, 2, 2 2, 6, 2, 20, 2 2, 2, 2, 19, 2 2, 2, 2, 2, 2 2, 2, 16, 4, 2 2, 12, 14, 2, 2 2, 3, 3, 4, 4 2, 2, 2, 2, 2 2, 2, 2, 4, 4 3, 3, 2, 2, 2 0, 0, 0, 2, 2 2, 5, 9, 9, 0 2, 0, 0, 0, 7 2, 0, 7, 4, 9 9, 9, 9, 4, 3 11, 0, 0, 9, 0 9, 0, 0, 0, 0 2, 8, 5, 2, 2 0, 2, 2, 2, 0 0, 2, 2, 2, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 16 0, 0, 0, 0, 20 0, 16, 2, 2, 2 3, 9, 17, 16, 0 0, 0, 0, 0, 0 0, 0, 0, 22, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 2 4, 0, 14, 0,44,3D,45,3B/@ 3D,3B,3B,3B,3B,47,3B,3D,3B,4A,4A,3B,3B,3B,3B,45/v 44,3B,44,48,49,3E,4E,44,4E,53,47,3B,3B,3B,3B,3B/ 3B,3D,40,51,3D,40,3F,3B,3D,3D,3D,3B,59,3B,3B,3B/ 49,3F,3D,3B,3B,3F,3B,3D,44,3D,3E,4C,4C,3D,3D,3D0 3D,40,3D,3D,3D,3D,4D,3D,48,3D,3D,3D,3D,3D,3D,3D0N 3D,3D,3D,3D,3D,3D,3D,42,3D,44,53,47,3E,3D,3D,3D0† 3D,42,3F,3D,3D,3D,59,3D,3D,3D,3D,44,3D,3D,3D,3D0̆ 3D,3D,3D,44,4C,47,3D,47,47,3D,3D,56,44,3D,45,440ֆ 45,4F,3D,3D,3D,49,3D,5A,49,4D,49,4D,58,0D,53,531& 3D,53,5B,3D,3D,4A,3D,3D,3D,3D,47,47,47,45,3D,471\ 5D,47,47,3D,3D,3D,3D,3D,3D,3D,3D,45,3D,4F,3D,3D1 3B,4C,3B,4D,43,3B,56,56,3B,45,47,47,47,3B,46,3B1 56,3B,3B,3B,3B,47,44,3B,60,47,47,3B,3B,48,46,4C1 3B,49,3B,3B,3B,3B,4C,3B,44,3B,3B,47,3B,3B,3B,3B24 47,47,47,47,47,47,5D,47,47,42,42,51,45,49,47,4A2j 3B,47,3B,3B,3B,3B,4C,3B,47,3B,4F,4F,3B,3B,3B,3B2& 4F,49,3B,49,4D,4E,43,53,49,53,5D,4C,3B,3B,3B,3B20 3B,3B,47,45,56,47,45,44,3B,47,47,47,3B,63,3B,3B3 : 3B,4E,44,47,3B,3B,44,3B,3D,49,3D,48,56,56,3D,3D3BD 3D,3D,45,47,47,3D,3D,52,3D,4C,3D,42,3D,47,47,3D3xN 3D,47,47,3D,3D,48,48,51,4C,3D,49,58,4C,43,3D,3D3X 47,3D,47,44,47,3D,3D,63,47,47,47,47,4E,47,3D,3D3b 47,3D,42,3D,3B,44,3B,3B,3B,3B,3D,3D,3B,3B,3B,3B4l 3B,3B,42,3B,3C,3B,3C,3B,44,3B,3B,3C,3B,3B,3B,434Pv 3B,3B,3B,43,45,3B,3B,0D,3B,3B,3E,3B,44,3B,3B,464 44,3B,3B,3B,3F,3B,3B,3B,3B,3B,3B,42,3B,3B,40,3B4 3B,3B,3C,3B,3B,3B,3B,63,63,3B,3B,3B,3B,3B,3B,3D4 3B,3F,3B,3D,3B,3D,3B,3B,40,3B,3B,3B,3E,3B,3B,3B5( 3D,3F,3B,3B,3B,3B,42,3B,3D,3B,3B,3F,3D,3B,3B,3B5^ 3C,3B,3B,3B,3B,3B,3B,3F,3B,3B,3D,3B,3B,3B,3B,3B5 3B,3B,3B,3B,3B,3C,3D,3B,3B,3B,3E,3B,3B,3B,3B,3B5 3F,3B,3B,3B,3B,43,42,42,3B,42,42,42,42,3B,3C,406Ɔ 3B,3B,3B,42,3B,42,3B,44,3B,3B,3B,41,3B,3B,41,4166І 3B,41,3B,3B,42,3B,3B,3B,3B,3D,3D,3D,3D,3D,3D,3D6lچ 3D,3F,3F,3D,3D,3D,3F,3D,3D,3D,3D,3D,40,3D,3D,3D6 3D,5E,50,47,3D,46,50,4E,5D,3D,3F,4E,3D,3D,3D,416 3D,42,3D,44,3D,3D,3D,43,3D,3D,54,52,3D,40,3D,3D7 42,3D,3D,3D,3D,3D,3D,3D,3D,3D,3D,3D,3D,3F,3F,3D7D 3D,3D,3F,3D,3D,3D,3D,3D,41,3D,3D,3D,3D,4F,42,427z 3D,3F,42,42,47,3D,3F,3F,3D,3D,3D,49,3D,41,3D,497 3D,0D,3D,3D,49,3D,3D,44,44,3D,40,3D,3D,42,3D,3D7 3D,3D,3B,4F,4F,4F,3B,3B,4F,4F,3C,3D,4F,4F,3B,3E8* 3F,4F,4F,48,4F,40,4F,3B,3B,4F,49,3B,4F,4F,4F,3B8R4 3B,4F,4F,41,4F,4F,42,43,4F,3B,4F,4F,44,3B,3B,4F8> 45,4F,4F,45,45,4F,46,3B,47,4F,4F,3B,3B,4F,3D,498H 42,50,3D,3D,3F,44,3F,3F,42,49,3D,3F,3F,42,42,4E8R 53,44,59,3D,3D,42,5E,3D,42,53,4C,3D,3D,56,4B,3F9*\ 50,50,61,62,44,3D,58,45,44,3D,3D,46,41,46,53,549`f 52,53,40,3D,3F,42,4B,3D,3D,42,3D,49,51,3F,3D,3D9p 4F,55,3F,3F,42,46,3D,3F,42,47,4C,44,4E,3F,47,3D9z 3D,64,4F,3D,46,49,4C,3D,3D,50,42,3F,42,49,40,58: 4C,3D,44,51,49,3D,3D,53,49,53,46,41,41,46,40,3D:8 50,4D,44,3D,3D,42,A2,9D,A2,9D,91,91,67,67,47,3B:n 51,67,91,51,47,5D,73,9D,B3,71,5D,B3,49,B3,49,AE: 53,B3,5D,B3,5D,BA,62,7F,95,95,7F,7F,73,73,73,73: 73,73,95,AB,AB,AB,81,57,AD,83,5D,0D,48,3B,A2,69; 5D,91,B3,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B;F 3B,3B,3B,3B,3B,3B,3C,3C,3B,3C,3B,3C,3B,3C,3B,3C;|ʆ 3B,3C,3B,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C;Ԇ 3C,3C,3C,3C,3C,3B,3B,3B,3B,3B,3B,3B,3C,3B,3B,B0;ކ B5,B0,B5,9F,9F,93,93,69,53,69,93,9F,5F,5F,75,93< B5,5F,7F,7F,4B,75,4B,75,55,75,5F,75,5F,81,64,75B 8F,A0,76,76,A0,4A,72,72,72,72,72,79,79,79,3E,72>:L 56,66,66,3B,3B,0D,3B,3C,3B,3C,3B,3C,3C,3C,3C,3C>pV 3C,3C,3C,3C,3C,3C,3B,3B,3B,3B,3B,3B,3B,3B,3B,3C>` 3C,3C,3C,3C,3C,3B,3B,3B,3C,3C,3C,3C,3B,3B,3B,3B>j 3B,3B,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3B,3C,3C?t 3B,63,79,3C,69,93,69,93,9D,3D,3D,3D,3D,49,55,49?H~ 49,53,48,48,54,68,68,74,74,9E,9E,AA,AA,41,41,4E?~ 4E,74,74,8A,AA,44,AA,4E,9E,74,8D,68,68,74,9E,48? 64,64,64,64,64,6B,55,9E,64,48,5D,4E,3B,3B,3B,3C? 3B,3B,3B,3B,3B,3C,3C,3C,3C,3C,3C,3C,3C,3C,3B,3B@  3B,3B,3B,3B,3B,3B,3B,3B,3B,3C,3C,3C,3C,3B,3B,3B@V 3B,3C,3B,3C,3B,3B,3B,3B,3B,3B,3B,3C,3C,3C,3C,3C@ 3C,3C,3C,3B,3C,3B,3C,3C,3B,3B,3B,3B,3B,3B,43,47@Ć 3B,3B,40,41,43,45,41,3F,3B,3B,3B,3B,81,8B,9A,90@Ά 77,86,4A,9E,3B,3B,40,42,3C,3B,41,3E,3F,3F,3B,3BA.؆ 1980::"TREASURES FOR "NM$:"TREASURE"11);"#"16);"TREASURE"26);"#"SI1 20 2:I;10);(KA81I);15);I1;25);(KA80I):IS"ART THOU READY FOR MORE";A$:S I1 20:D(499)D(499)(T(I,D(500))(KA81I)):I:MOD(499)T*M$"THOU HAST"(MO)" SILVER PIECES.":1:T 0,800,100,2000,30,50,150,0,5,1250,200,8900,0,0,0,650,5,540,250,12600,6,0,0,0,5,410,200,0,40,0,400,5000T 1,600,200,2150,500,1160,300,500,800,900,100,300,400,500,300,10000,700,0,0,2000,1,0,0,800,20,0,0,0U$ dž 0,0,0,0,20,0,0,0,500,0,0,0,0,0,0,0,0,0,0,0800,100,2000,30,50,150,0,5,1250,200,8900,0,0,0,650,5,540,250,12600,6,0,0,0,5,410,200,0,40,0,400,5000T 1,600,200,2150,500,1160,300,500,800,900,100,300,400,500,300,10000,700,0,0,2000,1,0,0,800,20,0,0,0U$ dž 0,0,0.02666828E-35 0 2.57539887E-31 7.6361697E-19 7.22956427E-19 3.79016691E-36 1.9295651E-04 1.0353013E-07 4.826931E-11 4.49606758E-14 0 0 0 0 0 0 0 2.96178479E-39 2.96178479E-39 2.96178479E-39 2.96178479E-39 2.9616951E-39 0 1.02790733E-09 4.67982375E-27 2.31967789E-34 4.70104647E-27 1.81516218E-09 4.0332416E-13 7.30871905E-29 1.03218598E-32 8.97889402E-04 4.17861611E-07 1.9477477E-10 0 0 0 0 0 0 0 2.96178479E-39 5.92356958E-39 2.96178479E-39 2.96178479E-39 2.96178479E-39 0 3.82438582E-13 1.27207692E-29 4.93272135E-22 7.8623511E-17 1.3917235E-29 8.81647678E-17 3.94956944E-13 3.44224128E-10 8.80746273E-07 8.81649423E-17 6.66971741E-09 0 0 0 0 0 0 0 0 0 0 0 0 0 2.18141145E-17 1.28395329E-33 2.50385943E-32 4.11521085E-24 7.52571724E-37 4.63019201E-24 2.14982062E-17 1.90798324E-20 1.65446715E-09 1.23899593E-21 9.48119373E-14 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1.22166321E-38 0 2.88871076E-12 0 4.92367628E-38 0 1.23188726E-38 1.21416683E-38 0 0 0 1.17549435E-38 0 0 2.96205419E-39 2.98474401E-39 2.96178479E-39 2.96178479E-39 2.93909637E-39 2.68224306E-38 7.81910375E-37 0 2.9616951E-39 0 9.84649502E-38 8.17427931E-37 3.03057138E-39 0 0 0 0 1.17549435E-38 0 0 4.93039244E-32 1.68542472E-33 6.0159446E-39 1.22213115E-38 8.69536999E-20 1.08595593E-18 4.68566087E-36 4.38141727E-14 4.37508759E-14 8.6953435E-20 8.9797495E-20 3.55941449E-14 7.43025189E-38 9.75422687E-13 1.00713176E-29 7.390212&> :D(500),C,V,R0,R0$:"O", #1,"LEVEL4/DAT":V(D(0))97&fC02240:R0$:R0$"0D"CC1:50&R0("&H"R0$):C18)R0 16)(R059)22)R059&(VC,R059&2:D(500)4' 3B,3B,3B,51,3B,67,53,54,55,56,57,58,59,3B,5B,63'? 3B,3B,64,3B,3B,3B,3B,5A,6D,62,66,3B,65,69,6A,6B'@ 3B,3B,3B,3B,3B,3B,3B,3B,3F,3B,50,3B,3B,3B,51,3B(A 59,3D,3B,40,41,3B,46,47,48,3F,3B,4B,3B,76,3B,3B(JB 3B,3B,52,67,3B,66,56,64,3B,3B,5A,61,5C,3B,5E,3B(C 3B,3B,3B,60,3B,5F,3B,3B,68,3B,3B,3B,3B,6B,6C,6D(D 6E,74,70,71,55,6F,4F,4D,5B,3B,3C,3D,73,3B,40,3B(E 3B,3B,3B,44,3B,41,3B,49,47,3B,3B,3B,3B,75,4E,3B)"d 51,52,53,54,55,56,57,62,59,3B,3B,3B,3B,3B,3B,64)Xn 5A,5D,67,65,50,3B,68,69,6A,3B,63,3B,3B,3B,4A,45)x 3E,3B,3B,48,3B,3B,40,3B,48,42,43,3B,3B,3B,3B,45) 46,47,3B,3B,4A,3B,76,3B,75,3B,3D,51,3B,3B,73,55) 3B,3B,3F,59,77,5B,3B,5D,64,62,5A,3B,3B,56,3B,54*0 52,67,3B,3B,6C,6D,6E,6F,74,71,72,3B,3B,70,3B,4C*f 3B,3D,3C,3C,3B,3C,3C,3B,3B,0D,3E,3E,3B,3D,3D,3E* 3E,3B,3B,3B,3D,3B,3D,3D,3D,3D,3D,3D,3D,3D,3B,3D* 3E,3B,3B,3D,3B,3B,3B,3B,3C,3C,3C,3E,3B,3C,3C,3C+ 3C,3B,3B,3B,3B,3B,3B,3B,3B,3D,3B,3C,3B,3B,3B,3C+>Ȇ 3B,3C,3D,3B,3D,3D,3B,3D,3C,3C,3C,3B,3D,3B,3C,3B+t҆ 3B,3B,3B,3C,3E,3B,3D,3C,3C,3B,3B,3C,3D,3C,3B,3D+܆ 3B,3B,3B,3B,3D,3B,3D,3B,3B,3C,3B,3B,3B,3B,3C,3C+ 3C,3C,3C,3C,3C,3C,3C,3E,3E,3C,3D,3D,3C,3D,3B,3C, 3B,3B,3B,3B,3E,3B,3C,3B,3E,3D,3B,3B,3B,3B,3C,3D,L 3B,3D,3D,3D,3D,3D,3D,3D,3C,3D,3B,3B,3B,3B,3B,3B, 3C,3E,3D,3C,3E,3D,3B,3C,3C,3C,3B,3C,3B,3B,3B,3E, 3E,3C,3B,3B,3D,3B,3B,3D,3B,3C,3D,3D,3B,3B,3B,3B, 3D,3C,3C,3B,3B,3D,3B,3E,3B,3E,3B,3C,3C,3B,3B,3C-$" 3C,3B,3B,3C,3C,3C,3C,3B,3D,3D,3D,3D,3B,3B,3C,3B-Z, 3D,3E,3C,3B,3B,3C,3C,3C,3C,3C,3C,3C,3B,3B,3C,3B-6 3C,3B,3F,42,3D,3D,3D,3D,3D,3D,51,3F,3D,40,3F,40-@ 4A,3D,3D,0D,3D,44,3D,55,44,48,44,48,53,4E,4E,3D-J 4E,56,3D,3D,45,3D,3D,3D,3D,3D,3D,3D,40,3D,3D,53.2T 3D,3D,3D,3D,3D,3D,3D,3D,3D,3D,40,3D,45,3D,3D,3B.h^ 42,3B,42,3E,3B,4C,4C,3B,40,3D,3D,3D,3B,41,3B,51.h 3B,3B,3B,3B,3D,3F,3B,5B,3D,3D,3B,3B,3D,41,42,3B.r 44,3B,3B,3B,3B,47,3B,3F,3B,3B,3D,3B,3B,3B,3B,3D/ | 3D,3D,3D,3D,3D,53,3D,3D,3D,3E,3D,40,18:M0 1320ACCH(I)18:J1 M:CH(4)18 CH(4)CH(4)1:1310AgCH(5)18 CH(5)CH(5)1:1310A CH(6)18 CH(6)CH(6)1:1310AR(3):CH(R)CH(R)1AJA(I:CACH(5):AQCH(4):DXCH(6):EGCH(3):ITCH(2):B=2M$"WILT THOU BUY ONE OF OUR FINE SWORDS?":1:A$:(A$,1)"N" N(KB17):1430:BF3W20Bt<"WEAPON"10);"WEIGHT"20);"ASKING PRICE"BFI1 5:(NW$(I),11);14);WW(I);20);WP(I):IBPM$"WHAT WEAPON WILT THOU PURCHASE?":1:A$:I1 5:(A$,1)"-" A$"H"CQ(A$,1)(NW$(I),1) NI:1380CFR(A$,1)"N" N(KB17):1430:CZI:M$"I HAVE NOT SUCH A WEAPON AS A "A$:1:1360CdWR(N)AQ M$"THOU CANNOT WIELD SUCH A GREAT WEAPON":1:1360CnM$"FEAST THY EYES 'PON THIS FINE "NW$(N):1Do"'TIS WELL FORGED IRON"DGxLO.3WP(N):AKWP(N):A1AK:1670:OO0 1360DZMOMOOO:830DWM(WD(N)AQ10.5):SM0:KB10,0:KB17,N:WCWCWW(N):N5 W21DDW(N,0)CH(6) WPWPCH(6)DW(N,0):1440DDW(N,1)CH(6) WPWPCH(6)DW(N,1)EWP0 WP(1.3(WP)1)EE;W21 PS0:KB,0:SP0:Eu"WILT THOU BUY A SHIELD";A$:(A$,1)"N" 1520:E"SHIELD WEIGHT ASK"E"SMALL"11);SW(1);22);SP(1):"LARGE"11);SW(2);22);SP(2)F"WHAT SORT";C$:(C$,1)"L" N2:1480F N1F*ȅ(C$,1)"L" N2:1490FHɅ(C$,1)"S" N1:1490F]N0:KB,0:PS0:FLO.3SP(N):AKSP(N):A1AK:1670:OO0 1470F܅DS(N1,0)DX SPSPDXDS(N1,0):1510F݅DS(N1,1)DX SPSPDXDS(N1,1)GMOMOOO:830:WCWCSW(N):PSSD(N):KB,PS:1520:G4PS5 SP(SP2)GSSP0 SP(1.3(SP)1)GdSP2PSSP:GuHB0 1590G"WILT THOU BUY A BOW";C$:(C$,1)"N" H "M$"I'VE A FINE BOW, YEW AND NEARLY NEW, FOR 12 SILVER PIECES":1:LO4:AK12:A1AK:1670:OO0 H,MOMOOO:830H>6RSRM60 RS60RM:1620H@N0:M$"HOW MANY ARROWS WILT THOU BUY (AT 5 COPPERS EACH)?":1:NHA((N1)2)MO "NO CREDIT":1600HBRSRMN60 M$"THOU CANST CARRY BUT 60 ARROWS. BUY FEWER.":1:1600IJRSRSN:MOMO((N1)2)ITI$^IyhM$"HOW MANY SALVES WILT THOU BUY? THEY COST THEE 10 SILVER PIECES EACH.":1:NIi10NMO "NO CREDIT":1640IjMOMO10N:HSHSN:HS10 NHS10:MOMO10N:HS10:M$"MORE THAN 10 WILL DO THEE NO GOOD":1JlrMO.35OM NM$;"! THOU SPENDTHRIFT!":M$"THOU HAST BUT"(MO)" SILVER PIECES LEFT TO THEE":1:1660JsM$NM$", THOU ART FRUGAL.":1:830J|D(499)MO:J(3)2 M$"WHAT BE THY OFFER "NM$"?":1:1680J"WHAT OFFEREST THOU?"K6 OO:OOMO M$"LIAR, THOU HAST BUT"(MO):1:1670KHOO0 LS0:KdOOLO 1950:1670KOOLS 1910:1670KOOAK "DONE":LS0:K…OOAK.3(0)2AK 1735KÁ1740LDžOO.6A1 M$"THOU ART A HARD BARGAINER "NM$:1:LS0:Lȇ"DONE":LS0:Lp̅(200)200 "I SEE THE GODS LOOK WITH FAVOUR ON THEE, SO TAKE IT FOR THAT":LS0:LB20(CH(1)CH(3)):CH(3)12CH(1)10 B20(CH(1)20CH(3))LAKOO(AKOO)(1(0))BLLSOOL1970:1670MQCH(1)(KB20):CH(2)(KB21):CH(3)(KB22):CH(4)(KB23):CH(5)(KB24):CH(6)(KB25)MSM(KB10):RM(KB14):RS(KB13):AA(KB8):WM(KB7)SM:WN(KB17)MSM0 WN6M1980::"CHARACTER SUMMARY FOR "(NM$,8)N:I1 6 2:(NC$(I),12)13);((KA97I));NL18)(NC$(I1),11)28);((KA97I1)):INj&J0:(KB)3 J1:1840N}'(KB)5 J2N0"WEAPON: "NW$(WN);:WN6 20)"PLUS:";(KB10):1850N1O:"ARMOUR: "NA$(AA);:(KB16)0 20)"PLUS:";(KB16):1860O ;O D"SHIELD: "NS$(J)OAN"ARROWS: "RS;18)"MAGIC:"RMOtX"SALVES: ";(KB11);18);"ELIXIRS:";(KB6)Ob"SILVER: "MO;18)"EXP:";D(498)Og"WEIGHT:";(KB12)OlOvR(3):R(3):(3) 1920,1930,1940PM$"DOST THOU TAKE ME FOR A DOLT?":1:PYM$"FOOL OR KNAVE "NM$"! MAKE AN OFFER HIGHER THAN THY LAST":1:PM$"PERCHANCE THOU WOULDST NOT HAVE THIS AT ALL?":1:P(100)50 M$"HA! 'TIS LESS THAN I PAID FOR IT":1:PM$"I SPIT ON THY PALTRY OFFER":1:Q?I11 10:R(RT):I1:RQ0:R(RT)1:I11 RN:RQRQRR(I1)QURQR I1:1980QyM$R$(I1)((AK.999)):1:QNM$"":I1 11:NM$NM$((KB12I)):IQƀI1 10:(NM$,12I,1)" " 2010QЋIQNM$(NM$,12I):RPSM(KB10):HS(KB11):HN(KB6):RS(KB13):RM(KB14):I1 6:CH(I)(KB19I):IRAA(KB8):WM(KB7):PS(KB):WC(KB12):AA5 W21:2030RW20REXD(498):EX1999 L(EX1000)(2)1:2040RL1RHB1:1120:910RSE 23 315/7320/U;M$"I TRUST THINE WAS A PLEASANT SOJOURN WITHIN THE TEMPLE.":1/<"ART THOU BUT PASSING THROUGH":"THE INN AND WISH TO RETURN";A$/=(A$,1)"Y" 2020:2080:OMMO:1330:350/@KB12,00FJM$"HAIL AND WELL MET! SHALL I FIND THEE A GOODLY CHARACTER, OR HAST THOU BROUGHT ONE WITH THEE?":10KM$"PRITHEE, SAY YEA IF I SHOULD.":1:C$:(C$,1)"Y" 850:3400L9400TOMMO:"CHARACTER NAME";NM$:MO0 13300^MO0 14600hPS0 WPWPSP:SP01+rPBPBWP((KB15)2):WP0 PAPAWP1:3801AsWP0 PAPAWP11Q|MO0 4101[}7501kMO0 4101v15501MO0 410116301SE1001M$"MONSTER SPEED (SLOW, MEDIUM, OR FAST)?":1:C$:(C$,1)"S" SE250:4302(C$,1)"F" SE60:4302SE1202XKB9,SE:KB11,HS:KB13,RS:KB14,RM:KB12,WC:KB7,WM2yKB24,CA:KB6,HN:KB11,HS2’KB23,AQ:KB7,WM:KB18,PB:KB19,PA:KB21,IT:KB22,EG:KB4,SP:KB25,DX2D(498)EX3WC5WW((KB17))W(AA)SW(((KB)2))1(RSRM)103C֒KB13,RS:KB14,RM:KB12,WC:KB20,CH(1)3QKB10,SM3\KB,PS3~KB8,AA:(KB12)123 5403J(NM$):J11 J113I1 J:KB12I,((NM$,I,1)):I3J11 IJ1 11:KB12I,(" "):I317904&KB12,1234I0"ENTER DUNGEON NAME";A$: "O", #1,(A$,8)"/DAT":5:"SAVING"4:IKA97(KA97)25005: #1,(I),(I1),(I2),(I3),(I4):4D#1 4"NOW RUN DUNJONMASTER":4"ENTER DUNGEON NAME";A$: "I", #1,(A$,8)"/DAT":5:"LOADING"5WƀIKA97(KA97)25005: #1,CC,C1,C2,C3,C4:I,CC:I1,C1:I2,C2:I3,C3:I4,C4:5kК#1:MOD(499):5"WILT THOU BUY NEW ARMOUR";A$:(A$,1)"Y" 75555I1 900:I::"TYPE"12)"WEIGHT"20)"ASKING PRICE"6I1 5:(NA$(I),13)14)W(I)22)P(I):I6aM$"WHAT SORT OF ARMOUR WOULDST THOU WEAR?":1:A$:(A$,1)"N" AM0:AA0:6 I1 5:(A$,2)(NA$(I),2) NI:8106I:M$"I HAVE NOT "A$" FOR SALE":1:7706 (KB12)123 WCWCW(AA)7*LO.3P(N):AKP(N):A1AK:1670:OO0 770764AAN:MOMOOO:WCWCW(N):KB16,07>(2) 835:M$"THOU HAST"(MO)" SILVER PIECES LEFT IN THY PURSE":1:7CM$"THOU HAST"(MO)" REMAINING":1:7HJ(6)(6)(6):8RHB0:SC0:I1 6:840:CH(I)J:SCSCJ:I:SC60 CH(4)8 CH(5)7 8508h\EX0:RS0:RM0:AA0:PS0:KB17,0:SP0:WP1:AM0:SM0:HS0:HN0:KB15,18f:"THY QUALITIES:":I1 6:NC$(I);25);CH(I):I8pI1 6:KA97I,CH(I):I8z:840:MOJ10:8308930:L1:KB16,093EGCH(3):INCH(1):AQCH(4):CACH(5):ITCH(2):DXCH(6):PA11:PB11999WIKA90 KA81:I,0:I:9KB15,0:I1 6:"ENTER "NC$(I);:CH(I):KA97I,CH(I)9CH(I)18 M$((CH(I))" BE TOO HIGH. NO MORE THAN 18 CAN IT BE.",2):1:II19I: "THY EXPERIENCE";EX:bEX16000000 M$"THY CHARACTER IS TOO WORLDWISE; FIND ANOTHER MY FRIEND":1:940:EEX1000:L1 20:2LE 980:ˋL:M$"HOW MUCH MONEY HAST THOU TO SPEND?":1:MO:ށ1120;M$"WHAT KIND OF SWORD HAST THOU?":1:A$:I1 5;D(A$,1)(NW$(I),1) CH(4)WR(I) NI:OO0:1420:1020;I:M$"THOU CANNOT TAKE A "A$" TO THE DUNJON. THOU MUST BUY ANOTHER.":1:1000;M$"WHAT SORT OF ARMOUR DOST THOU WEAR?":1:A$:I0 5< (A$,2)(NA$(I),2) NI:OO0:820:10409M$"HOW MANY HEALING SALVES HAST THOU?":1:HS:HS10 HS10>JB"IS THY SWORD MAGICAL";A$:(A$,1)"Y" "WHAT BE THE PLUS";SM>LKB16,0:"IS THY ARMOUR MAGICAL";A$:(A$,1)"Y" "WHAT BE THE PLUS";AM:KB16,AM>V930:910>`W21 WPL:SP0:1130>aWP((L1)2):SPLWP>j(KB15)L ? kKB15,L?`t(KB12)123 JL1:L2:J 1150,1170,1190,1210,1230,1150,1170,1190,1210,1230?v~LL1:L0 1260?CH(5)9 CH(5)CH(5)1:1170?CH(4)CH(4)1?LL1:L0 1260?CH(6)9 CH(6)CH(6)1:1190?CH(5)CH(5)1@ LL1:L0 1260@CH(5)CH(5)1@4LL1:L0 1260@WąCH(6)9 CH(6)CH(6)1:1230@~ŅCH(4)CH(5) CH(4)CH(4)1:1230@CH(5)CH(5)1@LL1:L0 1260@؅CH(2)CH(3) CH(2)CH(2)1:1150@CH(3)CH(3)1@⁥1150AI1 6:MCH(I)3B,3B,3B,3B,3B,3B,3B,3B,4F,3B,3B,3B,3E,3B,3B,3B,3B,3B,3B,3C,4F,4A,3B,3B,4F,45,3B,54A 3B,3B,4F,45,4F,47,40,40,40,3D,3E,3F,3E,45,3E,40,4F,46,91,7C,88,8B,84,8D,80,5B,7D,7C,8F,46,82,89B 8F,5B,8F,80,8D,88,84,8F,80,44,8E,92,7C,88,8B,5B,8D,7C,8F,42,7C,89,8F,5B,88,7C,89,40,85,80,87,87B 94,44,82,89,8F,5B,87,80,80,7E,83,43,8E,86,80,87,80,8F,8A,89,41,95,8A,88,7D,84,80,45,82,84,7C,89B 8F,5B,92,7C,8E,8B,41,95,8A,88,7D,84,80,42,7C,89,8F,5B,88,7C,89,3B,E1,4F,4F,4F,4F,4F,4F,4F,4F,4FCƆ 4F,4F,75,54,40,8B,3D,3B,5F,0D,**5,80,87,87B 94,44,82,89,8F,5B,87,80,80,7E,83,43,8E,86,80,87,80,8F,8A,89,41,95,8A,88,7D,84,80,45,82,84,7C,89B 8F,5B,92,7C,8E,8B,41,95,8A,88,7D,84,80,42,7C,89,8F,5B,88,7C,89,3B,E1,4F,4F,4F,4F,4F,4F,4F,4F,4FCƆ 4F,4F,75,54,4069 0, 20, 20, 13, 11 2, 20, 2, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 129, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0,HAVE THIS AT ALL?":1:PT(100)50 M$"HA! 'TIS LESS THAN I PAID FOR IT":1:P~M$"I SPIT ON THY PALTRY OFFER":1:PI11 10:R(RT):I1:RQ0:R(RT)1:I11 RN:RQRQRR(I1)PRQR I1:1980PM$R$(I1)((AK.999)):1:Q*NM$"":I1 11:NM$NM$((KB12I)):IQSƀI1 10:(NM$,12I,1)" " 2010QZЋIQqNM$(NM$,12I):QSM(KB10):HS(KB11):HN(KB6):RS(KB13):RM(KB14):I1 6:CH(I)(KB19I):IRAA(KB8):WM(KB7):PS(KB):WC(KB12):AA5 W21:2030R!W20RVEXD(498):EX1999 L(EX1000)(2)1:2040R^L1RtHB1:1120:910RzR 1980::"TREASURES FOR "NM$:"TREASURE"11);"#"16);"TREASURE"26);"#"SI1 20 2:I;10);(KA81I);15);I1;25);(KA/%&2:1000:D(500),I,J,K,A$,C:C1024:190:40&AC11:CC32&t(M$,CC,1)""(M$,CC,1)" " CCCC1:2&(M$,C1,CCC1):C1CC1:CCC131:C1(M$) 2&&KA(D(0))97:KBKA2251:'1"NONE",0,0,"LEATHER",150,30,"RING MAIL",350,100,"CHAIN MAIL",500,150,"PARTIAL PLATE",750,250'"FULL PLATE",1000,1000,"INTELLIGENCE","INTUITION","EGO","STRENGTH","CONSTITUTION","DEXTERITY"( "DAGGER",1,5,5,3,7,12,"SHORTSWORD",2,14,6,8,9,12,"BROADSWORD",3,18,7,10,9,13,"HAND-AND-A-HALF SWORD",6,35,8,16,9,14(>"GREAT SWORD",9,70,10,15,7,15,"MAGIC SWORD"(\6,3,10,8,15,12,5,15,6,17("I'D NOT PART WITH THESE FINE GOODS FOR THAT PITTANCE! MAYHAP FOR",5("NOT SO CHEAP MY FRIEND! BUT FOR THEE JUST",10)="BLACKHEART! THOU TAKEST THE FOOD FROM MY CHILDREN'S MOUTHS! I'LL NOT SETTLE FOR LESS THAN",5)~"WELL, LIFE IS SHORT AND THY ARSE LONG! WHAT SAY THEE TO",2)"HMM...BUT SUCH FINE WORKMANSHIP. I COULD NOT PART WITH THIS FOR LESS THAN",10,"A POX ON THEE! BUT I'D TAKE",3*"NONE","SMALL","LARGE"*~(NA$(5),W(5),P(5),NC$(6),CH(6),SD(2),SP(2),SW(2),NW$(6),WW(5),WP(5),WD(5),WR(5),DS(1,1),DW(5,1),R$(6),RR(6)**NS$(2),T(20,4),N,L,Q,LS,SM,RN,RT,WC,KB,KA,OM,C$,PS,WP,SP,PB,PA,MO,SE,JJ,WW,LV,J8,J0,J7,JQ,CC,C1,C2,C3,C4,M$+R+AN$,LQ,IA,AM,AA,LO,AK,A1,OO,HB,SC,EX,RS,RM,HS,HN,EG,IN,AQ,CA,IT,DX,E,W2,M,R,WM,B,WN,I1,RQ,NM$+f,C1():Q60+2J8248:J059:J7249:JQ1+FI0 5:NA$(I),W(I),P(I):W(I)(W(I)16.5):I+PW(0)0:I1 6:NC$(I):I,!dI1 5:NW$(I),WW(I),WP(I),WD(I),WR(I):J0 1:DW(I,J):J:I:NW$(6),YxI1 2:SW(I),SD(I),SP(I):J0 1:DS(I1,J):J:I,gLS0:SM0,RN6:RT0:I1 RN:R$(I),RR(I):RTRTRR(I):I,I0 2:NS$(I):I:I1 20:J1 4:T(I,J):J:I,270-D@138,"DUNJONQUEST":@70,"THE TEMPLE OF APSHAI":@297,"COPYRIGHT 1979":@357,"AUTOMATED SIMULATIONS"-ҀI0 30:@I,(191);:@I480,(191);:I:I31 480 32:@I,(191)(191);:I:1535,191-ׇ@452,"COCO EDITS -- JIM GERRIE";:.܀I417 446:@I,(191);:I:@452,"HIT ANY KEY TO CONTINUE ";.(A$:(A$)0 240...F220::700:KB,0.n:WC5:"THUS QUOTH THE INNKEEPER:"."(KB12)123 "DOST THOU WISH TO KNOW WHAT":"TREASURES THOU HAST";A$:(A$,1)"Y" 2060.,(KB12)123 1790/6(KB12)1%%%%%%%%%%%%%%%%%%%%%%%%%%% You may select drives T through 3 At the Program? prompt: ENTER & space scans CATalog for LOAD "9H2$" 5 RENAMES oldfile, newfile. 6 Calls in the MOVE Program. 7 ERASES file from disk. 8 Returns the Drive? prompt. 9 Refreshes the CATalog. ":H3$" 0 Calls in the FORMAT program. R RENAMES oldfile, newfile. S Saves this program to disk. T Calls in the Terminal program. W Calls in the Word Processor. Z COPYs CATalog to printer. ";H4$" Press at the Program? prompt and use the arrow keys to select a program to LOAD and RUN. Press to CONTINUE"<H5$" A Adds AUTOEXEC to disk. B Displays a Brief CATalog. C Copies CAT to large printer. F Calls in the FORMAT program. H Calls in this HELP file. K Saves $creen to disk. "=H6$" M Calls in the MOVE program. N NEW, activates AUTOEXEC. Q Quit, halts this program. V Displays a Verbose CATalog. Y Returns to TERMINAL mode. ">eH7$" During the AUTOEXEC sequence typing LIST instead of RUN allows the user to modify the AUTOEXEC program. Press to CONTINUE">0,0: H1$;H2$;H3$;H4$;>υ(13)975>0,7: H5$;H6$;H7$;>ޅ(13)990:10g LIST instead of RUN allows the user to modify, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 7, 0 0, 0, 0, 6, 4 3, 5, 7, 0, 0 0, 0, 0, 85, 80 90, 75, 70, 99, 0 0, 0, 0, 3, 7 5, 6, 9, 4, 0 0, 0, 0, 15, 3 3, 6, 36, 1, 56 3, 4, 54, 8, 0 0, 0, 0, 0, 0 0, 0, 0, 8, 0 0, 6, 0, 1, 7 3, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 1, 1 1, 1, 4, 2, 1 1, 2, 1, 2, 0 1, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 0, 4, 5, 4 4, 18, 9, 3, 5 9, 5, 9, 0, 0 0, 0, 0& 500: CC,ZZ,M$,I$:50&ZZ1:CC32: CCCC ZZ 1:I$(M$,CC,1): I$"!" (M$,ZZ,CCZZ):ZZCC1:CCZZ32: I$"" CC.&CCCC(CC255)(CC255)::M$""&:"HIT ANY KEY TO CONTINUE";&M$:M$""4&CC123:(8);::'2'< 8)"TEMPLE OF APSHAI"'AF 5)"QUICKSTART INSTRUCTIONS":'dM$"TEMPLE OF APSHAI IS A DUNGEON CRAWL ROLE-PLAYING VIDEO GAME DEVELOPED AND PUBLISHED BY AUTOMATED SIMULATIONS (LATER RENAMED TO EPYX) IN 1979.":1(eM$"THE PLAYER IN TEMPLE OF APSHAI ASSUMES THE ROLE OF AN ADVENTURER WHO EXPLORES THE MYSTERIOUS RUINS OF THE TEMPLE OF APSHAI.":1(,M$"THE GAME CONSISTS OF TWO PROGRAMS; THE INNKEEPER (INN.BAS) AND THE DUNJONMASTER (DM.BAS).":1)M$"THE GAME STARTS WITH THE INNKEEPER PROGRAM.")M$"THE PLAYER MUST FIRST CHOOSE BETWEEN FOUR DUNGEONS (LEVEL1.DAT, LEVEL2.DAT, LEVEL3.DAT, LEVEL4.DAT) OF INCREASING DIFFICULTY.":1*XM$"WHEN PROMPTED FOR A DUNGEON NAME CHOOSE ONE OF THE FOUR LEVEL NAMES WITHOUT THE EXTENSION (E.G. LEVEL1)":1*`M$"YOU MUST THEN CHOOSE TO EITHER GENERATE A NEW CHARACTER OR INPUT AN EXISTING ONE.":1*M$"ANSWER 'YES' TO GENERATE A NEW CHARACTER.":1*M$"THE COMPUTER WILL THEN CREATE NEW CHARACTER STATS FOR YOU.":1+>M$"YOU MUST THEN INPUT A UNIQUE CHARACTER NAME AND OUTFIT YOUR CHARACTER WITH ITEMS.":1+M$"WHEN YOU FINISH YOU MUST ENTER A NEW DUNGEON NAME THAT CAN BE USED WHEN YOU RUN THE DUNJONMASTER (DM) PROGRAM.":1, M$"WHEN YOU RUN THE DM PROGRAM, ENTER THE NEW DUNGEON NAME YOU HAVE JUST CREATED.":1,*M$"ACTIONS INCLUDE: 0-9 TO MOVE FORWARD, lEFT, rIGHT, oPEN DOORS, eXAMINE, sEARCH, hEAL, aTTACK, fIRE ARROWS.":1,RM$"FULL INSRUCTIONS FOR ALL YOUR ACTIONS IN THE DM PROGRAM CAN BE FOUND ONLINE.":1-M$"RUN THE 'INN' PROGRAM TO BEGIN":1-"ACTIONS INCLUDE: 0-9 TO MOVE FORWARD, lEFT, rIGHT, oPEN DOORS, eXAMINE, sEARCH, hEAL, aTTACK, fIRE ARROWS.":1,RM$"FULL INSRUCTIONS FOR ALL YOUR ACTIONS IN THE DM PROGRAM CAN BE FOUND ONLINE.":1-M$"RUN THE 'INN' ,3B,3B,3B,3B,3C,3C,3C,3C,3F,3D,3C@ 3C,3D,3C,3D,3B,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3B,3F,40,3F,3F,4D,44,3E,40,44,40,44,3B,3B,3B,3B@ 3B,3B,3B,3C,3C,3B,3C,3B,3B,41,40,3F,41,41,41,41,42,48,44,46,4F,3D,3B,3C,3F,3B,3B,3B,3B,3E,3B,40AR 4F,3B,3B,3B,&{32:4:500,&H8000:40::9,11:3:3,2:DN0:D(235):D$(D): D:R1:S1:SP442608:300: 700:X$" "&#0:DW1& :"Disk Name: ";DX$;X$;X$;" %%%% for Tandy Color Computer V7.0 %%%%";: V : 500' DW 30 : 0,22:"Drive #";DA$'' ((DA$))25520'8 DA$"T"40'` (DA$)0 (DA$)256 DN$DA$' DA$"" DA$">" DN$(DN)'0,22: X$:# ((DN$))' DA$">" P$DA$:110'0,22:"Drive";DB$: DB$"T"40(  (DB$)255(DB$)00,22: X$:30(&! DB$"ON" :10(T" (DB$,3)"OFF" ((DB$,1)):10(y# (DB$)0 (DB$)256D$DB$($ DB$"" DB$"@" D$(D)(% (D$):0,22: X$(& (DN$)DN (D$)D 50('DN(DN$):D(D$):300:10)(: :16,11:"PLAY TAPE":)B2 DB$">" P$DB$:0,22:"Program?":110)xd0,22:"Program";P$: P$"5" P$"0" D$P$:37)n P$"5" P$"R" P$"RENAME" 0,22:"RENAME Old";O$:20,22:" New";N$: O$ N$:10)x P$"6" P$"M" "MOVE*? P$"7" P$"E" P$"ERASE" 7,22: X$;:0,22:"ERASE";P$: P$:10* P$"8" P$"D" P$"G" P$"P" P$"POINT" 8,22: X$;:20* P$"9" P$"CAT" 9,22:X$:0,2::100* P$"0" P$"F" P$"O" P$"COPY" "FORMAT* P$"A"400+ P$"B" P$"BRIEF" V0:10+9 P$"C" P$"Z"650+^ P$"DOS" P$"OS9" 32:: D+ P$"H" P$"?" P$"g" P$"HELP"900+ P$"K" M"S.BIN",442608,444528:10+ P$"N" 32:"AUTOEXEC+ P$"Q" ,, P$"S" 0,22:220,1:"L.BAS SAVED": "L.BAS":P$"9":220,1:10,E P$"T" "TERMINAL,Y P$"TROFF" ,l P$"TRON" , P$"V" P$"VERBOSE" V1:10, P$"W" "WRITER, P$"Y" M"TERMINAL.BIN":, P$"" P$"J"800-ȅ (P$,3)"BIN" 32:M P$:-4҅ (P$,3)"DAT" P$(P$,(P$)3)"BAS"-s܅ (P$,3)"DOC" (P$,3)"TXT" :"I",#1,P$:80::240-32:P$,R- (1) 280-#1,K$:F1:AA1- K$:T1 900:T:PRINT STRING$(8,32);K$-Z$: Z$""240.%#1:27,22:"Press to continue";Z$:40:10.b, JSP:DX$" ":1,2:0,2::3,2:CREATE DISK NAME.p6 K1 8.@(DX$,K,1)((J)).J (DX$,K,1)"-"350.TJJ2: K.^ DX$"L " DX$"LogiCall".h/:220,1:14,12:"Type GOTO410":500990:CREATE AUTOEXEC.BAS/?:14,12:"Type RUN":0410/S"AUTOEXEC.BAS"/] 3/q 65497,0:FAST/ &H7C0,0: &HD816,20/ 3/"L.BAS",R/:BRIEF Catalog/P0:TB0:0,3/ S3 6/ D,17,S,A$,B$/ T1 97320L$(A$,T,8):R$(A$,T8,3)0U (L$,1)(255) (L$,1)(0) R$"BAS"5100_5500g T0y U1 97320 L$(B$,U,8):R$(B$,U8,3)0 (L$,1)(255) (L$,1)(0) R$"BAS"53005500 U0! S1# (P2)P2 1g$DC$(((D$))):DD$(((DC$))):"DRIVE=";(DC$,(DC$)1);" FREE=";(DD$,(DD$)1)1m%1&PP1: TB) L$;" ";R$;: TB0 TB4 : TB0:101X:0,22:"Disk full";X$;:"L.BAS"1b0,2:1lDN(DN$):D(D$)1v102 :PRINT POUTINE2AIP0:0,22:"Printing...";:ISP240SP1519 22MIPIP12a#2,((I));2w IP40#2:IP02 (I)61 DC$(((D$))):DD$(((DC$))):#2,(DC$,(DC$)1);" FREE=";(DD$,(DD$)1):#2:0,22:X$:303I:303:ERROR HANDLING ROUTINE3M:LOCATE0,21:PRINT"ERROR in line";ERLIN;X$3\ 5 103l 10 303| 20 223… 40 103Å 110 103ą 120 DB$"R":503ƅ 130 103Ѕ 146 DB$"0": X$:353څ 156 6004 200 :4% 250 28047 503 5054R 548 "??":5494c 549 304i4 :HIGHLIGHT & PARSE FILE NAMES4% JSP: IJ1 J242:(I),4:I4*P$"123456789012": K1 124/(P$,K,1)((J))54 (P$,K1,1)" "8305-9 (P$,K,1)" " (P$,K,1)"."5K> (P$,K,1)"." JSP165YCJJ2: K5xH L8 11::CLEAN UP P$5J (P$,L,1)" " P$(P$,L)"."(P$,3):8505M L6 R (P$,6)"DRIVE=" (P$,1)" " (P$,1)" " 890:SP442608:R1:S1:8006>T (P$,1)" " 890:SP442640:R1:S1:8006WW9,22: P$;X$:21,226p\ M$: M$""8606za8906f M(M$)6g M8 M81 SPSP(40(8S)):SS1:RS6h M9 M65 SPSP(40(8R)):RR1:SR6i M10 SPSP807j M13 2007@k M32 M76 SPSP(40(8R)):RR1:SR7Vl M94 SPSP807m SP 442608 9,22: X$:SP442608:R1:S1:1007p8007zJSP: IJ1 J242:(I),26: I:8H1$" L o g i C a l l %%%%%%%%%%%%%ч@138,"DUNJONQUEST":@70,"THE TEMPLE OF APSHAI":@297,"COPYRIGHT 1979":@357,"AUTOMATED SIMULATIONS")ҀI0 30:@I,(191);:@I480,(191);:I:I31 480 32:@I,(2,191);:I:1535,191* Q,KM,Q2,K,X,Y,L,M,N,V,A,B,NN,NS,I1,LR,KR,YA,YB,NB,NO,NT,D1,D2,MT,ML,MN,MD,MS,MH,M1,IH,NP,XP,W,CC,C1,C2,C3,C4*zYP,IB,TR,XR,YR,U,X1,X2,XA,XB,Y1,Y2,TN,TV,TP,TG,TW,TS,UL,IA,UA,UP,US,UD,UC,UR,UI,UW,UV,BL$,SE,PC,YM,XM,XL,YL*IN,L1,L2,L3,L4,LM,LX,II,IK,NY,NX,KF,LE,IC,C$,IJ,PH,TA,LL,V1,V2,V3,V4,W1,W2,W3,W4,MO,A$,EX,MM,PB,PA,PS,AA,AQ,WM,WT+aWC,SM,IR,MQ,MW,MA,MP,MR,MF,LS,O$,X0,Y0,HI,P,R,AK,Q1,PW,JJ,UX,S,LY,UY,SP,IM,KC,T$(9),SO,DS$:10005:10000+Q():Q60:KM0:Q112:Q220+I0 3:C:J0 1:TX(I,J),TY(I,J):J:I:I1 5:TM(I):I:C.5:Z.66+€I0 6:J0 7:A(I,J),B(I,J):J:I,oʞ:700:NOV:NT4QV:D18QV:D212QV:MT16QV:MNMTQ:NPMNQ:XPNPQ:YPXPQ:TRYPQ:XRTRQ:YRXRQ:2390,X1YRQ:X2X12Q:Y1X22Q:Y2Y12Q:TNY22Q:TVTN10:TPTV10:TGTP10:TWTG10:TSTWQ2:ULTSQ2:UAULQ1-VUPUAQ1:USUPQ1:UDUSQ1:UCUDQ1:URUCQ1:UIURQ1:UWUIQ1:UVUWQ1:BL$" ":I1 8:BL$BL$(8):I-ZD(0)3:ZA(1)0:ZD(1)0:ZA(2)3:ZD(2)3:ZA(3)6:ZD(3)2:ZD(4)5:ZD(5)5:SE100-I0 9:T$(I):I:3260-PCPC1:U24,(U24)1:V92,(V92)1:. BW1W25:YMB YMB:2320.) YM5 YM5.E AV2V15:XMA XMA:.U XM5 XM5.[ .} $@472,((J)"ARROWS",8);:. .0,1:I1 40:I:1,2:. 82800:L0 2360. 9J(C$)48:J0J9 2360. :. B@248,BL$"AR:"(U13);:/ L@280,BL$"MA:"(U14);:/+ VI1 60:VI,0:I:/q `I0 3:RN(I)0:RF(I)0 NTKRIQ,3:VKR61,0:RN(I)1:RF(I)0/ jI:IKF1:I3 II4/ tRN(KF1)0 RF(I)1/ ~/ N,(IANN):NNNN1:/ L1B:L2BL1:L10 L10:L20 0 L247 L247:L147 0N L3((L13)3):L4((L23)3):LM3L43:LX3L31:LML1 LML10` LXL2 LXL20~ IIA A1:II0II47 0 I2II:IKL1 LX:2740:IK:IKLM L2:2740:IK0 ΅L4L3 NYL3 L4:(II,NY2,4):(II,NY21,4):NY0 ؋II:1 L1B:L2BL1:L10 L10:L20 1: L247 L247:L147 1_ I0 I1:NX2AI:NX0NX96 1 JL1C L2C:(CNX,JZ):J:I:1 L1A:L2(C(2AL1))C:L10 L10:L20 1 L247 L247:L147 1 I0 I1:NY(Z(BI)):NY0NY31 2 (JL1 L2:(J,NY,4):J:I:2N 2L1A:L2(C(2AL1))C:L10 L10:L20 2j  XA(V2236):YA(V2237):KF(V2238):PW(V2235):EXD(498)>7 I61 80:VI,0:I> MM4:PH(U24):PCPH:PB(U18):PA(U19):PS(U):AA(U8):TA100> AQ(U23)10:WM(U7):SE(U9):WTAQAQ100:WC(U12):SM(U10):> ̅(VLR61)1 ?1 ́2960:AV4XB2:V3XB1V4XB49YBW31YBW449 VLR61,1?_ րK1 3 2:NNLRKQ:BYBW3:NSK 3050? I13:LW3W4:(D2NN)(D1NN)4L 3050? ؁2450? I152(NTNN):I10I15 BYBW4(D2NN):L(D2NN)(D1NN):2530? AV3XB:K@) BYBW3:K0 2 2:NNLRKQ:NSK 3070@h I11:AV3XB:L2(V4V3):(D2NN)(D1NN)4L2 3070@ 2570:I12(NTNN):I10I12 AV3XB(D1NN):L2((D2NN)(D1NN)):2610@ BYBW42:K:A LRKR:2950:0:10:SO1 SO0:3082A (VKR61)1 3120A& 2390A{ XBV1:YBW1:(NTLR3Q)1 XBXB(48V2V1)2:(NTLRQ)1 XBXB(V1XB)2A (NTLR)1 YBYB48W1W2:(NTLR2Q)1 YBYB(YBW1)2B &@312,BL$;:XLXAV1:YLYAW2:(MTKR)0(MNKR)0 3180:NB1:3120B '3210BS 0@24,"RM:"KR;:@56,"WD:"(100PCPHC);:@88,"FT:"TA;B 1@120,"WT:"WC;:@312,(A$,8);:@248,"AR:"(U13);B 2@280,"MA:"(U14);:@376,"SLAIN:";:@408,KC;B :NB0 2700B DNS5:IB3 3170C) NIR0 3:IKRIRQ:(NTI)1(NOI)0 LR(NOI):3020C1 XIRCR bLRKR:3020:2650:2880:C lMQ(MTKR):MW0:ML(ULMQ):MA(UAMQ):MP(UPMQ):MS(UVMQ):MD(UDMQ):MH(UCMQ):MR0C m2981:IH0C vXM(V2V18)4:YM(W1W28)4D MF(4):D" L(100):LPW NB0:A$"":D` L(100):LS0:NB1:I1 Q1:LSLS(UWI):LLS 3240Dg ID MTKR,I:MNKR,1:MQI:ML(ULI):MA(UAI):MP(UPI):MS(UVI):MD(UDI):MH(UCI)D 2981:IH0:3190:E L(100):LPW6 3220E E- KR1:O$"RLATPFMGEV!HQSYDO":3000E\ Ɓ3080:S(1)W1W2:S(2)V2V1:S(3)0:S(4)0E P(1)XAV1:P(2)YAW2:P(3)P(1):P(4)P(2):P(0)P(2)E X0XL:Y0YL:IA0:2800:M0:@152,BL$;:@184,BL$;:@216,BL$;:L0 4190F IA0:(C$)47(C$)58 3320F( I1 17:C$(O$,I,1) 3305F3 恥3310F I 3550,3570,3610,3610,3610,3610,3610,3900,3880,3590,4070,4090,4140,4160,4120,4040,3780F I:3290F TA1 3610F M(C$)48F M1M:N(NPKR):IB0:KF 3340,3380,3360,3400G YAMW13 MW13YA:IB1G 3430GG MM:M1M:YAMW24 MW24YA:IB1GR *3430Gq 4XAMV23 MV23XA:IB1G| >3430G HMM:M1M:XAMV14 MV14XA:IB1G R3430G \NB0 4190G ]4250G fIB0 3510H gXLXAV1:YLYAW2:(NTKRKFQQ)1 3510HC pLKRKFQQ:P(KF)(D1L)P(KF)(D2L) 3445HN q3450H u2720:2400:NB0:IN0:KR(NOL):2950:IB2:M(M)4:KR0 4500H zIB1 3510H V1XB1V2XB49YBW11YBW249 IB3:S(1)W1W2:S(2)V2V1:MM1:3510I KF1 YAW24:3270I- KF3 YAW14:3270IG KF2 XAV14:3270IZ XAV24:3270I 2690:2880:KF1KF3 YAYAM:3520I XAXAMI (V86)0 MM2J ʁ2650:P(1)XAV1:P(3)P(1):P(2)YAW2:P(4)P(2):P(0)P(2):IB3 LRKR:3110:IB0:3290J; XLXAV1:YLYAW2:2910:L0 2850:4250JF Ձ4190Je ށ2690:KFKF1:KF4 KF1Jw 聦2650:3290J 2690:KFKF1:KF1 KF4J 2650:3290J2690:KFKF2:KF1 KFKF4J2650:3290KTA1 @184,BL$"TIRED!";:4190K5IAI2:IN0:KM0:IA 3620,3620,3620,3690,3680Kq$HI0:(XLXM)5(YLYM)5 @184,"TOO FAR ";:4190K.MTM(IA):K0:2830:PPB((U22)9)3(2PCPH)ML3ZA(IA):R(20)K/RP @184,"SWISH! ";:4180L8AKAQ(RP1):@184,"CRUNCH! ";:200,1:AKWM AKWML-BAKMH AKMHLhL(USMQ)2((U10)0IA3)IA4 MPMPAKMH:IN0LsV4180L`I15:KM5:(U14)0 4190LaU14,(U14)1:2380:3700LjI13:(U13)0 4190LkU13,(U13)1:2370MtKF 3710,3740,3720,3750M-~LYYL3:UYYM3:S1:3730MFLYYL3:UYYM3:S1MXXL:YLY UY S:I2(XV1XB):JYBYW2:(CI,JZ,4):(CI,JZ):XX1:Y:3770MLXXL3:UXXM3:S1:3760MLXXL3:UXXM3:S1N#YYL:XLX UX S:I2(XV1XB):JYBYW2:(CI,JZ,4):(CI,JZ):YY1:XNn(XXM)I1 (YYM)I1 @184,"THWUNK! ";:150,1:AK(7)KM:3650N@184,"SSWHT! ";:4190NKKRKFQQ:(NTK)2 3785NŁ4190O ɅP(KF)(D1K)P(KF)(D2K) (P(KF1)S(KF))6 NTK,1:IJ0:KF 3850,3820,3870,3840:3800O+΁4190ORLR(NOK):NSKF1:NS3 NSNS4OwNTLRNSQ,1:NS5:3020:4190OAV2XB2OI13IJ:BYBW2(D2K):L(D2K)(D1K):2530:OAV1XB:3830O BYBW1PI11IJ2:AV1XB(D1K):L2((D2K)(D1K)):2610:P3BYBW22:3860Pj(KKR(KF1)Q:(KNT)3(40)20(U21) 3885P)@152,"NOTHING";:4190P-KNT,2:RF(KF1)1:@152,BL$"A DOOR!";:IJ2:LRKRP.KF 3850,3820,3870,3840:4190Q762981:@152,A$;:4190Wo@(NPKR)0(20)(U21) 2870:4190WA@152,BL$"NOTHING";:4190WTK1:2830W^2850:NB0 4210W_3250:NB0 3290Wh@344,"APPEARS":@312,BL$A$;:2700:3290Xr@216,BL$;:IN0HI0 4470X?|(X0XM)5(Y0YM)5 4350XIIMMAXaIMIM1:IM0 4300XPPAZD(IA):R(20)ML:RP @216,BL$"MISSED";:IMIM1:4240X2350:(20)1(U4) @216,BL$"SHIELDED";:KPS:4270Y@216,BL$"HIT THEE";:K0YV(USMQ)2(20)(U21)2(V81)(V88)0 2300:@216,BL$"A CHILL";YKK(MD(RP))10AA(U16):K0 K0YPCPCK:PC1 I1 1000:I:4580Y‡@56,"WD:"(100PCPHC);:NB0 4240YÁ3290Y̅NB0 3290Ź2730:L2:(4) 4310,4320,4330,4340Z1YMYML:4460ZDXMXML:4460ZWYMYML:4460ZjXMXML:4460Z2730:2880:AXLXM:BYLYM:(A)(B) 4370ZA0 MF2:4380ZMF4:4380ZB0 MF1:4380ZMF3[LMS:MF 4390,4410,4430,4450[&&YMLYL3 YMYL3:4460[9'YMYML:4460[X:XMLXL3 XMXL3:4460[k;XMXML:4460[NYMLYL3 YMYL3:4460[OYMYML:4460[bXMLXL3 XMXL3:4460[cXMXML[l2310:2700[vMP1NB0 4475[w4480\L{2730:2780:EXEX20MLML15:KCKC1:@408,KC;:@152,BL$"VICTORY!";:2650\|M(MNKR):M0 MNKR,M1:M1 3180:@152,"ANOTHER!";:2700\MP1 NB0:@184,BL$;:@216,BL$;:@312,BL$;:@344,BL$;\3290\:"THOU LEAVEST THE DUNJON"]@"EXPERIENCE:"EX:"DOST WISH TO REENTER";C$:(C$,1)"Y" 4515]K4520]WC(U12):KR1:PCPH:XA(V2236):YA(V2237):KF(V2238):TA100:2390:3270]"WISH THOU TO SAVE THE DUNJON";A$:(A$,1)"Y" 4630]D(498)EX:SM0 SM0^ U10,SM^VƉ"ENTER DUNGEON NAME";A$:10003:"SAVING": "O", #1,(A$,8)"/DAT":5^ЀIV97(V97)25005: #1,(I),(I1),(I2),(I3),(I4):^ښ#1:10001:"LEVEL SAVED":4630_:@233,"THOU ART SLAIN!":I1 2500:I::I((16)).7:I 4590,4610,4620,4600_?"THOU ART EATEN":U12,0:4630_k"BENEDIC THE CLERIC FOUND THEE":4510_"LOWENTHAL THE MAGE FOUND THEE":I81 90:VI,0:I:4510_ "OLIAS THE DWARF FOUND THEE":I61 90:VI,0:I` SM0:U10,0:U16,0:U14,0:U6,0:4510`@"LOAD NOW THE INNKEEPER":10010:10003:`' (65535)27 DS$"Y":10001 : :"CAN YOUR COMPUTER HANDLE DOUBLE SPEED (Y/N)";DS$:(DS$,1)"N"(DS$,1)"Y"10000`' (DS$,1)"Y" (65535)27 65497,0 : 65495,0 a'a.' (65535)27 65496,0 : 65494,0a4'aR': ENABLE DRAGON SPEEDKEYao' (65535)180 10008a' (269)(270)1 65283,52:256,116:257,1:258,81:259,126:260,(269): 261,(270):269,1:270,0:65283,53a'b ': DISABLE DRAGON SPEEDKEYb*' (65535)180 10012br' (269)(270)1 65283,52:269,(260):270,(261):65283,53bx'9)(270)1 65283,52:256,116:257,1:258,81:259,126:260,(269): 261,(270):269,1:270,0:65283,53a'b ': DISABLE DFQQ)1 3510HC pLKRKFQQ:P(KF)(D1L)P(KF)(D2L) 3445HN q3450H u2720:2400:NB0:IN0:KR(NOL):2950:IB2:M(M)4:KR0 4500H zIB1 3510H V1XB1V2XB49YBW11YBW249 IB3:S(1)W1W2:S(2)V2V1:MM1:3510I KF1 YAW24:3270I- KF3 YAW14:3270IG KF2 XAV14:3270IZ XAV24:3270I 2690:2880:KF1KF3 YAYAM:3520I XAXAMI (V86)0 MM2J ʁ2650:P(1)XAV1:P(3)P(1):P(2)YAW2:P(4)P(2):P(0)P(2):IB3 LRKR:3110:IB0:3290J; XLXAV1:YLYAW2:2910:L0 2850:4250JF Ձ4190Je ށ2690:KFKF1:KF4 KF1Jw 聦2650:3290J 2690:KFKF1:KF1 KF4J 2650:3290J2690:KFKF2:KF1 KFKF4J2650:3290KTA1 @184,BL$"TIRED!";:4190K5IAI2:IN0:KM0:IA 3620,3620,3620,3690,3680Kq$HI0:(XLXM)5(YLYM)5 @184,"TOO FAR ";:4190K.MTM(IA):K0:2830:PPB((U22)9)3(2PCPH)ML3ZA(IA):R(20)K/RP @184,"SWISH! ";:4180L8AKAQ(RP1):@184,"CRUNCH! ";:200,1:AKWM AKWML-BAKMH AKMHLhL(USMQ)2((U10)0IA3)IA4 MPMPAKMH:IN0LsV4180L`I15:KM5:(U14)0 4190LaU14,(U14)1:2380:3700LjI13:(U13)0 4190LkU13,(U13)1:2370MtKF 3710,3740,3720,3750M-~LYYL3:UYYM3:S1:3730MFLYYL3:UYYM3:S1MXXL:YLY UY S:I2(XV1XB):JYBYW2:(CI,JZ,4):(CI,JZ):XX1:Y:3770MLXXL3:UXXM3:S1:3760MLXXL3:UXXM3:S1N#YYL:XLX UX S:I2(XV1XB):JYBYW2:(CI,JZ,4):(CI,JZ):YY1:XNn(XXM)I1 (YYM)I1 @184,"THWUNK! ";:150,1:AK(7)KM:3650N@184,"SSWHT! ";:4190NKKRKFQQ:(NTK)2 3785NŁ4190O ɅP(KF)(D1K)P(KF)(D2K) (P(KF1)S(KF))6 NTK,1:IJ0:KF 3850,3820,3870,3840:3800O+΁4190ORLR(NOK):NSKF1:NS3 NSNS4OwNTLRNSQ,1:NS5:3020:4190OAV2XB2OI13IJ:BYBW2(D2K):L(D2K)(D1K):2530:OAV1XB:3830O BYBW1PI11IJ2:AV1XB(D1K):L2((D2K)(D1K)):2610:P3BYBW22:3860Pj(KKR(KF1)Q:(KNT)3(40)20(U21) 3885P)@152,"NOTHING";:4190P-KNT,2:RF(KF1)1:@152,BL$"A DOOR!";:IJ2:LRKRP.KF 3850,3820,3870,3840:4190Q762981:@152,A$;:4190Wo@(NPKR)0(20)(U21) 2870:4190WA@152,BL$"NOTHING";:4190WTK1:2830W^2850:NB0 4210W_3250:NB0 3290Wh@344,"APPEARS":@312,BL$A$;:2700:3290Xr@216,BL$;:IN0HI0 4470X?|(X0XM)5(Y0YM)5 4350XIIMMAXaIMIM1:IM0 4300XPPAZD(IA):R(20)ML:RP @216,BL$"MISSED";:IMIM1:4240X2350:(20)1(U4) @216,BL$"SHIELDED";:KPS:4270Y@216,BL$"HIT THEE";:K0YV(USMQ)2(20)(U21)2(V81)(V88)0 2300:@216,BL$"A CHILL";YKK(MD(RP))10AA(U16):K0 K0YPCPCK:PC1 I1 1000:I:4580Y‡@56,"WD:"(100PCPHC);:NB0 4240YÁ3290Y̅NB0 3290Ź2730:L2:(4) 4310,4320,4330,4340Z1YMYML:4460ZDXMXML:4460ZWYMYML:4460ZjXMXML:4460Z2730:2880:AXLXM:BYLYM:(A)(B) 4370ZA0 MF2:4380ZMF4:4380ZB0 MF1:4380ZMF3[LMS:MF 4390,4410,4430,4450[&&YMLYL3 YMYL3:4460[9'YMYML:4460[X:XMLXL3 XMXL3:4460[k;XMXML:4460[NYMLYL3 YMYL3:4460[OYMYML:4460[bXMLXL3 XMXL3:4460[cXMXML[l2310:2700[vMP1NB0 4475[w4480\L{2730:2780:EXEX20MLML15:KCKC1:@408,KC;:@152,BL$"VICTORY!";:2650\|M(MNKR):M0 MNKR,M1:M1 3180:@152,"ANOTHER!";:2700\MP1 NB0:@184,BL$;:@216,BL$;:@312,BL$;:@344,BL$;\3290\:"THOU LEAVEST THE DUNJON"]@"EXPERIENCE:"EX:"DOST WISH TO REENTER";C$:(C$,1)"Y" 4515]K4520]WC(U12):KR1:PCPH:XA(V2236):YA(V2237):KF(V2238):TA100:2390:3270]"WISH THOU TO SAVE THE DUNJON";A$:(A$,1)"Y" 4630]D(498)EX:SM0 SM0^ U10,SM^VƉ"ENTER DUNGEON NAME";A$:10003:"SAVING": "O", #1,(A$,8)"/DAT":5^ЀIV97(V97)25005: #1,(I),(I1),(I2),(I3),(I4):^ښ#1:10001:"LEVEL SAVED":4630_:@233,"THOU ART SLAIN!":I1 2500:I::I((16)).7:I 4590,4610,4620,4600_?"THOU ART EATEN":U12,0:4630_k"BENEDIC THE CLERIC FOUND THEE":4510_"LOWENTHAL THE MAGE FOUND THEE":I81 90:VI,0:I:4510_ "OLIAS THE DWARF FOUND THEE":I61 90:VI,0:I` SM0:U10,0:U16,0:U14,0:U6,0:4510`@"LOAD NOW THE INNKEEPER":10010:10003:`' (65535)27 DS$"Y":10001 : :"CAN YOUR COMPUTER HANDLE DOUBLE SPEED (Y/N)";DS$:DS$"N"DS$"Y"10000`' DS$"Y" (65535)27 65497,0 : 65495,0 `'a' (65535)27 65496,0 : 65494,0a"'a@': ENABLE DRAGON SPEEDKEYa]' (65535)180 10008a' (269)(270)1 65283,52:256,116:257,1:258,81:259,126:260,(269): 261,(270):269,1:270,0:65283,53a'a': DISABLE DRAGON SPEEDKEYb' (65535)180 10012b`' (269)(270)1 65283,52:269,(260):270,(261):65283,53bf'9)(270)1 65283,52:256,116:257,1:258,81:259,126:260,(269): 261,(270):269,1:270,0:65283,53a'a': DISABLE DRAGON SPEEDKEYb'RE ";:GOTO3290 4140 JJ=PEEK(U+21):PRINT@152,BL$;:I=PEEK(NO+KR+Q*KF-Q):MQ=PEEK(MT+I) 4141 IFI=0ORPEEK(MN+I)=0ORRND(1000)>JJ*JJ+PEEK(V-89)*700 THENPRINT@152,"NOTHING";:GOTO4190 4150 GOSUB2981:PRINT@152,A$;:GOTO4190 4160 IFPEEK(NP+KR)>0ANDRND(20)0 GOTO4210 4191 GOSUB3250:IFNB=0 GOTO3290 4200 PRINT@344,"APPEARS":PRINT@312,BL$A$;:GOSUB2700:GOTO3290 4210 PRINT@216,BL$;:IFIN>0ORHI>0 THEN4470 &> :D(500),C,V,R0,R0$:"O", #1,"LEVEL3/DAT":V(D(0))97&fC02240:R0$:R0$"0D"CC1:50&R0("&H"R0$):C18)R0 16)(R059)22)R059&(VC,R059&2:D(500)3'7CV97(V97)25005: #1,(C),(C1),(C2),(C3),(C4)::#1:'<< 3E,68,75,3B,4C,3F,44,3B,42,3B,3B,45,46,3B,48,3B'r> 4A,3E,3B,74,5C,4F,58,5F,64,3B,67,3B,3B,54,3B,59'? 3B,3B,50,57,3B,3B,60,61,3B,3B,3B,65,76,55,3B,3B'@ 6A,3B,6C,6D,3B,6F,3B,71,66,51,3B,53,62,3B,3B,75(A 3B,3B,3F,40,3B,3B,3B,3B,43,4D,45,46,3B,3D,44,4B(JB 4E,3B,3B,51,3B,3B,3B,68,59,48,3B,54,3B,3B,3B,3B(C 5B,5C,3B,3B,57,3B,63,64,3B,62,76,67,3B,69,3B,6B(D 3B,6D,6E,56,3B,3B,3B,52,3B,3B,3B,4C,40,3B,3B,43(E 3B,41,46,47,3B,49,3B,4B,3B,3F,3B,3B,50,5D,74,3B)"d 76,58,68,3B,5E,51,5A,3B,3B,4F,3B,3B,52,61,62,77)Xn 3B,53,66,73,55,3C,3B,6B,3B,6D,6E,3B,70,3B,72,3B)x 3B,4E,3D,67,3B,3B,4C,3B,41,42,3B,3B,47,4D,49,4A) 3B,58,3B,3B,4E,3B,48,4F,3B,3B,52,76,3B,5A,3B,72) 63,3B,57,3B,5F,60,3B,3B,3B,3B,3B,68,65,66,3B,3B*0 6A,56,6C,3B,6E,3B,70,71,3B,3B,56,77,A5,54,3E,69*f 51,3C,3C,3B,3C,3C,3C,3B,3C,0D,3B,3B,3C,3C,3B,3C* 3B,3C,3C,3B,3C,3C,3C,3C,3C,3C,3B,3C,3B,3B,3C,3B* 3C,3B,3B,3C,3C,3B,3B,3C,3C,3B,3B,3B,3C,3C,3C,3B+ 3B,3C,3B,3C,3C,3B,3C,3B,3C,3C,3C,3B,3C,3E,3B,3B+>Ȇ 3C,3B,3B,3C,3C,3B,3B,3B,3B,3C,3C,3C,3C,3B,3C,3C+t҆ 3C,3C,3B,3B,3C,3B,3B,3B,3C,3C,3C,3B,3C,3B,3B,3B+܆ 3B,3C,3C,3B,3B,3C,3B,3C,3C,3B,3C,3C,3C,3B,3C,3B+ 3C,3B,3C,3C,3C,3B,3B,3B,3C,3B,3C,3B,3C,3C,3B,3B, 3C,3B,3C,3C,3C,3B,3C,3B,3C,3B,3C,3B,3B,3C,3C,3C,L 3B,3C,3C,3C,3B,3C,3C,3C,3B,3B,3C,3B,3B,3C,3C,3C, 3E,3B,3C,3C,3C,3C,3C,3B,3C,3B,3C,3C,3B,3C,3B,3C, 3B,3B,3C,3C,3C,3B,3B,3C,3B,3C,3C,3B,3B,3C,3C,3C, 3C,3B,3C,3B,3B,3C,3B,3C,3C,3B,3B,3C,3C,3B,3C,3B-$" 3C,3C,3B,3C,3B,3C,3C,3B,3B,3B,3B,3B,3C,3C,3C,3B-Z, 3B,3C,3C,3C,3B,3C,3B,3C,3C,3B,3B,3B,3B,3B,3B,3C-6 3C,3B,3D,45,3B,4C,42,44,3B,47,3D,3D,44,44,3D,44-@ 3D,42,3D,0D,3D,3D,3D,3D,4D,44,3D,3D,3D,3D,3D,3D-J 3D,42,3D,3D,4C,47,3D,3D,4C,44,3D,3D,3D,44,42,42.2T 3D,3D,42,3D,42,42,3D,44,3D,42,3D,3D,3D,4C,42,3B.h^ 3B,44,3B,3B,42,47,3B,3B,3B,3B,42,47,42,42,3B,45.h 3D,3D,3D,3B,3B,3D,3B,3B,3B,3D,3D,47,3B,4C,3B,3B.r 3B,3B,47,4C,3B,3B,4C,3B,47,45,3B,45,51,47,3B,47/ | 3B,44,3B,45,47,4C,3B,3B,3B,3D,3B,3D,3B,4C,42,3B/@ 3B,47,3B,44,44,44,3B,42,3B,42,3B,3D,3B,3B,3D,3D/v 52,3B,3D,3D,3D,3B,47,42,42,3B,3B,4C,3B,3B,44,42/ 49,3D,3B,4C,44,4C,42,42,3B,42,3B,42,42,3B,44,3B/ 42,3B,3B,3D,45,42,3B,3D,45,3D,42,47,3D,3D,42,470 42,42,3D,47,3D,3D,4C,3D,3D,3D,3D,3D,3D,3D,3D,4C0N 3B,3D,3D,3D,4C,3D,47,4C,3D,3D,3D,3D,3D,45,47,450† 3D,3D,47,4C,47,3D,44,3D,45,47,3D,3D,3D,3D,3D,3D0̆ 44,3D,3D,47,4A,3B,51,47,49,3B,4C,3D,3D,49,49,3D0ֆ 49,3D,47,42,3D,47,42,42,52,49,42,3D,47,0D,3D,3D1& 42,3D,47,3D,3D,51,4C,3D,3D,51,49,3D,3D,3D,49,4C1\ 4C,3D,3D,47,3D,47,47,3D,49,3D,4C,42,47,3D,51,471 3B,3B,49,3B,3B,47,4C,3B,3B,3B,3B,47,51,47,47,3B1 4A,47,42,42,3B,3B,42,3B,3B,3B,42,42,4C,3B,51,3B1 3B,3B,3B,4C,56,3B,3B,51,3B,4C,4A,3B,4A,56,4C,3B24 4C,3B,49,3B,4A,4C,51,3B,3B,3B,42,3B,47,3B,51,472j 3B,3B,4C,3B,49,49,49,3B,47,3B,47,3B,42,3B,3B,422& 42,5C,3B,42,42,47,3B,4C,47,47,3B,3B,51,3B,3B,4920 47,4E,42,3B,51,49,51,4C,4C,3B,47,3B,47,47,3B,493 : 3B,4C,3B,3B,47,4A,4C,3B,3D,4A,3D,47,4C,3D,3D,473BD 51,47,47,3D,4C,3D,3D,51,3D,47,42,3D,3D,42,42,3D3xN 51,3B,42,42,3D,51,3D,4C,56,3D,3D,3D,3D,3D,4A,4C3X 4A,3D,3D,4C,51,4C,3D,49,3D,4A,4C,3D,3D,3D,3D,3D3b 3D,49,42,3D,44,3C,3C,3B,3B,3E,3B,42,3E,40,3B,3B4l 42,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B4Pv 3B,3B,3B,3B,3B,3D,45,0D,3B,42,3B,42,43,44,43,434 3B,3B,44,41,41,3B,3B,41,3D,3B,43,44,43,3B,3C,3B4 3F,3D,3C,3C,3B,3B,3D,3B,3F,3E,3F,3B,3B,3F,3B,3B4 3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B5( 3B,3B,45,3F,3B,3F,3B,3F,3F,3E,3E,3D,3B,3B,3E,3F5^ 3F,3B,3B,3F,3E,3B,3D,3D,3D,3B,3C,3B,3F,3B,3C,3C5 3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3B,3B5 3C,3C,3C,3C,3C,3C,3B,3C,3C,3C,3C,3C,3B,3C,3B,3B6Ɔ 3C,3C,3C,3B,3C,3C,3C,3C,3C,3B,3C,3C,3C,3C,3C,3C66І 3B,3C,3C,3C,3C,3B,3C,3C,3B,3D,47,4E,4C,44,46,4E6lچ 49,3F,3F,46,4E,4C,46,4E,44,3F,3D,3D,49,3F,3F,3F6 3F,3F,3D,3F,44,4E,40,44,3D,4E,3D,3B,4E,49,4E,3D6 4E,3F,4C,46,46,3D,4E,4E,44,49,3F,44,3B,46,4E,477 3F,3D,47,4E,3D,3D,4E,46,51,4E,53,49,4E,4A,44,4E7D 44,4A,53,44,4E,4E,3D,3D,3F,3F,3F,3F,4E,4E,3D,3F7z 3F,49,4E,4E,3D,3F,3D,3B,49,50,4E,3D,4E,47,47,4E7 62,0D,3D,53,49,4E,49,47,4E,3B,4E,49,4E,4E,3D,467 3F,3D,4F,3B,3B,42,46,47,43,43,48,4C,46,45,46,438* 42,42,4F,4F,4F,4F,3B,3B,4F,3B,3B,4F,4F,3B,44,3B8R4 46,3F,4F,4B,4D,3C,4F,4F,4F,3C,3B,3D,3D,4F,3B,4F8> 3B,4F,4F,4F,3E,4A,4F,40,3B,3D,4F,49,3B,4E,40,3D8H 3D,3F,4E,3F,3F,4E,5D,3D,4E,3F,4E,3F,3F,4E,40,478R 40,48,3D,3D,40,3D,3D,42,4E,3D,3F,3D,4E,4E,5A,3F9*\ 4E,4E,42,64,50,4E,3D,3F,3F,53,3D,50,3D,54,42,4B9`f 3F,4E,42,3F,3D,4E,45,3F,3D,58,4F,3D,3D,53,3F,3F9p 3F,3F,3F,5B,3F,3F,3F,3F,4E,3F,4D,40,4A,40,3D,3D9z 40,3D,3D,4C,40,3D,49,3D,3F,3F,64,3F,3F,4E,64,42: 50,3F,3D,4E,3F,4C,3D,42,3D,42,55,49,3F,53,42,4E:8 3D,3F,47,3F,3D,3F,7D,A8,92,92,92,7C,7C,7C,7C,66:n 66,66,50,50,50,50,A1,66,44,B3,B3,AF,8E,87,BA,7D: 51,8E,BA,A4,A4,A4,A4,A4,8E,8E,93,89,8E,78,78,62: 62,78,78,62,62,62,51,51,51,3B,3B,0D,3B,3B,71,44; A8,78,89,3B,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C;F 3C,3C,3C,3C,3C,3C,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B;|ʆ 3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B;Ԇ 3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3C,3C,3B,3B,8B;ކ 3E,AA,AA,AA,94,94,94,A3,7E,7E,7E,68,68,68,68,AA< 7E,52,46,3C,52,B1,90,43,8B,7A,A6,52,3C,3C,3C,46B 86,70,3D,7D,44,A9,93,44,A9,93,44,A9,93,7D,5A,3D>:L 70,44,67,3B,3C,0D,3C,3C,3B,3C,3B,3B,3C,3C,3B,3B>pV 3C,3C,3B,3B,3C,3C,3B,3B,3B,3C,3C,3C,3C,3B,3B,3C>` 3C,3C,3C,3C,3C,3B,3C,3C,3C,3B,3B,3C,3C,3C,3C,3C>j 3B,3C,3B,3B,3C,3B,3B,3C,3B,3B,3B,3C,3C,3C,3C,3B?t 3B,42,58,A7,91,A7,91,7B,42,A7,91,7B,42,A7,91,7B?H~ 42,4C,8A,8A,7B,3B,3B,42,58,7B,74,7D,42,6E,58,42?~ 91,65,58,42,91,7B,65,6E,58,6E,58,91,65,A7,91,7B? A7,91,7B,A7,91,7B,65,42,A7,58,3B,45,3B,3C,3C,3B? 3B,3B,3B,3B,3C,3B,3B,3B,3C,3B,3B,3B,3C,3C,3B,3B@  3B,3C,3C,3C,3C,3B,3B,3C,3C,3C,3C,3C,3B,3B,3C,3C@V 3B,3B,3B,3C,3C,3C,3C,3B,3B,3B,3B,3B,3B,3B,3B,3B@ 3B,3B,3B,3C,3B,3C,3C,3B,3B,3B,3B,3B,3B,3B,3B,3B@Ć 3B,3B,43,3B,3B,3B,3B,3B,3B,3B,3B,3B,4A,3B,3B,3B@Ά 3B,3B,3B,3B,3B,3B,43,3B,3B,3B,3B,3B,3B,3B,3B,3BA.؆ 3C,3C,3C,3D,3D,3B,3C,3C,3C,3C,3C,3C,3C,40,3E,3CAd 3D,79,40,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,0DA 3B,3B,3B,3B,3B,3B,3B,3B,3B,3D,3D,3E,3E,3D,3D,3CA 3C,3D,3E,45,4F,3F,3C,3C,3C,3E,3C,3C,3C,3C,3C,3BB 4F,44,44,48,48,44,44,40,3F,44,4A,68,3B,3B,3C,3BB< 3D,3C,3C,3C,3B,3B,3B,3B,3B,44,41,42,3D,41,42,42Br 41,46,4D,4A,3B,3F,3D,3C,3D,3D,3B,3B,3F,40,3D,3BB 3B,3E,3C,3D,3D,3D,3D,3D,3D,3D,3E,3B,3B,3B,3B,3BB( 3B,3B,3B,3B,3E,3C,3C,3B,3B,3B,3B,4A,3B,40,4A,4AC2 54,54,3B,3B,3B,40,47,40,42,40,3E,40,40,40,40,3BCJ< 3B,45,7E,8D,8D,89,5B,7E,8D,92,87,8D,46,91,7C,88CF 8B,84,8D,80,5B,7D,7C,8F,42,82,89,8F,5B,8D,7C,8FCP 40,92,84,82,83,8F,40,82,83,8A,90,87,41,95,8A,88CZ 7D,84,80,43,8E,86,80,87,80,8F,8A,89,42,7C,89,8FD"d 5B,88,7C,89,42,7C,89,8F,5B,88,7C,89,47,82,84,7CDXn 89,8F,5B,8E,8B,84,7F,80,8D,43,8D,8A,7E,86,81,7CDx 87,87,3B,C8,3B,9F,87,3B,86,3C,97,CF,97,3B,86,D1D 97,59,58,54,83,40,3C,3B,4D,0D**CZ 7D,84,80,43,8E,86,80,87,80,8F,8A,89,42,7C,89,8FD"d 5B,88,7C,89,, 2, 12 7, 2, 2, 7, 2 2, 19, 2, 2, 2 2, 0, 12, 29, 12 2, 9, 2, 12, 0 0, 0, 0, 0, 0 0, 1, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 2, 3, 0, 4 4, 0, 4, 4, 4 4, 4, 4, 4, 4 4, 4, 4, 4, 5 11, 0, 0, 0, 0 0, 0, 7, 0, 0 0, 0, 0, 0, 0 0, 3, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 2, 2, 0, 1 1, 0, 2, 3, 2 1, 1, 1, 1, 3 2, 1, 1, 1, 2 3, 0, 0, 0, 0 0, 0, 3, 0, 0 0, 0, 0, 0, 0 0, 0, 1, 0, 0 0, 0, 0, 0, 0 0, 0, 2, 4, 0 0, 0, 0, 0, 0 0, 4, 0, 0, 0 0, 0, 0, 0, 5 5, 0, 0, 0, 0 5, 5, 0, 5, 0 0, 5, 0, 0, 0 0, 0, 0, 6, 0 0, 7, 7, 0, 0 0, 0, 0, 2, 2 2, 2, 12, 0, 2 2, 2, 2, 2, 2 2, 2, 9, 9, 2 2, 2, 2, 2, 2 2, 19, 2, 2, 2 2, 2, 2, 2, 4 4, 2, 2, 2, 0 4, 4, 2, 4, 2 0, 4, 2, 2, 2 2, 2, 2, 4, 2 2, 17, 4, 2, 0 0, 0, 0, 2, 2 2, 2, 4, 0, 2 2, 2, 2, 2, 2 2, 2, 9, 8, 2 2, 2, 2, 2, 2 2, 7, 2, 2, 2 2, 2, 2, 2, 4 4, 2, 2, 2, 0 4, 17, 2, 4, 2 0, 16, 2, 2, 2 2, 2, 2, 4, 2 2, 4, 4, 2, 0 0, 0, 0, 20, 20 20, 20, 20, 20, 1 20, 0, 2, 20, 20 3, 20, 4, 0, 20 20, 0, 5, 6, 6 5, 20, 7, 7, 20 20, 8, 9, 20, 0 0, 0, 10, 11, 10 0, 0, 12, 0, 13 10, 0, 12, 12, 14 15, 0, 20, 16, 20 20, 17, 18, 0, 0 0, 0, 0, 10, 13 8, 6, 12, 7, 12 9, 2, 4, 2, 6 19, 27, 9, 2, 6 9, 2, 4, 4, 19 19, 7, 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 1, 3, 0 8, 5, 0, 0, 4 11, 0, 0, 14, 0 0, 15, 0, 0, 23 20, 0, 0, 18, 17 0, 25, 0, 24, 56 27, 0, 0, 28, 0 34, 36, 0, 0, 0 32, 38, 39, 42, 0 41, 45, 0, 44, 31 50, 51, 0, 0, 0 0, 53, 52, 0, 0 0, 0, 0, 0, 3 4, 6, 0, 0, 0 54, 8, 9, 12, 13 21, 19, 0, 11, 56 17, 18, 0, 0, 0 0, 0, 0, 0, 0 29, 0, 38, 30, 33 37, 0, 32, 0, 0 0, 41, 0, 44, 0 0, 0, 0, 0, 0 0, 31, 28, 50, 51 52, 0, 0, 24, 0 0, 0, 0, 0, 0 1, 7, 4, 0, 0 3, 0, 0, 8, 0 0, 11, 14, 0, 22 21, 0, 18, 0, 0 17, 26, 24, 0, 28 31, 0, 0, 47, 38 0, 33, 0, 34, 0 39, 40, 0, 43, 41 0, 46, 44, 0, 0 0, 0, 48, 49, 55 54, 0, 0, 27, 0 0, 0, 0, 0, 0 2, 3, 0, 4, 0 9, 10, 0, 16, 11 12, 0, 0, 0, 18 19, 14, 0, 13, 0 0, 56, 0, 0, 0 50, 28, 31, 49, 35 32, 0, 0, 0, 33 30, 0, 0, 39, 0 0, 41, 0, 0, 0 0, 0, 51, 52, 53 0, 8, 0, 17, 0 0, 0, 0, 1, 0 1, 1, 0, 0, 1 1, 0, 0, 1, 0 0, 1, 0, 0, 1 1, 0, 0, 1, 1 0, 1, 0, 1, 3 1, 0, 0, 1, 0 1, 1, 0, 0, 0 1, 1, 1, 1, 0 1, 1, 0, 1, 1 1, 1, 0, 0, 0 0, 3, 3, 0, 0 0, 0, 0, 0, 1 3, 1, 0, 0, 0 3, 2, 1, 3, 1 3, 1, 0, 1, 1 1, 1, 0, 0, 0 0, 0, 0, 0, 0 1, 0, 1, 1, 1 1, 0, 1, 0, 0 0, 1, 0, 1, 0 0, 0, 0, 0, 0 0, 1, 1, 1, 1 1, 0, 0, 1, 0 0, 0, 0, 0, 0 1, 1, 1, 0, 0 1, 0, 0, 1, 0 0, 1, 1, 0, 1 1, 0, 1, 0, 0 1, 1, 1, 0, 1 1, 0, 0, 1, 1 0, 1, 0, 1, 0 1, 1, 0, 1, 1 0, 1, 1, 0, 0 0, 0, 1, 1, 3 3, 0, 0, 3, 0 0, 0, 0, 2, 0 1, 3, 0, 1, 0 3, 1, 0, 1, 3 1, 0, 0, 0, 1 1, 1, 0, 3, 0 0, 1, 0, 0, 0 1, 1, 1, 1, 1 1, 0, 0, 0, 1 1, 0, 0, 1, 0 0, 1, 0, 0, 0 0, 0, 1, 1, 1 0, 3, 0, 1, 0 0, 0, 0, 34, 0 2, 22, 0, 0, 2 2, 0, 0, 2, 0 0, 2, 0, 0, 2 2, 2, 2, 12, 2 2, 2, 2, 2, 4 2, 2, 2, 29, 2 7, 2, 2, 2, 2 24, 2, 7, 12, 2 7, 2, 2, 7, 7 10, 2, 0, 2, 2 2, 9, 7, 2, 0 0, 0, 0, 0, 2 35, 2, 27, 0, 0 4, 4, 7, 15, 2 8, 2, 0, 2, 11 11, 2, 0, 0, 0 0, 0, 0, 0, 0 26, 0, 7, 2, 15 2, 0, 7, 0, 0 0, 12, 0, 2, 0 4, 0, 0, 0, 0 0, 2, 2, 9, 2 12, 0, 0, 2, 0 0, 0, 0, 47, 21 2, 22, 2, 0, 0 2, 0, 0, 2, 0 0, 2, 2, 0, 2 2, 0, 12, 0, 0 2, 2, 2, 0, 2 2, 0, 0, 5, 2 0, 2, 0, 7, 0 36, 2, 0, 12, 7 0, 2, 7, 0, 0 0, 0, 11, 7, 29 9, 0, 0, 34, 0 0, 0, 0, 5, 0 2, 4, 0, 7, 0 24, 2, 0, 19, 5 7, 0, 0, 0, 11 11, 2, 2, 13, 2 2, 2, 2, 2, 2 24, 2, 7, 2, 15 2, 2, 2, 2, 7 2, 2, 2, 2, 2 2, 14, 2, 2, 2 2, 0, 2, 19, 2 2, 4, 2, 2, 0 0, 0, 0, 44, 0 12, 42, 0, 0, 22 12, 0, 0, 12, 0 0, 17, 0, 0, 12 12, 2, 2, 22, 12 2, 22, 2, 22, 9 12, 2, 2, 39, 2 12, 7, 2, 2, 2 29, 7, 12, 17, 2 12, 7, 2, 12, 12 16, 7, 0, 2, 2 2, 14, 12, 2, 0 0, 0, 0, 0, 34 40, 12, 27, 0, 0 9, 9, 17, 20, 12 13, 12, 0, 15, 21 21, 12, 0, 0, 0 0, 0, 0, 0, 0 36, 0, 12, 7, 20 7, 0, 12, 0, 0 0, 17, 0, 7, 0 0, 0, 0, 0, 0 0, 7, 12, 19, 12 22, 0, 0, 12, 0 0, 0, 0, 47, 21 12, 42, 22, 0, 0 12, 0, 0, 12, 0 0, 12, 17, 0, 12 12, 0, 22, 0, 0 12, 22, 22, 0, 12 12, 0, 0, 10, 7 0, 7, 0, 12, 0 41, 7, 0, 17, 12 0, 7, 12, 0, 0 0, 0, 17, 12, 34 14, 0, 0, 39, 0 0, 0, 0, 10, 0 34, 9, 0, 17, 0 29, 12, 0, 32, 10 17, 0, 0, 0, 21 21, 12, 2, 18, 2 2, 12, 2, 2, 2 34, 12, 12, 7, 20 7, 2, 2, 2, 12 7, 2, 2, 7, 2 2, 19, 2, 2, 2 2, 0, 12, 29, 12 2, 9, 2, 12, 0 0, 0, 0, 0, 0 0, 1, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 2, 3, 0, 4 4, 0, 4, 4, 4 4, 4, 4, 4, 4 4, 4, 4, 4, 5 11, 0, 0, 0, 0 0, 0, 7, 0, 0 0, 0, 0, 0, 0 0, 3, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 2, 2, 0, 1 1, 0, 2, 3, 2 1, 1, 1, 1, 3 2, 1, 1, 1, 2 3, 0, 0, 0, 0 0, 0, 3, 0, 0 0, 0, 0, 0, 0 0, 0, 1, 0, 0 0, 0, 0, 0, 0 0, 0, 2, 4, 0 0, 0, 0, 0, 0 0, 4, 0, 0, 0 0, 0, 0, 0, 5 5, 0, 0, 0, 0 5, 5, 0, 5, 0 0, 5, 0, 0, 0 0, 0, 0, 6, 0 0, 7, 7, 0, 0 0, 0, 0, 2, 2 2, 2, 12, 0, 2 2, 2, 2, 2, 2 2, 2, 9, 9, 2 2, 2, 2, 2, 2 2, 19, 2, 2, 2 2, 2, 2, 2, 4 4, 2, 2, 2, 0 4, 4, 2, 4, 2 0, 4, 2, 2, 2 2, 2, 2, 4, 2 2, 17, 4, 2, 0 0, 0, 0, 2, 2 2, 2, 4, 0, 2 2, 2, 2, 2, 2 2, 2, 9, 8, 2 2, 2, 2, 2, 2 2, 7, 2, 2, 2 2, 2, 2, 2, 4 4, 2, 2, 2, 0 4, 17, 2, 4, 2 0, 16, 2, 2, 2 2, 2, 2, 4, 2 2, 4, 4, 2, 0 0, 0, 0, 20, 20 20, 20, 20, 20, 1 20, 0, 2, 20, 20 3, 20, 4, 0, 20 20, 0, 5, 6, 6 5, 20, 7, 7, 20 20, 8, 9, 20, 0 0, 0, 10, 11, 10 0, 0, 12, 0, 13 10, 0, 12, 12, 14 15, 0, 20, 16, 20 20, 17, 18, 0, 0 0, 0, 0, 10, 13 8, 6, 12, 7, 12 9, 2, 4, 2, 6 19, 27, 9, 2, 6 9, 2, 4, 4, 19 19, 7, 19, 19, 9 8, 19, 9, 23, 2 2, 2, 4, 9, 14 2, 2, 9, 2, 9 9, 2, 9, 9, 9 19, 2, 13, 4, 14 2, 17, 4, 2, 0 0, 0, 0, 10, 5 25, 6, 4, 10, 19 22, 2, 4, 22, 6 4, 10, 9, 2, 27 9, 2, 19, 4, 4 19, 20, 4, 19, 7 30, 19, 9, 4, 2 2, 2, 9, 14, 9 2, 2, 4, 2, 15 4, 2, 14, 4, 4 9, 2, 10, 4, 22 19, 4, 4, 2, 0 0, 0, 0, 3, 13 35, 47, 67, 89, 67 35, 23, 1, 35, 47 59, 35, 35, 23, 103 91, 77, 81, 81, 103 103, 29, 29, 29, 17 17, 29, 29, 118, 68 75, 80, 51, 75, 97 46, 80, 75, 87, 92 92, 119, 114, 114, 116 118, 111, 118, 106, 67 47, 47, 89, 115, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 1, 1, 1, 1 1, 1, 1, 0, 1 1, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 1, 1, 1, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 49, 37 49, 91, 91, 113, 91 49, 37, 25, 49, 61 83, 79, 54, 37, 117 105, 93, 105, 105, 127 127, 53, 53, 53, 31 31, 53, 48, 31, 77 99, 89, 70, 94, 116 89, 89, 94, 121, 111 111, 0, 5, 5, 12 19, 120, 19, 120, 108 69, 69, 108, 31, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 2, 2, 2, 1 1, 0, 1, 0, 0 0, 0, 0, 1, 0 0, 0, 0, 16, 50 59, 59, 81, 64, 47 93, 91, 96, 125, 115 120, 9, 25, 125, 20 20, 9, 42, 116, 116 42, 9, 31, 125, 125 91, 93, 54, 49, 69 69, 81, 74, 98, 74 49, 42, 22, 39, 57 32, 51, 68, 20, 42 71, 64, 83, 93, 93 93, 71, 81, 9, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 1, 1, 0, 1 1, 1, 1, 0, 0 1, 1, 1, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 1, 0 0, 0, 0, 2, 14 14, 45, 57, 40, 23 57, 77, 72, 91, 101 96, 123, 7, 108, 114 114, 123, 18, 91, 91 18, 123, 7, 101, 89 47, 69, 35, 40, 47 60, 67, 55, 79, 55 40, 20, 3, 30, 37 13, 18, 49, 1, 18 47, 40, 69, 62, 79 69, 57, 62, 123, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 1, 0, 0 0, 0, 1, 0, 0 1, 0, 1, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 4, 0, 0, 6 0, 0, 0, 8, 9 6, 0, 2, 3, 0 0, 0, 0, 99, 90 75, 15, 80, 70, 99 0, 0, 0, 1, 2 3, 4, 5, 6, 4 0, 0, 0, 1, 10 10, 6, 10, 10, 10 9, 3, 1, 1, 1 1, 1, 3, 0, 31 13, 0, 0, 1, 0 0, 6, 0, 0, 0 0, 4, 0, 0, 0 0, 4, 3, 5, 0 0, 0, 0, 1, 2 1, 2, 1, 1, 1 1, 1, 1, 1, 20 1, 1, 1, 1, 1 6, 5, 1, 1, 1 1, 20, 4, 9, 5 9, 4, 1, 1, 4 3, 4, 6, 20, 0 0, 0, 0, 0, 0 0, 0, 1, 0, 0 20, 5, 5, 5, 7 8, 7, 9, 4, 5 5, 7, 20, 1, 1 3, 4, 3, 1, 1 1, 0, 3, 3, 20 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 20, 0, 0, 0 0, 0, 4, 0, 0 0, 3, 0, 20, 20 0, 0, 0, 2, 0 0, 30, 20, 28, 0 20, 11, 3, 7, 5 5, 3, 3, 5, 4 5, 4, 20, 8, 77 79, 83, 81, 85, 73 84, 79, 9, 71, 78 84, 32, 76, 69, 69 67, 72, 10, 71, 73 65, 78, 84, 32, 84 73, 67, 75, 9, 71 73, 65, 78, 84, 32 65, 78, 84, 11, 70 73, 82, 69, 32, 66 69, 69, 84, 76, 69 9, 67, 69, 78, 84 73, 80, 69, 68, 69 6, 83, 80, 73, 68 69, 82, 9, 83, 87 65, 77, 80, 32, 82 65, 84, 8, 83, 75 69, 76, 69, 84, 79 78, 7, 65, 78, 84 32, 77, 65, 78, 15 71, 78, 84, 32, 66 79, 77, 66, 32, 66 69, 69, 84, 76, 69 0, 20, 20, 13, 11 2, 20, 2, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 129, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0,98)=EX 460 WC=5+WW(PEEK(KB+17))+W(AA)+SW(INT(PEEK(KB)/2))+1+(RS+RM)/10 470 POKEKB+13,RS:POKEKB+14,RM:POKEKB+12,WC:POKEKB+20,CH(1) 480 POKEKB+10,SM 490 POKEKB,PS 500 POKEKB+8,AA:IFPEEK(KB-12)=123 GOTO540 510 J=LEN(NM$):IFJ>11 THENJ=11 520 FORI=1 TOJ:POKEKB-12+I,ASC(MID$(NM$,I,1)):NEXTI 530 IFJ<11 THENFORI=J+1 TO11:POKEKB-12+I,ASC(" "):NEXTI 540 GOSUB1790 550 POKEKB-12,123 560 INPUT"ENTER DUNGEON NAME";A$:OPEN "O", #1,LEFT$(A$,8)+"/DAT":GOSUB5:PRINT"SAVING" 570 FORI=KA-97TO(KA-97)+2500STEP5:WRITE #1,PEEK(I),PEEK(I+1),PEEK(I+2),PEEK(I+3),PEEK(I+4):NEXT 580 CLOSE#1 690 PRINT"NOW RUN DUNJONMASTER":END 700 INPUT"ENTER DUNGEON NAME";A$:OPEN "I", #1,LEFT$(A$,8)+"/DAT":GOSUB5:PRINT"LOADING" 710 FORI=KA-97TO(KA-97)+2500STEP5:INPUT #1,CC,C1,C2,C3,C4:PO 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 3, 45, 58 0, 17, 4, 9, 0 7, 0, 0, 10, 11 0, 13, 0, 15, 3 0, 57, 33, 20, 29 36, 41, 0, 44, 0 0, 25, 0, 30, 0 0, 21, 28, 0, 0 37, 38, 0, 0, 0 42, 59, 26, 0, 0 47, 0, 49, 50, 0 52, 0, 54, 43, 22 0, 24, 39, 0, 0 58, 0, 0, 4, 5 0, 0, 0, 0, 8 18, 10, 11, 0, 2 9, 16, 19, 0, 0 22, 0, 0, 0, 45 30, 13, 0, 25, 0 0, 0, 0, 32, 33 0, 0, 28, 0, 40 41, 0, 39, 59, 44 0, 46, 0, 48, 0 50, 51, 27, 0, 0 0, 23, 0, 0, 0 17, 5, 0, 0, 8 0, 6, 11, 12, 0 14, 0, 16, 0, 4 0, 0, 21, 34, 57 0, 59, 29, 45, 0 35, 22, 31, 0, 0 20, 0, 0, 23, 38 39, 60, 0, 24, 43 56, 26, 1, 0, 48 0, 50, 51, 0, 53 0, 55, 0, 0, 19 2, 44, 0, 0, 17 0, 6, 7, 0, 0 12, 18, 14, 15, 0 29, 0, 0, 19, 0 13, 20, 0, 0, 23 59, 0, 31, 0, 55 40, 0, 28, 0, 36 37, 0, 0, 0, 0 0, 45, 42, 43, 0 0, 47, 27, 49, 0 51, 0, 53, 54, 0 0, 27, 60, 106, 25 3, 46, 22, 1, 1 0, 1, 1, 1, 0 1, 0, 0, 1, 1 0, 1, 0, 1, 1 0, 1, 1, 1, 1 1, 1, 0, 1, 0 0, 1, 0, 1, 0 0, 1, 1, 0, 0 1, 1, 0, 0, 0 1, 1, 1, 0, 0 1, 0, 1, 1, 0 1, 0, 1, 1, 1 0, 1, 3, 0, 0 1, 0, 0, 1, 1 0, 0, 0, 0, 1 1, 1, 1, 0, 1 1, 1, 1, 0, 0 1, 0, 0, 0, 1 1, 1, 0, 1, 0 0, 0, 0, 1, 1 0, 0, 1, 0, 1 1, 0, 1, 1, 1 0, 1, 0, 1, 0 1, 1, 1, 0, 0 0, 1, 0, 1, 0 1, 1, 0, 0, 1 0, 1, 1, 1, 0 1, 0, 1, 0, 1 0, 0, 1, 1, 1 0, 1, 1, 1, 0 1, 1, 1, 0, 0 1, 0, 0, 1, 1 1, 3, 0, 1, 1 1, 1, 1, 0, 1 0, 1, 1, 0, 1 0, 1, 0, 0, 1 1, 1, 0, 0, 1 0, 1, 1, 0, 0 1, 1, 1, 1, 0 1, 0, 0, 1, 0 1, 1, 0, 0, 1 1, 0, 1, 0, 1 1, 0, 1, 0, 1 1, 0, 0, 0, 0 0, 1, 1, 1, 0 0, 1, 1, 1, 0 1, 0, 1, 1, 0 0, 0, 0, 0, 0 1, 1, 0, 2, 10 0, 17, 7, 9, 0 12, 2, 2, 9, 9 2, 9, 2, 7, 2 2, 2, 2, 2, 18 9, 2, 2, 2, 2 2, 2, 2, 7, 2 2, 17, 12, 2, 2 17, 9, 2, 2, 2 9, 7, 7, 2, 2 7, 2, 7, 7, 2 9, 2, 7, 2, 2 2, 17, 7, 0, 0 9, 0, 0, 7, 12 0, 0, 0, 0, 7 12, 7, 7, 0, 10 2, 2, 2, 0, 0 2, 0, 0, 0, 2 2, 12, 0, 17, 0 0, 0, 0, 12, 17 0, 0, 17, 0, 12 10, 0, 10, 22, 12 0, 12, 0, 9, 0 10, 12, 17, 0, 0 0, 2, 0, 2, 0 17, 7, 0, 0, 12 0, 9, 9, 9, 0 7, 0, 7, 0, 2 0, 0, 2, 2, 23 0, 2, 2, 2, 0 12, 7, 7, 0, 0 17, 0, 0, 9, 7 14, 2, 0, 17, 9 17, 7, 7, 0, 7 0, 7, 7, 0, 9 0, 7, 0, 0, 2 10, 7, 0, 2, 10 2, 7, 12, 2, 2 7, 12, 7, 7, 2 12, 2, 2, 17, 2 2, 2, 2, 2, 2 2, 2, 17, 0, 2 2, 2, 17, 2, 12 17, 2, 2, 2, 2 2, 10, 12, 10, 2 2, 12, 17, 12, 2 9, 2, 10, 12, 2 2, 2, 2, 2, 2 9, 2, 2, 12, 15 0, 22, 12, 14, 0 17, 2, 2, 14, 14 2, 14, 2, 12, 7 2, 12, 7, 7, 23 14, 7, 2, 12, 2 2, 7, 2, 12, 2 2, 22, 17, 2, 2 22, 14, 2, 2, 2 14, 17, 17, 2, 2 12, 2, 12, 12, 2 14, 2, 17, 7, 12 2, 22, 12, 0, 0 14, 0, 0, 12, 17 0, 0, 0, 0, 12 22, 12, 12, 0, 15 12, 7, 7, 0, 0 7, 0, 0, 0, 7 7, 17, 0, 22, 0 0, 0, 0, 17, 27 0, 0, 22, 0, 17 15, 0, 15, 27, 17 0, 17, 0, 14, 0 15, 17, 22, 0, 0 0, 7, 0, 12, 0 22, 12, 0, 0, 17 0, 14, 14, 14, 0 12, 0, 12, 0, 7 0, 0, 7, 7, 33 0, 7, 7, 12, 0 17, 12, 12, 0, 0 22, 0, 0, 14, 12 19, 7, 0, 22, 14 22, 17, 17, 0, 12 0, 12, 12, 0, 14 0, 17, 0, 0, 12 15, 17, 0, 2, 15 2, 12, 17, 2, 2 12, 22, 12, 12, 2 17, 2, 2, 22, 2 12, 7, 2, 2, 7 7, 2, 22, 0, 7 7, 2, 22, 2, 17 27, 2, 2, 2, 2 2, 15, 17, 15, 2 2, 17, 22, 17, 2 14, 2, 15, 17, 2 2, 2, 2, 2, 2 14, 7, 2, 9, 1 1, 0, 0, 3, 0 7, 3, 5, 0, 0 7, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 2, 10, 0, 7 0, 7, 8, 9, 8 8, 0, 0, 9, 6 6, 0, 0, 6, 2 0, 8, 9, 8, 0 1, 0, 4, 2, 1 1, 0, 0, 2, 0 4, 3, 4, 0, 0 4, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 10, 4, 0, 4 0, 4, 4, 3, 3 2, 0, 0, 3, 4 4, 0, 0, 4, 3 0, 2, 2, 2, 0 1, 0, 4, 0, 1 1, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 1, 1, 1, 1 0, 0, 1, 1, 1 1, 1, 1, 0, 1 1, 1, 1, 1, 0 1, 0, 0, 1, 1 1, 0, 1, 1, 1 1, 1, 0, 1, 1 1, 1, 1, 1, 0 1, 1, 1, 1, 0 1, 1, 0, 2, 12 19, 17, 9, 11, 19 14, 4, 4, 11, 19 17, 11, 19, 9, 4 2, 2, 14, 4, 4 4, 4, 4, 2, 4 9, 19, 5, 9, 2 19, 2, 0, 19, 14 19, 2, 19, 4, 17 11, 11, 2, 19, 19 9, 14, 4, 9, 0 11, 19, 12, 4, 2 12, 19, 2, 2, 19 11, 22, 19, 24, 14 19, 15, 9, 19, 9 15, 24, 9, 19, 19 2, 2, 4, 4, 4 4, 19, 19, 2, 4 4, 14, 19, 19, 2 4, 2, 0, 14, 21 19, 2, 19, 12, 12 19, 39, 2, 24, 14 19, 14, 12, 19, 0 19, 14, 19, 19, 2 11, 4, 2, 20, 0 0, 7, 11, 12, 8 8, 13, 17, 11, 10 11, 8, 7, 7, 20 20, 20, 20, 0, 0 20, 0, 0, 20, 20 0, 9, 0, 11, 4 20, 16, 18, 1, 20 20, 20, 1, 0, 2 2, 20, 0, 20, 0 20, 20, 20, 3, 15 20, 5, 0, 2, 20 14, 0, 19, 5, 2 2, 4, 19, 4, 4 19, 34, 2, 19, 4 19, 4, 4, 19, 5 12, 5, 13, 2, 2 5, 2, 2, 7, 19 2, 4, 2, 19, 19 31, 4, 19, 19, 7 41, 21, 19, 2, 4 4, 24, 2, 21, 2 25, 7, 16, 4, 19 7, 4, 2, 19, 10 4, 2, 29, 20, 2 2, 24, 4, 4, 4 4, 4, 32, 4, 4 4, 4, 19, 4, 18 5, 15, 5, 2, 2 5, 2, 2, 17, 5 2, 14, 2, 4, 4 41, 4, 4, 19, 41 7, 21, 4, 2, 19 4, 17, 2, 7, 2 7, 26, 14, 4, 24 7, 19, 2, 4, 12 4, 2, 4, 66, 109 87, 87, 87, 65, 65 65, 65, 43, 43, 43 21, 21, 21, 21, 102 43, 9, 120, 120, 116 83, 76, 127, 66, 22 83, 127, 105, 105, 105 105, 105, 83, 83, 88 78, 83, 61, 61, 39 39, 61, 61, 39, 39 39, 22, 22, 22, 0 0, 0, 0, 54, 9 109, 61, 78, 0, 1 1, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 1, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 1 1, 0, 0, 80, 3 111, 111, 111, 89, 89 89, 104, 67, 67, 67 45, 45, 45, 45, 111 67, 23, 11, 1, 23 118, 85, 8, 80, 63 107, 23, 1, 1, 1 11, 1, 107, 107, 107 122, 107, 85, 85, 63 63, 90, 85, 63, 63 68, 41, 41, 41, 24 24, 24, 24, 78, 23 3, 85, 112, 0, 2 1, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 1, 1, 1, 1 0, 0, 1, 0, 0 0, 1, 1, 1, 1 1, 1, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 1 2, 0, 0, 44, 31 53, 9, 110, 9, 110 88, 31, 19, 110, 88 31, 9, 110, 88, 31 31, 110, 88, 81, 9 9, 31, 53, 88, 66 75, 31, 75, 53, 31 2, 66, 68, 31, 2 88, 66, 75, 53, 75 53, 2, 66, 9, 110 88, 9, 110, 88, 9 110, 88, 66, 31, 2 53, 9, 44, 0, 1 1, 1, 0, 1, 0 0, 1, 1, 0, 0 1, 1, 0, 0, 1 1, 0, 0, 0, 1 1, 1, 1, 0, 0 1, 1, 1, 1, 1 1, 0, 1, 1, 1 0, 0, 1, 1, 1 1, 1, 0, 1, 0 0, 1, 0, 0, 1 0, 0, 0, 1, 1 1, 1, 0, 0, 7 29, 108, 86, 108, 86 64, 7, 108, 86, 64 7, 108, 86, 64, 7 17, 79, 79, 64, 0 0, 7, 29, 64, 57 66, 7, 51, 29, 7 86, 42, 29, 7, 86 64, 42, 51, 29, 51 29, 86, 42, 108, 86 64, 108, 86, 64, 108 86, 64, 42, 7, 108 29, 0, 10, 0, 1 1, 0, 0, 0, 0 0, 1, 0, 0, 0 1, 0, 0, 0, 1 1, 0, 0, 0, 1 1, 1, 1, 0, 0 1, 1, 1, 1, 1 0, 0, 1, 1, 0 0, 0, 1, 1, 1 1, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 1, 0 1, 1, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 8, 0 0, 0, 0, 0, 0 0, 0, 0, 15, 0 0, 0, 0, 0, 0 0, 0, 0, 8, 0 0, 0, 0, 0, 0 0, 0, 0, 1, 1 1, 2, 2, 0, 1 1, 1, 1, 1, 1 1, 5, 3, 1, 2 62, 5, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 2, 2 3, 3, 2, 2, 1 1, 2, 3, 10, 20 4, 1, 1, 1, 3 1, 1, 1, 1, 1 0, 20, 9, 9, 13 13, 9, 9, 5, 4 9, 15, 45, 0, 0 1, 0, 2, 1, 1 1, 0, 0, 0, 0 0, 9, 6, 7, 2 6, 7, 7, 6, 11 18, 15, 0, 4, 2 1, 2, 2, 0, 0 4, 5, 2, 0, 0 3, 1, 2, 2, 2 2, 2, 2, 2, 3 0, 0, 0, 0, 0 0, 0, 0, 0, 3 1, 1, 0, 0, 0 0, 15, 0, 5, 15 15, 25, 25, 0, 0 0, 5, 12, 5, 7 5, 3, 5, 5, 5 5, 0, 0, 10, 67 82, 82, 78, 32, 67 82, 87, 76, 82, 11 86, 65, 77, 80, 73 82, 69, 32, 66, 65 84, 7, 71, 78, 84 32, 82, 65, 84, 5 87, 73, 71, 72, 84 5, 71, 72, 79, 85 76, 6, 90, 79, 77 66, 73, 69, 8, 83 75, 69, 76, 69, 84 79, 78, 7, 65, 78 84, 32, 77, 65, 78 7, 65, 78, 84, 32 77, 65, 78, 12, 71 73, 65, 78, 84, 32 83, 80, 73, 68, 69 82, 8, 82, 79, 67 75, 70, 65, 76, 76 0, 141, 0, 100, 76 0, 75, 1, 92, 148 92, 0, 75, 150, 92 30, 29, 25, 72, 5 1, 0, 18, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 130, 64, 0, 0, 0 , 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 08,3B,9F,87,3B,86,3C,97,CF,97,3B,86,D1 1410 DATA 97,59,58,54,83,40,3C,3B,4D,0D ** URN 1910 R=RND(3):R=RND(3):ONRND(3) GOTO1920,1930,1940 1920 M$="DOST THOU TAKE ME FOR A DOLT?":GOSUB1:RETURN 1930 M$="FOOL OR KNAVE "+NM$+"! MAKE AN OFFER HIGHER THAN THY LAST":GOSUB1:RETURN 1940 M$="PERCHANCE THOU WOULDST NOT HAVE THIS AT ALL?":GOSUB1:RETURN 1950 IFRND(100)>50 THENM$="HA! 'TIS LESS THAN I PAID FOR IT":GOSUB1:RETURN 1951 M$="I SPIT ON THY PALTRY OFFER":GOSUB1:RETURN 1970 FORI1=1 TO10:R=RND(RT):NEXTI1:RQ=0:R=RND(RT)-1:FORI1=1 TO RN:RQ=RQ+RR(I1) 1971 IFRQ" " GOTO2010 2000 NEXTI 2010 NM$ 0, 18, 18, 18, 18 18, 18, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 4, 2, 3 56, 0, 6, 13, 0 0, 11, 55, 0, 16 59, 15, 54, 0, 0 0, 22, 0, 44, 24 25, 26, 27, 28, 29 30, 0, 32, 40, 0 0, 41, 0, 0, 0 0, 31, 50, 39, 43 0, 42, 46, 47, 48 0, 0, 0, 0, 0 0, 0, 0, 4, 0 21, 0, 0, 0, 22 0, 30, 2, 0, 5 6, 0, 11, 12, 13 4, 0, 16, 0, 59 0, 0, 0, 0, 23 44, 0, 43, 27, 41 0, 0, 31, 38, 33 0, 35, 0, 0, 0 0, 37, 0, 36, 0 0, 45, 0, 0, 0 0, 48, 49, 50, 51 57, 53, 54, 26, 52 20, 18, 32, 0, 1 2, 56, 0, 5, 0 0, 0, 0, 9, 0 6, 0, 14, 12, 0 0, 0, 0, 58, 19 0, 22, 23, 24, 25 26, 27, 28, 39, 30 0, 0, 0, 0, 0 0, 41, 31, 34, 44 42, 21, 0, 45, 46 47, 0, 40, 0, 0 0, 15, 10, 3, 0 0, 13, 0, 0, 5 0, 13, 7, 8, 0 0, 0, 0, 10, 11 12, 0, 0, 15, 0 59, 0, 58, 0, 2 22, 0, 0, 56, 26 0, 0, 4, 30, 60 32, 0, 34, 41, 39 31, 0, 0, 27, 0 25, 23, 44, 0, 0 49, 50, 51, 52, 57 54, 55, 0, 0, 53 0, 17, 0, 2, 1 1, 0, 1, 1, 0 0, 3, 3, 0, 2 2, 3, 3, 0, 0 0, 2, 0, 2, 2 2, 2, 2, 2, 2 2, 0, 2, 3, 0 0, 2, 0, 0, 0 0, 1, 1, 1, 3 0, 1, 1, 1, 1 0, 0, 0, 0, 0 0, 0, 0, 2, 0 1, 0, 0, 0, 1 0, 1, 2, 0, 2 2, 0, 2, 1, 1 1, 0, 2, 0, 1 0, 0, 0, 0, 1 3, 0, 2, 1, 1 0, 0, 1, 2, 1 0, 2, 0, 0, 0 0, 2, 0, 2, 0 0, 1, 0, 0, 0 0, 1, 1, 1, 1 1, 1, 1, 1, 1 3, 3, 1, 2, 2 1, 2, 0, 1, 0 0, 0, 0, 3, 0 1, 0, 3, 2, 0 0, 0, 0, 1, 2 0, 2, 2, 2, 2 2, 2, 2, 1, 2 0, 0, 0, 0, 0 0, 1, 3, 2, 1 3, 2, 0, 1, 1 1, 0, 1, 0, 0 0, 3, 3, 1, 0 0, 2, 0, 0, 2 0, 1, 2, 2, 0 0, 0, 0, 2, 1 1, 0, 0, 2, 0 3, 0, 3, 0, 1 1, 0, 0, 1, 1 0, 0, 1, 1, 1 1, 0, 2, 2, 2 2, 0, 0, 1, 0 2, 3, 1, 0, 0 1, 1, 1, 1, 1 1, 1, 0, 0, 1 0, 1, 0, 4, 7 2, 2, 2, 2, 2 2, 22, 4, 2, 5 4, 5, 15, 2, 2 2, 9, 2, 26, 9 13, 9, 13, 24, 19 19, 2, 19, 27, 2 2, 10, 2, 2, 2 2, 2, 2, 2, 5 2, 2, 24, 2, 2 2, 2, 2, 2, 2 2, 2, 2, 5, 2 10, 2, 2, 0, 7 0, 7, 3, 0, 17 17, 0, 5, 2, 2 2, 0, 6, 0, 22 0, 0, 0, 0, 2 4, 0, 32, 2, 2 0, 0, 2, 6, 7 0, 9, 0, 0, 0 0, 12, 0, 4, 0 0, 2, 0, 0, 0 0, 2, 2, 2, 2 2, 2, 24, 2, 2 2, 3, 2, 5, 9 2, 10, 0, 2, 0 0, 0, 0, 12, 0 2, 0, 15, 15, 0 0, 0, 0, 10, 9 0, 9, 13, 14, 3 19, 9, 19, 24, 12 0, 0, 0, 0, 0 0, 2, 5, 22, 2 5, 4, 0, 2, 2 2, 0, 30, 0, 0 0, 14, 4, 2, 0 0, 4, 0, 2, 9 2, 3, 17, 17, 2 2, 2, 2, 5, 2 2, 2, 2, 18, 2 13, 2, 2, 2, 2 2, 2, 2, 2, 2 2, 2, 2, 2, 2 7, 2, 9, 24, 12 3, 2, 2, 2, 2 7, 4, 2, 2, 2 30, 2, 2, 2, 2 9, 2, 2, 2, 2 2, 2, 2, 9, 17 12, 2, 12, 12, 2 2, 27, 9, 2, 10 9, 10, 20, 2, 2 2, 14, 2, 31, 14 18, 14, 18, 29, 24 24, 2, 24, 32, 2 2, 15, 2, 2, 2 2, 12, 12, 12, 10 2, 12, 34, 12, 12 2, 2, 2, 2, 2 2, 2, 2, 10, 2 20, 2, 2, 0, 17 0, 18, 8, 0, 27 27, 0, 10, 12, 12 12, 0, 11, 0, 27 0, 0, 0, 0, 12 9, 0, 37, 12, 12 0, 0, 13, 11, 17 0, 14, 0, 0, 0 0, 17, 0, 9, 0 0, 12, 0, 0, 0 0, 12, 12, 12, 12 12, 12, 34, 12, 12 7, 7, 22, 10, 14 12, 15, 0, 12, 0 0, 0, 0, 17, 0 12, 0, 20, 20, 0 0, 0, 0, 20, 14 0, 14, 18, 19, 8 24, 14, 24, 34, 17 0, 0, 0, 0, 0 0, 12, 10, 27, 12 10, 9, 0, 12, 12 12, 0, 40, 0, 0 0, 19, 9, 12, 0 0, 9, 0, 2, 14 2, 13, 27, 27, 2 2, 2, 2, 10, 12 12, 2, 2, 23, 2 17, 2, 7, 2, 12 12, 2, 2, 12, 12 2, 2, 13, 13, 22 17, 2, 14, 29, 17 8, 2, 2, 12, 2 12, 9, 12, 2, 2 40, 12, 12, 12, 12 19, 12, 2, 2, 12 2, 7, 2, 0, 9 0, 0, 0, 0, 2 2, 0, 0, 0, 0 0, 0, 7, 0, 1 0, 1, 0, 9, 0 0, 1, 0, 0, 0 8, 0, 0, 0, 8 10, 0, 0, 0, 0 3, 0, 9, 0, 0 11, 9, 0, 0, 0 4, 0, 0, 0, 0 0, 0, 7, 0, 0 5, 0, 0, 0, 1 0, 0, 0, 0, 40 40, 0, 0, 0, 0 0, 0, 2, 0, 4 0, 2, 0, 2, 0 0, 5, 0, 0, 0 3, 0, 0, 0, 2 4, 0, 0, 0, 0 7, 0, 2, 0, 0 4, 2, 0, 0, 0 1, 0, 0, 0, 0 0, 0, 4, 0, 0 2, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 1, 2, 0, 0 0, 3, 0, 0, 0 0, 0, 4, 0, 0 0, 0, 8, 7, 7 0, 7, 7, 7, 7 0, 1, 5, 0, 0 0, 7, 0, 7, 0 9, 0, 0, 0, 6 0, 0, 6, 6, 0 6, 0, 0, 7, 0 0, 0, 0, 2, 2 2, 2, 2, 2, 2 2, 4, 4, 2, 2 2, 4, 2, 2, 2 2, 2, 5, 2, 2 2, 2, 35, 21, 12 2, 11, 21, 19, 34 2, 4, 19, 2, 2 2, 6, 2, 7, 2 9, 2, 2, 2, 8 2, 2, 25, 23, 2 5, 2, 2, 7, 2 2, 2, 2, 2, 2 2, 2, 2, 2, 2 2, 4, 4, 2, 2 2, 4, 2, 2, 2 2, 2, 6, 2, 2 2, 2, 20, 7, 7 2, 4, 7, 7, 12 2, 4, 4, 2, 2 2, 14, 2, 6, 2 14, 2, 2, 2, 14 2, 2, 9, 9, 2 5, 2, 2, 7, 2 2, 2, 2, 0, 20 20, 20, 0, 0, 20 20, 1, 2, 20, 20 0, 3, 4, 20, 20 13, 20, 5, 20, 0 0, 20, 14, 0, 20 20, 20, 0, 0, 20 20, 6, 20, 20, 7 8, 20, 0, 20, 20 9, 0, 0, 20, 10 20, 20, 10, 10, 20 11, 0, 12, 20, 20 0, 0, 20, 2, 14 7, 21, 2, 2, 4 9, 4, 4, 7, 14 2, 4, 4, 7, 7 19, 24, 9, 30, 2 2, 7, 35, 2, 7 24, 17, 2, 2, 27 16, 4, 21, 21, 38 39, 9, 2, 29, 10 9, 2, 2, 11, 6 11, 24, 25, 23, 24 5, 2, 4, 7, 16 2, 2, 7, 2, 14 22, 4, 2, 2, 20 26, 4, 4, 7, 11 2, 4, 7, 12, 17 9, 19, 4, 12, 2 2, 41, 20, 2, 11 14, 17, 2, 2, 21 7, 4, 7, 14, 5 29, 17, 2, 9, 22 14, 2, 2, 24, 14 24, 11, 6, 6, 11 5, 2, 21, 18, 9 2, 2, 7, 103, 98 103, 98, 86, 86, 44 44, 12, 0, 22, 44 86, 22, 12, 34, 56 98, 120, 54, 34, 120 14, 120, 14, 115, 24 120, 34, 120, 34, 127 39, 68, 90, 90, 68 68, 56, 56, 56, 56 56, 56, 90, 112, 112 112, 70, 28, 114, 72 34, 13, 0, 103, 46 34, 86, 120, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 1, 1, 0 1, 0, 1, 0, 1 0, 1, 0, 1, 0 1, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 1, 1, 0, 0 0, 0, 0, 0, 0 1, 0, 0, 117, 122 117, 122, 100, 100, 88 88, 46, 24, 46, 88 100, 36, 36, 58, 88 122, 36, 68, 68, 16 58, 16, 58, 26, 58 36, 58, 36, 70, 41 58, 92, 114, 114, 112 112, 70, 70, 92, 70 70, 92, 126, 126, 126 126, 114, 72, 30, 116 48, 36, 14, 117, 74 56, 100, 1, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 1, 1, 1, 0 0, 0, 0, 0, 0 1, 0, 1, 42, 64 101, 26, 90, 4, 90 4, 4, 28, 16, 16 36, 28, 50, 43, 43 43, 47, 27, 47, 59 59, 101, 101, 113, 113 8, 8, 21, 21, 43 43, 101, 81, 113, 11 43, 8, 43, 113, 84 101, 59, 59, 101, 15 55, 55, 55, 55, 55 62, 62, 62, 3, 55 27, 43, 43, 0, 0 0, 1, 0, 1, 0 1, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 0, 0, 0, 0 0, 0, 0, 0, 0 1, 1, 1, 1, 1 1, 0, 0, 0, 1 1, 1, 1, 0, 0 0, 0, 0, 0, 1 1, 1, 1, 1, 1 1, 1, 1, 1, 1 0, 1, 1, 0, 40 62, 1, 46, 88, 46 88, 98, 2, 2, 2 2, 14, 26, 14, 14 24, 13, 13, 25, 45 45, 57, 57, 99, 99 111, 111, 6, 6, 19 19, 57, 57, 79, 111 9, 111, 19, 99, 57 82, 45, 45, 57, 99 13, 41, 41, 41, 41 41, 48, 26, 99, 41 13, 34, 19, 0, 0 0, 1, 0, 0, 0 0, 0, 1, 1, 1 1, 1, 1, 1, 1 1, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 1, 1, 1 1, 0, 0, 0, 0 1, 0, 1, 0, 0 0, 0, 0, 0, 0 1, 1, 1, 1, 1 1, 1, 1, 0, 1 0, 1, 1, 0, 0 0, 0, 0, 0, 8 12, 0, 0, 5, 6 8, 10, 6, 4, 0 0, 0, 0, 70, 80 95, 85, 60, 75, 15 99, 0, 0, 5, 7 1, 0, 6, 3, 4 4, 0, 0, 13, 3 9, 4, 18, 2, 1 31, 53, 4, 2, 31 11, 1, 0, 0, 0 0, 0, 0, 0, 3 6, 0, 9, 105, 5 0, 0, 0, 0, 10 0, 10, 0, 0, 0 0, 0, 0, 2, 1 2, 5, 1, 2, 3 3, 4, 1, 1, 6 1, 1, 3, 1, 1 2, 1, 1, 2, 1 1, 1, 9, 4, 9 22, 4, 9, 13, 13 13, 5, 5, 25, 0 0, 1, 0, 0, 1 0, 0, 3, 3, 2 0, 11, 6, 6, 15 3, 7, 18, 6, 15 6, 6, 15, 5, 4 2, 0, 3, 0, 2 1, 6, 3, 4, 4 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 3, 1, 3, 0 0, 9, 0, 1, 0 0, 0, 0, 0, 21 40, 10, 10, 5, 10 0, 0, 4, 0, 0 0, 5, 5, 5, 1 3, 3, 5, 5, 5 7, 12, 10, 6, 65 78, 84, 77, 65, 78 6, 65, 78, 84, 77 65, 78, 5, 71, 72 79, 85, 76, 12, 71 73, 65, 78, 84, 32 65, 77, 79, 69, 66 65, 6, 65, 78, 84 77, 65, 78, 6, 90 79, 77, 66, 73, 69 12, 71, 73, 65, 78 84, 32, 83, 80, 73 68, 69, 82, 9, 71 73, 65, 78, 84, 32 82, 65, 84, 6, 65 78, 84, 77, 65, 78 10, 71, 73, 65, 78 84, 32, 84, 73, 67 75, 12, 83, 75, 69 76, 69, 84, 65, 76 32, 66, 65, 84, 12 71, 73, 65, 78, 84 32, 77, 65, 78, 84 73, 83, 30, 108, 6 1, 123, 74, 73, 77 32, 32, 32, 32, 32 32, 32, 32, 5, 0 0, 0, 13, 0, 10 13, 3, 120, 3, 10 56, 20, 20, 1, 3 3, 8, 13, 18, 18 18, 18, 18, 18, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 139, 122, 0, 0, 0 139, 122, 0, 0, 0 131, 0, 0, 0, 0 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0,D,7C,8F,47,82,84,7C,89,8F,5B,88,7C,89 1410 DATA 8F,84,8E,59,A7,41,3C,8E,3B,0D,** ,3B,3B,3B,3B,3B,3C,3B,3B,3B,3B,3B,84,84,84,84,6E,5A,5A,4E,90,90,90,73,53,3D,3D,3B 580 DATA 5A,6E,5A,6E,4E,3D,44,3B,46,5A,5A,6E,6E,5A,6E,90,84,81,84,6F,84,7A,6F,6F,6F,6F,9E,9E,9E,9E,76,76 590 DATA 76,76,90,90,90,90,BA,97,90,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B 600 DATA 3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B 610 DATA 3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,42,3B,3B,3B,3B,41,3F,3E,40,42,3B,3B,3B,3B,3B,90,8B,95,86 620 DATA 81,9E,3B,3B,3B,3B,3E,42,40,41,44,3F,3B,3B,3B,3B,4A,3E,3E,41,5F,3C,73,3E,3F,71,43,3B,3B,3B,3B,3B 630 DATA 3B,3B,3B,3B,43,3B,3B,41,3B,3C,42,3E,3B,3B,3B,0D,3B,3B,3B,3B,3B, 0, 18, 18, 18, 18 18, 18, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 1 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 1, 1, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 4, 2, 3 56, 0, 6, 13, 0 0, 11, 55, 0, 16 59, 15, 54, 0, 0 0, 22, 0, 44, 24 25, 26, 27, 28, 29 30, 0, 32, 40, 0 0, 41, 0, 0, 0 0, 31, 50, 39, 43 0, 42, 46, 47, 48 0, 0, 0, 0, 0 0, 0, 0, 4, 0 21, 0, 0, 0, 22 0, 30, 2, 0, 5 6, 0, 11, 12, 13 4, 0, 16, 0, 59 0, 0, 0, 0, 23 44, 0, 43, 27, 41 0, 0, 31, 38, 33 0, 35, 0, 0, 0 0, 37, 0, 36, 0 0, 45, 0, 0, 0 0, 48, 49, 50, 51 57, 53, 54, 26, 52 20, 18, 32, 0, 1 2, 56, 0, 5, 0 0, 0, 0, 9, 0 6, 0, 14, 12, 0 0, 0, 0, 58, 19 0, 22, 23, 24, 25 26, 27, 28, 39, 30 0, 0, 0, 0, 0 0, 41, 31, 34, 44 42, 21, 0, 45, 46 47, 0, 40, 0, 0 0, 15, 10, 3, 0 0, 13, 0, 0, 5 0, 13, 7, 8, 0 0, 0, 0, 10, 11 12, 0, 0, 15, 0 59, 0, 58, 0, 2 22, 0, 0, 56, 26 0, 0, 4, 30, 60 32, 0, 34, 41, 39 31, 0, 0, 27, 0 25, 23, 44, 0, 0 49, 50, 51, 52, 57 54, 55, 0, 0, 53 0, 17, 1, 1, 1 1, 0, 1, 1, 0 0, 3, 3, 0, 2 2, 3, 3, 0, 0 0, 2, 0, 2, 2 2, 2, 2, 2, 2 1, 0, 1, 3, 0 0, 2, 0, 0, 0 0, 1, 1, 1, 3 0, 1, 1, 1, 1 0, 0, 0, 0, 0 0, 0, 0, 1, 0 1, 0, 0, 0, 1 0, 1, 2, 0, 2 2, 0, 2, 1, 1 1, 0, 2, 0, 1 0, 0, 0, 0, 1 3, 0, 2, 1, 1 0, 0, 1, 1, 1 0, 2, 0, 0, 0 0, 2, 0, 2, 0 0, 1, 0, 0, 0 0, 1, 1, 1, 1 1, 1, 1, 1, 1 3, 3, 1, 1, 1 1, 1, 0, 1, 0 0, 0, 0, 3, 0 1, 0, 3, 2, 0 0, 0, 0, 1, 2 0, 2, 2, 2, 2 2, 2, 1, 1, 1 0, 0, 0, 0, 0 0, 1, 3, 2, 1 3, 2, 0, 1, 1 1, 0, 1, 0, 0 0, 3, 3, 1, 0 0, 2, 0, 0, 2 0, 1, 2, 2, 0 0, 0, 0, 2, 1 1, 0, 0, 2, 0 3, 0, 3, 0, 1 1, 0, 0, 1, 1 0, 0, 1, 1, 1 1, 0, 2, 2, 2 1, 0, 0, 1, 0 2, 3, 1, 0, 0 1, 1, 1, 1, 1 1, 1, 0, 0, 1 0, 1, 0, 4, 7 2, 2, 2, 2, 2 2, 22, 4, 2, 5 4, 5, 15, 2, 2 2, 9, 2, 26, 9 13, 9, 13, 24, 19 19, 2, 19, 27, 2 2, 10, 2, 2, 2 2, 2, 2, 2, 5 2, 2, 24, 2, 2 2, 2, 2, 2, 2 2, 2, 2, 5, 2 10, 2, 2, 0, 7 0, 7, 3, 0, 17 17, 0, 5, 2, 2 2, 0, 6, 0, 22 0, 0, 0, 0, 2 4, 0, 32, 2, 2 0, 0, 2, 6, 7 0, 9, 0, 0, 0 0, 12, 0, 4, 0 0, 2, 0, 0, 0 0, 2, 2, 2, 2 2, 2, 24, 2, 2 2, 3, 2, 5, 9 2, 10, 0, 2, 0 0, 0, 0, 12, 0 2, 0, 15, 15, 0 0, 0, 0, 10, 9 0, 9, 13, 14, 3 19, 9, 19, 24, 12 0, 0, 0, 0, 0 0, 2, 5, 22, 2 5, 4, 0, 2, 2 2, 0, 30, 0, 0 0, 14, 4, 2, 0 0, 4, 0, 2, 9 2, 3, 17, 17, 2 2, 2, 2, 5, 2 2, 2, 2, 18, 2 13, 2, 2, 2, 2 2, 2, 2, 2, 2 2, 2, 2, 2, 2 7, 2, 9, 24, 12 3, 2, 2, 2, 2 7, 4, 2, 2, 2 30, 2, 2, 2, 2 9, 2, 2, 2, 2 2, 2, 2, 9, 17 12, 2, 12, 12, 2 2, 27, 9, 2, 10 9, 10, 20, 2, 2 2, 14, 2, 31, 14 18, 14, 18, 29, 24 24, 2, 24, 32, 2 2, 15, 2, 2, 2 2, 12, 12, 12, 10 2, 12, 34, 12, 12 2, 2, 2, 2, 2 2, 2, 2, 10, 2 20, 2, 2, 0, 17 0, 18, 8, 0, 27 27, 0, 10, 12, 12 12, 0, 11, 0, 27 0, 0, 0, 0, 12 9, 0, 37, 12, 12 0, 0, 13, 11, 17 0, 14, 0, 0, 0 0, 17, 0, 9, 0 0, 12, 0, 0, 0 0, 12, 12, 12, 12 12, 12, 34, 12, 12 7, 7, 22, 10, 14 12, 15, 0, 12, 0 0, 0, 0, 17, 0 12, 0, 20, 20, 0 0, 0, 0, 20, 14 0, 14, 18, 19, 8 24, 14, 24, 34, 17 0, 0, 0, 0, 0 0, 12, 10, 27, 12 10, 9, 0, 12, 12 12, 0, 40, 0, 0 0, 19, 9, 12, 0 0, 9, 0, 2, 14 2, 13, 27, 27, 2 2, 2, 2, 10, 12 12, 2, 2, 23, 2 17, 2, 7, 2, 12 12, 2, 2, 12, 12 2, 2, 13, 13, 22 17, 2, 14, 29, 17 8, 2, 2, 12, 2 12, 9, 12, 2, 2 40, 12, 12, 12, 12 19, 12, 2, 2, 12 2, 7, 2, 6, 9 4, 5, 0, 0, 2 2, 0, 0, 0, 0 0, 0, 7, 0, 1 0, 1, 0, 9, 0 0, 1, 0, 0, 0 1, 0, 6, 0, 2 4, 0, 0, 0, 0 3, 0, 9, 0, 0 11, 9, 0, 0, 0 4, 0, 0, 0, 0 0, 0, 7, 8, 0 5, 0, 2, 0, 0 0, 0, 0, 0, 40 40, 0, 0, 0, 0 0, 0, 2, 0, 4 0, 2, 0, 2, 0 0, 5, 0, 0, 0 1, 0, 0, 0, 0 1, 0, 0, 0, 0 0, 0, 2, 0, 0 4, 2, 0, 0, 0 1, 0, 0, 0, 0 0, 0, 4, 1, 0 2, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 1, 2, 0, 0 0, 3, 0, 0, 0 0, 0, 4, 0, 0 0, 0, 8, 7, 7 0, 7, 7, 7, 0 0, 1, 5, 0, 0 0, 7, 0, 7, 0 9, 0, 0, 0, 6 0, 0, 6, 6, 0 6, 0, 0, 0, 0 0, 0, 0, 2, 2 2, 2, 2, 2, 2 2, 4, 4, 2, 2 2, 4, 2, 2, 2 2, 2, 5, 2, 2 2, 2, 35, 21, 12 2, 11, 21, 19, 34 2, 4, 19, 2, 2 2, 6, 2, 7, 2 9, 2, 2, 2, 8 2, 2, 25, 23, 2 5, 2, 2, 7, 2 2, 2, 2, 2, 2 2, 2, 2, 2, 2 2, 4, 4, 2, 2 2, 4, 2, 2, 2 2, 2, 6, 2, 2 2, 2, 20, 7, 7 2, 4, 7, 7, 12 2, 4, 4, 2, 2 2, 14, 2, 6, 2 14, 2, 2, 2, 14 2, 2, 9, 9, 2 5, 2, 2, 7, 2 2, 2, 2, 0, 20 20, 20, 0, 0, 20 20, 1, 2, 20, 20 0, 3, 4, 20, 20 13, 20, 5, 20, 0 0, 20, 14, 0, 20 20, 20, 0, 0, 20 20, 6, 20, 20, 7 0, 20, 0, 20, 20 9, 0, 0, 20, 10 20, 20, 10, 10, 20 11, 0, 12, 0, 20 0, 0, 20, 2, 14 5, 21, 2, 2, 4 9, 4, 4, 7, 14 2, 4, 4, 7, 7 19, 24, 9, 30, 2 2, 7, 35, 2, 7 23, 17, 2, 2, 24 16, 4, 21, 21, 38 39, 9, 2, 29, 10 9, 2, 2, 11, 6 11, 24, 25, 23, 24 5, 2, 4, 5, 16 2, 2, 5, 2, 14 19, 4, 2, 2, 20 26, 4, 4, 7, 11 2, 4, 7, 12, 17 9, 19, 4, 12, 2 2, 41, 20, 2, 11 16, 17, 2, 2, 21 9, 4, 7, 14, 5 29, 17, 2, 9, 22 14, 2, 2, 24, 14 24, 11, 6, 6, 11 5, 2, 21, 16, 9 2, 2, 9, 103, 98 103, 98, 86, 86, 44 44, 12, 0, 22, 44 86, 22, 12, 34, 56 98, 120, 54, 34, 120 14, 120, 14, 115, 24 120, 34, 120, 34, 127 39, 68, 90, 90, 68 68, 56, 56, 56, 56 56, 56, 90, 112, 112 112, 70, 28, 114, 72 34, 13, 0, 103, 46 34, 86, 120, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 1, 1, 0 1, 0, 1, 0, 1 0, 1, 0, 1, 0 1, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 1, 1, 0, 0 0, 0, 0, 0, 0 1, 0, 0, 117, 122 117, 122, 100, 100, 88 88, 46, 24, 46, 88 100, 36, 36, 58, 88 122, 36, 68, 68, 16 58, 16, 58, 26, 58 36, 58, 36, 70, 41 58, 92, 114, 114, 112 112, 70, 70, 92, 70 70, 92, 126, 126, 126 126, 114, 72, 30, 116 48, 36, 14, 117, 74 56, 100, 1, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 1, 1, 1, 0 0, 0, 0, 0, 0 1, 0, 1, 42, 64 101, 26, 90, 4, 90 4, 4, 28, 16, 16 36, 28, 50, 43, 43 43, 47, 27, 47, 59 59, 101, 101, 113, 113 8, 8, 21, 21, 43 43, 101, 81, 113, 11 43, 8, 43, 113, 84 101, 59, 59, 101, 15 55, 55, 55, 55, 55 62, 62, 62, 3, 55 27, 43, 43, 0, 0 0, 1, 0, 1, 0 1, 1, 1, 1, 1 1, 1, 1, 1, 1 1, 0, 0, 0, 0 0, 0, 0, 0, 0 1, 1, 1, 1, 1 1, 0, 0, 0, 1 1, 1, 1, 0, 0 0, 0, 0, 0, 1 1, 1, 1, 1, 1 1, 1, 1, 1, 1 0, 1, 1, 0, 40 62, 1, 46, 88, 46 88, 98, 2, 2, 2 2, 14, 26, 14, 14 24, 13, 13, 25, 45 45, 57, 57, 99, 99 111, 111, 6, 6, 19 19, 57, 57, 79, 111 9, 111, 19, 99, 57 82, 45, 45, 57, 99 13, 41, 41, 41, 41 41, 48, 26, 99, 41 13, 34, 19, 0, 0 0, 1, 0, 0, 0 0, 0, 1, 1, 1 1, 1, 1, 1, 1 1, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 1, 1, 1 1, 0, 0, 0, 0 1, 0, 1, 0, 0 0, 0, 0, 0, 0 1, 1, 1, 1, 1 1, 1, 1, 0, 1 0, 1, 1, 0, 0 0, 0, 0, 0, 8 12, 0, 0, 5, 6 8, 10, 6, 4, 0 0, 0, 0, 70, 80 95, 85, 60, 75, 15 99, 0, 0, 5, 7 1, 0, 6, 3, 4 4, 0, 0, 13, 3 9, 4, 18, 2, 1 31, 53, 4, 2, 31 11, 1, 0, 0, 0 0, 0, 0, 0, 3 6, 0, 9, 105, 5 0, 0, 0, 0, 10 0, 10, 0, 0, 0 0, 0, 0, 2, 1 2, 5, 1, 2, 3 3, 4, 1, 1, 6 1, 1, 3, 1, 1 2, 1, 1, 2, 1 1, 1, 9, 4, 9 22, 4, 9, 13, 13 13, 5, 5, 25, 0 0, 1, 0, 0, 1 0, 0, 3, 3, 2 0, 11, 6, 6, 15 3, 7, 18, 6, 15 6, 6, 15, 5, 4 2, 0, 3, 0, 2 1, 6, 3, 4, 4 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 3, 1, 3, 0 0, 9, 0, 1, 0 0, 0, 0, 0, 21 40, 10, 10, 5, 10 0, 0, 4, 0, 0 0, 5, 5, 5, 1 3, 3, 5, 5, 5 7, 12, 10, 6, 65 78, 84, 77, 65, 78 6, 65, 78, 84, 77 65, 78, 5, 71, 72 79, 85, 76, 12, 71 73, 65, 78, 84, 32 65, 77, 79, 69, 66 65, 6, 65, 78, 84 77, 65, 78, 6, 90 79, 77, 66, 73, 69 12, 71, 73, 65, 78 84, 32, 83, 80, 73 68, 69, 82, 9, 71 73, 65, 78, 84, 32 82, 65, 84, 6, 65 78, 84, 77, 65, 78 10, 71, 73, 65, 78 84, 32, 84, 73, 67 75, 12, 83, 75, 69 76, 69, 84, 65, 76 32, 66, 65, 84, 12 71, 73, 65, 78, 84 32, 77, 65, 78, 84 73, 83, 30, 108, 6 1, 123, 74, 73, 77 32, 32, 32, 32, 32 32, 32, 32, 0, 0 0, 0, 0, 0, 7 18, 5, 120, 0, 10 81, 24, 11, 3, 0 5, 7, 13, 19, 18 18, 18, 18, 18, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 141, 49, 168, 0, 0 141, 57, 40, 0, 0 131, 0, 0, 0, 0 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 0, 0 0, 0, 0, 53,53,53,53,89,52,3E,90,AB,3B,3D,3C,3C,3C 1030 DATA 3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C 1040 DATA 3C,3B,3B,3C,3B,3B,3B,3C,3C,3C,3C,3C,3C,3B,3B,3B 1050 DATA 3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B 1060 DATA 3B,3B,3B,3C,3D,3B,3B,67,5A,70,44,A9,44,A9,93,5A 1070 DATA 4E,A9,93,5A,44,A9,93,5A,5A,A9,93,8C,44,44,5A,70 1080 DATA 93,7D,86,5A,86,70,5A,3D,7D,7F,5A,3D,93,7D,86,70 1090 DATA 86,70,3D,7D,44,A9,93,44,A9,93,44,A9,93,7D,5A,3D 1100 DATA 70,44,67,3B,3C,0D,3C,3C,3B,3C,3B,3B,3C,3C,3B,3B 1110 DATA 3C,3C,3B,3B,3C,3C,3B,3B,3B,3C,3C,3C,3C,3B,3B,3C 1120 DATA 3C,3C,3C,3C,3C,3B,3C,3C,3C,3B,3B,3C,3C,3C,3C,3C 1130 DATA 3B,3C,3B,3B,3C,3B,3B,3C,3B,3B,3B,3C,3C,3C,3C,3B 1140 DATA 3B,42,58,A7,91,A7,91,7B,42,A7,91,7B,42,A7,91,7B 1150 DATA 42,4C,8A,8A,7B,3B,3B,42,58,7B,74,7D,42,6E,58,42 1160 DATA 91,65,58,42,91,7B,65,6E,58,6E,58,91,65,A7,91,7B 1170 DATA A7,91,7B,A7,91,7B,65,42,A7,58,3B,45,3B,3C,3C,3B 1180 DATA 3B,3B,3B,3B,3C,3B,3B,3B,3C,3B,3B,3B,3C,3C,3B,3B 1190 DATA 3B,3C,3C,3C,3C,3B,3B,3C,3C,3C,3C,3C,3B,3B,3C,3C 1200 DATA 3B,3B,3B,3C,3C,3C,3C,3B,3B,3B,3B,3B,3B,3B,3B,3B 1210 DATA 3B,3B,3B,3C,3B,3C,3C,3B,3B,3B,3B,3B,3B,3B,3B,3B 1220 DATA 3B,3B,43,3B,3B,3B,3B,3B,3B,3B,3B,3B,4A,3B,3B,3B 1230 DATA 3B,3B,3B,3B,3B,3B,43,3B,3B,3B,3B,3B,3B,3B,3B,3B 1240 DATA 3C,3C,3C,3D,3D,3B,3C,3C,3C,3C,3C,3C,3C,40,3E,3C 1250 DATA 3D,79,40,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,0D 1260 DATA 3B,3B,3B,3B,3B,3B,3B,3B,3B,3D,3D,3E,3E,3D,3D,3C 1270 DATA 3C,3D,3E,45,4F,3F,3C,3C,3C,3E,3C,3C,3C,3C,3C,3B 1280 DATA 4F,44,44,48,48,44,44,40,3F,44,4A,68,3B,3B,3C,3B 1290 DATA 3D,3C,3C,3C,3B,3B,3B,3B,3B,44,41,42,3D,41,42,42 1300 DATA 41,46,4D,4A,3B,3F,3D,3C,3D,3D,3B,3B,3F,40,3D,3B 1310 DATA 3B,3E,3C,3D,3D,3D,3D,3D,3D,3D,3E,3B,3B,3B,3B,3B 1320 DATA 3B,3B,3B,3B,3E,3C,3C,3B,3B,3B,3B,4A,3B,40,4A,4A 1330 DATA 54,54,3B,3B,3B,40,47,40,42,40,3E,40,40,40,40,3B 1340 DATA 3B,45,7E,8D,8D,89,5B,7E,8D,92,87,8D,46,91,7C,88 1350 DATA 8B,84,8D,80,5B,7D,7C,8F,42,82,89,8F,5B,8D,7C,8F 1360 DATA 40,92,84,82,83,8F,40,82,83,8A,90,87,41,95,8A,88 1370 DATA 7D,84,80,43,8E,86,80,87,80,8F,8A,89,42,7C,89,8F 1380 DATA 5B,88,7C,89,42,7C,89,8F,5B,88,7C,89,47,82,84,7C 1390 DATA 89,8F,5B,8E,8B,84,7F,80,8D,43,8D,8A,7E,86,81,7C 1400 DATA 87,87,3B,C8,3B,9F,87,3B,86,3C,97,CF,97,3B,86,D1 1410 DATA 97,59,58,54,83,40,3C,3B,4D,0D ** 9999 REM CONVERT A HEXADECIMAL BYTE IN R0$ TO DECIMAL IN R0 11000 R1$=MID$(R0$,1,1):GOSUB11001:R0=R1*16:R1$=MID$(R0$,2,1):GOSUB11001:R0=R0+R1:RETURN 11001 IFR1$="A"THENR1=10:RETURN 11002 IFR1$="B"THENR1=11:RETURN 11003 IFR1$="C"THENR1=12:RETURN 11004 IFR1$="D"THENR1=13:RETURN 11005 IFR1$="E"THENR1=14:RETURN 11006 IFR1$="F"THENR1=15:RETURN 11007 R1=VAL(R1$):RETURN 128)CHR$(220)STRING$(6,128)STRING$(7,128)CHR$(220)A$; 1415 W=9:E(1)=27:E(2)=0:A(1)=12:B(1)=14:F=2:A(2)=3:B(2)=5:A(3)=21:B(3)=6:NX=16:NY=1:RETURN 1500 V=6:PRINTA$STRING$(9,128)CHR$(220)STRING$(7,128)CHR$(146)STRING$(8,128)A$; 1502 PRINTA$STRING$(3,175)STRING$(6,128)CHR$(220)STRING$(6,128)STRING$(3,175)CHR$(220)STRING$(6,175)A$; 1503 PRINTA$STRING$(3,128)CHR$(175)10 DIMD(500),C,V,R0,R1,R0$,R1$,T:V=VARPTR(D(0))+97 20 FORC=0TO2240:READ R0$:IFR0$="0D"THENC=C-1:GOTO50 30 GOSUB11000:PRINTC+1TAB(8)R0TAB(16)CHR$(R0-59)TAB(22)R0-59 40 POKEV+C,R0-59 50 NEXT:D(500)=4 55 OPEN"O", #1,"LEVEL4/DAT":FORC1=0TO500:WRITE #1,D(C1):NEXT:CLOSE#1:END 61 DATA 3F,3D,3E,73,3B,41,48,3B,3B,46,72,3B,4B,76,4A,71 62 DATA 3B,3B,3B,51,3B,67,53,54,55,56,57,58,59,3B,5B,63 63 DATA 3B,3B,64,3B,3B,3B,3B,5A,6D,62,66,3B,65,69,6A,6B 64 DATA 3B,3B,3B,3B,3B,3B,3B,3B,3F,3B,50,3B,3B,3B,51,3B 65 DATA 59,3D,3B,40,41,3B,46,47,48,3F,3B,4B,3B,76,3B,3B 66 DATA 3B,3B,52,67,3B,66,56,64,3B,3B,5A,61,5C,3B,5E,3B 67 DATA 3B,3B,3B,60,3B,5F,3B,3B,68,3B,3B,3B,3B,6B,6C,6D 68 DATA 6E,74,70,71,55,6F,4F,4D,5B,3B,3C,3D,73,3B,40,3B 69 DATA 3B,3B,3B,44,3B,41,3B,49,47,3B,3B,3B,3B,75,4E,3B 100 DATA 51,52,53,54,55,56,57,62,59,3B,3B,3B,3B,3B,3B,64 110 DATA 5A,5D,67,65,50,3B,68,69,6A,3B,63,3B,3B,3B,4A,45 120 DATA 3E,3B,3B,48,3B,3B,40,3B,48,42,43,3B,3B,3B,3B,45 130 DATA 46,47,3B,3B,4A,3B,76,3B,75,3B,3D,51,3B,3B,73,55 140 DATA 3B,3B,3F,59,77,5B,3B,5D,64,62,5A,3B,3B,56,3B,54 150 DATA 52,67,3B,3B,6C,6D,6E,6F,74,71,72,3B,3B,70,3B,4C 160 DATA 3B,3D,3C,3C,3B,3C,3C,3B,3B,0D,3E,3E,3B,3D,3D,3E 170 DATA 3E,3B,3B,3B,3D,3B,3D,3D,3D,3D,3D,3D,3D,3D,3B,3D 180 DATA 3E,3B,3B,3D,3B,3B,3B,3B,3C,3C,3C,3E,3B,3C,3C,3C 190 DATA 3C,3B,3B,3B,3B,3B,3B,3B,3B,3D,3B,3C,3B,3B,3B,3C 200 DATA 3B,3C,3D,3B,3D,3D,3B,3D,3C,3C,3C,3B,3D,3B,3C,3B 210 DATA 3B,3B,3B,3C,3E,3B,3D,3C,3C,3B,3B,3C,3D,3C,3B,3D 220 DATA 3B,3B,3B,3B,3D,3B,3D,3B,3B,3C,3B,3B,3B,3B,3C,3C 230 DATA 3C,3C,3C,3C,3C,3C,3C,3E,3E,3C,3D,3D,3C,3D,3B,3C 240 DATA 3B,3B,3B,3B,3E,3B,3C,3B,3E,3D,3B,3B,3B,3B,3C,3D 250 DATA 3B,3D,3D,3D,3D,3D,3D,3D,3C,3D,3B,3B,3B,3B,3B,3B 260 DATA 3C,3E,3D,3C,3E,3D,3B,3C,3C,3C,3B,3C,3B,3B,3B,3E 270 DATA 3E,3C,3B,3B,3D,3B,3B,3D,3B,3C,3D,3D,3B,3B,3B,3B 280 DATA 3D,3C,3C,3B,3B,3D,3B,3E,3B,3E,3B,3C,3C,3B,3B,3C 290 DATA 3C,3B,3B,3C,3C,3C,3C,3B,3D,3D,3D,3D,3B,3B,3C,3B 300 DATA 3D,3E,3C,3B,3B,3C,3C,3C,3C,3C,3C,3C,3B,3B,3C,3B 310 DATA 3C,3B,3F,42,3D,3D,3D,3D,3D,3D,51,3F,3D,40,3F,40 320 DATA 4A,3D,3D,0D,3D,44,3D,55,44,48,44,48,53,4E,4E,3D 330 DATA 4E,56,3D,3D,45,3D,3D,3D,3D,3D,3D,3D,40,3D,3D,53 340 DATA 3D,3D,3D,3D,3D,3D,3D,3D,3D,3D,40,3D,45,3D,3D,3B 350 DATA 42,3B,42,3E,3B,4C,4C,3B,40,3D,3D,3D,3B,41,3B,51 360 DATA 3B,3B,3B,3B,3D,3F,3B,5B,3D,3D,3B,3B,3D,41,42,3B 370 DATA 44,3B,3B,3B,3B,47,3B,3F,3B,3B,3D,3B,3B,3B,3B,3D 380 DATA 3D,3D,3D,3D,3D,53,3D,3D,3D,3E,3D,40,44,3D,45,3B 390 DATA 3D,3B,3B,3B,3B,47,3B,3D,3B,4A,4A,3B,3B,3B,3B,45 400 DATA 44,3B,44,48,49,3E,4E,44,4E,53,47,3B,3B,3B,3B,3B 410 DATA 3B,3D,40,51,3D,40,3F,3B,3D,3D,3D,3B,59,3B,3B,3B 420 DATA 49,3F,3D,3B,3B,3F,3B,3D,44,3D,3E,4C,4C,3D,3D,3D 430 DATA 3D,40,3D,3D,3D,3D,4D,3D,48,3D,3D,3D,3D,3D,3D,3D 440 DATA 3D,3D,3D,3D,3D,3D,3D,42,3D,44,53,47,3E,3D,3D,3D 450 DATA 3D,42,3F,3D,3D,3D,59,3D,3D,3D,3D,44,3D,3D,3D,3D 460 DATA 3D,3D,3D,44,4C,47,3D,47,47,3D,3D,56,44,3D,45,44 470 DATA 45,4F,3D,3D,3D,49,3D,5A,49,4D,49,4D,58,0D,53,53 480 DATA 3D,53,5B,3D,3D,4A,3D,3D,3D,3D,47,47,47,45,3D,47 490 DATA 5D,47,47,3D,3D,3D,3D,3D,3D,3D,3D,45,3D,4F,3D,3D 500 DATA 3B,4C,3B,4D,43,3B,56,56,3B,45,47,47,47,3B,46,3B 510 DATA 56,3B,3B,3B,3B,47,44,3B,60,47,47,3B,3B,48,46,4C 520 DATA 3B,49,3B,3B,3B,3B,4C,3B,44,3B,3B,47,3B,3B,3B,3B 530 DATA 47,47,47,47,47,47,5D,47,47,42,42,51,45,49,47,4A 540 DATA 3B,47,3B,3B,3B,3B,4C,3B,47,3B,4F,4F,3B,3B,3B,3B 550 DATA 4F,49,3B,49,4D,4E,43,53,49,53,5D,4C,3B,3B,3B,3B 560 DATA 3B,3B,47,45,56,47,45,44,3B,47,47,47,3B,63,3B,3B 570 DATA 3B,4E,44,47,3B,3B,44,3B,3D,49,3D,48,56,56,3D,3D 580 DATA 3D,3D,45,47,47,3D,3D,52,3D,4C,3D,42,3D,47,47,3D 590 DATA 3D,47,47,3D,3D,48,48,51,4C,3D,49,58,4C,43,3D,3D 600 DATA 47,3D,47,44,47,3D,3D,63,47,47,47,47,4E,47,3D,3D 610 DATA 47,3D,42,3D,3B,44,3B,3B,3B,3B,3D,3D,3B,3B,3B,3B 620 DATA 3B,3B,42,3B,3C,3B,3C,3B,44,3B,3B,3C,3B,3B,3B,43 630 DATA 3B,3B,3B,43,45,3B,3B,0D,3B,3B,3E,3B,44,3B,3B,46 640 DATA 44,3B,3B,3B,3F,3B,3B,3B,3B,3B,3B,42,3B,3B,40,3B 650 DATA 3B,3B,3C,3B,3B,3B,3B,63,63,3B,3B,3B,3B,3B,3B,3D 660 DATA 3B,3F,3B,3D,3B,3D,3B,3B,40,3B,3B,3B,3E,3B,3B,3B 670 DATA 3D,3F,3B,3B,3B,3B,42,3B,3D,3B,3B,3F,3D,3B,3B,3B 680 DATA 3C,3B,3B,3B,3B,3B,3B,3F,3B,3B,3D,3B,3B,3B,3B,3B 690 DATA 3B,3B,3B,3B,3B,3C,3D,3B,3B,3B,3E,3B,3B,3B,3B,3B 700 DATA 3F,3B,3B,3B,3B,43,42,42,3B,42,42,42,42,3B,3C,40 710 DATA 3B,3B,3B,42,3B,42,3B,44,3B,3B,3B,41,3B,3B,41,41 720 DATA 3B,41,3B,3B,42,3B,3B,3B,3B,3D,3D,3D,3D,3D,3D,3D 730 DATA 3D,3F,3F,3D,3D,3D,3F,3D,3D,3D,3D,3D,40,3D,3D,3D 740 DATA 3D,5E,50,47,3D,46,50,4E,5D,3D,3F,4E,3D,3D,3D,41 750 DATA 3D,42,3D,44,3D,3D,3D,43,3D,3D,54,52,3D,40,3D,3D 760 DATA 42,3D,3D,3D,3D,3D,3D,3D,3D,3D,3D,3D,3D,3F,3F,3D 770 DATA 3D,3D,3F,3D,3D,3D,3D,3D,41,3D,3D,3D,3D,4F,42,42 780 DATA 3D,3F,42,42,47,3D,3F,3F,3D,3D,3D,49,3D,41,3D,49 790 DATA 3D,0D,3D,3D,49,3D,3D,44,44,3D,40,3D,3D,42,3D,3D 800 DATA 3D,3D,3B,4F,4F,4F,3B,3B,4F,4F,3C,3D,4F,4F,3B,3E 810 DATA 3F,4F,4F,48,4F,40,4F,3B,3B,4F,49,3B,4F,4F,4F,3B 820 DATA 3B,4F,4F,41,4F,4F,42,43,4F,3B,4F,4F,44,3B,3B,4F 830 DATA 45,4F,4F,45,45,4F,46,3B,47,4F,4F,3B,3B,4F,3D,49 840 DATA 42,50,3D,3D,3F,44,3F,3F,42,49,3D,3F,3F,42,42,4E 850 DATA 53,44,59,3D,3D,42,5E,3D,42,53,4C,3D,3D,56,4B,3F 860 DATA 50,50,61,62,44,3D,58,45,44,3D,3D,46,41,46,53,54 870 DATA 52,53,40,3D,3F,42,4B,3D,3D,42,3D,49,51,3F,3D,3D 880 DATA 4F,55,3F,3F,42,46,3D,3F,42,47,4C,44,4E,3F,47,3D 890 DATA 3D,64,4F,3D,46,49,4C,3D,3D,50,42,3F,42,49,40,58 900 DATA 4C,3D,44,51,49,3D,3D,53,49,53,46,41,41,46,40,3D 910 DATA 50,4D,44,3D,3D,42,A2,9D,A2,9D,91,91,67,67,47,3B 920 DATA 51,67,91,51,47,5D,73,9D,B3,71,5D,B3,49,B3,49,AE 930 DATA 53,B3,5D,B3,5D,BA,62,7F,95,95,7F,7F,73,73,73,73 940 DATA 73,73,95,AB,AB,AB,81,57,AD,83,5D,0D,48,3B,A2,69 950 DATA 5D,91,B3,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B 960 DATA 3B,3B,3B,3B,3B,3B,3C,3C,3B,3C,3B,3C,3B,3C,3B,3C 970 DATA 3B,3C,3B,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C 980 DATA 3C,3C,3C,3C,3C,3B,3B,3B,3B,3B,3B,3B,3C,3B,3B,B0 990 DATA B5,B0,B5,9F,9F,93,93,69,53,69,93,9F,5F,5F,75,93 1000 DATA B5,5F,7F,7F,4B,75,4B,75,55,75,5F,75,5F,81,64,75 1010 DATA 97,AD,AD,AB,AB,81,81,97,81,81,97,B9,B9,B9,B9,AD 1020 DATA 83,59,AF,6B,5F,49,B0,85,73,9F,3C,3B,3B,3B,3B,3B 1030 DATA 3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3C,3C,3C 1040 DATA 3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C 1050 DATA 3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3B,3B 1060 DATA 3B,3B,3B,3B,3C,3B,3C,65,7B,A0,55,95,3F,95,3F,3F 1070 DATA 57,4B,4B,5F,57,6D,66,66,66,6A,56,6A,76,76,A0,A0 1080 DATA AC,AC,43,43,50,50,66,66,A0,8C,AC,46,66,43,66,AC 1090 DATA 8F,A0,76,76,A0,4A,72,72,72,72,72,79,79,79,3E,72 1100 DATA 56,66,66,3B,3B,0D,3B,3C,3B,3C,3B,3C,3C,3C,3C,3C 1110 DATA 3C,3C,3C,3C,3C,3C,3B,3B,3B,3B,3B,3B,3B,3B,3B,3C 1120 DATA 3C,3C,3C,3C,3C,3B,3B,3B,3C,3C,3C,3C,3B,3B,3B,3B 1130 DATA 3B,3B,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3C,3B,3C,3C 1140 DATA 3B,63,79,3C,69,93,69,93,9D,3D,3D,3D,3D,49,55,49 1150 DATA 49,53,48,48,54,68,68,74,74,9E,9E,AA,AA,41,41,4E 1160 DATA 4E,74,74,8A,AA,44,AA,4E,9E,74,8D,68,68,74,9E,48 1170 DATA 64,64,64,64,64,6B,55,9E,64,48,5D,4E,3B,3B,3B,3C 1180 DATA 3B,3B,3B,3B,3B,3C,3C,3C,3C,3C,3C,3C,3C,3C,3B,3B 1190 DATA 3B,3B,3B,3B,3B,3B,3B,3B,3B,3C,3C,3C,3C,3B,3B,3B 1200 DATA 3B,3C,3B,3C,3B,3B,3B,3B,3B,3B,3B,3C,3C,3C,3C,3C 1210 DATA 3C,3C,3C,3B,3C,3B,3C,3C,3B,3B,3B,3B,3B,3B,43,47 1220 DATA 3B,3B,40,41,43,45,41,3F,3B,3B,3B,3B,81,8B,9A,90 1230 DATA 77,86,4A,9E,3B,3B,40,42,3C,3B,41,3E,3F,3F,3B,3B 1240 DATA 48,3E,44,3F,4D,3D,3C,5A,70,3F,3D,5A,46,3C,3B,3B 1250 DATA 3B,3B,3B,3B,3B,3E,41,3B,44,A4,40,3B,3B,3B,3B,0D 1260 DATA 45,3B,45,3B,3B,3B,3B,3B,3B,3D,3C,3D,40,3C,3D,3E 1270 DATA 3E,3F,3C,3C,41,3C,3C,3E,3C,3C,3D,3C,3C,3D,3C,3C 1280 DATA 3C,44,3F,44,51,3F,44,48,48,48,40,40,54,3B,3B,3C 1290 DATA 3B,3B,3C,3B,3B,3E,3E,3D,3B,46,41,41,4A,3E,42,4D 1300 DATA 41,4A,41,41,4A,40,3F,3D,3B,3E,3B,3D,3C,41,3E,3F 1310 DATA 3F,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3E,3C,3E,3B 1320 DATA 3B,44,3B,3C,3B,3B,3B,3B,3B,50,63,45,45,40,45,3B 1330 DATA 3B,3F,3B,3B,3B,40,40,40,3C,3E,3E,40,40,40,42,47 1340 DATA 45,41,7C,89,8F,88,7C,89,41,7C,89,8F,88,7C,89,40 1350 DATA 82,83,8A,90,87,47,82,84,7C,89,8F,5B,7C,88,8A,80 1360 DATA 7D,7C,41,7C,89,8F,88,7C,89,41,95,8A,88,7D,84,80 1370 DATA 47,82,84,7C,89,8F,5B,8E,8B,84,7F,80,8D,44,82,84 1380 DATA 7C,89,8F,5B,8D,7C,8F,41,7C,89,8F,88,7C,89,45,82 1390 DATA 84,7C,89,8F,5B,8F,84,7E,86,47,8E,86,80,87,80,8F 1400 DATA 7C,87,5B,7D,7C,8F,47,82,84,7C,89,8F,5B,88,7C,89 1410 DATA 8F,84,8E,59,A7,41,3C,8E,3B,0D,** 9999 REM CONVERT A HEXADECIMAL BYTE IN R0$ TO DECIMAL IN R0 11000 R1$=MID$(R0$,1,1):GOSUB11001:R0=R1*16:R1$=MID$(R0$,2,1):GOSUB11001:R0=R0+R1:RETURN 11001 IFR1$="A"THENR1=10:RETURN 11002 IFR1$="B"THENR1=11:RETURN 11003 IFR1$="C"THENR1=12:RETURN 11004 IFR1$="D"THENR1=13:RETURN 11005 IFR1$="E"THENR1=14:RETURN 11006 IFR1$="F"THENR1=15:RETURN 11007 R1=VAL(R1$):RETURN ; 1907 PRINTCHR$(175)STRING$(4,128)CHR$(220)CHR$(175)STRING$(7,128)CHR$(220)CHR$(175)CHR$(128)CHR$(175)CHR$(220)STRING$(7,128)CHR$(175)CHR$(220)STRING$(3,128)CHR$(175); 1908 PRINTCHR$(175)STRING$(4,128)CHR$(220)CHR$(175)STRING$(7,128)CHR$(220)STRING$(3,175)CHR$(220)STRING$(7,128)CHR$(175)CHR$(220)STRING$(3,128)CHR$(175); 1909 PRINTCHR$(175)STRING$(4,128)CHR$(22B,3B,3B,6A,50,3D,51,3D 119 DATA 3B,3B,3D,3B,3B,3D,3B,3B,3D,3D,3B,3D,3D,3B,47,3B,3B,3D,3D,3D,3B,3D,3D,3B,3B,40,3D,3B,3D,3B,42,3B 120 DATA 5F,3D,3B,47,42,3B,3D,42,3B,3B,3B,3B,46,42,58,44,3B,3B,5D,3B,3B,3B,3B,40,3B,3D,3F,3B,42,3B,53,3D 121 DATA 3B,4E,40,42,3B,3B,3B,46,46,3D,3D,48,3D,3D,3D,3D,3D,3D,53,3D,42,3D,4A,3D,3D,3D,3D,42,3D,3D,3D,3D 122 DATA 3D,3D,49,3D,3D,3D,3D,3B,3D,4E,3D,3D,3F,3D,3D,3B,3B,3B,3B,67,3B,47,65,3B,3B,51,47,3B,3B,47,3B,3B 123 DATA 4C,3B,3B,47,47,3D,3D,51,47,3D,51,3D,51,0D,44,47,3D,3D,62,3D,47,42,3D,3D,3D,58,42,47,4C,3D,47,42 124 DATA 3D,47,47,4B,42,3B,3D,3D,3D,49,47,3D,3B,3B,3B,3B,3B,5D,63,47,56,3B,3B,44,44,4C,4F,47,48,47,3B,4A 125 DATA 50,50,47,3B,3B,3B,3B,3B,3B,3B,3B,5F,3B,47,42,4F,42,3B,47,3B,3B,3B,4C,3B,42,3B,3B,3B,3B,3B,3B,3B 126 DATA 42,47,4E,47,51,3B,3B,47,3B,3B,3B,3B,6A,50,47,65,51,3B,3B,47,3B,3B,47,3B,3B,47,4C,3B,47,47,3B,51 127 DATA 3B,3B,47,51,51,3B,47,47,3B,3B,45,42,3B,42,3B,47,3B,64,42,3B,4C,47,3B,42,47,3B,3B,3B,3B,4C,47,5D 128 DATA 49,3B,3B,62,3B,3B,3B,3B,45,3B,5D,44,3B,4C,3B,58,47,3B,5B,45,4C,3B,3B,3B,50,50,47,3D,4D,3D,3D,47 129 DATA 3D,3D,3D,5D,47,47,42,4F,42,3D,3D,3D,47,42,3D,3D,42,3D,3D,4E,3D,3D,3D,3D,3B,47,58,47,3D,44,3D,47 130 DATA 3B,3B,3B,3B,3B,3B,3B,3C,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B 131 DATA 3D,3E,3B,3F,3F,3B,3F,0D,3F,3F,3F,3F,3F,3F,3F,3F,3F,3F,3F,40,46,3B,3B,3B,3B,3B,3B,42,3B,3B,3B,3B 132 DATA 3B,3B,3B,3B,3E,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3B,3D,3D,3B 133 DATA 3C,3C,3B,3D,3E,3D,3C,3C,3C,3C,3E,3D,3C,3C,3C,3D,3E,3B,3B,3B,3B,3B,3B,3E,3B,3B,3B,3B,3B,3B,3B,3B 134 DATA 3B,3C,3B,3B,3B,3B,3B,3B,3B,3B,3B,3D,3F,3B,3B,3B,3B,3B,3B,3B,3F,3B,3B,3B,3B,3B,3B,3B,40,40,3B,3B 135 DATA 3B,3B,40,40,3B,40,3B,3B,40,3B,3B,3B,3B,3B,3B,41,3B,3B,42,42,3B,3B,3B,3B,3B,3D,3D,3D,3D,47,3B,3D 136 DATA 3D,3D,3D,3D,3D,3D,3D,44,44,3D,3D,3D,3D,3D,3D,3D,4E,3D,3D,3D,3D,3D,3D,3D,3F,3F,3D,3D,3D,3B,3F,3F 137 DATA 3D,3F,3D,3B,3F,3D,3D,3D,3D,3D,3D,3F,3D,3D,4C,3F,3D,3B,3B,3B,3B,3D,3D,3D,3D,3F,3B,3D,3D,3D,3D,3D 138 DATA 3D,3D,3D,44,43,3D,3D,3D,3D,3D,3D,3D,42,3D,3D,3D,3D,3D,3D,3D,3F,3F,3D,3D,3D,3B,3F,4C,3D,3F,3D,3B 139 DATA 4B,0D,3D,3D,3D,3D,3D,3D,3F,3D,3D,3F,3F,3D,3B,3B,3B,3B,4F,4F,4F,4F,4F,4F,3C,4F,3B,3D,4F,4F,3E,4F 140 DATA 3F,3B,4F,4F,3B,40,41,41,40,4F,42,42,4F,4F,43,