00000000: 00 40 2E 49 20 47 45 28 31 30 29 3C 31 30 0D 2E |.@.I GE(10)<10..|
00000010: 54 20 4A 20 2B 33 0D 2E 21 54 55 4E 4C 0D 21 52 |T J +3..!TUNL.!R|
00000020: 4F 41 44 0D 2E 49 20 47 45 28 31 30 29 3A 30 0D |OAD..I GE(10):0.|
00000030: 2E 54 20 4C 20 4C 2C 52 4F 41 44 20 43 4C 0D 2E |.T L L,ROAD CL..|
00000040: 45 20 4C 20 4C 2C 52 4F 41 44 20 53 4E 0D 2E 53 |E L L,ROAD SN..S|
00000050: 20 44 3D 47 45 28 39 29 0D 2E 53 20 46 3D 47 45 | D=GE(9)..S F=GE|
00000060: 28 31 31 29 0D 2E 53 20 50 3D 33 2D 50 0D 2E 43 |(11)..S P=3-P..C|
00000070: 20 31 2C 50 2C 30 0D 2E 49 20 46 3A 30 0D 2E 54 | 1,P,0..I F:0..T|
00000080: 20 42 20 52 44 31 43 4C 0D 2E 49 20 46 3A 31 0D | B RD1CL..I F:1.|
00000090: 2E 54 20 42 20 52 44 33 43 4C 0D 2E 49 20 46 3A |.T B RD3CL..I F:|
000000A0: 32 0D 2E 54 20 42 20 52 44 32 43 4C 0D 2E 49 20 |2..T B RD2CL..I |
000000B0: 46 3A 33 0D 2E 54 20 42 20 52 44 34 43 4C 0D 2E |F:3..T B RD4CL..|
000000C0: 49 20 46 3A 34 0D 2E 54 20 42 20 52 44 35 43 4C |I F:4..T B RD5CL|
000000D0: 0D 2E 53 20 56 3D 50 0D 2E 44 20 0D 2E 43 20 30 |..S V=P..D ..C 0|
000000E0: 2C 50 2C 31 34 34 0D 2E 24 20 50 0D 2E 53 20 46 |,P,144..$ P..S F|
000000F0: 3D 46 2B 2B 0D 2E 49 20 46 3A 35 0D 2E 54 20 53 |=F++..I F:5..T S|
00000100: 20 46 3D 30 0D 2E 53 20 44 3D 44 2D 2D 0D 2E 49 | F=0..S D=D--..I|
00000110: 20 4D 4E 28 30 29 3A 30 0D 2E 54 20 49 20 4D 4E | MN(0):0..T I MN|
00000120: 28 32 29 3A 30 0D 2E 54 20 21 57 41 49 54 0D 2E |(2):0..T !WAIT..|
00000130: 49 20 44 3E 30 0D 2E 54 20 4A 20 2D 32 34 0D 2E |I D>0..T J -24..|
00000140: 5F 20 50 0D 2E 53 20 47 45 28 31 31 29 3D 47 45 |_ P..S GE(11)=GE|
00000150: 28 31 31 29 2B 33 0D 2E 49 20 47 45 28 31 31 29 |(11)+3..I GE(11)|
00000160: 3E 34 0D 2E 54 20 53 20 47 45 28 31 31 29 3D 47 |>4..T S GE(11)=G|
00000170: 45 28 31 31 29 2D 35 0D 2E 21 47 4F 54 4F 0D 21 |E(11)-5..!GOTO.!|
00000180: 54 55 4E 4C 0D 2E 4C 20 4C 2C 54 55 4E 4E 45 4C |TUNL..L L,TUNNEL|
00000190: 0D 2E 53 20 41 3D 30 0D 2E 53 20 42 3D 47 45 28 |..S A=0..S B=GE(|
000001A0: 31 30 29 0D 2E 49 20 42 3E 39 0D 2E 54 20 53 20 |10)..I B>9..T S |
000001B0: 41 3D 41 2B 2B 0D 2E 54 20 53 20 42 3D 42 2D 31 |A=A++..T S B=B-1|
000001C0: 30 0D 2E 54 20 4A 20 2D 33 0D 2E 49 20 41 3E 31 |0..T J -3..I A>1|
000001D0: 0D 2E 54 20 21 4C 4F 4F 50 0D 2E 49 20 41 3A 32 |..T !LOOP..I A:2|
000001E0: 0D 2E 54 20 21 4C 45 46 54 0D 2E 49 20 41 3A 33 |..T !LEFT..I A:3|
000001F0: 0D 2E 54 20 21 52 47 48 54 0D 2E 49 20 41 3A 34 |..T !RGHT..I A:4|
00000200: 0D 2E 54 20 21 44 45 4E 44 0D 2E 21 4C 4F 4F 50 |..T !DEND..!LOOP|
00000210: 0D 2E 49 20 42 3A 30 0D 2E 54 20 21 52 4F 4F 4D |..I B:0..T !ROOM|
00000220: 0D 2E 49 20 42 3A 31 0D 2E 54 20 21 52 54 4C 46 |..I B:1..T !RTLF|
00000230: 0D 2E 49 20 42 3A 32 0D 2E 54 20 21 46 57 4C 46 |..I B:2..T !FWLF|
00000240: 0D 2E 49 20 42 3A 33 0D 2E 54 20 21 46 57 52 54 |..I B:3..T !FWRT|
00000250: 0D 2E 21 47 4F 54 4F 0D 21 52 4F 4F 4D 0D 2E 53 |..!GOTO.!ROOM..S|
00000260: 20 46 3D 37 30 0D 2E 21 44 52 57 42 0D 2E 53 20 | F=70..!DRWB..S |
00000270: 46 3D 31 36 0D 2E 21 44 52 57 31 0D 21 52 54 4C |F=16..!DRW1.!RTL|
00000280: 46 0D 2E 53 20 46 3D 32 30 32 0D 2E 21 44 52 57 |F..S F=202..!DRW|
00000290: 42 0D 21 46 57 4C 46 0D 2E 53 20 46 3D 36 37 0D |B.!FWLF..S F=67.|
000002A0: 2E 21 44 52 57 42 0D 2E 53 20 46 3D 33 35 0D 2E |.!DRWB..S F=35..|
000002B0: 21 44 52 57 42 0D 21 46 57 52 54 0D 2E 53 20 46 |!DRWB.!FWRT..S F|
000002C0: 3D 39 38 0D 2E 21 44 52 57 42 0D 2E 53 20 46 3D |=98..!DRWB..S F=|
000002D0: 39 37 0D 2E 21 44 52 57 42 0D 21 44 45 4E 44 0D |97..!DRWB.!DEND.|
000002E0: 2E 53 20 46 3D 31 30 37 0D 2E 21 44 52 57 42 0D |.S F=107..!DRWB.|
000002F0: 2E 53 20 46 3D 37 38 0D 2E 21 44 52 57 42 0D 2E |.S F=78..!DRWB..|
00000300: 50 20 22 54 68 65 20 70 61 73 73 61 67 65 20 64 |P "The passage d|
00000310: 65 61 64 20 65 6E 64 73 2E 20 59 6F 75 20 74 75 |ead ends. You tu|
00000320: 72 6E 20 62 61 63 6B 2E 0D 2E 21 4D 4F 52 45 0D |rn back...!MORE.|
00000330: 21 52 47 48 54 0D 2E 53 20 46 3D 31 30 36 0D 2E |!RGHT..S F=106..|
00000340: 21 44 52 57 42 0D 2E 53 20 46 3D 37 36 0D 2E 21 |!DRWB..S F=76..!|
00000350: 44 52 57 42 0D 2E 50 20 22 54 68 65 20 70 61 73 |DRWB..P "The pas|
00000360: 73 61 67 65 20 74 75 72 6E 73 20 72 69 67 68 74 |sage turns right|
00000370: 2E 0D 2E 21 4D 4F 52 45 0D 21 4C 45 46 54 0D 2E |...!MORE.!LEFT..|
00000380: 53 20 46 3D 37 35 0D 2E 21 44 52 57 42 0D 2E 53 |S F=75..!DRWB..S|
00000390: 20 46 3D 31 34 0D 2E 21 44 52 57 42 0D 2E 50 20 | F=14..!DRWB..P |
000003A0: 22 54 68 65 20 70 61 73 73 61 67 65 20 74 75 72 |"The passage tur|
000003B0: 6E 73 20 6C 65 66 74 2E 0D 2E 21 4D 4F 52 45 0D |ns left...!MORE.|
000003C0: 21 4C 4F 4F 50 0D 2E 53 20 48 3D 33 30 0D 2E 53 |!LOOP..S H=30..S|
000003D0: 20 4C 3D 47 45 28 39 29 0D 2E 53 20 46 3D 39 39 | L=GE(9)..S F=99|
000003E0: 0D 2E 21 44 52 57 42 0D 2E 53 20 4C 3D 4C 2D 2D |..!DRWB..S L=L--|
000003F0: 0D 2E 49 20 4C 3E 30 0D 2E 54 20 49 20 4D 4E 28 |..I L>0..T I MN(|
00000400: 30 29 3A 30 0D 2E 54 20 4A 20 2D 34 0D 21 44 52 |0):0..T J -4.!DR|
00000410: 57 31 0D 2E 53 20 44 3D 31 0D 2E 21 44 52 41 57 |W1..S D=1..!DRAW|
00000420: 0D 21 44 52 57 42 0D 2E 21 44 52 57 31 0D 2E 53 |.!DRWB..!DRW1..S|
00000430: 20 44 3D 30 0D 2E 57 20 0D 2E 57 20 0D 2E 21 44 | D=0..W ..W ..!D|
00000440: 52 41 57 0D 21 44 52 41 57 0D 2E 53 20 50 3D 33 |RAW.!DRAW..S P=3|
00000450: 2D 50 0D 2E 43 20 31 2C 50 2C 30 0D 2E 42 20 52 |-P..C 1,P,0..B R|
00000460: 47 48 54 4C 0D 2E 53 20 56 3D 50 0D 2E 44 20 0D |GHTL..S V=P..D .|
00000470: 2E 42 20 54 4E 32 2D 31 0D 2E 53 20 56 3D 50 0D |.B TN2-1..S V=P.|
00000480: 2E 49 20 44 0D 2E 54 20 44 20 0D 2E 49 20 44 0D |.I D..T D ..I D.|
00000490: 2E 54 20 42 20 54 4E 32 2D 32 0D 2E 45 20 42 20 |.T B TN2-2..E B |
000004A0: 54 4E 31 2D 31 0D 2E 53 20 56 3D 50 0D 2E 49 20 |TN1-1..S V=P..I |
000004B0: 46 26 36 34 0D 2E 54 20 44 20 0D 2E 49 20 44 0D |F&64..T D ..I D.|
000004C0: 2E 54 20 42 20 54 4E 32 2D 33 0D 2E 45 20 42 20 |.T B TN2-3..E B |
000004D0: 54 4E 31 2D 32 0D 2E 53 20 56 3D 50 0D 2E 49 20 |TN1-2..S V=P..I |
000004E0: 46 26 39 36 0D 2E 54 20 44 20 0D 2E 49 20 44 0D |F&96..T D ..I D.|
000004F0: 2E 54 20 42 20 54 4E 32 2D 34 0D 2E 45 20 42 20 |.T B TN2-4..E B |
00000500: 54 4E 31 2D 33 0D 2E 53 20 56 3D 50 0D 2E 49 20 |TN1-3..S V=P..I |
00000510: 46 26 33 32 0D 2E 54 20 44 20 0D 2E 49 20 44 0D |F&32..T D ..I D.|
00000520: 2E 54 20 42 20 54 4E 32 2D 35 0D 2E 45 20 42 20 |.T B TN2-5..E B |
00000530: 54 4E 31 2D 34 0D 2E 53 20 56 3D 50 0D 2E 49 20 |TN1-4..S V=P..I |
00000540: 46 26 31 0D 2E 54 20 44 20 0D 2E 49 20 44 0D 2E |F&1..T D ..I D..|
00000550: 54 20 42 20 54 4E 32 2D 36 0D 2E 45 20 42 20 54 |T B TN2-6..E B T|
00000560: 4E 31 2D 35 0D 2E 53 20 56 3D 50 0D 2E 49 20 46 |N1-5..S V=P..I F|
00000570: 26 33 0D 2E 54 20 44 20 0D 2E 49 20 44 0D 2E 54 |&3..T D ..I D..T|
00000580: 20 42 20 54 4E 32 2D 37 0D 2E 45 20 42 20 54 4E | B TN2-7..E B TN|
00000590: 31 2D 36 0D 2E 53 20 56 3D 50 0D 2E 49 20 46 26 |1-6..S V=P..I F&|
000005A0: 32 0D 2E 54 20 44 20 0D 2E 42 20 54 4E 32 2D 39 |2..T D ..B TN2-9|
000005B0: 0D 2E 45 20 53 20 43 4F 28 30 29 3D 31 32 37 0D |..E S CO(0)=127.|
000005C0: 2E 53 20 56 3D 50 0D 2E 49 20 44 0D 2E 54 20 44 |.S V=P..I D..T D|
000005D0: 20 0D 2E 49 20 44 0D 2E 54 20 42 20 54 4E 32 2D | ..I D..T B TN2-|
000005E0: 38 0D 2E 45 20 42 20 54 4E 31 2D 37 0D 2E 53 20 |8..E B TN1-7..S |
000005F0: 56 3D 50 0D 2E 49 20 46 26 33 0D 2E 54 20 44 20 |V=P..I F&3..T D |
00000600: 0D 2E 42 20 54 4E 31 2D 41 0D 2E 49 20 46 26 34 |..B TN1-A..I F&4|
00000610: 0D 2E 45 20 4A 20 2B 34 0D 2E 49 20 44 0D 2E 54 |..E J +4..I D..T|
00000620: 20 53 20 59 3D 31 30 0D 2E 45 20 53 20 59 3D 32 | S Y=10..E S Y=2|
00000630: 35 0D 2E 53 20 56 3D 50 0D 2E 49 20 46 26 31 32 |5..S V=P..I F&12|
00000640: 38 0D 2E 54 20 49 20 44 3A 30 0D 2E 54 20 53 20 |8..T I D:0..T S |
00000650: 59 3D 31 30 0D 2E 49 20 46 26 31 36 0D 2E 45 20 |Y=10..I F&16..E |
00000660: 44 20 0D 2E 42 20 54 4E 31 2D 42 0D 2E 49 20 46 |D ..B TN1-B..I F|
00000670: 26 34 0D 2E 45 20 4A 20 2B 37 0D 2E 49 20 44 0D |&4..E J +7..I D.|
00000680: 2E 54 20 53 20 59 3D 32 34 39 0D 2E 45 20 53 20 |.T S Y=249..E S |
00000690: 59 3D 32 33 31 0D 2E 49 20 46 26 38 0D 2E 54 20 |Y=231..I F&8..T |
000006A0: 53 20 43 4F 28 30 29 3D 31 37 37 0D 2E 4A 20 2B |S CO(0)=177..J +|
000006B0: 36 0D 2E 49 20 46 26 38 0D 2E 54 20 49 20 44 3A |6..I F&8..T I D:|
000006C0: 30 0D 2E 54 20 53 20 43 4F 28 30 29 3D 31 37 39 |0..T S CO(0)=179|
000006D0: 0D 2E 54 20 49 20 46 26 31 32 38 0D 2E 54 20 53 |..T I F&128..T S|
000006E0: 20 59 3D 32 33 38 0D 2E 53 20 56 3D 50 0D 2E 49 | Y=238..S V=P..I|
000006F0: 20 46 26 31 36 0D 2E 45 20 44 20 0D 2E 42 20 54 | F&16..E D ..B T|
00000700: 4E 31 2D 43 0D 2E 49 20 46 26 31 36 0D 2E 54 20 |N1-C..I F&16..T |
00000710: 53 20 43 4F 28 30 29 3D 31 33 32 0D 2E 53 20 56 |S CO(0)=132..S V|
00000720: 3D 50 0D 2E 44 20 0D 2E 49 20 48 3A 32 36 0D 2E |=P..D ..I H:26..|
00000730: 54 20 4A 20 2B 31 31 0D 2E 42 20 4F 42 4A 2D 34 |T J +11..B OBJ-4|
00000740: 0D 2E 49 20 48 3A 32 37 0D 2E 54 20 53 20 56 3D |..I H:27..T S V=|
00000750: 50 0D 2E 45 20 53 20 56 3D 50 2B 38 0D 2E 53 20 |P..E S V=P+8..S |
00000760: 58 3D 4D 53 28 48 29 0D 2E 53 20 59 3D 4D 45 28 |X=MS(H)..S Y=ME(|
00000770: 48 29 0D 2E 53 20 53 3D 4D 57 28 48 29 0D 2E 53 |H)..S S=MW(H)..S|
00000780: 20 54 3D 53 0D 2E 44 20 0D 2E 53 20 48 3D 48 2D | T=S..D ..S H=H-|
00000790: 2D 0D 2E 21 43 4C 52 54 0D 2E 49 20 4D 4E 28 30 |-..!CLRT..I MN(0|
000007A0: 29 3A 30 0D 2E 54 20 57 20 0D 2E 54 20 57 20 0D |):0..T W ..T W .|
000007B0: 2E 24 20 50 0D 40 20 20 20 20 0D 0D |.$ P.@ .. |
.@.I GE(10)<10..T J +3..!TUNL.!ROAD..I G
E(10):0..T L L,ROAD CL..E L L,ROAD SN..S
D=GE(9)..S F=GE(11)..S P=3-P..C 1,P,0..
I F:0..T B RD1CL..I F:1..T B RD3CL..I F:
2..T B RD2CL..I F:3..T B RD4CL..I F:4..T
B RD5CL..S V=P..D ..C 0,P,144..$ P..S F
=F++..I F:5..T S F=0..S D=D--..I MN(0):0
..T I MN(2):0..T !WAIT..I D>0..T J -24..
_ P..S GE(11)=GE(11)+3..I GE(11)>4..T S
GE(11)=GE(11)-5..!GOTO.!TUNL..L L,TUNNEL
..S A=0..S B=GE(10)..I B>9..T S A=A++..T
S B=B-10..T J -3..I A>1..T !LOOP..I A:2
..T !LEFT..I A:3..T !RGHT..I A:4..T !DEN
D..!LOOP..I B:0..T !ROOM..I B:1..T !RTLF
..I B:2..T !FWLF..I B:3..T !FWRT..!GOTO.
!ROOM..S F=70..!DRWB..S F=16..!DRW1.!RTL
F..S F=202..!DRWB.!FWLF..S F=67..!DRWB..
S F=35..!DRWB.!FWRT..S F=98..!DRWB..S F=
97..!DRWB.!DEND..S F=107..!DRWB..S F=78.
.!DRWB..P "THE PASSAGE DEAD ENDS. YOU TU
RN BACK...!MORE.!RGHT..S F=106..!DRWB..S
F=76..!DRWB..P "THE PASSAGE TURNS RIGHT
...!MORE.!LEFT..S F=75..!DRWB..S F=14..!
DRWB..P "THE PASSAGE TURNS LEFT...!MORE.
!LOOP..S H=30..S L=GE(9)..S F=99..!DRWB.
.S L=L--..I L>0..T I MN(0):0..T J -4.!DR
W1..S D=1..!DRAW.!DRWB..!DRW1..S D=0..W
..W ..!DRAW.!DRAW..S P=3-P..C 1,P,0..B R
GHTL..S V=P..D ..B TN2-1..S V=P..I D..T
D ..I D..T B TN2-2..E B TN1-1..S V=P..I
F&64..T D ..I D..T B TN2-3..E B TN1-2..S
V=P..I F&96..T D ..I D..T B TN2-4..E B
TN1-3..S V=P..I F&32..T D ..I D..T B TN2
-5..E B TN1-4..S V=P..I F&1..T D ..I D..
T B TN2-6..E B TN1-5..S V=P..I F&3..T D
..I D..T B TN2-7..E B TN1-6..S V=P..I F&
2..T D ..B TN2-9..E S CO(0)=127..S V=P..
I D..T D ..I D..T B TN2-8..E B TN1-7..S
V=P..I F&3..T D ..B TN1-A..I F&4..E J +4
..I D..T S Y=10..E S Y=25..S V=P..I F&12
8..T I D:0..T S Y=10..I F&16..E D ..B TN
1-B..I F&4..E J +7..I D..T S Y=249..E S
Y=231..I F&8..T S CO(0)=177..J +6..I F&8
..T I D:0..T S CO(0)=179..T I F&128..T S
Y=238..S V=P..I F&16..E D ..B TN1-C..I
F&16..T S CO(0)=132..S V=P..D ..I H:26..
T J +11..B OBJ-4..I H:27..T S V=P..E S V
=P+8..S X=MS(H)..S Y=ME(H)..S S=MW(H)..S
T=S..D ..S H=H--..!CLRT..I MN(0):0..T W
..T W ..$ P.@ ..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL