|
This page contains no introduction. |
Uncompiled Source Code#
Some uncompiled source code can be found only in the Japanese ROM at 0x70F9.
USH00_0
JSR YEQXADD1
CHK_FLUSH00
LDA PLAY_ÿÿG
Q CHK_FLUSHDLR
LDA PLAYBUF,X
AND #C0H
STA I_TEMP
LDA PLAYBUF,Y
AND #C0H
STA J_TEMP
CHK_FLUSHALL
LDA I_TEMP
CMP J_TEMP
BNE NO_ÿÿUS INY
CPY #5
BNE CHK_FLUSH00
INX
CPX #4
BNE CHK_FLUSH00_0
INC FLUSH_FLG
RTS
NO_FLUSH
LDA #0
STA FLUSH_FLG
RTS
;
;
;
CHK_PÿÿRD JSR CHK_DLRNO
JMP CHK_PAIR10
CHK_PAIR
LDX #0
STX SAME_CNT
STX PAIR_TEMP
CHK_PAIR00_0
JSR YEQXADD1
CHK_PAIR00
LDA PLAY_FLG
BEQ ÿÿK_ DLR
LDA PLAYBUF,X
AND #0FH
STA I_TEMP
LDA PLAYBUF,Y
AND #0FH
STA J_TEMP
CHK_PAIR10
LDA I_TEMP
CMP J_TEMP
BNE NOT_SAME
INC SÿÿE_
LDA J_TEMP
BNE CHK_PAIR03
LDA #13
CHK_PAIR03
CMP PAIR_TEMP
BMI NOT_SAME
PHA
LDA PAIR_TEMP
STA PAIR_TEMP1
PLA
STA PAIR_TEMP
ÿÿOT E
INY
CPY #5
BNE CHK_PAIR00
INX
CPX #4
BNE CHK_PAIR00_0
RTS
;
;
;
CHK_STRIGHTDLR
JSR CHK_DLRNO
JMP CHK_STRIGHT10
CHK_STRIÿÿT
X #0
CHK_STRIGHT00_0
JSR YEQXADD1
CHK_STRIGHT00
LDA PLAY_FLG
BEQ CHK_STRIGHTDLR
LDA PLAYBUF,X
AND #0FH
STA I_TEMP
LDA PLAYBUF,Y
ÿÿAN FH
STA J_TEMP
CHK_STRIGHT10
LDA I_TEMP
CMP J_TEMP
BMI CHK_STRSUB01
SEC
SBC J_TEMP
CMP #4
BMI CHK_STR01
BEQ CHK_STR01
JMP CHÿÿNO
CHK_STR01
INY
CPY #5
BNE CHK_STRIGHT00
INX
CPX #04
BNE CHK_STRIGHT00_0
INC STR_FLG
RTS
CHK_NOSTR
LDA #0
STA STR_FLG
RTS
ÿÿHK SUB01
SEC
LDA J_TEMP
SBC I_TEMP
CMP #4
BMI CHK_STR01
BEQ CHK_STR01
JMP CHK_NOSTR
;
;
;
CHK_BIGERDLR
LDA DLRBUF
JMP CHK_BIGÿÿ10 T_ATO13
LDA #13
JMP CHK_BIGER10
CHK_BIGDLR01
LDA DLRBUF,X
JMP CHK_BIGER11
CHK_BIGER
LDX #1
LDA PLAY_FLG
BEQ CHK_BIGERDLR
LDA PÿÿYB BEQ SET_ATO13
CHK_BIGER10
; STA BIG_TMP1
AND #0FH
STA BIGER_TEMP
LDA #0
STA BIGCNT
CHK_BIGER01
LDA PLAY_FLG
BEQ CHK_BIGDLR01
Lÿÿ P UF,X
CHK_BIGER11
AND #0FH
STA I_TEMP
LDA BIGER_TEMP
CMP I_TEMP
BPL CHK_BIGER00
STX BIGCNT
LDA I_TEMP
CHK_BIGER00
STA BIGER_TEMÿÿ
CPX #5
BNE CHK_BIGER01
LDX BIGCNT
LDA PLAY_FLG
BEQ CHKBIG00
LDA PLAYBUF,X
STA BIG_TMP1
RTS
CHKBIG00
LDA DLRBUF,X
STA BIG_ÿÿP1 TS
;
;
;
CHK_ADDA1_DLR
LDA DLRBUF,X
JMP CHK_ADD101
CHK_ADDA1
LDX #0
CHK_ADDA011
LDA PLAY_FLG
BEQ CHK_ADDA1_DLR
LDA PLAYBUFÿÿ
ADD101
AND #0FH
CMP #0DH
BNE CHK_ADDA0011
CLC
LDA PLAY_FLG
BEQ CHK_ADD_DLR11
LDA PLAYBUF,X
AND #C0H
; ADC #13
STA PLAYBUF,X
ÿÿK_ 0011
INX
CPX #5
BNE CHK_ADDA011
RTS
CHK_ADD_DLR11
LDA DLRBUF,X
AND #C0H
; ADC #13
STA DLRBUF,X
JMP CHK_ADDA0011
CHK_ADDA_DLR
ÿÿLD RBUF,X
JMP CHK_ADD10
CHK_ADDA
LDX #0
CHK_ADDA01
LDA PLAY_FLG
BEQ CHK_ADDA_DLR
LDA PLAYBUF,X
CHK_ADD10
AND #0FH
BNE CHK_ADDA00
ÿÿLC DA PLAY_FLG
BEQ CHK_ADD_DLR1
LDA PLAYBUF,X
AND #C0H
ADC #13
STA PLAYBUF,X
CHK_ADDA00
INX
CPX #5
BNE CHK_ADDA01
RTS
CHK_ADD_Dÿÿ1
A DLRBUF,X
AND #C0H
ADC #13
STA DLRBUF,X
JMP CHK_ADDA00
;
;
;
YEQXADD1
TXA
CLC
ADC #1
TAY
RTS
;
;
;
SET_ITEM
LDA SÿÿE_
BEQ NOT_PAIR
TAX
LDA PAIR_ITEM,X
STA ITEM
RTS
PAIR_ITEM
DB 0,1,2,3,6,7,9
NOT_PAIR
LDA FLUSH_FLG
BEQ NOT_FLUSH
LDA STR_FLG
ÿÿQ LUSH
LDA #8
STA ITEM
RTS
NOT_FLUSH
LDA STR_FLG
BEQ BED_CARD
LDA #4
STA ITEM
RTS
BED_CARD
LDA #0
STA ITEM
RTS
IS_FLUSHÿÿ L 5
STA ITEM
RTS
PUSHITEM
LDX #0
LDA PLAY_FLG
BEQ PUSHIT_DLR0
INX
PUSHIT_DLR0
LDA ITEM
STA DLR_ITEM,X
LDA SAME_CNT
BNE PUSH_ÿÿ
; BIGER_TEMP
LDA BIG_TMP1
STA DLR_CHK2,X
RTS
PUSH_P
LDA PAIR_TEMP
STA DLR_CHK2,X
LDY SAME_CNT
CPY #2
BEQ SPC_CASE11
INX
LDÿÿBI P1
STA DLR_CHK3,X
RTS
SPC_CASE11
INX
LDA PAIR_TEMP1
STA DLR_CHK3,X
RTS
�NNERAS
; JMP ITEM_SPC_TEST
LDA #0
STA PLAY_FLG
JSR ÿÿK_Regional Differences#
The title screen was completely changed for the US release.
|
Japan |
US |
|---|---|
|
|