/ Go64! / Go64_1998-11_1998_CSW_Side_A.d64 / sam_SRC

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 2a 2a 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 2a 2a 2a | 2a 2a 2a 2a 2a 2a 00 3b |********|******.;|
|00000030| 2a 20 35 2d 6d 69 6e 7d | 74 69 67 65 20 57 41 56 |* 5-min}|tige WAV|
|00000040| 73 20 61 75 66 20 65 69 | 6e 65 6d 20 43 36 34 20 |s auf ei|nem C64 |
|00000050| 61 62 73 70 69 65 6c 65 | 6e 20 3f 20 48 61 21 20 |abspiele|n ? Ha! |
|00000060| 48 61 21 20 48 61 21 20 | 2a 00 3b 2a 20 53 69 6c |Ha! Ha! |*.;* Sil|
|00000070| 65 6e 74 20 57 61 72 72 | 69 6f 72 20 70 72 65 73 |ent Warr|ior pres|
|00000080| 65 6e 74 73 20 52 61 6d | 45 78 44 69 67 69 50 6c |ents Ram|ExDigiPl|
|00000090| 61 79 65 72 20 56 31 20 | 20 20 20 20 20 20 20 20 |ayer V1 |        |
|000000a0| 20 20 20 20 20 2a 00 3b | 2a 2a 2a 2a 2a 2a 2a 2a |     *.;|********|
|000000b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000d0| 2a 2a 2a 2a 2a 00 3b 50 | 72 6f 6a 65 63 74 20 73 |*****.;P|roject s|
|000000e0| 74 61 72 74 65 64 20 61 | 74 20 33 31 2f 30 31 2f |tarted a|t 31/01/|
|000000f0| 39 38 00 3b 43 6f 6e 76 | 65 72 74 2d 50 61 72 74 |98.;Conv|ert-Part|
|00000100| 00 00 2e 44 4e 41 4d 45 | 20 53 41 4d 5f 66 6d 74 |...DNAME| SAM_fmt|
|00000110| 00 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|00000120| 3b 4e 61 6d 65 20 64 65 | 72 20 61 73 73 65 6d 62 |;Name de|r assemb|
|00000130| 6c 69 65 72 74 65 6e 20 | 44 61 74 65 69 00 2e 4e |lierten |Datei..N|
|00000140| 61 6d 65 20 22 44 69 67 | 69 44 72 69 76 65 72 20 |ame "Dig|iDriver |
|00000150| 56 31 22 2c 30 2c 30 2c | 30 2c 30 2c 30 2c 30 2c |V1",0,0,|0,0,0,0,|
|00000160| 30 20 3b 43 6c 61 73 73 | 2d 53 74 72 69 6e 67 20 |0 ;Class|-String |
|00000170| 7a 75 72 20 54 72 65 69 | 62 65 72 65 72 6b 65 6e |zur Trei|bererken|
|00000180| 6e 75 6e 67 00 2e 54 79 | 70 65 20 32 20 20 20 20 |nung..Ty|pe 2    |
|00000190| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000001a0| 20 20 20 20 20 3b 47 65 | 6f 73 2d 54 79 70 20 41 |     ;Ge|os-Typ A|
|000001b0| 73 73 65 6d 62 6c 65 72 | 00 2e 53 54 41 52 54 20 |ssembler|..START |
|000001c0| 24 32 63 30 30 20 20 20 | 20 20 20 20 20 20 20 20 |$2c00   |        |
|000001d0| 20 20 20 20 20 20 20 20 | 20 3b 61 62 73 6f 6c 75 |        | ;absolu|
|000001e0| 74 65 20 4c 61 64 65 61 | 64 72 65 73 73 65 00 3b |te Ladea|dresse.;|
|000001f0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00000200| 49 6e 69 74 73 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |Inits___|________|
|00000210| 5f 5f 5f 5f 5f 00 00 3b | 2d 20 41 53 4d 2d 52 6f |_____..;|- ASM-Ro|
|00000220| 75 74 69 6e 65 6e 20 61 | 75 73 20 61 6e 64 65 72 |utinen a|us ander|
|00000230| 65 6e 20 53 79 73 66 69 | 6c 65 73 20 2d 00 00 72 |en Sysfi|les -..r|
|00000240| 65 61 64 62 6c 6f 63 6b | 3d 24 32 66 30 63 20 3b |eadblock|=$2f0c ;|
|00000250| 6c 69 65 73 74 20 65 69 | 6e 65 6e 20 44 69 73 6b |liest ei|nen Disk|
|00000260| 2d 42 6c 6f 63 6b 2c 20 | 66 6f 6c 67 74 20 64 65 |-Block, |folgt de|
|00000270| 72 20 56 65 72 6b 65 74 | 74 75 6e 67 00 61 73 6d |r Verket|tung.asm|
|00000280| 5f 70 75 74 3d 24 32 66 | 30 30 20 3b 73 63 68 72 |_put=$2f|00 ;schr|
|00000290| 65 69 62 74 20 65 69 6e | 20 42 79 74 65 20 69 6e |eibt ein| Byte in|
|000002a0| 20 64 69 65 20 52 61 6d | 45 78 00 00 3b 2d 20 46 | die Ram|Ex..;- F|
|000002b0| 6c 61 67 2d 42 79 74 65 | 73 20 2d 00 00 64 61 74 |lag-Byte|s -..dat|
|000002c0| 61 65 6e 64 3d 24 32 38 | 30 33 20 3b 6e 6f 72 6d |aend=$28|03 ;norm|
|000002d0| 61 6c 20 30 2c 20 3d 31 | 20 77 65 6e 6e 20 6c 65 |al 0, =1| wenn le|
|000002e0| 74 7a 74 65 73 20 42 79 | 74 65 20 76 6f 6e 20 44 |tztes By|te von D|
|000002f0| 61 74 65 69 20 67 65 6c | 61 64 65 6e 00 72 65 75 |atei gel|aden.reu|
|00000300| 66 75 6c 6c 3d 24 32 38 | 30 32 20 20 20 3b 6e 6f |full=$28|02   ;no|
|00000310| 72 6d 61 6c 20 30 2c 20 | 3d 31 20 77 65 6e 6e 20 |rmal 0, |=1 wenn |
|00000320| 6c 65 74 7a 74 65 73 20 | 42 79 74 65 20 69 6e 20 |letztes |Byte in |
|00000330| 52 41 4d 2d 45 72 77 2e | 20 62 65 6c 65 67 74 00 |RAM-Erw.| belegt.|
|00000340| 64 69 73 6b 65 72 72 6f | 72 3d 24 32 38 32 34 20 |diskerro|r=$2824 |
|00000350| 3b 6e 6f 72 6d 61 6c 20 | 30 2c 20 7d 62 65 72 67 |;normal |0, }berg|
|00000360| 69 62 74 20 44 69 73 6b | 65 74 74 65 6e 66 65 68 |ibt Disk|ettenfeh|
|00000370| 6c 65 72 20 61 6e 20 47 | 65 6f 43 6f 6d 2d 50 72 |ler an G|eoCom-Pr|
|00000380| 6f 67 72 61 6d 6d 00 62 | 6c 6f 63 6b 69 6e 64 65 |ogramm.b|lockinde|
|00000390| 78 3d 24 32 38 31 33 3b | 49 6e 64 65 78 20 61 75 |x=$2813;|Index au|
|000003a0| 66 20 42 79 74 65 20 69 | 6d 20 44 61 74 65 6e 62 |f Byte i|m Datenb|
|000003b0| 6c 6f 63 6b 00 00 72 65 | 61 64 73 3d 24 32 38 31 |lock..re|ads=$281|
|000003c0| 36 20 20 20 20 20 20 3b | 4c 65 73 65 76 65 72 73 |6      ;|Lesevers|
|000003d0| 75 63 68 65 20 62 69 73 | 20 65 72 72 65 69 63 68 |uche bis| erreich|
|000003e0| 65 6e 20 65 69 6e 65 73 | 20 44 61 74 65 6e 62 79 |en eines| Datenby|
|000003f0| 74 65 73 00 72 65 61 64 | 62 61 63 6b 75 70 3d 24 |tes.read|backup=$|
|00000400| 32 31 20 20 20 3b 5a 77 | 69 73 63 68 65 6e 73 70 |21   ;Zw|ischensp|
|00000410| 65 69 63 68 65 72 00 74 | 65 6d 70 3d 24 32 30 20 |eicher.t|emp=$20 |
|00000420| 20 20 20 20 20 20 20 3b | 5a 77 69 73 63 68 65 6e |       ;|Zwischen|
|00000430| 73 70 65 69 63 68 65 72 | 00 62 79 74 65 5f 31 3d |speicher|.byte_1=|
|00000440| 24 31 32 20 20 20 20 20 | 20 20 3b 65 72 73 74 65 |$12     |  ;erste|
|00000450| 73 20 44 61 74 65 6e 62 | 79 74 65 00 62 79 74 65 |s Datenb|yte.byte|
|00000460| 5f 32 3d 24 31 33 20 20 | 20 20 20 20 20 3b 7a 77 |_2=$13  |     ;zw|
|00000470| 65 69 74 65 73 20 44 61 | 74 65 6e 62 79 74 65 00 |eites Da|tenbyte.|
|00000480| 00 00 3b 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |..;_____|________|
|00000490| 5f 5f 5f 52 6f 75 74 2d | 4c 69 73 74 5f 5f 5f 5f |___Rout-|List____|
|000004a0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 00 3b 24 32 63 30 |________|__.;$2c0|
|000004b0| 30 20 41 53 4d 5f 43 4f | 4e 56 20 2d 20 6c 7b 64 |0 ASM_CO|NV - l{d|
|000004c0| 74 20 2b 20 63 6f 6e 76 | 65 72 74 69 65 72 74 20 |t + conv|ertiert |
|000004d0| 38 42 69 74 20 57 41 56 | 00 3b 24 78 78 78 20 47 |8Bit WAV|.;$xxx G|
|000004e0| 45 54 42 59 54 45 20 20 | 20 20 20 2d 20 68 6f 6c |ETBYTE  |   - hol|
|000004f0| 74 20 65 69 6e 20 65 69 | 6e 7a 65 6c 6e 65 73 20 |t ein ei|nzelnes |
|00000500| 42 79 74 65 20 76 6f 6d | 20 44 61 74 65 6e 6c 61 |Byte vom| Datenla|
|00000510| 75 66 77 65 72 6b 00 3b | 5f 5f 5f 5f 5f 5f 5f 5f |ufwerk.;|________|
|00000520| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00000530| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 00 3b 2a 2a 2a |________|___.;***|
|00000540| 2a 2a 2a 2a 2a 00 41 53 | 4d 5f 43 4f 4e 56 3b 20 |*****.AS|M_CONV; |
|00000550| 6c 7b 64 74 20 73 65 6c | 62 73 74 73 74 7b 6e 64 |l{dt sel|bstst{nd|
|00000560| 69 67 20 65 69 6e 20 44 | 69 67 69 20 69 6e 20 64 |ig ein D|igi in d|
|00000570| 69 65 20 52 41 4d 2d 65 | 78 00 3b 2a 2a 2a 2a 2a |ie RAM-e|x.;*****|
|00000580| 2a 2a 2a 00 4c 44 41 20 | 23 30 00 53 54 41 20 72 |***.LDA |#0.STA r|
|00000590| 65 75 66 75 6c 6c 00 53 | 54 41 20 64 61 74 61 65 |eufull.S|TA datae|
|000005a0| 6e 64 20 3b 56 61 72 69 | 61 62 6c 65 6e 20 69 6e |nd ;Vari|ablen in|
|000005b0| 69 74 69 61 6c 69 73 69 | 65 72 65 6e 00 00 4c 44 |itialisi|eren..LD|
|000005c0| 41 20 72 65 61 64 73 00 | 53 54 41 20 72 65 61 64 |A reads.|STA read|
|000005d0| 62 61 63 6b 75 70 3b 20 | 41 6e 7a 61 68 6c 20 4c |backup; |Anzahl L|
|000005e0| 65 73 65 76 65 72 73 75 | 63 68 65 20 69 6e 20 5a |eseversu|che in Z|
|000005f0| 65 72 6f 70 61 67 65 20 | 62 72 69 6e 67 65 6e 20 |eropage |bringen |
|00000600| 28 47 65 73 63 68 77 69 | 6e 64 69 67 6b 65 69 74 |(Geschwi|ndigkeit|
|00000610| 29 00 00 43 6f 6e 76 5f | 6c 6f 6f 70 20 3b 42 65 |)..Conv_|loop ;Be|
|00000620| 67 69 6e 6e 20 64 65 72 | 20 4b 6f 6e 76 65 72 74 |ginn der| Konvert|
|00000630| 69 65 72 75 6e 67 73 73 | 63 68 6c 65 69 66 65 00 |ierungss|chleife.|
|00000640| 3b 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 00 4c 44 41 20 |;-------|---.LDA |
|00000650| 72 65 61 64 62 61 63 6b | 75 70 3b 20 41 6e 7a 61 |readback|up; Anza|
|00000660| 68 6c 20 4c 65 73 65 76 | 65 72 73 75 63 68 65 20 |hl Lesev|ersuche |
|00000670| 70 75 66 66 65 72 6e 00 | 53 54 41 20 74 65 6d 70 |puffern.|STA temp|
|00000680| 00 00 52 65 61 64 5f 31 | 00 00 4a 53 52 20 47 45 |..Read_1|..JSR GE|
|00000690| 54 42 59 54 45 20 3b 68 | 6f 6c 65 20 65 69 6e 20 |TBYTE ;h|ole ein |
|000006a0| 42 79 74 65 20 76 6f 6d | 20 44 69 73 6b 2d 4c 66 |Byte vom| Disk-Lf|
|000006b0| 77 20 69 6e 20 41 6b 6b | 75 00 00 4c 44 58 20 64 |w in Akk|u..LDX d|
|000006c0| 61 74 61 65 6e 64 20 3b | 6c 65 74 7a 74 65 73 20 |ataend ;|letztes |
|000006d0| 42 79 74 65 20 73 63 68 | 6f 6e 20 67 65 6c 65 73 |Byte sch|on geles|
|000006e0| 65 6e 20 3f 00 42 4e 45 | 20 45 6e 64 5f 63 6f 6e |en ?.BNE| End_con|
|000006f0| 76 20 3b 77 65 6e 6e 20 | 6a 61 20 64 61 6e 6e 20 |v ;wenn |ja dann |
|00000700| 61 62 62 72 65 63 68 65 | 6e 00 00 44 45 43 20 74 |abbreche|n..DEC t|
|00000710| 65 6d 70 20 3b 41 6e 7a | 61 68 6c 20 4c 65 73 65 |emp ;Anz|ahl Lese|
|00000720| 76 6f 72 67 7b 6e 67 65 | 20 31 20 76 65 72 72 69 |vorg{nge| 1 verri|
|00000730| 6e 67 65 72 6e 00 42 4e | 45 20 52 65 61 64 5f 31 |ngern.BN|E Read_1|
|00000740| 20 3b 62 69 73 20 3d 30 | 00 3b 2d 20 2d 20 2d 00 | ;bis =0|.;- - -.|
|00000750| 00 53 54 41 20 62 79 74 | 65 5f 31 20 3b 20 65 72 |.STA byt|e_1 ; er|
|00000760| 73 74 65 73 20 44 61 74 | 65 6e 62 79 74 65 20 73 |stes Dat|enbyte s|
|00000770| 70 65 69 63 68 65 72 6e | 00 00 4c 44 41 20 72 65 |peichern|..LDA re|
|00000780| 61 64 62 61 63 6b 75 70 | 00 53 54 41 20 74 65 6d |adbackup|.STA tem|
|00000790| 70 20 3b 41 6e 7a 61 68 | 6c 20 4c 65 73 65 76 65 |p ;Anzah|l Leseve|
|000007a0| 72 73 75 63 68 65 20 70 | 75 66 66 65 72 6e 00 3b |rsuche p|uffern.;|
|000007b0| 2d 20 2d 20 2d 20 2d 00 | 52 65 61 64 5f 32 00 00 |- - - -.|Read_2..|
|000007c0| 4a 53 52 20 47 45 54 42 | 59 54 45 20 3b 68 6f 6c |JSR GETB|YTE ;hol|
|000007d0| 65 20 65 69 6e 20 42 79 | 74 65 20 61 75 73 20 44 |e ein By|te aus D|
|000007e0| 69 73 6b 2d 4c 66 77 20 | 69 6e 20 41 6b 6b 75 00 |isk-Lfw |in Akku.|
|000007f0| 00 4c 44 58 20 64 61 74 | 61 65 6e 64 00 42 4e 45 |.LDX dat|aend.BNE|
|00000800| 20 45 6e 64 5f 63 6f 6e | 76 20 3b 6c 65 74 7a 74 | End_con|v ;letzt|
|00000810| 65 73 20 42 79 74 65 20 | 73 63 68 6f 6e 20 67 65 |es Byte |schon ge|
|00000820| 6c 65 73 65 6e 20 3f 20 | 44 61 6e 6e 20 61 62 62 |lesen ? |Dann abb|
|00000830| 72 65 63 68 65 6e 00 3b | 2d 20 2d 20 2d 20 2d 00 |rechen.;|- - - -.|
|00000840| 44 45 43 20 74 65 6d 70 | 20 3b 41 6e 7a 61 68 6c |DEC temp| ;Anzahl|
|00000850| 20 4c 65 73 65 76 6f 72 | 67 7b 6e 67 65 20 75 6d | Lesevor|g{nge um|
|00000860| 20 31 20 76 65 72 72 69 | 6e 67 65 72 6e 00 42 4e | 1 verri|ngern.BN|
|00000870| 45 20 52 65 61 64 5f 32 | 20 3b 62 69 73 20 3d 30 |E Read_2| ;bis =0|
|00000880| 00 00 53 54 41 20 62 79 | 74 65 5f 32 20 3b 20 7a |..STA by|te_2 ; z|
|00000890| 77 65 69 74 65 73 20 44 | 61 74 65 6e 62 79 74 65 |weites D|atenbyte|
|000008a0| 20 73 70 65 69 63 68 65 | 72 6e 00 00 4c 44 41 20 | speiche|rn..LDA |
|000008b0| 62 79 74 65 5f 31 00 45 | 4f 52 20 23 31 32 37 00 |byte_1.E|OR #127.|
|000008c0| 4c 53 52 00 4c 53 52 00 | 4c 53 52 00 4c 53 52 00 |LSR.LSR.|LSR.LSR.|
|000008d0| 53 54 41 20 62 79 74 65 | 5f 31 00 00 4c 44 41 20 |STA byte|_1..LDA |
|000008e0| 62 79 74 65 5f 32 20 3b | 20 76 6f 72 7a 65 69 63 |byte_2 ;| vorzeic|
|000008f0| 68 65 6e 62 65 68 61 66 | 74 65 74 65 20 44 61 74 |henbehaf|tete Dat|
|00000900| 65 6e 20 75 6d 66 6f 72 | 6d 65 6e 00 45 4f 52 20 |en umfor|men.EOR |
|00000910| 23 31 32 37 00 41 4e 44 | 20 23 32 34 30 00 4f 52 |#127.AND| #240.OR|
|00000920| 41 20 62 79 74 65 5f 31 | 00 00 53 54 41 20 24 32 |A byte_1|..STA $2|
|00000930| 38 30 30 00 00 4a 53 52 | 20 61 73 6d 5f 70 75 74 |800..JSR| asm_put|
|00000940| 20 3b 73 63 68 72 65 69 | 62 65 20 69 6e 20 52 45 | ;schrei|be in RE|
|00000950| 55 00 00 4c 44 41 20 72 | 65 75 66 75 6c 6c 20 3b |U..LDA r|eufull ;|
|00000960| 20 6c 65 74 7a 74 65 73 | 20 42 79 74 65 20 69 6e | letztes| Byte in|
|00000970| 20 52 61 6d 2d 45 72 77 | 65 69 74 65 72 75 6e 67 | Ram-Erw|eiterung|
|00000980| 20 73 63 68 6f 6e 20 62 | 65 6c 65 67 74 20 3f 00 | schon b|elegt ?.|
|00000990| 42 45 51 20 43 6f 6e 76 | 5f 6c 6f 6f 70 20 3b 77 |BEQ Conv|_loop ;w|
|000009a0| 65 6e 6e 20 6e 65 69 6e | 2d 3e 20 57 65 69 74 65 |enn nein|-> Weite|
|000009b0| 72 65 20 44 61 74 65 6e | 20 76 6f 6e 20 44 69 73 |re Daten| von Dis|
|000009c0| 6b 20 68 6f 6c 65 6e 00 | 00 3b 2a 2a 2a 2a 2a 2a |k holen.|.;******|
|000009d0| 2a 2a 00 45 6e 64 5f 63 | 6f 6e 76 20 3b 4b 6f 6e |**.End_c|onv ;Kon|
|000009e0| 76 65 72 74 69 65 72 75 | 6e 67 20 61 62 62 72 65 |vertieru|ng abbre|
|000009f0| 63 68 65 6e 00 3b 2a 2a | 2a 2a 2a 2a 2a 2a 00 52 |chen.;**|******.R|
|00000a00| 54 53 00 00 3b 2a 2a 2a | 2a 2a 00 47 45 54 42 59 |TS..;***|**.GETBY|
|00000a10| 54 45 20 3b 68 6f 6c 74 | 20 65 69 6e 20 42 79 74 |TE ;holt| ein Byt|
|00000a20| 65 20 76 6f 6e 20 64 65 | 72 20 44 69 73 6b 20 69 |e von de|r Disk i|
|00000a30| 6e 20 64 65 6e 20 41 6b | 6b 75 00 3b 2a 2a 2a 2a |n den Ak|ku.;****|
|00000a40| 2a 00 00 4c 44 59 20 62 | 6c 6f 63 6b 69 6e 64 65 |*..LDY b|lockinde|
|00000a50| 78 00 43 50 59 20 23 32 | 35 34 20 3b 77 65 6e 6e |x.CPY #2|54 ;wenn|
|00000a60| 20 6e 6f 63 68 20 6e 69 | 63 68 74 20 61 6c 6c 65 | noch ni|cht alle|
|00000a70| 20 44 61 74 65 6e 20 65 | 69 6e 65 73 20 42 6c 6f | Daten e|ines Blo|
|00000a80| 63 6b 65 73 20 67 65 6c | 65 73 65 6e 20 77 75 72 |ckes gel|esen wur|
|00000a90| 64 65 6e 00 42 45 51 20 | 4e 65 77 42 6c 6f 63 6b |den.BEQ |NewBlock|
|00000aa0| 20 3b 45 69 6e 6c 65 73 | 65 6e 20 64 65 73 20 44 | ;Einles|en des D|
|00000ab0| 69 73 6b 62 6c 6f 63 6b | 73 20 7d 62 65 72 73 70 |iskblock|s }bersp|
|00000ac0| 72 69 6e 67 65 6e 00 00 | 53 6b 69 70 5f 72 65 61 |ringen..|Skip_rea|
|00000ad0| 64 00 00 4c 44 58 20 23 | 3c 24 38 30 30 32 00 4c |d..LDX #|<$8002.L|
|00000ae0| 44 41 20 23 3e 24 38 30 | 30 32 00 53 54 58 20 24 |DA #>$80|02.STX $|
|00000af0| 32 00 53 54 41 20 24 33 | 20 3b 41 64 72 65 73 73 |2.STA $3| ;Adress|
|00000b00| 65 20 64 65 72 20 44 61 | 74 65 6e 20 2d 3e 20 5a |e der Da|ten -> Z|
|00000b10| 65 72 6f 70 61 67 65 00 | 00 4c 44 41 20 28 24 32 |eropage.|.LDA ($2|
|00000b20| 29 2c 79 20 3b 42 79 74 | 65 20 68 6f 6c 65 6e 20 |),y ;Byt|e holen |
|00000b30| 75 6e 64 20 69 6d 20 41 | 6b 6b 75 20 73 70 65 69 |und im A|kku spei|
|00000b40| 63 68 65 72 6e 00 00 49 | 4e 43 20 62 6c 6f 63 6b |chern..I|NC block|
|00000b50| 69 6e 64 65 78 20 3b 49 | 6e 64 65 78 2b 31 00 00 |index ;I|ndex+1..|
|00000b60| 52 54 53 00 00 3b 2a 2a | 2a 2a 2a 2a 00 4e 65 77 |RTS..;**|****.New|
|00000b70| 42 6c 6f 63 6b 20 3b 6e | 65 75 65 6e 20 42 6c 6f |Block ;n|euen Blo|
|00000b80| 63 6b 20 6c 65 73 65 6e | 00 3b 2a 2a 2a 2a 2a 2a |ck lesen|.;******|
|00000b90| 00 4a 53 52 20 72 65 61 | 64 62 6c 6f 63 6b 3b 20 |.JSR rea|dblock; |
|00000ba0| 6c 65 73 65 20 65 69 6e | 65 6e 20 44 69 73 6b 62 |lese ein|en Diskb|
|00000bb0| 6c 6f 63 6b 00 4c 44 41 | 20 64 69 73 6b 65 72 72 |lock.LDA| diskerr|
|00000bc0| 6f 72 20 3b 44 69 73 6b | 65 72 72 6f 72 20 3e 30 |or ;Disk|error >0|
|00000bd0| 20 3f 00 42 4e 45 20 45 | 6e 64 5f 63 6f 6e 76 20 | ?.BNE E|nd_conv |
|00000be0| 3b 64 61 6e 6e 20 61 62 | 62 72 65 63 68 65 6e 00 |;dann ab|brechen.|
|00000bf0| 00 4c 44 59 20 23 30 20 | 3b 49 6e 64 65 78 20 61 |.LDY #0 |;Index a|
|00000c00| 75 66 20 44 61 74 65 6e | 61 6e 66 61 6e 67 00 53 |uf Daten|anfang.S|
|00000c10| 54 59 20 62 6c 6f 63 6b | 69 6e 64 65 78 00 42 45 |TY block|index.BE|
|00000c20| 51 20 53 6b 69 70 5f 72 | 65 61 64 20 3b 6a 75 6d |Q Skip_r|ead ;jum|
|00000c30| 70 20 61 6c 77 61 79 73 | 00 3b 2d 2d 2d 2d 2d 2d |p always|.;------|
|00000c40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000c50| 2d 2d 2d 2d 00 00 00    |                         |----... |        |
+--------+-------------------------+-------------------------+--------+--------+