REL.HELP.ASM

FILE INFORMATION

FILENAME(S): REL.HELP.ASM

FILE TYPE(S): PRG

FILE SIZE: 4K

FIRST SEEN: 2025-10-20 00:37:12

APPEARS ON: 2 disk(s)

FILE HASH

0f746e757828feaaf8debbdb4de5a009d9e64b63b0d258190c3979e5610e1d83

FOUND ON DISKS (2 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
RUN SPEZIAL 1 T2	REL.HELP.ASM	PRG	Treasure Chest - Holger	26	0	DOWNLOAD FILE
RUN SPEZIAL 1 T2	REL.HELP.ASM	PRG	Treasure Chest - Plattfuss	26	0	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 0D 08 0A 00 3A 9E  33 34 33 30 34 00 13 08  |......:.34304...|
00000010: 14 00 3A 00 19 08 1E 00  3A 00 25 08 28 00 AC B2  |..:.....:.%.(...|
00000020: 24 43 31 37 30 00 2B 08  32 00 3A 00 3E 08 46 00  |$C170.+.2.:.>.F.|
00000030: 3A 20 52 45 4C 2E 48 45  4C 50 20 31 2E 30 00 44  |: REL.HELP 1.0.D|
00000040: 08 50 00 3A 00 85 08 55  00 3A AB AB AB AB AB AB  |.P.:...U.:......|
00000050: AB AB AB AB AB 20 53 41  54 5A 5A 45 49 47 45 52  |..... SATZZEIGER|
00000060: 20 B9 49 54 49 91 49 45  52 45 4E 20 AB AB AB AB  | .ITI.IEREN ....|
00000070: AB AB AB AB AB AB AB AB  AB AB AB AB AB AB AB AB  |................|
00000080: AB AB AB AB AB 00 8B 08  56 00 3A 00 94 08 63 00  |........V.:...c.|
00000090: 4C 31 30 30 00 BE 08 64  00 4A 53 52 20 24 41 45  |L100...d.JSR $AE|
000000A0: 46 44 20 20 20 3A 43 48  4B 43 4F 4D 20 20 50 52  |FD   :CHKCOM  PR|
000000B0: 55 45 46 54 20 41 55 46  20 4B 4F 4D 4D 41 00 E4  |UEFT AUF KOMMA..|
000000C0: 08 69 00 4A 53 52 20 24  41 44 38 41 20 20 20 3A  |.i.JSR $AD8A   :|
000000D0: 46 52 4D 4E 55 4D 20 20  41 55 53 44 52 55 43 4B  |FRMNUM  AUSDRUCK|
000000E0: 20 48 4F C3 00 24 09 6E  00 4A 53 52 20 24 42 37  | HO..$.n.JSR $B7|
000000F0: 46 37 20 20 20 3A A1 41  44 52 20 20 31 36 AB 42  |F7   :.ADR  16.B|
00000100: 49 54 20 57 45 52 54 20  48 4F C3 20 24 31 34 B2  |IT WERT HO. $14.|
00000110: 4C 4F AB 42 59 54 45 20  20 24 31 35 B2 48 49 AB  |LO.BYTE  $15.HI.|
00000120: 42 59 54 45 00 2D 09 72  00 4C 31 31 35 00 41 09  |BYTE.-.r.L115.A.|
00000130: 73 00 4C 44 58 20 23 24  30 46 20 20 20 20 3A 31  |s.LDX #$0F    :1|
00000140: 35 00 62 09 78 00 4A 53  52 20 24 46 46 43 39 20  |5.b.x.JSR $FFC9 |
00000150: 20 20 3A 41 55 53 47 41  42 45 20 41 55 46 20 23  |  :AUSGABE AUF #|
00000160: 31 35 00 7A 09 7D 00 4C  44 41 20 23 24 35 30 20  |15.z.}.LDA #$50 |
00000170: 20 20 20 3A C6 28 22 50  22 29 00 8D 09 82 00 4A  |   :.("P").....J|
00000180: 53 52 20 24 46 46 44 32  20 20 20 3A 99 00 A4 09  |SR $FFD2   :....|
00000190: 87 00 4C 44 41 20 23 24  30 32 20 20 20 20 3A C7  |..LDA #$02    :.|
000001A0: 28 30 32 29 00 B7 09 8C  00 4A 53 52 20 24 46 46  |(02).....JSR $FF|
000001B0: 44 32 20 20 20 3A 99 00  CE 09 91 00 4C 44 41 20  |D2   :......LDA |
000001C0: 24 31 34 20 20 20 20 20  3A C7 28 4C 42 29 00 E1  |$14     :.(LB)..|
000001D0: 09 96 00 4A 53 52 20 24  46 46 44 32 20 20 20 3A  |...JSR $FFD2   :|
000001E0: 99 00 F8 09 9B 00 4C 44  41 20 24 31 35 20 20 20  |......LDA $15   |
000001F0: 20 20 3A C7 28 48 42 29  00 0B 0A A0 00 4A 53 52  |  :.(HB).....JSR|
00000200: 20 24 46 46 44 32 20 20  20 3A 99 00 21 0A A5 00  | $FFD2   :..!...|
00000210: 4C 44 41 20 23 24 30 31  20 20 20 20 3A C7 28 31  |LDA #$01    :.(1|
00000220: 29 00 34 0A AA 00 4A 53  52 20 24 46 46 44 32 20  |).4...JSR $FFD2 |
00000230: 20 20 3A 99 00 5E 0A AF  00 4A 53 52 20 24 46 46  |  :..^...JSR $FF|
00000240: 43 43 20 20 20 3A 9C 43  48 20 41 55 53 47 41 42  |CC   :.CH AUSGAB|
00000250: 45 20 57 49 45 44 45 52  20 4E B0 4D 41 4C 00 7F  |E WIEDER N.MAL..|
00000260: 0A B4 00 52 54 53 20 20  20 20 20 20 20 20 20 3A  |...RTS         :|
00000270: 52 55 45 43 4B 53 50 8A  47 20 42 41 53 49 43 00  |RUECKSP.G BASIC.|
00000280: 85 0A B5 00 3A 00 C8 0A  B6 00 3A AB AB AB AB AB  |....:.....:.....|
00000290: AB AB AB AB AB AB 20 44  41 54 45 49 20 4F 45 46  |...... DATEI OEF|
000002A0: A5 45 4E 20 AB AB AB AB  AB AB AB AB AB AB AB AB  |.EN ............|
000002B0: AB AB AB AB AB AB AB AB  AB AB AB AB AB AB AB AB  |................|
000002C0: AB AB AB AB AB AB AB AB  00 CE 0A B7 00 3A 00 F7  |.............:..|
000002D0: 0A B9 00 4A 53 52 20 24  41 45 46 44 20 20 20 3A  |...JSR $AEFD   :|
000002E0: 43 48 4B 43 4F 4D 20 50  52 55 45 46 54 20 41 55  |CHKCOM PRUEFT AU|
000002F0: 46 20 4B 4F 4D 4D 41 00  13 0B BE 00 4A 53 52 20  |F KOMMA.....JSR |
00000300: 24 45 32 35 37 20 20 20  3A 53 54 52 49 4E 47 20  |$E257   :STRING |
00000310: 48 4F C3 00 35 0B C3 00  53 54 41 20 24 30 32 43  |HO..5...STA $02C|
00000320: 30 20 20 20 3A 4C 41 45  4E 47 45 20 4E 41 43 48  |0   :LAENGE NACH|
00000330: 20 21 37 30 34 00 41 0B  C8 00 53 54 58 20 24 35  | !704.A...STX $5|
00000340: 37 00 64 0B CD 00 53 54  59 20 24 35 38 20 20 20  |7.d...STY $58   |
00000350: 20 20 3A 41 44 52 45 53  53 45 20 53 50 45 49 43  |  :ADRESSE SPEIC|
00000360: 48 45 52 4E 00 7C 0B D2  00 4A 53 52 20 24 41 45  |HERN.|...JSR $AE|
00000370: 46 44 20 20 20 3A 43 48  4B 43 4F 4D 00 A2 0B D7  |FD   :CHKCOM....|
00000380: 00 4A 53 52 20 24 42 37  39 45 20 20 20 3A A1 42  |.JSR $B79E   :.B|
00000390: 59 54 20 48 4F 4C 54 20  38 AB 42 49 54 20 57 45  |YT HOLT 8.BIT WE|
000003A0: 52 54 00 C8 0B DC 00 53  54 58 20 24 30 32 43 31  |RT.....STX $02C1|
000003B0: 20 20 20 3A 53 41 54 5A  4C 41 45 4E 47 45 20 4E  |   :SATZLAENGE N|
000003C0: 41 43 48 20 21 37 30 35  00 D1 0B E0 00 4C 32 32  |ACH !705.....L22|
000003D0: 35 00 DE 0B E1 00 4C 44  58 20 23 24 30 30 00 EB  |5.....LDX #$00..|
000003E0: 0B E6 00 4C 44 59 20 23  24 30 30 00 F4 0B EA 00  |...LDY #$00.....|
000003F0: 4C 32 33 35 00 25 0C EB  00 4C 44 41 20 28 24 35  |L235.%...LDA ($5|
00000400: 37 29 2C 59 20 3A 44 41  54 45 49 4E 41 4D 45 20  |7),Y :DATEINAME |
00000410: 4E 41 43 48 20 21 37 30  36 2E 2E 2E 20 53 43 48  |NACH !706... SCH|
00000420: 49 45 42 45 4E 00 35 0C  F0 00 53 54 41 20 24 30  |IEBEN.5...STA $0|
00000430: 32 43 32 2C 59 00 3F 0C  F5 00 49 4E 59 20 20 00  |2C2,Y.?...INY  .|
00000440: 4D 0C FA 00 43 50 59 20  24 30 32 43 30 00 5A 0C  |M...CPY $02C0.Z.|
00000450: FF 00 42 4E 45 20 4C 32  33 35 00 7C 0C 04 01 4C  |..BNE L235.|...L|
00000460: 44 41 20 23 24 32 43 20  20 20 20 3A 2C 4C 2C C7  |DA #$2C    :,L,.|
00000470: 28 4C 29 20 5A 55 46 55  45 47 45 4E 00 8C 0C 09  |(L) ZUFUEGEN....|
00000480: 01 53 54 41 20 24 30 32  43 32 2C 59 00 96 0C 0E  |.STA $02C2,Y....|
00000490: 01 49 4E 59 20 20 00 A0  0C 13 01 49 4E 59 20 20  |.INY  .....INY  |
000004A0: 00 B0 0C 18 01 53 54 41  20 24 30 32 43 32 2C 59  |.....STA $02C2,Y|
000004B0: 00 BA 0C 1D 01 44 45 59  20 20 00 C7 0C 22 01 4C  |.....DEY  ...".L|
000004C0: 44 41 20 23 24 34 43 00  D7 0C 27 01 53 54 41 20  |DA #$4C...'.STA |
000004D0: 24 30 32 43 32 2C 59 00  E1 0C 2C 01 49 4E 59 20  |$02C2,Y...,.INY |
000004E0: 20 00 EB 0C 31 01 49 4E  59 20 20 00 F9 0C 36 01  | ...1.INY  ...6.|
000004F0: 4C 44 41 20 24 30 32 43  31 00 09 0D 3B 01 53 54  |LDA $02C1...;.ST|
00000500: 41 20 24 30 32 43 32 2C  59 00 17 0D 40 01 4C 44  |A $02C2,Y...@.LD|
00000510: 41 20 24 30 32 43 30 00  49 0D 45 01 41 44 43 20  |A $02C0.I.E.ADC |
00000520: 23 24 30 33 20 20 20 20  3A 4C 41 45 4E 47 45 20  |#$03    :LAENGE |
00000530: 44 45 53 20 4E 41 4D 45  4E 53 20 4B B0 52 49 47  |DES NAMENS K.RIG|
00000540: 49 45 52 45 4E 20 20 AA  33 00 57 0D 4A 01 53 54  |IEREN  .3.W.J.ST|
00000550: 41 20 24 30 32 43 30 00  71 0D 4F 01 4C 44 41 20  |A $02C0.q.O.LDA |
00000560: 23 24 30 46 20 20 20 20  3A 9F 31 35 2C 38 2C 31  |#$0F    :.15,8,1|
00000570: 35 00 7E 0D 54 01 4C 44  58 20 23 24 30 38 00 8B  |5.~.T.LDX #$08..|
00000580: 0D 59 01 4C 44 59 20 23  24 30 46 00 A3 0D 5E 01  |.Y.LDY #$0F...^.|
00000590: 4A 53 52 20 24 46 46 42  41 20 20 20 3A 53 45 54  |JSR $FFBA   :SET|
000005A0: 46 4C 53 00 B0 0D 63 01  4C 44 41 20 23 24 30 30  |FLS...c.LDA #$00|
000005B0: 00 C8 0D 68 01 4A 53 52  20 24 46 46 42 44 20 20  |...h.JSR $FFBD  |
000005C0: 20 3A 53 45 54 4E 41 4D  00 DB 0D 6D 01 4A 53 52  | :SETNAM...m.JSR|
000005D0: 20 24 46 46 43 30 20 20  20 3A 9F 00 F3 0D 72 01  | $FFC0   :....r.|
000005E0: 4C 44 41 20 23 24 30 31  20 20 20 20 3A 9F 31 2C  |LDA #$01    :.1,|
000005F0: 38 2C 32 00 00 0E 77 01  4C 44 58 20 23 24 30 38  |8,2...w.LDX #$08|
00000600: 00 0D 0E 7C 01 4C 44 59  20 23 24 30 32 00 25 0E  |...|.LDY #$02.%.|
00000610: 81 01 4A 53 52 20 24 46  46 42 41 20 20 20 3A 53  |..JSR $FFBA   :S|
00000620: 45 54 46 4C 53 00 33 0E  86 01 4C 44 41 20 24 30  |ETFLS.3...LDA $0|
00000630: 32 43 30 00 40 0E 8B 01  4C 44 58 20 23 24 43 32  |2C0.@...LDX #$C2|
00000640: 00 4D 0E 90 01 4C 44 59  20 23 24 30 32 00 65 0E  |.M...LDY #$02.e.|
00000650: 95 01 4A 53 52 20 24 46  46 42 44 20 20 20 3A 53  |..JSR $FFBD   :S|
00000660: 45 54 4E 41 4D 00 78 0E  9A 01 4A 53 52 20 24 46  |ETNAM.x...JSR $F|
00000670: 46 43 30 20 20 20 3A 9F  00 99 0E 9F 01 52 54 53  |FC0   :......RTS|
00000680: 20 20 20 20 20 20 20 20  20 3A 52 55 45 43 4B 53  |         :RUECKS|
00000690: 50 8A 47 20 42 41 53 49  43 00 9F 0E A0 01 3A 00  |P.G BASIC.....:.|
000006A0: E3 0E A1 01 3A AB AB AB  AB AB AB AB AB AB AB AB  |....:...........|
000006B0: 20 44 41 54 45 49 20 41  4E 4C 45 47 45 4E 20 AB  | DATEI ANLEGEN .|
000006C0: AB AB AB AB AB AB AB AB  AB AB AB AB AB AB AB AB  |................|
000006D0: AB AB AB AB AB AB AB AB  AB AB AB AB AB AB AB AB  |................|
000006E0: AB AB AB 00 E9 0E A2 01  3A 00 12 0F A4 01 4A 53  |........:.....JS|
000006F0: 52 20 24 41 45 46 44 20  20 20 3A 43 48 4B 43 4F  |R $AEFD   :CHKCO|
00000700: 4D 20 50 52 55 45 46 54  20 41 55 46 20 4B 4F 4D  |M PRUEFT AUF KOM|
00000710: 4D 41 00 2E 0F A9 01 4A  53 52 20 24 45 32 35 37  |MA.....JSR $E257|
00000720: 20 20 20 3A 53 54 52 49  4E 47 20 48 4F C3 00 50  |   :STRING HO..P|
00000730: 0F AE 01 53 54 41 20 24  30 32 43 30 20 20 20 3A  |...STA $02C0   :|
00000740: 4C 41 45 4E 47 45 20 4E  41 43 48 20 21 37 30 34  |LAENGE NACH !704|
00000750: 00 5C 0F B3 01 53 54 58  20 24 35 37 00 80 0F B8  |.\...STX $57....|
00000760: 01 53 54 59 20 24 35 38  20 20 20 20 20 3A 41 44  |.STY $58     :AD|
00000770: 52 45 53 53 45 20 20 53  50 45 49 43 48 45 52 4E  |RESSE  SPEICHERN|
00000780: 00 A9 0F BD 01 4A 53 52  20 24 41 45 46 44 20 20  |.....JSR $AEFD  |
00000790: 20 3A 43 48 4B 43 4F 4D  20 50 52 55 45 46 54 20  | :CHKCOM PRUEFT |
000007A0: 41 55 46 20 4B 4F 4D 4D  41 00 CF 0F C2 01 4A 53  |AUF KOMMA.....JS|
000007B0: 52 20 24 42 37 39 45 20  20 20 3A A1 42 59 54 20  |R $B79E   :.BYT |
000007C0: 48 4F 4C 54 20 38 AB 42  49 54 20 57 45 52 54 00  |HOLT 8.BIT WERT.|
000007D0: FA 0F C7 01 53 54 58 20  24 30 32 43 31 20 20 20  |....STX $02C1   |
000007E0: 3A 44 41 54 45 4E 53 41  54 5A 4C 41 45 4E 47 45  |:DATENSATZLAENGE|
000007F0: 20 4E 41 43 48 20 21 37  30 35 00 23 10 CC 01 4A  | NACH !705.#...J|
00000800: 53 52 20 24 41 45 46 44  20 20 20 3A 43 48 4B 43  |SR $AEFD   :CHKC|
00000810: 4F 4D 20 50 52 55 45 46  54 20 41 55 46 20 4B 4F  |OM PRUEFT AUF KO|
00000820: 4D 4D 41 00 48 10 D1 01  4A 53 52 20 24 41 44 38  |MMA.H...JSR $AD8|
00000830: 41 20 20 20 3A 46 52 4D  4E 55 4D 20 41 55 53 44  |A   :FRMNUM AUSD|
00000840: 52 55 43 4B 20 48 4F C3  00 6A 10 D6 01 4A 53 52  |RUCK HO..j...JSR|
00000850: 20 24 42 37 46 37 20 20  20 3A A1 41 44 52 20 31  | $B7F7   :.ADR 1|
00000860: 36 AB 42 49 54 20 57 45  52 54 00 8C 10 DB 01 4A  |6.BIT WERT.....J|
00000870: 53 52 20 4C 32 32 35 20  20 20 20 3A 4F 45 46 A5  |SR L225    :OEF.|
00000880: 45 4E 20 44 45 52 20 44  41 54 45 49 00 BC 10 E0  |EN DER DATEI....|
00000890: 01 4A 53 52 20 4C 31 31  35 20 20 20 20 3A 41 55  |.JSR L115    :AU|
000008A0: 46 20 88 5A 54 45 4E 20  44 41 54 45 4E 53 41 54  |F .ZTEN DATENSAT|
000008B0: 5A 20 B9 49 54 49 91 49  45 52 45 4E 00 D0 10 E5  |Z .ITI.IEREN....|
000008C0: 01 4C 44 58 20 23 24 30  31 20 20 20 20 3A 21 31  |.LDX #$01    :!1|
000008D0: 00 F7 10 EA 01 4A 53 52  20 24 46 46 43 39 20 20  |.....JSR $FFC9  |
000008E0: 20 3A 43 48 4B 4F 55 54  20 41 55 53 47 41 42 45  | :CHKOUT AUSGABE|
000008F0: 20 41 55 46 20 23 31 00  04 11 EF 01 4C 44 41 20  | AUF #1.....LDA |
00000900: 23 24 46 46 00 1F 11 F4  01 4A 53 52 20 24 46 46  |#$FF.....JSR $FF|
00000910: 44 32 20 20 20 3A 98 31  2C C7 28 32 35 35 29 00  |D2   :.1,.(255).|
00000920: 34 11 F9 01 4A 53 52 20  24 46 46 43 43 20 20 20  |4...JSR $FFCC   |
00000930: 3A 9C 43 48 00 41 11 FE  01 4C 44 41 20 23 24 30  |:.CH.A...LDA #$0|
00000940: 31 00 56 11 03 02 4A 53  52 20 24 46 46 43 33 20  |1.V...JSR $FFC3 |
00000950: 20 20 3A A0 20 31 00 63  11 08 02 4C 44 58 20 23  |  :. 1.c...LDX #|
00000960: 24 30 46 00 8A 11 0D 02  4A 53 52 20 24 46 46 43  |$0F.....JSR $FFC|
00000970: 36 20 20 20 3A 43 48 4B  49 4E 20 45 49 4E 47 41  |6   :CHKIN EINGA|
00000980: 42 45 20 41 55 46 20 23  31 35 00 C8 11 11 02 4C  |BE AUF #15.....L|
00000990: 35 33 30 20 20 20 20 20  20 20 20 3A 46 45 48 4C  |530        :FEHL|
000009A0: 45 52 4B 41 4E 41 4C 20  41 55 53 4C 45 53 45 4E  |ERKANAL AUSLESEN|
000009B0: 20 46 45 48 4C 45 52 20  35 30 20 55 4E 54 45 52  | FEHLER 50 UNTER|
000009C0: 44 52 55 45 43 4B 45 4E  00 DB 11 12 02 4A 53 52  |DRUECKEN.....JSR|
000009D0: 20 24 46 46 45 34 20 20  20 3A A1 00 F3 11 17 02  | $FFE4   :......|
000009E0: 43 4D 50 20 23 24 30 44  20 20 20 20 3A C7 28 31  |CMP #$0D    :.(1|
000009F0: 33 29 99 00 00 12 1C 02  42 4E 45 20 4C 35 33 30  |3)......BNE L530|
00000A00: 00 15 12 21 02 4A 53 52  20 24 46 46 43 43 20 20  |...!.JSR $FFCC  |
00000A10: 20 3A 9C 43 48 00 22 12  26 02 4C 44 41 20 23 24  | :.CH.".&.LDA #$|
00000A20: 30 46 00 38 12 2B 02 4A  53 52 20 24 46 46 43 33  |0F.8.+.JSR $FFC3|
00000A30: 20 20 20 3A A0 20 31 35  00 59 12 30 02 52 54 53  |   :. 15.Y.0.RTS|
00000A40: 20 20 20 20 20 20 20 20  20 3A 52 55 45 43 4B 53  |         :RUECKS|
00000A50: 50 8A 47 20 42 41 53 49  43 00 5F 12 31 02 3A 00  |P.G BASIC._.1.:.|
00000A60: A3 12 32 02 3A AB AB AB  AB AB AB AB AB AB AB AB  |..2.:...........|
00000A70: 20 44 41 54 45 4E 53 41  54 5A 20 53 43 48 52 45  | DATENSATZ SCHRE|
00000A80: 49 42 45 4E 20 AB AB AB  AB AB AB AB AB AB AB AB  |IBEN ...........|
00000A90: AB AB AB AB AB AB AB AB  AB AB AB AB AB AB AB AB  |................|
00000AA0: AB AB AB 00 A9 12 33 02  3A 00 D2 12 35 02 4A 53  |......3.:...5.JS|
00000AB0: 52 20 24 41 45 46 44 20  20 20 3A 43 48 4B 43 4F  |R $AEFD   :CHKCO|
00000AC0: 4D 20 50 52 55 45 46 54  20 41 55 46 20 4B 4F 4D  |M PRUEFT AUF KOM|
00000AD0: 4D 41 00 F3 12 3A 02 4A  53 52 20 24 41 44 38 41  |MA...:.JSR $AD8A|
00000AE0: 20 20 20 3A 46 52 4D 4E  55 4D 20 41 55 53 44 52  |   :FRMNUM AUSDR|
00000AF0: 55 43 4B 00 10 13 3F 02  4A 53 52 20 24 42 37 46  |UCK...?.JSR $B7F|
00000B00: 37 20 20 20 3A A1 41 44  52 20 31 36 AB 42 49 54  |7   :.ADR 16.BIT|
00000B10: 00 28 13 44 02 4A 53 52  20 24 41 45 46 44 20 20  |.(.D.JSR $AEFD  |
00000B20: 20 3A 43 48 4B 43 4F 4D  00 44 13 49 02 4A 53 52  | :CHKCOM.D.I.JSR|
00000B30: 20 24 45 32 35 37 20 20  20 3A 53 54 52 49 4E 47  | $E257   :STRING|
00000B40: 20 48 4F C3 00 5F 13 4E  02 43 4D 50 20 23 24 30  | HO.._.N.CMP #$0|
00000B50: 30 20 20 20 20 3A 4C 41  45 4E 47 45 B2 30 99 00  |0    :LAENGE.0..|
00000B60: 6C 13 53 02 42 4E 45 20  4C 36 30 35 00 93 13 58  |l.S.BNE L605...X|
00000B70: 02 4A 4D 50 20 24 42 32  34 38 20 20 20 3A 49 4C  |.JMP $B248   :IL|
00000B80: 4C 49 47 41 4C 20 51 55  41 4E 54 49 54 59 20 45  |LIGAL QUANTITY E|
00000B90: 52 52 B0 00 9C 13 5C 02  4C 36 30 35 00 BE 13 5D  |RR....\.L605...]|
00000BA0: 02 53 54 41 20 24 30 32  43 30 20 20 20 3A 4C 41  |.STA $02C0   :LA|
00000BB0: 45 4E 47 45 20 4E 41 43  48 20 21 37 30 34 00 CA  |ENGE NACH !704..|
00000BC0: 13 62 02 53 54 58 20 24  35 37 00 ED 13 67 02 53  |.b.STX $57...g.S|
00000BD0: 54 59 20 24 35 38 20 20  20 20 20 3A 41 44 52 45  |TY $58     :ADRE|
00000BE0: 53 53 45 20 53 50 45 49  43 48 45 52 4E 00 11 14  |SSE SPEICHERN...|
00000BF0: 6C 02 4A 53 52 20 4C 31  31 35 20 20 20 20 3A 5A  |l.JSR L115    :Z|
00000C00: 45 49 47 45 52 20 20 B9  49 54 49 91 49 45 52 45  |EIGER  .ITI.IERE|
00000C10: 4E 00 25 14 71 02 4C 44  58 20 23 24 30 31 20 20  |N.%.q.LDX #$01  |
00000C20: 20 20 3A 21 31 00 4C 14  76 02 4A 53 52 20 24 46  |  :!1.L.v.JSR $F|
00000C30: 46 43 39 20 20 20 3A 43  48 4B 4F 55 54 20 41 55  |FC9   :CHKOUT AU|
00000C40: 53 47 41 42 45 20 41 55  46 20 23 31 00 59 14 7B  |SGABE AUF #1.Y.{|
00000C50: 02 4C 44 59 20 23 24 30  30 00 62 14 7F 02 4C 36  |.LDY #$00.b...L6|
00000C60: 34 30 00 72 14 80 02 4C  44 41 20 28 24 35 37 29  |40.r...LDA ($57)|
00000C70: 2C 59 00 9A 14 85 02 4A  53 52 20 24 46 46 44 32  |,Y.....JSR $FFD2|
00000C80: 20 20 20 3A 53 54 52 49  4E 47 20 41 55 46 20 23  |   :STRING AUF #|
00000C90: 31 20 41 55 53 47 45 42  45 4E 00 A4 14 8A 02 49  |1 AUSGEBEN.....I|
00000CA0: 4E 59 20 20 00 B2 14 8F  02 43 50 59 20 24 30 32  |NY  .....CPY $02|
00000CB0: 43 30 00 BF 14 94 02 42  4E 45 20 4C 36 34 30 00  |C0.....BNE L640.|
00000CC0: D6 14 99 02 4C 44 41 20  23 24 30 44 20 20 20 20  |....LDA #$0D    |
00000CD0: 3A C7 28 31 33 29 00 F0  14 9E 02 4A 53 52 20 24  |:.(13).....JSR $|
00000CE0: 46 46 44 32 20 20 20 3A  41 55 53 47 45 42 45 4E  |FFD2   :AUSGEBEN|
00000CF0: 00 05 15 A3 02 4A 53 52  20 24 46 46 43 43 20 20  |.....JSR $FFCC  |
00000D00: 20 3A 9C 43 48 00 26 15  A8 02 52 54 53 20 20 20  | :.CH.&...RTS   |
00000D10: 20 20 20 20 20 20 3A 52  55 45 43 4B 53 50 8A 47  |      :RUECKSP.G|
00000D20: 20 42 41 53 49 43 00 2C  15 A9 02 3A 00 70 15 AA  | BASIC.,...:.p..|
00000D30: 02 3A AB AB AB AB AB AB  AB AB AB AB AB 20 44 41  |.:........... DA|
00000D40: 54 45 4E 53 41 54 5A 20  4C 45 53 45 4E 20 AB AB  |TENSATZ LESEN ..|
00000D50: AB AB AB AB AB AB AB AB  AB AB AB AB AB AB AB AB  |................|
00000D60: AB AB AB AB AB AB AB AB  AB AB AB AB AB AB AB AB  |................|
00000D70: 00 76 15 AB 02 3A 00 A5  15 AD 02 4A 53 52 20 4C  |.v...:.....JSR L|
00000D80: 31 30 30 20 20 20 20 3A  57 45 52 54 45 20 48 4F  |100    :WERTE HO|
00000D90: C3 20 AA 20 5A 45 49 47  45 52 20 B9 49 54 49 91  |. . ZEIGER .ITI.|
00000DA0: 49 45 52 45 4E 00 B3 15  B2 02 4C 44 41 20 24 30  |IEREN.....LDA $0|
00000DB0: 32 43 31 00 E2 15 B7 02  53 42 43 20 23 24 30 31  |2C1.....SBC #$01|
00000DC0: 20 20 20 20 3A 44 41 54  45 4E 53 41 54 5A 4C 41  |    :DATENSATZLA|
00000DD0: 45 4E 47 45 AB 31 20 20  4F 48 4E 45 20 C7 28 31  |ENGE.1  OHNE .(1|
00000DE0: 33 29 00 03 16 BC 02 50  48 41 20 20 20 20 20 20  |3).....PHA      |
00000DF0: 20 20 20 3A 53 54 41 43  4B 20 53 50 45 49 43 48  |   :STACK SPEICH|
00000E00: 45 52 4E 00 17 16 C1 02  4C 44 58 20 23 24 30 31  |ERN.....LDX #$01|
00000E10: 20 20 20 20 3A 21 31 00  3D 16 C6 02 4A 53 52 20  |    :!1.=...JSR |
00000E20: 24 46 46 43 36 20 20 20  3A 43 48 4B 49 4E 20 45  |$FFC6   :CHKIN E|
00000E30: 49 4E 47 41 42 45 20 41  55 46 20 23 31 00 66 16  |INGABE AUF #1.f.|
00000E40: CB 02 4A 53 52 20 24 41  45 46 44 20 20 20 3A 43  |..JSR $AEFD   :C|
00000E50: 48 4B 43 4F 4D 20 50 52  55 45 46 54 20 41 55 46  |HKCOM PRUEFT AUF|
00000E60: 20 4B 4F 4D 4D 41 00 89  16 D0 02 4A 53 52 20 24  | KOMMA.....JSR $|
00000E70: 42 30 38 42 20 20 20 3A  53 54 52 49 4E 47 20 56  |B08B   :STRING V|
00000E80: B0 42 45 52 45 49 54 45  4E 00 95 16 D5 02 53 54  |.BEREITEN.....ST|
00000E90: 41 20 24 34 39 00 A1 16  DA 02 53 54 59 20 24 34  |A $49.....STY $4|
00000EA0: 41 00 B7 16 DF 02 4A 53  52 20 24 42 36 41 33 20  |A.....JSR $B6A3 |
00000EB0: 20 20 3A B8 53 54 52 00  C1 16 E4 02 50 4C 41 20  |  :.STR.....PLA |
00000EC0: 20 00 EC 16 E9 02 4A 53  52 20 24 42 34 37 35 20  | .....JSR $B475 |
00000ED0: 20 20 3A 53 54 52 52 45  53 20 53 54 52 49 4E 47  |  :STRRES STRING|
00000EE0: 20 52 45 53 45 52 56 49  45 52 45 4E 00 F9 16 EE  | RESERVIEREN....|
00000EF0: 02 4C 44 59 20 23 24 30  32 00 02 17 F2 02 4C 37  |.LDY #$02.....L7|
00000F00: 35 35 00 12 17 F3 02 4C  44 41 20 24 30 30 36 31  |55.....LDA $0061|
00000F10: 2C 59 00 22 17 F8 02 53  54 41 20 28 24 34 39 29  |,Y."...STA ($49)|
00000F20: 2C 59 00 2C 17 FD 02 44  45 59 20 20 00 39 17 02  |,Y.,...DEY  .9..|
00000F30: 03 42 50 4C 20 4C 37 35  35 00 43 17 07 03 49 4E  |.BPL L755.C...IN|
00000F40: 59 20 20 00 4C 17 0B 03  4C 37 38 30 00 61 17 0C  |Y  .L...L780.a..|
00000F50: 03 4A 53 52 20 24 45 31  31 32 20 20 20 3A 42 41  |.JSR $E112   :BA|
00000F60: BF 00 71 17 11 03 53 54  41 20 28 24 36 32 29 2C  |..q...STA ($62),|
00000F70: 59 00 7B 17 16 03 49 4E  59 20 20 00 87 17 1B 03  |Y.{...INY  .....|
00000F80: 43 50 59 20 24 36 31 00  94 17 20 03 42 4E 45 20  |CPY $61... .BNE |
00000F90: 4C 37 38 30 00 A9 17 25  03 4A 53 52 20 24 46 46  |L780...%.JSR $FF|
00000FA0: 43 43 20 20 20 3A 9C 43  48 00 CA 17 2A 03 52 54  |CC   :.CH...*.RT|
00000FB0: 53 20 20 20 20 20 20 20  20 20 3A 52 55 45 43 4B  |S         :RUECK|
00000FC0: 53 50 8A 47 20 42 41 53  49 43 00 D0 17 2B 03 3A  |SP.G BASIC...+.:|
00000FD0: 00 14 18 2F 03 3A AB AB  AB AB AB AB AB AB AB AB  |.../.:..........|
00000FE0: AB AB AB AB AB AB AB AB  AB AB AB AB AB AB AB AB  |................|
00000FF0: AB AB AB AB AB AB AB AB  AB AB AB AB AB AB AB AB  |................|
00001000: AB AB AB AB AB AB AB AB  AB AB AB AB AB AB AB AB  |................|
00001010: AB AB AB AB 00 1B 18 34  03 2E 80 00 00 00        |.......4......  |

......:.34304.....:.....:.%.(...$C170.+.
2.:.>.F.: REL.HELP 1.0.D.P.:...U.:......
..... SATZZEIGER .ITI.IEREN ............
................V.:...C.L100...D.JSR $AE
FD   :CHKCOM  PRUEFT AUF KOMMA...I.JSR $
AD8A   :FRMNUM  AUSDRUCK HOC.$.N.JSR $B7
F7   :.ADR  16.BIT WERT HOC $14.LO.BYTE 
 $15.HI.BYTE.-.R.L115.A.S.LDX #$0F    :1
5.B.X.JSR $FFC9   :AUSGABE AUF #15.Z.}.L
DA #$50    :F("P").....JSR $FFD2   :....
..LDA #$02    :G(02).....JSR $FFD2   :..
N...LDA $14     :G(LB).....JSR $FFD2   :
......LDA $15     :G(HB)... .JSR $FFD2  
 :..!...LDA #$01    :G(1).4...JSR $FFD2 
  :..^...JSR $FFCC   :.CH AUSGABE WIEDER
 N.MAL....RTS         :RUECKSP.G BASIC.
....:.H...:........... DATEI OEF.EN ....
.................................N...:..
...JSR $AEFD   :CHKCOM PRUEFT AUF KOMMA.
....JSR $E257   :STRING HOC.5.C.STA $02C
0   :LAENGE NACH !704.A.H.STX $57.D.M.ST
Y $58     :ADRESSE SPEICHERN.|.R.JSR $AE
FD   :CHKCOM...W.JSR $B79E   :.BYT HOLT 
8.BIT WERT.H...STX $02C1   :SATZLAENGE N
ACH !705.Q...L225.....LDX #$00.....LDY #
$00.....L235.%...LDA ($57),Y :DATEINAME 
NACH !706... SCHIEBEN.5...STA $02C2,Y.?.
..INY  .M...CPY $02C0.Z...BNE L235.|...L
DA #$2C    :,L,G(L) ZUFUEGEN.....STA $02
C2,Y.....INY  . ...INY  .....STA $02C2,Y
.....DEY  .G.".LDA #$4C.W.'.STA $02C2,Y.
..,.INY  ...1.INY  ...6.LDA $02C1...;.ST
A $02C2,Y...@.LDA $02C0.I.E.ADC #$03    
:LAENGE DES NAMENS K.RIGIEREN  .3.W.J.ST
A $02C0.Q.O.LDA #$0F    :.15,8,15.~.T.LD
X #$08...Y.LDY #$0F...^.JSR $FFBA   :SET
FLS...C.LDA #$00.H.H.JSR $FFBD   :SETNAM
...M.JSR $FFC0   :....R.LDA #$01    :.1,
8,2...W.LDX #$08...|.LDY #$02.%...JSR $F
FBA   :SETFLS.3...LDA $02C0.@...LDX #$C2
.M...LDY #$02.E...JSR $FFBD   :SETNAM.X.
..JSR $FFC0   :......RTS         :RUECKS
P.G BASIC... .:.....:........... DATEI A
NLEGEN .................................
........:.....JSR $AEFD   :CHKCOM PRUEFT
 AUF KOMMA.....JSR $E257   :STRING HOC.P
...STA $02C0   :LAENGE NACH !704.\...STX
 $57.....STY $58     :ADRESSE  SPEICHERN
.....JSR $AEFD   :CHKCOM PRUEFT AUF KOMM
A.O.B.JSR $B79E   :.BYT HOLT 8.BIT WERT.
..G.STX $02C1   :DATENSATZLAENGE NACH !7
05.#.L.JSR $AEFD   :CHKCOM PRUEFT AUF KO
MMA.H.Q.JSR $AD8A   :FRMNUM AUSDRUCK HOC
.J.V.JSR $B7F7   :.ADR 16.BIT WERT.....J
SR L225    :OEF.EN DER DATEI.....JSR L11
5    :AUF .ZTEN DATENSATZ .ITI.IEREN.P..
.LDX #$01    :!1.....JSR $FFC9   :CHKOUT
 AUSGABE AUF #1.....LDA #$FF.....JSR $FF
D2   :.1,G(255).4...JSR $FFCC   :.CH.A..
.LDA #$01.V...JSR $FFC3   :  1.C...LDX #
$0F.....JSR $FFC6   :CHKIN EINGABE AUF #
15.H...L530        :FEHLERKANAL AUSLESEN
 FEHLER 50 UNTERDRUECKEN.....JSR $FFE4  
 :......CMP #$0D    :G(13)......BNE L530
...!.JSR $FFCC   :.CH.".&.LDA #$0F.8.+.J
SR $FFC3   :  15.Y.0.RTS         :RUECKS
P.G BASIC._.1.:...2.:........... DATENSA
TZ SCHREIBEN ...........................
......3.:.R.5.JSR $AEFD   :CHKCOM PRUEFT
 AUF KOMMA...:.JSR $AD8A   :FRMNUM AUSDR
UCK...?.JSR $B7F7   :.ADR 16.BIT.(.D.JSR
 $AEFD   :CHKCOM.D.I.JSR $E257   :STRING
 HOC._.N.CMP #$00    :LAENGE.0..L.S.BNE 
L605...X.JMP $B248   :ILLIGAL QUANTITY E
RR....\.L605...].STA $02C0   :LAENGE NAC
H !704.J.B.STX $57...G.STY $58     :ADRE
SSE SPEICHERN...L.JSR L115    :ZEIGER  .
ITI.IEREN.%.Q.LDX #$01    :!1.L.V.JSR $F
FC9   :CHKOUT AUSGABE AUF #1.Y.{.LDY #$0
0.B..L640.R...LDA ($57),Y.....JSR $FFD2
   :STRING AUF #1 AUSGEBEN.....INY  ....
.CPY $02C0.....BNE L640.V...LDA #$0D    
:G(13).....JSR $FFD2   :AUSGEBEN.....JSR
 $FFCC   :.CH.&...RTS         :RUECKSP.G
 BASIC.,...:.P...:........... DATENSATZ 
LESEN ..................................
.V...:.....JSR L100    :WERTE HOC . ZEIG
ER .ITI.IEREN.....LDA $02C1.....SBC #$01
    :DATENSATZLAENGE.1  OHNE G(13).....P
HA         :STACK SPEICHERN...A.LDX #$01
    :!1.=.F.JSR $FFC6   :CHKIN EINGABE A
UF #1.F.K.JSR $AEFD   :CHKCOM PRUEFT AUF
 KOMMA...P.JSR $B08B   :STRING V.BEREITE
N...U.STA $49...Z.STY $4A.....JSR $B6A3 
  :.STR.A...PLA  .....JSR $B475   :STRRE
S STRING RESERVIEREN.....LDY #$02.....L7
55.....LDA $0061,Y."...STA ($49),Y.,...D
EY  .9...BPL L755.C...INY  .L...L780.A..
.JSR $E112   :BA..Q...STA ($62),Y.{...IN
Y  .....CPY $61... .BNE L780...%.JSR $FF
CC   :.CH.J.*.RTS         :RUECKSP.G BAS
IC.P.+.:.../.:..........................
.......................................4
......

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL