1
0
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:
Dave Schmenk 2017-12-03 20:17:42 -08:00
parent 415e284066
commit f1bdedf938

View File

@ -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 #' '