mirror of
https://github.com/dschmenk/PLASMA.git
synced 2025-02-23 21:29:04 +00:00
Fix MUL opcode
This commit is contained in:
parent
415e284066
commit
f1bdedf938
@ -7,7 +7,7 @@
|
|||||||
;**********************************************************
|
;**********************************************************
|
||||||
!CPU 65816
|
!CPU 65816
|
||||||
SELFMODIFY = 0
|
SELFMODIFY = 0
|
||||||
DEBUG = 1
|
DEBUG = 0
|
||||||
;*
|
;*
|
||||||
;* THE DEFAULT CPU MODE FOR EXECUTING OPCODES IS:
|
;* THE DEFAULT CPU MODE FOR EXECUTING OPCODES IS:
|
||||||
;* 16 BIT A/M
|
;* 16 BIT A/M
|
||||||
@ -523,11 +523,11 @@ MUL LDX #$10
|
|||||||
EOR #$FFFF
|
EOR #$FFFF
|
||||||
STA TMP
|
STA TMP
|
||||||
LDA #$0000
|
LDA #$0000
|
||||||
MULLP ASL TMP ;LSR TMP ; MULTPLR
|
MULLP ASL
|
||||||
|
ASL TMP ; MULTPLR
|
||||||
BCS +
|
BCS +
|
||||||
ADC TOS,S ; MULTPLD
|
ADC TOS,S ; MULTPLD
|
||||||
+ ASL ;ASL TOS,S ; MULTPLD
|
+ DEX
|
||||||
DEX
|
|
||||||
BNE MULLP
|
BNE MULLP
|
||||||
STA NOS,S ; PROD
|
STA NOS,S ; PROD
|
||||||
JMP DROP
|
JMP DROP
|
||||||
@ -1819,7 +1819,7 @@ STEP STX TMPL
|
|||||||
XBA
|
XBA
|
||||||
LDA $101,X
|
LDA $101,X
|
||||||
LDX TMPH
|
LDX TMPH
|
||||||
JSR PRWORD
|
JSR PRWORD
|
||||||
BRA +++
|
BRA +++
|
||||||
++ LDX TMPH
|
++ LDX TMPH
|
||||||
LDA #' '
|
LDA #' '
|
||||||
|
Loading…
x
Reference in New Issue
Block a user