mirror of
https://github.com/KarolS/millfork.git
synced 2024-12-29 02:31:45 +00:00
Preliminary EasyFlash support
This commit is contained in:
Karol Stasiak
parent
2159fc345f
commit
e1c32c2e31
133
include/c64_easyflash.mfk
Normal file
133
include/c64_easyflash.mfk
Normal file
@ -0,0 +1,133 @@
|
|||||||
|
import err
|
||||||
|
|
||||||
|
inline asm void switch_hirom(byte a) {
|
||||||
|
? and #$3F
|
||||||
|
! sta $DE01
|
||||||
|
? rts
|
||||||
|
}
|
||||||
|
|
||||||
|
#if EAPI_ADDR
|
||||||
|
|
||||||
|
#if EAPI_ADDR & $ff != 0
|
||||||
|
#warn EAPI_ADDR should be page-aligned
|
||||||
|
#endif
|
||||||
|
#if EAPI_ADDR < $200
|
||||||
|
#error EAPI_ADDR cannot be less than $200
|
||||||
|
#endif
|
||||||
|
|
||||||
|
#use EAPI_ADDR
|
||||||
|
array __eapi_copy[$300] @ EAPI_ADDR
|
||||||
|
|
||||||
|
#else
|
||||||
|
|
||||||
|
array __eapi_copy[$300] align(256)
|
||||||
|
|
||||||
|
#endif
|
||||||
|
|
||||||
|
// address, value, returns true if ok
|
||||||
|
asm clear_carry eapi_write_flash(pointer xy, byte a) @ $DF80 extern
|
||||||
|
// bank, page ($80, $A0 or $E0), returns true if ok
|
||||||
|
asm clear_carry eapi_erase_sector(byte a, byte y) @ $DF83 extern
|
||||||
|
// bank
|
||||||
|
asm void eapi_set_bank(byte a) @ $DF86 extern
|
||||||
|
// returns bank
|
||||||
|
asm byte eapi_get_bank() @ $DF89 extern
|
||||||
|
// bank mode, address
|
||||||
|
asm void eapi_set_ptr(byte a, pointer xy) @ $DF8C extern
|
||||||
|
// length.b2, length.loword
|
||||||
|
asm void eapi_set_len(byte a, word xy) @ $DF8F extern
|
||||||
|
asm byte eapi_read_flash_inc() @ $DF92 extern
|
||||||
|
asm clear_carry eapi_write_flash_inc(byte a) @ $DF95 extern
|
||||||
|
asm void eapi_set_slot(byte a) @ $DF98 extern
|
||||||
|
asm void eapi_init_again() @ __eapi_copy.addr+20 extern
|
||||||
|
|
||||||
|
segment(hirom0) {
|
||||||
|
|
||||||
|
// this code will actually be located at $FFC0, as EasyFlash boots in the Ultimax mode
|
||||||
|
|
||||||
|
asm void __coldStart() @$BFD8 {
|
||||||
|
sei
|
||||||
|
ldx #$ff
|
||||||
|
txs
|
||||||
|
cld
|
||||||
|
lda #8
|
||||||
|
sta $d016
|
||||||
|
|
||||||
|
__coldStart_wait_for_ram:
|
||||||
|
sta $0100, x
|
||||||
|
dex
|
||||||
|
bne __coldStart_wait_for_ram
|
||||||
|
|
||||||
|
ldx #$40
|
||||||
|
__coldStart_l1:
|
||||||
|
lda __startUpCode+$4000, x
|
||||||
|
sta $0100, x
|
||||||
|
dex
|
||||||
|
bpl __coldStart_l1
|
||||||
|
jmp $0100
|
||||||
|
}
|
||||||
|
|
||||||
|
// this will be copied to the stack anyway
|
||||||
|
asm void __startUpCode() @$BF98 {
|
||||||
|
lda #$87
|
||||||
|
sta $de02
|
||||||
|
lda #$7f
|
||||||
|
sta $dc00
|
||||||
|
ldx #$ff
|
||||||
|
stx $dc02
|
||||||
|
inx
|
||||||
|
stx $dc03
|
||||||
|
lda $dc01
|
||||||
|
stx $dc02
|
||||||
|
stx $dc00
|
||||||
|
and #$e0
|
||||||
|
cmp #$e0
|
||||||
|
bne __startUpCode_kill
|
||||||
|
ldx #0
|
||||||
|
stx $d016
|
||||||
|
jsr $ff84
|
||||||
|
jsr $ff87
|
||||||
|
jsr $ff8a
|
||||||
|
jsr $ff81
|
||||||
|
jmp $8000
|
||||||
|
__startUpCode_kill:
|
||||||
|
lda #4
|
||||||
|
sta $de02
|
||||||
|
jmp ($fffc)
|
||||||
|
__startUpCode_end:
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
// sets errno
|
||||||
|
// if errno==err_ok, then returns the number of slots (<64) or the number of banks + 64 (>=64)
|
||||||
|
// if errno!=err_ok, then returns EAPI error code
|
||||||
|
asm byte eapi_init() @$BB00 {
|
||||||
|
? ldx #0
|
||||||
|
__eapi_init_loop:
|
||||||
|
lda $B800,x
|
||||||
|
sta __eapi_copy,x
|
||||||
|
lda $B900,x
|
||||||
|
sta __eapi_copy+$100,x
|
||||||
|
lda $BA00,x
|
||||||
|
sta __eapi_copy+$200,x
|
||||||
|
dex
|
||||||
|
bne __eapi_init_loop
|
||||||
|
jsr __eapi_copy+20
|
||||||
|
bcc __eapi_init_success
|
||||||
|
ldx #err_fail
|
||||||
|
bne __eapi_init_end
|
||||||
|
__eapi_init_success:
|
||||||
|
ldx #err_ok
|
||||||
|
sta errno
|
||||||
|
? tya
|
||||||
|
__eapi_init_end:
|
||||||
|
stx errno
|
||||||
|
? rts
|
||||||
|
}
|
||||||
|
|
||||||
|
const array(pointer) __vectors @$BFFA = [
|
||||||
|
$FFFE,
|
||||||
|
__coldStart.addr + $4000,
|
||||||
|
$4040
|
||||||
|
]
|
||||||
|
}
|
||||||
120
include/c64_ef_small.ini
Normal file
120
include/c64_ef_small.ini
Normal file
@ -0,0 +1,120 @@
|
|||||||
|
; Commodore 64
|
||||||
|
; 128K EasyFlash cartridge
|
||||||
|
; the $8000-$9FFF bank is mirrored 8 times
|
||||||
|
; the $A000-$BFFF bank is swappable
|
||||||
|
; actual total code size: 72 KB
|
||||||
|
|
||||||
|
[compilation]
|
||||||
|
arch=nmos
|
||||||
|
encoding=petscii
|
||||||
|
screen_encoding=petscr
|
||||||
|
modules=c64_hardware,c64_easyflash,c64_kernal,c64_panic,stdlib
|
||||||
|
|
||||||
|
|
||||||
|
[allocation]
|
||||||
|
zp_pointers=$FB,$FD,$43,$45,$47,$4B,$F7,$F9,$9E,$9B,$3D
|
||||||
|
segments=default,lorom,hirom0,hirom1,hirom2,hirom3,hirom4,hirom5,hirom6,hirom7
|
||||||
|
default_code_segment=lorom
|
||||||
|
ram_init_segment=hirom0
|
||||||
|
|
||||||
|
segment_default_start=$800
|
||||||
|
segment_default_end=$7FFF
|
||||||
|
segment_ram_bank=$ff
|
||||||
|
|
||||||
|
segment_lorom_start=$8000
|
||||||
|
segment_lorom_end=$9FFF
|
||||||
|
segment_lorom_bank=0
|
||||||
|
segment_lorom_fill=$ff
|
||||||
|
|
||||||
|
segment_hirom0_start=$A000
|
||||||
|
segment_hirom0_end=$BFFF
|
||||||
|
segment_hirom0_bank=0
|
||||||
|
segment_hirom0_fill=$f0
|
||||||
|
|
||||||
|
segment_hirom1_start=$A000
|
||||||
|
segment_hirom1_end=$BFFF
|
||||||
|
segment_hirom1_bank=1
|
||||||
|
segment_hirom1_fill=$f1
|
||||||
|
|
||||||
|
segment_hirom2_start=$A000
|
||||||
|
segment_hirom2_end=$BFFF
|
||||||
|
segment_hirom2_bank=2
|
||||||
|
segment_hirom2_fill=$f2
|
||||||
|
|
||||||
|
segment_hirom3_start=$A000
|
||||||
|
segment_hirom3_end=$BFFF
|
||||||
|
segment_hirom3_bank=3
|
||||||
|
segment_hirom3_fill=$f3
|
||||||
|
|
||||||
|
segment_hirom4_start=$A000
|
||||||
|
segment_hirom4_end=$BFFF
|
||||||
|
segment_hirom4_bank=4
|
||||||
|
segment_hirom4_fill=$f4
|
||||||
|
|
||||||
|
segment_hirom5_start=$A000
|
||||||
|
segment_hirom5_end=$BFFF
|
||||||
|
segment_hirom5_bank=5
|
||||||
|
segment_hirom5_fill=$f5
|
||||||
|
|
||||||
|
segment_hirom6_start=$A000
|
||||||
|
segment_hirom6_end=$BFFF
|
||||||
|
segment_hirom6_bank=6
|
||||||
|
segment_hirom6_fill=$f6
|
||||||
|
|
||||||
|
segment_hirom7_start=$A000
|
||||||
|
segment_hirom7_end=$BFFF
|
||||||
|
segment_hirom7_bank=7
|
||||||
|
segment_hirom7_fill=$f7
|
||||||
|
|
||||||
|
[define]
|
||||||
|
CBM=1
|
||||||
|
CBM_64=1
|
||||||
|
MOS_6510=1
|
||||||
|
WIDESCREEN=1
|
||||||
|
KEYBOARD=1
|
||||||
|
JOYSTICKS=2
|
||||||
|
HAS_BITMAP_MODE=1
|
||||||
|
CBM_64_CRT=1
|
||||||
|
|
||||||
|
[output]
|
||||||
|
style=single
|
||||||
|
format= $43,$36,$34,$20,$43,$41,$52,$54,$52,$49,$44,$47,$45,$20,$20,$20, \
|
||||||
|
0,0,0,$40, 1,0, 0,32, 1, 0, 0,0,0,0,0,0, \
|
||||||
|
$4d,$49,$4c,$4c, $46,$4f,$52,$4b, $20,$31,$36,$4b, $20,$50,$52,$4f, \
|
||||||
|
$47,$52,$41,$4d, 0,0,0,0, 0,0,0,0, 0,0,0,0, \
|
||||||
|
$43,$48,$49,$50, 0,0,$20,$10, 0,2, 0,0, $80,$00, $20,$00, \
|
||||||
|
lorom:$8000:$9FFF, \
|
||||||
|
$43,$48,$49,$50, 0,0,$20,$10, 0,2, 0,0, $A0,$00, $20,$00, \
|
||||||
|
hirom0:$A000:$BFFF, \
|
||||||
|
$43,$48,$49,$50, 0,0,$20,$10, 0,2, 0,1, $80,$00, $20,$00, \
|
||||||
|
lorom:$8000:$9FFF, \
|
||||||
|
$43,$48,$49,$50, 0,0,$20,$10, 0,2, 0,1, $A0,$00, $20,$00, \
|
||||||
|
hirom1:$A000:$BFFF, \
|
||||||
|
$43,$48,$49,$50, 0,0,$20,$10, 0,2, 0,2, $80,$00, $20,$00, \
|
||||||
|
lorom:$8000:$9FFF, \
|
||||||
|
$43,$48,$49,$50, 0,0,$20,$10, 0,2, 0,2, $A0,$00, $20,$00, \
|
||||||
|
hirom2:$A000:$BFFF, \
|
||||||
|
$43,$48,$49,$50, 0,0,$20,$10, 0,2, 0,3, $80,$00, $20,$00, \
|
||||||
|
lorom:$8000:$9FFF, \
|
||||||
|
$43,$48,$49,$50, 0,0,$20,$10, 0,2, 0,3, $A0,$00, $20,$00, \
|
||||||
|
hirom3:$A000:$BFFF, \
|
||||||
|
$43,$48,$49,$50, 0,0,$20,$10, 0,2, 0,4, $80,$00, $20,$00, \
|
||||||
|
lorom:$8000:$9FFF, \
|
||||||
|
$43,$48,$49,$50, 0,0,$20,$10, 0,2, 0,4, $A0,$00, $20,$00, \
|
||||||
|
hirom4:$A000:$BFFF, \
|
||||||
|
$43,$48,$49,$50, 0,0,$20,$10, 0,2, 0,5, $80,$00, $20,$00, \
|
||||||
|
lorom:$8000:$9FFF, \
|
||||||
|
$43,$48,$49,$50, 0,0,$20,$10, 0,2, 0,5, $A0,$00, $20,$00, \
|
||||||
|
hirom5:$A000:$BFFF, \
|
||||||
|
$43,$48,$49,$50, 0,0,$20,$10, 0,2, 0,6, $80,$00, $20,$00, \
|
||||||
|
lorom:$8000:$9FFF, \
|
||||||
|
$43,$48,$49,$50, 0,0,$20,$10, 0,2, 0,6, $A0,$00, $20,$00, \
|
||||||
|
hirom6:$A000:$BFFF, \
|
||||||
|
$43,$48,$49,$50, 0,0,$20,$10, 0,2, 0,7, $80,$00, $20,$00, \
|
||||||
|
lorom:$8000:$9FFF, \
|
||||||
|
$43,$48,$49,$50, 0,0,$20,$10, 0,2, 0,7, $A0,$00, $20,$00, \
|
||||||
|
hirom7:$A000:$BFFF
|
||||||
|
extension=crt
|
||||||
|
labels=vice
|
||||||
|
|
||||||
|
|
||||||
Loading…
Reference in New Issue
Block a user