Work for now
This commit is contained in:
parent
9f5752e61f
commit
2e8ac1b0a2
197
src/main.asm
197
src/main.asm
|
@ -9,7 +9,7 @@ rst00:
|
||||||
rst08:
|
rst08:
|
||||||
jp $020c
|
jp $020c
|
||||||
fillff 29
|
fillff 29
|
||||||
rst28:
|
Jumptable: ; rst $28
|
||||||
add a
|
add a
|
||||||
pop hl
|
pop hl
|
||||||
ld e,a
|
ld e,a
|
||||||
|
@ -27,26 +27,26 @@ VBlankIRQ:
|
||||||
jp $017e
|
jp $017e
|
||||||
fillff 5
|
fillff 5
|
||||||
LCDStatIRQ:
|
LCDStatIRQ:
|
||||||
jp $26be
|
jp DummyInterruptHandler
|
||||||
fillff 5
|
fillff 5
|
||||||
TimerIRQ:
|
TimerIRQ:
|
||||||
jp $26be
|
jp DummyInterruptHandler
|
||||||
fillff 5
|
fillff 5
|
||||||
SerialIRQ:
|
SerialIRQ:
|
||||||
jp Unknown005b
|
jp Unknown005b
|
||||||
Unknown005b:
|
Unknown005b:
|
||||||
push af
|
push af
|
||||||
push hl
|
push hl
|
||||||
push de
|
push de
|
||||||
push bc
|
push bc
|
||||||
call Unknown006b
|
call Unknown006b
|
||||||
ld a, $01
|
ld a, $01
|
||||||
ld [$ffcc], a
|
ld [$ffcc], a
|
||||||
pop bc
|
pop bc
|
||||||
pop de
|
pop de
|
||||||
pop hl
|
pop hl
|
||||||
pop af
|
pop af
|
||||||
reti
|
reti
|
||||||
Unknown006b:
|
Unknown006b:
|
||||||
ldh a, [$cd]
|
ldh a, [$cd]
|
||||||
rst $28
|
rst $28
|
||||||
|
@ -84,39 +84,144 @@ Unknown009f:
|
||||||
ldh [$d0],a
|
ldh [$d0],a
|
||||||
ret
|
ret
|
||||||
Unknown00a4:
|
Unknown00a4:
|
||||||
ldh a, [$01]
|
ldh a, [$01]
|
||||||
ldh [$d0], a
|
ldh [$d0], a
|
||||||
ldh a, [$cb]
|
ldh a, [$cb]
|
||||||
cp $29
|
cp $29
|
||||||
ret z
|
ret z
|
||||||
ldh a, [$cf]
|
ldh a, [$cf]
|
||||||
ldh [$01], a
|
ldh [$01], a
|
||||||
ld a, $ff
|
ld a, $ff
|
||||||
ldh [$cf], a
|
ldh [$cf], a
|
||||||
ld a, $80
|
ld a, $80
|
||||||
ldh [$02], a
|
ldh [$02], a
|
||||||
ret
|
ret
|
||||||
Unknown00ba:
|
Unknown00ba:
|
||||||
ldh a, [$01]
|
ldh a, [$01]
|
||||||
ldh [$d0], a
|
ldh [$d0], a
|
||||||
ldh a, [$cb]
|
ldh a, [$cb]
|
||||||
cp $29
|
cp $29
|
||||||
ret z
|
ret z
|
||||||
ldh a, [$cf]
|
ldh a, [$cf]
|
||||||
ldh [$01], a
|
ldh [$01], a
|
||||||
ei
|
ei
|
||||||
call $0a98
|
call $0a98
|
||||||
ld a, $80
|
ld a, $80
|
||||||
ldh [$02], a
|
ldh [$02], a
|
||||||
ret
|
ret
|
||||||
ldh a, [$cd]
|
Unused00d0:
|
||||||
cp $02
|
ldh a, [$cd]
|
||||||
ret nz
|
cp $02
|
||||||
xor a
|
ret nz
|
||||||
ldh [$0f], a
|
xor a
|
||||||
ei
|
ldh [$0f], a
|
||||||
ret
|
ei
|
||||||
|
ret
|
||||||
fillff ($100-$da)
|
fillff ($100-$da)
|
||||||
entrypoint:
|
entrypoint:
|
||||||
nop
|
nop
|
||||||
jp $0150
|
jp $0150
|
||||||
|
SECTION "Main",ROM0[$0150]
|
||||||
|
entrypoint2:
|
||||||
|
jp $020c
|
||||||
|
Unused0153:
|
||||||
|
call $29e3
|
||||||
|
.loop ldh a, [$41]
|
||||||
|
and $03
|
||||||
|
jr nz, .loop
|
||||||
|
ld b, [hl]
|
||||||
|
.loop2 ldh a, [$41]
|
||||||
|
and $03
|
||||||
|
jr nz, .loop2
|
||||||
|
ld a, [hl]
|
||||||
|
and b
|
||||||
|
ret
|
||||||
|
Unknown0166:
|
||||||
|
ld a, e
|
||||||
|
add [hl]
|
||||||
|
daa
|
||||||
|
ldi [hl], a
|
||||||
|
ld a, d
|
||||||
|
adc [hl]
|
||||||
|
daa
|
||||||
|
ldi [hl], a
|
||||||
|
ld a, $00
|
||||||
|
adc [hl]
|
||||||
|
daa
|
||||||
|
ld [hl], a
|
||||||
|
ld a, $01
|
||||||
|
ldh [$e0], a
|
||||||
|
ret nc
|
||||||
|
ld a, $99
|
||||||
|
ldd [hl], a
|
||||||
|
ldd [hl], a
|
||||||
|
ld [hl], a
|
||||||
|
ret
|
||||||
|
VBlank:
|
||||||
|
push af
|
||||||
|
push bc
|
||||||
|
push de
|
||||||
|
push hl
|
||||||
|
ldh a, [$ce]
|
||||||
|
and a
|
||||||
|
jr z, $12
|
||||||
|
ldh a, [$cb]
|
||||||
|
cp $29
|
||||||
|
jr nz, .jrone
|
||||||
|
xor a
|
||||||
|
ldh [$ce], a
|
||||||
|
ldh a, [$cf]
|
||||||
|
ldh [$01], a
|
||||||
|
ld hl, $ff02
|
||||||
|
ld [hl], $81
|
||||||
|
.jrone call $21e0
|
||||||
|
call $23cc
|
||||||
|
call $23b7
|
||||||
|
call $239e
|
||||||
|
call $238c
|
||||||
|
call $237d
|
||||||
|
call $236e
|
||||||
|
call $235f
|
||||||
|
call $2350
|
||||||
|
call $2341
|
||||||
|
call $2332
|
||||||
|
call $2323
|
||||||
|
call $22f8
|
||||||
|
call $22e9
|
||||||
|
call $22da
|
||||||
|
call $22cb
|
||||||
|
call $22bc
|
||||||
|
call $22ad
|
||||||
|
call $229e
|
||||||
|
call $1ed7
|
||||||
|
call $ffb6
|
||||||
|
call $18ca
|
||||||
|
ld a, [$c0ce]
|
||||||
|
and a
|
||||||
|
jr z, $1a
|
||||||
|
ldh a, [$98]
|
||||||
|
cp $03
|
||||||
|
jr nz, .jrtwo
|
||||||
|
ld hl, $986d
|
||||||
|
call $243b
|
||||||
|
ld a, $01
|
||||||
|
ldh [$e0], a
|
||||||
|
ld hl, $9c6d
|
||||||
|
call $243b
|
||||||
|
xor a
|
||||||
|
ld [$c0ce], a
|
||||||
|
.jrtwo ld hl, $ffe2
|
||||||
|
inc [hl]
|
||||||
|
xor a
|
||||||
|
ldh [$43], a
|
||||||
|
ldh [$42], a
|
||||||
|
inc a
|
||||||
|
ldh [$85], a
|
||||||
|
pop hl
|
||||||
|
pop de
|
||||||
|
pop bc
|
||||||
|
pop af
|
||||||
|
reti
|
||||||
|
SECTION "Temp Section",ROM0[$26be]
|
||||||
|
DummyInterruptHandler:
|
||||||
|
reti
|
||||||
|
|
Loading…
Reference in New Issue