mirror of
https://github.com/thornAvery/kep-hack.git
synced 2025-09-16 18:30:50 +12:00

This is mostly because of an rgbasm bug that prevents macro arguments from exceeding 16 characters, but the names were bad anyway.
69 lines
1.1 KiB
NASM
Executable file
69 lines
1.1 KiB
NASM
Executable file
EmotionBubble: ; 17c47 (5:7c47)
|
|
ld a, [wcd50]
|
|
ld c, a
|
|
ld b, $0
|
|
ld hl, EmotionBubblesPointerTable ; $7caf
|
|
add hl, bc
|
|
add hl, bc
|
|
ld e, [hl]
|
|
inc hl
|
|
ld d, [hl]
|
|
ld hl, vChars1 + $780
|
|
ld bc, (BANK(EmotionBubblesPointerTable) << 8) + $04
|
|
call CopyVideoData
|
|
ld a, [wcfcb]
|
|
push af
|
|
ld a, $ff
|
|
ld [wcfcb], a
|
|
ld a, [wd736]
|
|
bit 6, a
|
|
ld hl, wOAMBuffer + $8f
|
|
ld de, wOAMBuffer + $9f
|
|
jr z, .asm_17c7a
|
|
ld hl, wOAMBuffer + $7f
|
|
ld de, wOAMBuffer + $8f
|
|
.asm_17c7a
|
|
ld bc, $90
|
|
.asm_17c7d
|
|
ld a, [hl]
|
|
ld [de], a
|
|
dec hl
|
|
dec de
|
|
dec bc
|
|
ld a, c
|
|
or b
|
|
jr nz, .asm_17c7d
|
|
ld hl, wSpriteStateData1 + 4
|
|
ld a, [wcd4f]
|
|
swap a
|
|
ld c, a
|
|
ld b, $0
|
|
add hl, bc
|
|
ld a, [hli]
|
|
ld b, a
|
|
inc hl
|
|
ld a, [hl]
|
|
add $8
|
|
ld c, a
|
|
ld de, EmotionBubblesOAM ; $7cb5
|
|
xor a
|
|
call WriteOAMBlock
|
|
ld c, $3c
|
|
call DelayFrames
|
|
pop af
|
|
ld [wcfcb], a
|
|
call DelayFrame
|
|
jp UpdateSprites
|
|
|
|
EmotionBubblesPointerTable: ; 17caf (5:7caf)
|
|
dw EmotionBubbles
|
|
dw EmotionBubbles + $40
|
|
dw EmotionBubbles + $80
|
|
|
|
EmotionBubblesOAM: ; 17cb5 (5:7cb5)
|
|
db $F8,$00,$F9,$00
|
|
db $FA,$00,$FB,$00
|
|
|
|
EmotionBubbles: ; 17cbd (5:7cbd)
|
|
INCBIN "gfx/emotion_bubbles.2bpp"
|