00000000: 0D 3B 54 52 41 4E 53 46 45 52 20 56 33 20 28 57 |.;TRANSFER V3 (W|
00000010: 29 20 31 32 2E 38 2E 31 39 39 34 20 42 59 20 CD |) 12.8.1994 BY .|
00000020: 41 44 52 4F 4D 0D 0D 20 20 20 20 20 20 20 20 20 |ADROM.. |
00000030: 2A 3D 20 24 37 30 30 30 0D 0D 54 52 56 4F 4E 20 |*= $7000..TRVON |
00000040: 20 20 20 3D 20 24 30 39 35 42 0D 54 52 42 49 53 | = $095B.TRBIS|
00000050: 20 20 20 20 3D 20 24 31 30 30 30 0D 54 52 4E 41 | = $1000.TRNA|
00000060: 43 48 20 20 20 3D 20 24 30 38 30 31 0D 0D 20 20 |CH = $0801.. |
00000070: 20 20 20 20 20 20 20 4C 44 41 20 23 3C 54 52 4E | LDA #<TRN|
00000080: 41 43 48 0D 20 20 20 20 20 20 20 20 20 4C 44 58 |ACH. LDX|
00000090: 20 23 3E 54 52 4E 41 43 48 0D 20 20 20 20 20 20 | #>TRNACH. |
000000A0: 20 20 20 53 54 41 20 24 35 38 0D 20 20 20 20 20 | STA $58. |
000000B0: 20 20 20 20 53 54 58 20 24 35 39 0D 0D 20 20 20 | STX $59.. |
000000C0: 20 20 20 20 20 20 4C 44 41 20 23 3C 54 52 56 4F | LDA #<TRVO|
000000D0: 4E 0D 20 20 20 20 20 20 20 20 20 4C 44 58 20 23 |N. LDX #|
000000E0: 3E 54 52 56 4F 4E 0D 20 20 20 20 20 20 20 20 20 |>TRVON. |
000000F0: 53 54 41 20 24 35 46 0D 20 20 20 20 20 20 20 20 |STA $5F. |
00000100: 20 53 54 58 20 24 36 30 0D 0D 20 20 20 20 20 20 | STX $60.. |
00000110: 20 20 20 4C 44 41 20 23 3C 54 52 42 49 53 0D 20 | LDA #<TRBIS. |
00000120: 20 20 20 20 20 20 20 20 4C 44 58 20 23 3E 54 52 | LDX #>TR|
00000130: 42 49 53 0D 20 20 20 20 20 20 20 20 20 53 54 41 |BIS. STA|
00000140: 20 24 35 41 0D 20 20 20 20 20 20 20 20 20 53 54 | $5A. ST|
00000150: 58 20 24 35 42 0D 0D 20 20 20 20 20 20 20 20 20 |X $5B.. |
00000160: 53 45 43 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |SEC. LDA|
00000170: 20 24 35 41 0D 20 20 20 20 20 20 20 20 20 53 42 | $5A. SB|
00000180: 43 20 24 35 46 0D 20 20 20 20 20 20 20 20 20 53 |C $5F. S|
00000190: 54 41 20 24 32 32 0D 20 20 20 20 20 20 20 20 20 |TA $22. |
000001A0: 4C 44 41 20 24 35 42 0D 20 20 20 20 20 20 20 20 |LDA $5B. |
000001B0: 20 53 42 43 20 24 36 30 0D 20 20 20 20 20 20 20 | SBC $60. |
000001C0: 20 20 53 54 41 20 24 32 33 0D 0D 20 20 20 20 20 | STA $23.. |
000001D0: 20 20 20 20 53 45 49 0D 20 20 20 20 20 20 20 20 | SEI. |
000001E0: 20 44 45 43 20 31 0D 54 52 31 20 20 20 20 20 20 | DEC 1.TR1 |
000001F0: 4C 44 59 20 23 30 0D 20 20 20 20 20 20 20 20 20 |LDY #0. |
00000200: 4C 44 58 20 24 32 33 0D 20 20 20 20 20 20 20 20 |LDX $23. |
00000210: 20 42 45 51 20 54 52 33 0D 54 52 32 20 20 20 20 | BEQ TR3.TR2 |
00000220: 20 20 4C 44 41 20 28 24 35 46 29 2C 59 0D 20 20 | LDA ($5F),Y. |
00000230: 20 20 20 20 20 20 20 53 54 41 20 28 24 35 38 29 | STA ($58)|
00000240: 2C 59 0D 20 20 20 20 20 20 20 20 20 49 4E 59 0D |,Y. INY.|
00000250: 20 20 20 20 20 20 20 20 20 42 4E 45 20 54 52 32 | BNE TR2|
00000260: 0D 20 20 20 20 20 20 20 20 20 49 4E 43 20 24 36 |. INC $6|
00000270: 30 0D 20 20 20 20 20 20 20 20 20 49 4E 43 20 24 |0. INC $|
00000280: 35 39 0D 20 20 20 20 20 20 20 20 20 44 45 58 0D |59. DEX.|
00000290: 20 20 20 20 20 20 20 20 20 42 4E 45 20 54 52 32 | BNE TR2|
000002A0: 0D 54 52 33 20 20 20 20 20 20 4C 44 58 20 24 32 |.TR3 LDX $2|
000002B0: 32 0D 20 20 20 20 20 20 20 20 20 42 45 51 20 54 |2. BEQ T|
000002C0: 52 35 0D 54 52 34 20 20 20 20 20 20 4C 44 41 20 |R5.TR4 LDA |
000002D0: 28 24 35 46 29 2C 59 0D 20 20 20 20 20 20 20 20 |($5F),Y. |
000002E0: 20 53 54 41 20 28 24 35 38 29 2C 59 0D 20 20 20 | STA ($58),Y. |
000002F0: 20 20 20 20 20 20 49 4E 59 0D 20 20 20 20 20 20 | INY. |
00000300: 20 20 20 44 45 58 0D 20 20 20 20 20 20 20 20 20 | DEX. |
00000310: 42 4E 45 20 54 52 34 0D 54 52 35 20 20 20 20 20 |BNE TR4.TR5 |
00000320: 20 49 4E 43 20 31 0D 20 20 20 20 20 20 20 20 20 | INC 1. |
00000330: 43 4C 49 0D 20 20 20 20 20 20 20 20 20 52 54 53 |CLI. RTS|
00000340: 0D 0D |.. |
.;TRANSFER V3 (W) 12.8.1994 BY MADROM..
*= $7000..TRVON = $095B.TRBIS
= $1000.TRNACH = $0801.. L
DA #<TRNACH. LDX #>TRNACH.
STA $58. STX $59.. LD
A #<TRVON. LDX #>TRVON.
STA $5F. STX $60.. LDA #
<TRBIS. LDX #>TRBIS. STA
$5A. STX $5B.. SEC.
LDA $5A. SBC $5F. S
TA $22. LDA $5B. SBC $60
. STA $23.. SEI.
DEC 1.TR1 LDY #0. LDX $23.
BEQ TR3.TR2 LDA ($5F),Y.
STA ($58),Y. INY.
BNE TR2. INC $60. INC $
59. DEX. BNE TR2.TR3
LDX $22. BEQ TR5.TR4 LDA
($5F),Y. STA ($58),Y. IN
Y. DEX. BNE TR4.TR5
INC 1. CLI. RTS..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL