summaryrefslogtreecommitdiff
path: root/scripts/VermilionCity.asm
diff options
context:
space:
mode:
Diffstat (limited to 'scripts/VermilionCity.asm')
-rwxr-xr-xscripts/VermilionCity.asm73
1 files changed, 51 insertions, 22 deletions
diff --git a/scripts/VermilionCity.asm b/scripts/VermilionCity.asm
index b253fea6..a9336970 100755
--- a/scripts/VermilionCity.asm
+++ b/scripts/VermilionCity.asm
@@ -1,5 +1,7 @@
VermilionCity_Script:
call EnableAutoTextBoxDrawing
+ ld hl, wd492
+ res 7, [hl]
ld hl, wCurrentMapScriptFlags
bit 6, [hl]
res 6, [hl]
@@ -11,11 +13,24 @@ VermilionCity_Script:
call nz, .setFirstLockTrashCanIndex
ld hl, VermilionCity_ScriptPointers
ld a, [wVermilionCityCurScript]
- jp CallFunctionInTable
+ call CallFunctionInTable
+ call .vermilionCityScript_19869
+ ret
+
+.vermilionCityScript_19869
+ CheckEventHL EVENT_152
+ ret nz
+ CheckEventReuseHL EVENT_GOT_BIKE_VOUCHER
+ ret z
+ SetEventReuseHL EVENT_152
+ ret
.setFirstLockTrashCanIndex
call Random
+ ld a, [hRandomAdd]
+ ld b, a
ld a, [hRandomSub]
+ adc b
and $e
ld [wFirstLockTrashCanIndex], a
ret
@@ -38,12 +53,12 @@ VermilionCity_ScriptPointers:
dw VermilionCityScript4
VermilionCityScript0:
- ld a, [wSpriteStateData1 + 9]
+ ld a, [wSpritePlayerStateData1FacingDirection]
and a ; cp SPRITE_FACING_DOWN
- ret nz
+ jr nz, .return
ld hl, SSAnneTicketCheckCoords
call ArePlayerCoordsInArray
- ret nc
+ jr nc, .return
xor a
ld [hJoyHeld], a
ld [wcf0d], a
@@ -67,6 +82,9 @@ VermilionCityScript0:
ld [wVermilionCityCurScript], a
ret
+.return
+ ret
+
SSAnneTicketCheckCoords:
db $1e,$12 ; y, x
db $ff
@@ -122,11 +140,12 @@ VermilionCity_TextPointers:
dw VermilionCityText6
dw VermilionCityText7
dw VermilionCityText8
+ dw VermilionCityText9
dw MartSignText
dw PokeCenterSignText
- dw VermilionCityText11
dw VermilionCityText12
dw VermilionCityText13
+ dw VermilionCityText14
VermilionCityText1:
TX_FAR _VermilionCityText1
@@ -157,7 +176,7 @@ VermilionCityText3:
TX_ASM
CheckEvent EVENT_SS_ANNE_LEFT
jr nz, .shipHasDeparted
- ld a, [wSpriteStateData1 + 9]
+ ld a, [wSpritePlayerStateData1FacingDirection]
cp SPRITE_FACING_RIGHT
jr z, .greetPlayer
ld hl, .inFrontOfOrBehindGuardCoords
@@ -225,33 +244,43 @@ VermilionCityText5:
ld a, MACHOP
call PlayCry
call WaitForSoundToFinish
- ld hl, VermilionCityText14
+ ld hl, VermilionCityText15
ret
-VermilionCityText14:
- TX_FAR _VermilionCityText14
+VermilionCityText15:
+ TX_FAR _VermilionCityText15
db "@"
VermilionCityText6:
TX_FAR _VermilionCityText6
db "@"
-VermilionCityText7:
- TX_FAR _VermilionCityText7
- db "@"
-
VermilionCityText8:
- TX_FAR _VermilionCityText8
- db "@"
+ TX_ASM
+ callba Func_f1a8a
+ jp TextScriptEnd
-VermilionCityText11:
- TX_FAR _VermilionCityText11
- db "@"
+VermilionCityText9:
+ TX_ASM
+ callba Func_f1a96
+ jp TextScriptEnd
VermilionCityText12:
- TX_FAR _VermilionCityText12
- db "@"
+ TX_ASM
+ callba Func_f1aa2
+ jp TextScriptEnd
VermilionCityText13:
- TX_FAR _VermilionCityText13
- db "@"
+ TX_ASM
+ callba Func_f1aae
+ jp TextScriptEnd
+
+VermilionCityText14:
+ TX_ASM
+ callba Func_f1aba
+ jp TextScriptEnd
+
+VermilionCityText7:
+ TX_ASM
+ callba Func_f1a0f
+ jp TextScriptEnd