Clean up extranous instructions

This commit is contained in:
David Schmenk 2014-05-09 21:19:31 -07:00
parent 1581328e81
commit e145308853

View File

@ -258,7 +258,6 @@ IINTRP STA LCRWEN+LCBNK2 ; WRITE ENABLE LANGUAGE CARD
LDA (TMP),Y LDA (TMP),Y
STA IPL STA IPL
DEY DEY
LDY #$00
BEQ FETCHOP BEQ FETCHOP
IINTRPX STA LCRWEN+LCBNK2 ; WRITE ENABLE LANGUAGE CARD IINTRPX STA LCRWEN+LCBNK2 ; WRITE ENABLE LANGUAGE CARD
STA LCRWEN+LCBNK2 STA LCRWEN+LCBNK2
@ -273,7 +272,6 @@ IINTRPX STA LCRWEN+LCBNK2 ; WRITE ENABLE LANGUAGE CARD
LDA (TMP),Y LDA (TMP),Y
STA IPL STA IPL
DEY DEY
LDY #$00
BEQ FETCHOPX BEQ FETCHOPX
;* ;*
;* INTERP BYTECODE IN MAIN MEM ;* INTERP BYTECODE IN MAIN MEM
@ -292,8 +290,7 @@ FETCHOP LDA (IP),Y
NEXTOPHX INC IPH NEXTOPHX INC IPH
BNE FETCHOPX BNE FETCHOPX
DROPX INX DROPX INX
NEXTOPX CLI NEXTOPX INY
INY
BEQ NEXTOPHX BEQ NEXTOPHX
FETCHOPX SEI FETCHOPX SEI
STA ALTRDON STA ALTRDON