UPDATED: memory.config.a patcher directly patches PRODOS file [fixes Where Did My Toothbrush Go, Rosie the Counting Rabbit]

This commit is contained in:
4am
2018-02-13 16:09:10 -05:00
parent 01e7bc86cc
commit df6070b0b0
2 changed files with 18 additions and 21 deletions

View File

@@ -6,36 +6,33 @@
; real startup program ; real startup program
; ;
; tested on ; tested on
; Rosie the Counting Rabbit (1987, DC Heath)
; What Makes A Dinosaur Sore (1987, DC Heath) ; What Makes A Dinosaur Sore (1987, DC Heath)
; Squeegee Learns About Drugs (1989, Marshware) ; Squeegee Learns About Drugs (1989, Marshware)
; The Botanist's Apprentice (1989, National Geographic Society) ; Where Did My Toothbruth Go (1988, DC Heath)
; Journey to the Age of the Dinosaurs (1990, National Geographic Society) ; The Weather Machine (1988, National Geographic Society)
; The Botanist's Apprentice: Desert, Forest, and Wetland (1989, National Geographic Society)
; The Botanist's Apprentice: Farmland, Grassland, and Town (1989, National Geographic Society)
; Journey to the Age of the Dinosaurs: Europe and Asia (1990, National Geographic Society)
; Journey to the Age of the Dinosaurs: North America (1990, National Geographic Society)
; GeoWhiz (1990, Silver Burdett and Ginn)
;------------------------------- ;-------------------------------
!zone { !zone {
lda gIsProDOS ; only if ProDOS lda gIsProDOS ; only if ProDOS
bne .exit bne .exit
lda #$0F ldy #$0C
sta .sector+1 jsr SearchTrack
.sector lda #$FF ; modified at runtime !byte $AE,$C3,$CF,$CE,$C6,$C9,$C7 ; ".CONFIG"
!byte $8D,$08,$C0 ; STA $C008
!byte $B5,$42 ; LDA $42,X
bcs .exit
sta gDisplayBytes sta gDisplayBytes
ldx #$33
ldy #$10
jsr compare
!byte $4C,$00,$10; JMP $1000
!byte $A9,$00 ; LDA #$00
!byte $85,$04 ; STA $04
!byte $AE,$30,$BF; LDX $BF30
!byte $BD,$89,$C0; LDA $C089,X
!byte $BD,$8E,$C0; LDA $C08E,X
bcs +
lda #s_runhello lda #s_runhello
jsr PrintByID jsr PrintByID
lda gDisplayBytes lda gDisplayBytes
ldx #$36 inx
ldy #$01 ldy #$06
jsr modify jsr modify
!byte $60 !byte $D3,$D9,$D3,$D4,$C5,$CD ; "SYSTEM" instead of "CONFIG"
+ dec .sector+1
bpl .sector
.exit .exit
} }

View File

@@ -139,7 +139,7 @@ StringTable
; can be set directly before calling PrintByID. ; can be set directly before calling PrintByID.
; ;
.header .header
!text "Passport by 4am 2018-01-29",$00 !text "Passport by 4am 2018-02-13",$00
.mainmenu .mainmenu
!text "________________________________________",$8D,$8D,$8D,$8D,$8D,$8D,$8D !text "________________________________________",$8D,$8D,$8D,$8D,$8D,$8D,$8D
!text " " !text " "