00000000: 00 20 2E 49 20 54 4C 28 32 33 29 3A 32 35 34 0D |. .I TL(23):254.|
00000010: 2E 54 20 50 20 22 53 69 65 20 65 72 67 72 65 69 |.T P "Sie ergrei|
00000020: 66 65 6E 20 64 69 65 20 4D 61 73 6B 65 2E 0D 2E |fen die Maske...|
00000030: 53 20 54 4C 28 32 33 29 3D 32 35 35 0D 2E 4C 20 |S TL(23)=255..L |
00000040: 4C 2C 54 55 4E 20 54 52 56 4C 0D 2E 53 20 41 3D |L,TUN TRVL..S A=|
00000050: 30 0D 2E 53 20 42 3D 30 0D 2E 53 20 43 3D 30 0D |0..S B=0..S C=0.|
00000060: 2E 53 20 44 3D 30 0D 2E 49 20 47 45 28 36 29 3E |.S D=0..I GE(6)>|
00000070: 39 39 0D 2E 54 20 21 44 45 4E 44 0D 2E 49 20 47 |99..T !DEND..I G|
00000080: 45 28 36 29 3E 31 39 0D 2E 54 20 21 52 47 48 54 |E(6)>19..T !RGHT|
00000090: 0D 2E 49 20 47 45 28 36 29 3E 39 0D 2E 54 20 21 |..I GE(6)>9..T !|
000000A0: 4C 45 46 54 0D 2E 53 20 41 3D 30 0D 2E 53 20 42 |LEFT..S A=0..S B|
000000B0: 3D 30 0D 2E 53 20 44 3D 30 0D 2E 49 20 47 45 28 |=0..S D=0..I GE(|
000000C0: 36 29 3A 31 0D 2E 54 20 53 20 41 3D 31 0D 2E 54 |6):1..T S A=1..T|
000000D0: 20 53 20 42 3D 31 0D 2E 49 20 47 45 28 36 29 3A | S B=1..I GE(6):|
000000E0: 32 0D 2E 54 20 53 20 44 3D 31 0D 2E 49 20 47 45 |2..T S D=1..I GE|
000000F0: 28 36 29 3A 33 0D 2E 54 20 53 20 41 3D 31 0D 2E |(6):3..T S A=1..|
00000100: 54 20 53 20 42 3D 31 0D 2E 54 20 53 20 44 3D 31 |T S B=1..T S D=1|
00000110: 0D 2E 49 20 47 45 28 36 29 3A 34 0D 2E 54 20 53 |..I GE(6):4..T S|
00000120: 20 42 3D 31 0D 2E 54 20 53 20 44 3D 31 0D 2E 49 | B=1..T S D=1..I|
00000130: 20 47 45 28 36 29 3A 35 0D 2E 54 20 53 20 41 3D | GE(6):5..T S A=|
00000140: 31 0D 2E 54 20 53 20 44 3D 31 0D 2E 49 20 47 45 |1..T S D=1..I GE|
00000150: 28 36 29 3A 36 0D 2E 54 20 53 20 42 3D 31 0D 2E |(6):6..T S B=1..|
00000160: 54 20 53 20 43 3D 31 0D 2E 49 20 47 45 28 36 29 |T S C=1..I GE(6)|
00000170: 3A 37 0D 2E 54 20 53 20 41 3D 31 0D 2E 54 20 53 |:7..T S A=1..T S|
00000180: 20 43 3D 31 0D 2E 49 20 47 45 28 36 29 3A 39 0D | C=1..I GE(6):9.|
00000190: 2E 54 20 53 20 41 3D 31 0D 2E 54 20 53 20 42 3D |.T S A=1..T S B=|
000001A0: 31 0D 2E 21 4C 4F 4F 50 0D 2E 49 20 47 45 28 36 |1..!LOOP..I GE(6|
000001B0: 29 3A 39 0D 2E 54 20 21 43 4C 52 54 0D 2E 54 20 |):9..T !CLRT..T |
000001C0: 50 20 22 45 69 6E 20 4C 6F 63 68 20 3C 66 66 6E |P "Ein Loch <ffn|
000001D0: 65 74 20 73 69 63 68 20 75 6E 74 65 72 20 49 68 |et sich unter Ih|
000001E0: 6E 65 6E 21 21 21 0D 2E 54 20 21 57 41 49 54 0D |nen!!!..T !WAIT.|
000001F0: 2E 54 20 50 20 22 49 68 72 65 20 53 63 68 72 65 |.T P "Ihre Schre|
00000200: 69 65 20 68 61 6C 6C 65 6E 20 64 75 63 68 20 64 |ie hallen duch d|
00000210: 65 6E 20 54 75 6E 6E 65 6C 2E 0D 2E 54 20 21 57 |en Tunnel...T !W|
00000220: 41 49 54 0D 2E 54 20 21 44 45 41 44 0D 2E 21 47 |AIT..T !DEAD..!G|
00000230: 4F 54 4F 0D 21 44 45 4E 44 0D 2E 53 20 47 45 28 |OTO.!DEND..S GE(|
00000240: 36 29 3D 47 45 28 36 29 2D 31 30 30 0D 2E 53 20 |6)=GE(6)-100..S |
00000250: 41 3D 31 0D 2E 53 20 42 3D 31 0D 2E 53 20 44 3D |A=1..S B=1..S D=|
00000260: 31 0D 2E 21 4C 4F 4F 50 0D 2E 21 43 4C 52 54 0D |1..!LOOP..!CLRT.|
00000270: 2E 50 20 22 45 69 6E 65 20 53 61 63 6B 67 61 73 |.P "Eine Sackgas|
00000280: 73 65 21 20 53 69 65 20 6B 65 68 72 65 6E 20 75 |se! Sie kehren u|
00000290: 6D 2E 0D 2E 21 4D 4F 52 45 0D 21 52 47 48 54 0D |m...!MORE.!RGHT.|
000002A0: 2E 53 20 41 3D 31 0D 2E 53 20 44 3D 31 0D 2E 21 |.S A=1..S D=1..!|
000002B0: 4C 4F 4F 50 0D 2E 53 20 47 45 28 36 29 3D 47 45 |LOOP..S GE(6)=GE|
000002C0: 28 36 29 2D 32 30 0D 2E 21 43 4C 52 54 0D 2E 50 |(6)-20..!CLRT..P|
000002D0: 20 22 44 65 72 20 54 75 6E 6E 65 6C 20 62 69 65 | "Der Tunnel bie|
000002E0: 67 74 20 6E 61 63 68 20 72 65 63 68 74 73 2E 0D |gt nach rechts..|
000002F0: 2E 21 4D 4F 52 45 0D 21 4C 45 46 54 0D 2E 53 20 |.!MORE.!LEFT..S |
00000300: 42 3D 31 0D 2E 53 20 44 3D 31 0D 2E 21 4C 4F 4F |B=1..S D=1..!LOO|
00000310: 50 0D 2E 53 20 47 45 28 36 29 3D 47 45 28 36 29 |P..S GE(6)=GE(6)|
00000320: 2D 31 30 0D 2E 21 43 4C 52 54 0D 2E 50 20 22 44 |-10..!CLRT..P "D|
00000330: 65 72 20 54 75 6E 6E 65 6C 20 62 69 65 67 74 20 |er Tunnel biegt |
00000340: 6E 61 63 68 20 6C 69 6E 6B 73 2E 0D 2E 21 4D 4F |nach links...!MO|
00000350: 52 45 0D 21 4C 4F 4F 50 0D 2E 53 20 4C 3D 33 0D |RE.!LOOP..S L=3.|
00000360: 2E 53 20 4C 3D 4C 2D 2D 0D 2E 53 20 4B 3D 31 0D |.S L=L--..S K=1.|
00000370: 2E 21 41 4E 49 4D 0D 2E 21 46 46 4C 41 0D 2E 53 |.!ANIM..!FFLA..S|
00000380: 20 4B 3D 30 0D 2E 21 41 4E 49 4D 0D 2E 21 46 46 | K=0..!ANIM..!FF|
00000390: 4C 42 0D 2E 49 20 4C 3E 30 0D 2E 54 20 4A 20 2D |LB..I L>0..T J -|
000003A0: 38 0D 21 41 4E 49 4D 0D 2E 53 20 50 3D 33 2D 50 |8.!ANIM..S P=3-P|
000003B0: 0D 2E 43 20 31 2C 50 2C 30 0D 2E 42 20 52 47 48 |..C 1,P,0..B RGH|
000003C0: 54 4C 0D 2E 53 20 56 3D 50 0D 2E 44 20 0D 2E 49 |TL..S V=P..D ..I|
000003D0: 20 4B 0D 2E 54 20 42 20 54 41 42 4B 47 0D 2E 45 | K..T B TABKG..E|
000003E0: 20 42 20 54 42 42 4B 47 0D 2E 53 20 56 3D 50 0D | B TBBKG..S V=P.|
000003F0: 2E 44 20 0D 2E 49 20 4B 0D 2E 54 20 42 20 54 41 |.D ..I K..T B TA|
00000400: 4C 46 41 0D 2E 45 20 42 20 54 42 4C 46 41 0D 2E |LFA..E B TBLFA..|
00000410: 53 20 56 3D 50 0D 2E 49 20 4C 3E 30 0D 2E 45 20 |S V=P..I L>0..E |
00000420: 49 20 41 3A 31 0D 2E 54 20 44 20 0D 2E 49 20 4B |I A:1..T D ..I K|
00000430: 0D 2E 54 20 42 20 54 41 4C 46 42 0D 2E 45 20 42 |..T B TALFB..E B|
00000440: 20 54 42 4C 46 42 0D 2E 53 20 56 3D 50 0D 2E 49 | TBLFB..S V=P..I|
00000450: 20 4C 3E 31 0D 2E 45 20 49 20 41 3A 31 0D 2E 45 | L>1..E I A:1..E|
00000460: 20 49 20 43 3E 4C 0D 2E 54 20 44 20 0D 2E 49 20 | I C>L..T D ..I |
00000470: 4B 0D 2E 54 20 42 20 54 41 54 50 41 0D 2E 45 20 |K..T B TATPA..E |
00000480: 42 20 54 42 54 50 41 0D 2E 53 20 56 3D 50 0D 2E |B TBTPA..S V=P..|
00000490: 49 20 4C 3E 30 0D 2E 45 20 49 20 41 2B 42 0D 2E |I L>0..E I A+B..|
000004A0: 54 20 44 20 0D 2E 49 20 4B 0D 2E 54 20 42 20 54 |T D ..I K..T B T|
000004B0: 41 54 50 42 0D 2E 45 20 42 20 54 42 54 50 42 0D |ATPB..E B TBTPB.|
000004C0: 2E 53 20 56 3D 50 0D 2E 49 20 4C 3E 31 0D 2E 45 |.S V=P..I L>1..E|
000004D0: 20 49 20 41 2B 42 0D 2E 54 20 44 20 0D 2E 49 20 | I A+B..T D ..I |
000004E0: 4B 0D 2E 54 20 42 20 54 41 52 54 41 0D 2E 45 20 |K..T B TARTA..E |
000004F0: 42 20 54 42 52 54 41 0D 2E 53 20 56 3D 50 0D 2E |B TBRTA..S V=P..|
00000500: 49 20 4C 3E 30 0D 2E 45 20 49 20 42 3A 31 0D 2E |I L>0..E I B:1..|
00000510: 54 20 44 20 0D 2E 49 20 4B 0D 2E 54 20 42 20 54 |T D ..I K..T B T|
00000520: 41 52 54 42 0D 2E 45 20 42 20 54 42 52 54 42 0D |ARTB..E B TBRTB.|
00000530: 2E 53 20 56 3D 50 0D 2E 49 20 4C 3E 31 0D 2E 45 |.S V=P..I L>1..E|
00000540: 20 49 20 42 3A 31 0D 2E 54 20 44 20 0D 2E 49 20 | I B:1..T D ..I |
00000550: 4B 0D 2E 54 20 42 20 54 41 52 54 44 0D 2E 45 20 |K..T B TARTD..E |
00000560: 42 20 54 42 52 54 45 0D 2E 53 20 56 3D 50 0D 2E |B TBRTE..S V=P..|
00000570: 49 20 43 3E 4C 0D 2E 54 20 49 20 42 3A 30 0D 2E |I C>L..T I B:0..|
00000580: 54 20 44 20 0D 2E 49 20 4B 0D 2E 54 20 42 20 54 |T D ..I K..T B T|
00000590: 41 52 54 43 0D 2E 45 20 42 20 54 42 52 54 44 0D |ARTC..E B TBRTD.|
000005A0: 2E 53 20 56 3D 50 0D 2E 49 20 4C 3A 30 0D 2E 54 |.S V=P..I L:0..T|
000005B0: 20 49 20 43 3A 30 0D 2E 54 20 49 20 41 3E 42 0D | I C:0..T I A>B.|
000005C0: 2E 54 20 44 20 0D 2E 49 20 4B 0D 2E 54 20 42 20 |.T D ..I K..T B |
000005D0: 54 41 4C 46 43 0D 2E 45 20 42 20 54 42 4C 46 43 |TALFC..E B TBLFC|
000005E0: 0D 2E 53 20 56 3D 50 0D 2E 49 20 4C 3C 32 0D 2E |..S V=P..I L<2..|
000005F0: 54 20 49 20 41 3C 42 0D 2E 54 20 44 20 0D 2E 49 |T I A<B..T D ..I|
00000600: 20 4B 0D 2E 54 20 42 20 54 41 4C 46 44 0D 2E 45 | K..T B TALFD..E|
00000610: 20 42 20 54 42 4C 46 44 0D 2E 53 20 56 3D 50 0D | B TBLFD..S V=P.|
00000620: 2E 49 20 41 3C 42 0D 2E 54 20 49 20 43 3E 4C 0D |.I A<B..T I C>L.|
00000630: 2E 54 20 44 20 0D 2E 49 20 4B 0D 2E 54 20 4A 20 |.T D ..I K..T J |
00000640: 2B 36 0D 2E 42 20 54 42 52 54 43 0D 2E 53 20 56 |+6..B TBRTC..S V|
00000650: 3D 50 0D 2E 49 20 4C 3A 31 0D 2E 54 20 49 20 41 |=P..I L:1..T I A|
00000660: 3E 42 0D 2E 54 20 44 20 0D 21 46 46 4C 41 0D 2E |>B..T D .!FFLA..|
00000670: 42 20 54 41 46 50 41 0D 2E 53 20 56 3D 50 0D 2E |B TAFPA..S V=P..|
00000680: 44 20 0D 2E 42 20 54 41 46 50 42 0D 2E 53 20 56 |D ..B TAFPB..S V|
00000690: 3D 50 0D 2E 49 20 41 2B 42 0D 2E 54 20 4A 20 2B |=P..I A+B..T J +|
000006A0: 38 0D 2E 49 20 4C 3A 31 0D 2E 54 20 53 20 59 3D |8..I L:1..T S Y=|
000006B0: 59 2D 36 0D 2E 54 20 57 20 0D 2E 49 20 4C 3A 30 |Y-6..T W ..I L:0|
000006C0: 0D 2E 54 20 53 20 59 3D 59 2D 31 38 0D 2E 54 20 |..T S Y=Y-18..T |
000006D0: 57 20 0D 2E 54 20 57 20 0D 2E 49 20 44 3A 31 0D |W ..T W ..I D:1.|
000006E0: 2E 54 20 49 20 4C 3A 30 0D 2E 54 20 53 20 43 4F |.T I L:0..T S CO|
000006F0: 28 30 29 3D 35 32 2B 31 32 38 0D 2E 44 20 0D 2E |(0)=52+128..D ..|
00000700: 43 20 30 2C 50 2C 31 39 32 0D 2E 24 20 50 0D 21 |C 0,P,192..$ P.!|
00000710: 46 46 4C 42 0D 2E 42 20 54 42 46 50 41 0D 2E 53 |FFLB..B TBFPA..S|
00000720: 20 59 3D 32 0D 2E 53 20 56 3D 50 0D 2E 49 20 4C | Y=2..S V=P..I L|
00000730: 3A 30 0D 2E 54 20 49 20 47 45 28 36 29 3A 39 0D |:0..T I GE(6):9.|
00000740: 2E 54 20 53 20 43 4F 28 30 29 3D 34 2B 31 32 38 |.T S CO(0)=4+128|
00000750: 0D 2E 44 20 0D 2E 42 20 54 42 46 50 42 0D 2E 53 |..D ..B TBFPB..S|
00000760: 20 56 3D 50 0D 2E 49 20 41 2B 42 0D 2E 54 20 4A | V=P..I A+B..T J|
00000770: 20 2B 38 0D 2E 49 20 4C 3A 31 0D 2E 54 20 53 20 | +8..I L:1..T S |
00000780: 59 3D 59 2D 31 34 0D 2E 54 20 57 20 0D 2E 49 20 |Y=Y-14..T W ..I |
00000790: 4C 3A 30 0D 2E 54 20 53 20 59 3D 59 2D 32 39 0D |L:0..T S Y=Y-29.|
000007A0: 2E 54 20 57 20 0D 2E 54 20 57 20 0D 2E 49 20 44 |.T W ..T W ..I D|
000007B0: 3A 31 0D 2E 54 20 49 20 4C 3A 30 0D 2E 54 20 53 |:1..T I L:0..T S|
000007C0: 20 43 4F 28 30 29 3D 31 30 33 2B 31 32 38 0D 2E | CO(0)=103+128..|
000007D0: 44 20 0D 2E 43 20 30 2C 50 2C 31 39 32 0D 2E 24 |D ..C 0,P,192..$|
000007E0: 20 50 0D 40 40 40 40 40 0D | P.@@@@@. |
. .I TL(23):254..T P "SIE ERGREIFEN DIE
MASKE...S TL(23)=255..L L,TUN TRVL..S A=
0..S B=0..S C=0..S D=0..I GE(6)>99..T !D
END..I GE(6)>19..T !RGHT..I GE(6)>9..T !
LEFT..S A=0..S B=0..S D=0..I GE(6):1..T
S A=1..T S B=1..I GE(6):2..T S D=1..I GE
(6):3..T S A=1..T S B=1..T S D=1..I GE(6
):4..T S B=1..T S D=1..I GE(6):5..T S A=
1..T S D=1..I GE(6):6..T S B=1..T S C=1.
.I GE(6):7..T S A=1..T S C=1..I GE(6):9.
.T S A=1..T S B=1..!LOOP..I GE(6):9..T !
CLRT..T P "EIN LOCH <FFNET SICH UNTER IH
NEN!!!..T !WAIT..T P "IHRE SCHREIE HALLE
N DUCH DEN TUNNEL...T !WAIT..T !DEAD..!G
OTO.!DEND..S GE(6)=GE(6)-100..S A=1..S B
=1..S D=1..!LOOP..!CLRT..P "EINE SACKGAS
SE! SIE KEHREN UM...!MORE.!RGHT..S A=1..
S D=1..!LOOP..S GE(6)=GE(6)-20..!CLRT..P
"DER TUNNEL BIEGT NACH RECHTS...!MORE.!
LEFT..S B=1..S D=1..!LOOP..S GE(6)=GE(6)
-10..!CLRT..P "DER TUNNEL BIEGT NACH LIN
KS...!MORE.!LOOP..S L=3..S L=L--..S K=1.
.!ANIM..!FFLA..S K=0..!ANIM..!FFLB..I L>
0..T J -8.!ANIM..S P=3-P..C 1,P,0..B RGH
TL..S V=P..D ..I K..T B TABKG..E B TBBKG
..S V=P..D ..I K..T B TALFA..E B TBLFA..
S V=P..I L>0..E I A:1..T D ..I K..T B TA
LFB..E B TBLFB..S V=P..I L>1..E I A:1..E
I C>L..T D ..I K..T B TATPA..E B TBTPA.
.S V=P..I L>0..E I A+B..T D ..I K..T B T
ATPB..E B TBTPB..S V=P..I L>1..E I A+B..
T D ..I K..T B TARTA..E B TBRTA..S V=P..
I L>0..E I B:1..T D ..I K..T B TARTB..E
B TBRTB..S V=P..I L>1..E I B:1..T D ..I
K..T B TARTD..E B TBRTE..S V=P..I C>L..T
I B:0..T D ..I K..T B TARTC..E B TBRTD.
.S V=P..I L:0..T I C:0..T I A>B..T D ..I
K..T B TALFC..E B TBLFC..S V=P..I L<2..
T I A<B..T D ..I K..T B TALFD..E B TBLFD
..S V=P..I A<B..T I C>L..T D ..I K..T J
+6..B TBRTC..S V=P..I L:1..T I A>B..T D
.!FFLA..B TAFPA..S V=P..D ..B TAFPB..S V
=P..I A+B..T J +8..I L:1..T S Y=Y-6..T W
..I L:0..T S Y=Y-18..T W ..T W ..I D:1.
.T I L:0..T S CO(0)=52+128..D ..C 0,P,19
2..$ P.!FFLB..B TBFPA..S Y=2..S V=P..I L
:0..T I GE(6):9..T S CO(0)=4+128..D ..B
TBFPB..S V=P..I A+B..T J +8..I L:1..T S
Y=Y-14..T W ..I L:0..T S Y=Y-29..T W ..T
W ..I D:1..T I L:0..T S CO(0)=103+128..
D ..C 0,P,192..$ P.@@@@@.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL