pokered/engine/play_time.asm

62 lines
934 B
NASM
Raw Normal View History

2014-09-14 18:29:18 +00:00
TrackPlayTime: ; 18dee (6:4dee)
call CountDownIgnoreInputBitReset
ld a, [wd732]
2014-05-22 22:13:20 +00:00
bit 0, a
ret z
2014-09-14 18:29:18 +00:00
ld a, [W_PLAYTIMEMINUTES]
2014-05-22 22:13:20 +00:00
and a
ret nz
2014-09-14 18:29:18 +00:00
ld a, [W_PLAYTIMEFRAMES]
2014-05-22 22:13:20 +00:00
inc a
2014-09-14 18:29:18 +00:00
ld [W_PLAYTIMEFRAMES], a
2014-05-22 22:13:20 +00:00
cp 60
ret nz
xor a
2014-09-14 18:29:18 +00:00
ld [W_PLAYTIMEFRAMES], a
ld a, [W_PLAYTIMESECONDS]
2014-05-22 22:13:20 +00:00
inc a
2014-09-14 18:29:18 +00:00
ld [W_PLAYTIMESECONDS], a
2014-05-22 22:13:20 +00:00
cp 60
ret nz
xor a
2014-09-14 18:29:18 +00:00
ld [W_PLAYTIMESECONDS], a
ld a, [W_PLAYTIMEMINUTES + 1]
2014-05-22 22:13:20 +00:00
inc a
ld [W_PLAYTIMEMINUTES + 1], a
2014-05-22 22:13:20 +00:00
cp 60
ret nz
xor a
ld [W_PLAYTIMEMINUTES + 1], a
ld a, [W_PLAYTIMEHOURS + 1]
2014-05-22 22:13:20 +00:00
inc a
ld [W_PLAYTIMEHOURS + 1], a
2014-05-22 22:13:20 +00:00
cp $ff
ret nz
ld a, $ff
2014-09-14 18:29:18 +00:00
ld [W_PLAYTIMEMINUTES], a
2014-05-22 22:13:20 +00:00
ret
2014-09-14 18:29:18 +00:00
CountDownIgnoreInputBitReset: ; 18e36 (6:4e36)
ld a, [wIgnoreInputCounter]
2014-05-22 22:13:20 +00:00
and a
jr nz, .asm_18e40
ld a, $ff
jr .asm_18e41
.asm_18e40
dec a
.asm_18e41
2014-09-14 18:29:18 +00:00
ld [wIgnoreInputCounter], a
2014-05-22 22:13:20 +00:00
and a
ret nz
ld a, [wd730]
2014-05-22 22:13:20 +00:00
res 1, a
res 2, a
bit 5, a
res 5, a
ld [wd730], a
2014-05-22 22:13:20 +00:00
ret z
xor a
2014-05-25 17:51:53 +00:00
ld [hJoyPressed], a
ld [hJoyHeld], a
2014-05-22 22:13:20 +00:00
ret