1
0
mirror of https://github.com/dschmenk/PLASMA.git synced 2025-01-09 13:33:26 +00:00

All out speed CFFB

This commit is contained in:
David Schmenk 2018-03-18 14:31:36 -07:00
parent 1a8f3048b5
commit 571e8d8eb0

View File

@ -516,7 +516,12 @@ CN DEX
STA ESTKH,X STA ESTKH,X
JMP NEXTOP JMP NEXTOP
CFFB LDA #$FF CFFB LDA #$FF
!BYTE $2C ; BIT $00A9 - effectively skips LDA #$00, no harm in reading this address DEX
STA ESTKH,X
INY ;+INC_IP
LDA (IP),Y
STA ESTKL,X
JMP NEXTOP
CB LDA #$00 CB LDA #$00
DEX DEX
STA ESTKH,X STA ESTKH,X
@ -1282,7 +1287,7 @@ CALL INY ;+INC_IP
LDA (IP),Y LDA (IP),Y
STA CALLADR+2 STA CALLADR+2
_CALL TYA _CALL TYA
CLC SEC
ADC IPL ADC IPL
PHA PHA
LDA IPH LDA IPH
@ -1297,7 +1302,7 @@ CALLADR JSR $FFFF
STA IPH STA IPH
PLA PLA
STA IPL STA IPL
LDY #$01 LDY #$00
JMP FETCHOP JMP FETCHOP
;* ;*
;* ENTER FUNCTION WITH FRAME SIZE AND PARAM COUNT ;* ENTER FUNCTION WITH FRAME SIZE AND PARAM COUNT