diff options
Diffstat (limited to 'engine/HoF_room_pc.asm')
| -rwxr-xr-x | engine/HoF_room_pc.asm | 52 |
1 files changed, 26 insertions, 26 deletions
diff --git a/engine/HoF_room_pc.asm b/engine/HoF_room_pc.asm index 82aa6d52..fb196486 100755 --- a/engine/HoF_room_pc.asm +++ b/engine/HoF_room_pc.asm @@ -47,61 +47,61 @@ FadeInCreditsText: DisplayCreditsMon: xor a - ld [H_AUTOBGTRANSFERENABLED],a + ld [H_AUTOBGTRANSFERENABLED], a call SaveScreenTilesToBuffer1 call FillMiddleOfScreenWithWhite ; display the next monster from CreditsMons - ld hl,wNumCreditsMonsDisplayed - ld c,[hl] ; how many monsters have we displayed so far? + ld hl, wNumCreditsMonsDisplayed + ld c, [hl] ; how many monsters have we displayed so far? inc [hl] - ld b,0 - ld hl,CreditsMons - add hl,bc ; go that far in the list of monsters and get the next one - ld a,[hl] - ld [wcf91],a - ld [wd0b5],a + ld b, 0 + ld hl, CreditsMons + add hl, bc ; go that far in the list of monsters and get the next one + ld a, [hl] + ld [wcf91], a + ld [wd0b5], a coord hl, 8, 6 call GetMonHeader call LoadFrontSpriteByMonIndex - ld hl,vBGMap0 + $c + ld hl, vBGMap0 + $c call CreditsCopyTileMapToVRAM xor a - ld [H_AUTOBGTRANSFERENABLED],a + ld [H_AUTOBGTRANSFERENABLED], a call LoadScreenTilesFromBuffer1 - ld hl,vBGMap0 + ld hl, vBGMap0 call CreditsCopyTileMapToVRAM - ld a,$A7 - ld [rWX],a - ld hl,vBGMap1 + ld a, $A7 + ld [rWX], a + ld hl, vBGMap1 call CreditsCopyTileMapToVRAM call FillMiddleOfScreenWithWhite - ld a,%11111100 ; make the mon a black silhouette - ld [rBGP],a + ld a, %11111100 ; make the mon a black silhouette + ld [rBGP], a ; scroll the mon left by one tile 7 times - ld bc,7 + ld bc, 7 .scrollLoop1 call ScrollCreditsMonLeft dec c - jr nz,.scrollLoop1 + jr nz, .scrollLoop1 ; scroll the mon left by one tile 20 times ; This time, we have to move the window left too in order to hide the text that ; is wrapping around to the right side of the screen. - ld c,20 + ld c, 20 .scrollLoop2 call ScrollCreditsMonLeft - ld a,[rWX] + ld a, [rWX] sub 8 - ld [rWX],a + ld [rWX], a dec c - jr nz,.scrollLoop2 + jr nz, .scrollLoop2 xor a - ld [hWY],a - ld a,%11000000 - ld [rBGP],a + ld [hWY], a + ld a, %11000000 + ld [rBGP], a ret INCLUDE "data/credit_mons.asm" |