RBS-FERTIG
FILE INFORMATION
FILENAME(S): RBS-FERTIG
FILE TYPE(S): SEQ
FILE SIZE: 17.8K
FIRST SEEN: 2025-11-02 17:00:03
APPEARS ON: 3 disk(s)
FILE HASH
c25bb1be0fb274c2c5f85a2882daf7c040194b1ad00d0233e7fbcdc565dd53bf
FOUND ON DISKS (3 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 64 ER SONDERH 80 | RBS-FERTIG | SEQ | Treasure Chest - Sammlung | 16 | 0 | DOWNLOAD FILE |
| 64 ER SONDERH 80 | RBS-FERTIG | SEQ | C64er, DuncanTwain | 16 | 0 | DOWNLOAD FILE |
| 64 ER SONDERH 80 | RBS-FERTIG | SEQ | DuncanTwain | 16 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 0D 0D 3B 2A 2A 2A 2A 2A 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 0D 0D 3B 2A 20 20 20 20 20 20 D2 |*****..;* .| 00000030: C1 CD 20 2D 20 C5 52 57 45 49 54 45 52 55 4E 47 |.. - .RWEITERUNG| 00000040: 20 20 20 20 20 20 20 20 20 2A 0D 0D 3B 2A 2A 2A | *..;***| 00000050: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000060: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 0D |***************.| 00000070: 0D 0D 3B 20 2A 20 C2 45 44 49 45 4E 55 4E 47 20 |..; * .EDIENUNG | 00000080: 3A 0D 0D 3B 20 20 20 20 20 20 20 2D 20 52 4C 20 |:..; - RL | 00000090: 41 4E 46 2E 41 44 52 2C 45 4E 44 41 44 52 2C 22 |ANF.ADR,ENDADR,"| 000000A0: 4E 41 4D 45 22 20 2D 3E CC 41 44 45 4E 20 41 55 |NAME" ->.ADEN AU| 000000B0: 53 20 D2 C1 CD 20 41 4E 20 C1 44 52 45 53 53 45 |S ... AN .DRESSE| 000000C0: 28 49 4E 48 2E 56 4F 4E 20 C4 41 54 45 49 20 29 |(INH.VON .ATEI )| 000000D0: 0D 0D 3B 20 20 20 20 20 20 20 2D 20 52 53 20 41 |..; - RS A| 000000E0: 4E 46 2E 41 44 52 2C 45 4E 44 41 44 52 2C 22 4E |NF.ADR,ENDADR,"N| 000000F0: 41 4D 45 22 20 2D 3E D3 50 45 49 43 48 45 52 4E |AME" ->.PEICHERN| 00000100: 20 56 4F 4E 20 C1 44 52 45 53 53 45 20 49 4E 20 | VON .DRESSE IN | 00000110: D2 C1 CD 20 49 4E 20 C4 41 54 45 49 0D 0D 3B 20 |... IN .ATEI..; | 00000120: 20 20 20 20 20 20 2D 20 52 46 20 22 4E 41 4D 45 | - RF "NAME| 00000130: 22 2C C6 55 45 4C 4C 5A 45 49 43 48 45 4E 20 20 |",.UELLZEICHEN | 00000140: 20 2D 3E C6 55 45 4C 4C 45 4E 20 56 4F 4E 20 C4 | ->.UELLEN VON .| 00000150: 41 54 45 49 20 4D 49 54 20 C6 55 45 4C 4C 5A 45 |ATEI MIT .UELLZE| 00000160: 49 43 48 45 4E 0D 0D 3B 20 20 20 20 20 20 20 2D |ICHEN..; -| 00000170: 20 52 4E 20 22 41 4C 54 45 52 20 CE 41 4D 45 22 | RN "ALTER .AME"| 00000180: 2C 22 4E 45 55 45 52 20 CE 22 2D 3E CE 41 4D 45 |,"NEUER ."->.AME| 00000190: 20 41 45 4E 44 45 52 4E 0D 0D 3B 20 20 20 20 20 | AENDERN..; | 000001A0: 20 20 2D 20 52 24 20 20 20 20 20 20 20 20 20 20 | - R$ | 000001B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2D 3E 41 | ->A| 000001C0: 4C 4C 45 20 C4 41 54 45 49 4E 41 4D 45 4E 20 55 |LLE .ATEINAMEN U| 000001D0: 2E 20 C1 44 52 45 53 53 45 4E 20 41 55 46 4C 49 |. .DRESSEN AUFLI| 000001E0: 53 54 45 4E 0D 0D 3B 20 2A 20 42 45 4E 55 54 5A |STEN..; * BENUTZ| 000001F0: 54 45 20 DA 57 49 53 43 48 45 4E 53 50 45 49 43 |TE .WISCHENSPEIC| 00000200: 48 45 52 20 3A 0D 0D 3B 20 20 20 20 20 20 20 20 |HER :..; | 00000210: 2D 20 56 4F 4E 20 20 20 20 20 3A 20 36 31 2C 36 |- VON : 61,6| 00000220: 32 20 20 28 41 44 52 2E 29 0D 3B 20 20 20 20 20 |2 (ADR.).; | 00000230: 20 20 20 2D 20 42 49 53 20 20 20 20 20 3A 20 36 | - BIS : 6| 00000240: 33 2C 36 34 20 20 28 41 44 52 20 4F 44 20 45 4E |3,64 (ADR OD EN| 00000250: 44 53 2E 29 0D 3B 20 20 20 20 20 20 20 20 2D 20 |DS.).; - | 00000260: 41 4E 46 2E 53 2E 20 20 3A 20 36 35 2C 36 36 20 |ANF.S. : 65,66 | 00000270: 20 28 CF 52 49 47 49 4E 41 4C 29 0D 3B 20 20 20 | (.RIGINAL).; | 00000280: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000290: 20 36 37 2C 36 38 20 20 28 55 4D 47 45 57 41 4E | 67,68 (UMGEWAN| 000002A0: 44 45 4C 54 29 0D 3B 20 20 20 20 20 20 20 20 2D |DELT).; -| 000002B0: 20 4D 4F 44 55 53 20 20 20 3A 20 47 4C 45 49 43 | MODUS : GLEIC| 000002C0: 48 20 56 45 52 5A 57 45 49 47 54 0D 0D 3B 20 20 |H VERZWEIGT..; | 000002D0: 20 20 20 20 20 20 2D 20 C6 55 45 4C 4C 5A 2E 20 | - .UELLZ. | 000002E0: 3A 20 36 31 20 20 20 20 20 28 49 4E 20 C1 D3 C3 |: 61 (IN ...| 000002F0: C9 C9 29 0D 3B 20 20 20 20 20 20 20 20 2D 20 56 |..).; - V| 00000300: 4F 4E 20 20 20 20 20 3A 20 36 35 2C 36 36 20 20 |ON : 65,66 | 00000310: 28 53 45 49 54 45 29 0D 0D 3B 20 20 20 20 20 20 |(SEITE)..; | 00000320: 20 20 2D 20 D3 50 2E 53 54 2E 31 20 3A 20 24 32 | - .P.ST.1 : $2| 00000330: 46 31 20 20 20 28 D3 50 45 49 43 48 45 52 4B 4F |F1 (.PEICHERKO| 00000340: 4E 46 49 47 55 52 41 54 49 4F 4E 20 56 4F 52 20 |NFIGURATION VOR | 00000350: C1 55 46 52 55 46 29 0D 0D 3B 20 20 20 20 20 20 |.UFRUF)..; | 00000360: 20 20 2D 20 DA 57 2E 53 50 2E 20 20 3A 20 32 2C | - .W.SP. : 2,| 00000370: 33 2C 24 42 36 2C 24 42 44 2C 24 32 46 30 0D 0D |3,$B6,$BD,$2F0..| 00000380: 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |;***************| 00000390: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000003A0: 2A 0D 0D 0D 3A 4B 4F 4D 4D 41 20 20 20 3D 20 20 |*...:KOMMA = | 000003B0: 24 41 45 46 44 20 20 20 20 3B 41 55 46 20 CB 4F |$AEFD ;AUF .O| 000003C0: 4D 4D 41 20 54 45 53 54 45 4E 0D 3A 47 45 54 41 |MMA TESTEN.:GETA| 000003D0: 44 52 20 20 3D 20 20 24 41 44 38 41 20 20 20 20 |DR = $AD8A | 000003E0: 3B 31 36 2D C2 49 54 2D DA 41 48 4C 20 49 4E 20 |;16-.IT-.AHL IN | 000003F0: C6 C1 C3 0D 3A 41 44 52 49 4E 54 20 20 3D 20 20 |....:ADRINT = | 00000400: 24 42 37 46 37 20 20 20 20 3B DA 41 48 4C 20 49 |$B7F7 ;.AHL I| 00000410: 4E 20 D9 2F C1 20 28 24 31 34 2F 31 35 29 0D 0D |N ./. ($14/15)..| 00000420: 3A 47 45 54 5A 41 48 20 20 3D 20 20 24 42 37 39 |:GETZAH = $B79| 00000430: 42 20 20 20 20 3B 38 2D C2 49 54 2D DA 41 48 4C |B ;8-.IT-.AHL| 00000440: 20 4E 41 43 48 20 D8 0D 0D 3A 49 4E 54 4F 55 54 | NACH ...:INTOUT| 00000450: 20 20 3D 20 20 24 42 44 43 44 20 20 20 20 3B 31 | = $BDCD ;1| 00000460: 36 2D C2 49 54 2D DA 41 48 4C 20 41 55 53 47 45 |6-.IT-.AHL AUSGE| 00000470: 42 45 4E 0D 0D 3A 43 48 52 47 45 54 20 20 3D 20 |BEN..:CHRGET = | 00000480: 20 24 37 33 20 20 20 20 20 20 3B DA 2E 20 41 55 | $73 ;.. AU| 00000490: 53 20 C2 C1 D3 C9 C3 2D D4 45 58 54 0D 0D 0D 3B |S .....-.EXT...;| 000004A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000004B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0D 3B A5 |------------..;.| 000004C0: 20 20 20 20 20 20 20 20 20 CD 41 4B 52 4F 53 20 | .AKROS | 000004D0: 20 20 20 20 20 20 20 20 20 20 A7 0D 0D 3B 2D 2D | ...;--| 000004E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000004F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0D 3A 53 54 52 |----------..:STR| 00000500: 4F 55 54 20 20 20 20 4D 20 31 0D 0D 20 20 20 20 |OUT M 1.. | 00000510: 20 20 20 4C 44 41 20 23 3C 40 30 0D 20 20 20 20 | LDA #<@0. | 00000520: 20 20 20 4C 44 59 20 23 3E 40 30 0D 20 20 20 20 | LDY #>@0. | 00000530: 20 20 20 4A 53 52 20 24 41 42 31 45 0D 2F 0D 0D | JSR $AB1E./..| 00000540: 0D 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.;--------------| 00000550: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D |---------------.| 00000560: 0D 3B A5 20 20 20 20 20 D0 52 4F 47 52 41 4D 4D |.;. .ROGRAMM| 00000570: 41 4E 46 41 4E 47 20 20 20 20 20 20 20 20 A7 0D |ANFANG ..| 00000580: 0D 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.;--------------| 00000590: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D |---------------.| 000005A0: 0D 20 20 20 20 3B C9 4E 49 54 49 41 4C 49 53 49 |. ;.NITIALISI| 000005B0: 45 52 55 4E 47 20 44 45 52 20 4E 45 55 45 4E 0D |ERUNG DER NEUEN.| 000005C0: 0D 20 20 20 20 3B 20 20 20 20 20 20 C2 C1 D3 C9 |. ; ....| 000005D0: C3 2D C2 45 46 45 48 4C 45 0D 0D 0D 20 20 20 20 |.-.EFEHLE... | 000005E0: 20 20 20 20 20 20 20 20 4F 52 47 20 33 39 37 30 | ORG 3970| 000005F0: 30 0D 0D 20 20 20 20 20 20 20 20 20 20 20 20 4C |0.. L| 00000600: 44 41 20 23 3C 45 52 57 0D 20 20 20 20 20 20 20 |DA #<ERW. | 00000610: 20 20 20 20 20 4C 44 58 20 23 3E 45 52 57 0D 20 | LDX #>ERW. | 00000620: 20 20 20 20 20 20 20 20 20 20 20 53 54 41 20 24 | STA $| 00000630: 33 30 38 0D 20 20 20 20 20 20 20 20 20 20 20 20 |308. | 00000640: 53 54 58 20 24 33 30 39 0D 0D 20 20 20 20 20 20 |STX $309.. | 00000650: 20 20 20 20 20 20 4A 4D 50 20 24 45 31 38 44 20 | JMP $E18D | 00000660: 20 20 20 3B CF CB 20 41 55 53 47 45 42 45 4E 0D | ;.. AUSGEBEN.| 00000670: 0D 0D 20 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.. ;------------| 00000680: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000690: 0D 0D 20 20 20 20 20 20 20 20 3B C2 C1 D3 C9 C3 |.. ;.....| 000006A0: 2D C5 52 57 45 49 54 45 52 55 4E 47 0D 0D 3A 45 |-.RWEITERUNG..:E| 000006B0: 52 57 0D 20 20 20 20 20 20 20 20 20 20 20 20 4C |RW. L| 000006C0: 44 41 20 24 37 41 20 20 20 3B 43 48 52 47 45 54 |DA $7A ;CHRGET| 000006D0: 2D DA 45 49 47 45 52 0D 20 20 20 20 20 20 20 20 |-.EIGER. | 000006E0: 20 20 20 20 4C 44 58 20 24 37 42 20 20 20 3B 53 | LDX $7B ;S| 000006F0: 49 43 48 45 52 4E 0D 20 20 20 20 20 20 20 20 20 |ICHERN. | 00000700: 20 20 20 53 54 41 20 32 0D 20 20 20 20 20 20 20 | STA 2. | 00000710: 20 20 20 20 20 53 54 58 20 33 0D 0D 0D 20 20 20 | STX 3... | 00000720: 3B 31 2E C2 55 43 48 53 54 41 42 45 0D 20 20 20 |;1..UCHSTABE. | 00000730: 20 20 20 20 20 20 20 20 20 4A 53 52 20 43 48 52 | JSR CHR| 00000740: 47 45 54 0D 0D 20 20 20 20 20 20 20 20 20 20 20 |GET.. | 00000750: 20 43 4D 50 20 23 27 52 20 20 20 3B 31 2E DA 2E | CMP #'R ;1...| 00000760: 20 3D 20 D2 20 3F 0D 20 20 20 20 20 20 20 20 20 | = . ?. | 00000770: 20 20 20 42 45 51 20 57 42 0D 0D 20 20 20 20 20 | BEQ WB.. | 00000780: 20 20 20 20 20 20 20 4A 4D 50 20 49 4E 54 45 52 | JMP INTER| 00000790: 50 52 0D 20 20 20 20 3A 57 42 0D 20 20 20 20 20 |PR. :WB. | 000007A0: 20 20 20 20 20 20 20 4A 53 52 20 43 48 52 47 45 | JSR CHRGE| 000007B0: 54 20 20 20 3B 32 2E DA 45 49 43 48 45 4E 20 55 |T ;2..EICHEN U| 000007C0: 45 42 45 52 53 50 52 49 4E 47 45 4E 0D 0D 20 20 |EBERSPRINGEN.. | 000007D0: 20 20 20 20 20 20 20 20 20 20 43 4D 50 20 23 27 | CMP #'| 000007E0: 24 0D 20 20 20 20 20 20 20 20 20 20 20 20 42 4E |$. BN| 000007F0: 45 20 57 5A 0D 0D 20 20 20 20 20 20 20 20 20 20 |E WZ.. | 00000800: 20 20 4A 4D 50 20 44 49 52 45 43 54 4F 52 59 0D | JMP DIRECTORY.| 00000810: 0D 20 20 20 20 20 20 3A 57 5A 0D 20 20 20 20 20 |. :WZ. | 00000820: 20 20 20 20 20 20 20 4A 53 52 20 43 48 52 47 45 | JSR CHRGE| 00000830: 54 20 20 20 3B 33 2E DA 45 49 43 48 45 4E 20 3D |T ;3..EICHEN =| 00000840: 20 22 0D 0D 20 20 20 20 20 20 20 20 20 20 20 20 | ".. | 00000850: 53 54 41 20 24 42 44 20 20 20 20 20 20 3B 46 55 |STA $BD ;FU| 00000860: 45 52 20 53 50 41 45 54 45 52 45 20 C1 42 46 52 |ER SPAETERE .BFR| 00000870: 41 47 45 0D 20 20 20 20 20 20 20 20 20 20 20 20 |AGE. | 00000880: 43 4D 50 20 23 27 22 20 20 20 20 20 20 3B 4E 55 |CMP #'" ;NU| 00000890: 52 20 C6 49 4C 45 4E 41 4D 45 20 3F 0D 20 20 20 |R .ILENAME ?. | 000008A0: 20 20 20 20 20 20 20 20 20 42 4E 45 20 41 4E 46 | BNE ANF| 000008B0: 41 44 52 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 |ADR... | 000008C0: 20 20 4A 4D 50 20 46 49 4C 45 4E 41 4D 45 32 0D | JMP FILENAME2.| 000008D0: 0D 20 20 20 20 20 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D |. ;---------| 000008E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0D |--------------..| 000008F0: 0D 20 20 20 20 20 20 20 3B C1 4E 46 41 4E 47 53 |. ;.NFANGS| 00000900: 41 44 52 2E 20 48 4F 4C 45 4E 0D 3A 41 4E 46 41 |ADR. HOLEN.:ANFA| 00000910: 44 52 0D 20 20 20 20 20 20 20 20 20 20 20 20 4A |DR. J| 00000920: 53 52 20 47 45 54 41 44 52 20 20 20 3B 41 4E 46 |SR GETADR ;ANF| 00000930: 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 4A 53 |.. JS| 00000940: 52 20 41 44 52 49 4E 54 20 20 20 3B 2D 3E D9 2F |R ADRINT ;->./| 00000950: C1 0D 0D 20 20 20 20 20 20 20 20 20 20 20 20 53 |... S| 00000960: 54 59 20 36 31 20 20 20 20 20 20 20 3B 4C 4F 57 |TY 61 ;LOW| 00000970: 20 20 DA 57 49 53 43 48 45 4E 53 50 45 49 43 48 | .WISCHENSPEICH| 00000980: 45 52 20 28 DA 57 2E 53 50 2E 29 0D 20 20 20 20 |ER (.W.SP.). | 00000990: 20 20 20 20 20 20 20 20 53 54 41 20 36 32 20 20 | STA 62 | 000009A0: 20 20 20 20 20 3B 48 49 47 48 0D 0D 0D 20 20 3B | ;HIGH... ;| 000009B0: C5 4E 44 41 44 52 2E 20 48 4F 4C 45 4E 0D 0D 20 |.NDADR. HOLEN.. | 000009C0: 20 20 20 20 20 20 20 20 20 20 20 4A 53 52 20 4B | JSR K| 000009D0: 4F 4D 4D 41 0D 0D 20 20 20 20 20 20 20 20 20 20 |OMMA.. | 000009E0: 20 20 4A 53 52 20 47 45 54 41 44 52 0D 20 20 20 | JSR GETADR. | 000009F0: 20 20 20 20 20 20 20 20 20 4A 53 52 20 41 44 52 | JSR ADR| 00000A00: 49 4E 54 0D 0D 20 20 20 20 20 20 20 20 20 20 20 |INT.. | 00000A10: 20 53 54 59 20 36 33 20 20 20 20 20 20 20 3B 4C | STY 63 ;L| 00000A20: 4F 57 20 20 20 20 20 DA 57 2E 53 50 2E 0D 20 20 |OW .W.SP.. | 00000A30: 20 20 20 20 20 20 20 20 20 20 53 54 41 20 36 34 | STA 64| 00000A40: 20 20 20 20 20 20 20 3B 48 49 47 48 0D 0D 20 20 | ;HIGH.. | 00000A50: 20 20 20 20 20 20 20 20 20 20 49 4E 43 20 36 33 | INC 63| 00000A60: 20 20 20 20 20 20 20 3B 41 55 46 20 C7 52 55 4E | ;AUF .RUN| 00000A70: 44 20 44 45 52 20 D3 43 48 4C 45 49 46 45 4E 2D |D DER .CHLEIFEN-| 00000A80: 0D 20 20 20 20 20 20 20 20 20 20 20 20 43 4C 44 |. CLD| 00000A90: 20 20 20 20 20 20 20 20 20 20 3B 46 4F 52 4D 20 | ;FORM | 00000AA0: 28 4C 45 54 5A 45 20 C1 44 52 45 53 53 45 20 57 |(LETZE .DRESSE W| 00000AB0: 49 52 44 0D 20 20 20 20 20 20 20 20 20 20 20 20 |IRD. | 00000AC0: 4C 44 41 20 23 30 20 20 20 20 20 20 20 3B 53 4F |LDA #0 ;SO| 00000AD0: 4E 53 54 20 4E 49 43 48 54 20 55 45 42 45 52 4E |NST NICHT UEBERN| 00000AE0: 4F 4D 4D 45 4E 29 0D 20 20 20 20 20 20 20 20 20 |OMMEN). | 00000AF0: 20 20 20 41 44 43 20 36 34 0D 20 20 20 20 20 20 | ADC 64. | 00000B00: 20 20 20 20 20 20 53 54 41 20 36 34 0D 0D 0D 20 | STA 64... | 00000B10: 20 20 20 20 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ;-----------| 00000B20: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0D |--------------..| 00000B30: 0D 3A 46 49 4C 45 4E 41 4D 45 0D 20 20 20 20 20 |.:FILENAME. | 00000B40: 20 20 20 20 20 20 20 4A 53 52 20 43 48 52 47 45 | JSR CHRGE| 00000B50: 54 20 20 3B C1 4E 46 55 45 48 52 55 4E 47 53 5A |T ;.NFUEHRUNGSZ| 00000B60: 45 49 43 48 45 4E 20 56 4F 52 48 2E 0D 0D 20 20 |EICHEN VORH... | 00000B70: 20 20 20 20 20 20 20 20 20 20 43 4D 50 20 23 27 | CMP #'| 00000B80: 22 0D 20 20 20 20 20 20 20 20 20 20 20 20 42 45 |". BE| 00000B90: 51 20 46 49 4C 45 4E 41 4D 45 32 0D 0D 20 20 20 |Q FILENAME2.. | 00000BA0: 20 20 20 20 20 20 20 20 20 4A 4D 50 20 24 41 37 | JMP $A7| 00000BB0: 41 45 20 20 20 3B 50 52 4F 56 4F 5A 49 45 52 54 |AE ;PROVOZIERT| 00000BC0: 20 D3 59 4E 54 41 58 20 C5 52 52 4F 52 0D 0D 3A | .YNTAX .RROR..:| 00000BD0: 46 49 4C 45 4E 41 4D 45 32 0D 20 20 20 20 20 20 |FILENAME2. | 00000BE0: 20 20 20 20 20 20 4C 44 59 20 23 38 20 20 20 20 | LDY #8 | 00000BF0: 20 20 3B 54 45 58 54 54 20 4C 4F 45 53 43 48 45 | ;TEXTT LOESCHE| 00000C00: 4E 0D 20 20 20 3A 4C 43 0D 20 20 20 20 20 20 20 |N. :LC. | 00000C10: 20 20 20 20 20 4C 44 41 20 23 30 0D 20 20 20 20 | LDA #0. | 00000C20: 20 20 20 20 20 20 20 20 53 54 41 20 54 45 58 54 | STA TEXT| 00000C30: 54 2C 59 0D 20 20 20 20 20 20 20 20 20 20 20 20 |T,Y. | 00000C40: 44 45 59 0D 20 20 20 20 20 20 20 20 20 20 20 20 |DEY. | 00000C50: 42 50 4C 20 4C 43 0D 0D 20 20 20 3A 4E 45 58 54 |BPL LC.. :NEXT| 00000C60: 42 0D 20 20 20 20 20 20 20 20 20 20 20 20 4C 44 |B. LD| 00000C70: 59 20 23 30 0D 20 20 20 3A 4C 4F 4F 50 42 0D 20 |Y #0. :LOOPB. | 00000C80: 20 20 20 20 20 20 20 20 20 20 20 53 54 59 20 24 | STY $| 00000C90: 42 36 20 20 20 20 20 20 3B DA 57 2E 53 50 2E 0D |B6 ;.W.SP..| 00000CA0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 4A 53 52 |. JSR| 00000CB0: 20 43 48 52 47 45 54 20 20 20 3B CE 41 4D 45 20 | CHRGET ;.AME | 00000CC0: 5A 55 45 4E 44 45 20 3F 0D 20 20 20 20 20 20 20 |ZUENDE ?. | 00000CD0: 20 20 20 20 20 43 4D 50 20 23 27 22 0D 20 20 20 | CMP #'". | 00000CE0: 20 20 20 20 20 20 20 20 20 42 4E 45 20 57 42 31 | BNE WB1| 00000CF0: 0D 0D 20 20 20 20 20 20 20 20 20 20 20 20 4C 44 |.. LD| 00000D00: 41 20 23 30 20 20 20 20 20 20 20 3B 4A 41 0D 20 |A #0 ;JA. | 00000D10: 20 20 20 20 20 20 20 20 20 20 20 53 54 41 20 54 | STA T| 00000D20: 45 58 54 54 2C 59 0D 20 20 20 20 20 20 20 20 20 |EXTT,Y. | 00000D30: 20 20 20 4A 4D 50 20 45 4E 44 45 42 0D 20 20 20 | JMP ENDEB. | 00000D40: 3A 57 42 31 0D 20 20 20 20 20 20 20 20 20 20 20 |:WB1. | 00000D50: 20 53 54 41 20 54 45 58 54 54 2C 59 0D 0D 20 20 | STA TEXTT,Y.. | 00000D60: 20 20 20 20 20 20 20 20 20 20 4C 44 59 20 24 42 | LDY $B| 00000D70: 36 0D 20 20 20 20 20 20 20 20 20 20 20 20 49 4E |6. IN| 00000D80: 59 0D 20 20 20 20 20 20 20 20 20 20 20 20 43 50 |Y. CP| 00000D90: 59 20 23 37 0D 20 20 20 20 20 20 20 20 20 20 20 |Y #7. | 00000DA0: 20 42 4E 45 20 4C 4F 4F 50 42 0D 0D 20 20 20 3A | BNE LOOPB.. :| 00000DB0: 45 4E 44 45 42 0D 20 20 20 20 20 20 20 20 20 20 |ENDEB. | 00000DC0: 20 20 53 54 52 4F 55 54 20 54 45 58 54 54 0D 0D | STROUT TEXTT..| 00000DD0: 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |;---------------| 00000DE0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0D 20 20 |------------.. | 00000DF0: 20 20 20 20 3B 20 D6 45 52 47 4C 45 49 43 48 0D | ; .ERGLEICH.| 00000E00: 0D 0D 20 20 20 20 20 20 20 20 20 20 20 20 4C 44 |.. LD| 00000E10: 41 20 23 30 0D 20 20 20 20 20 20 20 20 20 20 20 |A #0. | 00000E20: 20 53 54 41 20 24 32 46 30 20 20 20 20 3B DA 41 | STA $2F0 ;.A| 00000E30: 45 48 4C 45 52 20 44 45 52 20 57 49 45 56 49 45 |EHLER DER WIEVIE| 00000E40: 4C 54 45 20 C5 49 4E 54 52 41 47 20 CE 41 4D 45 |LTE .INTRAG .AME| 00000E50: 20 49 53 54 0D 20 20 20 20 20 20 20 20 20 20 20 | IST. | 00000E60: 20 20 20 20 20 20 20 20 20 20 20 20 20 3B 20 46 | ; F| 00000E70: 55 45 52 20 53 50 41 45 54 45 52 45 20 D2 45 43 |UER SPAETERE .EC| 00000E80: 48 4E 55 4E 47 29 20 2D 20 C5 49 4E 54 52 41 47 |HNUNG) - .INTRAG| 00000E90: 5A 41 45 48 4C 45 52 0D 20 20 20 20 20 20 20 20 |ZAEHLER. | 00000EA0: 20 20 20 20 4C 44 58 20 23 3C 56 45 52 47 4C 54 | LDX #<VERGLT| 00000EB0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 4C 44 41 |. LDA| 00000EC0: 20 23 3E 56 45 52 47 4C 54 20 3B C1 4E 46 41 4E | #>VERGLT ;.NFAN| 00000ED0: 47 20 44 45 53 20 C4 49 52 45 4B 54 4F 52 59 20 |G DES .IREKTORY | 00000EE0: 28 C4 49 52 2E 29 0D 20 20 20 20 20 20 20 20 20 |(.IR.). | 00000EF0: 20 20 20 53 54 58 20 24 39 45 0D 20 20 20 20 20 | STX $9E. | 00000F00: 20 20 20 20 20 20 20 53 54 41 20 24 39 46 0D 0D | STA $9F..| 00000F10: 20 20 20 20 20 20 20 20 20 20 20 20 4C 44 59 20 | LDY | 00000F20: 23 31 0D 20 20 20 3A 56 47 4C 0D 20 20 20 20 20 |#1. :VGL. | 00000F30: 20 20 20 20 20 20 20 4C 44 58 20 23 30 0D 20 20 | LDX #0. | 00000F40: 20 20 20 20 20 20 20 20 20 20 49 4E 43 20 24 32 | INC $2| 00000F50: 46 30 0D 20 20 20 3A 4C 4F 4F 50 56 0D 20 20 20 |F0. :LOOPV. | 00000F60: 20 20 20 20 20 20 20 20 20 4C 44 41 20 56 45 52 | LDA VER| 00000F70: 47 4C 54 2C 59 20 20 3B D6 45 52 47 4C 45 49 43 |GLT,Y ;.ERGLEIC| 00000F80: 48 0D 20 20 20 20 20 20 20 20 20 20 20 20 43 4D |H. CM| 00000F90: 50 20 54 45 58 54 54 2C 58 0D 20 20 20 20 20 20 |P TEXTT,X. | 00000FA0: 20 20 20 20 20 20 42 4E 45 20 4E 56 47 4C 0D 0D | BNE NVGL..| 00000FB0: 20 20 20 20 20 20 20 20 20 20 20 20 49 4E 59 20 | INY | 00000FC0: 20 20 20 20 20 20 20 20 20 20 3B 45 49 4E 47 45 | ;EINGE| 00000FD0: 54 52 41 47 45 4E 45 52 20 CE 41 4D 45 20 5A 55 |TRAGENER .AME ZU| 00000FE0: 45 4E 44 45 20 3F 0D 20 20 20 20 20 20 20 20 20 |ENDE ?. | 00000FF0: 20 20 20 4C 44 41 20 56 45 52 47 4C 54 2C 59 0D | LDA VERGLT,Y.| 00001000: 20 20 20 20 20 20 20 20 20 20 20 20 42 45 51 20 | BEQ | 00001010: 47 4C 45 49 43 48 20 20 20 20 3B 20 4A 41 0D 0D |GLEICH ; JA..| 00001020: 20 20 20 3A 57 56 0D 20 20 20 20 20 20 20 20 20 | :WV. | 00001030: 20 20 20 49 4E 58 20 20 20 20 20 20 20 20 20 20 | INX | 00001040: 20 3B 45 49 4E 47 45 47 45 42 45 4E 45 52 20 CE | ;EINGEGEBENER .| 00001050: 41 4D 45 20 5A 55 45 4E 44 45 20 3F 0D 20 20 20 |AME ZUENDE ?. | 00001060: 20 20 20 20 20 20 20 20 20 4C 44 41 20 54 45 58 | LDA TEX| 00001070: 54 54 2C 58 0D 20 20 20 20 20 20 20 20 20 20 20 |TT,X. | 00001080: 20 42 45 51 20 4E 56 47 4C 20 20 20 20 20 20 3B | BEQ NVGL ;| 00001090: 20 4A 41 0D 0D 20 20 20 20 20 20 20 20 20 20 20 | JA.. | 000010A0: 20 4A 4D 50 20 4C 4F 4F 50 56 0D 0D 20 20 20 20 | JMP LOOPV.. | 000010B0: 20 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0D | ;------------..| 000010C0: 20 3A 4E 56 47 4C 0D 20 20 3A 4C 4F 4F 50 4E 0D | :NVGL. :LOOPN.| 000010D0: 20 20 20 20 20 20 20 20 20 20 20 20 49 4E 59 20 | INY | 000010E0: 20 20 20 20 20 20 20 20 20 3B D9 20 42 49 53 20 | ;. BIS | 000010F0: C5 4E 44 45 20 44 45 53 20 CE 41 4D 45 4E 20 5A |.NDE DES .AMEN Z| 00001100: 41 45 48 4C 45 4E 0D 20 20 20 20 20 20 20 20 20 |AEHLEN. | 00001110: 20 20 20 4C 44 41 20 56 45 52 47 4C 54 2C 59 0D | LDA VERGLT,Y.| 00001120: 20 20 20 20 20 20 20 20 20 20 20 20 43 4D 50 20 | CMP | 00001130: 23 32 35 35 0D 20 20 20 20 20 20 20 20 20 20 20 |#255. | 00001140: 20 42 4E 45 20 4C 4F 4F 50 4E 0D 0D 20 20 3A 45 | BNE LOOPN.. :E| 00001150: 4E 44 45 54 45 53 54 0D 20 20 20 20 20 20 20 20 |NDETEST. | 00001160: 20 20 20 20 54 59 41 20 20 20 20 20 20 20 20 20 | TYA | 00001170: 20 3B DA 45 49 47 45 52 20 41 55 46 20 4E 41 45 | ;.EIGER AUF NAE| 00001180: 43 48 53 54 45 4E 20 CE 41 4D 45 4E 0D 20 20 20 |CHSTEN .AMEN. | 00001190: 20 20 20 20 20 20 20 20 20 43 4C 43 0D 20 20 20 | CLC. | 000011A0: 20 20 20 20 20 20 20 20 20 43 4C 44 0D 20 20 20 | CLD. | 000011B0: 20 20 20 20 20 20 20 20 20 41 44 43 20 23 38 0D | ADC #8.| 000011C0: 20 20 20 20 20 20 20 20 20 20 20 20 54 41 59 0D | TAY.| 000011D0: 20 20 20 20 20 20 20 20 20 20 20 20 4C 44 41 20 | LDA | 000011E0: 56 45 52 47 4C 54 2C 59 0D 20 20 20 20 20 20 20 |VERGLT,Y. | 000011F0: 20 20 20 20 20 43 4D 50 20 23 32 35 35 20 20 20 | CMP #255 | 00001200: 20 20 20 3B C4 49 52 2E 20 5A 55 45 4E 44 45 0D | ;.IR. ZUENDE.| 00001210: 20 20 20 20 20 20 20 20 20 20 20 20 42 45 51 20 | BEQ | 00001220: 4E 49 43 48 54 47 45 46 0D 0D 20 20 20 20 20 20 |NICHTGEF.. | 00001230: 20 20 20 20 20 20 4A 4D 50 20 56 47 4C 0D 0D 20 | JMP VGL.. | 00001240: 20 20 20 20 20 20 20 20 3B 2D 2D 2D 2D 2D 2D 2D | ;-------| 00001250: 2D 2D 2D 2D 2D 0D 0D 3A 47 4C 45 49 43 48 0D 20 |-----..:GLEICH. | 00001260: 20 20 20 20 20 20 20 20 20 20 20 49 4E 58 20 20 | INX | 00001270: 20 20 20 20 20 20 20 20 20 3B 45 49 4E 47 45 47 | ;EINGEG| 00001280: 45 42 45 4E 45 52 20 CE 41 4D 45 20 41 55 43 48 |EBENER .AME AUCH| 00001290: 20 5A 55 45 4E 44 45 20 3F 20 3D 3E 47 4C 45 49 | ZUENDE ? =>GLEI| 000012A0: 43 48 20 CE 41 4D 45 20 49 4D 20 C4 49 52 0D 20 |CH .AME IM .IR. | 000012B0: 20 20 20 20 20 20 20 20 20 20 20 4C 44 41 20 54 | LDA T| 000012C0: 45 58 54 54 2C 58 0D 20 20 20 20 20 20 20 20 20 |EXTT,X. | 000012D0: 20 20 20 42 45 51 20 47 45 46 20 20 20 20 20 20 | BEQ GEF | 000012E0: 20 3B 20 4A 41 0D 0D 20 20 20 20 20 20 20 20 20 | ; JA.. | 000012F0: 20 20 20 4A 4D 50 20 4E 56 47 4C 20 20 20 20 20 | JMP NVGL | 00001300: 20 3B 4E 41 45 43 48 53 54 45 52 20 CE 41 4D 45 | ;NAECHSTER .AME| 00001310: 0D 0D 3A 47 45 46 0D 20 20 20 20 20 20 20 20 20 |..:GEF. | 00001320: 20 20 20 4C 44 59 20 24 32 46 30 0D 20 20 20 20 | LDY $2F0. | 00001330: 3A 4C 41 44 52 0D 20 20 20 20 20 20 20 20 20 20 |:LADR. | 00001340: 20 20 4C 44 41 20 23 31 31 0D 20 20 20 20 20 20 | LDA #11. | 00001350: 20 20 20 20 20 20 43 4C 43 0D 20 20 20 20 20 20 | CLC. | 00001360: 20 20 20 20 20 20 43 4C 44 0D 20 20 20 20 20 20 | CLD. | 00001370: 20 20 20 20 20 20 41 44 43 20 24 39 45 20 20 20 | ADC $9E | 00001380: 20 20 3B DA 45 49 47 45 52 20 41 55 46 20 C1 4E | ;.EIGER AUF .N| 00001390: 46 2E 41 44 52 2E 20 44 45 53 20 C6 49 4C 45 53 |F.ADR. DES .ILES| 000013A0: 20 4D 49 54 20 45 4E 54 53 50 52 2E 20 CE 41 4D | MIT ENTSPR. .AM| 000013B0: 45 4E 0D 20 20 20 20 20 20 20 20 20 20 20 20 53 |EN. S| 000013C0: 54 41 20 24 39 45 0D 0D 20 20 20 20 20 20 20 20 |TA $9E.. | 000013D0: 20 20 20 20 4C 44 41 20 23 30 0D 20 20 20 20 20 | LDA #0. | 000013E0: 20 20 20 20 20 20 20 41 44 43 20 24 39 46 20 20 | ADC $9F | 000013F0: 20 20 20 3B D5 45 42 45 52 4C 41 55 46 20 41 44 | ;.EBERLAUF AD| 00001400: 44 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 53 |D.. S| 00001410: 54 41 20 24 39 46 0D 0D 20 20 20 20 20 20 20 20 |TA $9F.. | 00001420: 20 20 20 20 44 45 59 0D 20 20 20 20 20 20 20 20 | DEY. | 00001430: 20 20 20 20 42 45 51 20 57 47 45 46 0D 0D 20 20 | BEQ WGEF.. | 00001440: 20 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 36 | LDA #6| 00001450: 0D 20 20 20 20 20 20 20 20 20 20 20 20 43 4C 43 |. CLC| 00001460: 0D 20 20 20 20 20 20 20 20 20 20 20 20 43 4C 44 |. CLD| 00001470: 0D 20 20 20 20 20 20 20 20 20 20 20 20 41 44 43 |. ADC| 00001480: 20 24 39 45 20 20 20 20 20 3B DA 45 49 47 45 52 | $9E ;.EIGER| 00001490: 20 41 55 46 20 4E 41 45 43 48 53 54 45 4E 20 CE | AUF NAECHSTEN .| 000014A0: 41 4D 45 0D 20 20 20 20 20 20 20 20 20 20 20 20 |AME. | 000014B0: 53 54 41 20 24 39 45 0D 0D 20 20 20 20 20 20 20 |STA $9E.. | 000014C0: 20 20 20 20 20 4C 44 41 20 23 30 0D 20 20 20 20 | LDA #0. | 000014D0: 20 20 20 20 20 20 20 20 41 44 43 20 24 39 46 20 | ADC $9F | 000014E0: 20 20 20 20 3B D5 45 42 45 52 4C 41 55 46 20 41 | ;.EBERLAUF A| 000014F0: 44 44 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 |DD.. | 00001500: 53 54 41 20 24 39 46 0D 0D 20 20 20 20 20 20 20 |STA $9F.. | 00001510: 20 20 20 20 20 4A 4D 50 20 4C 41 44 52 20 20 20 | JMP LADR | 00001520: 20 3B 53 4F 4C 41 4E 47 45 20 42 49 53 20 C5 49 | ;SOLANGE BIS .I| 00001530: 4E 54 52 41 47 5A 41 45 48 4C 45 52 20 3D 30 0D |NTRAGZAEHLER =0.| 00001540: 0D 0D 20 20 20 20 3A 57 47 45 46 20 20 20 20 20 |.. :WGEF | 00001550: 20 20 20 20 20 20 20 20 20 20 20 20 20 3B CE 41 | ;.A| 00001560: 4D 45 20 47 45 46 55 4E 44 45 4E 0D 20 20 20 20 |ME GEFUNDEN. | 00001570: 20 20 20 20 20 20 20 20 53 54 52 4F 55 54 20 47 | STROUT G| 00001580: 45 46 54 0D 0D 20 20 20 20 20 20 20 20 20 20 20 |EFT.. | 00001590: 20 4C 44 41 20 24 42 44 0D 20 20 20 20 20 20 20 | LDA $BD. | 000015A0: 20 20 20 20 20 43 4D 50 20 23 27 22 20 20 20 20 | CMP #'" | 000015B0: 3B 41 4C 54 45 20 4F 44 45 52 0D 20 20 20 20 20 |;ALTE ODER. | 000015C0: 20 20 20 20 20 20 20 42 45 51 20 41 4C 54 45 57 | BEQ ALTEW| 000015D0: 20 20 3B 4E 45 55 45 20 D7 45 52 54 45 0D 0D 20 | ;NEUE .ERTE.. | 000015E0: 20 20 20 20 20 20 20 20 20 20 20 4A 4D 50 20 57 | JMP W| 000015F0: 45 52 54 45 53 0D 0D 0D 20 20 20 20 20 20 20 20 |ERTES... | 00001600: 20 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D | ;-------------.| 00001610: 0D 3A 4E 49 43 48 54 47 45 46 20 20 20 20 20 20 |.:NICHTGEF | 00001620: 20 20 20 20 20 20 20 20 20 20 20 20 3B CE 41 4D | ;.AM| 00001630: 45 20 4E 49 43 48 54 20 47 45 46 55 4E 44 45 4E |E NICHT GEFUNDEN| 00001640: 0D 20 20 20 20 20 20 20 20 20 20 20 20 53 54 52 |. STR| 00001650: 4F 55 54 20 4E 49 43 48 54 54 0D 0D 20 20 20 20 |OUT NICHTT.. | 00001660: 20 20 20 20 20 20 20 20 4A 53 52 20 43 48 52 47 | JSR CHRG| 00001670: 45 54 0D 20 20 20 20 20 20 20 20 20 20 20 20 4A |ET. J| 00001680: 4D 50 20 24 41 37 41 45 0D 0D 0D 0D 3B 2D 2D 2D |MP $A7AE....;---| 00001690: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000016A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0D 0D 3A |------------...:| 000016B0: 57 45 52 54 45 53 0D 0D 20 20 20 20 20 20 3B D7 |WERTES.. ;.| 000016C0: 45 52 54 45 20 53 49 43 48 45 52 4E 20 20 28 20 |ERTE SICHERN ( | 000016D0: 49 4E 20 C4 49 52 2E 20 53 43 48 52 45 49 42 45 |IN .IR. SCHREIBE| 000016E0: 4E 29 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 20 |N)... | 000016F0: 20 4C 44 59 20 23 30 20 20 20 20 20 3B C1 4E 46 | LDY #0 ;.NF| 00001700: 2E 41 44 52 2E 2C C5 4E 44 41 44 52 2E 0D 20 20 |.ADR.,.NDADR.. | 00001710: 3A 4C 4F 4F 50 57 53 49 0D 20 20 20 20 20 20 20 |:LOOPWSI. | 00001720: 20 20 20 20 20 4C 44 41 20 36 31 2C 59 0D 20 20 | LDA 61,Y. | 00001730: 20 20 20 20 20 20 20 20 20 20 53 54 41 20 28 24 | STA ($| 00001740: 39 45 29 2C 59 0D 20 20 20 20 20 20 20 20 20 20 |9E),Y. | 00001750: 20 20 49 4E 59 0D 20 20 20 20 20 20 20 20 20 20 | INY. | 00001760: 20 20 43 50 59 20 23 34 0D 20 20 20 20 20 20 20 | CPY #4. | 00001770: 20 20 20 20 20 42 4E 45 20 4C 4F 4F 50 57 53 49 | BNE LOOPWSI| 00001780: 0D 0D 20 20 20 20 20 20 20 3B 57 45 49 54 45 52 |.. ;WEITER| 00001790: 20 44 41 20 D3 45 49 54 45 20 4E 4F 43 48 20 55 | DA .EITE NOCH U| 000017A0: 45 42 45 52 4E 4F 4D 4D 45 4E 0D 20 20 20 20 20 |EBERNOMMEN. | 000017B0: 20 20 3B 20 20 20 20 20 20 57 45 52 44 45 4E 20 | ; WERDEN | 000017C0: 4D 55 53 53 0D 0D 0D 20 20 20 20 20 3B 2D 2D 2D |MUSS... ;---| 000017D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000017E0: 2D 2D 2D 2D 0D 0D 20 20 20 20 3B D7 45 52 54 45 |----.. ;.ERTE| 000017F0: 20 41 55 53 20 C4 49 52 2E 20 55 45 42 45 52 4E | AUS .IR. UEBERN| 00001800: 45 48 4D 45 4E 0D 0D 3A 41 4C 54 45 57 0D 20 20 |EHMEN..:ALTEW. | 00001810: 20 20 20 20 20 20 20 20 20 20 4C 44 59 20 23 30 | LDY #0| 00001820: 0D 20 20 3A 4C 4F 4F 50 57 53 0D 20 20 20 20 20 |. :LOOPWS. | 00001830: 20 20 20 20 20 20 20 4C 44 41 20 28 24 39 45 29 | LDA ($9E)| 00001840: 2C 59 0D 20 20 20 20 20 20 20 20 20 20 20 20 53 |,Y. S| 00001850: 54 41 20 36 31 2C 59 0D 20 20 20 20 20 20 20 20 |TA 61,Y. | 00001860: 20 20 20 20 49 4E 59 0D 20 20 20 20 20 20 20 20 | INY. | 00001870: 20 20 20 20 43 50 59 20 23 36 0D 20 20 20 20 20 | CPY #6. | 00001880: 20 20 20 20 20 20 20 42 4E 45 20 4C 4F 4F 50 57 | BNE LOOPW| 00001890: 53 0D 0D 20 20 20 20 20 3B 2D 2D 2D 2D 2D 2D 2D |S.. ;-------| 000018A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000018B0: 2D 0D 0D 3A 42 45 46 45 48 4C 53 54 45 53 54 0D |-..:BEFEHLSTEST.| 000018C0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 4C 44 41 |. LDA| 000018D0: 20 32 20 20 20 20 20 20 20 3B 43 48 52 47 45 54 | 2 ;CHRGET| 000018E0: 2D DA 45 49 47 45 52 20 48 4F 4C 45 4E 0D 20 20 |-.EIGER HOLEN. | 000018F0: 20 20 20 20 20 20 20 20 20 20 4C 44 58 20 33 0D | LDX 3.| 00001900: 20 20 20 20 20 20 20 20 20 20 20 20 53 54 41 20 | STA | 00001910: 24 37 41 0D 20 20 20 20 20 20 20 20 20 20 20 20 |$7A. | 00001920: 53 54 58 20 24 37 42 0D 0D 20 20 20 20 20 20 20 |STX $7B.. | 00001930: 20 20 20 20 20 4A 53 52 20 43 48 52 47 45 54 20 | JSR CHRGET | 00001940: 20 20 20 20 3B 31 2E DA 45 49 43 48 45 4E 20 55 | ;1..EICHEN U| 00001950: 45 42 45 52 53 50 52 49 4E 47 45 4E 20 28 20 22 |EBERSPRINGEN ( "| 00001960: 52 22 20 29 0D 0D 20 20 20 20 20 20 20 20 20 20 |R" ).. | 00001970: 20 20 4A 53 52 20 43 48 52 47 45 54 0D 20 20 20 | JSR CHRGET. | 00001980: 20 20 20 20 20 20 20 20 20 53 54 41 20 24 42 36 | STA $B6| 00001990: 0D 0D 20 20 20 20 20 20 20 20 20 20 20 20 4C 44 |.. LD| 000019A0: 59 20 23 30 20 20 20 20 20 3B DA 41 45 48 4C 45 |Y #0 ;.AEHLE| 000019B0: 52 0D 3A 4C 4F 4F 50 43 48 45 43 4B 0D 20 20 20 |R.:LOOPCHECK. | 000019C0: 20 20 20 20 20 20 20 20 20 4C 44 41 20 24 42 36 | LDA $B6| 000019D0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 43 4D 50 |. CMP| 000019E0: 20 42 4C 49 53 54 45 2C 59 0D 20 20 20 20 20 20 | BLISTE,Y. | 000019F0: 20 20 20 20 20 20 42 45 51 20 57 45 49 54 45 52 | BEQ WEITER| 00001A00: 43 48 0D 0D 20 20 20 20 20 20 20 20 20 20 20 20 |CH.. | 00001A10: 49 4E 59 0D 20 20 20 20 20 20 20 20 20 20 20 20 |INY. | 00001A20: 43 50 59 20 20 23 35 20 20 20 20 20 20 20 20 3B |CPY #5 ;| 00001A30: C1 4E 5A 41 48 4C 20 44 45 52 20 C2 45 46 45 48 |.NZAHL DER .EFEH| 00001A40: 4C 45 0D 20 20 20 20 20 20 20 20 20 20 20 20 42 |LE. B| 00001A50: 4E 45 20 4C 4F 4F 50 43 48 45 43 4B 0D 0D 20 20 |NE LOOPCHECK.. | 00001A60: 20 20 20 20 20 20 20 20 20 20 4A 4D 50 20 49 4E | JMP IN| 00001A70: 54 45 52 50 52 20 20 20 20 3B 57 45 4E 4E 20 4E |TERPR ;WENN N| 00001A80: 49 43 48 54 20 47 45 46 55 4E 44 45 4E 20 5A 55 |ICHT GEFUNDEN ZU| 00001A90: 20 C9 4E 54 45 52 50 52 45 54 45 52 0D 0D 20 20 | .NTERPRETER.. | 00001AA0: 20 3A 57 45 49 54 45 52 43 48 0D 20 20 20 20 20 | :WEITERCH. | 00001AB0: 20 20 20 20 20 20 20 54 59 41 0D 20 20 20 20 20 | TYA. | 00001AC0: 20 20 20 20 20 20 20 41 53 4C 20 20 20 20 20 3B | ASL ;| 00001AD0: 2A 32 0D 20 20 20 20 20 20 20 20 20 20 20 20 54 |*2. T| 00001AE0: 41 59 20 20 20 20 20 3B 44 41 20 C1 44 52 2E 20 |AY ;DA .DR. | 00001AF0: 32 20 C2 59 54 45 0D 0D 20 20 20 20 20 20 20 20 |2 .YTE.. | 00001B00: 20 20 20 20 4C 44 41 20 41 44 52 4C 49 53 54 2C | LDA ADRLIST,| 00001B10: 59 0D 20 20 20 20 20 20 20 20 20 20 20 20 53 54 |Y. ST| 00001B20: 41 20 4A 55 4D 50 2B 31 0D 20 20 20 20 20 20 20 |A JUMP+1. | 00001B30: 20 20 20 20 20 4C 44 41 20 41 44 52 4C 49 53 54 | LDA ADRLIST| 00001B40: 2B 31 2C 59 0D 20 20 20 20 20 20 20 20 20 20 20 |+1,Y. | 00001B50: 20 53 54 41 20 4A 55 4D 50 2B 32 0D 0D 3A 4A 55 | STA JUMP+2..:JU| 00001B60: 4D 50 20 20 20 20 20 20 20 4A 4D 50 20 24 46 46 |MP JMP $FF| 00001B70: 46 46 20 20 20 20 3B 57 49 52 44 20 4D 4F 44 49 |FF ;WIRD MODI| 00001B80: 46 49 5A 49 45 52 54 20 28 C1 44 52 45 53 53 45 |FIZIERT (.DRESSE| 00001B90: 20 44 45 53 20 45 4E 54 53 50 52 45 43 48 45 4E | DES ENTSPRECHEN| 00001BA0: 44 45 4E 0D 20 20 20 20 20 20 20 20 20 20 20 20 |DEN. | 00001BB0: 20 20 20 20 20 20 20 20 20 20 20 20 20 3B 20 20 | ; | 00001BC0: D0 52 4F 47 52 41 4D 4D 54 45 49 4C 45 53 0D 0D |.ROGRAMMTEILES..| 00001BD0: 20 20 3A 49 4E 54 45 52 50 52 20 20 4C 44 41 20 | :INTERPR LDA | 00001BE0: 32 0D 20 20 20 20 20 20 20 20 20 20 20 20 4C 44 |2. LD| 00001BF0: 58 20 33 0D 20 20 20 20 20 20 20 20 20 20 20 20 |X 3. | 00001C00: 53 54 41 20 24 37 41 0D 20 20 20 20 20 20 20 20 |STA $7A. | 00001C10: 20 20 20 20 53 54 58 20 24 37 42 0D 0D 20 20 20 | STX $7B.. | 00001C20: 20 20 20 20 20 20 20 20 20 4A 4D 50 20 24 41 37 | JMP $A7| 00001C30: 45 34 20 20 3B 5A 55 20 4E 4F 52 4D 41 4C 20 C9 |E4 ;ZU NORMAL .| 00001C40: 4E 54 45 52 2D 0D 20 20 20 20 20 20 20 20 20 20 |NTER-. | 00001C50: 20 20 20 20 20 20 20 20 20 20 20 20 20 3B 20 20 | ; | 00001C60: 50 52 45 54 45 52 52 4F 55 54 49 4E 45 0D 0D 0D |PRETERROUTINE...| 00001C70: 0D 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.;--------------| 00001C80: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0D 3B |-------------..;| 00001C90: A5 20 CD 4F 44 49 46 49 5A 49 45 52 55 4E 47 53 |. .ODIFIZIERUNGS| 00001CA0: 52 4F 55 54 49 4E 45 4E 20 20 A7 0D 0D 3B 2D 2D |ROUTINEN ...;--| 00001CB0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00001CC0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0D 0D 3A 46 55 45 |---------...:FUE| 00001CD0: 4C 4C 45 4E 0D 20 20 20 20 20 20 20 20 20 20 20 |LLEN. | 00001CE0: 20 4A 53 52 20 43 48 52 47 45 54 20 20 20 3B 31 | JSR CHRGET ;1| 00001CF0: 2E 20 22 20 55 45 42 45 52 53 50 52 49 4E 47 45 |. " UEBERSPRINGE| 00001D00: 4E 0D 0D 20 20 20 20 20 20 3A 4C 47 0D 20 20 20 |N.. :LG. | 00001D10: 20 20 20 20 20 20 20 20 20 4A 53 52 20 43 48 52 | JSR CHR| 00001D20: 47 45 54 20 20 20 3B 32 2E 20 C1 4E 46 2E 5A 2E |GET ;2. .NF.Z.| 00001D30: 20 53 55 43 48 45 4E 20 2C 20 44 41 20 DA 45 49 | SUCHEN , DA .EI| 00001D40: 47 45 52 20 5A 55 52 55 45 43 4B 47 45 53 54 2E |GER ZURUECKGEST.| 00001D50: 57 55 52 44 45 4E 0D 20 20 20 20 20 20 20 20 20 |WURDEN. | 00001D60: 20 20 20 43 4D 50 20 23 27 22 0D 20 20 20 20 20 | CMP #'". | 00001D70: 20 20 20 20 20 20 20 42 4E 45 20 4C 47 0D 0D 20 | BNE LG.. | 00001D80: 20 20 20 20 20 20 20 20 20 20 20 4A 53 52 20 43 | JSR C| 00001D90: 48 52 47 45 54 0D 20 20 20 20 20 20 20 20 20 20 |HRGET. | 00001DA0: 20 20 43 4D 50 20 23 27 2C 20 20 20 20 20 20 3B | CMP #', ;| 00001DB0: DA 41 48 4C 20 4E 41 43 48 20 CE 41 4D 45 4E 20 |.AHL NACH .AMEN | 00001DC0: 3F 0D 20 20 20 20 20 20 20 20 20 20 20 20 42 4E |?. BN| 00001DD0: 45 20 4E 55 4C 4C 20 20 20 20 20 3B 20 57 45 4E |E NULL ; WEN| 00001DE0: 4E 20 4E 49 43 48 54 20 4D 49 54 20 30 20 46 55 |N NICHT MIT 0 FU| 00001DF0: 45 4C 4C 45 4E 0D 0D 20 20 20 20 20 20 20 20 20 |ELLEN.. | 00001E00: 20 20 20 4A 53 52 20 47 45 54 5A 41 48 20 20 20 | JSR GETZAH | 00001E10: 3B 38 2D C2 49 54 2D DA 41 48 4C 20 48 4F 4C 45 |;8-.IT-.AHL HOLE| 00001E20: 4E 0D 20 20 20 20 20 20 20 20 20 20 20 20 53 54 |N. ST| 00001E30: 58 20 33 0D 20 20 20 20 20 20 20 20 20 20 20 20 |X 3. | 00001E40: 4A 4D 50 20 4D 4F 44 49 46 0D 0D 20 20 20 20 20 |JMP MODIF.. | 00001E50: 20 20 3A 4E 55 4C 4C 0D 20 20 20 20 20 20 20 20 | :NULL. | 00001E60: 20 20 20 20 4C 44 58 20 23 30 0D 20 20 20 20 20 | LDX #0. | 00001E70: 20 20 20 20 20 20 20 53 54 58 20 33 0D 0D 3A 4D | STX 3..:M| 00001E80: 4F 44 49 46 0D 20 20 20 20 20 20 20 20 20 20 20 |ODIF. | 00001E90: 20 4C 44 59 20 23 30 0D 3A 4C 4F 4F 50 4D 46 0D | LDY #0.:LOOPMF.| 00001EA0: 20 20 20 20 20 20 20 20 20 20 20 20 4C 44 41 20 | LDA | 00001EB0: 4D 4F 44 46 2C 59 20 20 20 3B 4B 4F 50 2E 20 4C |MODF,Y ;KOP. L| 00001EC0: 44 41 20 33 0D 20 20 20 20 20 20 20 20 20 20 20 |DA 3. | 00001ED0: 20 53 54 41 20 4D 4F 44 31 2C 59 20 20 20 3B 20 | STA MOD1,Y ; | 00001EE0: 20 20 20 20 53 54 41 20 24 44 45 30 30 2C 58 0D | STA $DE00,X.| 00001EF0: 20 20 20 20 20 20 20 20 20 20 20 20 49 4E 59 0D | INY.| 00001F00: 20 20 20 20 20 20 20 20 20 20 20 20 43 50 59 20 | CPY | 00001F10: 23 31 36 0D 20 20 20 20 20 20 20 20 20 20 20 20 |#16. | 00001F20: 42 4E 45 20 4C 4F 4F 50 4D 46 0D 0D 20 20 20 20 |BNE LOOPMF.. | 00001F30: 20 20 20 20 20 20 20 20 4C 44 41 20 46 36 36 0D | LDA F66.| 00001F40: 20 20 20 20 20 20 20 20 20 20 20 20 53 54 41 20 | STA | 00001F50: 4D 4F 44 33 2B 31 0D 0D 0D 3B D3 45 49 54 45 4E |MOD3+1...;.EITEN| 00001F60: 20 44 49 45 20 47 45 46 55 45 4C 4C 54 20 57 45 | DIE GEFUELLT WE| 00001F70: 52 44 45 4E 20 53 4F 4C 4C 45 4E 20 48 4F 4C 45 |RDEN SOLLEN HOLE| 00001F80: 4E 0D 0D 20 20 20 20 20 20 20 20 20 20 20 20 4C |N.. L| 00001F90: 44 59 20 23 34 20 20 20 20 20 20 3B DA 45 49 47 |DY #4 ;.EIG| 00001FA0: 45 52 20 41 55 46 20 D3 45 49 54 45 2D CC 4F 57 |ER AUF .EITE-.OW| 00001FB0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 4C 44 41 |. LDA| 00001FC0: 20 28 24 39 45 29 2C 59 0D 20 20 20 20 20 20 20 | ($9E),Y. | 00001FD0: 20 20 20 20 20 53 54 41 20 36 35 20 20 20 20 20 | STA 65 | 00001FE0: 20 3B 49 4E 20 45 4E 54 53 50 52 2E 20 D3 54 45 | ;IN ENTSPR. .TE| 00001FF0: 4C 4C 45 20 53 43 48 52 45 49 42 45 4E 0D 20 20 |LLE SCHREIBEN. | 00002000: 20 20 20 20 20 20 20 20 20 20 49 4E 59 0D 20 20 | INY. | 00002010: 20 20 20 20 20 20 20 20 20 20 4C 44 41 20 28 24 | LDA ($| 00002020: 39 45 29 2C 59 20 3B D3 45 49 54 45 2D C8 49 47 |9E),Y ;.EITE-.IG| 00002030: 48 0D 20 20 20 20 20 20 20 20 20 20 20 20 53 54 |H. ST| 00002040: 41 20 36 36 0D 0D 20 20 20 20 20 20 20 20 20 20 |A 66.. | 00002050: 20 20 4C 44 41 20 36 36 0D 20 20 20 20 20 20 20 | LDA 66. | 00002060: 20 20 20 20 20 43 4D 50 20 23 37 20 20 20 20 20 | CMP #7 | 00002070: 20 3B 38 2E D0 52 4F 47 52 41 4D 4D 20 3F 20 28 | ;8..ROGRAMM ? (| 00002080: 42 49 53 20 D3 45 49 54 45 20 32 30 34 37 2D 20 |BIS .EITE 2047- | 00002090: 44 41 20 4C 45 54 5A 54 45 52 20 C5 49 4E 54 52 |DA LETZTER .INTR| 000020A0: 41 47 29 0D 20 20 20 20 20 20 20 20 20 20 20 20 |AG). | 000020B0: 42 45 51 20 50 38 20 20 20 20 20 20 3B C1 4E 46 |BEQ P8 ;.NF| 000020C0: 2E 53 2E 20 24 37 30 30 0D 0D 0D 20 20 20 20 20 |.S. $700... | 000020D0: 20 20 20 20 20 20 20 4C 44 59 20 23 32 31 20 20 | LDY #21 | 000020E0: 20 20 20 20 3B C1 4E 46 41 4E 47 53 53 45 49 54 | ;.NFANGSSEIT| 000020F0: 45 20 44 45 53 20 4E 41 45 43 48 53 54 45 4E 20 |E DES NAECHSTEN | 00002100: D0 52 4F 47 52 41 4D 4D 45 53 20 48 4F 4C 45 4E |.ROGRAMMES HOLEN| 00002110: 0D 20 20 20 20 20 20 20 20 20 20 20 20 4C 44 41 |. LDA| 00002120: 20 28 24 39 45 29 2C 59 20 20 3B 20 42 49 53 20 | ($9E),Y ; BIS | 00002130: 5A 55 20 44 45 52 20 D3 45 49 54 45 2D 31 20 46 |ZU DER .EITE-1 F| 00002140: 55 45 4C 4C 45 4E 0D 20 20 20 20 20 20 20 20 20 |UELLEN. | 00002150: 20 20 20 53 54 41 20 36 33 0D 20 20 20 20 20 20 | STA 63. | 00002160: 20 20 20 20 20 20 49 4E 59 0D 20 20 20 20 20 20 | INY. | 00002170: 20 20 20 20 20 20 4C 44 41 20 28 24 39 45 29 2C | LDA ($9E),| 00002180: 59 0D 20 20 20 20 20 20 20 20 20 20 20 20 53 54 |Y. ST| 00002190: 41 20 36 34 0D 20 20 20 20 20 20 20 20 20 20 20 |A 64. | 000021A0: 20 4A 4D 50 20 45 4E 44 45 46 0D 0D 20 20 20 20 | JMP ENDEF.. | 000021B0: 20 20 3A 50 38 0D 20 20 20 20 20 20 20 20 20 20 | :P8. | 000021C0: 20 20 4C 44 41 20 23 3C 32 30 34 37 20 20 20 3B | LDA #<2047 ;| 000021D0: C5 4E 44 53 45 49 54 45 20 C6 49 4C 45 20 38 0D |.NDSEITE .ILE 8.| 000021E0: 20 20 20 20 20 20 20 20 20 20 20 20 53 54 41 20 | STA | 000021F0: 36 33 0D 20 20 20 20 20 20 20 20 20 20 20 20 4C |63. L| 00002200: 44 41 20 23 3E 32 30 34 37 0D 20 20 20 20 20 20 |DA #>2047. | 00002210: 20 20 20 20 20 20 53 54 41 20 36 34 0D 0D 20 20 | STA 64.. | 00002220: 20 20 3A 45 4E 44 45 46 0D 20 20 20 20 20 20 20 | :ENDEF. | 00002230: 20 20 20 20 20 4A 53 52 20 45 49 4E 47 50 43 4C | JSR EINGPCL| 00002240: 0D 20 20 20 20 20 20 20 20 20 20 20 20 4A 4D 50 |. JMP| 00002250: 20 53 54 41 52 54 20 20 20 20 3B 5A 55 20 41 55 | START ;ZU AU| 00002260: 53 46 55 45 48 52 45 4E 44 45 4E 20 D0 52 4F 47 |SFUEHRENDEN .ROG| 00002270: 52 41 4D 4D 54 45 49 4C 0D 0D 3B 2D 2D 2D 2D 2D |RAMMTEIL..;-----| 00002280: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00002290: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0D 3A 53 43 48 |----------..:SCH| 000022A0: 52 45 49 42 45 4E 0D 20 20 20 20 20 20 20 20 20 |REIBEN. | 000022B0: 20 20 20 4C 44 59 20 23 30 0D 3A 4C 4F 4F 50 4D | LDY #0.:LOOPM| 000022C0: 53 0D 20 20 20 20 20 20 20 20 20 20 20 20 4C 44 |S. LD| 000022D0: 41 20 4D 4F 44 53 2C 59 20 20 20 3B 4B 4F 50 2E |A MODS,Y ;KOP.| 000022E0: 20 4C 44 41 20 28 36 31 29 2C 59 0D 20 20 20 20 | LDA (61),Y. | 000022F0: 20 20 20 20 20 20 20 20 53 54 41 20 4D 4F 44 31 | STA MOD1| 00002300: 2C 59 20 20 20 3B 20 20 20 20 20 53 54 41 20 24 |,Y ; STA $| 00002310: 44 45 30 30 2C 58 0D 20 20 20 20 20 20 20 20 20 |DE00,X. | 00002320: 20 20 20 49 4E 59 20 20 20 20 20 20 20 20 20 20 | INY | 00002330: 3B 20 20 20 20 20 4C 44 41 20 36 31 0D 20 20 20 |; LDA 61. | 00002340: 20 20 20 20 20 20 20 20 20 43 50 59 20 23 31 36 | CPY #16| 00002350: 0D 20 20 20 20 20 20 20 20 20 20 20 20 42 4E 45 |. BNE| 00002360: 20 4C 4F 4F 50 4D 53 0D 0D 20 20 20 20 20 20 20 | LOOPMS.. | 00002370: 20 20 20 20 20 4C 44 41 20 53 36 32 0D 20 20 20 | LDA S62. | 00002380: 20 20 20 20 20 20 20 20 20 53 54 41 20 4D 4F 44 | STA MOD| 00002390: 33 2B 31 0D 0D 20 20 20 20 20 20 20 20 20 20 20 |3+1.. | 000023A0: 20 4A 53 52 20 45 49 4E 47 50 43 4C 0D 0D 20 20 | JSR EINGPCL.. | 000023B0: 20 20 20 20 20 20 20 20 20 20 4A 4D 50 20 53 54 | JMP ST| 000023C0: 41 52 54 0D 0D 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |ART..;----------| 000023D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000023E0: 2D 2D 2D 2D 2D 0D 0D 0D 3A 4C 45 53 45 4E 0D 20 |-----...:LESEN. | 000023F0: 20 20 20 20 20 20 20 20 20 20 20 4C 44 59 20 23 | LDY #| 00002400: 30 0D 3A 4C 4F 4F 50 4D 4C 0D 20 20 20 20 20 20 |0.:LOOPML. | 00002410: 20 20 20 20 20 20 4C 44 41 20 4D 4F 44 4C 2C 59 | LDA MODL,Y| 00002420: 20 20 20 3B 4B 4F 50 2E 20 4C 44 41 20 24 44 45 | ;KOP. LDA $DE| 00002430: 30 30 2C 58 0D 20 20 20 20 20 20 20 20 20 20 20 |00,X. | 00002440: 20 53 54 41 20 4D 4F 44 31 2C 59 20 20 20 3B 20 | STA MOD1,Y ; | 00002450: 20 20 20 20 53 54 41 20 28 36 31 29 2C 59 0D 20 | STA (61),Y. | 00002460: 20 20 20 20 20 20 20 20 20 20 20 49 4E 59 20 20 | INY | 00002470: 20 20 20 20 20 20 20 20 3B 20 20 20 20 20 4C 44 | ; LD| 00002480: 41 20 36 31 0D 20 20 20 20 20 20 20 20 20 20 20 |A 61. | 00002490: 20 43 50 59 20 23 31 36 0D 20 20 20 20 20 20 20 | CPY #16. | 000024A0: 20 20 20 20 20 42 4E 45 20 4C 4F 4F 50 4D 4C 0D | BNE LOOPML.| 000024B0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 4C 44 41 |. LDA| 000024C0: 20 4C 36 32 0D 20 20 20 20 20 20 20 20 20 20 20 | L62. | 000024D0: 20 53 54 41 20 4D 4F 44 33 2B 31 0D 0D 20 20 20 | STA MOD3+1.. | 000024E0: 20 20 20 20 20 20 20 20 20 4A 53 52 20 45 49 4E | JSR EIN| 000024F0: 47 50 43 4C 0D 0D 20 20 20 20 20 20 20 20 20 20 |GPCL.. | 00002500: 20 20 4A 4D 50 20 53 54 41 52 54 0D 0D 3B 2D 2D | JMP START..;--| 00002510: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00002520: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0D 3A |-------------..:| 00002530: 54 41 55 53 43 48 45 4E 0D 20 20 20 20 20 20 20 |TAUSCHEN. | 00002540: 20 20 20 20 20 4C 44 59 20 23 30 0D 3A 4C 4F 4F | LDY #0.:LOO| 00002550: 50 4D 54 0D 20 20 20 20 20 20 20 20 20 20 20 20 |PMT. | 00002560: 4C 44 41 20 4D 4F 44 54 2C 59 20 20 20 3B 4B 4F |LDA MODT,Y ;KO| 00002570: 50 2E 20 4C 44 41 20 28 36 31 29 2C 59 0D 20 20 |P. LDA (61),Y. | 00002580: 20 20 20 20 20 20 20 20 20 20 53 54 41 20 4D 4F | STA MO| 00002590: 44 31 2C 59 20 20 20 3B 20 20 20 20 20 53 54 41 |D1,Y ; STA| 000025A0: 20 33 0D 20 20 20 20 20 20 20 20 20 20 20 20 49 | 3. I| 000025B0: 4E 59 20 20 20 20 20 20 20 20 20 20 3B 20 20 20 |NY ; | 000025C0: 20 20 2E 2E 2E 0D 20 20 20 20 20 20 20 20 20 20 | .... | 000025D0: 20 20 43 50 59 20 23 31 36 0D 20 20 20 20 20 20 | CPY #16. | 000025E0: 20 20 20 20 20 20 42 4E 45 20 4C 4F 4F 50 4D 54 | BNE LOOPMT| 000025F0: 0D 0D 20 20 20 20 20 20 20 20 20 20 20 20 4C 44 |.. LD| 00002600: 41 20 54 36 32 0D 20 20 20 20 20 20 20 20 20 20 |A T62. | 00002610: 20 20 53 54 41 20 4D 4F 44 33 2B 31 0D 0D 20 20 | STA MOD3+1.. | 00002620: 20 20 20 20 20 20 20 20 20 20 4A 4D 50 20 53 54 | JMP ST| 00002630: 41 52 54 0D 0D 0D 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D |ART...;---------| 00002640: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D |---------------.| 00002650: 0D 3B A5 20 20 20 D2 C1 CD 2D C5 52 57 45 49 54 |.;. ...-.RWEIT| 00002660: 45 52 55 4E 47 20 20 20 20 A7 0D 0D 3B A5 20 20 |ERUNG ...;. | 00002670: 31 29 20 42 45 53 43 48 52 45 49 42 45 4E 20 20 |1) BESCHREIBEN | 00002680: 20 20 20 20 A7 0D 0D 3B A5 20 20 32 29 20 4C 45 | ...;. 2) LE| 00002690: 53 45 4E 20 20 20 20 20 20 20 20 20 20 20 20 A7 |SEN .| 000026A0: 0D 0D 3B A5 20 20 33 29 20 46 55 45 4C 4C 45 4E |..;. 3) FUELLEN| 000026B0: 20 20 20 20 20 20 20 20 20 20 A7 0D 0D 3B 2D 2D | ...;--| 000026C0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000026D0: 2D 2D 2D 2D 2D 2D 0D 0D 0D 0D 3A 53 54 41 52 54 |------....:START| 000026E0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 53 45 49 |. SEI| 000026F0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 4C 44 41 |. LDA| 00002700: 20 31 0D 20 20 20 20 20 20 20 20 20 20 20 20 53 | 1. S| 00002710: 54 41 20 24 32 46 31 0D 20 20 20 20 20 20 20 20 |TA $2F1. | 00002720: 20 20 20 20 41 4E 44 20 23 25 31 31 31 31 31 31 | AND #%111111| 00002730: 31 30 20 20 20 3B C2 C1 D3 C9 C3 2D D2 CF CD 20 |10 ;.....-... | 00002740: 41 55 46 20 D2 C1 CD 0D 20 20 20 20 20 20 20 20 |AUF .... | 00002750: 20 20 20 20 53 54 41 20 31 0D 0D 0D 20 20 20 20 | STA 1... | 00002760: 20 3B D3 45 49 54 45 20 42 45 52 45 43 48 4E 45 | ;.EITE BERECHNE| 00002770: 4E 20 28 20 44 41 20 49 4E 20 24 44 46 46 45 20 |N ( DA IN $DFFE | 00002780: C2 49 54 20 30 2D 35 0D 20 20 20 20 20 3B 20 20 |.IT 0-5. ; | 00002790: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 55 | (U| 000027A0: 4E 44 20 49 4E 20 24 44 46 46 46 20 C2 49 54 20 |ND IN $DFFF .IT | 000027B0: 33 2D 37 20 42 45 4E 55 54 5A 54 20 57 49 52 44 |3-7 BENUTZT WIRD| 000027C0: 29 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 20 20 |)... | 000027D0: 4A 53 52 20 53 45 49 54 45 42 45 52 0D 0D 20 20 |JSR SEITEBER.. | 000027E0: 20 20 3B D3 45 49 54 45 20 42 45 53 43 48 52 45 | ;.EITE BESCHRE| 000027F0: 49 42 45 4E 0D 0D 3A 43 4F 50 59 53 0D 20 20 20 |IBEN..:COPYS. | 00002800: 20 20 20 20 20 20 20 20 20 4C 44 58 20 36 37 0D | LDX 67.| 00002810: 20 20 20 20 20 20 20 20 20 20 20 20 4C 44 59 20 | LDY | 00002820: 36 38 0D 20 20 20 20 20 20 20 20 20 20 20 20 53 |68. S| 00002830: 54 58 20 24 44 46 46 45 0D 20 20 20 20 20 20 20 |TX $DFFE. | 00002840: 20 20 20 20 20 53 54 59 20 24 44 46 46 46 0D 0D | STY $DFFF..| 00002850: 20 20 20 20 20 20 20 20 20 20 20 20 4C 44 58 20 | LDX | 00002860: 23 30 20 20 20 20 3B DA 41 45 48 4C 45 52 20 4F |#0 ;.AEHLER O| 00002870: 42 20 D3 45 49 54 45 0D 20 20 20 20 20 20 20 20 |B .EITE. | 00002880: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3B 56 | ;V| 00002890: 4F 4C 4C 0D 3A 4C 4F 4F 50 53 43 0D 20 20 20 20 |OLL.:LOOPSC. | 000028A0: 20 20 20 20 20 20 20 20 53 54 58 20 32 0D 0D 20 | STX 2.. | 000028B0: 20 20 20 20 20 20 20 20 20 20 20 4C 44 59 20 23 | LDY #| 000028C0: 30 20 20 20 20 20 20 20 3B 20 A5 4C 45 53 45 4E |0 ; .LESEN| 000028D0: 20 20 20 20 20 20 20 20 20 20 A5 46 55 45 4C 4C | .FUELL| 000028E0: 45 4E 0D 20 20 20 3A 4D 4F 44 31 0D 20 20 20 20 |EN. :MOD1. | 000028F0: 20 20 20 20 20 20 20 20 4C 44 41 20 28 36 31 29 | LDA (61)| 00002900: 2C 59 20 20 20 3B 20 A5 4C 44 41 20 24 44 45 30 |,Y ; .LDA $DE0| 00002910: 30 2C 58 20 20 20 20 A5 4C 44 41 20 36 31 0D 20 |0,X .LDA 61. | 00002920: 20 20 20 20 20 20 20 20 20 20 20 53 54 41 20 24 | STA $| 00002930: 44 45 30 30 2C 58 20 20 3B 20 A5 53 54 41 20 28 |DE00,X ; .STA (| 00002940: 36 31 29 2C 59 20 20 20 20 20 A5 53 54 41 20 44 |61),Y .STA D| 00002950: 45 30 30 2C 58 0D 20 20 20 20 20 20 20 20 20 20 |E00,X. | 00002960: 20 20 4E 4F 50 0D 20 20 20 20 20 20 20 20 20 20 | NOP. | 00002970: 20 20 4E 4F 50 0D 20 20 20 20 20 20 20 20 20 20 | NOP. | 00002980: 20 20 4E 4F 50 0D 20 20 20 20 20 20 20 20 20 20 | NOP. | 00002990: 20 20 4E 4F 50 0D 20 20 20 20 20 20 20 20 20 20 | NOP. | 000029A0: 20 20 4E 4F 50 0D 20 20 20 20 20 20 20 20 20 20 | NOP. | 000029B0: 20 20 4E 4F 50 0D 20 20 20 20 20 20 20 20 20 20 | NOP. | 000029C0: 20 20 4E 4F 50 0D 20 20 20 20 20 20 20 20 20 20 | NOP. | 000029D0: 20 20 4E 4F 50 0D 20 20 20 20 20 20 20 20 20 20 | NOP. | 000029E0: 20 20 4E 4F 50 0D 20 20 20 3A 4D 4F 44 32 0D 20 | NOP. :MOD2. | 000029F0: 20 20 20 20 20 20 20 20 20 20 20 4C 44 41 20 36 | LDA 6| 00002A00: 31 20 20 20 20 20 20 20 3B 46 55 45 52 20 46 55 |1 ;FUER FU| 00002A10: 45 4C 4C 45 4E 20 2D 3E 20 4C 44 41 20 36 35 0D |ELLEN -> LDA 65.| 00002A20: 20 20 20 20 20 20 20 20 20 20 20 20 43 4D 50 20 | CMP | 00002A30: 36 33 0D 20 20 20 20 20 20 20 20 20 20 20 20 42 |63. B| 00002A40: 4E 45 20 57 45 49 54 45 52 53 0D 20 20 20 3A 4D |NE WEITERS. :M| 00002A50: 4F 44 33 0D 20 20 20 20 20 20 20 20 20 20 20 20 |OD3. | 00002A60: 4C 44 41 20 36 32 20 20 20 20 20 20 20 3B 20 20 |LDA 62 ; | 00002A70: 20 20 20 20 2D 22 2D 20 20 20 20 2D 3E 20 4C 44 | -"- -> LD| 00002A80: 41 20 36 36 0D 20 20 20 20 20 20 20 20 20 20 20 |A 66. | 00002A90: 20 43 4D 50 20 36 34 0D 20 20 20 20 20 20 20 20 | CMP 64. | 00002AA0: 20 20 20 20 42 4E 45 20 57 45 49 54 45 52 53 0D | BNE WEITERS.| 00002AB0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 4A 4D 50 |. JMP| 00002AC0: 20 52 45 4E 44 45 53 20 20 20 3B 57 45 4E 4E 20 | RENDES ;WENN | 00002AD0: 47 4C 45 49 43 48 20 2D 3E 20 45 4E 44 45 0D 0D |GLEICH -> ENDE..| 00002AE0: 20 3A 57 45 49 54 45 52 53 0D 20 20 20 20 20 20 | :WEITERS. | 00002AF0: 20 20 20 20 20 20 43 4C 44 0D 20 20 20 20 20 20 | CLD. | 00002B00: 20 20 20 20 20 20 43 4C 43 0D 20 20 20 20 20 20 | CLC. | 00002B10: 20 20 20 20 20 20 4C 44 41 20 23 31 0D 20 20 20 | LDA #1. | 00002B20: 20 20 20 20 20 20 20 20 20 41 44 43 20 36 31 0D | ADC 61.| 00002B30: 20 20 20 20 20 20 20 20 20 20 20 20 53 54 41 20 | STA | 00002B40: 36 31 0D 0D 20 20 20 20 20 20 20 20 20 20 20 20 |61.. | 00002B50: 4C 44 41 20 23 30 0D 20 20 20 20 20 20 20 20 20 |LDA #0. | 00002B60: 20 20 20 41 44 43 20 36 32 0D 20 20 20 20 20 20 | ADC 62. | 00002B70: 20 20 20 20 20 20 53 54 41 20 36 32 0D 0D 0D 20 | STA 62... | 00002B80: 20 20 20 20 20 20 20 20 20 20 20 4C 44 58 20 32 | LDX 2| 00002B90: 0D 20 20 20 20 20 20 20 20 20 20 20 20 49 4E 58 |. INX| 00002BA0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 42 4E 45 |. BNE| 00002BB0: 20 4C 4F 4F 50 53 43 0D 0D 20 20 20 3B 4E 41 45 | LOOPSC.. ;NAE| 00002BC0: 43 48 53 54 45 20 D3 45 49 54 45 20 42 45 52 45 |CHSTE .EITE BERE| 00002BD0: 43 48 4E 45 4E 0D 0D 20 20 20 20 20 20 20 20 20 |CHNEN.. | 00002BE0: 20 20 20 4A 53 52 20 4E 45 58 54 50 41 47 45 0D | JSR NEXTPAGE.| 00002BF0: 0D 3A 4D 4F 55 54 0D 20 20 20 20 20 20 20 20 20 |.:MOUT. | 00002C00: 20 20 20 4A 4D 50 20 43 4F 50 59 53 0D 0D 3A 52 | JMP COPYS..:R| 00002C10: 45 4E 44 45 53 0D 20 20 20 20 20 20 20 20 20 20 |ENDES. | 00002C20: 20 20 4C 44 41 20 24 32 46 31 20 20 20 20 20 3B | LDA $2F1 ;| 00002C30: 41 4C 54 45 20 D3 50 45 49 43 48 45 52 4B 4F 4E |ALTE .PEICHERKON| 00002C40: 46 2E 0D 20 20 20 20 20 20 20 20 20 20 20 20 53 |F.. S| 00002C50: 54 41 20 31 0D 20 20 20 20 20 20 20 20 20 20 20 |TA 1. | 00002C60: 20 43 4C 49 0D 0D 20 20 20 20 20 20 20 20 20 20 | CLI.. | 00002C70: 20 20 4C 44 59 20 23 30 20 20 20 20 20 20 20 3B | LDY #0 ;| 00002C80: 41 55 46 20 D3 45 49 54 45 20 30 20 2D 3E 20 4C |AUF .EITE 0 -> L| 00002C90: 45 54 5A 54 45 20 D3 45 49 54 45 20 55 45 42 45 |ETZTE .EITE UEBE| 00002CA0: 52 4E 4F 4D 4D 45 4E 0D 20 20 20 20 20 20 20 20 |RNOMMEN. | 00002CB0: 20 20 20 20 53 54 59 20 24 44 46 46 45 0D 20 20 | STY $DFFE. | 00002CC0: 20 20 20 20 20 20 20 20 20 20 53 54 59 20 24 44 | STY $D| 00002CD0: 46 46 46 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 |FFF... | 00002CE0: 20 20 4A 4D 50 20 24 41 37 41 45 20 20 20 20 20 | JMP $A7AE | 00002CF0: 3B 5A 55 52 20 C9 4E 54 45 52 50 52 2E 2D 0D 20 |;ZUR .NTERPR.-. | 00002D00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00002D10: 20 20 20 20 20 20 20 20 20 3B 20 53 43 48 4C 45 | ; SCHLE| 00002D20: 49 46 45 0D 0D 0D 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D |IFE...;---------| 00002D30: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00002D40: 2D 2D 2D 2D 0D 0D 3B A5 20 20 20 20 20 20 20 20 |----..;. | 00002D50: 20 20 20 D2 45 4E 41 4D 45 20 20 20 20 20 20 20 | .ENAME | 00002D60: 20 20 20 A7 0D 0D 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D | ...;---------| 00002D70: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00002D80: 2D 2D 2D 2D 0D 0D 0D 3A 52 45 4E 41 4D 45 0D 0D |----...:RENAME..| 00002D90: 20 20 3B DA 45 49 47 45 52 20 24 39 45 20 41 55 | ;.EIGER $9E AU| 00002DA0: 46 20 C1 4E 46 41 4E 47 20 C6 49 4C 45 4E 41 4D |F .NFANG .ILENAM| 00002DB0: 45 20 53 45 54 5A 45 4E 0D 0D 0D 20 20 20 20 20 |E SETZEN... | 00002DC0: 20 20 20 20 20 20 20 4C 44 41 20 24 39 45 0D 20 | LDA $9E. | 00002DD0: 20 20 20 20 20 20 20 20 20 20 20 53 45 43 0D 20 | SEC. | 00002DE0: 20 20 20 20 20 20 20 20 20 20 20 43 4C 44 0D 20 | CLD. | 00002DF0: 20 20 20 20 20 20 20 20 20 20 20 53 42 43 20 23 | SBC #| 00002E00: 31 30 0D 20 20 20 20 20 20 20 20 20 20 20 20 53 |10. S| 00002E10: 54 41 20 24 39 45 0D 0D 20 20 20 20 20 20 20 20 |TA $9E.. | 00002E20: 20 20 20 20 4C 44 41 20 24 39 46 0D 20 20 20 20 | LDA $9F. | 00002E30: 20 20 20 20 20 20 20 20 53 42 43 20 23 30 0D 20 | SBC #0. | 00002E40: 20 20 20 20 20 20 20 20 20 20 20 53 54 41 20 24 | STA $| 00002E50: 39 46 0D 0D 20 20 20 20 20 20 20 20 20 20 20 20 |9F.. | 00002E60: 4A 53 52 20 43 48 52 47 45 54 20 20 20 3B 31 2E |JSR CHRGET ;1.| 00002E70: 22 0D 20 20 20 20 20 20 3A 4C 47 52 0D 20 20 20 |". :LGR. | 00002E80: 20 20 20 20 20 20 20 20 20 4A 53 52 20 43 48 52 | JSR CHR| 00002E90: 47 45 54 20 20 20 3B 32 2E 20 C1 4E 46 2E 5A 2E |GET ;2. .NF.Z.| 00002EA0: 20 53 55 43 48 4E 20 2C 20 44 41 20 DA 45 49 47 | SUCHN , DA .EIG| 00002EB0: 45 52 20 5A 55 52 55 45 43 4B 47 45 53 54 2E 57 |ER ZURUECKGEST.W| 00002EC0: 55 52 44 45 4E 0D 20 20 20 20 20 20 20 20 20 20 |URDEN. | 00002ED0: 20 20 43 4D 50 20 23 27 22 0D 20 20 20 20 20 20 | CMP #'". | 00002EE0: 20 20 20 20 20 20 42 4E 45 20 4C 47 52 0D 0D 20 | BNE LGR.. | 00002EF0: 20 20 20 20 20 20 20 20 20 20 20 4A 53 52 20 43 | JSR C| 00002F00: 48 52 47 45 54 0D 20 20 20 20 20 20 20 20 20 20 |HRGET. | 00002F10: 20 20 4A 53 52 20 4B 4F 4D 4D 41 0D 0D 20 20 20 | JSR KOMMA.. | 00002F20: 20 20 20 20 20 20 20 20 20 4A 53 52 20 24 37 39 | JSR $79| 00002F30: 20 20 20 20 20 20 3B 56 4F 52 20 4E 45 55 45 4E | ;VOR NEUEN| 00002F40: 20 CE 41 4D 45 4E 20 22 0D 20 20 20 20 20 20 20 | .AMEN ". | 00002F50: 20 20 20 20 20 43 4D 50 20 23 27 22 0D 20 20 20 | CMP #'". | 00002F60: 20 20 20 20 20 20 20 20 20 42 45 51 20 57 52 0D | BEQ WR.| 00002F70: 0D 20 20 20 20 20 20 20 20 20 20 20 20 4A 4D 50 |. JMP| 00002F80: 20 24 41 37 41 45 20 20 20 20 3B 57 45 4E 4E 20 | $A7AE ;WENN | 00002F90: 4E 49 43 48 54 20 2D 3E 20 50 52 4F 56 4F 5A 49 |NICHT -> PROVOZI| 00002FA0: 45 52 54 20 53 59 4E 54 41 58 20 45 52 52 4F 52 |ERT SYNTAX ERROR| 00002FB0: 0D 0D 20 20 20 20 20 20 20 3A 57 52 0D 20 20 20 |.. :WR. | 00002FC0: 20 20 20 20 20 20 20 20 20 4C 44 59 20 23 30 20 | LDY #0 | 00002FD0: 20 20 20 20 20 20 3B CE 45 55 45 4E 20 CE 41 4D | ;.EUEN .AM| 00002FE0: 45 4E 20 48 4F 4C 45 4E 0D 20 20 20 3A 4C 4F 4F |EN HOLEN. :LOO| 00002FF0: 50 52 0D 20 20 20 20 20 20 20 20 20 20 20 20 4A |PR. J| 00003000: 53 52 20 43 48 52 47 45 54 0D 20 20 20 20 20 20 |SR CHRGET. | 00003010: 20 20 20 20 20 20 43 4D 50 20 23 27 22 0D 20 20 | CMP #'". | 00003020: 20 20 20 20 20 20 20 20 20 20 42 45 51 20 45 4E | BEQ EN| 00003030: 44 45 52 0D 0D 20 20 20 20 20 20 20 20 20 20 20 |DER.. | 00003040: 20 53 54 41 20 28 24 39 45 29 2C 59 20 20 3B 55 | STA ($9E),Y ;U| 00003050: 4E 44 20 53 43 48 52 45 49 42 45 4E 0D 20 20 20 |ND SCHREIBEN. | 00003060: 20 20 20 20 20 20 20 20 20 49 4E 59 0D 20 20 20 | INY. | 00003070: 20 20 20 20 20 20 20 20 20 43 50 59 20 23 38 0D | CPY #8.| 00003080: 20 20 20 20 20 20 20 20 20 20 20 20 42 4E 45 20 | BNE | 00003090: 4C 4F 4F 50 52 0D 0D 3A 45 4E 44 45 52 0D 20 20 |LOOPR..:ENDER. | 000030A0: 20 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 30 | LDA #0| 000030B0: 20 20 20 20 20 20 20 3B C5 4E 44 4B 45 4E 4E 5A | ;.NDKENNZ| 000030C0: 45 49 43 48 45 4E 0D 20 20 20 20 20 20 20 20 20 |EICHEN. | 000030D0: 20 20 20 53 54 41 20 28 24 39 45 29 2C 59 0D 0D | STA ($9E),Y..| 000030E0: 20 20 20 20 20 20 20 20 20 20 20 20 4A 53 52 20 | JSR | 000030F0: 45 49 4E 47 50 43 4C 0D 0D 20 20 20 20 20 20 20 |EINGPCL.. | 00003100: 20 20 20 20 20 4A 4D 50 20 24 41 37 41 45 0D 0D | JMP $A7AE..| 00003110: 0D 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.;--------------| 00003120: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D |---------------.| 00003130: 0D 3B A5 20 20 20 20 20 20 20 20 20 20 20 C4 49 |.;. .I| 00003140: 52 45 43 54 4F 52 59 20 20 20 20 20 20 20 A7 0D |RECTORY ..| 00003150: 0D 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.;--------------| 00003160: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D |---------------.| 00003170: 0D 0D 3A 44 49 52 45 43 54 4F 52 59 0D 20 20 20 |..:DIRECTORY. | 00003180: 20 20 20 20 20 20 20 20 20 4C 44 58 20 23 3C 56 | LDX #<V| 00003190: 45 52 47 4C 54 20 20 20 3B C1 4E 46 2E 41 44 52 |ERGLT ;.NF.ADR| 000031A0: 2E 20 C4 49 52 2E 0D 20 20 20 20 20 20 20 20 20 |. .IR.. | 000031B0: 20 20 20 4C 44 41 20 23 3E 56 45 52 47 4C 54 0D | LDA #>VERGLT.| 000031C0: 20 20 20 20 20 20 20 20 20 20 20 20 53 54 58 20 | STX | 000031D0: 24 39 45 0D 20 20 20 20 20 20 20 20 20 20 20 20 |$9E. | 000031E0: 53 54 41 20 24 39 46 0D 0D 20 20 20 20 20 20 20 |STA $9F.. | 000031F0: 20 20 20 20 20 4C 44 59 20 23 31 20 20 20 20 20 | LDY #1 | 00003200: 20 20 20 20 3B DA 41 45 48 4C 45 52 20 46 55 45 | ;.AEHLER FUE| 00003210: 52 20 C1 44 52 45 53 53 45 0D 20 20 20 20 20 20 |R .DRESSE. | 00003220: 20 20 20 20 20 20 4C 44 58 20 23 38 20 20 20 20 | LDX #8 | 00003230: 20 20 20 20 20 3B DA 41 45 48 4C 45 52 20 46 55 | ;.AEHLER FU| 00003240: 45 52 20 C5 49 4E 54 52 41 45 47 45 20 28 C4 49 |ER .INTRAEGE (.I| 00003250: 52 2E 20 5A 55 45 4E 44 45 3F 29 0D 20 20 20 20 |R. ZUENDE?). | 00003260: 20 20 20 20 20 20 20 20 53 54 59 20 32 0D 20 20 | STY 2. | 00003270: 20 20 20 20 20 20 20 20 20 20 53 54 58 20 33 0D | STX 3.| 00003280: 0D 20 20 20 3A 4C 4F 4F 50 44 31 0D 20 20 20 20 |. :LOOPD1. | 00003290: 20 20 20 20 20 20 20 20 53 45 43 0D 20 20 20 20 | SEC. | 000032A0: 20 20 20 20 20 20 20 20 4A 53 52 20 24 46 46 46 | JSR $FFF| 000032B0: 30 20 20 3B C3 55 52 53 4F 52 50 4F 53 2E 20 48 |0 ;.URSORPOS. H| 000032C0: 4F 4C 45 4E 0D 20 20 20 20 20 20 20 20 20 20 20 |OLEN. | 000032D0: 20 53 54 58 20 36 39 0D 20 20 20 20 20 20 20 20 | STX 69. | 000032E0: 20 20 20 20 4C 44 59 20 23 30 0D 0D 20 20 20 20 | LDY #0.. | 000032F0: 20 20 20 20 20 20 20 20 43 4C 43 0D 20 20 20 20 | CLC. | 00003300: 20 20 20 20 20 20 20 20 4A 53 52 20 24 46 46 46 | JSR $FFF| 00003310: 30 20 20 3B 20 20 2D 22 2D 20 20 20 53 45 54 5A |0 ; -"- SETZ| 00003320: 45 4E 0D 0D 20 20 20 20 20 20 20 20 20 20 20 20 |EN.. | 00003330: 4C 44 59 20 32 0D 20 20 20 3A 4C 4F 4F 50 44 32 |LDY 2. :LOOPD2| 00003340: 0D 20 20 20 20 20 20 20 20 20 20 20 20 4C 44 41 |. LDA| 00003350: 20 28 24 39 45 29 2C 59 20 20 3B C6 49 4C 45 4E | ($9E),Y ;.ILEN| 00003360: 41 4D 45 20 41 55 53 47 45 42 45 4E 0D 20 20 20 |AME AUSGEBEN. | 00003370: 20 20 20 20 20 20 20 20 20 43 4D 50 20 23 30 0D | CMP #0.| 00003380: 20 20 20 20 20 20 20 20 20 20 20 20 42 45 51 20 | BEQ | 00003390: 4E 45 58 54 4E 0D 0D 20 20 20 20 20 20 20 20 20 |NEXTN.. | 000033A0: 20 20 20 4A 53 52 20 24 46 46 44 32 0D 0D 20 20 | JSR $FFD2.. | 000033B0: 20 20 20 20 20 20 20 20 20 20 49 4E 59 0D 0D 20 | INY.. | 000033C0: 20 20 20 20 20 20 20 20 20 20 20 4A 4D 50 20 4C | JMP L| 000033D0: 4F 4F 50 44 32 0D 0D 0D 20 20 20 3A 4E 45 58 54 |OOPD2... :NEXT| 000033E0: 4E 0D 20 20 20 20 20 20 20 20 20 20 20 20 4C 44 |N. LD| 000033F0: 59 20 32 0D 20 20 20 20 20 3A 4C 4F 4F 50 44 4E |Y 2. :LOOPDN| 00003400: 0D 20 20 20 20 20 20 20 20 20 20 20 20 49 4E 59 |. INY| 00003410: 20 20 20 20 20 20 20 20 20 20 3B D9 20 42 49 53 | ;. BIS| 00003420: 20 C5 4E 44 45 20 44 45 53 20 CE 41 4D 45 4E 20 | .NDE DES .AMEN | 00003430: 5A 41 45 48 4C 45 4E 0D 20 20 20 20 20 20 20 20 |ZAEHLEN. | 00003440: 20 20 20 20 4C 44 41 20 56 45 52 47 4C 54 2C 59 | LDA VERGLT,Y| 00003450: 0D 20 20 20 20 20 20 20 20 20 20 20 20 43 4D 50 |. CMP| 00003460: 20 23 32 35 35 0D 20 20 20 20 20 20 20 20 20 20 | #255. | 00003470: 20 20 42 4E 45 20 4C 4F 4F 50 44 4E 0D 20 20 20 | BNE LOOPDN. | 00003480: 20 20 20 20 20 20 20 20 20 49 4E 59 20 20 20 20 | INY | 00003490: 20 20 20 20 20 20 3B D9 20 41 55 46 20 C1 4E 46 | ;. AUF .NF| 000034A0: 2E 41 44 52 2E 0D 20 20 20 20 20 20 20 20 20 20 |.ADR.. | 000034B0: 20 20 53 54 59 20 32 0D 0D 20 20 20 20 20 20 20 | STY 2.. | 000034C0: 20 20 20 20 20 4C 44 58 20 36 39 20 20 20 20 20 | LDX 69 | 000034D0: 20 20 3B C3 55 52 53 4F 52 50 4F 53 2E 20 53 45 | ;.URSORPOS. SE| 000034E0: 54 5A 45 4E 0D 20 20 20 20 20 20 20 20 20 20 20 |TZEN. | 000034F0: 20 4C 44 59 20 23 31 30 0D 20 20 20 20 20 20 20 | LDY #10. | 00003500: 20 20 20 20 20 43 4C 43 0D 20 20 20 20 20 20 20 | CLC. | 00003510: 20 20 20 20 20 4A 53 52 20 24 46 46 46 30 0D 0D | JSR $FFF0..| 00003520: 20 20 20 20 20 20 20 20 20 20 20 20 4C 44 59 20 | LDY | 00003530: 32 20 20 20 20 20 20 20 20 3B C1 4E 46 2E 41 44 |2 ;.NF.AD| 00003540: 52 2E 20 48 4F 4C 45 4E 0D 20 20 20 20 20 20 20 |R. HOLEN. | 00003550: 20 20 20 20 20 4C 44 41 20 56 45 52 47 4C 54 2C | LDA VERGLT,| 00003560: 59 0D 20 20 20 20 20 20 20 20 20 20 20 20 54 41 |Y. TA| 00003570: 58 0D 20 20 20 20 20 20 20 20 20 20 20 20 49 4E |X. IN| 00003580: 59 0D 20 20 20 20 20 20 20 20 20 20 20 20 4C 44 |Y. LD| 00003590: 41 20 56 45 52 47 4C 54 2C 59 0D 20 20 20 20 20 |A VERGLT,Y. | 000035A0: 20 20 20 20 20 20 20 53 54 59 20 32 0D 20 20 20 | STY 2. | 000035B0: 20 20 20 20 20 20 20 20 20 4A 53 52 20 24 42 44 | JSR $BD| 000035C0: 43 44 20 20 20 20 3B 55 4E 44 20 41 55 53 47 45 |CD ;UND AUSGE| 000035D0: 42 45 4E 0D 0D 20 20 20 20 20 20 20 20 20 20 20 |BEN.. | 000035E0: 20 4C 44 58 20 36 39 0D 20 20 20 20 20 20 20 20 | LDX 69. | 000035F0: 20 20 20 20 4C 44 59 20 23 31 37 0D 20 20 20 20 | LDY #17. | 00003600: 20 20 20 20 20 20 20 20 43 4C 43 0D 20 20 20 20 | CLC. | 00003610: 20 20 20 20 20 20 20 20 4A 53 52 20 24 46 46 46 | JSR $FFF| 00003620: 30 0D 0D 20 20 20 20 20 20 20 20 20 20 20 20 4C |0.. L| 00003630: 44 59 20 32 20 20 20 20 20 20 20 20 20 3B C5 4E |DY 2 ;.N| 00003640: 44 41 44 52 2E 20 48 4F 4C 45 4E 0D 20 20 20 20 |DADR. HOLEN. | 00003650: 20 20 20 20 20 20 20 20 49 4E 59 0D 20 20 20 20 | INY. | 00003660: 20 20 20 20 20 20 20 20 4C 44 41 20 56 45 52 47 | LDA VERG| 00003670: 4C 54 2C 59 0D 20 20 20 20 20 20 20 20 20 20 20 |LT,Y. | 00003680: 20 54 41 58 0D 20 20 20 20 20 20 20 20 20 20 20 | TAX. | 00003690: 20 49 4E 59 0D 20 20 20 20 20 20 20 20 20 20 20 | INY. | 000036A0: 20 4C 44 41 20 56 45 52 47 4C 54 2C 59 0D 20 20 | LDA VERGLT,Y. | 000036B0: 20 20 20 20 20 20 20 20 20 20 49 4E 59 0D 20 20 | INY. | 000036C0: 20 20 20 20 20 20 20 20 20 20 49 4E 59 20 20 20 | INY | 000036D0: 20 20 20 20 20 20 20 20 3B D9 20 41 55 46 20 4E | ;. AUF N| 000036E0: 41 45 43 48 53 54 45 4E 20 CE 41 4D 45 4E 0D 20 |AECHSTEN .AMEN. | 000036F0: 20 20 20 20 20 20 20 20 20 20 20 49 4E 59 0D 20 | INY. | 00003700: 20 20 20 20 20 20 20 20 20 20 20 49 4E 59 0D 20 | INY. | 00003710: 20 20 20 20 20 20 20 20 20 20 20 53 54 59 20 32 | STY 2| 00003720: 0D 20 20 20 20 20 20 20 20 20 20 20 20 4A 53 52 |. JSR| 00003730: 20 24 42 44 43 44 20 20 20 20 20 3B 55 4E 44 20 | $BDCD ;UND | 00003740: 41 55 53 47 45 42 45 4E 0D 0D 20 20 20 20 20 20 |AUSGEBEN.. | 00003750: 20 20 20 20 20 20 4C 44 41 20 23 31 33 20 20 20 | LDA #13 | 00003760: 20 20 20 20 3B 4E 41 45 43 48 53 54 45 20 DA 45 | ;NAECHSTE .E| 00003770: 49 4C 45 0D 20 20 20 20 20 20 20 20 20 20 20 20 |ILE. | 00003780: 4A 53 52 20 24 46 46 44 32 0D 0D 20 20 20 20 20 |JSR $FFD2.. | 00003790: 20 20 20 20 20 20 20 44 45 43 20 33 20 20 20 20 | DEC 3 | 000037A0: 20 20 20 20 20 3B C4 49 52 2E 20 5A 55 45 4E 44 | ;.IR. ZUEND| 000037B0: 45 20 3F 0D 20 20 20 20 20 20 20 20 20 20 20 20 |E ?. | 000037C0: 42 4E 45 20 4C 4F 4F 50 44 31 20 20 20 20 3B 4E |BNE LOOPD1 ;N| 000037D0: 45 49 4E 0D 0D 20 20 20 20 20 20 20 20 20 20 20 |EIN.. | 000037E0: 20 4A 53 52 20 45 49 4E 47 50 43 4C 0D 20 20 20 | JSR EINGPCL. | 000037F0: 20 20 20 20 20 20 20 20 20 4A 4D 50 20 24 41 37 | JMP $A7| 00003800: 41 45 0D 0D 0D 0D 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D |AE....;---------| 00003810: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00003820: 2D 2D 2D 2D 0D 0D 3B A5 20 20 20 20 20 20 20 D5 |----..;. .| 00003830: 4E 54 45 52 50 52 4F 47 52 41 4D 4D 45 20 20 20 |NTERPROGRAMME | 00003840: 20 20 20 A7 0D 0D 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D | ...;---------| 00003850: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00003860: 2D 2D 2D 2D 0D 0D 20 20 20 20 20 20 3B 4E 41 45 |----.. ;NAE| 00003870: 43 48 53 54 45 20 D3 45 49 54 45 0D 0D 0D 3A 4E |CHSTE .EITE...:N| 00003880: 45 58 54 50 41 47 45 0D 20 20 20 20 20 20 20 20 |EXTPAGE. | 00003890: 20 20 20 43 4C 44 0D 20 20 20 20 20 20 20 20 20 | CLD. | 000038A0: 20 20 43 4C 43 0D 20 20 20 20 20 20 20 20 20 20 | CLC. | 000038B0: 20 4C 44 41 20 23 31 0D 20 20 20 20 20 20 20 20 | LDA #1. | 000038C0: 20 20 20 41 44 43 20 36 35 0D 20 20 20 20 20 20 | ADC 65. | 000038D0: 20 20 20 20 20 53 54 41 20 36 35 0D 0D 20 20 20 | STA 65.. | 000038E0: 20 20 20 20 20 20 20 20 4C 44 41 20 23 30 0D 20 | LDA #0. | 000038F0: 20 20 20 20 20 20 20 20 20 20 41 44 43 20 36 36 | ADC 66| 00003900: 0D 20 20 20 20 20 20 20 20 20 20 20 53 54 41 20 |. STA | 00003910: 36 36 0D 0D 0D 0D 0D 20 20 20 20 20 3B C2 45 52 |66..... ;.ER| 00003920: 45 43 48 4E 45 4E 20 44 45 52 20 D2 C1 CD 2D D3 |ECHNEN DER ...-.| 00003930: 45 49 54 45 20 20 28 55 4D 20 49 4E 20 24 44 46 |EITE (UM IN $DF| 00003940: 46 45 2F 24 44 46 46 46 20 5A 55 20 53 43 48 52 |FE/$DFFF ZU SCHR| 00003950: 45 49 42 45 4E 29 0D 0D 0D 3A 53 45 49 54 45 42 |EIBEN)...:SEITEB| 00003960: 45 52 0D 20 20 20 20 20 20 20 20 20 20 20 20 53 |ER. S| 00003970: 54 58 20 24 32 41 31 20 20 3B D8 2C D9 20 53 49 |TX $2A1 ;.,. SI| 00003980: 43 48 45 52 4E 0D 20 20 20 20 20 20 20 20 20 20 |CHERN. | 00003990: 20 20 53 54 59 20 24 32 41 32 0D 0D 0D 20 20 20 | STY $2A2... | 000039A0: 20 20 20 20 20 20 20 20 20 4C 44 59 20 23 30 20 | LDY #0 | 000039B0: 20 20 20 3B 24 42 44 20 4C 4F 45 53 43 48 45 4E | ;$BD LOESCHEN| 000039C0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 53 54 59 |. STY| 000039D0: 20 24 42 44 0D 0D 20 20 20 20 20 20 20 20 20 20 | $BD.. | 000039E0: 20 20 4C 44 41 20 36 35 20 20 20 20 3B 4F 52 49 | LDA 65 ;ORI| 000039F0: 47 2E DA 41 48 4C 20 49 4E 0D 20 20 20 20 20 20 |G..AHL IN. | 00003A00: 20 20 20 20 20 20 53 54 41 20 36 37 20 20 20 20 | STA 67 | 00003A10: 3B D3 50 2E 46 55 45 52 20 55 4D 47 45 57 2E 0D |;.P.FUER UMGEW..| 00003A20: 20 20 20 20 20 20 20 20 20 20 20 20 4C 44 41 20 | LDA | 00003A30: 36 36 20 20 20 20 3B DA 41 48 4C 45 4E 0D 20 20 |66 ;.AHLEN. | 00003A40: 20 20 20 20 20 20 20 20 20 20 53 54 41 20 36 38 | STA 68| 00003A50: 0D 0D 0D 20 20 20 20 20 20 20 20 20 20 20 20 41 |... A| 00003A60: 53 4C 20 36 38 20 20 20 20 3B 35 4D 41 4C 20 4E |SL 68 ;5MAL N| 00003A70: 41 43 48 20 4C 49 4E 4B 53 0D 20 20 20 20 20 20 |ACH LINKS. | 00003A80: 20 20 20 20 20 20 41 53 4C 20 36 38 20 20 20 20 | ASL 68 | 00003A90: 3B 56 45 52 53 43 48 49 45 42 45 4E 0D 20 20 20 |;VERSCHIEBEN. | 00003AA0: 20 20 20 20 20 20 20 20 20 41 53 4C 20 36 38 20 | ASL 68 | 00003AB0: 20 20 20 3B 28 25 30 30 30 30 20 30 31 31 31 20 | ;(%0000 0111 | 00003AC0: 2D 3E 0D 20 20 20 20 20 20 20 20 20 20 20 20 41 |->. A| 00003AD0: 53 4C 20 36 38 20 20 20 20 3B 20 25 31 31 31 30 |SL 68 ; %1110| 00003AE0: 20 30 30 30 30 20 29 0D 20 20 20 20 20 20 20 20 | 0000 ). | 00003AF0: 20 20 20 20 41 53 4C 20 36 38 0D 20 20 20 20 20 | ASL 68. | 00003B00: 20 20 20 20 20 20 20 53 54 41 20 36 38 0D 0D 20 | STA 68.. | 00003B10: 20 20 20 20 20 20 20 20 20 20 20 41 53 4C 20 36 | ASL 6| 00003B20: 37 0D 20 20 20 20 20 20 20 20 20 20 20 20 52 4F |7. RO| 00003B30: 4C 20 24 42 44 20 20 20 3B C3 41 52 52 59 20 2D |L $BD ;.ARRY -| 00003B40: 3E 20 24 42 44 0D 0D 20 20 20 20 20 20 20 20 20 |> $BD.. | 00003B50: 20 20 20 41 53 4C 20 36 37 0D 20 20 20 20 20 20 | ASL 67. | 00003B60: 20 20 20 20 20 20 52 4F 4C 20 24 42 44 20 20 20 | ROL $BD | 00003B70: 3B 20 20 20 20 2D 22 2D 0D 0D 20 20 20 20 20 20 |; -"-.. | 00003B80: 20 20 20 20 20 20 4C 53 52 20 36 37 20 20 20 20 | LSR 67 | 00003B90: 3B 4C 4F 57 20 5A 55 52 55 45 43 4B 0D 20 20 20 |;LOW ZURUECK. | 00003BA0: 20 20 20 20 20 20 20 20 20 4C 53 52 20 36 37 0D | LSR 67.| 00003BB0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 43 4C 43 |. CLC| 00003BC0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 41 53 4C |. ASL| 00003BD0: 20 24 42 44 0D 20 20 20 20 20 20 20 20 20 20 20 | $BD. | 00003BE0: 20 41 53 4C 20 24 42 44 0D 20 20 20 20 20 20 20 | ASL $BD. | 00003BF0: 20 20 20 20 20 41 53 4C 20 24 42 44 0D 0D 20 20 | ASL $BD.. | 00003C00: 20 20 20 20 20 20 20 20 20 20 4C 44 41 20 24 42 | LDA $B| 00003C10: 44 0D 20 20 20 20 20 20 20 20 20 20 20 20 4F 52 |D. OR| 00003C20: 41 20 36 38 0D 20 20 20 20 20 20 20 20 20 20 20 |A 68. | 00003C30: 20 53 54 41 20 36 38 0D 0D 20 20 20 20 20 20 20 | STA 68.. | 00003C40: 20 20 20 20 20 4C 44 58 20 24 32 41 31 0D 20 20 | LDX $2A1. | 00003C50: 20 20 20 20 20 20 20 20 20 20 4C 44 59 20 24 32 | LDY $2| 00003C60: 41 32 0D 0D 20 20 20 20 20 20 20 20 20 20 20 20 |A2.. | 00003C70: 52 54 53 0D 0D 0D 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D |RTS...;---------| 00003C80: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00003C90: 2D 2D 2D 2D 0D 0D 3B 20 20 C5 49 4E 47 41 42 45 |----..; .INGABE| 00003CA0: 50 55 46 46 45 52 20 4C 4F 45 53 43 48 45 4E 0D |PUFFER LOESCHEN.| 00003CB0: 0D 3A 45 49 4E 47 50 43 4C 0D 20 20 20 20 20 20 |.:EINGPCL. | 00003CC0: 20 20 20 20 20 20 4C 44 58 20 23 35 38 20 3B C5 | LDX #58 ;.| 00003CD0: 49 4E 47 2E 50 55 46 46 45 52 20 4C 4F 45 53 43 |ING.PUFFER LOESC| 00003CE0: 48 45 4E 0D 20 20 20 3A 4C 4F 4F 50 4C 20 20 20 |HEN. :LOOPL | 00003CF0: 4C 44 41 20 23 30 0D 20 20 20 20 20 20 20 20 20 |LDA #0. | 00003D00: 20 20 20 53 54 41 20 24 32 30 30 2C 58 0D 20 20 | STA $200,X. | 00003D10: 20 20 20 20 20 20 20 20 20 20 44 45 58 0D 20 20 | DEX. | 00003D20: 20 20 20 20 20 20 20 20 20 20 42 4E 45 20 4C 4F | BNE LO| 00003D30: 4F 50 4C 0D 0D 20 20 20 20 20 20 20 20 20 20 20 |OPL.. | 00003D40: 20 52 54 53 0D 0D 0D 0D 3B 2D 2D 2D 2D 2D 2D 2D | RTS....;-------| 00003D50: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00003D60: 2D 2D 2D 2D 2D 2D 0D 0D 3B A5 20 20 20 20 20 D4 |------..;. .| 00003D70: 45 58 54 45 20 55 4E 44 20 C4 41 54 45 4E 20 20 |EXTE UND .ATEN | 00003D80: 20 20 20 20 20 A7 0D 0D 3B 2D 2D 2D 2D 2D 2D 2D | ...;-------| 00003D90: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00003DA0: 2D 2D 2D 2D 2D 2D 0D 0D 3B 2D 2D 2D 2D 2D 2D 2D |------..;-------| 00003DB0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00003DC0: 2D 2D 2D 2D 2D 0D 0D 3B A5 20 20 20 20 20 20 C2 |-----..;. .| 00003DD0: C1 D3 C9 C3 2D C2 45 46 45 48 4C 45 20 20 20 20 |....-.EFEHLE | 00003DE0: 20 20 20 A7 0D 0D 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D | ...;---------| 00003DF0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00003E00: 2D 2D 2D 0D 0D 3A 42 4C 49 53 54 45 20 20 20 20 |---..:BLISTE | 00003E10: 20 42 20 27 53 2C 27 4C 2C 27 46 2C 27 54 2C 27 | B 'S,'L,'F,'T,'| 00003E20: 4E 0D 0D 3A 41 44 52 4C 49 53 54 20 20 20 20 57 |N..:ADRLIST W| 00003E30: 20 53 43 48 52 45 49 42 45 4E 2C 4C 45 53 45 4E | SCHREIBEN,LESEN| 00003E40: 2C 46 55 45 4C 4C 45 4E 2C 54 41 55 53 43 48 45 |,FUELLEN,TAUSCHE| 00003E50: 4E 2C 52 45 4E 41 4D 45 0D 0D 0D 0D 3B 2D 2D 2D |N,RENAME....;---| 00003E60: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00003E70: 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0D 3B A5 20 C4 41 |---------..;. .A| 00003E80: 54 45 4E 20 46 55 45 52 20 CD 4F 44 49 46 49 5A |TEN FUER .ODIFIZ| 00003E90: 49 45 52 55 4E 47 20 A7 0D 0D 3B 2D 2D 2D 2D 2D |IERUNG ...;-----| 00003EA0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00003EB0: 2D 2D 2D 2D 2D 2D 2D 0D 0D 3A 4D 4F 44 53 0D 20 |-------..:MODS. | 00003EC0: 20 20 20 20 20 20 20 20 4C 44 41 20 28 36 31 29 | LDA (61)| 00003ED0: 2C 59 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |,Y. STA | 00003EE0: 24 44 45 30 30 2C 58 0D 20 20 20 20 20 20 20 20 |$DE00,X. | 00003EF0: 20 4E 4F 50 0D 20 20 20 20 20 20 20 20 20 4E 4F | NOP. NO| 00003F00: 50 0D 20 20 20 20 20 20 20 20 20 4E 4F 50 0D 20 |P. NOP. | 00003F10: 20 20 20 20 20 20 20 20 4E 4F 50 0D 20 20 20 20 | NOP. | 00003F20: 20 20 20 20 20 4E 4F 50 0D 20 20 20 20 20 20 20 | NOP. | 00003F30: 20 20 4E 4F 50 0D 20 20 20 20 20 20 20 20 20 4E | NOP. N| 00003F40: 4F 50 0D 20 20 20 20 20 20 20 20 20 4E 4F 50 0D |OP. NOP.| 00003F50: 20 20 20 20 20 20 20 20 20 4E 4F 50 0D 0D 20 20 | NOP.. | 00003F60: 20 20 20 20 20 20 20 4C 44 41 20 36 31 0D 3A 53 | LDA 61.:S| 00003F70: 36 32 20 20 20 20 20 42 20 36 32 0D 0D 3B 2D 2D |62 B 62..;--| 00003F80: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D |---------------.| 00003F90: 0D 3A 4D 4F 44 4C 0D 20 20 20 20 20 20 20 20 20 |.:MODL. | 00003FA0: 4C 44 41 20 24 44 45 30 30 2C 58 0D 20 20 20 20 |LDA $DE00,X. | 00003FB0: 20 20 20 20 20 53 54 41 20 28 36 31 29 2C 59 0D | STA (61),Y.| 00003FC0: 20 20 20 20 20 20 20 20 20 4E 4F 50 0D 20 20 20 | NOP. | 00003FD0: 20 20 20 20 20 20 4E 4F 50 0D 20 20 20 20 20 20 | NOP. | 00003FE0: 20 20 20 4E 4F 50 0D 20 20 20 20 20 20 20 20 20 | NOP. | 00003FF0: 4E 4F 50 0D 20 20 20 20 20 20 20 20 20 4E 4F 50 |NOP. NOP| 00004000: 0D 20 20 20 20 20 20 20 20 20 4E 4F 50 0D 20 20 |. NOP. | 00004010: 20 20 20 20 20 20 20 4E 4F 50 0D 20 20 20 20 20 | NOP. | 00004020: 20 20 20 20 4E 4F 50 0D 20 20 20 20 20 20 20 20 | NOP. | 00004030: 20 4E 4F 50 0D 0D 0D 20 20 20 20 20 20 20 20 20 | NOP... | 00004040: 4C 44 41 20 36 31 0D 3A 4C 36 32 20 20 20 20 20 |LDA 61.:L62 | 00004050: 42 20 36 32 0D 0D 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D |B 62..;---------| 00004060: 2D 2D 2D 2D 2D 2D 2D 2D 0D 0D 3A 4D 4F 44 46 0D |--------..:MODF.| 00004070: 20 20 20 20 20 20 20 20 20 4C 44 41 20 33 0D 20 | LDA 3. | 00004080: 20 20 20 20 20 20 20 20 53 54 41 20 24 44 45 30 | STA $DE0| 00004090: 30 2C 58 0D 20 20 20 20 20 20 20 20 20 4E 4F 50 |0,X. NOP| 000040A0: 0D 20 20 20 20 20 20 20 20 20 4E 4F 50 0D 20 20 |. NOP. | 000040B0: 20 20 20 20 20 20 20 4E 4F 50 0D 20 20 20 20 20 | NOP. | 000040C0: 20 20 20 20 4E 4F 50 0D 20 20 20 20 20 20 20 20 | NOP. | 000040D0: 20 4E 4F 50 0D 20 20 20 20 20 20 20 20 20 4E 4F | NOP. NO| 000040E0: 50 0D 20 20 20 20 20 20 20 20 20 4E 4F 50 0D 20 |P. NOP. | 000040F0: 20 20 20 20 20 20 20 20 4E 4F 50 0D 20 20 20 20 | NOP. | 00004100: 20 20 20 20 20 4E 4F 50 0D 0D 20 20 20 20 20 20 | NOP.. | 00004110: 20 20 20 4C 44 41 20 36 35 0D 3A 46 36 36 20 20 | LDA 65.:F66 | 00004120: 20 20 20 42 20 36 36 0D 0D 3B 2D 2D 2D 2D 2D 2D | B 66..;------| 00004130: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0D 3A 4D 4F |-----------..:MO| 00004140: 44 54 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 |DT. LDA | 00004150: 28 36 31 29 2C 59 0D 20 20 20 20 20 20 20 20 20 |(61),Y. | 00004160: 53 54 41 20 33 0D 20 20 20 20 20 20 20 20 20 4C |STA 3. L| 00004170: 44 41 20 24 44 45 30 30 2C 58 0D 20 20 20 20 20 |DA $DE00,X. | 00004180: 20 20 20 20 53 54 41 20 28 36 31 29 2C 59 0D 20 | STA (61),Y. | 00004190: 20 20 20 20 20 20 20 20 4C 44 41 20 33 0D 20 20 | LDA 3. | 000041A0: 20 20 20 20 20 20 20 53 54 41 20 24 44 45 30 30 | STA $DE00| 000041B0: 2C 58 0D 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |,X.. LDA| 000041C0: 20 36 31 0D 3A 54 36 32 20 20 20 20 20 42 20 36 | 61.:T62 B 6| 000041D0: 32 0D 0D 0D 0D 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |2....;----------| 000041E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 000041F0: 2D 2D 0D 0D 3B A5 20 20 C6 49 4C 45 4E 41 4D 45 |--..;. .ILENAME| 00004200: 4E 20 55 4E 44 20 C1 44 52 45 53 53 45 4E 20 20 |N UND .DRESSEN | 00004210: A7 0D 0D 3B A5 20 20 20 20 20 20 C4 49 52 45 43 |...;. .IREC| 00004220: 54 4F 52 59 20 20 20 20 20 20 20 20 20 20 20 A7 |TORY .| 00004230: 0D 3B 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.;--------------| 00004240: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 0D |--------------..| 00004250: 0D 3A 54 45 58 54 54 20 20 20 20 42 20 30 2C 30 |.:TEXTT B 0,0| 00004260: 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 20 20 |,0,0,0,0,0,0,0 | 00004270: 3B 56 4F 4E 20 D0 52 4F 47 52 41 4D 4D 20 47 45 |;VON .ROGRAMM GE| 00004280: 41 45 4E 44 45 52 54 2D 41 4B 54 55 45 4C 4C 45 |AENDERT-AKTUELLE| 00004290: 52 20 C6 49 4C 45 4E 41 4D 45 0D 0D 3A 47 45 46 |R .ILENAME..:GEF| 000042A0: 54 20 20 20 20 20 42 20 22 20 20 2D 20 47 45 46 |T B " - GEF| 000042B0: 55 4E 44 45 4E 20 22 2C 31 33 2C 30 0D 0D 3A 4E |UNDEN ",13,0..:N| 000042C0: 49 43 48 54 54 20 20 20 42 20 22 20 20 2D 20 4E |ICHTT B " - N| 000042D0: 49 43 48 54 20 47 45 46 55 4E 44 45 4E 20 22 2C |ICHT GEFUNDEN ",| 000042E0: 30 0D 0D 3A 56 45 52 47 4C 54 0D 20 20 20 20 20 |0..:VERGLT. | 000042F0: 20 20 20 20 20 42 20 30 0D 20 20 3B 31 2E C6 49 | B 0. ;1..I| 00004300: 4C 45 0D 20 20 20 20 20 20 20 20 20 20 42 20 27 |LE. B '| 00004310: 31 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 20 |1,0,0,0,0,0,0,0 | 00004320: 20 20 3B C6 49 4C 45 4E 41 4D 45 20 28 20 3D 3C | ;.ILENAME ( =<| 00004330: 20 38 20 C2 55 43 48 53 54 2E 29 0D 0D 20 20 20 | 8 .UCHST.).. | 00004340: 20 20 20 20 20 20 20 42 20 30 2C 32 35 35 20 20 | B 0,255 | 00004350: 20 20 3B C5 4E 44 4B 45 4E 4E 5A 45 49 43 48 45 | ;.NDKENNZEICHE| 00004360: 4E 0D 0D 20 20 20 20 20 20 20 20 20 20 42 20 30 |N.. B 0| 00004370: 2C 30 20 20 20 20 3B D3 54 41 52 54 41 44 52 45 |,0 ;.TARTADRE| 00004380: 53 53 45 0D 0D 20 20 20 20 20 20 20 20 20 20 42 |SSE.. B| 00004390: 20 30 2C 30 20 20 20 20 3B C5 4E 44 41 44 52 45 | 0,0 ;.NDADRE| 000043A0: 53 53 45 0D 0D 20 20 20 20 20 20 20 20 20 20 42 |SSE.. B| 000043B0: 20 30 2C 30 20 20 20 20 3B C1 4E 46 41 4E 47 53 | 0,0 ;.NFANGS| 000043C0: 53 45 49 54 45 20 28 46 45 53 54 29 0D 20 20 3B |SEITE (FEST). ;| 000043D0: 32 2E C6 49 4C 45 0D 20 20 20 20 20 20 20 20 20 |2..ILE. | 000043E0: 20 42 20 30 2C 27 32 2C 30 2C 30 2C 30 2C 30 2C | B 0,'2,0,0,0,0,| 000043F0: 30 2C 30 2C 30 2C 30 2C 32 35 35 0D 0D 20 20 20 |0,0,0,0,255.. | 00004400: 20 20 20 20 20 20 20 42 20 30 2C 30 2C 30 2C 30 | B 0,0,0,0| 00004410: 0D 0D 20 20 20 20 20 20 20 20 20 20 42 20 30 2C |.. B 0,| 00004420: 31 20 20 20 20 3B 32 35 36 0D 20 20 3B 33 2E C6 |1 ;256. ;3..| 00004430: 49 4C 45 0D 20 20 20 20 20 20 20 20 20 20 42 20 |ILE. B | 00004440: 30 2C 27 33 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 |0,'3,0,0,0,0,0,0| 00004450: 2C 30 2C 30 2C 32 35 35 0D 0D 20 20 20 20 20 20 |,0,0,255.. | 00004460: 20 20 20 20 42 20 30 2C 30 2C 30 2C 30 0D 0D 20 | B 0,0,0,0.. | 00004470: 20 20 20 20 20 20 20 20 20 42 20 30 2C 32 20 20 | B 0,2 | 00004480: 20 20 3B 35 31 32 0D 20 20 3B 34 2E C6 49 4C 45 | ;512. ;4..ILE| 00004490: 0D 20 20 20 20 20 20 20 20 20 20 42 20 30 2C 27 |. B 0,'| 000044A0: 34 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C |4,0,0,0,0,0,0,0,| 000044B0: 30 2C 32 35 35 0D 0D 20 20 20 20 20 20 20 20 20 |0,255.. | 000044C0: 20 42 20 30 2C 30 2C 30 2C 30 0D 0D 20 20 20 20 | B 0,0,0,0.. | 000044D0: 20 20 20 20 20 20 42 20 30 2C 33 0D 20 20 3B 35 | B 0,3. ;5| 000044E0: 2E C6 49 4C 45 0D 20 20 20 20 20 20 20 20 20 20 |..ILE. | 000044F0: 42 20 30 2C 27 35 2C 30 2C 30 2C 30 2C 30 2C 30 |B 0,'5,0,0,0,0,0| 00004500: 2C 30 2C 30 2C 30 2C 32 35 35 0D 0D 20 20 20 20 |,0,0,0,255.. | 00004510: 20 20 20 20 20 20 42 20 30 2C 30 2C 30 2C 30 0D | B 0,0,0,0.| 00004520: 0D 20 20 20 20 20 20 20 20 20 20 42 20 30 2C 34 |. B 0,4| 00004530: 0D 20 20 3B 36 2E C6 49 4C 45 0D 20 20 20 20 20 |. ;6..ILE. | 00004540: 20 20 20 20 20 42 20 30 2C 27 36 2C 30 2C 30 2C | B 0,'6,0,0,| 00004550: 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 32 35 35 0D |0,0,0,0,0,0,255.| 00004560: 0D 20 20 20 20 20 20 20 20 20 20 42 20 30 2C 30 |. B 0,0| 00004570: 2C 30 2C 30 0D 0D 20 20 20 20 20 20 20 20 20 20 |,0,0.. | 00004580: 42 20 30 2C 35 0D 20 20 3B 37 2E C6 49 4C 45 0D |B 0,5. ;7..ILE.| 00004590: 20 20 20 20 20 20 20 20 20 20 42 20 30 2C 27 37 | B 0,'7| 000045A0: 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 |,0,0,0,0,0,0,0,0| 000045B0: 2C 32 35 35 0D 0D 20 20 20 20 20 20 20 20 20 20 |,255.. | 000045C0: 42 20 30 2C 30 2C 30 2C 30 0D 0D 20 20 20 20 20 |B 0,0,0,0.. | 000045D0: 20 20 20 20 20 42 20 30 2C 36 0D 20 20 3B 38 2E | B 0,6. ;8.| 000045E0: C6 49 4C 45 0D 20 20 20 20 20 20 20 20 20 20 42 |.ILE. B| 000045F0: 20 30 2C 27 38 2C 30 2C 30 2C 30 2C 30 2C 30 2C | 0,'8,0,0,0,0,0,| 00004600: 30 2C 30 2C 30 2C 32 35 35 0D 0D 20 20 20 20 20 |0,0,0,255.. | 00004610: 20 20 20 20 20 42 20 30 2C 30 2C 30 2C 30 0D 0D | B 0,0,0,0..| 00004620: 20 20 20 20 20 20 20 20 20 20 42 20 30 2C 37 20 | B 0,7 | 00004630: 20 20 20 20 20 3B 42 49 53 20 32 30 34 37 0D 0D | ;BIS 2047..| 00004640: 0D 3A 4C 45 54 5A 54 45 20 20 20 42 20 30 2C 32 |.:LETZTE B 0,2| 00004650: 35 35 0D 0D 0D 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |55...;**********| 00004660: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00004670: 2A 2A 2A 2A 2A 2A 2A 2A 0D 3B 2A 2A 2A 2A 2A 2A |********.;******| 00004680: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00004690: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 0D 3B 2A 2A |************.;**| 000046A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000046B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000046C0: 0D 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.;**************| 000046D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000046E0: 2A 2A 2A 2A 0D 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****.;**********| 000046F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00004700: 2A 2A 2A 2A 2A 2A 2A 2A 0D 0D 0D 0D 0D 20 |********..... |
..;**********************************..;
* RAM - ERWEITERUNG *..;***
*******************************...; * BE
DIENUNG :..; - RL ANF.ADR,ENDADR,"
NAME" ->LADEN AUS RAM AN ADRESSE(INH.VON
DATEI )..; - RS ANF.ADR,ENDADR,"N
AME" ->SPEICHERN VON ADRESSE IN RAM IN D
ATEI..; - RF "NAME",FUELLZEICHEN
->FUELLEN VON DATEI MIT FUELLZEICHEN..;
- RN "ALTER NAME","NEUER N"->NAME
AENDERN..; - R$
->ALLE DATEINAMEN U. ADRESSEN AUFLI
STEN..; * BENUTZTE ZWISCHENSPEICHER :..;
- VON : 61,62 (ADR.).;
- BIS : 63,64 (ADR OD ENDS.).;
- ANF.S. : 65,66 (ORIGINAL).;
67,68 (UMGEWANDELT).;
- MODUS : GLEICH VERZWEIGT..;
- FUELLZ. : 61 (IN ASCII).;
- VON : 65,66 (SEITE)..;
- SP.ST.1 : $2F1 (SPEICHERKONFIGURAT
ION VOR AUFRUF)..; - ZW.SP. : 2,
3,$B6,$BD,$2F0..;***********************
*********...:KOMMA = $AEFD ;AUF KO
MMA TESTEN.:GETADR = $AD8A ;16-BIT-
ZAHL IN FAC.:ADRINT = $B7F7 ;ZAHL I
N Y/A ($14/15)..:GETZAH = $B79B ;8-
BIT-ZAHL NACH X..:INTOUT = $BDCD ;1
6-BIT-ZAHL AUSGEBEN..:CHRGET = $73
;Z. AUS BASIC-TEXT...;----------------
------------..;. MAKROS
...;----------------------------..:STR
OUT M 1.. LDA #<@0. LDY #
>@0. JSR $AB1E./...;--------------
---------------..;. PROGRAMMANFANG
...;-----------------------------.
. ;INITIALISIERUNG DER NEUEN.. ;
BASIC-BEFEHLE... ORG 3970
0.. LDA #<ERW. LDX
#>ERW. STA $308.
STX $309.. JMP $E18D ;OK A
USGEBEN... ;----------------------------
.. ;BASIC-ERWEITERUNG..:ERW.
LDA $7A ;CHRGET-ZEIGER.
LDX $7B ;SICHERN. STA 2
. STX 3... ;1.BUCHSTABE.
JSR CHRGET.. CMP #'R
;1.Z. = R ?. BEQ WB..
JMP INTERPR. :WB. J
SR CHRGET ;2.ZEICHEN UEBERSPRINGEN..
CMP #'$. BNE WZ..
JMP DIRECTORY.. :WZ.
JSR CHRGET ;3.ZEICHEN = "..
STA $BD ;FUER SPAETERE ABFR
AGE. CMP #'" ;NUR FILENA
ME ?. BNE ANFADR...
JMP FILENAME2.. ;-----------------
------... ;ANFANGSADR. HOLEN.:ANFA
DR. JSR GETADR ;ANF..
JSR ADRINT ;->Y/A.. S
TY 61 ;LOW ZWISCHENSPEICHER (ZW.S
P.). STA 62 ;HIGH... ;
ENDADR. HOLEN.. JSR KOMMA..
JSR GETADR. JSR ADR
INT.. STY 63 ;LOW Z
W.SP.. STA 64 ;HIGH..
INC 63 ;AUF GRUND DER SC
HLEIFEN-. CLD ;FORM
(LETZE ADRESSE WIRD. LDA #0
;SONST NICHT UEBERNOMMEN).
ADC 64. STA 64... ;---
----------------------...:FILENAME.
JSR CHRGET ;ANFUEHRUNGSZEICHEN V
ORH... CMP #'". BE
Q FILENAME2.. JMP $A7AE ;PR
OVOZIERT SYNTAX ERROR..:FILENAME2.
LDY #8 ;TEXTT LOESCHEN. :LC
. LDA #0. STA TEXT
T,Y. DEY. BPL LC..
:NEXTB. LDY #0. :LOOPB.
STY $B6 ;ZW.SP...
JSR CHRGET ;NAME ZUENDE ?.
CMP #'". BNE WB1..
LDA #0 ;JA. STA T
EXTT,Y. JMP ENDEB. :WB1.
STA TEXTT,Y.. LDY $B
6. INY. CPY #7.
BNE LOOPB.. :ENDEB.
STROUT TEXTT..;-----------------------
----.. ; VERGLEICH... LD
A #0. STA $2F0 ;ZAEHLER DE
R WIEVIELTE EINTRAG NAME IST.
; FUER SPAETERE RECHNUNG) -
EINTRAGZAEHLER. LDX #<VERGLT
. LDA #>VERGLT ;ANFANG DES DI
REKTORY (DIR.). STX $9E.
STA $9F.. LDY #1. :V
GL. LDX #0. INC $2
F0. :LOOPV. LDA VERGLT,Y ;
VERGLEICH. CMP TEXTT,X.
BNE NVGL.. INY
;EINGETRAGENER NAME ZUENDE ?.
LDA VERGLT,Y. BEQ GLEICH
; JA.. :WV. INX
;EINGEGEBENER NAME ZUENDE ?.
LDA TEXTT,X. BEQ NVGL ;
JA.. JMP LOOPV.. ;------
------.. :NVGL. :LOOPN. INY
;Y BIS ENDE DES NAMEN ZAEHLEN.
LDA VERGLT,Y. CMP
#255. BNE LOOPN.. :ENDETEST.
TYA ;ZEIGER AUF NAE
CHSTEN NAMEN. CLC.
CLD. ADC #8. TAY.
LDA VERGLT,Y. CMP
#255 ;DIR. ZUENDE. BEQ
NICHTGEF.. JMP VGL..
;------------..:GLEICH. INX
;EINGEGEBENER NAME AUCH ZUENDE
? =>GLEICH NAME IM DIR. LDA T
EXTT,X. BEQ GEF ; JA..
JMP NVGL ;NAECHSTER NAME
..:GEF. LDY $2F0. :LADR.
LDA #11. CLC.
CLD. ADC $9E ;ZEIGE
R AUF ANF.ADR. DES FILES MIT ENTSPR. NAM
EN. STA $9E.. LDA
#0. ADC $9F ;UEBERLAUF AD
D.. STA $9F.. DEY.
BEQ WGEF.. LDA #6
. CLC. CLD.
ADC $9E ;ZEIGER AUF NAECHSTEN N
AME. STA $9E.. LDA
#0. ADC $9F ;UEBERLAUF A
DD.. STA $9F.. JMP
LADR ;SOLANGE BIS EINTRAGZAEHLER =0.
.. :WGEF ;NAME GEFUN
DEN. STROUT GEFT..
LDA $BD. CMP #'" ;ALTE OD
ER. BEQ ALTEW ;NEUE WERTE..
JMP WERTES... ;------
-------..:NICHTGEF ;NAM
E NICHT GEFUNDEN. STROUT NICH
TT.. JSR CHRGET. J
MP $A7AE....;---------------------------
----...:WERTES.. ;WERTE SICHERN (
IN DIR. SCHREIBEN)... LDY #0
;ANF.ADR.,ENDADR.. :LOOPWSI.
LDA 61,Y. STA ($9E),Y.
INY. CPY #4.
BNE LOOPWSI.. ;WEITER DA SEIT
E NOCH UEBERNOMMEN. ; WERDEN
MUSS... ;-----------------------..
;WERTE AUS DIR. UEBERNEHMEN..:ALTEW.
LDY #0. :LOOPWS. L
DA ($9E),Y. STA 61,Y.
INY. CPY #6. B
NE LOOPWS.. ;-----------------------
-..:BEFEHLSTEST.. LDA 2
;CHRGET-ZEIGER HOLEN. LDX 3.
STA $7A. STX $7B.
. JSR CHRGET ;1.ZEICHEN U
EBERSPRINGEN ( "R" ).. JSR CH
RGET. STA $B6.. LD
Y #0 ;ZAEHLER.:LOOPCHECK.
LDA $B6. CMP BLISTE,Y.
BEQ WEITERCH.. INY.
CPY #5 ;ANZAHL DER BEFEH
LE. BNE LOOPCHECK..
JMP INTERPR ;WENN NICHT GEFUNDEN ZU
INTERPRETER.. :WEITERCH. T
YA. ASL ;*2. T
AY ;DA ADR. 2 BYTE.. LDA
ADRLIST,Y. STA JUMP+1.
LDA ADRLIST+1,Y. STA JUM
P+2..:JUMP JMP $FFFF ;WIRD MODI
FIZIERT (ADRESSE DES ENTSPRECHENDEN.
; PROGRAMMTEILES..
:INTERPR LDA 2. LDX 3.
STA $7A. STX $7B..
JMP $A7E4 ;ZU NORMAL INTER-.
; PRETERROUTINE...
.;---------------------------..;. MODIFI
ZIERUNGSROUTINEN ...;------------------
---------...:FUELLEN. JSR CHR
GET ;1. " UEBERSPRINGEN.. :LG.
JSR CHRGET ;2. ANF.Z. SUCHEN
, DA ZEIGER ZURUECKGEST.WURDEN.
CMP #'". BNE LG..
JSR CHRGET. CMP #', ;
ZAHL NACH NAMEN ?. BNE NULL
; WENN NICHT MIT 0 FUELLEN..
JSR GETZAH ;8-BIT-ZAHL HOLEN.
STX 3. JMP MODIF..
:NULL. LDX #0. S
TX 3..:MODIF. LDY #0.:LOOPMF.
LDA MODF,Y ;KOP. LDA 3.
STA MOD1,Y ; STA $DE00,X.
INY. CPY #16.
BNE LOOPMF.. LDA F66.
STA MOD3+1...;SEITEN DIE GEF
UELLT WERDEN SOLLEN HOLEN.. L
DY #4 ;ZEIGER AUF SEITE-LOW.
LDA ($9E),Y. STA 65
;IN ENTSPR. STELLE SCHREIBEN.
INY. LDA ($9E),Y ;SEITE-HIG
H. STA 66.. LDA 66
. CMP #7 ;8.PROGRAMM ? (
BIS SEITE 2047- DA LETZTER EINTRAG).
BEQ P8 ;ANF.S. $700...
LDY #21 ;ANFANGSSEITE DES NA
ECHSTEN PROGRAMMES HOLEN. LDA
($9E),Y ; BIS ZU DER SEITE-1 FUELLEN.
STA 63. INY.
LDA ($9E),Y. STA 64.
JMP ENDEF.. :P8.
LDA #<2047 ;ENDSEITE FILE 8.
STA 63. LDA #>2047.
STA 64.. :ENDEF. JSR
EINGPCL. JMP START ;ZU AU
SFUEHRENDEN PROGRAMMTEIL..;-------------
------------------..:SCHREIBEN.
LDY #0.:LOOPMS. LDA MODS,Y
;KOP. LDA (61),Y. STA MOD1
,Y ; STA $DE00,X. INY
; LDA 61. CPY #16
. BNE LOOPMS.. LDA
S62. STA MOD3+1..
JSR EINGPCL.. JMP START..;--
-----------------------------...:LESEN.
LDY #0.:LOOPML. LD
A MODL,Y ;KOP. LDA $DE00,X.
STA MOD1,Y ; STA (61),Y.
INY ; LDA 61.
CPY #16. BNE LOOPML..
LDA L62. STA MOD3+1..
JSR EINGPCL.. JMP ST
ART..;-------------------------------..:
TAUSCHEN. LDY #0.:LOOPMT.
LDA MODT,Y ;KOP. LDA (61),Y.
STA MOD1,Y ; STA 3.
INY ; ....
CPY #16. BNE LOOPMT..
LDA T62. STA MOD3+1..
JMP START...;-----------------
-------..;. RAM-ERWEITERUNG ...;.
1) BESCHREIBEN ...;. 2) LESEN
...;. 3) FUELLEN ...;--
----------------------....:START.
SEI. LDA 1. S
TA $2F1. AND #%11111110 ;BA
SIC-ROM AUF RAM. STA 1...
;SEITE BERECHNEN ( DA IN $DFFE BIT 0-5.
; (UND IN $DFFF BIT
3-7 BENUTZT WIRD)... JSR SEIT
EBER.. ;SEITE BESCHREIBEN..:COPYS.
LDX 67. LDY 68.
STX $DFFE. STY $DFFF..
LDX #0 ;ZAEHLER OB SEITE.
;VOLL.:LOOPSC.
STX 2.. LDY #0
; .LESEN .FUELLEN. :MOD1.
LDA (61),Y ; .LDA $DE00,X .
LDA 61. STA $DE00,X ; .STA (
61),Y .STA DE00,X. NOP.
NOP. NOP.
NOP. NOP. NOP.
NOP. NOP.
NOP. :MOD2. LDA 61
;FUER FUELLEN -> LDA 65. CMP
63. BNE WEITERS. :MOD3.
LDA 62 ; -"- -> LD
A 66. CMP 64. BNE
WEITERS.. JMP RENDES ;WENN
GLEICH -> ENDE.. :WEITERS. CL
D. CLC. LDA #1.
ADC 61. STA 61..
LDA #0. ADC 62.
STA 62... LDX 2.
INX. BNE LOOPSC.. ;NAE
CHSTE SEITE BERECHNEN.. JSR N
EXTPAGE..:MOUT. JMP COPYS..:R
ENDES. LDA $2F1 ;ALTE SPE
ICHERKONF.. STA 1.
CLI.. LDY #0 ;AUF SEIT
E 0 -> LETZTE SEITE UEBERNOMMEN.
STY $DFFE. STY $DFFF...
JMP $A7AE ;ZUR INTERPR.-.
; SCHLEIFE...;-
----------------------------..;.
RENAME ...;-----------------
------------...:RENAME.. ;ZEIGER $9E AU
F ANFANG FILENAME SETZEN... L
DA $9E. SEC. CLD.
SBC #10. STA $9E..
LDA $9F. SBC #0.
STA $9F.. JSR CHRG
ET ;1.". :LGR. JSR CHR
GET ;2. ANF.Z. SUCHN , DA ZEIGER ZURUE
CKGEST.WURDEN. CMP #'".
BNE LGR.. JSR CHRGET.
JSR KOMMA.. JSR $79
;VOR NEUEN NAMEN ". CMP
#'". BEQ WR.. JMP
$A7AE ;WENN NICHT -> PROVOZIERT SYNT
AX ERROR.. :WR. LDY #0
;NEUEN NAMEN HOLEN. :LOOPR.
JSR CHRGET. CMP #'".
BEQ ENDER.. STA ($9
E),Y ;UND SCHREIBEN. INY.
CPY #8. BNE LOOPR..:
ENDER. LDA #0 ;ENDKENNZ
EICHEN. STA ($9E),Y..
JSR EINGPCL.. JMP $A7AE..
.;-----------------------------..;.
DIRECTORY ...;--------------
---------------...:DIRECTORY.
LDX #<VERGLT ;ANF.ADR. DIR..
LDA #>VERGLT. STX $9E.
STA $9F.. LDY #1
;ZAEHLER FUER ADRESSE. LD
X #8 ;ZAEHLER FUER EINTRAEGE (DI
R. ZUENDE?). STY 2.
STX 3.. :LOOPD1. SEC.
JSR $FFF0 ;CURSORPOS. HOLEN.
STX 69. LDY #0..
CLC. JSR $FFF0 ; -"
- SETZEN.. LDY 2. :LOOPD2
. LDA ($9E),Y ;FILENAME AUSG
EBEN. CMP #0. BEQ
NEXTN.. JSR $FFD2..
INY.. JMP LOOPD2... :NEXT
N. LDY 2. :LOOPDN.
INY ;Y BIS ENDE DES NAMEN
ZAEHLEN. LDA VERGLT,Y.
CMP #255. BNE LOOPDN.
INY ;Y AUF ANF.ADR..
STY 2.. LDX 69
;CURSORPOS. SETZEN. LDY #10
. CLC. JSR $FFF0..
LDY 2 ;ANF.ADR. HOLEN
. LDA VERGLT,Y. TA
X. INY. LDA VERGLT
,Y. STY 2. JSR $BD
CD ;UND AUSGEBEN.. LDX 69.
LDY #17. CLC.
JSR $FFF0.. LDY 2
;ENDADR. HOLEN. INY.
LDA VERGLT,Y. TAX.
INY. LDA VERGLT,Y.
INY. INY
;Y AUF NAECHSTEN NAMEN. INY.
INY. STY 2.
JSR $BDCD ;UND AUSGEBEN..
LDA #13 ;NAECHSTE ZEILE.
JSR $FFD2.. DEC 3
;DIR. ZUENDE ?. BNE LOOP
D1 ;NEIN.. JSR EINGPCL.
JMP $A7AE....;-----------------
------------..;. UNTERPROGRAMME
...;-----------------------------..
;NAECHSTE SEITE...:NEXTPAGE.
CLD. CLC. LDA #1.
ADC 65. STA 65..
LDA #0. ADC 66.
STA 66..... ;BERECHNEN DER RAM-S
EITE (UM IN $DFFE/$DFFF ZU SCHREIBEN)..
.:SEITEBER. STX $2A1 ;X,Y SI
CHERN. STY $2A2...
LDY #0 ;$BD LOESCHEN. STY
$BD.. LDA 65 ;ORIG.ZAHL I
N. STA 67 ;SP.FUER UMGEW..
LDA 66 ;ZAHLEN.
STA 68... ASL 68 ;5MAL N
ACH LINKS. ASL 68 ;VERSCHI
EBEN. ASL 68 ;(%0000 0111
->. ASL 68 ; %1110 0000 ).
ASL 68. STA 68..
ASL 67. ROL $BD
;CARRY -> $BD.. ASL 67.
ROL $BD ; -"-.. LS
R 67 ;LOW ZURUECK. LSR 67.
. CLC. ASL $BD.
ASL $BD. ASL $BD..
LDA $BD. ORA 68.
STA 68.. LDX $2A1.
LDY $2A2.. RTS...;-
----------------------------..; EINGABE
PUFFER LOESCHEN..:EINGPCL. LD
X #58 ;EING.PUFFER LOESCHEN. :LOOPL
LDA #0. STA $200,X.
DEX. BNE LOOPL..
RTS....;-----------------------------..
;. TEXTE UND DATEN ...;-------
----------------------..;---------------
-------------..;. BASIC-BEFEHLE
...;----------------------------..:BL
ISTE B 'S,'L,'F,'T,'N..:ADRLIST W
SCHREIBEN,LESEN,FUELLEN,TAUSCHEN,RENAME
....;----------------------------..;. DA
TEN FUER MODIFIZIERUNG ...;-------------
---------------..:MODS. LDA (61)
,Y. STA $DE00,X. NOP.
NOP. NOP. NOP.
NOP. NOP. NOP.
NOP. NOP.. LDA 61.:S
62 B 62..;-----------------..:MODL.
LDA $DE00,X. STA (61),Y.
NOP. NOP. NOP.
NOP. NOP. NOP.
NOP. NOP. NOP...
LDA 61.:L62 B 62..;---------
--------..:MODF. LDA 3.
STA $DE00,X. NOP. NOP.
NOP. NOP. NOP.
NOP. NOP. NOP.
NOP.. LDA 65.:F66 B 66.
.;-----------------..:MODT. LDA
(61),Y. STA 3. LDA $DE00
,X. STA (61),Y. LDA 3.
STA $DE00,X.. LDA 61.:T62
B 62....;--------------------------
--..;. FILENAMEN UND ADRESSEN ...;.
DIRECTORY ..;--------------
--------------...:TEXTT B 0,0,0,0,0,0
,0,0,0 ;VON PROGRAMM GEAENDERT-AKTUELLE
R FILENAME..:GEFT B " - GEFUNDEN ",
13,0..:NICHTT B " - NICHT GEFUNDEN ",
0..:VERGLT. B 0. ;1.FILE.
B '1,0,0,0,0,0,0,0 ;FILENAME ( =<
8 BUCHST.).. B 0,255 ;ENDKE
NNZEICHEN.. B 0,0 ;STARTADRE
SSE.. B 0,0 ;ENDADRESSE..
B 0,0 ;ANFANGSSEITE (FEST). ;
2.FILE. B 0,'2,0,0,0,0,0,0,0,0,
255.. B 0,0,0,0.. B 0,
1 ;256. ;3.FILE. B 0,'3,0,0
,0,0,0,0,0,0,255.. B 0,0,0,0..
B 0,2 ;512. ;4.FILE.
B 0,'4,0,0,0,0,0,0,0,0,255..
B 0,0,0,0.. B 0,3. ;5.FILE.
B 0,'5,0,0,0,0,0,0,0,0,255..
B 0,0,0,0.. B 0,4. ;6.FI
LE. B 0,'6,0,0,0,0,0,0,0,0,255.
. B 0,0,0,0.. B 0,5.
;7.FILE. B 0,'7,0,0,0,0,0,0,0,0
,255.. B 0,0,0,0.. B 0
,6. ;8.FILE. B 0,'8,0,0,0,0,0,
0,0,0,255.. B 0,0,0,0..
B 0,7 ;BIS 2047...:LETZTE B 0,2
55...;**********************************
.;**********************************.;**
********************************.;******
****************************.;**********
************************.....
> CLICK IMAGE PREVIEW FOR FULL MODAL