mirror of
https://github.com/bobbimanners/emailler.git
synced 2024-08-06 16:28:54 +00:00
move scratch ram to $C000, bank out cart ROMN when running d/led prg - this means can now d/l prgs up to 47K in size.
git-svn-id: http://svn.code.sf.net/p/netboot65/code@82 93682198-c243-4bdb-bd91-e943c89aac3b
This commit is contained in:
parent
96886b84f6
commit
5ad3240531
@ -6,7 +6,7 @@ MEMORY {
|
|||||||
IP65ZP: start = $5f, size = $10, type = rw, define = yes;
|
IP65ZP: start = $5f, size = $10, type = rw, define = yes;
|
||||||
HEADER: start = $8000, size = $16, file = %O;
|
HEADER: start = $8000, size = $16, file = %O;
|
||||||
ROM: start = $8016, size = $1F00, define = yes, file = %O;
|
ROM: start = $8016, size = $1F00, define = yes, file = %O;
|
||||||
RAM: start = $7000, size = $1000, define = yes;
|
RAM: start = $C000, size = $1000, define = yes;
|
||||||
|
|
||||||
|
|
||||||
}
|
}
|
||||||
|
@ -33,11 +33,19 @@
|
|||||||
.import __DATA_SIZE__
|
.import __DATA_SIZE__
|
||||||
|
|
||||||
tftp_dir_buffer = $6000
|
tftp_dir_buffer = $6000
|
||||||
.bss
|
|
||||||
|
|
||||||
|
.data
|
||||||
|
exit_cart:
|
||||||
|
lda #$02
|
||||||
|
sta $de00 ;turns off RR cartridge - obviously we need to execut this from RAM else we fall into never-never land :-)
|
||||||
|
jmp_to_downloaded_prg:
|
||||||
|
jmp $0000 ;overwritten when we load a file
|
||||||
|
|
||||||
|
.bss
|
||||||
|
|
||||||
nb65_param_buffer: .res $10
|
nb65_param_buffer: .res $10
|
||||||
|
|
||||||
bin_file_jmp: .res 3
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
@ -94,7 +102,8 @@ init:
|
|||||||
jmp @get_key
|
jmp @get_key
|
||||||
|
|
||||||
@exit_to_basic:
|
@exit_to_basic:
|
||||||
jmp $fe66 ;do a wam start
|
ldax #$fe66 ;do a wam start
|
||||||
|
jmp exit_to_cart_via_ax
|
||||||
|
|
||||||
@tftp_boot:
|
@tftp_boot:
|
||||||
|
|
||||||
@ -209,14 +218,14 @@ init:
|
|||||||
stx $2d ;save end-of-BASIC pointer (lo byte)
|
stx $2d ;save end-of-BASIC pointer (lo byte)
|
||||||
sty $2e ;save end-of-BASIC pointer (hi byte)
|
sty $2e ;save end-of-BASIC pointer (hi byte)
|
||||||
jsr $a659 ; CLR (reset variables)
|
jsr $a659 ; CLR (reset variables)
|
||||||
jmp $a7ae ; jump to BASIC interpreter loop
|
ldax #$a7ae ; jump to BASIC interpreter loop
|
||||||
|
jmp exit_to_cart_via_ax
|
||||||
|
|
||||||
@not_a_basic_file:
|
@not_a_basic_file:
|
||||||
lda #$4C ;opcode for JMP
|
|
||||||
sta bin_file_jmp
|
|
||||||
ldax nb65_param_buffer+NB65_TFTP_POINTER
|
ldax nb65_param_buffer+NB65_TFTP_POINTER
|
||||||
stax bin_file_jmp+1
|
exit_to_cart_via_ax:
|
||||||
jmp bin_file_jmp
|
stax jmp_to_downloaded_prg+1
|
||||||
|
jmp exit_cart
|
||||||
|
|
||||||
print_errorcode:
|
print_errorcode:
|
||||||
ldax #error_code
|
ldax #error_code
|
||||||
|
@ -28,6 +28,9 @@ basicstub:
|
|||||||
|
|
||||||
init:
|
init:
|
||||||
|
|
||||||
|
lda #$01
|
||||||
|
sta $de00 ;turns on RR cartridge (since it will have been banked out when exiting to BASIC)
|
||||||
|
|
||||||
jsr print_cr
|
jsr print_cr
|
||||||
jsr print_ip_config
|
jsr print_ip_config
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user