00000000: 3B 53 50 45 45 44 45 52 20 43 4F 4D 50 55 54 45 |;SPEEDER COMPUTE|
00000010: 52 2D 3E 46 4C 4F 50 50 59 20 28 46 4C 4F 50 50 |R->FLOPPY (FLOPP|
00000020: 59 20 52 4F 55 54 45 29 0D 0D 20 20 20 20 4C 44 |Y ROUTE).. LD|
00000030: 58 20 23 24 31 30 20 20 20 20 3B 0D 4C 31 20 20 |X #$10 ;.L1 |
00000040: 4C 44 41 20 24 31 38 30 30 20 20 20 3B 41 55 46 |LDA $1800 ;AUF|
00000050: 20 41 54 54 45 4E 54 49 4F 4E 0D 20 20 20 20 42 | ATTENTION. B|
00000060: 50 4C 20 4C 31 20 20 20 20 20 20 3B 57 41 52 54 |PL L1 ;WART|
00000070: 45 4E 20 55 4E 44 0D 20 20 20 20 53 54 58 20 24 |EN UND. STX $|
00000080: 31 38 30 30 20 20 20 3B 44 41 54 41 20 53 45 54 |1800 ;DATA SET|
00000090: 5A 45 4E 0D 20 20 20 20 4E 4F 50 20 20 20 20 20 |ZEN. NOP |
000000A0: 20 20 20 20 3B 41 55 46 20 43 20 36 34 0D 20 20 | ;AUF C 64. |
000000B0: 20 20 4E 4F 50 20 20 20 20 20 20 20 20 20 3B 57 | NOP ;W|
000000C0: 41 52 54 45 4E 0D 20 20 20 20 4C 44 58 20 23 24 |ARTEN. LDX #$|
000000D0: 30 30 20 20 20 20 3B 44 41 54 41 2D 4C 45 49 54 |00 ;DATA-LEIT|
000000E0: 55 4E 47 0D 20 20 20 20 53 54 58 20 24 31 38 30 |UNG. STX $180|
000000F0: 30 20 20 20 3B 5A 55 52 55 45 43 4B 53 45 54 5A |0 ;ZURUECKSETZ|
00000100: 45 4E 0D 20 20 20 20 4E 4F 50 20 20 20 20 20 20 |EN. NOP |
00000110: 20 20 20 3B 41 55 46 20 43 20 36 34 0D 20 20 20 | ;AUF C 64. |
00000120: 20 4E 4F 50 20 20 20 20 20 20 20 20 20 3B 57 41 | NOP ;WA|
00000130: 52 54 45 4E 0D 4C 32 20 20 4C 44 41 20 24 31 38 |RTEN.L2 LDA $18|
00000140: 30 30 20 20 20 3B 41 55 46 20 41 54 4E 0D 20 20 |00 ;AUF ATN. |
00000150: 20 20 42 50 4C 20 4C 32 20 20 20 20 20 20 3B 57 | BPL L2 ;W|
00000160: 41 52 54 45 4E 0D 20 20 20 20 4E 4F 50 20 20 20 |ARTEN. NOP |
00000170: 20 20 20 20 20 20 3B 5A 59 4B 4C 45 4E 41 55 53 | ;ZYKLENAUS|
00000180: 47 4C 45 49 43 48 0D 20 20 20 20 4E 4F 50 20 20 |GLEICH. NOP |
00000190: 20 20 20 20 20 20 20 3B 0D 20 20 20 20 4C 44 58 | ;. LDX|
000001A0: 20 24 31 38 30 30 20 20 20 3B 42 49 54 53 20 34 | $1800 ;BITS 4|
000001B0: 20 55 4E 44 20 35 0D 20 20 20 20 4C 44 41 20 54 | UND 5. LDA T|
000001C0: 41 42 34 35 2C 58 20 3B 48 4F 4C 45 4E 0D 20 20 |AB45,X ;HOLEN. |
000001D0: 20 20 4E 4F 50 20 20 20 20 20 20 20 20 20 3B 0D | NOP ;.|
000001E0: 20 20 20 20 4C 44 58 20 24 31 38 30 30 20 20 20 | LDX $1800 |
000001F0: 3B 42 49 54 53 20 36 20 55 4E 44 20 37 0D 20 20 |;BITS 6 UND 7. |
00000200: 20 20 4F 52 41 20 54 41 42 36 37 2C 58 20 3B 45 | ORA TAB67,X ;E|
00000210: 49 4E 42 4C 45 4E 44 45 4E 0D 20 20 20 20 4E 4F |INBLENDEN. NO|
00000220: 50 20 20 20 20 20 20 20 20 20 3B 0D 20 20 20 20 |P ;. |
00000230: 4E 4F 50 20 20 20 20 20 20 20 20 20 3B 57 41 52 |NOP ;WAR|
00000240: 54 45 4E 0D 20 20 20 20 4E 4F 50 20 20 20 20 20 |TEN. NOP |
00000250: 20 20 20 20 3B 0D 20 20 20 20 4C 44 58 20 24 31 | ;. LDX $1|
00000260: 38 30 30 20 20 20 3B 42 49 54 53 20 30 20 55 4E |800 ;BITS 0 UN|
00000270: 44 20 31 0D 20 20 20 20 4F 52 41 20 54 41 42 30 |D 1. ORA TAB0|
00000280: 31 2C 58 20 3B 45 49 4E 42 4C 45 4E 44 45 4E 0D |1,X ;EINBLENDEN.|
00000290: 20 20 20 20 4E 4F 50 20 20 20 20 20 20 20 20 20 | NOP |
000002A0: 3B 0D 20 20 20 20 4C 44 58 20 24 31 38 30 30 20 |;. LDX $1800 |
000002B0: 20 20 3B 42 49 54 53 20 32 20 55 4E 44 20 33 0D | ;BITS 2 UND 3.|
000002C0: 20 20 20 20 4F 52 41 20 54 41 42 32 33 2C 58 20 | ORA TAB23,X |
000002D0: 3B 48 4F 4C 45 4E 0D 20 20 20 20 53 54 41 20 50 |;HOLEN. STA P|
000002E0: 55 46 46 45 52 2C 59 3B 55 4E 44 20 44 41 54 45 |UFFER,Y;UND DATE|
000002F0: 4E 42 59 54 45 20 53 49 43 48 45 52 4E 0D 20 20 |NBYTE SICHERN. |
00000300: 20 20 49 4E 59 20 20 20 20 20 20 20 20 20 3B 0D | INY ;.|
00000310: 20 20 20 20 42 4E 45 20 4C 32 20 20 20 20 20 20 | BNE L2 |
00000320: 3B 4E 41 45 43 48 53 54 45 53 20 42 59 54 45 0D |;NAECHSTES BYTE.|
00000330: 20 20 20 20 4C 44 58 20 23 24 30 46 20 20 20 20 | LDX #$0F |
00000340: 3B 41 54 4E 0D 20 20 20 20 53 54 58 20 24 31 38 |;ATN. STX $18|
00000350: 30 30 20 20 20 3B 5A 55 52 55 45 43 4B 53 45 54 |00 ;ZURUECKSET|
00000360: 5A 45 4E 0D 20 20 20 20 52 54 53 20 20 20 20 20 |ZEN. RTS |
00000370: 20 20 20 20 3B 55 4E 44 20 52 55 45 43 4B 4B 45 | ;UND RUECKKE|
00000380: 48 52 0D 0D 54 41 42 34 35 20 2E 42 59 54 45 20 |HR..TAB45 .BYTE |
00000390: 24 30 30 2C 24 32 30 0D 54 41 42 36 37 20 2E 42 |$00,$20.TAB67 .B|
000003A0: 59 54 45 20 24 30 30 2C 24 38 30 2C 24 31 30 2C |YTE $00,$80,$10,|
000003B0: 24 33 30 2C 24 34 30 2C 24 43 30 0D 54 41 42 30 |$30,$40,$C0.TAB0|
000003C0: 31 20 2E 42 59 54 45 20 24 30 30 2C 24 30 32 0D |1 .BYTE $00,$02.|
000003D0: 54 41 42 32 33 20 2E 42 59 54 45 20 24 30 30 2C |TAB23 .BYTE $00,|
000003E0: 24 30 38 2C 24 30 31 2C 24 30 33 2C 24 30 34 2C |$08,$01,$03,$04,|
000003F0: 24 30 43 0D 0D |$0C.. |
;SPEEDER COMPUTER->FLOPPY (FLOPPY ROUTE)
.. LDX #$10 ;.L1 LDA $1800 ;AUF
ATTENTION. BPL L1 ;WARTEN UND.
STX $1800 ;DATA SETZEN. NOP
;AUF C 64. NOP ;WARTEN.
LDX #$00 ;DATA-LEITUNG. STX $180
0 ;ZURUECKSETZEN. NOP ;AUF
C 64. NOP ;WARTEN.L2 LDA $18
00 ;AUF ATN. BPL L2 ;WARTEN.
NOP ;ZYKLENAUSGLEICH. NOP
;. LDX $1800 ;BITS 4 UND 5.
LDA TAB45,X ;HOLEN. NOP ;.
LDX $1800 ;BITS 6 UND 7. ORA TA
B67,X ;EINBLENDEN. NOP ;.
NOP ;WARTEN. NOP ;.
LDX $1800 ;BITS 0 UND 1. ORA TAB0
1,X ;EINBLENDEN. NOP ;. LD
X $1800 ;BITS 2 UND 3. ORA TAB23,X
;HOLEN. STA PUFFER,Y;UND DATENBYTE SI
CHERN. INY ;. BNE L2
;NAECHSTES BYTE. LDX #$0F ;ATN.
STX $1800 ;ZURUECKSETZEN. RTS
;UND RUECKKEHR..TAB45 .BYTE $00,$20.
TAB67 .BYTE $00,$80,$10,$30,$40,$C0.TAB0
1 .BYTE $00,$02.TAB23 .BYTE $00,$08,$01,
$03,$04,$0C..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL