make Panglos patching compatible with /RAM

This commit is contained in:
Peter Ferrie 2018-08-14 19:06:45 -07:00
parent 7a8bfe943f
commit 95c9051019
2 changed files with 11 additions and 11 deletions

View File

@ -64,17 +64,17 @@ PanglosDOS
sta .patch9+2 sta .patch9+2
ldy #0 ldy #0
tya tya
- sta $900,y - sta $2000,y
sta $A00,y sta $2100,y
;$B00-B2F is partial ;$2200-222F is partial
sta $C00,y sta $2300,y
sta $D00,y sta $2400,y
;$E00-E2F is partial ;$2500-252F is partial
iny iny
bne - bne -
ldy #$2F ldy #$2F
- sta $B00,y - sta $2200,y
sta $E00,y sta $2500,y
dey dey
bpl - bpl -
.patch1 .patch1
@ -126,7 +126,7 @@ PanglosDOS
ora ((BASEPAGE+1)<<8)+$0D,X ora ((BASEPAGE+1)<<8)+$0D,X
sta modsrc sta modsrc
lda modsrc+1 lda modsrc+1
adc #9 ;$900+ adc #$20 ;$2000+
sta modsrc+1 sta modsrc+1
lda ((BASEPAGE+1)<<8)+$0A lda ((BASEPAGE+1)<<8)+$0A
sta (modsrc),Y sta (modsrc),Y
@ -181,7 +181,7 @@ PanglosDOS
ora gSector ora gSector
sta modsrc sta modsrc
lda modsrc+1 lda modsrc+1
adc #9 adc #$20
sta modsrc+1 sta modsrc+1
lda (modsrc),Y lda (modsrc),Y
.patch8 .patch8

View File

@ -144,7 +144,7 @@ StringTable
; can be set directly before calling PrintByID. ; can be set directly before calling PrintByID.
; ;
.header .header
!text "Passport by 4am 2018-08-09",$00 !text "Passport by 4am 2018-08-14",$00
.mainmenu .mainmenu
!text "________________________________________",$8D,$8D,$8D,$8D,$8D,$8D,$8D !text "________________________________________",$8D,$8D,$8D,$8D,$8D,$8D,$8D
!text " " !text " "