Remove setup_loader and its user
This commit is contained in:
parent
f15ccf7799
commit
24b2374d3e
2 changed files with 0 additions and 27 deletions
|
@ -24,18 +24,6 @@
|
||||||
CLKMASK = %00000010
|
CLKMASK = %00000010
|
||||||
CTRL1 = $DC01
|
CTRL1 = $DC01
|
||||||
|
|
||||||
setup_loader:
|
|
||||||
;; Bank out character ROM, I/O in
|
|
||||||
lda #%00000100
|
|
||||||
ora $01
|
|
||||||
sta $01
|
|
||||||
|
|
||||||
lda #$00
|
|
||||||
sta progdest
|
|
||||||
lda #$c0
|
|
||||||
sta progdest+1
|
|
||||||
rts
|
|
||||||
|
|
||||||
maybe_download_userprog:
|
maybe_download_userprog:
|
||||||
;; Bank out character ROM, I/O in
|
;; Bank out character ROM, I/O in
|
||||||
lda #%00000100
|
lda #%00000100
|
||||||
|
|
|
@ -29,21 +29,6 @@ mainsetup:
|
||||||
lda #%00000000
|
lda #%00000000
|
||||||
sta $dc02
|
sta $dc02
|
||||||
|
|
||||||
jsr setup_loader
|
|
||||||
jmp endsetup
|
|
||||||
|
|
||||||
pha
|
|
||||||
@trying:
|
|
||||||
pla
|
|
||||||
tax
|
|
||||||
inx
|
|
||||||
stx $d020
|
|
||||||
txa
|
|
||||||
pha
|
|
||||||
|
|
||||||
jsr maybe_download_userprog
|
|
||||||
beq @trying
|
|
||||||
|
|
||||||
endsetup:
|
endsetup:
|
||||||
DOWNLOAD_TIMER = $FFFF
|
DOWNLOAD_TIMER = $FFFF
|
||||||
lda #$0d
|
lda #$0d
|
||||||
|
|
Loading…
Add table
Reference in a new issue