_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

LADEROUTINE [S] 

FILE INFORMATION

FILENAME(S): LADEROUTINE [S] 

FILE TYPE(S): DEL

FILE SIZE: 4.7K

FIRST SEEN: 2025-11-30 01:13:11

APPEARS ON: 1 disk(s)

FILE HASH

34911f296b07ef278065bc8ffe74862c274b4b4d2b03d5637e9925bd979245fe

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
10910 10 899999 LADEROUTINE [S]  DEL C64er 19 16 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: C1 24 43 30 30 30 00 CA  22 40 3A 49 52 51 54 55  |.$C000.."@:IRQTU|
00000010: 52 42 4F 22 00 4C 49 53  54 45 4E C0 24 45 44 30  |RBO".LISTEN.$ED0|
00000020: 43 00 55 4E 4C 49 53 54  45 4E C0 24 45 44 46 45  |C.UNLISTEN.$EDFE|
00000030: 00 49 45 43 4F 55 54 C0  24 45 44 44 44 01 42 59  |.IECOUT.$EDDD.BY|
00000040: 54 45 20 41 55 46 20 42  55 53 20 53 45 4E 44 45  |TE AUF BUS SENDE|
00000050: 4E 00 B3 45 49 4E 53 50  52 55 4E 47 00 B3 4C 41  |N..EINSPRUNG..LA|
00000060: 44 45 4E 00 54 52 41 43  4B 53 45 4B 54 4F 52 C2  |DEN.TRACKSEKTOR.|
00000070: 30 2C 30 00 01 00 01 52  4F 55 54 49 4E 45 20 49  |0,0....ROUTINE I|
00000080: 4D 20 46 4C 4F 50 50 59  53 50 45 49 43 48 45 52  |M FLOPPYSPEICHER|
00000090: 20 41 42 20 24 30 36 30  30 00 01 00 01 00 01 4A  | AB $0600......J|
000000A0: 4F 42 50 52 4F 47 52 41  4D 4D 00 01 00 5A 46 4C  |OBPROGRAMM...ZFL|
000000B0: 4F 50 50 59 8D 23 24 30  33 01 50 55 46 46 45 52  |OPPY.#$03.PUFFER|
000000C0: 20 24 30 33 30 30 00 8C  24 33 31 00 42 4C 4F 41  | $0300..$31.BLOA|
000000D0: 44 B1 24 46 35 30 41 01  42 4C 4F 43 4B 20 4C 41  |D.$F50A.BLOCK LA|
000000E0: 44 45 4E 00 A2 2A 01 4C  49 45 47 54 20 42 59 54  |DEN..*.LIEGT BYT|
000000F0: 45 20 41 4E 3F 00 AD 01  00 8D 24 31 43 30 31 01  |E AN?.....$1C01.|
00000100: 42 59 54 45 20 56 4F 4D  20 4C 45 53 45 2D 00 8C  |BYTE VOM LESE-..|
00000110: 24 30 33 30 30 2C 59 01  4B 4F 50 46 20 49 4E 20  |$0300,Y.KOPF IN |
00000120: 50 33 00 9E 01 53 43 48  52 45 49 42 45 4E 00 A6  |P3...SCHREIBEN..|
00000130: 2A 2D 31 30 00 85 23 24  42 41 01 52 45 53 54 20  |*-10..#$BA.REST |
00000140: 56 4F 4D 20 42 4C 4F 43  4B 00 A2 2A 01 41 42 20  |VOM BLOCK..*.AB |
00000150: 24 30 31 42 41 00 AD 01  41 42 4C 45 47 45 4E 00  |$01BA...ABLEGEN.|
00000160: 8D 24 31 43 30 31 00 8C  24 30 31 30 30 2C 59 00  |.$1C01..$0100,Y.|
00000170: 9E 00 A6 2A 2D 31 30 00  B1 24 46 38 45 30 01 57  |...*-10..$F8E0.W|
00000180: 41 4E 44 45 4C 54 20 47  43 52 2D 57 45 52 54 45  |ANDELT GCR-WERTE|
00000190: 00 8D 24 33 38 00 8E 24  34 37 01 44 41 54 45 4E  |..$38..$47.DATEN|
000001A0: 42 4C 4F 43 4B 3F 00 A7  2A 2B 37 00 8D 23 24 30  |BLOCK?..*+7..#$0|
000001B0: 34 01 44 41 54 45 4E 42  20 4E 49 43 48 54 20 47  |4.DATENB NICHT G|
000001C0: 45 46 2E 00 B3 24 46 39  36 39 01 4A 4F 42 53 43  |EF...$F969.JOBSC|
000001D0: 48 4C 45 49 46 45 00 B1  24 46 35 45 39 01 50 52  |HLEIFE..$F5E9.PR|
000001E0: 55 45 46 53 55 4D 4D 45  20 49 4E 20 41 00 8E 24  |UEFSUMME IN A..$|
000001F0: 33 41 01 53 54 49 4D 4D  54 20 50 52 55 45 46 53  |3A.STIMMT PRUEFS|
00000200: 55 4D 4D 45 3F 00 A7 2A  2B 37 00 8D 23 24 30 35  |UMME?..*+7..#$05|
00000210: 01 50 52 55 45 46 53 55  4D 4D 45 4E 46 45 48 4C  |.PRUEFSUMMENFEHL|
00000220: 45 52 00 B3 24 46 39 36  39 01 4A 4F 42 53 43 48  |ER..$F969.JOBSCH|
00000230: 4C 45 49 46 45 00 8D 24  30 33 30 30 00 A7 4C 42  |LEIFE..$0300..LB|
00000240: 4C 4B 01 4C 45 54 5A 54  45 52 20 42 4C 4F 43 4B  |LK.LETZTER BLOCK|
00000250: 3F 00 95 23 24 30 30 00  8D 24 30 33 30 30 2C 58  |?..#$00..$0300,X|
00000260: 01 53 43 48 4C 45 49 46  45 3A 20 4A 45 44 45 53  |.SCHLEIFE: JEDES|
00000270: 00 B1 24 30 36 38 30 01  42 59 54 45 20 41 55 46  |..$0680.BYTE AUF|
00000280: 20 42 55 53 00 9F 00 A6  2A 2D 37 01 47 41 4E 5A  | BUS....*-7.GANZ|
00000290: 45 52 20 42 4C 4F 43 4B  20 57 45 47 3F 00 8D 24  |ER BLOCK WEG?..$|
000002A0: 30 33 30 30 00 8E 24 30  43 01 54 52 41 43 4B 57  |0300..$0C.TRACKW|
000002B0: 45 43 48 53 45 4C 3F 00  A6 54 52 57 45 43 00 8D  |ECHSEL?..TRWEC..|
000002C0: 24 30 33 30 31 01 4E 45  55 45 52 20 53 45 4B 54  |$0301.NEUER SEKT|
000002D0: 4F 52 00 8C 24 30 44 01  4E 41 43 48 20 24 30 44  |OR..$0D.NACH $0D|
000002E0: 00 8D 24 30 33 30 30 01  4E 45 55 45 52 20 54 52  |..$0300.NEUER TR|
000002F0: 41 43 4B 00 8C 24 30 43  01 4E 41 43 48 20 24 30  |ACK..$0C.NACH $0|
00000300: 43 00 A6 42 4C 4F 41 44  01 4E 41 45 43 48 53 54  |C..BLOAD.NAECHST|
00000310: 45 52 20 42 4C 4F 43 4B  00 54 52 57 45 43 8C 24  |ER BLOCK.TRWEC.$|
00000320: 30 43 01 4E 45 55 45 52  20 54 52 41 43 4B 00 8D  |0C.NEUER TRACK..|
00000330: 24 30 33 30 31 01 4E 45  55 45 52 20 53 45 4B 54  |$0301.NEUER SEKT|
00000340: 4F 52 00 8C 24 30 44 01  4E 41 43 48 20 24 30 44  |OR..$0D.NACH $0D|
00000350: 00 8D 23 24 30 31 01 46  45 48 4C 45 52 46 52 45  |..#$01.FEHLERFRE|
00000360: 49 00 B3 24 46 39 36 39  01 4A 4F 42 53 43 48 4C  |I..$F969.JOBSCHL|
00000370: 45 49 46 45 00 4C 42 4C  4B 95 23 24 30 30 00 97  |EIFE.LBLK.#$00..|
00000380: 24 30 33 30 31 01 45 49  4E 53 20 4D 45 48 52 00  |$0301.EINS MEHR.|
00000390: 8D 24 30 33 30 30 2C 58  01 52 45 53 54 42 59 54  |.$0300,X.RESTBYT|
000003A0: 45 53 20 53 45 4E 44 45  4E 00 B1 24 30 36 38 30  |ES SENDEN..$0680|
000003B0: 00 9F 00 87 24 30 33 30  31 00 A6 2A 2D 31 30 00  |....$0301..*-10.|
000003C0: 8D 23 24 37 46 00 B3 24  46 39 36 39 01 4A 4F 42  |.#$7F..$F969.JOB|
000003D0: 53 43 48 4C 45 49 46 45  00 01 00 01 42 59 54 45  |SCHLEIFE....BYTE|
000003E0: 20 41 55 46 20 42 55 53  20 41 55 53 47 45 42 45  | AUF BUS AUSGEBE|
000003F0: 4E 20 28 24 30 36 38 30  29 00 01 00 8C 24 38 35  |N ($0680)....$85|
00000400: 01 5A 57 49 53 43 48 45  4E 53 50 45 49 43 48 45  |.ZWISCHENSPEICHE|
00000410: 52 4E 00 81 24 31 38 30  30 01 57 41 52 54 45 4E  |RN..$1800.WARTEN|
00000420: 20 41 55 46 20 41 4E 46  52 41 47 45 00 A0 2A 2D  | AUF ANFRAGE..*-|
00000430: 33 01 44 45 53 20 43 4F  4D 50 55 54 45 52 53 00  |3.DES COMPUTERS.|
00000440: 8D 23 24 31 30 01 52 55  45 43 4B 4D 45 4C 44 55  |.#$10.RUECKMELDU|
00000450: 4E 47 00 8C 24 31 38 30  30 00 81 24 31 38 30 30  |NG..$1800..$1800|
00000460: 01 53 59 4E 43 48 52 4F  4E 49 53 41 54 49 4F 4E  |.SYNCHRONISATION|
00000470: 00 A1 2A 2D 33 00 8D 23  24 30 30 01 42 59 54 45  |..*-3..#$00.BYTE|
00000480: 20 5A 55 20 4A 45 57 45  49 4C 53 00 90 24 38 35  | ZU JEWEILS..$85|
00000490: 01 5A 57 45 49 20 42 49  54 53 20 53 45 4E 44 45  |.ZWEI BITS SENDE|
000004A0: 4E 00 91 41 00 90 41 00  90 24 38 35 00 91 41 00  |N..A..A..$85..A.|
000004B0: 90 41 00 8C 24 31 38 30  30 01 41 55 46 20 44 41  |.A..$1800.AUF DA|
000004C0: 54 45 4E 42 55 53 00 8D  23 24 30 30 00 90 24 38  |TENBUS..#$00..$8|
000004D0: 35 00 91 41 00 90 41 00  90 24 38 35 00 91 41 00  |5..A..A..$85..A.|
000004E0: 90 41 00 8C 24 31 38 30  30 01 41 55 46 20 44 41  |.A..$1800.AUF DA|
000004F0: 54 45 4E 42 55 53 00 8D  23 24 30 30 00 90 24 38  |TENBUS..#$00..$8|
00000500: 35 00 91 41 00 90 41 00  90 24 38 35 00 91 41 00  |5..A..A..$85..A.|
00000510: 90 41 00 8C 24 31 38 30  30 01 41 55 46 20 44 41  |.A..$1800.AUF DA|
00000520: 54 45 4E 42 55 53 00 8D  23 24 30 30 00 90 24 38  |TENBUS..#$00..$8|
00000530: 35 00 91 41 00 90 41 00  90 24 38 35 00 91 41 00  |5..A..A..$85..A.|
00000540: 90 41 00 8C 24 31 38 30  30 01 41 55 46 20 44 41  |.A..$1800.AUF DA|
00000550: 54 45 4E 42 55 53 00 BF  00 BF 00 BF 00 8D 23 24  |TENBUS........#$|
00000560: 30 46 01 42 55 53 20 46  52 45 49 4D 41 43 48 45  |0F.BUS FREIMACHE|
00000570: 4E 00 8C 24 31 38 30 30  00 83 00 01 00 01 45 49  |N..$1800......EI|
00000580: 4E 53 50 52 55 4E 47 20  56 4F 4D 20 43 4F 4D 50  |NSPRUNG VOM COMP|
00000590: 55 54 45 52 20 28 24 30  36 43 45 29 00 01 00 B1  |UTER ($06CE)....|
000005A0: 24 44 30 30 35 01 49 4E  49 54 49 41 4C 49 53 49  |$D005.INITIALISI|
000005B0: 45 52 45 4E 00 B1 24 43  31 30 30 01 4C 45 44 20  |EREN..$C100.LED |
000005C0: 41 4E 00 54 52 41 43 4B  53 41 56 45 8D 23 24 31  |AN.TRACKSAVE.#$1|
000005D0: 38 01 54 52 41 43 4B 20  55 4E 44 20 53 45 4B 54  |8.TRACK UND SEKT|
000005E0: 4F 52 00 53 45 4B 54 4F  52 53 41 56 45 95 23 24  |OR.SEKTORSAVE.#$|
000005F0: 31 39 01 49 4E 20 4A 4F  42 50 55 46 46 45 52 00  |19.IN JOBPUFFER.|
00000600: 8C 24 30 43 00 94 24 30  44 00 8C 24 30 33 30 30  |.$0C..$0D..$0300|
00000610: 01 55 4E 44 20 41 52 42  45 49 54 53 50 55 46 46  |.UND ARBEITSPUFF|
00000620: 45 52 00 94 24 30 33 30  31 00 8D 23 24 45 30 01  |ER..$0301..#$E0.|
00000630: 4A 4F 42 50 52 4F 47 52  41 4D 4D 20 49 4D 20 50  |JOBPROGRAMM IM P|
00000640: 33 00 8C 24 30 33 01 41  55 53 46 55 45 48 52 45  |3..$03.AUSFUEHRE|
00000650: 4E 00 8D 24 30 33 01 57  41 52 54 45 4E 20 42 49  |N..$03.WARTEN BI|
00000660: 53 20 4A 4F 42 00 A1 2A  2D 32 01 46 45 52 54 49  |S JOB..*-2.FERTI|
00000670: 47 20 49 53 54 00 8E 23  24 30 32 01 42 4C 4F 43  |G IST..#$02.BLOC|
00000680: 4B 48 45 41 44 45 52 20  4E 49 43 48 54 00 A4 2A  |KHEADER NICHT..*|
00000690: 2D 31 30 01 47 45 46 55  4E 44 45 4E 20 3D 3E 20  |-10.GEFUNDEN => |
000006A0: 4E 4F 43 48 4D 41 4C 00  8E 23 24 37 46 01 50 52  |NOCHMAL..#$7F.PR|
000006B0: 4F 47 52 41 4D 20 46 45  52 54 49 47 3F 00 A7 2A  |OGRAM FERTIG?..*|
000006C0: 2B 35 00 B3 24 45 36 30  41 01 46 45 48 4C 45 52  |+5..$E60A.FEHLER|
000006D0: 4D 45 4C 44 55 4E 47 00  B3 24 43 31 39 45 01 42  |MELDUNG..$C19E.B|
000006E0: 45 46 45 48 4C 53 45 4E  44 45 00 01 00 01 48 4F  |EFEHLSENDE....HO|
000006F0: 4C 54 20 45 49 4E 20 42  59 54 45 20 56 4F 4D 20  |LT EIN BYTE VOM |
00000700: 42 55 53 00 01 00 48 4F  4C 45 4E 8D 23 24 30 42  |BUS...HOLEN.#$0B|
00000710: 01 41 54 4E 2D 53 49 47  4E 41 4C 00 8C 24 44 44  |.ATN-SIGNAL..$DD|
00000720: 30 30 00 8D 24 44 44 30  30 01 41 55 46 20 46 4C  |00..$DD00.AUF FL|
00000730: 4F 50 50 59 20 57 41 52  54 45 4E 00 A0 2A 2D 33  |OPPY WARTEN..*-3|
00000740: 00 48 4F 4C 45 4E 32 8D  23 24 30 33 01 41 54 4E  |.HOLEN2.#$03.ATN|
00000750: 20 4C 4F 45 53 43 48 45  4E 00 8C 24 44 44 30 30  | LOESCHEN..$DD00|
00000760: 00 89 28 24 39 39 2C 58  29 01 56 45 52 5A 4F 45  |..($99,X).VERZOE|
00000770: 47 45 52 55 4E 47 00 89  28 24 39 39 2C 58 29 00  |GERUNG..($99,X).|
00000780: 89 28 24 39 39 2C 58 29  00 89 28 24 39 39 2C 58  |.($99,X)..($99,X|
00000790: 29 00 89 28 24 39 39 2C  58 29 00 8D 24 44 44 30  |)..($99,X)..$DD0|
000007A0: 30 01 57 45 52 54 20 48  4F 48 4C 45 4E 00 90 41  |0.WERT HOHLEN..A|
000007B0: 01 42 59 54 45 20 36 20  26 20 37 20 56 4F 4E 20  |.BYTE 6 & 7 VON |
000007C0: 24 44 44 30 30 00 98 01  53 49 4E 44 20 44 49 45  |$DD00...SIND DIE|
000007D0: 20 55 45 42 45 52 54 52  41 47 45 4E 45 4E 00 90  | UEBERTRAGENEN..|
000007E0: 41 01 44 41 54 45 4E 42  49 54 53 00 91 24 41 34  |A.DATENBITS..$A4|
000007F0: 01 42 59 54 45 20 57 49  52 44 20 49 4E 20 24 41  |.BYTE WIRD IN $A|
00000800: 34 20 57 49 45 44 45 52  00 99 01 5A 55 53 41 4D  |4 WIEDER...ZUSAM|
00000810: 4D 45 4E 47 45 42 41 53  54 45 4C 54 00 91 24 41  |MENGEBASTELT..$A|
00000820: 34 00 8D 24 44 44 30 30  00 90 41 00 98 00 90 41  |4..$DD00..A....A|
00000830: 00 91 24 41 34 00 99 00  91 24 41 34 00 8D 24 44  |..$A4....$A4..$D|
00000840: 44 30 30 00 90 41 00 98  00 90 41 00 91 24 41 34  |D00..A....A..$A4|
00000850: 00 99 00 91 24 41 34 00  8D 24 44 44 30 30 00 90  |....$A4..$DD00..|
00000860: 41 00 98 00 90 41 00 91  24 41 34 00 99 00 91 24  |A....A..$A4....$|
00000870: 41 34 00 8D 24 41 34 01  57 45 52 54 20 49 4D 20  |A4..$A4.WERT IM |
00000880: 41 4B 4B 55 00 8A 23 24  46 46 01 49 4E 56 45 52  |AKKU..#$FF.INVER|
00000890: 54 49 45 52 45 4E 00 83  00 01 00 01 41 4E 46 41  |TIEREN......ANFA|
000008A0: 4E 47 53 41 44 52 45 53  53 45 20 44 45 53 20 50  |NGSADRESSE DES P|
000008B0: 52 4F 47 52 41 4D 4D 53  20 49 4D 20 53 50 45 49  |ROGRAMMS IM SPEI|
000008C0: 43 48 45 52 20 46 45 53  54 4C 45 47 45 4E 00 01  |CHER FESTLEGEN..|
000008D0: 00 41 45 49 43 B1 48 4F  4C 45 4E 01 41 4E 46 41  |.AEIC.HOLEN.ANFA|
000008E0: 4E 47 53 41 44 52 45 53  53 45 00 8C 49 4E 53 50  |NGSADRESSE..INSP|
000008F0: 31 2B 31 01 49 4E 20 49  4E 53 50 31 00 8C 49 4E  |1+1.IN INSP1..IN|
00000900: 53 50 32 2B 31 01 26 20  20 49 4E 53 50 32 00 B1  |SP2+1.&  INSP2..|
00000910: 48 4F 4C 45 4E 01 53 50  45 49 43 48 45 52 4E 00  |HOLEN.SPEICHERN.|
00000920: 8C 49 4E 53 50 31 2B 32  00 8C 49 4E 53 50 32 2B  |.INSP1+2..INSP2+|
00000930: 32 00 83 00 01 00 01 49  4E 49 54 49 41 4C 49 53  |2......INITIALIS|
00000940: 49 45 52 54 20 4C 41 44  45 52 4F 55 54 49 4E 45  |IERT LADEROUTINE|
00000950: 20 49 4E 20 46 4C 4F 50  50 59 00 01 00 45 49 4E  | IN FLOPPY...EIN|
00000960: 53 50 52 55 4E 47 8D 23  24 30 38 01 46 49 4C 45  |SPRUNG.#$08.FILE|
00000970: 4E 55 4D 4D 45 52 00 8C  24 42 38 00 B1 24 46 33  |NUMMER..$B8..$F3|
00000980: 32 46 01 43 4C 41 4C 4C  20 2D 20 53 43 48 4C 49  |2F.CLALL - SCHLI|
00000990: 45 53 53 54 20 4F 46 46  45 4E 45 20 46 49 4C 45  |ESST OFFENE FILE|
000009A0: 53 00 8D 23 24 36 30 01  24 36 30 20 41 4C 53 00  |S..#$60.$60 ALS.|
000009B0: 8C 24 42 39 01 53 45 4B  55 4E 44 41 45 52 41 44  |.$B9.SEKUNDAERAD|
000009C0: 52 45 53 53 45 00 8D 23  3C 5A 46 4C 4F 50 50 59  |RESSE..#<ZFLOPPY|
000009D0: 01 44 41 54 45 4E 20 46  55 45 52 20 46 4C 4F 50  |.DATEN FUER FLOP|
000009E0: 50 59 00 8C 24 30 33 01  41 42 20 27 5A 46 4C 4F  |PY..$03.AB 'ZFLO|
000009F0: 50 50 59 27 00 8D 23 3E  5A 46 4C 4F 50 50 59 00  |PPY'..#>ZFLOPPY.|
00000A00: 8C 24 30 34 00 8D 23 24  30 30 01 49 4E 20 46 4C  |.$04..#$00.IN FL|
00000A10: 4F 50 50 59 20 41 42 20  24 36 30 30 00 8C 24 30  |OPPY AB $600..$0|
00000A20: 35 01 28 44 49 52 2E 42  4C 4F 43 4B 29 00 8D 23  |5.(DIR.BLOCK)..#|
00000A30: 24 30 36 00 8C 24 30 36  00 4D 57 53 43 48 4C 45  |$06..$06.MWSCHLE|
00000A40: 49 46 45 8D 23 24 30 38  01 47 45 52 41 45 54 45  |IFE.#$08.GERAETE|
00000A50: 4E 52 2E 00 B1 4C 49 53  54 45 4E 00 8D 23 24 36  |NR...LISTEN..#$6|
00000A60: 46 01 53 45 4B 55 4E 44  41 45 52 00 B1 24 45 44  |F.SEKUNDAER..$ED|
00000A70: 42 39 01 4E 41 43 48 20  4C 49 53 54 45 4E 20 53  |B9.NACH LISTEN S|
00000A80: 45 4E 44 45 4E 00 8D 23  24 34 44 01 27 4D 2D 57  |ENDEN..#$4D.'M-W|
00000A90: 27 2C 30 2C 36 2C 38 00  B1 49 45 43 4F 55 54 00  |',0,6,8..IECOUT.|
00000AA0: 8D 23 24 32 44 00 B1 49  45 43 4F 55 54 00 8D 23  |.#$2D..IECOUT..#|
00000AB0: 24 35 37 00 B1 49 45 43  4F 55 54 00 8D 24 30 35  |$57..IECOUT..$05|
00000AC0: 00 B1 49 45 43 4F 55 54  00 8D 24 30 36 00 B1 49  |..IECOUT..$06..I|
00000AD0: 45 43 4F 55 54 00 8D 23  24 32 30 00 B1 49 45 43  |ECOUT..#$20..IEC|
00000AE0: 4F 55 54 00 85 23 24 30  30 01 44 41 54 45 4E 20  |OUT..#$00.DATEN |
00000AF0: 53 45 4E 44 45 4E 00 8D  28 24 30 33 29 2C 59 00  |SENDEN..($03),Y.|
00000B00: B1 49 45 43 4F 55 54 00  9E 00 86 23 24 32 30 00  |.IECOUT....#$20.|
00000B10: A4 2A 2D 38 00 B1 55 4E  4C 49 53 54 45 4E 00 A8  |.*-8..UNLISTEN..|
00000B20: 00 8D 24 30 33 01 5A 45  49 47 45 52 20 49 4D 00  |..$03.ZEIGER IM.|
00000B30: 8B 23 24 38 01 43 4F 4D  50 55 54 45 52 20 55 4D  |.#$8.COMPUTER UM|
00000B40: 00 8C 24 30 33 01 24 32  30 20 45 52 48 4F 45 48  |..$03.$20 ERHOEH|
00000B50: 45 4E 00 A4 2A 2B 34 00  97 24 30 34 00 A8 00 8D  |EN..*+4..$04....|
00000B60: 24 30 35 01 5A 45 49 47  45 52 20 49 4D 00 8B 23  |$05.ZEIGER IM..#|
00000B70: 24 38 01 46 4C 4F 50 50  59 50 55 46 46 45 52 20  |$8.FLOPPYPUFFER |
00000B80: 55 4D 00 8C 24 30 35 01  24 32 30 20 45 52 48 4F  |UM..$05.$20 ERHO|
00000B90: 45 48 45 4E 00 A4 2A 2B  34 00 97 24 30 36 00 95  |EHEN..*+4..$06..|
00000BA0: 24 30 36 01 49 4E 53 47  45 53 41 4D 54 20 43 41  |$06.INSGESAMT CA|
00000BB0: 2E 32 35 36 00 87 23 24  30 37 01 44 41 54 45 4E  |.256..#$07.DATEN|
00000BC0: 00 A4 4D 57 53 43 48 4C  45 49 46 45 00 83 00 01  |..MWSCHLEIFE....|
00000BD0: 00 01 57 41 52 54 45 4E  20 41 55 46 20 42 49 4C  |..WARTEN AUF BIL|
00000BE0: 44 53 43 48 49 52 4D 52  41 4E 44 00 01 00 4B 4F  |DSCHIRMRAND...KO|
00000BF0: 4D 50 41 45 52 8D 23 24  46 41 00 8E 24 44 30 31  |MPAER.#$FA..$D01|
00000C00: 32 00 A6 2A 2D 33 00 83  00 01 00 01 4C 41 44 45  |2..*-3......LADE|
00000C10: 52 4F 55 54 49 4E 45 00  01 00 4D 57 45 4F 52 C2  |ROUTINE...MWEOR.|
00000C20: 30 00 4D 57 54 45 58 54  C2 24 34 44 2C 24 32 44  |0.MWTEXT.$4D,$2D|
00000C30: 2C 24 35 37 2C 24 44 35  2C 24 30 36 2C 24 30 33  |,$57,$D5,$06,$03|
00000C40: 2C 24 31 32 2C 24 41 32  2C 24 30 30 00 4C 41 44  |,$12,$A2,$00.LAD|
00000C50: 45 4E 8D 54 52 41 43 4B  53 45 4B 54 4F 52 01 54  |EN.TRACKSEKTOR.T|
00000C60: 52 41 43 4B 20 55 4E 44  20 53 45 4B 54 4F 52 00  |RACK UND SEKTOR.|
00000C70: 8C 4D 57 54 45 58 54 2B  36 01 44 45 53 20 5A 55  |.MWTEXT+6.DES ZU|
00000C80: 20 4C 41 44 45 4E 44 45  4E 00 8D 54 52 41 43 4B  | LADENDEN..TRACK|
00000C90: 53 45 4B 54 4F 52 2B 31  01 46 49 4C 45 53 20 55  |SEKTOR+1.FILES U|
00000CA0: 45 42 45 52 47 45 42 45  4E 00 8C 4D 57 54 45 58  |EBERGEBEN..MWTEX|
00000CB0: 54 2B 38 00 8D 23 30 00  8C 4D 57 45 4F 52 00 B1  |T+8..#0..MWEOR..|
00000CC0: 4B 4F 4D 50 41 45 52 00  8D 23 24 30 38 01 47 45  |KOMPAER..#$08.GE|
00000CD0: 52 41 45 54 45 4E 52 2E  00 B1 4C 49 53 54 45 4E  |RAETENR...LISTEN|
00000CE0: 00 8D 23 24 36 46 01 53  45 4B 55 4E 44 41 45 52  |..#$6F.SEKUNDAER|
00000CF0: 00 B1 24 45 44 42 39 01  4E 41 43 48 20 4C 49 53  |..$EDB9.NACH LIS|
00000D00: 54 45 4E 20 53 45 4E 44  45 4E 00 85 23 30 00 4C  |TEN SENDEN..#0.L|
00000D10: 41 44 45 4E 31 4C 4F 4F  50 8D 4D 57 54 45 58 54  |ADEN1LOOP.MWTEXT|
00000D20: 2C 59 01 27 4D 2D 57 20  32 31 33 2C 36 2C 33 2C  |,Y.'M-W 213,6,3,|
00000D30: 31 38 2C 31 36 32 2C 30  27 00 B1 49 45 43 4F 55  |18,162,0'..IECOU|
00000D40: 54 01 54 52 41 43 4B 20  26 20 53 45 4B 54 4F 52  |T.TRACK & SEKTOR|
00000D50: 20 41 4E 20 46 4C 4F 50  50 59 00 97 4D 57 45 4F  | AN FLOPPY..MWEO|
00000D60: 52 00 8D 4D 57 45 4F 52  01 4E 41 43 48 20 5A 57  |R..MWEOR.NACH ZW|
00000D70: 45 49 20 44 41 54 45 4E  00 89 23 31 01 41 55 46  |EI DATEN..#1.AUF|
00000D80: 20 42 49 4C 44 53 43 48  49 52 4D 52 41 4E 44 20  | BILDSCHIRMRAND |
00000D90: 57 41 52 54 45 4E 00 A7  57 45 49 54 45 52 00 B1  |WARTEN..WEITER..|
00000DA0: 4B 4F 4D 50 41 45 52 00  57 45 49 54 45 52 9E 00  |KOMPAER.WEITER..|
00000DB0: 86 23 39 00 A6 4C 41 44  45 4E 31 4C 4F 4F 50 00  |.#9..LADEN1LOOP.|
00000DC0: B1 55 4E 4C 49 53 54 45  4E 00 01 00 01 50 52 4F  |.UNLISTEN....PRO|
00000DD0: 47 52 41 4D 4D 20 49 4E  20 44 45 52 20 46 4C 4F  |GRAMM IN DER FLO|
00000DE0: 50 50 59 20 53 54 41 52  54 45 4E 00 01 00 B1 4B  |PPY STARTEN....K|
00000DF0: 4F 4D 50 41 45 52 00 8D  23 24 30 38 00 B1 4C 49  |OMPAER..#$08..LI|
00000E00: 53 54 45 4E 00 8D 23 24  36 46 01 53 45 4B 55 4E  |STEN..#$6F.SEKUN|
00000E10: 44 41 45 52 41 44 52 45  53 53 45 00 B1 24 45 44  |DAERADRESSE..$ED|
00000E20: 42 39 01 4E 41 43 48 20  4C 49 53 54 45 4E 20 53  |B9.NACH LISTEN S|
00000E30: 45 4E 44 45 4E 00 8D 23  24 34 44 01 27 4D 2D 45  |ENDEN..#$4D.'M-E|
00000E40: 27 2C 24 30 36 43 45 00  B1 49 45 43 4F 55 54 01  |',$06CE..IECOUT.|
00000E50: 53 45 4E 44 45 4E 00 8D  23 24 32 44 00 B1 49 45  |SENDEN..#$2D..IE|
00000E60: 43 4F 55 54 00 B1 4B 4F  4D 50 41 45 52 00 8D 23  |COUT..KOMPAER..#|
00000E70: 24 34 35 00 B1 49 45 43  4F 55 54 00 8D 23 24 43  |$45..IECOUT..#$C|
00000E80: 45 00 B1 49 45 43 4F 55  54 00 B1 4B 4F 4D 50 41  |E..IECOUT..KOMPA|
00000E90: 45 52 00 8D 23 24 30 36  00 B1 49 45 43 4F 55 54  |ER..#$06..IECOUT|
00000EA0: 00 B1 55 4E 4C 49 53 54  45 4E 00 95 23 24 30 34  |..UNLISTEN..#$04|
00000EB0: 00 01 00 01 57 41 52 54  45 4E 2C 20 42 49 53 20  |....WARTEN, BIS |
00000EC0: 53 45 4B 54 4F 52 20 49  4D 20 46 4C 4F 50 50 59  |SEKTOR IM FLOPPY|
00000ED0: 50 55 46 46 45 52 20 56  4F 52 4C 49 45 47 54 00  |PUFFER VORLIEGT.|
00000EE0: 01 00 53 45 4B 54 4F 52  52 45 41 44 8D 23 24 30  |..SEKTORREAD.#$0|
00000EF0: 42 01 41 54 4E 2D 53 49  47 4E 41 4C 00 8C 24 44  |B.ATN-SIGNAL..$D|
00000F00: 44 30 30 00 53 45 4B 54  4F 52 52 45 41 44 42 8D  |D00.SEKTORREADB.|
00000F10: 23 24 46 39 00 8E 24 44  30 31 32 00 A6 2A 2D 33  |#$F9..$D012..*-3|
00000F20: 00 8D 24 44 30 31 32 00  8E 24 44 30 31 32 00 A7  |..$D012..$D012..|
00000F30: 2A 2D 33 00 8D 24 44 44  30 30 01 46 4C 4F 50 50  |*-3..$DD00.FLOPP|
00000F40: 59 20 42 45 52 45 49 54  3F 00 A0 53 45 4B 54 4F  |Y BEREIT?..SEKTO|
00000F50: 52 52 45 41 44 42 00 B1  48 4F 4C 45 4E 32 01 42  |RREADB..HOLEN2.B|
00000F60: 59 54 45 20 48 4F 4C 45  4E 00 A7 4C 53 45 4B 54  |YTE HOLEN..LSEKT|
00000F70: 4F 52 01 4C 45 54 5A 54  45 52 20 53 45 4B 54 4F  |OR.LETZTER SEKTO|
00000F80: 52 3F 00 B1 48 4F 4C 45  4E 01 42 59 54 45 20 48  |R?..HOLEN.BYTE H|
00000F90: 4F 4C 45 4E 00 87 23 24  30 32 01 41 4E 46 41 4E  |OLEN..#$02.ANFAN|
00000FA0: 47 20 53 43 48 4F 4E 20  47 45 2D 00 A7 2A 2B 35  |G SCHON GE-..*+5|
00000FB0: 01 53 45 54 5A 54 3F 00  B1 41 45 49 43 00 B1 4B  |.SETZT?..AEIC..K|
00000FC0: 4F 4D 50 41 45 52 00 01  00 01 45 49 4E 4C 41 44  |OMPAER....EINLAD|
00000FD0: 45 4E 20 45 49 4E 45 53  20 53 45 4B 54 4F 52 53  |EN EINES SEKTORS|
00000FE0: 00 01 00 85 23 24 32 31  01 33 33 20 44 41 54 45  |....#$21.33 DATE|
00000FF0: 4E 20 57 45 52 44 45 4E  20 49 4D 00 53 44 52 49  |N WERDEN IM.SDRI|
00001000: 4E 30 9C 01 42 49 4C 44  53 43 48 49 52 4D 52 41  |N0..BILDSCHIRMRA|
00001010: 48 4D 45 4E 20 47 45 4C  41 44 45 4E 00 A6 53 44  |HMEN GELADEN..SD|
00001020: 52 49 4E 00 B1 4B 4F 4D  50 41 45 52 00 B3 53 44  |RIN..KOMPAER..SD|
00001030: 52 49 4E 30 2D 32 00 53  44 52 49 4E B1 48 4F 4C  |RIN0-2.SDRIN.HOL|
00001040: 45 4E 01 44 41 54 45 4E  20 48 4F 4C 45 4E 00 49  |EN.DATEN HOLEN.I|
00001050: 4E 53 50 31 8C 24 30 38  30 31 00 97 49 4E 53 50  |NSP1.$0801..INSP|
00001060: 31 2B 31 01 41 4B 54 55  45 4C 4C 45 20 53 50 45  |1+1.AKTUELLE SPE|
00001070: 49 43 48 45 52 41 44 52  45 53 53 45 00 97 49 4E  |ICHERADRESSE..IN|
00001080: 53 50 32 2B 31 01 45 52  48 4F 45 48 45 4E 00 A6  |SP2+1.ERHOEHEN..|
00001090: 2A 2B 38 00 97 49 4E 53  50 31 2B 32 00 97 49 4E  |*+8..INSP1+2..IN|
000010A0: 53 50 32 2B 32 00 9F 00  A6 53 44 52 49 4E 30 01  |SP2+2....SDRIN0.|
000010B0: 53 45 4B 54 4F 52 20 56  4F 4C 53 54 41 45 4E 44  |SEKTOR VOLSTAEND|
000010C0: 49 47 20 47 45 4C 41 44  45 4E 3F 00 95 23 24 30  |IG GELADEN?..#$0|
000010D0: 32 00 A6 53 45 4B 54 4F  52 52 45 41 44 01 4E 41  |2..SEKTORREAD.NA|
000010E0: 45 43 48 53 54 45 52 20  53 45 4B 54 4F 52 00 01  |ECHSTER SEKTOR..|
000010F0: 00 01 45 49 4E 4C 45 53  45 4E 20 44 45 52 20 44  |..EINLESEN DER D|
00001100: 41 54 45 4E 20 56 4F 4D  20 4C 45 54 5A 54 45 4E  |ATEN VOM LETZTEN|
00001110: 20 50 52 4F 47 52 41 4D  4D 42 4C 4F 43 4B 00 01  | PROGRAMMBLOCK..|
00001120: 00 4C 53 45 4B 54 4F 52  B1 4B 4F 4D 50 41 45 52  |.LSEKTOR.KOMPAER|
00001130: 00 B1 48 4F 4C 45 4E 00  87 23 24 30 32 01 41 4E  |..HOLEN..#$02.AN|
00001140: 46 41 4E 47 2B 45 4E 44  45 20 53 43 48 4F 4E 00  |FANG+ENDE SCHON.|
00001150: A7 2A 2B 37 01 47 45 53  45 54 5A 54 3F 00 9A 00  |.*+7.GESETZT?...|
00001160: B1 41 45 49 43 00 9B 00  BB 01 41 4E 5A 41 48 4C  |.AEIC.....ANZAHL|
00001170: 20 56 45 52 42 4C 45 49  42 45 4E 44 45 52 00 BD  | VERBLEIBENDER..|
00001180: 01 42 59 54 45 53 20 2D  32 20 49 4E 20 58 00 BD  |.BYTES -2 IN X..|
00001190: 00 85 23 24 32 31 00 53  44 52 49 4E 31 9C 00 A6  |..#$21.SDRIN1...|
000011A0: 53 44 52 49 4E 32 00 B1  4B 4F 4D 50 41 45 52 00  |SDRIN2..KOMPAER.|
000011B0: B3 53 44 52 49 4E 31 2D  32 00 53 44 52 49 4E 32  |.SDRIN1-2.SDRIN2|
000011C0: B1 48 4F 4C 45 4E 01 52  45 53 54 4C 49 43 48 45  |.HOLEN.RESTLICHE|
000011D0: 20 44 41 54 45 4E 00 49  4E 53 50 32 8C 24 30 38  | DATEN.INSP2.$08|
000011E0: 30 31 01 4C 45 53 45 4E  20 55 4E 44 20 41 42 53  |01.LESEN UND ABS|
000011F0: 50 45 49 2D 00 97 49 4E  53 50 32 2B 31 01 43 48  |PEI-..INSP2+1.CH|
00001200: 45 52 4E 00 A6 2A 2B 35  00 97 49 4E 53 50 32 2B  |ERN..*+5..INSP2+|
00001210: 32 00 BD 00 A6 53 44 52  49 4E 31 01 41 4C 4C 45  |2....SDRIN1.ALLE|
00001220: 20 44 41 54 45 4E 20 44  52 49 4E 3F 00 01 00 01  | DATEN DRIN?....|
00001230: 46 4C 4F 50 50 59 20 49  4E 49 54 49 41 4C 49 53  |FLOPPY INITIALIS|
00001240: 49 45 52 45 4E 00 01 00  B1 4B 4F 4D 50 41 45 52  |IEREN....KOMPAER|
00001250: 00 8D 23 24 30 38 00 B1  4C 49 53 54 45 4E 00 8D  |..#$08..LISTEN..|
00001260: 23 24 36 46 00 B1 24 45  44 42 39 01 53 45 4B 55  |#$6F..$EDB9.SEKU|
00001270: 4E 44 41 45 52 41 44 52  45 53 53 45 00 8D 23 24  |NDAERADRESSE..#$|
00001280: 34 39 01 27 49 27 2D 42  45 46 45 48 4C 00 B1 49  |49.'I'-BEFEHL..I|
00001290: 45 43 4F 55 54 00 B1 4B  4F 4D 50 41 45 52 00 B1  |ECOUT..KOMPAER..|
000012A0: 55 4E 4C 49 53 54 45 4E  00 95 49 4E 53 50 32 2B  |UNLISTEN..INSP2+|
000012B0: 31 00 94 24 41 45 01 45  4E 44 45 41 44 52 45 53  |1..$AE.ENDEADRES|
000012C0: 53 45 20 49 4E 00 85 49  4E 53 50 32 2B 32 01 24  |SE IN..INSP2+2.$|
000012D0: 41 45 20 26 20 24 41 46  00 84 24 41 46 01 58 20  |AE & $AF..$AF.X |
000012E0: 26 20 59 00 A8 00 83 00  C6 00                    |& Y.......      |
A$C000.J"@:IRQTURBO".LISTEN.$ED0C.UNLIST
EN.$EDFE.IECOUT.$EDDD.BYTE AUF BUS SENDE
N..EINSPRUNG..LADEN.TRACKSEKTORB0,0....R
OUTINE IM FLOPPYSPEICHER AB $0600......J
OBPROGRAMM...ZFLOPPY.#$03.PUFFER $0300..
$31.BLOAD.$F50A.BLOCK LADEN..*.LIEGT BYT
E AN?.....$1C01.BYTE VOM LESE-..$0300,Y.
KOPF IN P3...SCHREIBEN..*-10..#$BA.REST 
VOM BLOCK..*.AB $01BA...ABLEGEN..$1C01..
$0100,Y....*-10..$F8E0.WANDELT GCR-WERTE
..$38..$47.DATENBLOCK?..*+7..#$04.DATENB
 NICHT GEF...$F969.JOBSCHLEIFE..$F5E9.PR
