thorn/kep-hack
1
0
Fork 0
mirror of https://github.com/thornAvery/kep-hack.git synced 2025-09-16 18:30:50 +12:00
Code Issues Actions Packages Projects Releases Wiki Activity

clean up vermilion labels

Browse source
This commit is contained in:
Matt 2020-05-03 14:25:01 -04:00
parent b6aa26ffa4
commit 6ec4b00b52
2 changed files with 28 additions and 28 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

BIN
pokered.sn1 Normal file
View file

Binary file not shown.

56
scripts/VermilionCity.asm
View file

@ -4,7 +4,7 @@ VermilionCity_Script:
bit 6, [hl]
res 6, [hl]
push hl
call nz, VermilionCityScript_197cb
call nz, .initCityScript
pop hl
bit 5, [hl]
res 5, [hl]
@ -20,7 +20,7 @@ VermilionCity_Script:
ld [wFirstLockTrashCanIndex], a
ret
VermilionCityScript_197cb:
.initCityScript
CheckEventHL EVENT_SS_ANNE_LEFT
ret z
CheckEventReuseHL EVENT_WALKED_PAST_GUARD_AFTER_SS_ANNE_LEFT
@ -41,7 +41,7 @@ VermilionCityScript0:
ld a, [wSpriteStateData1 + 9]
and a ; cp SPRITE_FACING_DOWN
ret nz
ld hl, CoordsData_19823
ld hl, SSAnneTicketCheckCoords
call ArePlayerCoordsInArray
ret nc
xor a
@ -51,13 +51,13 @@ VermilionCityScript0:
ld [hSpriteIndexOrTextID], a
call DisplayTextID
CheckEvent EVENT_SS_ANNE_LEFT
jr nz, .asm_19810
jr nz, .shipHasDeparted
ld b, S_S_TICKET
predef GetQuantityOfItemInBag
ld a, b
and a
ret nz
.asm_19810
.shipHasDeparted
ld a, D_UP
ld [wSimulatedJoypadStatesEnd], a
ld a, $1
@ -67,12 +67,12 @@ VermilionCityScript0:
ld [wVermilionCityCurScript], a
ret
CoordsData_19823:
db $1e,$12
SSAnneTicketCheckCoords:
db $1e,$12 ; y, x
db $ff
VermilionCityScript4:
ld hl, CoordsData_19823
ld hl, SSAnneTicketCheckCoords
call ArePlayerCoordsInArray
ret c
ld a, $0
@ -135,14 +135,14 @@ VermilionCityText1:
VermilionCityText2:
TX_ASM
CheckEvent EVENT_SS_ANNE_LEFT
jr nz, .asm_1989e
jr nz, .shipHasDeparted
ld hl, VermilionCityText_198a7
call PrintText
jr .asm_198a4
.asm_1989e
jr .end
.shipHasDeparted
ld hl, VermilionCityText_198ac
call PrintText
.asm_198a4
.end
jp TextScriptEnd
VermilionCityText_198a7:
@ -156,43 +156,43 @@ VermilionCityText_198ac:
VermilionCityText3:
TX_ASM
CheckEvent EVENT_SS_ANNE_LEFT
jr nz, .asm_198f6
jr nz, .shipHasDeparted
ld a, [wSpriteStateData1 + 9]
cp SPRITE_FACING_RIGHT
jr z, .asm_198c8
ld hl, VermilionCityCoords1
jr z, .greetPlayer
ld hl, .inFrontOfOrBehindGuardCoords
call ArePlayerCoordsInArray
jr nc, .asm_198d0
.asm_198c8
jr nc, .greetPlayerAndCheckTicket
.greetPlayer
ld hl, SSAnneWelcomeText4
call PrintText
jr .asm_198fc
.asm_198d0
jr .end
.greetPlayerAndCheckTicket
ld hl, SSAnneWelcomeText9
call PrintText
ld b, S_S_TICKET
predef GetQuantityOfItemInBag
ld a, b
and a
jr nz, .asm_198e9
jr nz, .playerHasTicket
ld hl, SSAnneNoTicketText
call PrintText
jr .asm_198fc
.asm_198e9
jr .end
.playerHasTicket
ld hl, SSAnneFlashedTicketText
call PrintText
ld a, $4
ld [wVermilionCityCurScript], a
jr .asm_198fc
.asm_198f6
jr .end
.shipHasDeparted
ld hl, SSAnneNotHereText
call PrintText
.asm_198fc
.end
jp TextScriptEnd
VermilionCityCoords1:
db $1d,$13
db $1f,$13
.inFrontOfOrBehindGuardCoords
db $1d,$13 ; y, x of tile in front of guard
db $1f,$13 ; y, x of tile behind guard
db $ff
SSAnneWelcomeText4: