H2
FILE INFORMATION
FILENAME(S): H2
FILE TYPE(S): PRG
FILE SIZE: 2.5K
FIRST SEEN: 2025-11-02 16:30:02
APPEARS ON: 1 disk(s)
FILE HASH
c453e47b51bcda11ad063e4e7ee9fe48ea110fb0b933b5b2d2cf76871a2f72bc
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SZYMASSEK | H2 | PRG | Treasure Chest - Odenwald | 17 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 17 08 64 00 8F 20 48 45 58 4C 4F 41 44 45 |....d.. HEXLOADE| 00000010: 52 20 56 20 31 2E 30 00 2F 08 6E 00 8F 20 46 55 |R V 1.0./.n.. FU| 00000020: 45 52 20 43 48 49 50 20 53 50 45 43 49 41 4C 00 |ER CHIP SPECIAL.| 00000030: 48 08 78 00 8F 20 56 4F 4E 20 54 48 4F 4D 41 53 |H.x.. VON THOMAS| 00000040: 20 4D 55 45 4C 4C 45 52 00 4E 08 82 00 8F 00 6A | MUELLER.N.....j| 00000050: 08 8C 00 8D 32 31 30 3A 20 8F 20 2D 2D 2D 2D 2D |....210: . -----| 00000060: 49 4E 49 54 2D 2D 2D 2D 2D 2D 00 86 08 96 00 8D |INIT------......| 00000070: 33 33 30 3A 20 8F 20 2D 2D 2D 41 4E 4C 45 49 54 |330: . ---ANLEIT| 00000080: 55 4E 47 2D 2D 2D 00 A2 08 A0 00 8D 34 39 30 3A |UNG---......490:| 00000090: 20 8F 20 2D 2D 2D 53 54 41 52 54 41 44 52 2E 2D | . ---STARTADR.-| 000000A0: 2D 2D 00 BE 08 AA 00 8D 35 38 30 3A 20 8F 20 2D |--......580: . -| 000000B0: 2D 2D 2D 45 49 4E 47 41 42 45 2D 2D 2D 2D 00 DA |---EINGABE----..| 000000C0: 08 B4 00 8D 39 30 30 3A 20 8F 20 2D 2D 41 42 53 |....900: . --ABS| 000000D0: 50 45 49 43 48 45 52 4E 2D 2D 00 E0 08 BE 00 80 |PEICHERN--......| 000000E0: 00 E6 08 C8 00 3A 00 F8 08 D2 00 8F 3D 3D 3D 20 |.....:......=== | 000000F0: 49 4E 49 54 20 3D 3D 3D 00 FE 08 DC 00 3A 00 1F |INIT ===.....:..| 00000100: 09 E6 00 86 20 48 25 28 31 35 29 2C 44 25 28 32 |.... H%(15),D%(2| 00000110: 35 35 29 2C 5A 25 28 37 29 2C 45 24 28 37 29 00 |55),Z%(7),E$(7).| 00000120: 25 09 F0 00 3A 00 3F 09 FA 00 81 20 49 B2 30 A4 |%...:.?.... I.0.| 00000130: 39 3A 48 25 28 49 29 B2 34 38 AA 49 3A 82 49 00 |9:H%(I).48.I:.I.| 00000140: 5B 09 04 01 81 20 49 B2 31 30 A4 31 35 3A 48 25 |[.... I.10.15:H%| 00000150: 28 49 29 B2 35 35 AA 49 3A 82 49 00 75 09 0E 01 |(I).55.I:.I.u...| 00000160: 81 20 49 B2 30 A4 32 35 35 3A 44 25 28 49 29 B2 |. I.0.255:D%(I).| 00000170: 31 37 3A 82 49 00 91 09 18 01 81 20 49 B2 34 38 |17:.I...... I.48| 00000180: A4 35 37 3A 44 25 28 49 29 B2 49 AB 34 38 3A 82 |.57:D%(I).I.48:.| 00000190: 49 00 AD 09 22 01 81 20 49 B2 36 35 A4 37 30 3A |I...".. I.65.70:| 000001A0: 44 25 28 49 29 B2 49 AB 35 35 3A 82 49 00 C5 09 |D%(I).I.55:.I...| 000001B0: 2C 01 44 25 28 34 36 29 B2 31 36 3A 44 25 28 38 |,.D%(46).16:D%(8| 000001C0: 38 29 B2 31 36 00 CB 09 36 01 8E 00 D1 09 40 01 |8).16...6.....@.| 000001D0: 3A 00 E8 09 4A 01 8F 3D 3D 3D 3D 41 4E 4C 45 49 |:...J..====ANLEI| 000001E0: 54 55 4E 47 3D 3D 3D 3D 00 EE 09 54 01 3A 00 0E |TUNG====...T.:..| 000001F0: 0A 5E 01 97 35 33 32 38 30 2C 36 3A 97 35 33 32 |.^..53280,6:.532| 00000200: 38 31 2C 36 3A 97 35 33 32 37 32 2C 32 33 00 29 |81,6:.53272,23.)| 00000210: 0A 68 01 99 22 93 22 2C 22 C8 C5 D8 CC CF C1 C4 |.h..".",".......| 00000220: C5 D2 20 D6 20 31 2E 30 22 00 41 0A 72 01 99 2C |.. . 1.0".A.r..,| 00000230: 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |"===============| 00000240: 22 00 8A 0A 7C 01 99 22 11 11 11 11 11 1D 1D C4 |"...|.."........| 00000250: 49 45 20 C5 49 4E 47 41 42 45 20 44 45 53 20 C8 |IE .INGABE DES .| 00000260: 45 58 44 55 4D 50 53 20 45 4E 54 53 50 52 49 43 |EXDUMPS ENTSPRIC| 00000270: 48 54 20 20 20 20 20 47 45 4E 41 55 20 44 45 4D |HT GENAU DEM| 00000280: 20 C1 42 44 52 55 43 4B 3A 22 00 98 0A 86 01 99 | .BDRUCK:"......| 00000290: 22 11 11 5A 2E C2 2E 22 00 C2 0A 90 01 99 22 11 |"..Z..."......".| 000002A0: 11 C3 30 30 30 3A 32 30 2C C1 35 2C 39 30 2C C1 |..000:20,.5,90,.| 000002B0: 35 2C 30 32 2C C5 36 2C C1 C6 2C 36 30 2C 30 33 |5,02,.6,..,60,03| 000002C0: C6 31 00 F2 0A 9A 01 99 22 11 11 1D 1D C2 45 49 |.1......".....EI| 000002D0: 20 45 49 4E 45 4D 20 D0 52 55 45 46 53 55 4D 4D | EINEM .RUEFSUMM| 000002E0: 45 4E 46 45 48 4C 45 52 20 4D 55 53 53 20 44 49 |ENFEHLER MUSS DI| 000002F0: 45 22 00 1B 0B A4 01 99 22 1D 1D DA 45 49 4C 45 |E"......"...EILE| 00000300: 20 45 52 4E 45 55 54 20 45 49 4E 47 45 47 45 42 | ERNEUT EINGEGEB| 00000310: 45 4E 20 57 45 52 44 45 4E 2E 22 00 48 0B AE 01 |EN WERDEN.".H...| 00000320: 99 22 11 11 1D 1D DA 55 4D 20 C2 45 45 4E 44 45 |.".....UM .EENDE| 00000330: 4E 20 44 45 52 20 C5 49 4E 47 41 42 45 20 4D 55 |N DER .INGABE MU| 00000340: 53 53 20 53 54 41 54 54 00 77 0B B8 01 99 22 1D |SS STATT.w....".| 00000350: 1D 45 49 4E 45 4D 20 C8 45 58 2D C3 4F 44 45 53 |.EINEM .EX-.ODES| 00000360: 20 44 41 53 20 CB 55 45 52 5A 45 4C 20 27 2E D8 | DAS .UERZEL '..| 00000370: 27 20 45 49 4E 2D 22 00 90 0B C2 01 99 22 1D 1D |' EIN-"......"..| 00000380: 47 45 54 49 50 50 54 20 57 45 52 44 45 4E 2E 22 |GETIPPT WERDEN."| 00000390: 00 AB 0B CC 01 8D 31 33 34 30 3A 20 8F 20 2D 2D |......1340: . --| 000003A0: 2D 43 48 41 52 47 45 54 2D 2D 2D 00 B1 0B D6 01 |-CHARGET---.....| 000003B0: 8E 00 B7 0B E0 01 3A 00 DD 0B EA 01 8F 3D 3D 3D |......:......===| 000003C0: 20 45 49 4E 47 41 42 45 20 44 45 52 20 53 54 41 | EINGABE DER STA| 000003D0: 52 54 41 44 52 45 53 53 45 20 3D 3D 3D 00 E3 0B |RTADRESSE ===...| 000003E0: F4 01 3A 00 FC 0B FE 01 99 22 93 22 3A 97 35 33 |..:......".":.53| 000003F0: 32 37 32 2C 32 31 3A 99 C7 28 38 29 00 1D 0C 08 |272,21:..(8)....| 00000400: 02 85 22 11 11 1D 1D 53 54 41 52 54 41 44 52 45 |.."....STARTADRE| 00000410: 53 53 45 20 28 48 45 58 29 22 3B 4A 24 00 35 0C |SSE (HEX)";J$.5.| 00000420: 12 02 8D 31 31 38 30 3A 20 8F 20 32 2D 48 45 58 |...1180: . 2-HEX| 00000430: 2D 3E 44 45 5A 00 4E 0C 1C 02 53 41 B2 4A 3A 43 |->DEZ.N...SA.J:C| 00000440: B2 4A 3A 44 B2 38 30 30 30 3A 45 46 B2 30 00 6D |.J:D.8000:EF.0.m| 00000450: 0C 26 02 99 22 93 11 11 11 11 11 11 11 11 11 11 |.&.."...........| 00000460: 11 11 11 11 11 11 11 11 11 11 11 11 22 00 73 0C |............".s.| 00000470: 30 02 8E 00 79 0C 3A 02 3A 00 9C 0C 44 02 8F 20 |0...y.:.:...D.. | 00000480: 3D 3D 3D 20 45 49 4E 47 41 42 45 20 44 45 52 20 |=== EINGABE DER | 00000490: 48 45 58 43 4F 44 45 53 20 3D 3D 3D 00 A2 0C 4E |HEXCODES ===...N| 000004A0: 02 3A 00 C3 0C 58 02 4A B2 43 3A 8D 31 30 33 30 |.:...X.J.C:.1030| 000004B0: 3A 20 8F 20 32 2D 42 59 54 45 20 44 45 5A 2D 3E |: . 2-BYTE DEZ->| 000004C0: 48 45 58 00 D0 0C 62 02 99 48 24 3B 22 3A 22 3B |HEX...b..H$;":";| 000004D0: 00 DB 0C 6C 02 97 31 39 2C 36 34 00 14 0D 76 02 |...l..19,64...v.| 000004E0: 85 20 45 24 28 30 29 2C 45 24 28 31 29 2C 45 24 |. E$(0),E$(1),E$| 000004F0: 28 32 29 2C 45 24 28 33 29 2C 45 24 28 34 29 2C |(2),E$(3),E$(4),| 00000500: 45 24 28 35 29 2C 45 24 28 36 29 2C 45 24 28 37 |E$(5),E$(6),E$(7| 00000510: 29 2C 50 24 00 1E 0D 80 02 97 31 39 2C 30 00 27 |),P$......19,0.'| 00000520: 0D 8A 02 46 46 B2 30 00 4D 0D 94 02 81 20 49 B2 |...FF.0.M.... I.| 00000530: 30 A4 37 3A 8B 20 C3 28 45 24 28 49 29 29 B3 B1 |0.7:. .(E$(I))..| 00000540: 32 20 A7 20 46 46 B2 31 3A 20 49 B2 37 00 54 0D |2 . FF.1: I.7.T.| 00000550: 9E 02 82 49 00 6C 0D A8 02 8B 20 46 46 B2 31 20 |...I.l.... FF.1 | 00000560: A7 20 99 22 91 22 3A 89 20 36 31 30 00 88 0D B2 |. .".":. 610....| 00000570: 02 8B 20 C3 28 50 24 29 B3 B1 34 20 A7 20 99 22 |.. .(P$)..4 . ."| 00000580: 91 22 3A 89 20 36 31 30 00 96 0D BC 02 50 53 B2 |.":. 610.....PS.| 00000590: 30 3A 46 46 B2 30 00 A2 0D C6 02 81 20 49 B2 30 |0:FF.0...... I.0| 000005A0: A4 37 00 C8 0D D0 02 41 24 B2 45 24 28 49 29 3A |.7.....A$.E$(I):| 000005B0: 8D 31 32 37 30 3A 20 8F 20 31 2D 42 59 54 45 20 |.1270: . 1-BYTE | 000005C0: 48 45 58 2D 3E 44 45 5A 00 DC 0D DA 02 5A 25 28 |HEX->DEZ.....Z%(| 000005D0: 49 29 B2 4A 3A 50 53 B2 50 53 AA 4A 00 F3 0D E4 |I).J:PS.PS.J....| 000005E0: 02 8B 20 4A B1 32 37 32 20 A7 20 46 46 B2 31 3A |.. J.272 . FF.1:| 000005F0: 49 B2 37 00 0E 0E EE 02 8B 20 4A B2 32 37 32 20 |I.7...... J.272 | 00000600: A7 20 4A B2 49 3A 49 B2 37 3A 45 46 B2 31 00 15 |. J.I:I.7:EF.1..| 00000610: 0E F8 02 82 49 00 25 0E 02 03 8B 20 45 46 B2 31 |....I.%.... EF.1| 00000620: 20 A7 38 33 30 00 3D 0E 0C 03 8B 20 46 46 B2 31 | .830.=.... FF.1| 00000630: 20 A7 20 99 22 91 22 3A 89 20 36 30 30 00 5F 0E | . .".":. 600._.| 00000640: 16 03 4A 24 B2 50 24 3A 8D 31 31 38 30 3A 20 8F |..J$.P$:.1180: .| 00000650: 20 32 42 59 54 45 20 48 45 58 2D 3E 44 45 5A 00 | 2BYTE HEX->DEZ.| 00000660: 77 0E 20 03 8B 20 4A B3 B1 50 53 20 A7 20 99 22 |w. .. J..PS . ."| 00000670: 91 22 3A 89 36 30 30 00 93 0E 2A 03 81 20 49 B2 |.":.600...*.. I.| 00000680: 30 20 A4 20 37 3A 97 44 AA 49 2C 5A 25 28 49 29 |0 . 7:.D.I,Z%(I)| 00000690: 3A 82 49 00 AB 0E 34 03 43 B2 43 AA 38 3A 44 B2 |:.I...4.C.C.8:D.| 000006A0: 44 AA 38 3A 99 3A 20 89 36 30 30 00 BB 0E 3E 03 |D.8:.: .600...>.| 000006B0: 8F 2D 2D 2D 45 4E 44 45 2D 2D 2D 00 C9 0E 48 03 |.---ENDE---...H.| 000006C0: 81 20 49 B2 30 A4 4A AB 31 00 D8 0E 52 03 97 44 |. I.0.J.1...R..D| 000006D0: AA 49 2C 5A 25 28 49 29 00 DF 0E 5C 03 82 49 00 |.I,Z%(I)...\..I.| 000006E0: EB 0E 66 03 45 41 B2 43 4A AB 31 00 F1 0E 70 03 |..f.EA.CJ.1...p.| 000006F0: 8E 00 F7 0E 7A 03 3A 00 11 0F 84 03 8F 20 3D 3D |....z.:...... ==| 00000700: 3D 20 41 42 53 50 45 49 43 48 45 52 4E 20 3D 3D |= ABSPEICHERN ==| 00000710: 3D 00 17 0F 8E 03 3A 00 2F 0F 98 03 85 22 93 11 |=.....:./...."..| 00000720: 11 11 11 46 49 4C 45 4E 41 4D 45 22 3B 48 24 00 |...FILENAME";H$.| 00000730: 3F 0F A2 03 48 24 B2 48 24 22 2C 50 2C 57 22 00 |?...H$.H$",P,W".| 00000740: 4D 0F AC 03 9F 32 2C 38 2C 32 2C 48 24 00 6B 0F |M....2,8,2,H$.k.| 00000750: B6 03 4B 31 B2 B5 28 53 41 AD 32 35 36 29 3A 4B |..K1..(SA.256):K| 00000760: 22 3D 53 41 2D 4B 31 2A 32 35 36 00 7E 0F C0 03 |"=SA-K1*256.~...| 00000770: 98 32 2C C7 28 C2 28 38 30 30 30 31 29 3B 00 90 |.2,.(.(80001);..| 00000780: 0F CA 03 81 20 49 B2 30 20 A4 20 45 41 AB 53 41 |.... I.0 . EA.SA| 00000790: 00 A5 0F D4 03 98 32 2C C7 28 C2 28 38 30 30 30 |......2,.(.(8000| 000007A0: AA 31 29 29 3B 00 AC 0F DE 03 82 49 00 B3 0F E8 |.1));......I....| 000007B0: 03 A0 32 00 B9 0F F2 03 8E 00 BF 0F FC 03 3A 00 |..2...........:.| 000007C0: DD 0F 06 04 8F 20 3D 3D 3D 20 32 2D 42 59 54 45 |..... === 2-BYTE| 000007D0: 20 44 45 5A 2D 3E 48 45 58 20 3D 3D 3D 00 E3 0F | DEZ->HEX ===...| 000007E0: 10 04 3A 00 FF 0F 1A 04 4B 31 B2 B5 28 4A AD 32 |..:.....K1..(J.2| 000007F0: 35 36 29 3A 4B 32 B2 4A AB 4B 31 AC 32 35 36 00 |56):K2.J.K1.256.| 00000800: 21 10 24 04 4A B2 4B 31 3A 8D 31 31 32 30 3A 20 |!.$.J.K1:.1120: | 00000810: 8F 20 31 2D 42 59 54 45 20 44 45 5A 2D 3E 48 45 |. 1-BYTE DEZ->HE| 00000820: 58 00 2B 10 2E 04 48 24 B2 41 24 00 4D 10 38 04 |X.+...H$.A$.M.8.| 00000830: 4A B2 4B 32 3A 8D 31 31 32 30 3A 20 8F 20 31 2D |J.K2:.1120: . 1-| 00000840: 42 59 54 45 20 44 45 5A 2D 3E 48 45 58 00 5A 10 |BYTE DEZ->HEX.Z.| 00000850: 42 04 48 24 B2 48 24 AA 41 24 00 60 10 4C 04 8E |B.H$.H$.A$.`.L..| 00000860: 00 66 10 56 04 3A 00 84 10 60 04 8F 20 3D 3D 3D |.f.V.:...`.. ===| 00000870: 20 31 2D 42 59 54 45 20 44 45 5A 2D 3E 48 45 58 | 1-BYTE DEZ->HEX| 00000880: 20 3D 3D 3D 00 8A 10 6A 04 3A 00 A4 10 74 04 4C | ===...j.:...t.L| 00000890: 31 B2 B5 28 4A AD 31 36 29 3A 4C 32 B2 4A AB 4C |1..(J.16):L2.J.L| 000008A0: 31 AC 31 36 00 BF 10 7E 04 41 24 B2 C7 28 48 25 |1.16...~.A$..(H%| 000008B0: 28 4C 31 29 29 AA C7 28 48 25 28 4C 32 29 29 00 |(L1))..(H%(L2)).| 000008C0: C5 10 88 04 8E 00 CB 10 92 04 3A 00 E8 10 9C 04 |..........:.....| 000008D0: 8F 3D 3D 3D 20 32 2D 42 59 54 45 20 48 45 58 2D |.=== 2-BYTE HEX-| 000008E0: 3E 44 45 5A 20 3D 3D 3D 00 EE 10 A6 04 3A 00 FE |>DEZ ===.....:..| 000008F0: 10 B0 04 41 24 B2 C8 28 4A 24 2C 32 29 B2 00 1B |...A$..(J$,2)...| 00000900: 11 BA 04 8D 31 32 37 30 3A 20 8F 20 31 2D 42 59 |....1270: . 1-BY| 00000910: 54 45 20 48 45 58 2D 3E 44 45 5A 00 2F 11 C4 04 |TE HEX->DEZ./...| 00000920: 4B 31 B2 4A 3A 41 24 B2 C9 28 4A 24 2C 32 29 00 |K1.J:A$..(J$,2).| 00000930: 4C 11 CE 04 8D 31 32 37 30 3A 20 8F 20 31 2D 42 |L....1270: . 1-B| 00000940: 59 54 45 20 48 45 58 2D 3E 44 45 5A 00 60 11 D8 |YTE HEX->DEZ.`..| 00000950: 04 4B 32 B2 4A 3A 4A B2 4B AC 32 35 36 4B 4B 32 |.K2.J:J.K.256KK2| 00000960: 00 66 11 E2 04 8E 00 6C 11 EC 04 3A 00 89 11 F6 |.f.....l...:....| 00000970: 04 8F 3D 3D 3D 20 31 2D 42 59 54 45 20 48 45 58 |..=== 1-BYTE HEX| 00000980: 2D 3E 44 45 5A 20 3D 3D 3D 00 8F 11 00 05 3A 00 |->DEZ ===.....:.| 00000990: AB 11 0A 05 48 24 B2 C9 28 41 24 2C 31 29 3A 4C |....H$..(A$,1):L| 000009A0: 31 B2 44 25 28 C6 28 48 24 29 29 00 C7 11 14 05 |1.D%(.(H$)).....| 000009B0: 48 24 B2 C9 28 41 24 2C 31 29 3A 4C 32 B2 44 24 |H$..(A$,1):L2.D$| 000009C0: 28 C6 28 48 24 29 29 00 D6 11 1E 05 4A B2 4C 31 |(.(H$)).....J.L1| 000009D0: AC 31 36 AA 4C 32 00 DC 11 28 05 8E 00 E2 11 32 |.16.L2...(.....2| 000009E0: 05 3A 00 F5 11 3C 05 8F 3D 3D 3D 43 48 41 52 47 |.:...<..===CHARG| 000009F0: 45 54 3D 3D 3D 00 FB 11 46 05 3A 00 12 12 50 05 |ET===...F.:...P.| 00000A00: A1 20 41 24 3A 8B 20 41 24 B2 22 22 20 A7 31 33 |. A$:. A$."" .13| 00000A10: 36 30 00 18 12 5A 05 8E 00 00 00 |60...Z..... |
....D.. HEXLOADER V 1.0./.N.. FUER CHIP SPECIAL.H.X.. VON THOMAS MUELLER.N.....J ....210: . -----INIT------......330: . - --ANLEITUNG---... ..490: . ---STARTADR.- --......580: . ----EINGABE----.Z....900: . --ABSPEICHERN--.........H.:...R..=== INIT ===.....:...... H%(15),D%(255),Z%(7 ),E$(7).%...:.?.... I.0.9:H%(I).48.I:.I. [.... I.10.15:H%(I).55.I:.I.U.... I.0.25 5:D%(I).17:.I...... I.48.57:D%(I).I.48:. I...".. I.65.70:D%(I).I.55:.I.E.,.D%(46) .16:D%(88).16.K.6...Q.@.:...J..====ANLEI TUNG====...T.:...^..53280,6:.53281,6:.53 272,23.).H..".","HEXLOADER V 1.0".A.R.., "==============="...|..".......DIE EINGA BE DES HEXDUMPS ENTSPRICHT GENAU DEM ABDRUCK:"......"..Z.B.".B...."..C000:20 ,A5,90,A5,02,E6,AF,60,03F1......"....BEI EINEM PRUEFSUMMENFEHLER MUSS DIE"...... "..ZEILE ERNEUT EINGEGEBEN WERDEN.".H... ."....ZUM BEENDEN DER EINGABE MUSS STATT .W...."..EINEM HEX-CODES DAS KUERZEL '.X ' EIN-"...B.."..GETIPPT WERDEN."...L..13 40: . ---CHARGET---...V.......:......=== EINGABE DER STARTADRESSE ===.....:..... .".":.53272,21:.G(8)......"....STARTADRE SSE (HEX)";J$.5....1180: . 2-HEX->DEZ.N. ..SA.J:C.J:D.8000:EF.0.M.&.."........... ............".S.0...Y.:.:...D.. === EING ABE DER HEXCODES ===...N.:.C.X.J.C:.1030 : . 2-BYTE DEZ->HEX.P.B..H$;":";...L..19 ,64...V.. E$(0),E$(1),E$(2),E$(3),E$(4), E$(5),E$(6),E$(7),P$......19,0.'...FF.0. M.... I.0.7:. C(E$(I))..2 . FF.1: I.7.T. ...I.L.... FF.1 . .".":. 610...... C(P$) ..4 . .".":. 610.....PS.0:FF.0...F.. I.0 .7.H.P.A$.E$(I):.1270: . 1-BYTE HEX->DEZ ...Z.Z%(I).J:PS.PS.J...... J.272 . FF.1: I.7...... J.272 . J.I:I.7:EF.1......I.%. ... EF.1 .830.=.... FF.1 . .".":. 600._. ..J$.P$:.1180: . 2BYTE HEX->DEZ.W. .. J. .PS . .".":.600...*.. I.0 . 7:.D.I,Z%(I) :.I...4.C.C.8:D.D.8:.: .600...>..---ENDE ---.I.H.. I.0.J.1.X.R..D.I,Z%(I)...\..I. ..F.EA.CJ.1...P.....Z.:...... === ABSPEI CHERN ===.....:./....".....FILENAME";H$. ?...H$.H$",P,W".M....2,8,2,H$.K...K1..(S A.256):K"=SA-K1*256.~....2,G(B(80001);.. .J.. I.0 . EA.SA...T..2,G(B(8000.1));... ...I..... 2...........:...... === 2-BYTE DEZ->HEX ===.....:.....K1..(J.256):K2.J .K1.256.!.$.J.K1:.1120: . 1-BYTE DEZ->HE X.+...H$.A$.M.8.J.K2:.1120: . 1-BYTE DEZ ->HEX.Z.B.H$.H$.A$.`.L...F.V.:...`.. === 1-BYTE DEZ->HEX ===...J.:...T.L1..(J.16 ):L2.J.L1.16...~.A$.G(H%(L1)).G(H%(L2)). E.....K...:......=== 2-BYTE HEX->DEZ === .....:.....A$.H(J$,2).......1270: . 1-BY TE HEX->DEZ./.D.K1.J:A$.I(J$,2).L.N..127 0: . 1-BYTE HEX->DEZ.`.X.K2.J:J.K.256KK2 .F.....L...:......=== 1-BYTE HEX->DEZ == =.....:.....H$.I(A$,1):L1.D%(F(H$)).G... H$.I(A$,1):L2.D$(F(H$)).V...J.L1.16.L2.. .(.....2.:...<..===CHARGET===...F.:...P. . A$:. A$."" .1360...Z.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL