SEQ-TRANSFER
FILE INFORMATION
FILENAME(S): SEQ-TRANSFER
FILE TYPE(S): PRG
FILE SIZE: 6.3K
FIRST SEEN: 2025-12-02 00:13:11
APPEARS ON: 1 disk(s)
FILE HASH
afa57fa15f90209f3ea89de721a97e9777ba9e008e28e67ab435bef71b959898
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| L68611D VORDERS | SEQ-TRANSFER | PRG | earthshaker | 22 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0B 08 00 00 89 20 31 30 30 00 1B 08 01 00 |....... 100.....|
00000010: 9B 20 31 30 30 30 AB 32 31 30 30 00 2B 08 02 00 |. 1000.2100.+...|
00000020: 9B 20 31 39 32 30 AB 32 31 30 30 00 3B 08 03 00 |. 1920.2100.;...|
00000030: 9B 20 32 33 30 30 AB 32 39 39 39 00 70 08 64 00 |. 2300.2999.p.d.|
00000040: 97 20 35 33 32 38 30 2C 30 3A 97 20 35 33 32 38 |. 53280,0:. 5328|
00000050: 31 2C 30 3A 97 20 35 36 33 32 35 2C 33 35 3A 97 |1,0:. 56325,35:.|
00000060: 20 36 34 36 2C 34 3A 97 20 36 35 30 2C 31 32 38 | 646,4:. 650,128|
00000070: 00 90 08 6E 00 9F 20 31 2C 38 2C 31 2C 22 53 45 |...n.. 1,8,1,"SE|
00000080: 51 2D 54 52 41 4E 53 56 45 52 20 2E 4F 42 4A 22 |Q-TRANSVER .OBJ"|
00000090: 00 9D 08 78 00 9E 20 39 AC 34 30 39 36 00 A3 08 |...x.. 9.4096...|
000000A0: 82 00 3B 00 AF 08 8C 00 2E 4F 50 54 20 4F 31 00 |..;......OPT O1.|
000000B0: B5 08 96 00 3B 00 C2 08 A0 00 AC B2 20 24 43 44 |....;....... $CD|
000000C0: 30 30 00 C8 08 AA 00 3B 00 CE 08 B4 00 3B 00 D4 |00.....;.....;..|
000000D0: 08 BE 00 3B 00 DA 08 C7 00 3B 00 02 09 C8 00 3B |...;.....;.....;|
000000E0: AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB |................|
000000F0: AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB |................|
00000100: AB AB 00 08 09 C9 00 3B 00 46 09 D2 00 53 45 54 |.......;.F...SET|
00000110: 4C 46 53 20 B2 20 24 46 46 42 41 20 20 20 3B 22 |LFS . $FFBA ;"|
00000120: 4C 4F 47 A4 C6 49 4C 45 4E 52 2E 2C C7 45 52 41 |LOG..ILENR.,.ERA|
00000130: 45 54 4E 52 2E 2C D3 4B 55 4E 44 41 44 52 2E 20 |ETNR.,.KUNDADR. |
00000140: 53 45 54 5A 45 4E 00 6D 09 DC 00 53 45 54 4E 41 |SETZEN.m...SETNA|
00000150: 4D 20 B2 20 24 46 46 42 44 20 20 20 3B 22 C6 49 |M . $FFBD ;".I|
00000160: 4C 45 4E 41 4D 45 20 53 45 54 5A 45 4E 00 8E 09 |LENAME SETZEN...|
00000170: E6 00 9F 20 20 20 B2 20 24 46 46 43 30 20 20 20 |... . $FFC0 |
00000180: 3B 22 C6 49 4C 45 20 4F 45 46 46 4E 45 4E 00 B7 |;".ILE OEFFNEN..|
00000190: 09 F0 00 87 53 54 20 B2 20 24 46 46 42 37 20 20 |....ST . $FFB7 |
000001A0: 20 3B 22 D3 54 41 54 55 53 56 41 52 49 41 42 4C | ;".TATUSVARIABL|
000001B0: 45 20 4C 45 53 45 4E 00 DA 09 22 01 A0 20 20 B2 |E LESEN...".. .|
000001C0: 20 24 46 46 43 33 20 20 20 3B 22 C6 49 4C 45 20 | $FFC3 ;".ILE |
000001D0: 53 43 48 4C 49 45 53 53 45 4E 00 09 0A 27 01 43 |SCHLIESSEN...'.C|
000001E0: 48 4B 49 4E 20 20 B2 20 24 46 46 43 36 20 20 20 |HKIN . $FFC6 |
000001F0: 3B 22 C6 49 4C 45 20 41 55 46 20 C5 49 4E 47 41 |;".ILE AUF .INGA|
00000200: 42 45 20 53 45 54 5A 45 4E 00 38 0A 2C 01 43 48 |BE SETZEN.8.,.CH|
00000210: 4B 4F 55 54 20 B2 20 24 46 46 43 39 20 20 20 3B |KOUT . $FFC9 ;|
00000220: 22 C6 49 4C 45 20 41 55 46 20 C1 55 53 47 41 42 |".ILE AUF .USGAB|
00000230: 45 20 53 45 54 5A 45 4E 00 60 0A 36 01 43 48 52 |E SETZEN.`.6.CHR|
00000240: 4F 55 54 20 B2 20 24 46 46 44 32 20 20 20 3B 22 |OUT . $FFD2 ;"|
00000250: DA 45 49 43 48 45 4E 20 41 55 53 47 45 42 45 4E |.EICHEN AUSGEBEN|
00000260: 00 85 0A 3B 01 43 48 52 49 4E 20 20 B2 20 24 46 |...;.CHRIN . $F|
00000270: 46 43 46 20 20 20 3B 22 DA 45 49 43 48 45 4E 20 |FCF ;".EICHEN |
00000280: 48 4F 4C 45 4E 00 B8 0A 40 01 9C 43 48 4E 20 B2 |HOLEN...@..CHN .|
00000290: 20 24 46 46 43 43 20 20 20 3B 22 D3 54 41 4E 44 | $FFCC ;".TAND|
000002A0: 41 52 44 57 45 52 54 45 20 46 55 45 52 20 C9 2F |ARDWERTE FUER ./|
000002B0: CF 20 53 45 54 5A 45 4E 00 BE 0A 4A 01 3B 00 E6 |. SETZEN...J.;..|
000002C0: 0A 72 01 43 48 43 4B 4F 4D 20 B2 20 24 41 45 46 |.r.CHCKOM . $AEF|
000002D0: 44 20 20 20 3B 22 C1 55 46 20 CB 4F 4D 4D 41 20 |D ;".UF .OMMA |
000002E0: 54 45 53 54 45 4E 00 10 0B 7C 01 46 52 4D 45 56 |TESTEN...|.FRMEV|
000002F0: 4C 20 B2 20 24 41 44 39 45 20 20 20 3B 22 C1 55 |L . $AD9E ;".U|
00000300: 53 44 52 55 43 4B 20 41 55 53 57 45 52 54 45 4E |SDRUCK AUSWERTEN|
00000310: 00 47 0B 86 01 B8 53 54 52 20 B2 20 24 42 36 41 |.G....STR . $B6A|
00000320: 36 20 20 20 3B 22 57 45 49 54 45 52 45 20 C1 55 |6 ;"WEITERE .U|
00000330: 53 57 45 52 54 55 4E 47 45 4E 20 46 55 45 52 20 |SWERTUNGEN FUER |
00000340: D3 54 52 49 4E 47 53 00 67 0B 90 01 A1 42 59 54 |.TRINGS.g....BYT|
00000350: 20 B2 20 24 42 37 39 45 20 20 20 3B 22 C2 59 54 | . $B79E ;".YT|
00000360: 45 20 48 4F 4C 45 4E 00 6D 0B 9A 01 3B 00 99 0B |E HOLEN.m...;...|
00000370: F4 01 50 54 20 20 20 20 20 B2 20 24 32 32 20 20 |..PT . $22 |
00000380: 20 20 20 3B 22 DA 45 49 47 45 52 20 41 55 46 20 | ;".EIGER AUF |
00000390: 20 D4 45 58 54 45 4E 44 45 00 C2 0B FE 01 48 50 | .EXTENDE.....HP|
000003A0: 54 20 20 20 20 B2 20 24 31 34 20 20 20 20 20 3B |T . $14 ;|
000003B0: 22 5A 55 20 53 45 4E 44 45 4E 44 45 53 20 C2 59 |"ZU SENDENDES .Y|
000003C0: 54 45 00 F6 0B 08 02 4D 43 91 56 20 20 B2 20 24 |TE.....MC.V . $|
000003D0: 30 32 20 20 20 20 20 3B 22 C6 4C 41 47 20 46 55 |02 ;".LAG FU|
000003E0: 45 52 20 C1 D3 C3 C9 C9 2D CB 4F 4E 56 45 52 54 |ER .....-.ONVERT|
000003F0: 49 45 52 55 4E 47 00 24 0C 12 02 53 59 4E 45 52 |IERUNG.$...SYNER|
00000400: 52 20 B2 20 24 41 46 30 38 20 20 20 3B 22 3F D3 |R . $AF08 ;"?.|
00000410: D9 CE D4 C1 D8 20 C5 D2 D2 CF D2 20 41 55 53 47 |..... ..... AUSG|
00000420: 45 42 45 4E 00 4E 0C 58 02 42 55 46 20 20 20 20 |EBEN.N.X.BUF |
00000430: B2 20 24 43 45 30 30 20 20 20 3B 22 C2 55 46 46 |. $CE00 ;".UFF|
00000440: 45 52 20 46 55 45 52 20 D2 D3 20 32 33 32 00 7E |ER FUER .. 232.~|
00000450: 0C 62 02 52 49 42 55 46 20 20 B2 20 24 46 37 20 |.b.RIBUF . $F7 |
00000460: 20 20 20 20 3B 22 DA 45 49 47 45 52 20 41 55 46 | ;".EIGER AUF|
00000470: 20 C5 49 4E 47 41 42 45 42 55 46 46 45 52 00 AE | .INGABEBUFFER..|
00000480: 0C 6C 02 52 4F 42 55 46 20 20 B2 20 24 46 39 20 |.l.ROBUF . $F9 |
00000490: 20 20 20 20 3B 22 DA 45 49 47 45 52 20 41 55 46 | ;".EIGER AUF|
000004A0: 20 C1 55 53 47 41 42 45 42 55 46 46 45 52 00 DF | .USGABEBUFFER..|
000004B0: 0C BC 02 53 54 41 52 54 20 20 B2 20 24 30 38 30 |...START . $080|
000004C0: 31 20 20 20 3B 22 CC 41 44 45 41 44 52 45 53 53 |1 ;".ADEADRESS|
000004D0: 45 20 46 55 45 52 20 D3 C5 D1 2D C6 49 4C 45 00 |E FUER ...-.ILE.|
000004E0: 1A 0D C6 02 45 4E 41 42 4C 45 20 B2 20 24 30 32 |....ENABLE . $02|
000004F0: 41 31 20 20 20 3B 22 D2 D3 20 32 33 32 20 C6 4C |A1 ;".. 232 .L|
00000500: 41 47 3A 20 C1 4C 4C 45 20 DA 45 49 43 48 45 4E |AG: .LLE .EICHEN|
00000510: 20 47 45 53 45 4E 44 45 54 3F 00 20 0D E8 03 3B | GESENDET?. ...;|
00000520: 00 47 0D E9 03 3B 22 2D 2D 2D 2D 2D 2D 2D 2D 2D |.G...;"---------|
00000530: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000540: 2D 2D 2D 2D 2D 2D 2D 00 6E 0D EA 03 3B 22 2D 20 |-------.n...;"- |
00000550: D3 C5 D1 2D D4 52 41 4E 53 46 45 52 20 2D 2D 20 |...-.RANSFER -- |
00000560: 56 45 52 53 49 4F 4E 20 31 2E 30 20 2D 2D 00 95 |VERSION 1.0 --..|
00000570: 0D EB 03 3B 22 2D 20 D3 C5 D1 2D C6 49 4C 45 53 |...;"- ...-.ILES|
00000580: 20 4D 49 54 20 34 38 30 30 20 C2 41 55 44 20 2D | MIT 4800 .AUD -|
00000590: 2D 2D 2D 2D 2D 00 BC 0D EC 03 3B 22 2D 20 55 45 |-----.....;"- UE|
000005A0: 42 45 52 20 D2 D3 20 32 33 32 20 53 45 4E 44 45 |BER .. 232 SENDE|
000005B0: 4E 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 E3 0D ED |N ----------....|
000005C0: 03 3B 22 2D 20 47 45 53 43 48 52 49 45 42 45 4E |.;"- GESCHRIEBEN|
000005D0: 20 56 4F 4E 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | VON -----------|
000005E0: 2D 2D 2D 00 0A 0E EE 03 3B 22 2D 2D 20 CD 41 52 |---.....;"-- .AR|
000005F0: 54 49 4E 20 CD 55 45 4C 4C 45 52 20 2D 2D 2D 2D |TIN .UELLER ----|
00000600: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 31 0E EF 03 3B |----------.1...;|
00000610: 22 2D 20 28 43 29 20 42 59 20 C1 52 4E 44 20 D7 |"- (C) BY .RND .|
00000620: 41 45 4E 47 4C 45 52 2C 20 36 34 27 45 52 20 2D |AENGLER, 64'ER -|
00000630: 2D 00 58 0E F0 03 3B 22 2D 2D 2D 2D 2D 2D 2D 2D |-.X...;"--------|
00000640: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000650: 2D 2D 2D 2D 2D 2D 2D 2D 00 5E 0E F1 03 3B 00 8B |--------.^...;..|
00000660: 0E F2 03 42 41 55 44 49 4E 20 4A 53 52 20 43 48 |...BAUDIN JSR CH|
00000670: 43 4B 4F 4D 20 20 20 20 20 3B 22 C1 55 46 20 CB |CKOM ;".UF .|
00000680: 4F 4D 4D 41 20 54 45 53 54 45 4E 00 BD 0E F4 03 |OMMA TESTEN.....|
00000690: AE 20 20 20 20 20 20 4A 53 52 20 A1 42 59 54 20 |. JSR .BYT |
000006A0: 20 20 20 20 3B 22 CB 4F 4E 56 45 52 54 49 45 52 | ;".ONVERTIER|
000006B0: 55 4E 47 53 46 4C 41 47 20 4E 41 43 48 00 E4 0E |UNGSFLAG NACH...|
000006C0: F6 03 AE 20 20 20 20 20 20 53 54 58 20 4D 43 91 |... STX MC.|
000006D0: 56 20 20 20 20 20 20 3B 22 4D 43 4F 4E 56 20 48 |V ;"MCONV H|
000006E0: 4F 4C 45 4E 00 11 0F F8 03 AE 20 20 20 20 20 20 |OLEN...... |
000006F0: 4A 53 52 20 43 48 43 4B 4F 4D 20 20 20 20 20 3B |JSR CHCKOM ;|
00000700: 22 C1 55 46 20 CB 4F 4D 4D 41 20 54 45 53 54 45 |".UF .OMMA TESTE|
00000710: 4E 00 40 0F FC 03 AE 20 20 20 20 20 20 4A 53 52 |N.@.... JSR|
00000720: 20 46 52 4D 45 56 4C 20 20 20 20 20 3B 22 C1 55 | FRMEVL ;".U|
00000730: 53 44 52 55 43 4B 20 41 55 53 57 45 52 54 45 4E |SDRUCK AUSWERTEN|
00000740: 00 6D 0F 06 04 AE 20 20 20 20 20 20 4A 53 52 20 |.m.... JSR |
00000750: B8 53 54 52 20 20 20 20 20 3B 22 D3 54 52 49 4E |.STR ;".TRIN|
00000760: 47 41 55 53 57 45 52 54 55 4E 47 45 4E 00 A2 0F |GAUSWERTUNGEN...|
00000770: 10 04 AE 20 20 20 20 20 20 43 4D 50 20 23 35 20 |... CMP #5 |
00000780: 20 20 20 20 20 20 20 20 3B 22 CC 41 45 4E 47 45 | ;".AENGE|
00000790: 20 44 45 53 20 D3 54 52 49 4E 47 53 20 3C 20 35 | DES .TRINGS < 5|
000007A0: A0 3F 00 CE 0F 1A 04 AE 20 20 20 20 20 20 42 43 |.?...... BC|
000007B0: 53 20 42 41 55 44 57 31 20 20 20 20 20 3B 22 CE |S BAUDW1 ;".|
000007C0: 45 49 4E 3A 20 3D 3E 20 57 45 49 54 45 52 00 05 |EIN: => WEITER..|
000007D0: 10 24 04 AE 20 20 20 20 20 20 4A 4D 50 20 53 59 |.$.. JMP SY|
000007E0: 4E 45 52 52 20 20 20 20 20 3B 22 D3 4F 4E 53 54 |NERR ;".ONST|
000007F0: 3A 20 D3 D9 CE D4 C1 D8 20 C5 D2 D2 CF D2 A0 4D |: ...... ......M|
00000800: 45 4C 44 45 4E 00 33 10 2E 04 42 41 55 44 57 31 |ELDEN.3...BAUDW1|
00000810: 20 4C 44 58 FF FF FF FF FF FF FF FF FF FF FF FF | LDX............|
00000820: 8D 98 49 77 FF FF 75 FF FF FF FF FF 79 79 FF FF |..Iw..u.....yy..|
00000830: FF FF 79 FF 15 10 38 04 AE 20 20 20 20 20 20 4C |..y...8.. L|
00000840: 44 59 20 50 54 20 AA 20 31 20 20 20 20 20 3B 22 |DY PT . 1 ;"|
00000850: C1 44 52 45 53 53 45 20 44 45 53 20 C6 49 4C 45 |.DRESSE DES .ILE|
00000860: 4E 41 4D 45 4E 00 93 10 42 04 AE 20 20 20 20 20 |NAMEN...B.. |
00000870: 20 4A 53 52 20 53 45 54 4E 41 4D 20 20 20 20 20 | JSR SETNAM |
00000880: 3B 22 44 45 4D 20 CF D3 20 55 45 42 45 52 47 45 |;"DEM .. UEBERGE|
00000890: 42 45 4E 00 C6 10 4C 04 AE 20 20 20 20 20 20 4C |BEN...L.. L|
000008A0: 44 41 20 23 31 20 20 20 20 20 20 20 20 20 3B 22 |DA #1 ;"|
000008B0: 4C 4F 47 49 53 43 48 45 20 C6 49 4C 45 4E 55 4D |LOGISCHE .ILENUM|
000008C0: 4D 45 52 3A 20 31 00 F3 10 56 04 AE 20 20 20 20 |MER: 1...V.. |
000008D0: 20 20 4C 44 58 20 23 63 FF FF FF FF FF FF FF FF | LDX #c........|
000008E0: FF FF FF B4 FF FF FF FF FF FF FF EE DA DB 45 52 |..............ER|
000008F0: 3A 20 38 00 23 11 60 04 AE 20 20 20 20 20 20 4C |: 8.#.`.. L|
00000900: 44 59 20 23 32 20 20 20 20 20 20 20 20 20 3B 22 |DY #2 ;"|
00000910: D3 45 4B 55 4E 44 41 45 52 41 44 52 45 53 53 45 |.EKUNDAERADRESSE|
00000920: 3A 20 32 00 46 11 6A 04 AE 20 20 20 20 20 20 4A |: 2.F.j.. J|
00000930: 53 52 20 53 45 54 4C 46 53 20 20 20 20 20 3B 22 |SR SETLFS ;"|
00000940: 53 45 54 5A 45 4E 00 6F 11 74 04 AE 20 20 20 20 |SETZEN.o.t.. |
00000950: 20 20 4A 53 52 20 9F 20 20 20 20 20 20 20 3B 22 | JSR . ;"|
00000960: C4 41 54 45 49 FF FF 79 FF FF 71 FF FF FF 75 FF |.ATEI..y..q...u.|
00000970: FF FF FF FF C5 FF FF FF FF FF FF FF FF 79 FF FF |.............y..|
00000980: 79 77 FF FF FF FF FF 8D 98 FF 45 48 4C 45 52 4D |yw........EHLERM|
00000990: 45 4C 44 55 4E 47 20 48 4F 4C 45 4E 00 CF 11 83 |ELDUNG HOLEN....|
000009A0: 04 AE 20 20 20 20 20 20 42 45 51 20 42 41 55 44 |.. BEQ BAUD|
000009B0: 32 31 20 20 20 20 20 3B 22 CB 45 49 4E 20 C6 45 |21 ;".EIN .E|
000009C0: 48 4C 45 52 3A 20 3D 3E 20 57 45 49 54 45 52 00 |HLER: => WEITER.|
000009D0: 06 12 88 04 42 41 55 44 57 32 20 4A 53 52 20 9C |....BAUDW2 JSR .|
000009E0: 43 48 4E 20 20 20 20 20 3B 22 D3 54 41 4E 44 41 |CHN ;".TANDA|
000009F0: 52 54 57 45 52 45 20 46 55 45 52 20 C9 2F CF 20 |RTWERE FUER ./. |
00000A00: 53 45 54 5A 45 4E 00 32 12 8D 04 AE 20 20 20 20 |SETZEN.2.... |
00000A10: 20 20 4C 44 41 20 23 31 20 20 20 20 20 20 20 20 | LDA #1 |
00000A20: 20 3B 22 C6 49 4C 45 20 53 43 48 4C 49 45 53 53 | ;".ILE SCHLIESS|
00000A30: 45 4E 00 52 12 FF FF FD FF FF FF FF FF FF FF DA |EN.R............|
00000A40: EF FF FF FF FF FF FF FF FF FF FF FF EE FF EE FF |................|
00000A50: FF D6 FF E2 FF 2A FF FF FF 32 FF FF FF FF FF EE |.....*...2......|
00000A60: FF FF FF FF FF FF E3 FF FF FF FF FF FF FF FF FF |................|
00000A70: FF FF FF FF FF FF D2 FF FF FF FF FF FF FF AE D2 |................|
00000A80: FF D4 FF FF FF FF D2 FF FF FF FF FF FF FF FD FF |................|
00000A90: FF FF FF FF FF FF FF FF FF FF FF D6 D2 DD FF FF |................|
00000AA0: FF FF FF FF FF FF FF FF FF D2 FF D2 FF FF FF FF |................|
00000AB0: FF BA FF FF FF FD FF FF FF FF FF FF FF FF FF FF |................|
00000AC0: 34 FF ED FF FF FF FF FF FF FF FF FF FF FF FF FF |4...............|
00000AD0: FF FF EE FF D4 FF FF FF FF FF FF DD FF FF FF FF |................|
00000AE0: FF FF FD FF FF FF FF FF FF FF 4E 45 20 42 41 55 |..........NE BAU|
00000AF0: 44 57 32 20 20 20 20 20 3B 22 CA C1 3A 20 3D 3E |DW2 ;"..: =>|
00000B00: 20 DA 55 52 55 45 42 7C FF FF FF 78 FF FF FF FF | .URUEB|...x....|
00000B10: E9 FF 69 FF FF F9 FF FF C5 FF FF FF FF FF FF FF |..i.............|
00000B20: FF FF FF 88 D9 79 77 FF 79 FF FF FF FF FF 8D 98 |.....yw.y.......|
00000B30: FF FF FF FF 79 79 FF FF FF FF 78 FF FF FF 79 FF |....yy....x...y.|
00000B40: FF FF FF FF 1D F9 FF FF C5 FF FF FF FF FF FF FF |................|
00000B50: FF FF FF 88 DF 79 77 FF 79 FF FF FF FF FF 8D 98 |.....yw.y.......|
00000B60: FF FF 77 FF 75 FF FF FF 79 FF 49 67 EF 94 6B FF |..w.u...y.Ig..k.|
00000B70: FF FF FF FF 78 FF FF FF FF 71 77 FF CF F9 FF FF |....x....qw.....|
00000B80: C5 FF FF FF FF FF FF FF 77 FF FF FF FF FF FF FF |........w.......|
00000B90: FF FF FF FF FF FF 8D 98 FF FF 79 FF FF 75 FF FF |..........y..u..|
00000BA0: FF FF 79 FF 4D FF FF 71 FF 79 FF FF FF 79 FF FF |..y.M..q.y...y..|
00000BB0: 75 FF 4E F9 FF FF C5 FF FF FF FF FF FF FF 77 FF |u.N...........w.|
00000BC0: FF FF FF FF CC FF 8F FF FF FF FF FF 8D 98 FF 9E |................|
00000BD0: FF FF FF 7B 49 43 41 4E 46 41 4E 47 29 00 E3 13 |...{ICANFANG)...|
00000BE0: F6 04 3B 00 16 14 00 05 42 41 55 44 4C 31 20 4A |..;.....BAUDL1 J|
00000BF0: 53 52 20 43 48 52 49 4E 20 20 20 20 20 20 3B 22 |SR CHRIN ;"|
00000C00: DA 45 49 43 48 45 4E 20 56 4F 4D 20 C6 D2 FF FF |.EICHEN VOM ....|
00000C10: FF FF D0 FF FF FF FF FF FF FF FF FD FF FF FF FF |................|
00000C20: FF FF FF FF FF 20 23 30 20 20 20 20 20 20 20 20 |..... #0 |
00000C30: 20 3B 22 55 4E 44 20 49 4E 20 44 45 4E 20 D1 50 | ;"UND IN DEN .P|
00000C40: 45 49 43 48 45 52 00 6C 14 14 05 AE 20 20 20 20 |EICHER.l.... |
00000C50: 20 20 53 54 41 20 28 50 54 29 2C 59 20 20 20 20 | STA (PT),Y |
00000C60: 20 3B 22 53 43 48 52 45 49 42 FF 4E 00 92 14 1E | ;"SCHREIB.N....|
00000C70: 05 AE 20 20 20 20 20 20 49 4E 43 20 50 54 20 20 |.. INC PT |
00000C80: 20 20 20 20 20 20 20 3B 22 DA 45 49 47 45 52 20 | ;".EIGER |
00000C90: 55 4D 00 BC 14 28 05 AE 20 20 20 20 20 20 42 4E |UM...(.. BN|
00000CA0: 45 20 42 41 55 44 57 33 20 20 20 20 20 3B 22 45 |E BAUDW3 ;"E|
00000CB0: 49 4E 53 20 45 52 48 4F 45 48 45 4E 00 D2 14 32 |INS ERHOEHEN...2|
00000CC0: 05 AE 20 20 20 20 20 20 49 4E 43 20 50 54 20 AA |.. INC PT .|
00000CD0: 20 31 00 D8 14 3C 05 3B 00 05 15 46 05 42 41 55 | 1...<.;...F.BAU|
00000CE0: 44 57 33 20 4A 53 52 20 87 53 54 20 20 20 20 20 |DW3 JSR .ST |
00000CF0: 3B 22 C6 45 48 4C 45 52 20 41 55 46 47 45 54 52 |;".EHLER AUFGETR|
00000D00: 45 54 45 4E 3F 00 31 15 50 05 AE 20 20 20 20 20 |ETEN?.1.P.. |
00000D10: 20 42 45 51 20 42 41 55 44 4C 31 20 20 20 20 20 | BEQ BAUDL1 |
00000D20: 3B 22 CE C5 C9 CE 3A 20 3D 3E 20 57 45 49 54 45 |;"....: => WEITE|
00000D30: 52 00 59 15 5A 05 AE 20 20 20 20 20 20 AF 20 23 |R.Y.Z.. . #|
00000D40: 25 30 31 30 30 30 30 30 30 20 3B 22 C6 49 4C 45 |%01000000 ;".ILE|
00000D50: 20 5A 55 20 45 4E 44 45 3F 00 91 15 6E 05 AE 20 | ZU ENDE?...n.. |
00000D60: 20 20 20 20 20 42 45 51 20 42 41 55 44 57 32 20 | BEQ BAUDW2 |
00000D70: 20 20 20 20 3B 22 CE C5 C9 CE 3A 20 3D 3E 20 DA | ;"....: => .|
00000D80: 55 52 55 45 43 4B 20 4E 41 43 48 20 C2 C1 D3 C9 |URUECK NACH ....|
00000D90: C3 00 97 15 8C 05 3B 00 C4 15 96 05 42 41 55 44 |......;.....BAUD|
00000DA0: 57 34 20 4A 53 52 20 42 41 55 44 57 32 20 20 20 |W4 JSR BAUDW2 |
00000DB0: 20 20 3B 22 C4 41 54 45 49 20 53 43 48 4C 49 45 | ;".ATEI SCHLIE|
00000DC0: 53 53 45 4E 00 E7 15 B4 05 3B 22 D2 D3 20 32 33 |SSEN.....;".. 23|
00000DD0: 32 20 D3 43 48 4E 49 54 54 53 54 45 4C 4C 45 20 |2 .CHNITTSTELLE |
00000DE0: 4F 45 46 46 4E 45 4E 00 0F 16 BE 05 3B 22 34 38 |OEFFNEN.....;"48|
00000DF0: 30 30 20 C2 41 55 44 2C 20 38 FF FF FF 77 FF 75 |00 .AUD, 8...w.u|
00000E00: FF FF 77 FF FF FF 8F FF 49 77 FF 7F FF FF 77 FF |..w.....Iw....w.|
00000E10: FF FB FF FF 9D 98 4F FF 79 FF 77 FF FF 33 36 FF |......O.y.w..36.|
00000E20: B2 FF 33 13 B3 FF FF FF FF 11 16 17 33 FF 30 12 |..3.........3.0.|
00000E30: B7 33 FF B2 12 B6 B3 FF 02 36 2D 27 F8 E5 40 86 |.3.......6-'..@.|
00000E40: 9D D9 F9 68 8F 9D DD 89 F9 DD FF FF F4 B6 88 FF |...h............|
00000E50: A8 08 08 08 08 08 89 F9 99 48 00 4C 48 08 08 08 |.........H.LH...|
00000E60: 08 08 08 08 08 05 40 8F FA FA DB FF CA C9 FF E8 |......@.........|
00000E70: 86 B6 13 13 B7 3B B7 17 13 FF FF FF FF A2 66 2D |.....;........f-|
00000E80: 71 03 E7 FF FF FF FF FF FF 33 13 3A FF FF FF FF |q........3.:....|
00000E90: FF FF FF FF FF FF FF FF FF FF 3C B3 FF 32 B3 BB |..........<..2..|
00000EA0: 33 B7 3B B7 17 13 FF FF FF FF 22 74 2D 7F 23 E7 |3.;......."t-.#.|
00000EB0: FF FF FF FF FF FF 33 13 3E FF FF FF FF FF FF FF |......3.>.......|
00000EC0: FF FF FF FF FF FF FF FF B7 7C 77 75 FF FF FF 79 |.........|wu...y|
00000ED0: FF FF FF FF 79 79 FF 9D FF 89 FF 0E FB 0F FF D5 |....yy..........|
00000EE0: FF FF 20 20 20 20 4A 53 52 20 53 45 54 4C 46 53 |.. JSR SETLFS|
00000EF0: 20 20 20 20 20 3B 22 53 45 54 5A 45 4E 00 24 17 | ;"SETZEN.$.|
00000F00: FA 05 AE 20 20 20 20 20 20 4C 44 41 20 23 34 20 |... LDA #4 |
00000F10: 20 20 20 20 20 20 20 20 3B 22 D7 45 52 54 45 20 | ;".ERTE |
00000F20: 46 55 45 52 00 47 17 04 06 AE 20 20 20 20 20 20 |FUER.G.... |
00000F30: 4C 44 58 20 23 B3 52 53 4E 41 4D 20 20 20 20 3B |LDX #.RSNAM ;|
00000F40: 22 D2 D3 20 32 33 32 00 6A 17 0E 06 AE 20 20 20 |".. 232.j.... |
00000F50: 20 20 20 4C 44 59 20 23 B1 52 53 4E 41 4D 20 20 | LDY #.RSNAM |
00000F60: 20 20 3B 22 53 45 54 5A 45 4E 00 80 17 18 06 AE | ;"SETZEN......|
00000F70: 20 20 20 20 20 20 4A 53 52 20 53 45 54 4E 41 4D | JSR SETNAM|
00000F80: 00 A6 17 22 06 AE 20 20 20 20 20 20 4A 53 52 20 |...".. JSR |
00000F90: 9F 20 20 20 20 20 20 20 3B 22 C6 49 4C 45 20 4F |. ;".ILE O|
00000FA0: 45 46 46 4E 45 4E 00 DC 17 2C 06 AE 20 20 20 20 |EFFNEN...,.. |
00000FB0: 20 20 4C 44 58 20 23 33 20 20 20 20 20 20 20 20 | LDX #3 |
00000FC0: 20 3B 22 DA 45 49 47 45 52 20 46 55 45 52 20 D2 | ;".EIGER FUER .|
00000FD0: D3 20 32 33 32 20 C2 55 46 46 45 52 00 FF 17 36 |. 232 .UFFER...6|
00000FE0: 06 42 41 55 44 40 FF FF FF FF FF FF FF FF 77 FF |.BAUD@........w.|
00000FF0: 78 FF FF FF FF FF FF 8D 98 FF FF 77 FF FF 75 FF |x..........w..u.|
00001000: FF FF FF FF C5 FF FF FF FF FF FF FF 77 FF FF FF |............w...|
00001010: FF 78 FF 71 FF FF FF FF FF 7C FF C5 FF FF FF FF |.x.q.....|......|
00001020: FF FF FF FF FF FF 8D FF 77 FF C5 FF FF FF FF FF |........w.......|
00001030: FF FF FF FF FF FF FF 77 FF FF B9 00 41 18 72 06 |.......w....A.r.|
00001040: 3B 00 72 18 7C 06 AE 20 20 20 20 20 20 4C 44 58 |;.r.|.. LDX|
00001050: 20 23 31 20 20 20 20 20 20 20 20 20 3B 22 C6 49 | #1 ;".I|
00001060: 4C 45 20 41 4C 53 20 C1 55 53 47 41 42 45 46 D2 |LE ALS .USGABEF.|
00001070: FF FF FF FF 62 FF FC FD FF FF FF FF FF FF FF FF |....b...........|
00001080: FF FF FF FF D6 D0 EE ED FF FF FF FF FF FF FF FF |................|
00001090: FF D6 FF FF FF D2 FF FF FF FF FF A2 63 FF FC FD |............c...|
000010A0: FF FF FF FF FF FF FF FF E2 20 23 B3 53 54 41 52 |......... #.STAR|
000010B0: 54 20 20 20 20 3B 22 D6 FF FF FF FF FF FF FF FF |T ;".........|
000010C0: FF FF FF FF FF EE DD E8 80 FF FF FF 0B 1A 80 80 |................|
000010D0: 80 80 80 88 9F 99 FF 80 05 CC EC D9 9C E0 54 20 |..............T |
000010E0: 20 20 20 3B 22 44 41 53 20 D3 C5 D1 2D C6 49 4C | ;"DAS ...-.IL|
000010F0: 45 20 41 4C 53 20 DA 45 49 47 45 52 00 1F 19 A4 |E ALS .EIGER....|
00001100: 06 AE 20 20 20 20 20 20 53 54 58 20 48 50 54 20 |.. STX HPT |
00001110: 20 20 20 20 20 20 20 3B 22 4D 45 52 4B 45 4E 00 | ;"MERKEN.|
00001120: 36 19 AE 06 AE 20 20 20 20 20 20 53 54 59 20 48 |6.... STY H|
00001130: 50 54 20 AA 20 31 00 63 19 B0 06 AE 20 20 20 20 |PT . 1.c.... |
00001140: 20 20 4C 44 41 20 35 36 33 33 34 20 20 20 20 20 | LDA 56334 |
00001150: 20 3B 22 D4 49 4D 45 52 49 52 51 20 53 50 45 52 | ;".IMERIRQ SPER|
00001160: 52 45 4E 00 75 19 B2 06 AE 20 20 20 20 20 20 AF |REN.u.... .|
00001170: 20 23 32 35 34 00 8A 19 B4 06 AE 20 20 20 20 20 | #254...... |
00001180: 20 53 54 41 20 35 36 33 33 34 00 90 19 B8 06 3B | STA 56334.....;|
00001190: 00 BE 19 C2 06 42 41 55 44 4C 32 20 4C 44 59 20 |.....BAUDL2 LDY |
000011A0: 23 30 20 20 20 20 20 20 20 20 20 3B 22 C1 4B 54 |#0 ;".KT|
000011B0: 55 45 4C 4C 45 53 20 DA 45 49 43 48 45 4E 00 E0 |UELLES .EICHEN..|
000011C0: 19 CC 06 AE 20 20 20 20 20 20 4C 44 41 20 28 48 |.... LDA (H|
000011D0: 50 54 29 2C 59 20 20 20 20 3B 22 48 4F 4C 45 4E |PT),Y ;"HOLEN|
000011E0: 00 11 1A D6 06 AE 20 20 20 20 20 20 42 49 54 20 |...... BIT |
000011F0: 4D 43 91 56 20 20 20 20 20 20 3B 22 DA 45 49 43 |MC.V ;".EIC|
00001200: 48 45 4E 20 4B 4F 4E 56 FF FF FF D2 FF FF FF DD |HEN KONV........|
00001210: FF FF FF 7F FF FC FD FF FF FF FF FF FF FF DA D3 |................|
00001220: FF FF FF EE FF FF FF FF FF FF FF FF FF FF FF AE |................|
00001230: B2 BD FF FF FF FF FF FF FF D2 FF FF FF FF 46 7F |..............F.|
00001240: FF FC FD FF FF FF FF FF FF FF DA EF FF FF FF FF |................|
00001250: FF FF FF FF FF FF FF FF FF FF BC AF B9 EC DA 50 |...............P|
00001260: 88 6C AF BF BF AF 99 AF E8 9E 0D F5 6C 6B 41 FF |.l..........lkA.|
00001270: FA 26 00 EF 12 F6 FF FF FF FF FF FF 23 FF FF FF |.&..........#...|
00001280: 23 FF 2B BB 33 FF FF FF FF FF FF FF FF FF 73 2B |#.+.3.........s+|
00001290: FF FF 23 FF FF FF 41 40 26 30 EF 52 F6 FF FF FF |..#...A@&0.R....|
000012A0: FF FF FF 23 FF 71 FF FF FF FF FF A0 23 FF E2 20 |...#.q......#.. |
000012B0: FE FF FF FF FF FF FF 23 FF FF FF 23 FF 2B BB FF |.......#...#.+..|
000012C0: FF AA 27 4A E2 FF FE FF FF FF FF FF FF 26 A3 FF |..'J.........&..|
000012D0: FF FF FF FF FF FF FF FF FF A6 30 00 F1 1A 1C 07 |..........0.....|
000012E0: AE 20 20 20 20 20 20 42 4E 45 20 42 41 55 44 57 |. BNE BAUDW|
000012F0: 35 00 05 1B 26 07 42 41 55 44 34 31 20 43 4D 50 |5...&.BAUD41 CMP|
00001300: 20 23 31 39 32 00 1B 1B 30 07 AE 20 20 20 20 20 | #192...0.. |
00001310: 20 42 43 43 20 42 41 55 44 57 35 00 2A 1B 3A 07 | BCC BAUDW5.*.:.|
00001320: AE 20 20 20 20 20 20 53 45 43 00 3E 1B 44 07 AE |. SEC.>.D..|
00001330: 20 20 20 20 20 20 53 42 43 20 23 31 32 38 00 56 | SBC #128.V|
00001340: 1B 4E 07 42 41 55 44 57 35 20 AF 20 23 25 30 31 |.N.BAUDW5 . #%01|
00001350: 31 31 31 31 31 31 00 81 1B 58 07 42 41 55 44 35 |111111...X.BAUD5|
00001360: 31 20 54 41 58 20 20 20 20 20 20 20 20 20 20 20 |1 TAX |
00001370: 20 3B 22 DA 45 49 43 48 45 4E 20 4D 45 52 4B 45 | ;".EICHEN MERKE|
00001380: 4E 00 B7 1B 62 07 42 41 55 44 4C 33 20 4C 44 41 |N...b.BAUDL3 LDA|
00001390: 20 45 4E 41 42 4C 45 20 20 20 20 20 3B 22 C9 53 | ENABLE ;".S|
000013A0: 54 20 44 41 53 20 56 4F 52 48 45 52 49 47 45 20 |T DAS VORHERIGE |
000013B0: DA 45 49 43 48 45 4E 00 E7 1B 6C 07 AE 20 20 20 |.EICHEN...l.. |
000013C0: 20 20 20 AF 20 23 25 30 30 30 30 30 30 30 31 20 | . #%00000001 |
000013D0: 3B 22 53 43 48 4F 4E 20 47 45 53 45 4E FF FF ED |;"SCHON GESEN...|
000013E0: FF FF D0 FF FF FF FF FF FF 6B FF F5 FD FF FF FF |.........k......|
000013F0: FF FF FF FF FF FF FF FF FF EE FF FF FF FF FF FF |................|
00001400: FF FF FF FF FF AE B2 BD FF FF FF FF FF B4 FF D2 |................|
00001410: ED 9D E8 88 99 C6 FF FF 1A 80 80 80 80 80 88 D9 |................|
00001420: FF 94 80 80 80 80 80 80 80 80 80 80 80 80 54 01 |..............T.|
00001430: 78 9D FF AC FF 9D BA 88 FF DD E8 DD 9D AC BC FF |x...............|
00001440: AF 9F 9D B9 80 FF C6 FF FF 1A 80 80 80 80 80 88 |................|
00001450: B8 EC E0 88 AC FF E8 AF DD DA 80 80 80 80 80 54 |...............T|
00001460: 08 DD B9 9A 88 DD 9D A8 9D E0 81 61 64 80 40 44 |...........ad.@D|
00001470: 40 88 9C DD EC AD 9D A8 9D B9 88 FF CF FF 0E 5C |@..............\|
00001480: 81 CC CF FF FF 1A 80 80 80 80 80 88 FF B9 A4 88 |................|
00001490: FF D8 DA 80 80 80 80 80 80 80 80 54 01 78 9D FF |...........T.x..|
000014A0: AD 9D E0 88 9C DD AA 88 9C BC D9 DD 9D 9F B1 3B |...............;|
000014B0: FF 27 50 B4 12 FE FF FF FF FF FF FF 23 FF 73 FF |.'P.........#.s.|
000014C0: 23 FF 2B BB 33 FF FF FF FF FF FF FF FF FF 43 3B |#.+.3.........C;|
000014D0: 61 FF 21 3B FF 26 55 4D 20 45 49 4E 53 00 08 1D |a.!;.&UM EINS...|
000014E0: 9E 07 AE 20 20 20 20 20 20 49 4E 43 20 48 50 54 |... INC HPT|
000014F0: 20 AA 20 31 20 20 20 20 3B 22 49 4E 43 52 45 4D | . 1 ;"INCREM|
00001500: 45 4E 54 49 45 52 45 4E 00 34 1D A8 07 42 41 55 |ENTIEREN.4...BAU|
00001510: 44 57 36 20 4C 44 41 20 50 54 20 20 20 20 20 20 |DW6 LDA PT |
00001520: 20 20 20 3B 22 C9 53 54 20 42 45 52 45 49 54 53 | ;".ST BEREITS|
00001530: 20 44 41 53 00 5F 1D B2 07 AE 20 20 20 20 20 20 | DAS._.... |
00001540: 43 4D 50 20 48 50 54 20 20 20 20 20 20 20 20 3B |CMP HPT ;|
00001550: 22 4C 45 54 5A 54 45 20 DA 45 49 43 48 45 4E 00 |"LETZTE .EICHEN.|
00001560: 8E 1D BC 07 AE 20 20 20 20 20 20 42 4E 45 20 42 |..... BNE B|
00001570: 41 55 44 4C 32 20 20 20 20 20 3B 22 55 45 42 45 |AUDL2 ;"UEBE|
00001580: 52 54 52 41 47 45 4E 20 57 4F 52 44 45 4E 00 C6 |RTRAGEN WORDEN..|
00001590: 1D C6 07 AE 20 20 20 20 20 20 4C 44 41 20 50 54 |.... LDA PT|
000015A0: 20 AA 20 31 20 20 20 20 20 3B 22 CE C5 C9 CE 3A | . 1 ;"....:|
000015B0: 20 3D 3E 20 D7 45 49 54 45 52 20 55 45 42 45 52 | => .EITER UEBER|
000015C0: 54 52 41 47 45 4E 00 DD 1D D0 07 AE 20 20 20 20 |TRAGEN...... |
000015D0: 20 20 43 4D 50 20 48 50 54 20 AA 20 31 00 F3 1D | CMP HPT . 1...|
000015E0: DA 07 AE 20 20 20 20 20 20 42 4E 45 20 42 41 55 |... BNE BAU|
000015F0: 44 4C 32 00 F9 1D E4 07 3B 00 33 1E E6 07 42 41 |DL2.....;.3...BA|
00001600: 55 44 4C 34 20 4A FF FF FF FF FF FF FF FF FF FF |UDL4 J..........|
00001610: FF FF FF FF FF FF FF D0 FF FF ED FF FF FF FF FF |................|
00001620: FF DD FF FF FF D2 FF FF FF FF FF FF FF FF D2 FF |................|
00001630: FF FF FF FF C2 7D FF F5 FD FF FF FF FF FF FF F1 |.....}..........|
00001640: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
00001650: FF D0 DD FF D4 FF FF FF FF D2 FF D6 ED FF FF D0 |................|
00001660: FF FF FF DD FF D2 FF ED FF FF 50 7D FF F5 FD FF |..........P}....|
00001670: FF FF FF FF FF FF FF FF FF FF FF EE FF FF FF FF |................|
00001680: F6 7D 02 F5 FD FF FF FF FF FF FF FF FF FF FF FF |.}..............|
00001690: FF EE FF FF FF FF FF FF FF FF FF FF FF D2 FF FF |................|
000016A0: FF FF FF FF FF D2 FF FF FF FF FF FF 66 FF FF FF |............f...|
000016B0: FF FF FF FF FF FF FD FF FF FF FF FF FF FF FF FF |................|
000016C0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF D2 |................|
000016D0: DA FF 52 49 52 51 53 20 57 49 45 44 45 52 00 02 |..RIRQS WIEDER..|
000016E0: 1F 20 08 AE 20 20 20 20 20 20 B0 41 20 23 31 20 |. .. .A #1 |
000016F0: 20 20 20 20 20 20 20 20 3B 22 45 52 4C 41 55 42 | ;"ERLAUB|
00001700: 45 4E 00 17 1F 2A 08 AE 20 20 20 20 20 20 53 54 |EN...*.. ST|
00001710: 41 20 35 36 33 33 34 00 40 1F 34 08 AE 20 20 20 |A 56334.@.4.. |
00001720: 20 20 20 52 54 53 20 20 20 20 20 20 20 20 20 20 | RTS |
00001730: 20 20 3B 22 D0 52 4F 47 52 41 4D 4D 45 4E 44 45 | ;".ROGRAMMENDE|
00001740: 00 7C 1F FC 08 52 53 4E 41 4D 20 2E 42 59 54 45 |.|...RSNAM .BYTE|
00001750: 20 25 30 30 30 30 30 30 30 30 20 3B 22 31 20 D3 | %00000000 ;"1 .|
00001760: 54 4F 50 42 49 54 2C FF 88 F9 9C D9 9D B9 A8 FF |TOPBIT,.........|
00001770: D9 E4 86 CA FF C0 C0 88 68 9C DD 99 81 CD 4F 09 |........h.....O.|
00001780: FF 1A 80 80 80 80 80 19 A8 FF D9 9E 80 8E C0 C0 |................|
00001790: C0 C0 C0 C0 C0 C0 80 54 01 F8 9C E8 FF D9 FF 88 |.......T........|
000017A0: 99 FF EC 9C A8 9F 9D 9A 8F 69 DD 9F 96 88 F9 DD |.........i......|
000017B0: D8 9F 9D FF 8F 88 FF 4F 1C FF 54 00 44 1F FF FF |.......O..T.D...|
000017C0: B9 9E 88 FF 9C B9 99 EC FF 9C BC 9D 80 7F 4F C0 |..............O.|
000017D0: 09 AE 20 20 20 20 20 2E 42 59 54 45 20 32 20 20 |.. .BYTE 2 |
000017E0: 20 20 20 20 20 20 20 3B 22 D7 45 52 54 45 20 46 | ;".ERTE F|
000017F0: 55 45 52 20 34 38 30 30 20 C2 41 55 44 00 0F 20 |UER 4800 .AUD.. |
00001800: 1A 09 AE 20 20 20 20 20 2E 42 59 54 45 20 30 00 |... .BYTE 0.|
00001810: 15 20 24 09 3B 00 4B 20 2E 09 52 53 54 41 42 20 |. $.;.K ..RSTAB |
00001820: 2E 42 59 54 45 20 B3 42 55 46 20 20 20 20 20 20 |.BYTE .BUF |
00001830: 20 20 20 3B 22 D4 41 42 45 4C 4C 45 4E 20 46 55 | ;".ABELLEN FU|
00001840: 45 52 20 C1 44 52 45 53 53 45 4E 00 7C 20 38 09 |ER .DRESSEN.| 8.|
00001850: AE 20 20 20 20 20 2E 42 59 54 45 20 B1 42 55 46 |. .BYTE .BUF|
00001860: 20 20 20 20 20 20 20 20 20 3B 22 44 45 52 20 D2 | ;"DER .|
00001870: D3 20 32 33 32 20 C2 55 46 46 45 52 00 99 20 42 |. 232 .UFFER.. B|
00001880: 09 AE 20 20 20 20 20 2E 42 59 54 45 20 B3 28 42 |.. .BYTE .(B|
00001890: 55 46 20 AA 20 32 35 36 29 00 B6 20 4C 09 AE 20 |UF . 256).. L.. |
000018A0: 20 20 20 20 2E 42 59 54 45 20 B1 28 42 55 46 20 | .BYTE .(BUF |
000018B0: AA 20 32 35 36 29 00 BD 20 60 EA 2E 80 00 C3 20 |. 256).. `..... |
000018C0: 6A EA 80 00 E2 20 C4 EA 9F 20 31 35 2C 38 2C 31 |j.... ... 15,8,1|
000018D0: 35 2C 22 53 3A 53 45 51 2D 54 52 41 4E 53 56 45 |5,"S:SEQ-TRANSVE|
000018E0: 52 22 00 EB 20 CE EA A0 20 31 35 00 02 21 D8 EA |R".. ... 15..!..|
000018F0: 94 20 22 53 45 51 2D 54 52 41 4E 53 56 45 52 22 |. "SEQ-TRANSVER"|
00001900: 2C 38 00 00 00 |,8... |
....... 100...... 1000.2100.+.... 1920.2
100.;.... 2300.2999.P.D.. 53280,0:. 5328
1,0:. 56325,35:. 646,4:. 650,128...N.. 1
,8,1,"SEQ-TRANSVER .OBJ"...X.. 9.4096...
..;......OPT O1.....;.B. ... $CD00.H...;
.N...;.T...;.Z.G.;...H.;................
.....................I.;.F.R.SETLFS . $F
FBA ;"LOG.FILENR.,GERAETNR.,SKUNDADR.
SETZEN.M...SETNAM . $FFBD ;"FILENAME S
ETZEN...... . $FFC0 ;"FILE OEFFNEN..
....ST . $FFB7 ;"STATUSVARIABLE LESEN.
Z.". . $FFC3 ;"FILE SCHLIESSEN...'.C
HKIN . $FFC6 ;"FILE AUF EINGABE SETZE
N.8.,.CHKOUT . $FFC9 ;"FILE AUF AUSGAB
E SETZEN.`.6.CHROUT . $FFD2 ;"ZEICHEN
AUSGEBEN...;.CHRIN . $FFCF ;"ZEICHEN
HOLEN...@..CHN . $FFCC ;"STANDARDWERTE
FUER I/O SETZEN...J.;...R.CHCKOM . $AEF
D ;"AUF KOMMA TESTEN...|.FRMEVL . $AD9
E ;"AUSDRUCK AUSWERTEN.G....STR . $B6A
6 ;"WEITERE AUSWERTUNGEN FUER STRINGS.
G....BYT . $B79E ;"BYTE HOLEN.M...;...
..PT . $22 ;"ZEIGER AUF TEXTEND
E.B...HPT . $14 ;"ZU SENDENDES BY
TE.....MC.V . $02 ;"FLAG FUER ASCII
-KONVERTIERUNG.$...SYNERR . $AF08 ;"?S
YNTAX ERROR AUSGEBEN.N.X.BUF . $CE00
;"BUFFER FUER RS 232.~.B.RIBUF . $F7
;"ZEIGER AUF EINGABEBUFFER...L.ROBUF
. $F9 ;"ZEIGER AUF AUSGABEBUFFER..
...START . $0801 ;"LADEADRESSE FUER S
EQ-FILE...F.ENABLE . $02A1 ;"RS 232 FL
AG: ALLE ZEICHEN GESENDET?. ...;.G...;"-
-------------------------------.N...;"-
SEQ-TRANSFER -- VERSION 1.0 --.....;"- S
EQ-FILES MIT 4800 BAUD ------.....;"- UE
BER RS 232 SENDEN ----------.....;"- GES
CHRIEBEN VON --------------.....;"-- MAR
TIN MUELLER --------------.1...;"- (C) B
Y ARND WAENGLER, 64'ER --.X...;"--------
------------------------.^...;.....BAUDI
N JSR CHCKOM ;"AUF KOMMA TESTEN.....
. JSR .BYT ;"KONVERTIERUNGSFLAG
NACH...... STX MC.V ;"MCONV H
OLEN...... JSR CHCKOM ;"AUF KOM
MA TESTEN.@.... JSR FRMEVL ;"AU
SDRUCK AUSWERTEN.M.... JSR .STR
;"STRINGAUSWERTUNGEN...... CMP #5
;"LAENGE DES STRINGS < 5 ?.N....
BCS BAUDW1 ;"NEIN: => WEITER..
.$.. JMP SYNERR ;"SONST: SYNTAX
ERROR MELDEN.3...BAUDW1 LDX............
..IW..U.....YY....Y...8.. LDY PT .
1 ;"ADRESSE DES FILENAMEN...B..
JSR SETNAM ;"DEM OS UEBERGEBEN.F.L.
. LDA #1 ;"LOGISCHE FILENUM
MER: 1...V.. LDX #C................
....Z.ER: 8.#.`.. LDY #2 ;"
SEKUNDAERADRESSE: 2.F.J.. JSR SETLF
S ;"SETZEN.O.T.. JSR . ;"
DATEI..Y..Q...U.....E........Y..YW......
..EHLERMELDUNG HOLEN.O.... BEQ BAUD
21 ;"KEIN FEHLER: => WEITER.....BAUD
W2 JSR .CHN ;"STANDARTWERE FUER I/O
SETZEN.2.... LDA #1 ;"FILE
SCHLIESSEN.R...........Z................
.V...*...2............................R.
.......R.T....R....................VR...
.........R.R....................4.......
............T.....................NE BAU
DW2 ;"JA: => ZURUEB|...X......I.....
E...........YYW.Y...........YY....X...Y.
........E............YW.Y.........W.U...
Y.IG..K.....X....QW.O...E.......W.......
..........Y..U....Y.M..Q.Y...Y..U.N...E.
......W.....L..............{ICANFANG)...
..;.....BAUDL1 JSR CHRIN ;"ZEICHEN
VOM FR....P.................. #0
;"UND IN DEN QPEICHER.L.... STA (P
T),Y ;"SCHREIB.N...... INC PT
;"ZEIGER UM...(.. BNE BAUDW3
;"EINS ERHOEHEN.R.2.. INC PT .
1.X.<.;...F.BAUDW3 JSR .ST ;"FEHLER
AUFGETRETEN?.1.P.. BEQ BAUDL1
;"NEIN: => WEITER.Y.Z.. . #%0100000
0 ;"FILE ZU ENDE?...N.. BEQ BAUDW2
;"NEIN: => ZURUECK NACH BASIC.....;.
D...BAUDW4 JSR BAUDW2 ;"DATEI SCHLIE
SSEN.....;"RS 232 SCHNITTSTELLE OEFFNEN.
....;"4800 BAUD, 8...W.U..W.....IW...W.
......O.Y.W..36...3.........3.0..3......
.6-'..@..Y.H.....................H.LH...
......@.....JI.......;........F-Q.......
.3.:..............<..2..3.;......."T-#.
......3.>................|WU...Y....YY..
.......U.. JSR SETLFS ;"SETZEN.$.
... LDA #4 ;"WERTE FUER.G..
.. LDX #.RSNAM ;"RS 232.J....
LDY #.RSNAM ;"SETZEN...... JS
R SETNAM...".. JSR . ;"FILE O
EFFNEN...,.. LDX #3 ;"ZEIGE
R FUER RS 232 BUFFER...6.BAUD@........W.
X..........W..U.....E.......W....X.Q....
.|.E............W.E............W....A.R.
;.R.|.. LDX #1 ;"FILE ALS A
USGABEFR....B...............VP..........
.V...R......C............ #.START ;"V
.................................L.Y..T
;"DAS SEQ-FILE ALS ZEIGER......
STX HPT ;"MERKEN.6.... STY H
PT . 1.C.... LDA 56334 ;"TIMER
IRQ SPERREN.U.... . #254......
STA 56334.....;...B.BAUDL2 LDY #0
;"AKTUELLES ZEICHEN...L.. LDA (H
PT),Y ;"HOLEN...V.. BIT MC.V
;"ZEICHEN KONV...R.................ZS
.........................R....F........
..Z...................ZP.L..........LKA.
.&..........#...#.+.3.........S+..#...A@
&0.R.......#.Q..... #.. .......#...#.+..
..'J.........&............0...... B
NE BAUDW5...&.BAUD41 CMP #192...0..
BCC BAUDW5.*.:.. SEC.>.D.. SB
C #128.V.N.BAUDW5 . #%01111111...X.BAUD5
1 TAX ;"ZEICHEN MERKEN...B.BA
UDL3 LDA ENABLE ;"IST DAS VORHERIGE
ZEICHEN...L.. . #%00000001 ;"SCHON
GESEN.....P......K......................
...............R.....F.........Y........
......T.X.....................F.........
.........Z.....T...........AD.@D@.......
....O..\.LO..............XZ........T.X..
..........Y....;.'P.........#.S.#.+.3...
......C;A.!;.&UM EINS...... INC HPT
. 1 ;"INCREMENTIEREN.4...BAUDW6 LDA
PT ;"IST BEREITS DAS._....
CMP HPT ;"LETZTE ZEICHEN......
BNE BAUDL2 ;"UEBERTRAGEN WORDEN.F
.F.. LDA PT . 1 ;"NEIN: => WEIT
ER UEBERTRAGEN...P.. CMP HPT . 1...
Z.. BNE BAUDL2.....;.3...BAUDL4 J..
...............P.............R........R.
....B}...........................P..T...
.R.V...P.....R....P}....................
.}...........................R.......R..
....F..................................R
Z.RIRQS WIEDER... .. .A #1
;"ERLAUBEN...*.. STA 56334.@.4..
RTS ;"PROGRAMMENDE.|...RSN
AM .BYTE %00000000 ;"1 STOPBIT,....Y....
Y..J....H....MO...........Y............T
.....Y...........I......X......O..T.D...
.............O... .BYTE 2 ;
"WERTE FUER 4800 BAUD.. ... .BYTE 0.
. $.;.K ..RSTAB .BYTE .BUF ;"TAB
ELLEN FUER ADRESSEN.| 8.. .BYTE .BUF
;"DER RS 232 BUFFER.. B.. .
BYTE .(BUF . 256).. L.. .BYTE .(BUF
. 256).. `....C J.... D.. 15,8,15,"S:SEQ
-TRANSVER".. N. 15..!X.. "SEQ-TRANSVER"
,8...
> CLICK IMAGE PREVIEW FOR FULL MODAL