UEFSUMME IN A..$3A.STIMMT PRUEFSUMME?..*
+7..#$05.PRUEFSUMMENFEHLER..$F969.JOBSCH
LEIFE..$0300..LBLK.LETZTER BLOCK?..#$00.
.$0300,X.SCHLEIFE: JEDES..$0680.BYTE AUF
 BUS....*-7.GANZER BLOCK WEG?..$0300..$0
C.TRACKWECHSEL?..TRWEC..$0301.NEUER SEKT
OR..$0D.NACH $0D..$0300.NEUER TRACK..$0C
.NACH $0C..BLOAD.NAECHSTER BLOCK.TRWEC.$
0C.NEUER TRACK..$0301.NEUER SEKTOR..$0D.
NACH $0D..#$01.FEHLERFREI..$F969.JOBSCHL
EIFE.LBLK.#$00..$0301.EINS MEHR..$0300,X
.RESTBYTES SENDEN..$0680....$0301..*-10.
.#$7F..$F969.JOBSCHLEIFE....BYTE AUF BUS
 AUSGEBEN ($0680)....$85.ZWISCHENSPEICHE
RN..$1800.WARTEN AUF ANFRAGE. *-3.DES CO
MPUTERS..#$10.RUECKMELDUNG..$1800..$1800
.SYNCHRONISATION..*-3..#$00.BYTE ZU JEWE
ILS..$85.ZWEI BITS SENDEN..A..A..$85..A.
.A..$1800.AUF DATENBUS..#$00..$85..A..A.
.$85..A..A..$1800.AUF DATENBUS..#$00..$8
5..A..A..$85..A..A..$1800.AUF DATENBUS..
#$00..$85..A..A..$85..A..A..$1800.AUF DA
TENBUS........#$0F.BUS FREIMACHEN..$1800
......EINSPRUNG VOM COMPUTER ($06CE)....
$D005.INITIALISIEREN..$C100.LED AN.TRACK
SAVE.#$18.TRACK UND SEKTOR.SEKTORSAVE.#$
19.IN JOBPUFFER..$0C..$0D..$0300.UND ARB
EITSPUFFER..$0301..#$E0.JOBPROGRAMM IM P
3..$03.AUSFUEHREN..$03.WARTEN BIS JOB..*
-2.FERTIG IST..#$02.BLOCKHEADER NICHT..*
-10.GEFUNDEN => NOCHMAL..#$7F.PROGRAM FE
RTIG?..*+5..$E60A.FEHLERMELDUNG..$C19E.B
EFEHLSENDE....HOLT EIN BYTE VOM BUS...HO
LEN.#$0B.ATN-SIGNAL..$DD00..$DD00.AUF FL
OPPY WARTEN. *-3.HOLEN2.#$03.ATN LOESCHE
N..$DD00..($99,X).VERZOEGERUNG..($99,X).
.($99,X)..($99,X)..($99,X)..$DD00.WERT H
OHLEN..A.BYTE 6 & 7 VON $DD00...SIND DIE
 UEBERTRAGENEN..A.DATENBITS..$A4.BYTE WI
