119 lines
1.3 KiB
NASM
119 lines
1.3 KiB
NASM
.size 8000
|
|
|
|
.text@48
|
|
ei
|
|
jp lstatint
|
|
|
|
.text@100
|
|
jp lbegin
|
|
|
|
.data@143
|
|
c0
|
|
|
|
.text@150
|
|
lbegin:
|
|
ld a, 00
|
|
ldff(ff), a
|
|
ld a, 30
|
|
ldff(00), a
|
|
ld a, 01
|
|
ldff(4d), a
|
|
stop, 00
|
|
ld c, 44
|
|
ld b, 90
|
|
lbegin_waitly90:
|
|
ldff a, (c)
|
|
cmp a, b
|
|
jrnz lbegin_waitly90
|
|
ld hl, 8000
|
|
xor a, a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld hl, 8010
|
|
ld a, ff
|
|
ld(hl++), a
|
|
ld(hl++), a
|
|
ld a, 01
|
|
ld b, 32
|
|
ld hl, 9a40
|
|
lbegin_settilemap:
|
|
ld(hl++), a
|
|
dec b
|
|
jrnz lbegin_settilemap
|
|
ld a, 80
|
|
ldff(68), a
|
|
ld a, ff
|
|
ld c, 69
|
|
ldff(c), a
|
|
ldff(c), a
|
|
ld a, aa
|
|
ldff(c), a
|
|
ldff(c), a
|
|
ld a, 55
|
|
ldff(c), a
|
|
ldff(c), a
|
|
xor a, a
|
|
ldff(c), a
|
|
ldff(c), a
|
|
ld c, 41
|
|
ld b, 03
|
|
lbegin_waitm3:
|
|
ldff a, (c)
|
|
and a, b
|
|
cmp a, b
|
|
jrnz lbegin_waitm3
|
|
ld a, 20
|
|
ldff(c), a
|
|
ld a, 02
|
|
ldff(ff), a
|
|
ei
|
|
ld c, 42
|
|
ld b, 90
|
|
|
|
.text@1000
|
|
lstatint:
|
|
nop
|
|
|
|
.text@101e
|
|
ldff a, (44)
|
|
ld d, a
|
|
ld a, b
|
|
sub a, d
|
|
ldff(c), a
|
|
pop hl
|
|
xor a, a
|
|
|
|
.text@1067
|
|
ldff(c), a
|
|
|