mirror of
https://github.com/pret/pokegold-spaceworld.git
synced 2026-09-26 13:32:48 -04:00
luckytyphlosion
e1659ecd41
Addresses of sections will now be added to the linkerscript via `org`, and the section name will be the path/to/file. If there is more than one section in the file, then add a @SectionName after the path/to/file to describe the section.
104 lines
1.3 KiB
NASM
104 lines
1.3 KiB
NASM
include "constants.asm"
|
|
|
|
SECTION "home/cry.asm", ROM0
|
|
|
|
PlayStereoCry::
|
|
push af
|
|
ld a, $1
|
|
ld [wc1b9], a
|
|
pop af
|
|
jr asm_39c3
|
|
|
|
PlayCry:: ; 00:39ba
|
|
push af
|
|
xor a
|
|
ld [wc1b9], a
|
|
ld [wc1ba], a
|
|
pop af
|
|
asm_39c3: ; 00:39c3
|
|
push hl
|
|
push de
|
|
push bc
|
|
call GetCryIndex
|
|
ld e, c
|
|
ld d, b
|
|
call PlayCryHeader
|
|
call WaitSFX
|
|
pop bc
|
|
pop de
|
|
pop hl
|
|
ret
|
|
|
|
LoadCryHeader::
|
|
call GetCryIndex
|
|
ldh a, [hROMBank]
|
|
push af
|
|
ld a, BANK(CryHeaders)
|
|
call Bankswitch
|
|
ld hl, CryHeaders
|
|
add hl, bc
|
|
add hl, bc
|
|
add hl, bc
|
|
add hl, bc
|
|
add hl, bc
|
|
add hl, bc
|
|
ld e, [hl]
|
|
inc hl
|
|
ld d, [hl]
|
|
inc hl
|
|
ld a, [hli]
|
|
ld [wCryPitch], a
|
|
ld a, [hli]
|
|
ld [wCryPitch + 1], a
|
|
ld a, [hli]
|
|
ld [wCryLength], a
|
|
ld a, [hl]
|
|
ld [wCryLength + 1], a
|
|
pop af
|
|
call Bankswitch
|
|
ret
|
|
|
|
GetCryIndex:: ; 00:3a02
|
|
ld d, a
|
|
ld a, [wce37]
|
|
push af
|
|
ld a, d
|
|
ld [wce37], a
|
|
callba Function40b45
|
|
ld a, [wce37]
|
|
dec a
|
|
ld c, a
|
|
ld b, $0
|
|
pop af
|
|
ld [wce37], a
|
|
ret
|
|
|
|
PrintLevel::
|
|
ld a, $6e
|
|
ld [hli], a
|
|
ld c, 2
|
|
ld a, [wcd9e]
|
|
cp 100
|
|
jr c, asm_3a37
|
|
dec hl
|
|
inc c
|
|
jr asm_3a37
|
|
|
|
PrintLevelFullWidth::
|
|
ld a, $6e
|
|
ld [hli], a
|
|
ld c, 3
|
|
ld a, [wcd9e]
|
|
asm_3a37: ; 00:3a37
|
|
ld [wce37], a
|
|
ld de, wce37
|
|
ld b, PRINTNUM_RIGHTALIGN | 1
|
|
jp PrintNumber
|
|
|
|
Function3a42::
|
|
ld hl, wce2e
|
|
ld c, a
|
|
ld b, $0
|
|
add hl, bc
|
|
ld a, [hl]
|
|
ret |