RD IN $A4 WIEDER...ZUSAMMENGEBASTELT..$A
4..$DD00..A....A..$A4....$A4..$DD00..A..
..A..$A4....$A4..$DD00..A....A..$A4....$
A4..$A4.WERT IM AKKU..#$FF.INVERTIEREN..
....ANFANGSADRESSE DES PROGRAMMS IM SPEI
CHER FESTLEGEN...AEIC.HOLEN.ANFANGSADRES
SE..INSP1+1.IN INSP1..INSP2+1.&  INSP2..
HOLEN.SPEICHERN..INSP1+2..INSP2+2......I
NITIALISIERT LADEROUTINE IN FLOPPY...EIN
SPRUNG.#$08.FILENUMMER..$B8..$F32F.CLALL
 - SCHLIESST OFFENE FILES..#$60.$60 ALS.
.$B9.SEKUNDAERADRESSE..#<ZFLOPPY.DATEN F
UER FLOPPY..$03.AB 'ZFLOPPY'..#>ZFLOPPY.
.$04..#$00.IN FLOPPY AB $600..$05.(DIR.B
LOCK)..#$06..$06.MWSCHLEIFE.#$08.GERAETE
NR...LISTEN..#$6F.SEKUNDAER..$EDB9.NACH 
LISTEN SENDEN..#$4D.'M-W',0,6,8..IECOUT.
.#$2D..IECOUT..#$57..IECOUT..$05..IECOUT
..$06..IECOUT..#$20..IECOUT..#$00.DATEN 
SENDEN..($03),Y..IECOUT....#$20..*-8..UN
LISTEN....$03.ZEIGER IM..#$8.COMPUTER UM
..$03.$20 ERHOEHEN..*+4..$04....$05.ZEIG
ER IM..#$8.FLOPPYPUFFER UM..$05.$20 ERHO
EHEN..*+4..$06..$06.INSGESAMT CA.256..#$
07.DATEN..MWSCHLEIFE......WARTEN AUF BIL
DSCHIRMRAND...KOMPAER.#$FA..$D012..*-3..
....LADEROUTINE...MWEORB0.MWTEXTB$4D,$2D
,$57,$D5,$06,$03,$12,$A2,$00.LADEN.TRACK
SEKTOR.TRACK UND SEKTOR..MWTEXT+6.DES ZU
 LADENDEN..TRACKSEKTOR+1.FILES UEBERGEBE
