95 lines
932 B
NASM
95 lines
932 B
NASM
.size 8000
|
|
|
|
.text@48
|
|
jp lstatint
|
|
|
|
.text@100
|
|
jp lbegin
|
|
|
|
.text@150
|
|
lbegin:
|
|
ld a, ff
|
|
ldff(45), a
|
|
ld c, 44
|
|
ld b, 91
|
|
lbegin_waitly91:
|
|
ldff a, (c)
|
|
cmp a, b
|
|
jrnz lbegin_waitly91
|
|
xor a, a
|
|
ldff(40), a
|
|
ld hl, 8000
|
|
lbegin_fillvramff:
|
|
ld a, ff
|
|
ld(hl++), a
|
|
ld a, a0
|
|
cmp a, h
|
|
jrnz lbegin_fillvramff
|
|
ld a, ff
|
|
ldff(47), a
|
|
ld a, 55
|
|
ldff(49), a
|
|
xor a, a
|
|
ldff(48), a
|
|
ld hl, fea0
|
|
lbegin_fill_oam:
|
|
dec l
|
|
ld(hl), a
|
|
jrnz lbegin_fill_oam
|
|
ld hl, fe98
|
|
ld d, 10
|
|
ld a, d
|
|
ld(hl), a
|
|
inc l
|
|
ld a, 08
|
|
ld(hl), a
|
|
inc l
|
|
inc l
|
|
ld a, d
|
|
ld(hl), a
|
|
inc l
|
|
ld(hl), a
|
|
inc l
|
|
ld a, 0c
|
|
ld(hl), a
|
|
ld a, 97
|
|
ldff(40), a
|
|
lbegin_waitly91_2:
|
|
ldff a, (c)
|
|
cmp a, b
|
|
jrnz lbegin_waitly91_2
|
|
ld a, 20
|
|
ldff(41), a
|
|
ld a, 02
|
|
ldff(ff), a
|
|
xor a, a
|
|
ldff(0f), a
|
|
ei
|
|
ld c, 40
|
|
ld d, 97
|
|
|
|
.text@1000
|
|
lstatint:
|
|
nop
|
|
nop
|
|
nop
|
|
nop
|
|
nop
|
|
nop
|
|
nop
|
|
nop
|
|
nop
|
|
nop
|
|
nop
|
|
nop
|
|
nop
|
|
nop
|
|
nop
|
|
ld a, 95
|
|
ldff(c), a
|
|
ld a, d
|
|
ldff(c), a
|
|
ld sp, fffe
|
|
ei
|
|
|