00000000: 0D 0D 0D 0D 0D 3B 53 50 45 43 49 41 4C 20 53 41 |.....;SPECIAL SA|
00000010: 56 45 20 28 41 55 43 48 20 55 4E 54 45 52 20 24 |VE (AUCH UNTER $|
00000020: 44 30 30 30 29 0D 3B 20 20 20 20 20 20 20 20 20 |D000).; |
00000030: 20 20 28 57 29 20 42 59 20 4D 57 53 0D 0D 3B 49 | (W) BY MWS..;I|
00000040: 4E 20 24 41 43 2F 24 41 44 20 3D 20 41 4E 46 41 |N $AC/$AD = ANFA|
00000050: 4E 47 53 41 44 52 45 53 53 45 0D 0D 3B 49 4E 20 |NGSADRESSE..;IN |
00000060: 24 41 45 2F 24 41 46 20 3D 20 45 4E 44 41 44 52 |$AE/$AF = ENDADR|
00000070: 45 53 53 45 0D 0D 0D 0D 53 4C 4F 20 20 20 20 20 |ESSE....SLO |
00000080: 20 3D 20 24 41 43 0D 53 48 49 20 20 20 20 20 20 | = $AC.SHI |
00000090: 3D 20 24 41 44 0D 45 4C 4F 20 20 20 20 20 20 3D |= $AD.ELO =|
000000A0: 20 24 41 45 0D 45 48 49 20 20 20 20 20 20 3D 20 | $AE.EHI = |
000000B0: 24 41 46 0D 0D 0D 0D 0D 0D 20 20 20 20 20 20 20 |$AF...... |
000000C0: 20 20 4C 44 41 20 23 24 30 38 0D 20 20 20 20 20 | LDA #$08. |
000000D0: 20 20 20 20 54 41 58 0D 20 20 20 20 20 20 20 20 | TAX. |
000000E0: 20 4C 44 59 20 23 24 30 31 0D 20 20 20 20 20 20 | LDY #$01. |
000000F0: 20 20 20 4A 53 52 20 24 46 46 42 41 0D 0D 20 20 | JSR $FFBA.. |
00000100: 20 20 20 20 20 20 20 4C 44 41 20 23 24 30 33 0D | LDA #$03.|
00000110: 20 20 20 20 20 20 20 20 20 4C 44 58 20 23 3C 4E | LDX #<N|
00000120: 41 4D 0D 20 20 20 20 20 20 20 20 20 4C 44 59 20 |AM. LDY |
00000130: 23 3E 4E 41 4D 0D 20 20 20 20 20 20 20 20 20 4A |#>NAM. J|
00000140: 53 52 20 24 46 46 42 44 0D 0D 20 20 20 20 20 20 |SR $FFBD.. |
00000150: 20 20 20 4A 53 52 20 24 46 46 43 30 0D 0D 20 20 | JSR $FFC0.. |
00000160: 20 20 20 20 20 20 20 4C 44 41 20 23 24 36 31 0D | LDA #$61.|
00000170: 20 20 20 20 20 20 20 20 20 53 54 41 20 24 42 39 | STA $B9|
00000180: 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 24 46 |. JSR $F|
00000190: 33 44 35 0D 0D 20 20 20 20 20 20 20 20 20 4C 44 |3D5.. LD|
000001A0: 41 20 24 42 41 0D 20 20 20 20 20 20 20 20 20 4A |A $BA. J|
000001B0: 53 52 20 24 45 44 30 43 0D 0D 20 20 20 20 20 20 |SR $ED0C.. |
000001C0: 20 20 20 4C 44 41 20 24 42 39 0D 20 20 20 20 20 | LDA $B9. |
000001D0: 20 20 20 20 4A 53 52 20 24 45 44 42 39 0D 0D 20 | JSR $EDB9.. |
000001E0: 20 20 20 20 20 20 20 20 4C 44 41 20 53 4C 4F 0D | LDA SLO.|
000001F0: 20 20 20 20 20 20 20 20 20 4A 53 52 20 24 45 44 | JSR $ED|
00000200: 44 44 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 |DD. LDA |
00000210: 53 48 49 0D 20 20 20 20 20 20 20 20 20 4A 53 52 |SHI. JSR|
00000220: 20 24 45 44 44 44 0D 0D 0D 4F 4B 20 20 20 20 20 | $EDDD...OK |
00000230: 20 20 4C 44 59 20 23 24 30 30 0D 20 20 20 20 20 | LDY #$00. |
00000240: 20 20 20 20 53 45 49 0D 20 20 20 20 20 20 20 20 | SEI. |
00000250: 20 53 54 59 20 24 30 31 0D 20 20 20 20 20 20 20 | STY $01. |
00000260: 20 20 4C 44 41 20 28 53 4C 4F 29 2C 59 0D 20 20 | LDA (SLO),Y. |
00000270: 20 20 20 20 20 20 20 44 45 59 0D 20 20 20 20 20 | DEY. |
00000280: 20 20 20 20 53 54 59 20 24 30 31 0D 20 20 20 20 | STY $01. |
00000290: 20 20 20 20 20 43 4C 49 0D 0D 0D 20 20 20 20 20 | CLI... |
000002A0: 20 20 20 20 4A 53 52 20 24 45 44 44 44 0D 0D 20 | JSR $EDDD.. |
000002B0: 20 20 20 20 20 20 20 20 42 49 54 20 24 39 30 0D | BIT $90.|
000002C0: 20 20 20 20 20 20 20 20 20 42 56 43 20 45 4E 44 | BVC END|
000002D0: 45 0D 0D 20 20 20 20 20 20 20 20 20 49 4E 43 20 |E.. INC |
000002E0: 53 4C 4F 0D 20 20 20 20 20 20 20 20 20 42 4E 45 |SLO. BNE|
000002F0: 20 4B 4B 42 0D 0D 20 20 20 20 20 20 20 20 20 49 | KKB.. I|
00000300: 4E 43 20 53 48 49 0D 0D 4B 4B 42 20 20 20 20 20 |NC SHI..KKB |
00000310: 20 4C 44 59 20 53 4C 4F 0D 20 20 20 20 20 20 20 | LDY SLO. |
00000320: 20 20 43 50 59 20 45 4C 4F 0D 20 20 20 20 20 20 | CPY ELO. |
00000330: 20 20 20 42 4E 45 20 4F 4B 0D 20 20 20 20 20 20 | BNE OK. |
00000340: 20 20 20 4C 44 59 20 53 48 49 0D 20 20 20 20 20 | LDY SHI. |
00000350: 20 20 20 20 43 50 59 20 45 48 49 0D 20 20 20 20 | CPY EHI. |
00000360: 20 20 20 20 20 42 4E 45 20 4F 4B 0D 0D 45 4E 44 | BNE OK..END|
00000370: 45 20 20 20 20 20 4A 53 52 20 24 46 46 43 33 0D |E JSR $FFC3.|
00000380: 20 20 20 20 20 20 20 20 20 4A 53 52 20 24 46 46 | JSR $FF|
00000390: 45 37 0D 20 20 20 20 20 20 20 20 20 4A 53 52 20 |E7. JSR |
000003A0: 24 46 36 34 32 0D 20 20 20 20 20 20 20 20 20 52 |$F642. R|
000003B0: 54 53 0D 0D 0D 4E 41 4D 20 20 20 20 20 20 2E 54 |TS...NAM .T|
000003C0: 45 58 54 20 22 40 3A 41 22 0D 0D |EXT "@:A".. |
.....;SPECIAL SAVE (AUCH UNTER $D000).;
(W) BY MWS..;IN $AC/$AD = ANFA
NGSADRESSE..;IN $AE/$AF = ENDADRESSE....
SLO = $AC.SHI = $AD.ELO =
$AE.EHI = $AF...... LDA #$
08. TAX. LDY #$01.
JSR $FFBA.. LDA #$03.
LDX #<NAM. LDY #>NAM. J
SR $FFBD.. JSR $FFC0.. L
DA #$61. STA $B9. JSR $F
3D5.. LDA $BA. JSR $ED0C
.. LDA $B9. JSR $EDB9..
LDA SLO. JSR $EDDD.
LDA SHI. JSR $EDDD...OK
LDY #$00. SEI. STY $01
. LDA (SLO),Y. DEY.
STY $01. CLI... JSR
$EDDD.. BIT $90. BVC END
E.. INC SLO. BNE KKB..
INC SHI..KKB LDY SLO.
CPY ELO. BNE OK. LDY S
HI. CPY EHI. BNE OK..END
E JSR $FFC3. JSR $FFE7.
JSR $F642. RTS...NAM .T
EXT "@:A"..
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL