REL-DEMOPROGRAMM
FILE INFORMATION
FILENAME(S): REL-DEMOPROGRAMM
FILE TYPE(S): PRG
FILE SIZE: 3.6K
FIRST SEEN: 2025-11-30 01:12:50
APPEARS ON: 1 disk(s)
FILE HASH
33d8b860b40f88cb132e57477ef49f13baec891b79b53e9d752c4f78d0a1a659
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 64 ER SONDERH 77 | REL-DEMOPROGRAMM | PRG | C64er, DuncanTwain | 10 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2A 08 64 00 8F 20 44 45 4D 4F 50 52 4F 47 |..*.d.. DEMOPROG| 00000010: 52 41 4D 4D 20 46 55 45 52 20 52 45 4C 41 54 49 |RAMM FUER RELATI| 00000020: 56 45 20 44 41 54 45 49 45 4E 00 53 08 6E 00 8F |VE DATEIEN.S.n..| 00000030: 20 46 55 45 52 20 41 4C 4C 45 20 43 4F 4D 4D 4F | FUER ALLE COMMO| 00000040: 44 4F 52 45 20 38 2D 42 49 54 20 43 4F 4D 50 55 |DORE 8-BIT COMPU| 00000050: 54 45 52 00 8D 08 78 00 8F 20 4E 49 4B 4F 4C 41 |TER...x.. NIKOLA| 00000060: 55 53 20 48 45 55 53 4C 45 52 2C 20 5A 57 45 4E |US HEUSLER, ZWEN| 00000070: 47 41 55 45 52 57 45 47 20 31 38 2C 20 38 30 30 |GAUERWEG 18, 800| 00000080: 30 20 4D 55 45 4E 43 48 45 4E 20 37 31 00 BE 08 |0 MUENCHEN 71...| 00000090: 82 00 8F 20 4E 48 2D 30 34 30 32 39 31 2D 41 52 |... NH-040291-AR| 000000A0: 52 20 20 20 4D 26 54 20 30 31 2E 39 32 20 36 34 |R M&T 01.92 64| 000000B0: 27 45 52 20 53 4F 4E 44 45 52 48 45 46 54 00 C4 |'ER SONDERHEFT..| 000000C0: 08 8C 00 3A 00 D6 08 96 00 8F 20 2A 2A 20 56 4F |...:...... ** VO| 000000D0: 52 53 50 49 45 4C 00 DC 08 A0 00 3A 00 FB 08 AA |RSPIEL.....:....| 000000E0: 00 9F 31 35 2C 38 2C 31 35 2C 22 49 22 3A 8F 20 |..15,8,15,"I":. | 000000F0: 46 45 48 4C 45 52 4B 41 4E 41 4C 00 1E 09 B4 00 |FEHLERKANAL.....| 00000100: 4E 4E 24 B2 22 4E 48 27 53 20 52 45 4C 2D 44 45 |NN$."NH'S REL-DE| 00000110: 4D 4F 22 3A 8F 20 46 49 4C 45 4E 41 4D 45 00 4C |MO":. FILENAME.L| 00000120: 09 BE 00 9F 31 2C 38 2C 32 2C 22 30 3A 22 AA 4E |....1,8,2,"0:".N| 00000130: 4E 24 3A 8F 20 44 41 54 45 49 20 53 43 48 4F 4E |N$:. DATEI SCHON| 00000140: 20 56 4F 52 48 41 4E 44 45 4E 20 3F 00 6B 09 C8 | VORHANDEN ?.k..| 00000150: 00 99 22 93 22 3A 8F 20 42 49 4C 44 53 43 48 49 |..".":. BILDSCHI| 00000160: 52 4D 20 4C 4F 45 53 43 48 45 4E 00 89 09 D2 00 |RM LOESCHEN.....| 00000170: 84 31 35 2C 45 2C 45 24 2C 45 31 2C 45 32 3A 8F |.15,E,E$,E1,E2:.| 00000180: 20 46 45 48 4C 45 52 20 3F 00 AC 09 DC 00 8B 45 | FEHLER ?......E| 00000190: B2 30 A7 34 31 30 3A 8F 20 44 41 54 45 49 20 42 |.0.410:. DATEI B| 000001A0: 45 53 54 45 48 54 20 53 43 48 4F 4E 00 B3 09 E6 |ESTEHT SCHON....| 000001B0: 00 A0 31 00 D4 09 F0 00 8B 45 B3 B1 36 32 A7 31 |..1......E..62.1| 000001C0: 36 32 30 3A 8F 20 41 4E 44 45 52 45 52 20 46 45 |620:. ANDERER FE| 000001D0: 48 4C 45 52 00 DA 09 FA 00 3A 00 F1 09 04 01 8F |HLER.....:......| 000001E0: 20 2A 2A 20 44 41 54 45 49 20 41 4E 4C 45 47 45 | ** DATEI ANLEGE| 000001F0: 4E 00 F7 09 0E 01 3A 00 13 0A 18 01 99 3A 99 22 |N.....:......:."| 00000200: 44 41 54 45 49 20 57 49 52 44 20 41 4E 47 45 4C |DATEI WIRD ANGEL| 00000210: 45 47 54 00 55 0A 22 01 9F 31 2C 38 2C 32 2C 22 |EGT.U."..1,8,2,"| 00000220: 30 3A 22 AA 4E 4E 24 AA 22 2C 4C 2C 22 AA C7 28 |0:".NN$.",L,"..(| 00000230: 33 33 29 3A 8F 20 52 45 4C 2D 46 49 4C 45 20 41 |33):. REL-FILE A| 00000240: 4E 4C 45 47 45 4E 2C 20 53 41 54 5A 4C 41 45 4E |NLEGEN, SATZLAEN| 00000250: 47 45 20 33 33 00 68 0A 2C 01 84 31 35 2C 45 2C |GE 33.h.,..15,E,| 00000260: 45 24 2C 45 31 2C 45 32 00 77 0A 36 01 8B 45 B3 |E$,E1,E2.w.6..E.| 00000270: B1 30 A7 31 36 32 30 00 B3 0A 40 01 98 31 35 2C |.0.1620...@..15,| 00000280: 22 50 22 AA C7 28 39 38 29 AA C7 28 31 30 29 AA |"P"..(98)..(10).| 00000290: C7 28 30 29 AA C7 28 31 29 3A 8F 20 53 45 4B 2E |.(0)..(1):. SEK.| 000002A0: 41 44 52 20 39 38 2C 20 44 41 54 2E 53 41 54 5A |ADR 98, DAT.SATZ| 000002B0: 20 31 30 00 C6 0A 4A 01 84 31 35 2C 45 2C 45 24 | 10...J..15,E,E$| 000002C0: 2C 45 31 2C 45 32 00 D6 0A 54 01 8B 45 B3 B1 35 |,E1,E2...T..E..5| 000002D0: 30 A7 31 36 38 30 00 F7 0A 5E 01 98 31 2C C7 28 |0.1680...^..1,.(| 000002E0: 32 35 35 29 3B 3A 8F 20 44 41 54 45 49 20 46 52 |255);:. DATEI FR| 000002F0: 45 49 47 45 42 45 4E 00 0A 0B 68 01 84 31 35 2C |EIGEBEN...h..15,| 00000300: 45 2C 45 24 2C 45 31 2C 45 32 00 11 0B 72 01 A0 |E,E$,E1,E2...r..| 00000310: 31 00 20 0B 7C 01 8B 45 B3 B1 30 A7 31 36 32 30 |1. .|..E..0.1620| 00000320: 00 34 0B 86 01 9F 31 2C 38 2C 32 2C 22 30 3A 22 |.4....1,8,2,"0:"| 00000330: AA 4E 4E 24 00 3D 0B 90 01 89 34 35 30 00 5C 0B |.NN$.=....450.\.| 00000340: 9A 01 99 3A 99 22 44 41 54 45 49 20 45 58 49 53 |...:."DATEI EXIS| 00000350: 54 49 45 52 54 20 53 43 48 4F 4E 21 00 62 0B A4 |TIERT SCHON!.b..| 00000360: 01 3A 00 76 0B AE 01 8F 20 2A 2A 20 48 41 55 50 |.:.v.... ** HAUP| 00000370: 54 4D 45 4E 55 45 00 7C 0B B8 01 3A 00 9E 0B C2 |TMENUE.|...:....| 00000380: 01 99 3A 99 22 20 5B 31 5D 20 41 4C 4C 45 20 45 |..:." [1] ALLE E| 00000390: 49 4E 54 52 41 45 47 45 20 4C 45 53 45 4E 00 BD |INTRAEGE LESEN..| 000003A0: 0B CC 01 99 22 20 5B 32 5D 20 45 49 4E 45 4E 20 |...." [2] EINEN | 000003B0: 45 49 4E 54 52 41 47 20 4C 45 53 45 4E 00 DA 0B |EINTRAG LESEN...| 000003C0: D6 01 99 22 20 5B 33 5D 20 45 49 4E 54 52 41 47 |..." [3] EINTRAG| 000003D0: 20 53 43 48 52 45 49 42 45 4E 00 F6 0B E0 01 99 | SCHREIBEN......| 000003E0: 22 20 5B 34 5D 20 45 49 4E 54 52 41 47 20 4C 4F |" [4] EINTRAG LO| 000003F0: 45 53 43 48 45 4E 00 10 0C EA 01 99 22 20 5B 35 |ESCHEN......" [5| 00000400: 5D 20 44 41 54 45 49 20 4C 4F 45 53 43 48 45 4E |] DATEI LOESCHEN| 00000410: 00 2A 0C F4 01 99 22 20 5B 36 5D 20 53 43 48 4C |.*...." [6] SCHL| 00000420: 55 53 53 20 44 41 4D 49 54 21 00 40 0C FE 01 99 |USS DAMIT!.@....| 00000430: 3A 85 22 31 20 42 49 53 20 36 20 22 3B 58 3A 99 |:."1 BIS 6 ";X:.| 00000440: 00 62 0C 08 02 91 58 89 35 37 30 2C 38 31 30 2C |.b....X.570,810,| 00000450: 38 37 30 2C 31 32 37 30 2C 31 34 37 30 2C 31 32 |870,1270,1470,12| 00000460: 31 30 00 6B 0C 12 02 89 34 35 30 00 71 0C 1C 02 |10.k....450.q...| 00000470: 3A 00 8F 0C 26 02 8F 20 2A 2A 20 41 4C 4C 45 20 |:...&.. ** ALLE | 00000480: 45 49 4E 54 52 41 45 47 45 20 4C 45 53 45 4E 00 |EINTRAEGE LESEN.| 00000490: 95 0C 30 02 3A 00 B9 0C 3A 02 52 B2 30 3A 4F B2 |..0.:...:.R.0:O.| 000004A0: 30 3A 8F 20 4F 3D 30 3A 20 46 4C 41 47 20 41 4C |0:. O=0: FLAG AL| 000004B0: 4C 45 53 20 4C 45 53 45 4E 00 E3 0C 44 02 52 B2 |LES LESEN...D.R.| 000004C0: 52 AA 31 3A 8F 20 52 3D 52 45 43 4F 52 44 2D 4E |R.1:. R=RECORD-N| 000004D0: 55 4D 4D 45 52 2C 20 46 3D 46 45 4C 44 4E 55 4D |UMMER, F=FELDNUM| 000004E0: 4D 45 52 00 E9 0C 4E 02 3A 00 FE 0C 58 02 8F 20 |MER...N.:...X.. | 000004F0: 2A 2A 20 4C 45 53 45 52 4F 55 54 49 4E 45 00 04 |** LESEROUTINE..| 00000500: 0D 62 02 3A 00 34 0D 6C 02 46 B2 30 3A 58 B2 30 |.b.:.4.l.F.0:X.0| 00000510: 3A 48 B2 B5 28 52 AD 32 35 36 29 3A 4C B2 52 AB |:H..(R.256):L.R.| 00000520: 48 AC 32 35 36 3A 8F 20 48 49 47 48 2F 4C 4F 57 |H.256:. HIGH/LOW| 00000530: 42 59 54 45 00 67 0D 76 02 98 31 35 2C 22 50 22 |BYTE.g.v..15,"P"| 00000540: AA C7 28 39 38 29 AA C7 28 4C 29 AA C7 28 48 29 |..(98)..(L)..(H)| 00000550: AA C7 28 31 29 3A 8F 20 52 45 43 4F 52 44 20 41 |..(1):. RECORD A| 00000560: 4E 46 41 48 52 45 4E 00 7A 0D 80 02 84 31 35 2C |NFAHREN.z....15,| 00000570: 45 2C 45 24 2C 45 31 2C 45 32 00 A3 0D 8A 02 8B |E,E$,E1,E2......| 00000580: 45 B2 35 30 B0 4F B2 32 A7 34 35 30 3A 8F 20 52 |E.50.O.2.450:. R| 00000590: 45 43 4F 52 44 20 42 45 53 54 45 48 54 20 4E 49 |ECORD BESTEHT NI| 000005A0: 43 48 54 00 BC 0D 94 02 4F B2 4F AC 28 4F AA 31 |CHT.....O.O.(O.1| 000005B0: 29 3A 8B 45 B3 B1 30 A7 31 36 32 30 00 F7 0D 9E |):.E..0.1620....| 000005C0: 02 98 31 35 2C 22 50 22 AA C7 28 39 38 29 AA C7 |..15,"P"..(98)..| 000005D0: 28 4C 29 AA C7 28 48 29 AA C7 28 31 29 3A 8F 20 |(L)..(H)..(1):. | 000005E0: 52 45 43 4F 52 44 20 4E 4F 43 48 4D 41 4C 20 41 |RECORD NOCHMAL A| 000005F0: 4E 46 41 48 52 45 4E 00 0A 0E A8 02 84 31 35 2C |NFAHREN......15,| 00000600: 45 2C 45 24 2C 45 31 2C 45 32 00 2F 0E B2 02 8B |E,E$,E1,E2./....| 00000610: 45 B2 35 30 A7 34 35 30 3A 8F 20 52 45 43 4F 52 |E.50.450:. RECOR| 00000620: 44 20 42 45 53 54 45 48 54 20 4E 49 43 48 54 00 |D BESTEHT NICHT.| 00000630: 3E 0E BC 02 8B 45 B3 B1 30 A7 31 36 32 30 00 5E |>....E..0.1620.^| 00000640: 0E C6 02 84 31 2C 58 24 3A 53 57 B2 53 54 3A 8F |....1,X$:SW.ST:.| 00000650: 20 53 54 41 54 55 53 20 4D 45 52 4B 45 4E 00 88 | STATUS MERKEN..| 00000660: 0E D0 02 8B 58 24 B2 C7 28 32 35 35 29 A7 99 22 |....X$..(255).."| 00000670: 45 49 4E 54 52 41 47 22 52 22 49 53 54 20 4C 45 |EINTRAG"R"IST LE| 00000680: 45 52 22 3A 89 35 38 30 00 A0 0E DA 02 8B 46 B2 |ER":.580......F.| 00000690: 30 A7 99 22 45 49 4E 54 52 41 47 22 52 22 3A 22 |0.."EINTRAG"R":"| 000006A0: 00 B4 0E E4 02 46 B2 46 AA 31 3A 8B 53 57 B2 30 |.....F.F.1:.SW.0| 000006B0: A7 58 B2 31 00 CB 0E EE 02 99 22 20 20 20 20 20 |.X.1......" | 000006C0: 46 45 4C 44 22 46 22 3A 22 58 24 00 D9 0E F8 02 |FELD"F":"X$.....| 000006D0: 8B 53 57 B2 30 A7 37 31 30 00 E2 0E 02 03 89 35 |.SW.0.710......5| 000006E0: 38 30 00 E8 0E 0C 03 3A 00 05 0F 16 03 8F 20 2A |80.....:...... *| 000006F0: 2A 20 45 49 4E 45 4E 20 45 49 4E 54 52 41 47 20 |* EINEN EINTRAG | 00000700: 4C 45 53 45 4E 00 0B 0F 20 03 3A 00 2B 0F 2A 03 |LESEN... .:.+.*.| 00000710: 85 22 57 45 4C 43 48 45 4E 20 45 49 4E 54 52 41 |."WELCHEN EINTRA| 00000720: 47 20 4C 45 53 45 4E 20 22 3B 52 00 40 0F 34 03 |G LESEN ";R.@.4.| 00000730: 8B 52 B3 31 B0 52 B3 B1 B5 28 52 29 A7 38 31 30 |.R.1.R...(R).810| 00000740: 00 6B 0F 3E 03 99 3A 4F B2 31 3A 89 36 32 30 3A |.k.>..:O.1:.620:| 00000750: 8F 20 46 4C 41 47 20 4F 3D 31 3A 20 4E 55 52 20 |. FLAG O=1: NUR | 00000760: 45 49 4E 45 4E 20 4C 45 53 45 4E 00 71 0F 48 03 |EINEN LESEN.q.H.| 00000770: 3A 00 8E 0F 52 03 8F 20 2A 2A 20 45 49 4E 54 52 |:...R.. ** EINTR| 00000780: 41 45 47 45 20 53 43 48 52 45 49 42 45 4E 00 94 |AEGE SCHREIBEN..| 00000790: 0F 5C 03 3A 00 B4 0F 66 03 85 22 42 45 53 43 48 |.\.:...f.."BESCH| 000007A0: 52 45 49 42 45 20 45 49 4E 54 52 41 47 20 4E 52 |REIBE EINTRAG NR| 000007B0: 2E 22 3B 52 00 C9 0F 70 03 8B 52 B3 31 B0 52 B3 |.";R...p..R.1.R.| 000007C0: B1 B5 28 52 29 A7 38 37 30 00 12 10 7A 03 48 B2 |..(R).870...z.H.| 000007D0: B5 28 52 AD 32 35 36 29 3A 4C B2 52 AB 48 AC 32 |.(R.256):L.R.H.2| 000007E0: 35 36 3A 8F 20 48 49 47 48 2F 4C 4F 57 42 59 54 |56:. HIGH/LOWBYT| 000007F0: 45 20 28 45 49 47 45 4E 54 4C 49 43 48 20 55 4E |E (EIGENTLICH UN| 00000800: 4E 4F 45 54 49 47 2C 20 44 41 20 52 20 3C 20 34 |NOETIG, DA R < 4| 00000810: 31 29 00 33 10 84 03 98 31 35 2C 22 50 22 AA C7 |1).3....15,"P"..| 00000820: 28 39 38 29 AA C7 28 4C 29 AA C7 28 48 29 AA C7 |(98)..(L)..(H)..| 00000830: 28 31 29 00 57 10 8E 03 84 31 35 2C 45 2C 45 24 |(1).W....15,E,E$| 00000840: 2C 45 31 2C 45 32 3A 8B 45 B3 B1 35 30 AF 45 B3 |,E1,E2:.E..50.E.| 00000850: B1 30 A7 31 36 32 30 00 78 10 98 03 98 31 35 2C |.0.1620.x....15,| 00000860: 22 50 22 AA C7 28 39 38 29 AA C7 28 4C 29 AA C7 |"P"..(98)..(L)..| 00000870: 28 48 29 AA C7 28 31 29 00 B2 10 A2 03 8B 45 B2 |(H)..(1)......E.| 00000880: 35 30 A7 99 3A 99 22 44 41 54 45 4E 53 41 54 5A |50..:."DATENSATZ| 00000890: 20 4D 55 53 53 20 45 52 53 54 20 47 45 4C 4F 45 | MUSS ERST GELOE| 000008A0: 53 43 48 54 20 57 45 52 44 45 4E 21 22 3A 89 34 |SCHT WERDEN!":.4| 000008B0: 35 30 00 C1 10 AC 03 8B 45 B3 B1 30 A7 31 36 32 |50......E..0.162| 000008C0: 30 00 E4 10 B6 03 99 3A 85 22 57 49 45 20 56 49 |0......:."WIE VI| 000008D0: 45 4C 45 20 46 45 4C 44 45 52 20 28 31 2D 33 29 |ELE FELDER (1-3)| 000008E0: 20 22 3B 4E 00 F5 10 C0 03 8B 4E B3 31 B0 4E B1 | ";N......N.1.N.| 000008F0: 33 A7 39 35 30 00 FB 10 CA 03 3A 00 14 11 D4 03 |3.950.....:.....| 00000900: 8F 20 2A 2A 20 46 45 4C 44 45 52 20 45 49 4E 47 |. ** FELDER EING| 00000910: 45 42 45 4E 00 1A 11 DE 03 3A 00 24 11 E8 03 41 |EBEN.....:.$...A| 00000920: 24 B2 22 22 00 46 11 F2 03 99 3A 99 22 42 49 54 |$."".F....:."BIT| 00000930: 54 45 20 46 45 4C 44 44 41 54 45 4E 20 45 49 4E |TE FELDDATEN EIN| 00000940: 47 45 42 45 4E 21 00 51 11 FC 03 81 4A B2 31 A4 |GEBEN!.Q....J.1.| 00000950: 4E 00 65 11 06 04 8B 4E B3 B1 31 A7 99 22 46 45 |N.e....N..1.."FE| 00000960: 4C 44 22 4A 3B 00 6D 11 10 04 85 42 24 00 9B 11 |LD"J;.m....B$...| 00000970: 1A 04 41 24 B2 41 24 AA 42 24 AA C7 28 31 33 29 |..A$.A$.B$..(13)| 00000980: 3A 8F 20 44 41 54 45 4E 53 41 54 5A 20 5A 55 53 |:. DATENSATZ ZUS| 00000990: 41 4D 4D 45 4E 46 55 45 47 45 4E 00 A2 11 24 04 |AMMENFUEGEN...$.| 000009A0: 82 4A 00 D9 11 2E 04 41 24 B2 C8 28 41 24 2C C3 |.J.....A$..(A$,.| 000009B0: 28 41 24 29 AB 31 29 3A 8F 20 4C 45 54 5A 54 45 |(A$).1):. LETZTE| 000009C0: 53 20 43 52 20 28 43 48 52 24 28 31 33 29 29 20 |S CR (CHR$(13)) | 000009D0: 45 4E 54 46 45 52 4E 45 4E 00 FD 11 38 04 98 31 |ENTFERNEN...8..1| 000009E0: 2C 41 24 3B 3A 8F 20 55 4E 44 20 49 4E 20 44 41 |,A$;:. UND IN DA| 000009F0: 54 45 49 20 53 43 48 52 45 49 42 45 4E 00 10 12 |TEI SCHREIBEN...| 00000A00: 42 04 84 31 35 2C 45 2C 45 24 2C 45 31 2C 45 32 |B..15,E,E$,E1,E2| 00000A10: 00 1F 12 4C 04 8B 45 B3 B1 30 A7 31 36 32 30 00 |...L..E..0.1620.| 00000A20: 26 12 56 04 A0 31 00 39 12 60 04 84 31 35 2C 45 |&.V..1.9.`..15,E| 00000A30: 2C 45 24 2C 45 31 2C 45 32 00 48 12 6A 04 8B 45 |,E$,E1,E2.H.j..E| 00000A40: B3 B1 30 A7 31 36 32 30 00 5C 12 74 04 9F 31 2C |..0.1620.\.t..1,| 00000A50: 38 2C 32 2C 22 30 3A 22 AA 4E 4E 24 00 6F 12 7E |8,2,"0:".NN$.o.~| 00000A60: 04 84 31 35 2C 45 2C 45 24 2C 45 31 2C 45 32 00 |..15,E,E$,E1,E2.| 00000A70: 7E 12 88 04 8B 45 B3 B1 30 A7 31 36 32 30 00 87 |~....E..0.1620..| 00000A80: 12 92 04 89 34 35 30 00 8D 12 9C 04 3A 00 9B 12 |....450.....:...| 00000A90: A6 04 8F 20 2A 2A 20 45 4E 44 45 00 A1 12 B0 04 |... ** ENDE.....| 00000AA0: 3A 00 A8 12 BA 04 A0 31 00 B0 12 C4 04 A0 31 35 |:......1......15| 00000AB0: 00 B6 12 CE 04 80 00 BC 12 D8 04 3A 00 D6 12 E2 |...........:....| 00000AC0: 04 8F 20 2A 2A 20 45 49 4E 54 52 41 47 20 4C 4F |.. ** EINTRAG LO| 00000AD0: 45 53 43 48 45 4E 00 DC 12 EC 04 3A 00 F9 12 F6 |ESCHEN.....:....| 00000AE0: 04 85 22 4C 4F 45 53 43 48 45 20 45 49 4E 54 52 |.."LOESCHE EINTR| 00000AF0: 41 47 20 4E 52 2E 22 3B 52 00 0F 13 00 05 8B 52 |AG NR.";R......R| 00000B00: B3 31 B0 52 B3 B1 B5 28 52 29 A7 31 32 37 30 00 |.1.R...(R).1270.| 00000B10: 37 13 0A 05 48 B2 B5 28 52 AD 32 35 36 29 3A 4C |7...H..(R.256):L| 00000B20: B2 52 AB 48 AC 32 35 36 3A 8F 20 48 49 47 48 2F |.R.H.256:. HIGH/| 00000B30: 4C 4F 57 42 59 54 45 00 58 13 14 05 98 31 35 2C |LOWBYTE.X....15,| 00000B40: 22 50 22 AA C7 28 39 38 29 AA C7 28 4C 29 AA C7 |"P"..(98)..(L)..| 00000B50: 28 48 29 AA C7 28 31 29 00 7C 13 1E 05 84 31 35 |(H)..(1).|....15| 00000B60: 2C 45 2C 45 24 2C 45 31 2C 45 32 3A 8B 45 B3 B1 |,E,E$,E1,E2:.E..| 00000B70: 35 30 AF 45 B3 B1 30 A7 31 36 32 30 00 9D 13 28 |50.E..0.1620...(| 00000B80: 05 98 31 35 2C 22 50 22 AA C7 28 39 38 29 AA C7 |..15,"P"..(98)..| 00000B90: 28 4C 29 AA C7 28 48 29 AA C7 28 31 29 00 C3 13 |(L)..(H)..(1)...| 00000BA0: 32 05 8B 45 B2 35 30 A7 99 3A 99 22 44 41 54 45 |2..E.50..:."DATE| 00000BB0: 4E 53 41 54 5A 20 4E 45 55 20 41 4E 47 45 4C 45 |NSATZ NEU ANGELE| 00000BC0: 47 54 21 00 D8 13 3C 05 8B 45 B3 B1 30 AF 45 B3 |GT!...<..E..0.E.| 00000BD0: B1 35 30 A7 31 36 32 30 00 07 14 46 05 98 31 2C |.50.1620...F..1,| 00000BE0: C7 28 32 35 35 29 3B 3A 8F 20 4C 4F 45 53 43 48 |.(255);:. LOESCH| 00000BF0: 43 4F 44 45 20 49 4E 20 44 41 54 45 49 20 53 43 |CODE IN DATEI SC| 00000C00: 48 52 45 49 42 45 4E 00 1A 14 50 05 84 31 35 2C |HREIBEN...P..15,| 00000C10: 45 2C 45 24 2C 45 31 2C 45 32 00 21 14 5A 05 A0 |E,E$,E1,E2.!.Z..| 00000C20: 31 00 34 14 64 05 84 31 35 2C 45 2C 45 24 2C 45 |1.4.d..15,E,E$,E| 00000C30: 31 2C 45 32 00 43 14 6E 05 8B 45 B3 B1 30 A7 31 |1,E2.C.n..E..0.1| 00000C40: 36 32 30 00 57 14 78 05 9F 31 2C 38 2C 32 2C 22 |620.W.x..1,8,2,"| 00000C50: 30 3A 22 AA 4E 4E 24 00 6A 14 82 05 84 31 35 2C |0:".NN$.j....15,| 00000C60: 45 2C 45 24 2C 45 31 2C 45 32 00 79 14 8C 05 8B |E,E$,E1,E2.y....| 00000C70: 45 B3 B1 30 A7 31 36 32 30 00 82 14 96 05 89 34 |E..0.1620......4| 00000C80: 35 30 00 88 14 A0 05 3A 00 A0 14 AA 05 8F 20 2A |50.....:...... *| 00000C90: 2A 20 44 41 54 45 49 20 4C 4F 45 53 43 48 45 4E |* DATEI LOESCHEN| 00000CA0: 00 A6 14 B4 05 3A 00 CC 14 BE 05 99 22 44 41 54 |.....:......"DAT| 00000CB0: 45 49 20 57 49 52 4B 4C 49 43 48 20 4C 4F 45 53 |EI WIRKLICH LOES| 00000CC0: 43 48 45 4E 20 3F 20 5B 4A 2F 4E 5D 00 E0 14 C8 |CHEN ? [J/N]....| 00000CD0: 05 A1 41 24 3A 8B 41 24 B2 22 4E 22 A7 34 35 30 |..A$:.A$."N".450| 00000CE0: 00 F2 14 D2 05 8B 41 24 B3 B1 22 4A 22 A7 31 34 |......A$.."J".14| 00000CF0: 38 30 00 F9 14 DC 05 A0 31 00 1C 15 E6 05 98 31 |80......1......1| 00000D00: 35 2C 22 53 30 3A 22 AA 4E 4E 24 3A 8F 20 53 43 |5,"S0:".NN$:. SC| 00000D10: 52 41 54 43 48 2D 42 45 46 45 48 4C 00 3B 15 F0 |RATCH-BEFEHL.;..| 00000D20: 05 99 3A 99 22 44 41 54 45 49 20 57 55 52 44 45 |..:."DATEI WURDE| 00000D30: 20 47 45 4C 4F 45 53 43 48 54 2E 00 5A 15 FA 05 | GELOESCHT..Z...| 00000D40: 99 3A 99 22 20 5B 31 5D 20 50 52 4F 47 52 41 4D |.:." [1] PROGRAM| 00000D50: 4D 20 4E 45 55 53 54 41 52 54 00 6A 15 04 06 99 |M NEUSTART.j....| 00000D60: 22 20 5B 32 5D 20 45 4E 44 45 00 81 15 0E 06 99 |" [2] ENDE......| 00000D70: 3A 85 22 31 20 4F 44 45 52 20 32 20 22 3B 58 3A |:."1 ODER 2 ";X:| 00000D80: 99 00 8F 15 18 06 8B 58 B2 32 A7 31 32 31 30 00 |.......X.2.1210.| 00000D90: 9A 15 22 06 8B 58 B2 31 A7 8A 00 A4 15 2C 06 89 |.."..X.1.....,..| 00000DA0: 31 35 35 30 00 AA 15 36 06 3A 00 C4 15 40 06 8F |1550...6.:...@..| 00000DB0: 20 2A 2A 20 44 49 41 47 4E 4F 53 45 2D 52 4F 55 | ** DIAGNOSE-ROU| 00000DC0: 54 49 4E 45 00 CA 15 4A 06 3A 00 ED 15 54 06 99 |TINE...J.:...T..| 00000DD0: 3A 99 22 56 4F 52 53 49 43 48 54 3A 20 44 49 53 |:."VORSICHT: DIS| 00000DE0: 4B 45 54 54 45 4E 46 45 48 4C 45 52 21 00 04 16 |KETTENFEHLER!...| 00000DF0: 5E 06 99 3A 99 22 46 45 48 4C 45 52 4E 55 4D 4D |^..:."FEHLERNUMM| 00000E00: 45 52 22 45 00 14 16 68 06 99 22 54 45 58 54 3A |ER"E...h.."TEXT:| 00000E10: 20 22 45 24 00 2E 16 72 06 99 22 54 52 41 43 4B | "E$...r.."TRACK| 00000E20: 22 45 31 22 20 53 45 4B 54 4F 52 22 45 32 00 35 |"E1" SEKTOR"E2.5| 00000E30: 16 7C 06 A0 31 00 3B 16 86 06 90 00 4A 16 90 06 |.|..1.;.....J...| 00000E40: 8B 45 B3 B1 30 A7 31 36 32 30 00 74 16 9A 06 99 |.E..0.1620.t....| 00000E50: 3A 99 22 41 42 41 52 42 45 49 54 55 4E 47 20 4E |:."ABARBEITUNG N| 00000E60: 49 43 48 54 20 4B 4F 52 52 45 4B 54 21 22 3A 89 |ICHT KORREKT!":.| 00000E70: 31 36 36 30 00 00 00 |1660... |
..*.D.. DEMOPROGRAMM FUER RELATIVE DATEI EN.S.N.. FUER ALLE COMMODORE 8-BIT COMPU TER...X.. NIKOLAUS HEUSLER, ZWENGAUERWEG 18, 8000 MUENCHEN 71...... NH-040291-AR R M&T 01.92 64'ER SONDERHEFT.D...:.V.. .. ** VORSPIEL... .:......15,8,15,"I":. FEHLERKANAL.....NN$."NH'S REL-DEMO":. FI LENAME.L....1,8,2,"0:".NN$:. DATEI SCHON VORHANDEN ?.K.H..".":. BILDSCHIRM LOESC HEN...R..15,E,E$,E1,E2:. FEHLER ?......E .0.410:. DATEI BESTEHT SCHON..... 1.T... .E..62.1620:. ANDERER FEHLER.Z...:...... ** DATEI ANLEGEN.....:......:."DATEI WI RD ANGELEGT.U."..1,8,2,"0:".NN$.",L,".G( 33):. REL-FILE ANLEGEN, SATZLAENGE 33.H. ,..15,E,E$,E1,E2.W.6..E..0.1620...@..15, "P".G(98).G(10).G(0).G(1):. SEK.ADR 98, DAT.SATZ 10.F.J..15,E,E$,E1,E2.V.T..E..5 0.1680...^..1,G(255);:. DATEI FREIGEBEN. ..H..15,E,E$,E1,E2...R. 1. .|..E..0.1620 .4....1,8,2,"0:".NN$.=....450.\....:."DA TEI EXISTIERT SCHON!.B...:.V.... ** HAUP TMENUE.|...:...B..:." [1] ALLE EINTRAEGE LESEN...L.." [2] EINEN EINTRAG LESEN.Z. V.." [3] EINTRAG SCHREIBEN......" [4] EI NTRAG LOESCHEN......" [5] DATEI LOESCHEN .*...." [6] SCHLUSS DAMIT!.@....:."1 BIS 6 ";X:..B....X.570,810,870,1270,1470,12 10.K....450.Q...:...&.. ** ALLE EINTRAEG E LESEN...0.:...:.R.0:O.0:. O=0: FLAG AL LES LESEN...D.R.R.1:. R=RECORD-NUMMER, F =FELDNUMMER...N.:...X.. ** LESEROUTINE.. .B.:.4.L.F.0:X.0:H..(R.256):L.R.H.256:. HIGH/LOWBYTE.G.V..15,"P".G(98).G(L).G(H) .G(1):. RECORD ANFAHREN.Z....15,E,E$,E1, E2......E.50.O.2.450:. RECORD BESTEHT NI CHT.....O.O.(O.1):.E..0.1620......15,"P" .G(98).G(L).G(H).G(1):. RECORD NOCHMAL A NFAHREN......15,E,E$,E1,E2./....E.50.450 :. RECORD BESTEHT NICHT.>....E..0.1620.^ .F..1,X$:SW.ST:. STATUS MERKEN...P..X$.G (255).."EINTRAG"R"IST LEER":.580. .Z..F. 0.."EINTRAG"R":".....F.F.1:.SW.0.X.1.K.. .." FELD"F":"X$.Y....SW.0.710......5 80.....:...... ** EINEN EINTRAG LESEN... .:.+.*.."WELCHEN EINTRAG LESEN ";R.@.4. .R.1.R...(R).810.K.>..:O.1:.620:. FLAG O =1: NUR EINEN LESEN.Q.H.:...R.. ** EINTR AEGE SCHREIBEN...\.:...F.."BESCHREIBE EI NTRAG NR.";R.I.P..R.1.R...(R).870...Z.H. .(R.256):L.R.H.256:. HIGH/LOWBYTE (EIGEN TLICH UNNOETIG, DA R < 41).3....15,"P".G (98).G(L).G(H).G(1).W....15,E,E$,E1,E2:. E..50.E..0.1620.X....15,"P".G(98).G(L).G (H).G(1)......E.50..:."DATENSATZ MUSS ER ST GELOESCHT WERDEN!":.450.A....E..0.162 0......:."WIE VIELE FELDER (1-3) ";N.... ..N.1.N.3.950...J.:...T.. ** FELDER EING EBEN.....:.$...A$."".F....:."BITTE FELDD ATEN EINGEBEN!.Q....J.1.N.E....N..1.."FE LD"J;.M....B$.....A$.A$.B$.G(13):. DATEN SATZ ZUSAMMENFUEGEN...$..J.Y...A$.H(A$,C (A$).1):. LETZTES CR (CHR$(13)) ENTFERNE N...8..1,A$;:. UND IN DATEI SCHREIBEN... B..15,E,E$,E1,E2...L..E..0.1620.&.V. 1.9 .`..15,E,E$,E1,E2.H.J..E..0.1620.\.T..1, 8,2,"0:".NN$.O.~..15,E,E$,E1,E2.~....E.. 0.1620......450.....:...... ** ENDE..... :..... 1...D. 15...N.....X.:.V.... ** EI NTRAG LOESCHEN.....:......"LOESCHE EINTR AG NR.";R......R.1.R...(R).1270.7...H..( R.256):L.R.H.256:. HIGH/LOWBYTE.X....15, "P".G(98).G(L).G(H).G(1).|....15,E,E$,E1 ,E2:.E..50.E..0.1620...(..15,"P".G(98).G (L).G(H).G(1).C.2..E.50..:."DATENSATZ NE U ANGELEGT!.X.<..E..0.E..50.1620...F..1, G(255);:. LOESCHCODE IN DATEI SCHREIBEN. ..P..15,E,E$,E1,E2.!.Z. 1.4.D..15,E,E$,E 1,E2.C.N..E..0.1620.W.X..1,8,2,"0:".NN$. J....15,E,E$,E1,E2.Y....E..0.1620......4 50... .:. .... ** DATEI LOESCHEN.....:.L ...."DATEI WIRKLICH LOESCHEN ? [J/N]...H ..A$:.A$."N".450...R..A$.."J".1480..... 1......15,"S0:".NN$:. SCRATCH-BEFEHL.;.. ..:."DATEI WURDE GELOESCHT..Z....:." [1] PROGRAMM NEUSTART.J...." [2] ENDE...... :."1 ODER 2 ";X:.......X.2.1210..."..X.1 .....,..1550...6.:.D.@.. ** DIAGNOSE-ROU TINE.J.J.:...T..:."VORSICHT: DISKETTENFE HLER!...^..:."FEHLERNUMMER"E...H.."TEXT: "E$...R.."TRACK"E1" SEKTOR"E2.5.|. 1.;. ....J....E..0.1620.T....:."ABARBEITUNG N ICHT KORREKT!":.1660...
> CLICK IMAGE PREVIEW FOR FULL MODAL