6502/PLASMA
1
0
Fork 0
mirror of https://github.com/dschmenk/PLASMA.git synced 2025-03-20 03:31:27 +00:00
Code Issues Projects Releases Wiki Activity

DIVMOD now works properly

Browse Source
This commit is contained in:
David Schmenk 2024-01-14 21:43:57 -08:00
parent 0515117d52
commit c3cc7cb139
1 changed files with 1 additions and 23 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
src/vmsrc/apple/plvm802.s
View File

@ -694,18 +694,7 @@ MOD JSR _DIV
;*
;* DIVMOD TOS-1 BY TOS - !!!HACK!!! MUST COPY ESTK TO HW STACK
;*
DIVMOD +ACCMEM8
LDX ESP
LDA ESTKH+1,X
PHA
LDA ESTKL+1,X
PHA
LDA ESTKH,X
PHA
LDA ESTKL,X
PHA
+ACCMEM16
JSR _DIV
DIVMOD JSR _DIV
CPX #$80 ; DIVSGN
BCC + ; REMAINDER IS SIGN OF DIVIDEND
EOR #$FFFF
@ -718,17 +707,6 @@ DIVMOD +ACCMEM8
EOR #$FFFF
INC
+ STA NOS,S ; DVDND
+ACCMEM8
LDX ESP
PLA
STA ESTKL,X
PLA
STA ESTKH,X
PLA
STA ESTKL+1,X
PLA
STA ESTKH+1,X
+ACCMEM16
JMP NEXTOP
;*
;* NEGATE TOS