LISTING 22
FILE INFORMATION
FILENAME(S): LISTING 22
FILE TYPE(S): PRG
FILE SIZE: 4K
FIRST SEEN: 2025-11-02 17:00:02
APPEARS ON: 3 disk(s)
FILE HASH
b4a662f7d955fc1f7bbba08f1c57507fbca6163182340b207de6ea8ad92a509f
FOUND ON DISKS (3 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 64 ER SONDERH 52 | LISTING 22 | PRG | Treasure Chest - Sammlung | 22 | 7 | DOWNLOAD FILE |
| ROLLENSPIEL | LISTING 22 | PRG | C64er, DuncanTwain | 10 | 4 | DOWNLOAD FILE |
| 64 ER SONDERH 52 | LISTING 22 | PRG | C64er | 22 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 25 08 00 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..%.... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 00 49 08 01 00 8F 20 2A 20 41 44 |*****.I.... * AD|
00000030: 56 45 4E 54 55 52 45 2D 50 52 4F 47 52 41 4D 4D |VENTURE-PROGRAMM|
00000040: 49 45 52 4B 55 52 53 20 2A 00 6D 08 02 00 8F 20 |IERKURS *.m.... |
00000050: 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |* |
00000060: 20 20 20 20 20 20 20 20 20 20 20 20 2A 00 91 08 | *...|
00000070: 03 00 8F 20 2A 20 20 20 20 20 55 45 42 55 4E 47 |... * UEBUNG|
00000080: 53 2D 50 52 4F 47 52 41 4D 4D 20 20 20 20 20 20 |S-PROGRAMM |
00000090: 2A 00 B5 08 04 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |*...... ********|
000000A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000B0: 2A 2A 2A 2A 2A 00 CD 08 09 00 8F 20 42 41 53 49 |*****...... BASI|
000000C0: 43 2D 45 52 57 45 49 54 45 52 55 4E 47 00 1B 09 |C-ERWEITERUNG...|
000000D0: 0A 00 83 37 36 2C 32 34 2C 31 2C 31 37 37 2C 32 |...76,24,1,177,2|
000000E0: 35 31 2C 31 34 35 2C 32 35 31 2C 32 30 30 2C 32 |51,145,251,200,2|
000000F0: 30 38 2C 32 34 39 2C 32 33 30 2C 32 35 32 2C 32 |08,249,230,252,2|
00000100: 30 32 2C 32 30 38 2C 32 34 34 2C 39 36 2C 31 32 |02,208,244,96,12|
00000110: 30 2C 31 36 30 2C 30 2C 31 36 39 00 68 09 0C 00 |0,160,0,169.h...|
00000120: 83 31 36 30 2C 31 33 32 2C 32 35 31 2C 31 33 33 |.160,132,251,133|
00000130: 2C 32 35 32 2C 31 36 32 2C 33 32 2C 33 32 2C 31 |,252,162,32,32,1|
00000140: 31 2C 31 2C 31 36 39 2C 32 32 34 2C 31 33 32 2C |1,1,169,224,132,|
00000150: 32 35 31 2C 31 33 33 2C 32 35 32 2C 31 36 32 2C |251,133,252,162,|
00000160: 33 32 2C 33 32 2C 31 31 00 9C 09 0E 00 83 31 2C |32,32,11......1,|
00000170: 31 36 39 2C 35 33 2C 31 33 33 2C 31 2C 38 38 2C |169,53,133,1,88,|
00000180: 39 36 3A 81 49 B2 32 36 34 A4 33 31 30 3A 87 58 |96:.I.264.310:.X|
00000190: 3A 97 49 2C 58 3A 82 3A 9E 32 36 34 00 B5 09 10 |:.I,X:.:.264....|
000001A0: 00 81 49 B2 37 31 30 A4 37 33 30 3A 87 58 3A 97 |..I.710.730:.X:.|
000001B0: 49 2C 58 3A 82 00 FE 09 12 00 83 32 30 38 2C 33 |I,X:.......208,3|
000001C0: 2C 37 36 2C 32 39 2C 31 36 38 2C 33 32 2C 31 39 |,76,29,168,32,19|
000001D0: 32 2C 32 2C 33 32 2C 31 39 2C 31 36 36 2C 35 36 |2,2,32,19,166,56|
000001E0: 2C 31 36 35 2C 39 35 2C 32 33 33 2C 31 2C 31 36 |,165,95,233,1,16|
000001F0: 34 2C 39 36 2C 37 36 2C 33 36 2C 31 36 38 00 1C |4,96,76,36,168..|
00000200: 0A 14 00 97 34 30 39 39 36 2C 31 39 37 3A 97 34 |....40996,197:.4|
00000210: 30 39 39 37 2C 32 3A 97 31 2C 35 34 00 39 0A 16 |0997,2:.1,54.9..|
00000220: 00 81 49 B2 34 33 31 36 38 A4 34 33 31 37 30 3A |..I.43168.43170:|
00000230: 87 58 3A 97 49 2C 58 3A 82 00 52 0A 18 00 81 49 |.X:.I,X:..R....I|
00000240: B2 37 30 34 A4 37 30 39 3A 87 58 3A 97 49 2C 58 |.704.709:.X:.I,X|
00000250: 3A 82 00 76 0A 1A 00 83 33 32 2C 31 39 32 2C 32 |:..v....32,192,2|
00000260: 2C 33 32 2C 31 33 38 2C 31 37 33 2C 37 36 2C 32 |,32,138,173,76,2|
00000270: 34 37 2C 31 38 33 00 99 0A 1E 00 8D 35 32 30 30 |47,183......5200|
00000280: 30 3A 20 8F 20 54 41 42 45 4C 4C 45 4E 20 44 45 |0: . TABELLEN DE|
00000290: 46 46 49 4E 49 45 52 45 4E 00 A8 0A 64 00 5A 4E |FFINIEREN...d.ZN|
000002A0: B2 31 3A 89 31 31 33 30 00 C4 0A E8 03 8F 20 41 |.1:.1130...... A|
000002B0: 20 43 20 54 20 49 20 4F 20 4E 20 4D 20 4F 20 44 | C T I O N M O D|
000002C0: 20 55 20 4C 00 E5 0A F2 03 8D 35 30 30 30 30 3A | U L......50000:|
000002D0: 8F 20 42 45 46 45 48 4C 53 45 49 4E 47 41 42 45 |. BEFEHLSEINGABE|
000002E0: 4D 4F 44 55 4C 00 05 0B 4C 04 8F 20 47 45 48 45 |MODUL...L.. GEHE|
000002F0: 4E 20 49 4E 20 45 49 4E 20 4E 45 55 45 53 20 5A |N IN EIN NEUES Z|
00000300: 49 4D 4D 45 52 00 1A 0B 51 04 8B 56 45 B3 31 B0 |IMMER...Q..VE.1.|
00000310: 56 45 B1 31 30 A7 31 32 30 30 00 4E 0B 56 04 8B |VE.10.1200.N.V..|
00000320: 52 49 28 56 45 29 B2 30 A7 99 22 4B 45 49 4E 20 |RI(VE).0.."KEIN |
00000330: 57 45 47 20 49 4E 20 44 49 45 53 45 20 52 49 43 |WEG IN DIESE RIC|
00000340: 48 54 55 4E 47 20 21 22 3A 89 31 32 30 30 00 61 |HTUNG !":.1200.a|
00000350: 0B 60 04 5A 4E B2 52 49 28 56 45 29 3A 99 22 93 |.`.ZN.RI(VE):.".|
00000360: 22 00 74 0B 6A 04 8D 20 31 30 30 30 30 AA 5A 4E |".t.j.. 10000.ZN|
00000370: AC 31 30 30 00 87 0B 74 04 8C 20 31 30 30 30 30 |.100...t.. 10000|
00000380: AA 5A 4E AC 31 30 30 00 9C 0B 7E 04 81 49 B2 31 |.ZN.100...~..I.1|
00000390: A4 31 30 3A 87 52 49 28 49 29 3A 82 00 BD 0B 88 |.10:.RI(I):.....|
000003A0: 04 99 22 11 4D 4F 45 47 4C 49 43 48 45 20 52 49 |..".MOEGLICHE RI|
000003B0: 43 48 54 55 4E 47 45 4E 20 3A 20 22 3B 00 EA 0B |CHTUNGEN : ";...|
000003C0: 8D 04 49 43 B2 30 3A 81 49 B2 31 A4 31 30 3A 8B |..IC.0:.I.1.10:.|
000003D0: 52 49 28 49 29 B3 B1 30 A7 99 56 45 24 28 49 29 |RI(I)..0..VE$(I)|
000003E0: 3B 22 2C 22 3B 3A 49 43 B2 31 00 F1 0B 92 04 82 |;",";:IC.1......|
000003F0: 49 00 05 0C 97 04 8B 49 43 B2 30 A7 99 22 4B 45 |I......IC.0.."KE|
00000400: 49 4E 45 2E 22 00 16 0C 9C 04 8B 49 43 B2 31 A7 |INE."......IC.1.|
00000410: 99 C7 28 32 30 29 00 2A 0C A1 04 99 22 49 43 48 |..(20).*...."ICH|
00000420: 20 53 45 48 45 20 3A 20 22 3B 00 57 0C A2 04 49 | SEHE : ";.W...I|
00000430: 43 B2 30 3A 81 49 B2 31 A4 4F 5A 3A 8B 4F 4F 28 |C.0:.I.1.OZ:.OO(|
00000440: 49 29 B2 5A 4E A7 99 4F 42 24 28 49 29 3B 22 2C |I).ZN..OB$(I);",|
00000450: 22 3B 3A 49 43 B2 31 00 5D 0C A3 04 82 00 85 0C |";:IC.1.].......|
00000460: A4 04 81 49 B2 31 A4 47 5A 3A 8B 47 45 28 49 29 |...I.1.GZ:.GE(I)|
00000470: B2 5A 4E A7 99 47 45 24 28 49 29 3B 22 2C 22 3B |.ZN..GE$(I);",";|
00000480: 3A 49 43 B2 31 00 8B 0C A6 04 82 00 AB 0C A8 04 |:IC.1...........|
00000490: 8B 49 43 B2 30 A7 99 22 4E 49 43 48 54 53 20 42 |.IC.0.."NICHTS B|
000004A0: 45 53 4F 4E 44 45 52 45 53 2E 22 00 BC 0C AA 04 |ESONDERES.".....|
000004B0: 8B 49 43 B2 31 A7 99 C7 28 32 30 29 00 C2 0C B0 |.IC.1...(20)....|
000004C0: 04 8F 00 F1 0C D0 07 8F 20 52 45 41 4B 54 49 4F |........ REAKTIO|
000004D0: 4E 20 41 55 46 20 42 45 46 45 48 4C 45 20 28 41 |N AUF BEFEHLE (A|
000004E0: 4C 4C 47 45 4D 45 49 4E 45 20 41 43 54 49 4F 4E |LLGEMEINE ACTION|
000004F0: 29 00 04 0D 34 08 8F 20 4E 49 4D 4D 20 52 4F 55 |)...4.. NIMM ROU|
00000500: 54 49 4E 45 00 15 0D 3E 08 8B 56 45 B3 B1 31 35 |TINE...>..VE..15|
00000510: A7 32 32 30 30 00 50 0D 48 08 8B 47 45 28 47 31 |.2200.P.H..GE(G1|
00000520: 29 B3 B1 5A 4E A7 99 22 49 43 48 20 53 45 48 45 |)..ZN.."ICH SEHE|
00000530: 20 44 49 45 53 45 4E 20 47 45 47 45 4E 53 54 41 | DIESEN GEGENSTA|
00000540: 4E 44 20 48 49 45 52 20 4E 49 43 48 54 20 21 22 |ND HIER NICHT !"|
00000550: 00 88 0D 4D 08 8B 47 45 28 47 31 29 B2 AB 31 A7 |...M..GE(G1)..1.|
00000560: 99 22 53 49 45 20 48 41 42 45 4E 20 44 49 45 53 |."SIE HABEN DIES|
00000570: 45 4E 20 47 45 47 45 4E 53 54 41 4E 44 20 42 45 |EN GEGENSTAND BE|
00000580: 52 45 49 54 53 20 21 22 00 A8 0D 52 08 8B 47 45 |REITS !"...R..GE|
00000590: 28 47 31 29 B2 5A 4E A7 47 45 28 47 31 29 B2 AB |(G1).ZN.GE(G1)..|
000005A0: 31 3A 99 22 4F 4B 2E 22 00 BF 0D 98 08 8F 20 49 |1:."OK."...... I|
000005B0: 4E 56 45 4E 54 55 52 20 52 4F 55 54 49 4E 45 00 |NVENTUR ROUTINE.|
000005C0: D0 0D 9D 08 8B 56 45 B3 B1 32 32 A7 32 33 30 30 |.....VE..22.2300|
000005D0: 00 E3 0D A2 08 99 22 49 43 48 20 48 41 42 45 3A |......"ICH HABE:|
000005E0: 20 22 3B 00 0F 0E AC 08 49 43 B2 30 3A 81 49 B2 | ";.....IC.0:.I.|
000005F0: 31 A4 47 5A 3A 8B 47 45 28 49 29 B2 AB 31 A7 99 |1.GZ:.GE(I)..1..|
00000600: 47 45 24 28 49 29 22 2C 22 3B 3A 49 43 B2 31 00 |GE$(I)",";:IC.1.|
00000610: 15 0E B1 08 82 00 2A 0E B6 08 8B 49 43 B2 30 A7 |......*....IC.0.|
00000620: 99 22 4E 49 43 48 54 53 2E 22 00 3A 0E BB 08 8B |."NICHTS.".:....|
00000630: 49 43 B2 31 A7 99 22 9D 20 22 00 50 0E FC 08 8F |IC.1..". ".P....|
00000640: 20 56 45 52 4C 49 45 52 20 52 4F 55 54 49 4E 45 | VERLIER ROUTINE|
00000650: 00 61 0E 01 09 8B 56 45 B3 B1 31 38 A7 32 34 30 |.a....VE..18.240|
00000660: 30 00 89 0E 06 09 8B 47 45 28 47 31 29 B3 B1 AB |0......GE(G1)...|
00000670: 31 A7 99 22 49 43 48 20 48 41 42 45 20 44 41 53 |1.."ICH HABE DAS|
00000680: 20 4E 49 43 48 54 20 21 22 00 A9 0E 10 09 8B 47 | NICHT !"......G|
00000690: 45 28 47 31 29 B2 AB 31 A7 47 45 28 47 31 29 B2 |E(G1)..1.GE(G1).|
000006A0: 5A 4E 3A 99 22 4F 4B 2E 22 00 BF 0E 60 09 8F 20 |ZN:."OK."...`.. |
000006B0: 53 43 48 41 55 20 2D 20 52 4F 55 54 49 4E 45 00 |SCHAU - ROUTINE.|
000006C0: D0 0E 65 09 8B 56 45 B3 B1 31 33 A7 32 35 30 30 |..e..VE..13.2500|
000006D0: 00 EF 0E 6A 09 8B 4F 42 B2 30 AF 47 31 B2 30 A7 |...j..OB.0.G1.0.|
000006E0: 99 22 93 22 3A 56 45 B2 30 3A 89 31 31 33 30 00 |.".":VE.0:.1130.|
000006F0: 1F 0F 6F 09 8B 4F 42 B2 31 AF 4F 4F 28 31 29 B2 |..o..OB.1.OO(1).|
00000700: 5A 4E A7 99 22 44 49 45 20 54 52 55 48 45 20 49 |ZN.."DIE TRUHE I|
00000710: 53 54 20 53 45 48 52 20 47 52 4F 53 53 2E 22 00 |ST SEHR GROSS.".|
00000720: 29 0F C4 09 89 31 30 30 30 00 4A 0F 10 27 8F 20 |)....1000.J..'. |
00000730: 2D 2D 2D 2D 2D 2D 2D 20 53 50 49 45 4C 4B 41 52 |------- SPIELKAR|
00000740: 54 45 20 2D 2D 2D 2D 2D 2D 2D 00 61 0F 74 27 8F |TE -------.a.t'.|
00000750: 20 52 41 55 4D 20 31 20 2D 2D 2D 2D 2D 2D 2D 2D | RAUM 1 --------|
00000760: 2D 00 7B 0F 76 27 83 20 30 2C 33 2C 30 2C 32 2C |-.{.v'. 0,3,0,2,|
00000770: 30 2C 30 2C 30 2C 30 2C 30 2C 30 00 90 0F 79 27 |0,0,0,0,0,0...y'|
00000780: 99 22 52 41 55 4D 20 4E 55 4D 4D 45 52 20 31 22 |."RAUM NUMMER 1"|
00000790: 00 96 0F 88 27 8E 00 AD 0F D8 27 8F 20 52 41 55 |....'.....'. RAU|
000007A0: 4D 20 32 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 C7 0F |M 2 ---------...|
000007B0: DA 27 83 20 30 2C 35 2C 31 2C 30 2C 30 2C 30 2C |.'. 0,5,1,0,0,0,|
000007C0: 30 2C 36 2C 30 2C 30 00 DC 0F DD 27 99 22 52 41 |0,6,0,0....'."RA|
000007D0: 55 4D 20 4E 55 4D 4D 45 52 20 32 22 00 E2 0F EC |UM NUMMER 2"....|
000007E0: 27 8E 00 F9 0F 3C 28 8F 20 52 41 55 4D 20 33 20 |'....<(. RAUM 3 |
000007F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 13 10 3E 28 83 20 |---------...>(. |
00000800: 31 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C |1,0,0,0,0,0,0,0,|
00000810: 30 2C 34 00 28 10 41 28 99 22 52 41 55 4D 20 4E |0,4.(.A(."RAUM N|
00000820: 55 4D 4D 45 52 20 33 22 00 2E 10 50 28 8E 00 45 |UMMER 3"...P(..E|
00000830: 10 A0 28 8F 20 52 41 55 4D 20 34 20 2D 2D 2D 2D |..(. RAUM 4 ----|
00000840: 2D 2D 2D 2D 2D 00 5F 10 A2 28 83 20 30 2C 30 2C |-----._..(. 0,0,|
00000850: 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 33 2C 30 00 |0,0,0,0,0,0,3,0.|
00000860: 74 10 A5 28 99 22 52 41 55 4D 20 4E 55 4D 4D 45 |t..(."RAUM NUMME|
00000870: 52 20 34 22 00 7A 10 B4 28 8E 00 91 10 04 29 8F |R 4".z..(.....).|
00000880: 20 52 41 55 4D 20 35 20 2D 2D 2D 2D 2D 2D 2D 2D | RAUM 5 --------|
00000890: 2D 00 AB 10 06 29 83 20 32 2C 30 2C 30 2C 30 2C |-....). 2,0,0,0,|
000008A0: 30 2C 30 2C 30 2C 30 2C 30 2C 30 00 C0 10 09 29 |0,0,0,0,0,0....)|
000008B0: 99 22 52 41 55 4D 20 4E 55 4D 4D 45 52 20 35 22 |."RAUM NUMMER 5"|
000008C0: 00 C6 10 18 29 8E 00 DD 10 68 29 8F 20 52 41 55 |....)....h). RAU|
000008D0: 4D 20 36 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 F7 10 |M 6 ---------...|
000008E0: 6A 29 83 20 30 2C 30 2C 30 2C 30 2C 32 2C 30 2C |j). 0,0,0,0,2,0,|
000008F0: 30 2C 30 2C 30 2C 30 00 0C 11 6D 29 99 22 52 41 |0,0,0,0...m)."RA|
00000900: 55 4D 20 4E 55 4D 4D 45 52 20 36 22 00 12 11 7C |UM NUMMER 6"...||
00000910: 29 8E 00 35 11 50 C3 8F 20 2A 2A 2A 2A 2A 2A 2A |)..5.P.. *******|
00000920: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000930: 2A 2A 2A 2A 2A 00 58 11 5A C3 8F 20 2A 20 20 20 |*****.X.Z.. * |
00000940: 20 20 42 45 46 45 48 4C 53 45 49 4E 47 41 42 45 | BEFEHLSEINGABE|
00000950: 20 20 20 20 20 20 20 2A 00 7B 11 64 C3 8F 20 2A | *.{.d.. *|
00000960: 20 20 20 20 20 42 45 46 45 48 4C 53 5A 45 52 4C | BEFEHLSZERL|
00000970: 45 47 55 4E 47 20 20 20 20 20 2A 00 9E 11 6E C3 |EGUNG *...n.|
00000980: 8F 20 2A 20 20 20 20 20 42 45 46 45 48 4C 53 43 |. * BEFEHLSC|
00000990: 4F 44 49 45 52 55 4E 47 20 20 20 20 20 2A 00 C1 |ODIERUNG *..|
000009A0: 11 78 C3 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.x.. ***********|
000009B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000009C0: 2A 00 D1 11 82 C3 8B 55 44 B2 31 A7 35 30 32 32 |*......UD.1.5022|
000009D0: 30 00 F2 11 8C C3 97 31 39 38 2C 30 3A 42 45 24 |0......198,0:BE$|
000009E0: B2 22 22 3A 99 22 57 41 53 20 4E 55 4E 20 3F 20 |."":."WAS NUN ? |
000009F0: 22 3B 00 FD 11 96 C3 97 32 30 34 2C 30 00 12 12 |";......204,0...|
00000A00: A0 C3 A1 58 24 3A 8B 58 24 B2 22 22 A7 35 30 30 |...X$:.X$."".500|
00000A10: 38 30 00 3D 12 AA C3 8B C2 28 32 30 33 29 B2 31 |80.=.....(203).1|
00000A20: B0 C3 28 42 45 24 29 B1 36 38 A7 99 22 20 22 3A |..(BE$).68.." ":|
00000A30: 97 32 30 34 2C 31 3A 89 35 30 31 34 30 00 6D 12 |.204,1:.50140.m.|
00000A40: B4 C3 49 B2 C6 28 58 24 29 3A 8B 49 B3 36 35 B0 |..I..(X$):.I.65.|
00000A50: 49 B1 39 30 A7 8B 49 B3 B1 33 32 AF 49 B3 B1 32 |I.90..I..32.I..2|
00000A60: 30 AF 49 B3 B1 33 34 A7 35 30 30 38 30 00 84 12 |0.I..34.50080...|
00000A70: BE C3 8B 49 B2 32 30 AF 42 45 24 B2 22 22 A7 35 |...I.20.BE$."".5|
00000A80: 30 30 38 30 00 BA 12 C8 C3 8B 49 B2 32 30 A7 97 |0080......I.20..|
00000A90: 32 30 34 2C 31 3A 99 22 9D 20 20 9D 9D 22 3B 3A |204,1:.". ..";:|
00000AA0: 42 45 24 B2 C8 28 42 45 24 2C C3 28 42 45 24 29 |BE$..(BE$,.(BE$)|
00000AB0: AB 31 29 3A 89 35 30 30 37 30 00 D5 12 D2 C3 99 |.1):.50070......|
00000AC0: 58 24 3B 3A 42 45 24 B2 42 45 24 AA 58 24 3A 89 |X$;:BE$.BE$.X$:.|
00000AD0: 35 30 30 38 30 00 FE 12 DC C3 81 49 B2 31 A4 31 |50080......I.1.1|
00000AE0: 30 3A 42 45 24 28 49 29 B2 22 22 3A 82 3A 57 5A |0:BE$(I)."":.:WZ|
00000AF0: B2 31 3A 81 49 B2 31 A4 C3 28 42 45 24 29 00 21 |.1:.I.1..(BE$).!|
00000B00: 13 E6 C3 3A 8B CA 28 42 45 24 2C 49 2C 31 29 B2 |...:..(BE$,I,1).|
00000B10: 22 20 22 A7 8D 35 30 31 39 30 3A 89 35 30 31 38 |" "..50190:.5018|
00000B20: 30 00 58 13 F0 C3 3A 8B 57 5A B1 31 30 A7 99 22 |0.X...:.WZ.10.."|
00000B30: 45 49 4E 47 41 42 45 20 49 53 54 20 5A 55 20 4C |EINGABE IST ZU L|
00000B40: 41 4E 47 20 21 22 3A 49 B2 C3 28 42 45 24 29 AA |ANG !":I..(BE$).|
00000B50: 31 3A 89 35 30 31 38 30 00 78 13 FA C3 3A 42 45 |1:.50180.x...:BE|
00000B60: 24 28 57 5A 29 B2 42 45 24 28 57 5A 29 AA CA 28 |$(WZ).BE$(WZ)..(|
00000B70: 42 45 24 2C 49 2C 31 29 00 86 13 04 C4 82 49 3A |BE$,I,1)......I:|
00000B80: 89 35 30 32 32 30 00 AE 13 0E C4 49 43 B2 30 3A |.50220.....IC.0:|
00000B90: 81 49 31 B2 31 A4 41 5A 3A 8B 42 45 24 28 57 5A |.I1.1.AZ:.BE$(WZ|
00000BA0: 29 B2 41 55 24 28 49 31 29 A7 49 43 B2 31 00 C6 |).AU$(I1).IC.1..|
00000BB0: 13 18 C4 82 49 31 3A 8B 49 43 B2 30 A7 57 5A B2 |....I1:.IC.0.WZ.|
00000BC0: 57 5A AA 31 3A 8E 00 D7 13 22 C4 42 45 24 28 57 |WZ.1:....".BE$(W|
00000BD0: 5A 29 B2 22 22 3A 8E 00 ED 13 2C C4 8B 55 44 B2 |Z)."":....,..UD.|
00000BE0: 31 A7 55 44 B2 30 3A 89 35 30 32 34 30 00 05 14 |1.UD.0:.50240...|
00000BF0: 36 C4 57 5A B2 31 3A 56 45 B2 30 3A 4F 42 B2 30 |6.WZ.1:VE.0:OB.0|
00000C00: 3A 50 45 B2 30 00 18 14 40 C4 49 43 B2 30 3A 47 |:PE.0...@.IC.0:G|
00000C10: 31 B2 30 3A 47 32 B2 30 00 3E 14 4A C4 81 49 B2 |1.0:G2.0.>.J..I.|
00000C20: 31 A4 56 5A 3A 8B 42 45 24 28 57 5A 29 B2 56 45 |1.VZ:.BE$(WZ).VE|
00000C30: 24 28 49 29 A7 56 45 B2 49 3A 49 43 B2 31 00 56 |$(I).VE.I:IC.1.V|
00000C40: 14 4B C4 8B C3 28 42 45 24 28 57 5A 29 29 B3 33 |.K...(BE$(WZ)).3|
00000C50: A7 35 30 32 36 30 00 91 14 4F C4 8B 42 45 24 28 |.50260...O..BE$(|
00000C60: 57 5A 29 B2 C8 28 56 45 24 28 49 29 2C C3 28 42 |WZ)..(VE$(I),.(B|
00000C70: 45 24 28 57 5A 29 29 29 A7 56 45 B2 49 AB C5 28 |E$(WZ))).VE.I..(|
00000C80: C9 28 56 45 24 28 49 29 2C 31 29 29 3A 49 43 B2 |.(VE$(I),1)):IC.|
00000C90: 31 00 A4 14 54 C4 82 49 3A 8B 49 43 B2 31 A7 35 |1...T..I:.IC.1.5|
00000CA0: 30 33 35 30 00 C7 14 5E C4 81 49 B2 31 A4 47 5A |0350...^..I.1.GZ|
00000CB0: 3A 8B 42 45 24 28 57 5A 29 B3 B1 47 45 24 28 49 |:.BE$(WZ)..GE$(I|
00000CC0: 29 A7 35 30 33 30 30 00 DB 14 68 C4 49 43 B2 31 |).50300...h.IC.1|
00000CD0: 3A 8B 47 31 B2 30 A7 47 31 B2 49 00 F0 14 72 C4 |:.G1.0.G1.I...r.|
00000CE0: 47 32 B2 49 3A 8B 47 32 B2 47 31 A7 47 32 B2 30 |G2.I:.G2.G1.G2.0|
00000CF0: 00 03 15 7C C4 82 49 3A 8B 49 43 B2 31 A7 35 30 |...|..I:.IC.1.50|
00000D00: 33 35 30 00 29 15 86 C4 81 49 B2 31 A4 4F 5A 3A |350.)....I.1.OZ:|
00000D10: 8B 42 45 24 28 57 5A 29 B2 4F 42 24 28 49 29 A7 |.BE$(WZ).OB$(I).|
00000D20: 4F 42 B2 49 3A 49 43 B2 31 00 3C 15 90 C4 82 49 |OB.I:IC.1.<....I|
00000D30: 3A 8B 49 43 B2 31 A7 35 30 33 35 30 00 62 15 9A |:.IC.1.50350.b..|
00000D40: C4 81 49 B2 31 A4 50 5A 3A 8B 42 45 24 28 57 5A |..I.1.PZ:.BE$(WZ|
00000D50: 29 B2 50 45 24 28 49 29 A7 50 45 B2 49 3A 49 43 |).PE$(I).PE.I:IC|
00000D60: B2 31 00 69 15 A4 C4 82 49 00 86 15 AE C4 8B 42 |.1.i....I......B|
00000D70: 45 24 28 57 5A 29 B2 22 55 4E 44 22 A7 55 44 B2 |E$(WZ)."UND".UD.|
00000D80: 31 3A 49 43 B2 31 00 B3 15 B8 C4 8B 49 43 B2 30 |1:IC.1......IC.0|
00000D90: A7 99 22 49 43 48 20 4B 45 4E 4E 45 20 22 3B 42 |.."ICH KENNE ";B|
00000DA0: 45 24 28 57 5A 29 3B 22 20 4E 49 43 48 54 20 21 |E$(WZ);" NICHT !|
00000DB0: 22 3A 8E 00 D8 15 C2 C4 57 5A B2 57 5A AA 31 3A |":......WZ.WZ.1:|
00000DC0: 8B 57 5A B1 31 30 B0 42 45 24 28 57 5A 29 B2 22 |.WZ.10.BE$(WZ)."|
00000DD0: 22 B0 55 44 B2 31 A7 8E 00 E8 15 CC C4 49 43 B2 |".UD.1.......IC.|
00000DE0: 30 3A 89 35 30 32 35 30 00 FE 15 20 CB 8F 20 54 |0:.50250... .. T|
00000DF0: 20 41 20 42 20 45 20 4C 20 4C 20 45 20 4E 00 09 | A B E L L E N..|
00000E00: 16 25 CB 8C 35 32 30 30 30 00 25 16 2A CB 8F 20 |.%..52000.%.*.. |
00000E10: 56 45 52 42 54 41 42 45 4C 4C 45 20 2D 2D 2D 2D |VERBTABELLE ----|
00000E20: 2D 2D 2D 2D 2D 00 4A 16 34 CB 83 4E 2C 53 2C 57 |-----.J.4..N,S,W|
00000E30: 2C 4F 2C 4E 57 2C 4E 4F 2C 53 57 2C 53 4F 2C 52 |,O,NW,NO,SW,SO,R|
00000E40: 41 55 46 2C 52 55 4E 54 45 52 00 85 16 3E CB 83 |AUF,RUNTER...>..|
00000E50: 4F 45 46 46 4E 45 2C 53 43 48 4C 49 45 53 53 45 |OEFFNE,SCHLIESSE|
00000E60: 2C 53 43 48 41 55 45 2C 55 4E 54 45 52 53 55 43 |,SCHAUE,UNTERSUC|
00000E70: 48 45 31 2C 4E 49 4D 4D 2C 4E 45 48 4D 45 31 2C |HE1,NIMM,NEHME1,|
00000E80: 48 4F 4C 45 32 00 AF 16 43 CB 83 56 45 52 4C 49 |HOLE2...C..VERLI|
00000E90: 45 52 45 2C 4C 45 47 45 31 2C 57 49 52 46 32 2C |ERE,LEGE1,WIRF2,|
00000EA0: 57 45 52 46 45 33 2C 49 4E 56 45 4E 54 55 52 00 |WERFE3,INVENTUR.|
00000EB0: D4 16 84 CB 56 5A B2 32 32 3A 86 56 45 24 28 56 |....VZ.22:.VE$(V|
00000EC0: 5A 29 3A 81 49 B2 31 A4 56 5A 3A 87 56 45 24 28 |Z):.I.1.VZ:.VE$(|
00000ED0: 49 29 3A 82 00 F7 16 E8 CB 8F 20 47 45 47 45 4E |I):....... GEGEN|
00000EE0: 53 54 41 4E 44 53 54 41 42 45 4C 4C 45 20 2D 2D |STANDSTABELLE --|
00000EF0: 2D 2D 2D 2D 2D 2D 2D 00 06 17 F2 CB 83 53 43 48 |-------......SCH|
00000F00: 57 45 52 54 2C 31 00 12 17 F3 CB 83 53 45 49 4C |WERT,1......SEIL|
00000F10: 2C 32 00 24 17 F4 CB 83 53 43 48 4C 55 45 53 53 |,2.$....SCHLUESS|
00000F20: 45 4C 2C 34 00 33 17 F5 CB 83 44 49 41 4D 41 4E |EL,4.3....DIAMAN|
00000F30: 54 2C 35 00 65 17 4C CC 47 5A B2 34 3A 86 47 45 |T,5.e.L.GZ.4:.GE|
00000F40: 24 28 34 29 3A 86 47 45 28 34 29 3A 81 49 B2 31 |$(4):.GE(4):.I.1|
00000F50: A4 47 5A 3A 87 47 45 24 28 49 29 3A 87 47 45 28 |.GZ:.GE$(I):.GE(|
00000F60: 49 29 3A 82 49 00 83 17 B0 CC 8F 20 4F 42 4A 45 |I):.I...... OBJE|
00000F70: 4B 54 54 41 42 45 4C 4C 45 20 2D 2D 2D 2D 2D 2D |KTTABELLE ------|
00000F80: 2D 2D 2D 00 90 17 BA CC 83 54 52 55 48 45 2C 35 |---......TRUHE,5|
00000F90: 00 9F 17 BC CC 83 53 43 48 41 43 48 54 2C 36 00 |......SCHACHT,6.|
00000FA0: B0 17 BE CC 83 45 49 53 45 4E 52 49 4E 47 2C 36 |.....EISENRING,6|
00000FB0: 00 BC 17 C0 CC 83 54 55 45 52 2C 32 00 C8 17 C2 |......TUER,2....|
00000FC0: CC 83 54 55 45 52 2C 35 00 FC 17 14 CD 4F 5A B2 |..TUER,5.....OZ.|
00000FD0: 35 3A 86 4F 42 24 28 4F 5A 29 3A 86 4F 4F 28 4F |5:.OB$(OZ):.OO(O|
00000FE0: 5A 29 3A 81 49 B2 31 A4 4F 5A 3A 87 4F 42 24 28 |Z):.I.1.OZ:.OB$(|
00000FF0: 49 29 3A 87 4F 4F 28 49 29 3A 82 49 00 02 18 08 |I):.OO(I):.I....|
00001000: CF 8E 00 00 00 FF 00 |....... |
..%.... *****************************.I.
... * ADVENTURE-PROGRAMMIERKURS *.M....
* *...... *
UEBUNGS-PROGRAMM *...... ********
*********************.M.... BASIC-ERWEIT
ERUNG......76,24,1,177,251,145,251,200,2
08,249,230,252,202,208,244,96,120,160,0,
169.H....160,132,251,133,252,162,32,32,1
1,1,169,224,132,251,133,252,162,32,32,11
......1,169,53,133,1,88,96:.I.264.310:.X
:.I,X:.:.264......I.710.730:.X:.I,X:....
...208,3,76,29,168,32,192,2,32,19,166,56
,165,95,233,1,164,96,76,36,168......4099
6,197:.40997,2:.1,54.9....I.43168.43170:
.X:.I,X:..R....I.704.709:.X:.I,X:..V....
32,192,2,32,138,173,76,247,183......5200
0: . TABELLEN DEFFINIEREN...D.ZN.1:.1130
.D.... A C T I O N M O D U L......50000:
. BEFEHLSEINGABEMODUL...L.. GEHEN IN EIN
NEUES ZIMMER...Q..VE.1.VE.10.1200.N.V..
RI(VE).0.."KEIN WEG IN DIESE RICHTUNG !"
:.1200.A.`.ZN.RI(VE):.".".T.J.. 10000.ZN
.100...T.. 10000.ZN.100...~..I.1.10:.RI(
I):.......".MOEGLICHE RICHTUNGEN : ";...
..IC.0:.I.1.10:.RI(I)..0..VE$(I);",";:IC
.1......I......IC.0.."KEINE."......IC.1.
.G(20).*...."ICH SEHE : ";.W...IC.0:.I.1
.OZ:.OO(I).ZN..OB$(I);",";:IC.1.].......
...I.1.GZ:.GE(I).ZN..GE$(I);",";:IC.1...
.........IC.0.."NICHTS BESONDERES.".....
.IC.1..G(20).B.......P.. REAKTION AUF BE
FEHLE (ALLGEMEINE ACTION)...4.. NIMM ROU
TINE...>..VE..15.2200.P.H..GE(G1)..ZN.."
ICH SEHE DIESEN GEGENSTAND HIER NICHT !"
...M..GE(G1)..1.."SIE HABEN DIESEN GEGEN
STAND BEREITS !"...R..GE(G1).ZN.GE(G1)..
1:."OK."...... INVENTUR ROUTINE.P....VE.
.22.2300......"ICH HABE: ";.....IC.0:.I.
1.GZ:.GE(I)..1..GE$(I)",";:IC.1.......*.
...IC.0.."NICHTS.".:....IC.1..". ".P....
VERLIER ROUTINE.A....VE..18.2400......G
E(G1)...1.."ICH HABE DAS NICHT !"......G
E(G1)..1.GE(G1).ZN:."OK."...`.. SCHAU -
ROUTINE.P.E..VE..13.2500...J..OB.0.G1.0.
.".":VE.0:.1130...O..OB.1.OO(1).ZN.."DIE
TRUHE IST SEHR GROSS.".).D..1000.J..'.
------- SPIELKARTE -------.A.T'. RAUM 1
---------.{.V'. 0,3,0,2,0,0,0,0,0,0...Y'
."RAUM NUMMER 1"....'....X'. RAUM 2 ----
-----.G.Z'. 0,5,1,0,0,0,0,6,0,0....'."RA
UM NUMMER 2"....'....<(. RAUM 3 --------
-...>(. 1,0,0,0,0,0,0,0,0,4.(.A(."RAUM N
UMMER 3"...P(..E. (. RAUM 4 ---------._.
.(. 0,0,0,0,0,0,0,0,3,0.T..(."RAUM NUMME
R 4".Z..(.....). RAUM 5 ---------....).
2,0,0,0,0,0,0,0,0,0....)."RAUM NUMMER 5"
.F..)....H). RAUM 6 ---------...J). 0,0,
0,0,2,0,0,0,0,0...M)."RAUM NUMMER 6"...|
)..5.PC. ****************************.X.
ZC. * BEFEHLSEINGABE *.{.DC. *
BEFEHLSZERLEGUNG *...NC. *
BEFEHLSCODIERUNG *.A.XC. ***********
*****************.Q..C.UD.1.50220....C.1
98,0:BE$."":."WAS NUN ? ";....C.204,0...
C.X$:.X$."".50080.=..C.B(203).1.C(BE$).
68.." ":.204,1:.50140.M..CI.F(X$):.I.65.
I.90..I..32.I..20.I..34.50080....C.I.20.
BE$."".50080...HC.I.20..204,1:.". ..";:
BE$.H(BE$,C(BE$).1):.50070.U.RC.X$;:BE$.
BE$.X$:.50080....C.I.1.10:BE$(I)."":.:WZ
.1:.I.1.C(BE$).!..C:.J(BE$,I,1)." "..501
90:.50180.X..C:.WZ.10.."EINGABE IST ZU L
ANG !":I.C(BE$).1:.50180.X..C:BE$(WZ).BE
$(WZ).J(BE$,I,1)....D.I:.50220....DIC.0:
.I1.1.AZ:.BE$(WZ).AU$(I1).IC.1.F..D.I1:.
IC.0.WZ.WZ.1:..W."DBE$(WZ)."":....,D.UD.
1.UD.0:.50240...6DWZ.1:VE.0:OB.0:PE.0...
@DIC.0:G1.0:G2.0.>.JD.I.1.VZ:.BE$(WZ).VE
$(I).VE.I:IC.1.V.KD.C(BE$(WZ)).3.50260..
.OD.BE$(WZ).H(VE$(I),C(BE$(WZ))).VE.I.E(
I(VE$(I),1)):IC.1...TD.I:.IC.1.50350.G.^
D.I.1.GZ:.BE$(WZ)..GE$(I).50300...HDIC.1
:.G1.0.G1.I...RDG2.I:.G2.G1.G2.0...|D.I:
.IC.1.50350.)..D.I.1.OZ:.BE$(WZ).OB$(I).
OB.I:IC.1.<..D.I:.IC.1.50350.B..D.I.1.PZ
:.BE$(WZ).PE$(I).PE.I:IC.1.I..D.I....D.B
E$(WZ)."UND".UD.1:IC.1....D.IC.0.."ICH K
ENNE ";BE$(WZ);" NICHT !":..X.BDWZ.WZ.1:
.WZ.10.BE$(WZ)."".UD.1.....LDIC.0:.50250
... K. T A B E L L E N...%K.52000.%.*K.
VERBTABELLE ---------.J.4K.N,S,W,O,NW,NO
,SW,SO,RAUF,RUNTER...>K.OEFFNE,SCHLIESSE
,SCHAUE,UNTERSUCHE1,NIMM,NEHME1,HOLE2...
CK.VERLIERE,LEGE1,WIRF2,WERFE3,INVENTUR.
T..KVZ.22:.VE$(VZ):.I.1.VZ:.VE$(I):.....
K. GEGENSTANDSTABELLE ---------....K.SCH
WERT,1....K.SEIL,2.$..K.SCHLUESSEL,4.3..
K.DIAMANT,5.E.LLGZ.4:.GE$(4):.GE(4):.I.1
.GZ:.GE$(I):.GE(I):.I....L. OBJEKTTABELL
E ---------....L.TRUHE,5....L.SCHACHT,6.
...L.EISENRING,6....L.TUER,2.H.BL.TUER,5
....MOZ.5:.OB$(OZ):.OO(OZ):.I.1.OZ:.OB$(
I):.OO(I):.I....O......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL