2019-12-26 16:19:44 +00:00
|
|
|
if GAME eq 5
|
|
|
|
SCOREDAT_PLACES = 5
|
|
|
|
SCOREDAT_NOT_CLEARED = 18
|
|
|
|
SCOREDAT_CLEARED = 80h
|
|
|
|
else
|
|
|
|
SCOREDAT_PLACES = 10
|
|
|
|
SCOREDAT_NOT_CLEARED = 25
|
2019-12-28 22:28:10 +00:00
|
|
|
SCOREDAT_CLEARED_A = 1
|
|
|
|
SCOREDAT_CLEARED_B = 2
|
|
|
|
SCOREDAT_CLEARED_BOTH = SCOREDAT_CLEARED_A or SCOREDAT_CLEARED_B
|
2019-12-26 16:19:44 +00:00
|
|
|
endif
|
|
|
|
|
|
|
|
SCOREDAT_NAME_LEN = 8
|
|
|
|
|
|
|
|
scoredat_t struc
|
|
|
|
g_name db SCOREDAT_PLACES dup ((SCOREDAT_NAME_LEN + 1) dup (?))
|
|
|
|
g_points db SCOREDAT_PLACES dup (SCORE_DIGITS dup (?))
|
|
|
|
|
|
|
|
if GAME eq 5
|
|
|
|
g_stage db SCOREDAT_PLACES dup (?)
|
|
|
|
cleared db ?
|
|
|
|
db ?
|
|
|
|
else
|
|
|
|
cleared db ?
|
|
|
|
db ?
|
|
|
|
g_stage db SCOREDAT_PLACES dup (?)
|
|
|
|
db SCOREDAT_PLACES dup (?)
|
|
|
|
endif
|
|
|
|
scoredat_t ends
|
|
|
|
|
|
|
|
scoredat_section_t struc
|
|
|
|
key1 db ?
|
|
|
|
key2 db ?
|
|
|
|
sum dw ?
|
|
|
|
score scoredat_t <?>
|
|
|
|
scoredat_section_t ends
|
2019-12-27 21:28:54 +00:00
|
|
|
|
|
|
|
ifdef BINARY
|
|
|
|
scoredat_decode_func equ <scoredat_decode>
|
|
|
|
scoredat_encode_func equ <scoredat_encode>
|
|
|
|
if BINARY eq 'O'
|
|
|
|
scoredat_decode_func equ <scoredat_decode_both>
|
|
|
|
elseif (BINARY eq 'M') and (GAME eq 4)
|
|
|
|
scoredat_decode_func equ <scoredat_decode pascal, offset _hi>
|
|
|
|
scoredat_encode_func equ <scoredat_encode pascal, offset _hi>
|
|
|
|
endif
|
|
|
|
endif
|