CP-CODE
FILE INFORMATION
FILENAME(S): CP-CODE
FILE TYPE(S): PRG
FILE SIZE: 1.5K
FIRST SEEN: 2025-11-02 16:39:14
APPEARS ON: 1 disk(s)
FILE HASH
2a082f154f3623610580a4518424e3291304d8af4eb4b86da00c41cc874485ad
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| COMMODORE DISC50 | CP-CODE | PRG | Treasure Chest - Plattfuss | 1 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 21 08 0A 00 8F 20 3D 3D 3D 3D 3D 3D 3D 3D |..!.... ========| 00000010: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================| 00000020: 3D 00 33 08 14 00 8F 20 50 43 2D 43 4F 44 45 20 |=.3.... PC-CODE | 00000030: 43 36 34 00 39 08 1E 00 8F 00 59 08 28 00 8F 20 |C64.9.....Y.(.. | 00000040: 57 52 49 54 54 45 4E 20 42 59 20 41 2E 20 4D 49 |WRITTEN BY A. MI| 00000050: 54 54 45 4C 4D 45 59 45 52 00 79 08 32 00 8F 20 |TTELMEYER.y.2.. | 00000060: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================| 00000070: 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 8A 08 64 00 8D 32 |=========...d..2| 00000080: 32 38 30 3A 99 C7 28 31 34 29 00 AA 08 F8 07 8F |280:..(14)......| 00000090: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------| 000000A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 B7 08 02 08 8F |----------......| 000000B0: 20 20 4D 45 4E 55 45 00 D7 08 0C 08 8F 20 2D 2D | MENUE...... --| 000000C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000000D0: 2D 2D 2D 2D 2D 2D 2D 00 EB 08 16 08 99 C7 28 31 |-------.......(1| 000000E0: 34 37 29 3A 99 22 11 11 11 11 22 00 06 09 18 08 |47):."....".....| 000000F0: 99 22 20 20 20 C3 D0 2D C3 CF C4 C5 2D C3 CF CD |." ..-....-...| 00000100: D0 C9 CC C5 D2 22 00 36 09 1A 08 99 3A 99 22 20 |.....".6....:." | 00000110: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000120: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000130: 2D 2D 2D 2D 2D 22 00 51 09 20 08 99 3A 99 A6 35 |-----".Q. ..:..5| 00000140: 29 22 31 20 3D 20 CE 45 55 45 52 20 D4 45 58 54 |)"1 = .EUER .EXT| 00000150: 22 00 6B 09 2A 08 99 A6 35 29 22 32 20 3D 20 D4 |".k.*...5)"2 = .| 00000160: 45 58 54 20 C1 45 4E 44 45 52 4E 00 81 09 34 08 |EXT .ENDERN...4.| 00000170: 99 A6 35 29 22 33 20 3D 20 C4 52 55 43 4B 45 4E |..5)"3 = .RUCKEN| 00000180: 22 00 95 09 3E 08 99 A6 35 29 22 34 20 3D 20 CC |"...>...5)"4 = .| 00000190: 41 44 45 4E 22 00 AD 09 48 08 99 A6 35 29 22 35 |ADEN"...H...5)"5| 000001A0: 20 3D 20 D3 50 45 49 43 48 45 52 4E 22 00 BF 09 | = .PEICHERN"...| 000001B0: 4D 08 99 A6 35 29 22 36 20 3D 20 D2 55 4E 22 00 |M...5)"6 = .UN".| 000001C0: EF 09 5C 08 99 3A 99 22 20 2D 2D 2D 2D 2D 2D 2D |..\..:." -------| 000001D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000001E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 |--------------".| 000001F0: 1A 0A 66 08 99 22 20 20 20 28 C3 4F 4E 54 52 4F |..f.." (.ONTRO| 00000200: 4C 20 C1 20 42 45 45 4E 44 45 54 20 C5 44 49 54 |L . BEENDET .DIT| 00000210: 49 45 52 4D 4F 44 55 53 29 22 00 2E 0A 70 08 A1 |IERMODUS)"...p..| 00000220: 41 24 3A 8B 41 24 B2 22 22 A7 32 31 36 30 00 57 |A$:.A$."".2160.W| 00000230: 0A 7A 08 91 C5 28 41 24 29 8D 32 31 39 30 2C 32 |.z...(A$).2190,2| 00000240: 32 30 30 2C 32 32 31 30 2C 32 32 32 30 2C 32 32 |200,2210,2220,22| 00000250: 34 30 2C 32 31 38 31 00 61 0A 84 08 89 32 30 37 |40,2181.a....207| 00000260: 30 00 73 0A 85 08 8B C2 28 35 31 39 38 32 29 B2 |0.s.....(51982).| 00000270: 30 A7 8E 00 96 0A 86 08 99 C7 28 31 34 37 29 3A |0.........(147):| 00000280: 9E 35 31 36 37 35 3A 8B C2 28 35 31 36 39 38 29 |.51675:..(51698)| 00000290: A7 20 32 32 30 30 00 A1 0A 87 08 9E 35 30 33 38 |. 2200......5038| 000002A0: 37 00 B5 0A 88 08 A1 41 24 3A 8B 41 24 B2 22 22 |7......A$:.A$.""| 000002B0: A7 32 31 38 34 00 BB 0A 89 08 8E 00 DE 0A 8E 08 |.2184...........| 000002C0: 99 3A 99 22 D7 49 52 4B 4C 49 43 48 20 4E 45 55 |.:.".IRKLICH NEU| 000002D0: 45 52 20 D4 45 58 54 20 4A 2F 4E 20 3F 22 00 F2 |ER .EXT J/N ?"..| 000002E0: 0A 8F 08 A1 41 24 3A 8B 41 24 B2 22 22 A7 32 31 |....A$:.A$."".21| 000002F0: 39 31 00 04 0B 90 08 8B 41 24 B3 B1 22 4A 22 A7 |91......A$.."J".| 00000300: 32 30 37 30 00 1E 0B 93 08 9E 35 33 31 30 30 3A |2070......53100:| 00000310: 8E 3A 8F 20 4E 45 55 45 52 20 54 45 58 54 00 35 |.:. NEUER TEXT.5| 00000320: 0B 98 08 8B C2 28 35 31 39 38 32 29 A7 9E 35 32 |.....(51982)..52| 00000330: 38 35 32 3A 8E 00 4C 0B 9D 08 9E 35 33 30 39 34 |852:..L....53094| 00000340: 3A 8E 3A 8F 20 41 45 4E 44 45 52 4E 00 6A 0B A2 |:.:. AENDERN.j..| 00000350: 08 8B C2 28 35 31 39 38 32 29 A7 9E 35 32 39 37 |...(51982)..5297| 00000360: 32 3A 97 35 31 39 38 32 2C 30 00 88 0B A7 08 9F |2:.51982,0......| 00000370: 38 2C 34 2C 37 3A 9E 35 33 30 32 32 3A 8E 3A 8F |8,4,7:.53022:.:.| 00000380: 20 44 52 55 43 4B 45 4E 00 A3 0B AC 08 99 3A 99 | DRUCKEN......:.| 00000390: 3A 85 22 C6 49 4C 45 20 4C 41 44 45 4E 3A 22 3B |:.".ILE LADEN:";| 000003A0: 46 49 24 00 C3 0B B6 08 9F 38 2C 38 2C 38 2C 46 |FI$......8,8,8,F| 000003B0: 49 24 3A 9E 35 32 38 33 32 3A 8E 3A 8F 20 4C 41 |I$:.52832:.:. LA| 000003C0: 44 45 4E 00 E2 0B C0 08 99 3A 99 3A 85 22 C6 49 |DEN......:.:.".I| 000003D0: 4C 45 20 53 50 45 49 43 48 45 52 4E 3A 22 3B 46 |LE SPEICHERN:";F| 000003E0: 49 24 00 00 0C C5 08 8B C2 28 35 31 39 38 32 29 |I$.......(51982)| 000003F0: A7 9E 35 32 39 37 32 3A 97 35 31 39 38 32 2C 30 |..52972:.51982,0| 00000400: 00 18 0C CA 08 9F 38 2C 38 2C 31 35 2C 22 53 3A |......8,8,15,"S:| 00000410: 22 AA 46 49 24 3A A0 38 00 43 0C D4 08 9F 38 2C |".FI$:.8.C....8,| 00000420: 38 2C 38 2C 46 49 24 AA 22 2C 53 2C 57 22 3A 9E |8,8,FI$.",S,W":.| 00000430: 35 33 30 32 32 3A 8E 3A 8F 20 53 50 45 49 43 48 |53022:.:. SPEICH| 00000440: 45 52 4E 00 63 0C DE 08 8F 20 4E 41 43 48 4C 41 |ERN.c.... NACHLA| 00000450: 44 45 4E 20 45 44 49 54 45 58 54 2E 4D 43 20 3D |DEN EDITEXT.MC =| 00000460: 3D 3D 3D 00 81 0C E8 08 41 4E B2 31 32 32 38 38 |===.....AN.12288| 00000470: 3A 45 4E B2 33 36 38 36 33 3A 50 52 B2 34 30 30 |:EN.36863:PR.400| 00000480: 30 00 92 0C F2 08 41 B2 50 52 AB 31 3A 8D 32 34 |0.....A.PR.1:.24| 00000490: 30 30 00 AB 0C FC 08 8B 41 48 B2 C2 28 35 36 29 |00......AH..(56)| 000004A0: AF 41 4C B2 C2 28 35 35 29 A7 8E 00 C7 0C 06 09 |.AL..(55).......| 000004B0: 9E 35 37 38 31 32 22 43 50 2D 43 4F 44 45 2E 4D |.57812"CP-CODE.M| 000004C0: 43 31 22 2C 38 2C 31 00 D9 0C 10 09 97 37 38 30 |C1",8,1......780| 000004D0: 2C 30 3A 9E 36 35 34 39 33 00 F5 0C 11 09 9E 35 |,0:.65493......5| 000004E0: 37 38 31 32 22 43 50 2D 43 4F 44 45 2E 4D 43 32 |7812"CP-CODE.MC2| 000004F0: 22 2C 38 2C 31 00 07 0D 12 09 97 37 38 30 2C 30 |",8,1......780,0| 00000500: 3A 9E 36 35 34 39 33 00 16 0D 1A 09 41 B2 41 4E |:.65493.....A.AN| 00000510: 3A 8D 32 34 30 30 00 2E 0D 24 09 97 35 31 39 37 |:.2400...$..5197| 00000520: 38 2C 41 4C 3A 97 35 31 39 37 39 2C 41 48 00 3D |8,AL:.51979,AH.=| 00000530: 0D 2E 09 41 B2 45 4E 3A 8D 32 34 30 30 00 55 0D |...A.EN:.2400.U.| 00000540: 38 09 97 35 31 39 38 30 2C 41 4C 3A 97 35 31 39 |8..51980,AL:.519| 00000550: 38 31 2C 41 48 00 6F 0D 42 09 97 35 31 39 38 32 |81,AH.o.B..51982| 00000560: 2C 30 3A 41 B2 50 52 AB 31 3A 8D 32 34 30 30 00 |,0:A.PR.1:.2400.| 00000570: 89 0D 4C 09 97 35 35 2C 41 4C 3A 97 35 36 2C 41 |..L..55,AL:.56,A| 00000580: 48 3A 97 41 4E 2C 30 3A 8A 00 A7 0D 60 09 41 48 |H:.AN,0:....`.AH| 00000590: B2 B5 28 41 AD 32 35 36 29 3A 41 4C B2 41 AB 32 |..(A.256):AL.A.2| 000005A0: 35 36 AC 41 48 3A 8E 00 CA 0D 6A 09 8F 20 3D 50 |56.AH:....j.. =P| 000005B0: 52 4F 47 52 41 4D 4D 45 4E 44 45 3D 3D 3D 3D 3D |ROGRAMMENDE=====| 000005C0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 00 00 |==========... |
..!.... =========================.3.... PC-CODE C64.9.....Y.(.. WRITTEN BY A. MI TTELMEYER.Y.2.. ======================== =...D..2280:.G(14)...... --------------- ----------...... MENUE.W.... ---------- ---------------......G(147):."...."..... ." CP-CODE-COMPILER".6....:." -------- -----------------------------".Q. ..:..5 )"1 = NEUER TEXT".K.*...5)"2 = TEXT AEND ERN...4...5)"3 = DRUCKEN"...>...5)"4 = L ADEN"...H...5)"5 = SPEICHERN"...M...5)"6 = RUN"...\..:." ----------------------- --------------"...F.." (CONTROL A BEEN DET EDITIERMODUS)"...P..A$:.A$."".2160.W .Z..E(A$).2190,2200,2210,2220,2240,2181. A....2070.S....B(51982).0........G(147): .51675:.B(51698). 2200......50387......A $:.A$."".2184............:."WIRKLICH NEU ER TEXT J/N ?"......A$:.A$."".2191...... A$.."J".2070......53100:.:. NEUER TEXT.5 ....B(51982)..52852:..L....53094:.:. AEN DERN.J....B(51982)..52972:.51982,0...... 8,4,7:.53022:.:. DRUCKEN......:.:."FILE LADEN:";FI$.C....8,8,8,FI$:.52832:.:. LA DEN......:.:."FILE SPEICHERN:";FI$...E.. B(51982)..52972:.51982,0...J..8,8,15,"S: ".FI$: 8.C.T..8,8,8,FI$.",S,W":.53022:.: . SPEICHERN.C.... NACHLADEN EDITEXT.MC = ===.....AN.12288:EN.36863:PR.4000.....A. PR.1:.2400......AH.B(56).AL.B(55)...G... .57812"CP-CODE.MC1",8,1.Y....780,0:.6549 3......57812"CP-CODE.MC2",8,1......780,0 :.65493.....A.AN:.2400...$..51978,AL:.51 979,AH.=...A.EN:.2400.U.8..51980,AL:.519 81,AH.O.B..51982,0:A.PR.1:.2400...L..55, AL:.56,AH:.AN,0:....`.AH..(A.256):AL.A.2 56.AH:..J.J.. =PROGRAMMENDE============= ==...
> CLICK IMAGE PREVIEW FOR FULL MODAL