Optimize PHA PLA

This commit is contained in:
Michaelangel007 2017-07-19 10:02:10 -07:00
parent 102ca9438e
commit 612d49ad20

View File

@ -66,18 +66,16 @@ DetectCPU
; Apple IIgs ; Apple IIgs
detect_ram detect_ram
lda MACHINEID1 ; FBB3: $38 = ][, $EA = ][+, $06 = //e //c IIgs lda MACHINEID1 ; FBB3: $38 = ][, $EA = ][+, $06 = //e //c IIgs
pha
cmp #$38 ; cmp #$38 ;
bne apple_iiplus bne apple_iiplus
apple_ii apple_ii
pla
jsr IB_HGR ; HGR on ][ jsr IB_HGR ; HGR on ][
beq apple_ii_normal ; always, ends with BNE $D01B RTS beq apple_ii_normal ; always, ends with BNE $D01B RTS
apple_iiplus apple_iiplus
pha
jsr AS_HGR ; ][ = $D000, Only on Apple ][+ jsr AS_HGR ; ][ = $D000, Only on Apple ][+
pla pla
cmp #$EA ; apple ][+? cmp #$EA ; apple ][+?
bne apple_iie ; if so keep going bne apple_iie ; if so keep going