hunt bugfix, does not fully work yet

This commit is contained in:
FeralChild64 committed 2021-01-16 23:08:25 +01:00
1 parent 81ea9d4fde
commit 256256aa25
3 files changed
+9 -18

No files matched your search

+2 -11
View File
@@ -1681,18 +1681,9 @@ Get_Char:
LDX Buf_Index
INC Buf_Index
LDA BUF,X
CPX #1
PLX
BCC @regc
CMP #';' ; register
BEQ @return
CMP #'?' ; help
BEQ @return
@regc CMP #0
BEQ @eof
CMP #':'
BEQ @eof
RTS
CMP #0
BNE @return
@eof PHP
DEC Buf_Index
PLP
+1 -1
View File
@@ -39,7 +39,7 @@ Mon_Hunt:
lda Long_AC+1
ora Long_AC+2
ora Long_AC+3
+beq Mon_Error ; value above $FF
+bne Mon_Error ; value above $FF
cpy #32 ; max data length
bne @lpbin
+6 -6
View File
@@ -28,7 +28,7 @@ DBG_print_Buf_Index:
rts
DBG_print_long_pc:
DBG_print_long_ac:
php
pha
@@ -37,15 +37,15 @@ DBG_print_long_pc:
phz
jsr PRIMM
!pet $0D, "long pc : ", 0
!pet $0D, "long ac : ", 0
lda Long_PC+3
lda Long_AC+3
jsr Print_Hex
lda Long_PC+2
lda Long_AC+2
jsr Print_Hex
lda Long_PC+1
lda Long_AC+1
jsr Print_Hex
lda Long_PC+0
lda Long_AC+0
jsr Print_Hex
jsr PRIMM