N..MWTEXT+8..#0..MWEOR..KOMPAER..#$08.GE
RAETENR...LISTEN..#$6F.SEKUNDAER..$EDB9.
NACH LISTEN SENDEN..#0.LADEN1LOOP.MWTEXT
,Y.'M-W 213,6,3,18,162,0'..IECOUT.TRACK 
& SEKTOR AN FLOPPY..MWEOR..MWEOR.NACH ZW
EI DATEN..#1.AUF BILDSCHIRMRAND WARTEN..
WEITER..KOMPAER.WEITER...#9..LADEN1LOOP.
.UNLISTEN....PROGRAMM IN DER FLOPPY STAR
TEN....KOMPAER..#$08..LISTEN..#$6F.SEKUN
DAERADRESSE..$EDB9.NACH LISTEN SENDEN..#
$4D.'M-E',$06CE..IECOUT.SENDEN..#$2D..IE
COUT..KOMPAER..#$45..IECOUT..#$CE..IECOU
T..KOMPAER..#$06..IECOUT..UNLISTEN..#$04
....WARTEN, BIS SEKTOR IM FLOPPYPUFFER V
ORLIEGT...SEKTORREAD.#$0B.ATN-SIGNAL..$D
D00.SEKTORREADB.#$F9..$D012..*-3..$D012.
.$D012..*-3..$DD00.FLOPPY BEREIT?. SEKTO
RREADB..HOLEN2.BYTE HOLEN..LSEKTOR.LETZT
ER SEKTOR?..HOLEN.BYTE HOLEN..#$02.ANFAN
G SCHON GE-..*+5.SETZT?..AEIC..KOMPAER..
..EINLADEN EINES SEKTORS....#$21.33 DATE
N WERDEN IM.SDRIN0..BILDSCHIRMRAHMEN GEL
ADEN..SDRIN..KOMPAER..SDRIN0-2.SDRIN.HOL
EN.DATEN HOLEN.INSP1.$0801..INSP1+1.AKTU
ELLE SPEICHERADRESSE..INSP2+1.ERHOEHEN..
*+8..INSP1+2..INSP2+2....SDRIN0.SEKTOR V
OLSTAENDIG GELADEN?..#$02..SEKTORREAD.NA
ECHSTER SEKTOR....EINLESEN DER DATEN VOM
 LETZTEN PROGRAMMBLOCK...LSEKTOR.KOMPAER
..HOLEN..#$02.ANFANG+ENDE SCHON..*+7.GES
ETZT?....AEIC.....ANZAHL VERBLEIBENDER..
.BYTES -2 IN X....#$21.SDRIN1...SDRIN2..
KOMPAER..SDRIN1-2.SDRIN2.HOLEN.RESTLICHE
 DATEN.INSP2.$0801.LESEN UND ABSPEI-..IN
SP2+1.CHERN..*+5..INSP2+2....SDRIN1.ALLE
 DATEN DRIN?....FLOPPY INITIALISIEREN...
.KOMPAER..#$08..LISTEN..#$6F..$EDB9.SEKU
NDAERADRESSE..#$49.'I'-BEFEHL..IECOUT..K
OMPAER..UNLISTEN..INSP2+1..$AE.ENDEADRES
SE IN..INSP2+2.$AE & $AF..$AF.X & Y.....
F.
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL