summaryrefslogtreecommitdiff
path: root/scripts
diff options
context:
space:
mode:
Diffstat (limited to 'scripts')
-rwxr-xr-xscripts/AgathasRoom.asm10
-rwxr-xr-xscripts/BillsHouse.asm6
-rwxr-xr-xscripts/BluesHouse.asm34
-rwxr-xr-xscripts/BrunosRoom.asm10
-rwxr-xr-xscripts/CeladonDiner.asm14
-rwxr-xr-xscripts/CeladonMansion1F.asm8
-rwxr-xr-xscripts/CeladonMansion3F.asm16
-rwxr-xr-xscripts/CeladonMansionRoofHouse.asm4
-rwxr-xr-xscripts/CeladonMart3F.asm14
-rwxr-xr-xscripts/CeladonMartElevator.asm19
-rwxr-xr-xscripts/CeladonMartRoof.asm2
-rwxr-xr-xscripts/CeruleanBadgeHouse.asm15
-rwxr-xr-xscripts/CeruleanCity.asm18
-rwxr-xr-xscripts/CeruleanTradeHouse.asm2
-rwxr-xr-xscripts/CeruleanTrashedHouse.asm10
-rwxr-xr-xscripts/ChampionsRoom.asm18
-rwxr-xr-xscripts/CinnabarGym.asm4
-rwxr-xr-xscripts/CinnabarLabFossilRoom.asm4
-rwxr-xr-xscripts/CinnabarLabMetronomeRoom.asm14
-rwxr-xr-xscripts/CinnabarLabTradeRoom.asm4
-rwxr-xr-xscripts/CopycatsHouse2F.asm18
-rwxr-xr-xscripts/DiglettsCave.asm3
-rwxr-xr-xscripts/FuchsiaGoodRodHouse.asm29
-rwxr-xr-xscripts/GameCorner.asm4
-rwxr-xr-xscripts/HallOfFame.asm4
-rwxr-xr-xscripts/LancesRoom.asm22
-rwxr-xr-xscripts/LavenderCuboneHouse.asm8
-rwxr-xr-xscripts/LavenderTown.asm4
-rwxr-xr-xscripts/LoreleisRoom.asm10
-rwxr-xr-xscripts/MrFujisHouse.asm30
-rwxr-xr-xscripts/MrPsychicsHouse.asm14
-rwxr-xr-xscripts/MtMoonB2F.asm54
-rwxr-xr-xscripts/MtMoonPokecenter.asm2
-rwxr-xr-xscripts/Museum1F.asm16
-rwxr-xr-xscripts/OaksLab.asm24
-rwxr-xr-xscripts/PewterCity.asm14
-rwxr-xr-xscripts/PewterMart.asm2
-rwxr-xr-xscripts/PewterPokecenter.asm17
-rwxr-xr-xscripts/PokemonFanClub.asm4
-rwxr-xr-xscripts/PokemonMansion3F.asm8
-rwxr-xr-xscripts/PokemonTower2F.asm10
-rwxr-xr-xscripts/PokemonTower5F.asm10
-rwxr-xr-xscripts/PokemonTower6F.asm3
-rwxr-xr-xscripts/PokemonTower7F.asm48
-rwxr-xr-xscripts/RedsHouse1F.asm16
-rwxr-xr-xscripts/RedsHouse2F.asm3
-rwxr-xr-xscripts/RockTunnelPokecenter.asm4
-rwxr-xr-xscripts/RocketHideoutB2F.asm338
-rwxr-xr-xscripts/RocketHideoutB3F.asm121
-rwxr-xr-xscripts/RocketHideoutElevator.asm15
-rwxr-xr-xscripts/Route1.asm14
-rwxr-xr-xscripts/Route11Gate2F.asm16
-rwxr-xr-xscripts/Route12Gate2F.asm16
-rwxr-xr-xscripts/Route12SuperRodHouse.asm24
-rwxr-xr-xscripts/Route15Gate2F.asm14
-rwxr-xr-xscripts/Route16FlyHouse.asm10
-rwxr-xr-xscripts/Route16Gate1F.asm10
-rwxr-xr-xscripts/Route18Gate1F.asm10
-rwxr-xr-xscripts/Route18Gate2F.asm2
-rwxr-xr-xscripts/Route20.asm2
-rwxr-xr-xscripts/Route22.asm27
-rwxr-xr-xscripts/Route22Gate.asm6
-rwxr-xr-xscripts/Route23.asm15
-rwxr-xr-xscripts/Route24.asm11
-rwxr-xr-xscripts/Route2Gate.asm14
-rwxr-xr-xscripts/Route2TradeHouse.asm2
-rwxr-xr-xscripts/Route5Gate.asm6
-rwxr-xr-xscripts/Route6Gate.asm5
-rwxr-xr-xscripts/Route7Gate.asm6
-rwxr-xr-xscripts/Route8Gate.asm6
-rwxr-xr-xscripts/SSAnne2F.asm12
-rwxr-xr-xscripts/SSAnne2FRooms.asm2
-rwxr-xr-xscripts/SSAnneB1F.asm3
-rwxr-xr-xscripts/SSAnneCaptainsRoom.asm14
-rwxr-xr-xscripts/SSAnneKitchen.asm14
-rwxr-xr-xscripts/SafariZoneGate.asm6
-rwxr-xr-xscripts/SafariZoneSecretHouse.asm14
-rwxr-xr-xscripts/SeafoamIslands1F.asm6
-rwxr-xr-xscripts/SeafoamIslandsB1F.asm6
-rwxr-xr-xscripts/SeafoamIslandsB2F.asm6
-rwxr-xr-xscripts/SeafoamIslandsB3F.asm32
-rwxr-xr-xscripts/SeafoamIslandsB4F.asm32
-rwxr-xr-xscripts/SilphCo10F.asm4
-rwxr-xr-xscripts/SilphCo11F.asm32
-rwxr-xr-xscripts/SilphCo2F.asm6
-rwxr-xr-xscripts/SilphCo3F.asm6
-rwxr-xr-xscripts/SilphCo4F.asm6
-rwxr-xr-xscripts/SilphCo5F.asm8
-rwxr-xr-xscripts/SilphCo6F.asm4
-rwxr-xr-xscripts/SilphCo7F.asm20
-rwxr-xr-xscripts/SilphCo8F.asm4
-rwxr-xr-xscripts/SilphCo9F.asm10
-rwxr-xr-xscripts/SilphCoElevator.asm31
-rwxr-xr-xscripts/TradeCenter.asm6
-rwxr-xr-xscripts/UndergroundPathNorthSouth.asm3
-rwxr-xr-xscripts/UndergroundPathRoute5.asm2
-rwxr-xr-xscripts/UndergroundPathWestEast.asm3
-rwxr-xr-xscripts/VermilionCity.asm10
-rwxr-xr-xscripts/VermilionDock.asm1
-rwxr-xr-xscripts/VermilionOldRodHouse.asm24
-rwxr-xr-xscripts/VermilionTradeHouse.asm2
-rwxr-xr-xscripts/VictoryRoad1F.asm3
-rwxr-xr-xscripts/VictoryRoad2F.asm6
-rwxr-xr-xscripts/VictoryRoad3F.asm6
-rwxr-xr-xscripts/ViridianCity.asm26
-rwxr-xr-xscripts/ViridianGym.asm80
-rwxr-xr-xscripts/ViridianMart.asm15
-rwxr-xr-xscripts/WardensHouse.asm28
108 files changed, 859 insertions, 931 deletions
diff --git a/scripts/AgathasRoom.asm b/scripts/AgathasRoom.asm
index c8df935e..b0c53571 100755
--- a/scripts/AgathasRoom.asm
+++ b/scripts/AgathasRoom.asm
@@ -87,11 +87,11 @@ AgathaScript0:
ret
AgathaEntranceCoords:
- db $0A,$04
- db $0A,$05
- db $0B,$04
- db $0B,$05
- db $FF
+ dbmapcoord 4, 10
+ dbmapcoord 5, 10
+ dbmapcoord 4, 11
+ dbmapcoord 5, 11
+ db -1 ; end
AgathaScript3:
ld a, [wSimulatedJoypadStatesIndex]
diff --git a/scripts/BillsHouse.asm b/scripts/BillsHouse.asm
index 3edfdf5b..75594801 100755
--- a/scripts/BillsHouse.asm
+++ b/scripts/BillsHouse.asm
@@ -33,7 +33,7 @@ MovementData_1e79c:
db NPC_MOVEMENT_UP
db NPC_MOVEMENT_UP
db NPC_MOVEMENT_UP
- db $FF
+ db -1 ; end
; make Bill walk around the player
MovementData_1e7a0:
@@ -42,7 +42,7 @@ MovementData_1e7a0:
db NPC_MOVEMENT_UP
db NPC_MOVEMENT_LEFT
db NPC_MOVEMENT_UP
- db $FF
+ db -1 ; end
BillsHouseScript2:
ld a, [wd730]
@@ -93,7 +93,7 @@ MovementData_1e807:
db NPC_MOVEMENT_RIGHT
db NPC_MOVEMENT_RIGHT
db NPC_MOVEMENT_DOWN
- db $FF
+ db -1 ; end
BillsHouseScript4:
ld a, [wd730]
diff --git a/scripts/BluesHouse.asm b/scripts/BluesHouse.asm
index 241d6f5a..1ab0fd06 100755
--- a/scripts/BluesHouse.asm
+++ b/scripts/BluesHouse.asm
@@ -10,9 +10,7 @@ BluesHouse_ScriptPointers:
BluesHouseScript0:
SetEvent EVENT_ENTERED_BLUES_HOUSE
-
- ; trigger the next script
- ld a, 1
+ ld a, $1
ld [wBluesHouseCurScript], a
ret
@@ -20,40 +18,40 @@ BluesHouseScript1:
ret
BluesHouse_TextPointers:
- dw BluesHouseText1
- dw BluesHouseText2
- dw BluesHouseText3
+ dw BluesHouseDaisySittingText
+ dw BluesHouseDaisyWalkingText
+ dw BluesHouseTownMapText
-BluesHouseText1:
+BluesHouseDaisySittingText:
text_asm
CheckEvent EVENT_GOT_TOWN_MAP
- jr nz, .GotMap
+ jr nz, .got_town_map
CheckEvent EVENT_GOT_POKEDEX
- jr nz, .GiveMap
+ jr nz, .give_town_map
ld hl, DaisyInitialText
call PrintText
jr .done
-.GiveMap
+.give_town_map
ld hl, DaisyOfferMapText
call PrintText
lb bc, TOWN_MAP, 1
call GiveItem
- jr nc, .BagFull
+ jr nc, .bag_full
ld a, HS_TOWN_MAP
ld [wMissableObjectIndex], a
- predef HideObject ; hide table map object
+ predef HideObject
ld hl, GotMapText
call PrintText
SetEvent EVENT_GOT_TOWN_MAP
jr .done
-.GotMap
+.got_town_map
ld hl, DaisyUseMapText
call PrintText
jr .done
-.BagFull
+.bag_full
ld hl, DaisyBagFullText
call PrintText
.done
@@ -80,10 +78,10 @@ DaisyUseMapText:
text_far _DaisyUseMapText
text_end
-BluesHouseText2: ; Daisy, walking around
- text_far _BluesHouseText2
+BluesHouseDaisyWalkingText:
+ text_far _BluesHouseDaisyWalkingText
text_end
-BluesHouseText3: ; map on table
- text_far _BluesHouseText3
+BluesHouseTownMapText:
+ text_far _BluesHouseTownMapText
text_end
diff --git a/scripts/BrunosRoom.asm b/scripts/BrunosRoom.asm
index 194bc201..578cbb98 100755
--- a/scripts/BrunosRoom.asm
+++ b/scripts/BrunosRoom.asm
@@ -87,11 +87,11 @@ BrunoScript0:
ret
BrunoEntranceCoords:
- db $0A,$04
- db $0A,$05
- db $0B,$04
- db $0B,$05
- db $FF
+ dbmapcoord 4, 10
+ dbmapcoord 5, 10
+ dbmapcoord 4, 11
+ dbmapcoord 5, 11
+ db -1 ; end
BrunoScript3:
ld a, [wSimulatedJoypadStatesIndex]
diff --git a/scripts/CeladonDiner.asm b/scripts/CeladonDiner.asm
index e5a2d8b2..e95035f0 100755
--- a/scripts/CeladonDiner.asm
+++ b/scripts/CeladonDiner.asm
@@ -28,24 +28,24 @@ CeladonDinerText4:
CeladonDinerText5:
text_asm
CheckEvent EVENT_GOT_COIN_CASE
- jr nz, .asm_eb14d
+ jr nz, .got_item
ld hl, CeladonDinerText_491a7
call PrintText
lb bc, COIN_CASE, 1
call GiveItem
- jr nc, .BagFull
+ jr nc, .bag_full
SetEvent EVENT_GOT_COIN_CASE
ld hl, ReceivedCoinCaseText
call PrintText
- jr .asm_68b61
-.BagFull
+ jr .done
+.bag_full
ld hl, CoinCaseNoRoomText
call PrintText
- jr .asm_68b61
-.asm_eb14d
+ jr .done
+.got_item
ld hl, CeladonDinerText_491b7
call PrintText
-.asm_68b61
+.done
jp TextScriptEnd
CeladonDinerText_491a7:
diff --git a/scripts/CeladonMansion1F.asm b/scripts/CeladonMansion1F.asm
index 2a386aad..fa901ff9 100755
--- a/scripts/CeladonMansion1F.asm
+++ b/scripts/CeladonMansion1F.asm
@@ -8,7 +8,7 @@ CeladonMansion1F_TextPointers:
dw CeladonMansion1Text4
dw CeladonMansion1Text5
-CeladonMansion1_486a1:
+CeladonMansion1_PlayCryScript:
call PlayCry
jp TextScriptEnd
@@ -16,7 +16,7 @@ CeladonMansion1Text1:
text_far _CeladonMansion1Text1
text_asm
ld a, MEOWTH
- jp CeladonMansion1_486a1
+ jp CeladonMansion1_PlayCryScript
CeladonMansion1Text2:
text_far _CeladonMansion1Text2
@@ -26,13 +26,13 @@ CeladonMansion1Text3:
text_far _CeladonMansion1Text3
text_asm
ld a, CLEFAIRY
- jp CeladonMansion1_486a1
+ jp CeladonMansion1_PlayCryScript
CeladonMansion1Text4:
text_far _CeladonMansion1Text4
text_asm
ld a, NIDORAN_F
- jp CeladonMansion1_486a1
+ jp CeladonMansion1_PlayCryScript
CeladonMansion1Text5:
text_far _CeladonMansion1Text5
diff --git a/scripts/CeladonMansion3F.asm b/scripts/CeladonMansion3F.asm
index b2d40b44..f8972793 100755
--- a/scripts/CeladonMansion3F.asm
+++ b/scripts/CeladonMansion3F.asm
@@ -25,32 +25,30 @@ WriterText:
DirectorText:
text_asm
-
- ; check pokédex
ld hl, wPokedexOwned
ld b, wPokedexOwnedEnd - wPokedexOwned
call CountSetBits
ld a, [wNumSetBits]
- cp 150
- jr nc, .CompletedDex
- ld hl, .GameDesigner
+ cp NUM_POKEMON - 1 ; discount Mew
+ jr nc, .completed_dex
+ ld hl, .GameDesignerText
jr .done
-.CompletedDex
+.completed_dex
ld hl, .CompletedDexText
.done
call PrintText
jp TextScriptEnd
-.GameDesigner
+.GameDesignerText:
text_far _GameDesignerText
text_end
-.CompletedDexText
+.CompletedDexText:
text_far _CompletedDexText
text_promptbutton
text_asm
callfar DisplayDiploma
- ld a, $1
+ ld a, TRUE
ld [wDoNotWaitForButtonPressAfterDisplayingText], a
jp TextScriptEnd
diff --git a/scripts/CeladonMansionRoofHouse.asm b/scripts/CeladonMansionRoofHouse.asm
index 28cec151..bd564dcc 100755
--- a/scripts/CeladonMansionRoofHouse.asm
+++ b/scripts/CeladonMansionRoofHouse.asm
@@ -13,9 +13,9 @@ CeladonMansion5Text2:
text_asm
lb bc, EEVEE, 25
call GivePokemon
- jr nc, .asm_24365
+ jr nc, .party_full
ld a, HS_CELADON_MANSION_EEVEE_GIFT
ld [wMissableObjectIndex], a
predef HideObject
-.asm_24365
+.party_full
jp TextScriptEnd
diff --git a/scripts/CeladonMart3F.asm b/scripts/CeladonMart3F.asm
index e3e929da..55081982 100755
--- a/scripts/CeladonMart3F.asm
+++ b/scripts/CeladonMart3F.asm
@@ -23,21 +23,21 @@ CeladonMart3F_TextPointers:
CeladonMart3Text1:
text_asm
CheckEvent EVENT_GOT_TM18
- jr nz, .asm_a5463
+ jr nz, .got_item
ld hl, TM18PreReceiveText
call PrintText
lb bc, TM_COUNTER, 1
call GiveItem
- jr nc, .BagFull
+ jr nc, .bag_full
SetEvent EVENT_GOT_TM18
ld hl, ReceivedTM18Text
- jr .asm_81359
-.BagFull
+ jr .done
+.bag_full
ld hl, TM18NoRoomText
- jr .asm_81359
-.asm_a5463
+ jr .done
+.got_item
ld hl, TM18ExplanationText
-.asm_81359
+.done
call PrintText
jp TextScriptEnd
diff --git a/scripts/CeladonMartElevator.asm b/scripts/CeladonMartElevator.asm
index e58c88f0..b657b3f9 100755
--- a/scripts/CeladonMartElevator.asm
+++ b/scripts/CeladonMartElevator.asm
@@ -40,23 +40,22 @@ CeladonMartElevatorScript_48631:
jp CopyData
CeladonMartElevatorFloors:
- db 5 ; number of elements in list
+ db 5 ; #
db FLOOR_1F
db FLOOR_2F
db FLOOR_3F
db FLOOR_4F
db FLOOR_5F
- db $FF
+ db -1 ; end
-CeladonMartElevatorWarpMaps:
-; first byte is warp number
-; second byte is map number
; These specify where the player goes after getting out of the elevator.
- db $05, CELADON_MART_1F
- db $02, CELADON_MART_2F
- db $02, CELADON_MART_3F
- db $02, CELADON_MART_4F
- db $02, CELADON_MART_5F
+CeladonMartElevatorWarpMaps:
+ ; warp number, map id
+ db 5, CELADON_MART_1F
+ db 2, CELADON_MART_2F
+ db 2, CELADON_MART_3F
+ db 2, CELADON_MART_4F
+ db 2, CELADON_MART_5F
CeladonMartElevatorWarpMapsEnd:
CeladonMartElevatorScript_48654:
diff --git a/scripts/CeladonMartRoof.asm b/scripts/CeladonMartRoof.asm
index b1f6a8a3..0f71aa51 100755
--- a/scripts/CeladonMartRoof.asm
+++ b/scripts/CeladonMartRoof.asm
@@ -38,7 +38,7 @@ CeladonMartRoofDrinkList:
db FRESH_WATER
db SODA_POP
db LEMONADE
- db $00
+ db 0 ; end
CeladonMartRoofScript_GiveDrinkToGirl:
ld hl, wd730
diff --git a/scripts/CeruleanBadgeHouse.asm b/scripts/CeruleanBadgeHouse.asm
index e1e4ab44..5e35b079 100755
--- a/scripts/CeruleanBadgeHouse.asm
+++ b/scripts/CeruleanBadgeHouse.asm
@@ -1,5 +1,5 @@
CeruleanBadgeHouse_Script:
- ld a, $1
+ ld a, TRUE
ld [wAutoTextBoxDrawingControl], a
dec a
ld [wDoNotWaitForButtonPressAfterDisplayingText], a
@@ -34,7 +34,7 @@ CeruleanHouse2Text1:
jr c, .asm_74e60
ld hl, TextPointers_74e86
ld a, [wcf91]
- sub $15
+ sub BOULDERBADGE
add a
ld d, $0
ld e, a
@@ -52,7 +52,16 @@ CeruleanHouse2Text1:
jp TextScriptEnd
BadgeItemList:
- db $8,BOULDERBADGE,CASCADEBADGE,THUNDERBADGE,RAINBOWBADGE,SOULBADGE,MARSHBADGE,VOLCANOBADGE,EARTHBADGE,$FF
+ db 8 ; #
+ db BOULDERBADGE
+ db CASCADEBADGE
+ db THUNDERBADGE
+ db RAINBOWBADGE
+ db SOULBADGE
+ db MARSHBADGE
+ db VOLCANOBADGE
+ db EARTHBADGE
+ db -1 ; end
CeruleanHouse2Text_74e77:
text_far _CeruleanHouse2Text_74e77
diff --git a/scripts/CeruleanCity.asm b/scripts/CeruleanCity.asm
index 209e29cc..4d960537 100755
--- a/scripts/CeruleanCity.asm
+++ b/scripts/CeruleanCity.asm
@@ -101,20 +101,20 @@ ENDC
ret
CeruleanCityCoords1:
- db $07,$1e
- db $09,$1e
- db $ff
+ dbmapcoord 30, 7
+ dbmapcoord 30, 9
+ db -1 ; end
CeruleanCityCoords2:
- db $06,$14
- db $06,$15
- db $ff
+ dbmapcoord 20, 6
+ dbmapcoord 21, 6
+ db -1 ; end
CeruleanCityMovement1:
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
- db $FF
+ db -1 ; end
CeruleanCityScript_1955d:
ld a, 1
@@ -205,7 +205,7 @@ CeruleanCityMovement3:
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
- db $FF
+ db -1 ; end
CeruleanCityMovement4:
db NPC_MOVEMENT_RIGHT
@@ -215,7 +215,7 @@ CeruleanCityMovement4:
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
- db $FF
+ db -1 ; end
CeruleanCityScript3:
ld a, [wd730]
diff --git a/scripts/CeruleanTradeHouse.asm b/scripts/CeruleanTradeHouse.asm
index ba88f1b5..66952cd4 100755
--- a/scripts/CeruleanTradeHouse.asm
+++ b/scripts/CeruleanTradeHouse.asm
@@ -11,7 +11,7 @@ CeruleanHouse1Text1:
CeruleanHouse1Text2:
text_asm
- ld a, $6
+ ld a, TRADE_FOR_LOLA
ld [wWhichTrade], a
predef DoInGameTradeDialogue
jp TextScriptEnd
diff --git a/scripts/CeruleanTrashedHouse.asm b/scripts/CeruleanTrashedHouse.asm
index 0d1e6ac3..d11c7721 100755
--- a/scripts/CeruleanTrashedHouse.asm
+++ b/scripts/CeruleanTrashedHouse.asm
@@ -9,17 +9,17 @@ CeruleanTrashedHouse_TextPointers:
CeruleanHouseTrashedText1:
text_asm
- ld b, $e4
+ ld b, TM_DIG
predef GetQuantityOfItemInBag
and b
- jr z, .asm_f8734
+ jr z, .no_dig_tm
ld hl, CeruleanHouseTrashedText_1d6b0
call PrintText
- jr .asm_8dfe9
-.asm_f8734
+ jr .done
+.no_dig_tm
ld hl, CeruleanHouseTrashedText_1d6ab
call PrintText
-.asm_8dfe9
+.done
jp TextScriptEnd
CeruleanHouseTrashedText_1d6ab:
diff --git a/scripts/ChampionsRoom.asm b/scripts/ChampionsRoom.asm
index e57048c5..d151bb4d 100755
--- a/scripts/ChampionsRoom.asm
+++ b/scripts/ChampionsRoom.asm
@@ -40,10 +40,10 @@ GaryScript1:
ret
GaryEntrance_RLEMovement:
- db D_UP,1
- db D_RIGHT,1
- db D_UP,3
- db $ff
+ db D_UP, 1
+ db D_RIGHT, 1
+ db D_UP, 3
+ db -1 ; end
GaryScript2:
ld a, [wSimulatedJoypadStatesIndex]
@@ -132,7 +132,7 @@ OakEntranceAfterVictoryMovement:
db NPC_MOVEMENT_UP
db NPC_MOVEMENT_UP
db NPC_MOVEMENT_UP
- db $FF
+ db -1 ; end
GaryScript5:
ld a, [wd730]
@@ -190,7 +190,7 @@ GaryScript7:
OakExitGaryRoomMovement:
db NPC_MOVEMENT_UP
db NPC_MOVEMENT_UP
- db $FF
+ db -1 ; end
GaryScript8:
ld a, [wd730]
@@ -217,9 +217,9 @@ GaryScript9:
ret
WalkToHallOfFame_RLEMovment:
- db D_UP,4
- db D_LEFT,1
- db $ff
+ db D_UP, 4
+ db D_LEFT, 1
+ db -1 ; end
GaryScript10:
ld a, [wSimulatedJoypadStatesIndex]
diff --git a/scripts/CinnabarGym.asm b/scripts/CinnabarGym.asm
index 552f2e6e..f890a07b 100755
--- a/scripts/CinnabarGym.asm
+++ b/scripts/CinnabarGym.asm
@@ -71,11 +71,11 @@ CinnabarGymScript0:
MovementData_757d7:
db NPC_MOVEMENT_LEFT
db NPC_MOVEMENT_UP
- db $FF
+ db -1 ; end
MovementData_757da:
db NPC_MOVEMENT_LEFT
- db $FF
+ db -1 ; end
CinnabarGymScript1:
ld a, [wd730]
diff --git a/scripts/CinnabarLabFossilRoom.asm b/scripts/CinnabarLabFossilRoom.asm
index 4bdb8a36..2c388119 100755
--- a/scripts/CinnabarLabFossilRoom.asm
+++ b/scripts/CinnabarLabFossilRoom.asm
@@ -44,7 +44,7 @@ FossilsList:
db DOME_FOSSIL
db HELIX_FOSSIL
db OLD_AMBER
- db $00
+ db 0 ; end
Lab4Text1:
text_asm
@@ -100,7 +100,7 @@ Lab4Text_75dd5:
Lab4Text2:
text_asm
- ld a, $3
+ ld a, TRADE_FOR_SAILOR
ld [wWhichTrade], a
predef DoInGameTradeDialogue
jp TextScriptEnd
diff --git a/scripts/CinnabarLabMetronomeRoom.asm b/scripts/CinnabarLabMetronomeRoom.asm
index 976a2176..b43f98e2 100755
--- a/scripts/CinnabarLabMetronomeRoom.asm
+++ b/scripts/CinnabarLabMetronomeRoom.asm
@@ -11,24 +11,24 @@ CinnabarLabMetronomeRoom_TextPointers:
Lab3Text1:
text_asm
CheckEvent EVENT_GOT_TM35
- jr nz, .asm_e551a
+ jr nz, .got_item
ld hl, TM35PreReceiveText
call PrintText
lb bc, TM_METRONOME, 1
call GiveItem
- jr nc, .BagFull
+ jr nc, .bag_full
ld hl, ReceivedTM35Text
call PrintText
SetEvent EVENT_GOT_TM35
- jr .asm_eb896
-.BagFull
+ jr .done
+.bag_full
ld hl, TM35NoRoomText
call PrintText
- jr .asm_eb896
-.asm_e551a
+ jr .done
+.got_item
ld hl, TM35ExplanationText
call PrintText
-.asm_eb896
+.done
jp TextScriptEnd
TM35PreReceiveText:
diff --git a/scripts/CinnabarLabTradeRoom.asm b/scripts/CinnabarLabTradeRoom.asm
index d313c128..1f8710be 100755
--- a/scripts/CinnabarLabTradeRoom.asm
+++ b/scripts/CinnabarLabTradeRoom.asm
@@ -12,13 +12,13 @@ Lab2Text1:
Lab2Text2:
text_asm
- ld a, $7
+ ld a, TRADE_FOR_DORIS
ld [wWhichTrade], a
jr Lab2DoTrade
Lab2Text3:
text_asm
- ld a, $8
+ ld a, TRADE_FOR_CRINKLES
ld [wWhichTrade], a
Lab2DoTrade:
predef DoInGameTradeDialogue
diff --git a/scripts/CopycatsHouse2F.asm b/scripts/CopycatsHouse2F.asm
index c27043e6..ef0742ab 100755
--- a/scripts/CopycatsHouse2F.asm
+++ b/scripts/CopycatsHouse2F.asm
@@ -13,34 +13,34 @@ CopycatsHouse2F_TextPointers:
CopycatsHouse2FText1:
text_asm
CheckEvent EVENT_GOT_TM31
- jr nz, .asm_7ccf3
- ld a, $1
+ jr nz, .got_item
+ ld a, TRUE
ld [wDoNotWaitForButtonPressAfterDisplayingText], a
ld hl, CopycatsHouse2FText_5ccd4
call PrintText
ld b, POKE_DOLL
call IsItemInBag
- jr z, .asm_62ecd
+ jr z, .done
ld hl, TM31PreReceiveText
call PrintText
lb bc, TM_MIMIC, 1
call GiveItem
- jr nc, .BagFull
+ jr nc, .bag_full
ld hl, ReceivedTM31Text
call PrintText
ld a, POKE_DOLL
ldh [hItemToRemoveID], a
farcall RemoveItemByID
SetEvent EVENT_GOT_TM31
- jr .asm_62ecd
-.BagFull
+ jr .done
+.bag_full
ld hl, TM31NoRoomText
call PrintText
- jr .asm_62ecd
-.asm_7ccf3
+ jr .done
+.got_item
ld hl, TM31ExplanationText2
call PrintText
-.asm_62ecd
+.done
jp TextScriptEnd
CopycatsHouse2FText_5ccd4:
diff --git a/scripts/DiglettsCave.asm b/scripts/DiglettsCave.asm
index 6746743f..f9f2e590 100755
--- a/scripts/DiglettsCave.asm
+++ b/scripts/DiglettsCave.asm
@@ -2,4 +2,5 @@ DiglettsCave_Script:
jp EnableAutoTextBoxDrawing
DiglettsCave_TextPointers:
- text_end
+
+ text_end ; unused
diff --git a/scripts/FuchsiaGoodRodHouse.asm b/scripts/FuchsiaGoodRodHouse.asm
index 848f744c..28f6d056 100755
--- a/scripts/FuchsiaGoodRodHouse.asm
+++ b/scripts/FuchsiaGoodRodHouse.asm
@@ -7,39 +7,30 @@ FuchsiaGoodRodHouse_TextPointers:
FuchsiaHouse3Text1:
text_asm
ld a, [wd728]
- bit 4, a
- jr nz, .after
-
+ bit 4, a ; got good rod?
+ jr nz, .got_item
ld hl, FuchsiaHouse3Text_561bd
call PrintText
-
call YesNoChoice
ld a, [wCurrentMenuItem]
and a
jr nz, .refused
-
lb bc, GOOD_ROD, 1
call GiveItem
- jr nc, .full
-
+ jr nc, .bag_full
ld hl, wd728
- set 4, [hl]
-
+ set 4, [hl] ; got good rod
ld hl, FuchsiaHouse3Text_561c2
- jr .talk
-
-.full
+ jr .done
+.bag_full
ld hl, FuchsiaHouse3Text_5621c
- jr .talk
-
+ jr .done
.refused
ld hl, FuchsiaHouse3Text_56212
- jr .talk
-
-.after
+ jr .done
+.got_item
ld hl, FuchsiaHouse3Text_56217
-
-.talk
+.done
call PrintText
jp TextScriptEnd
diff --git a/scripts/GameCorner.asm b/scripts/GameCorner.asm
index ded5854f..c933fd63 100755
--- a/scripts/GameCorner.asm
+++ b/scripts/GameCorner.asm
@@ -90,7 +90,7 @@ MovementData_48c5a:
db NPC_MOVEMENT_RIGHT
db NPC_MOVEMENT_RIGHT
db NPC_MOVEMENT_RIGHT
- db $FF
+ db -1 ; end
MovementData_48c63:
db NPC_MOVEMENT_RIGHT
@@ -98,7 +98,7 @@ MovementData_48c63:
db NPC_MOVEMENT_RIGHT
db NPC_MOVEMENT_RIGHT
db NPC_MOVEMENT_RIGHT
- db $FF
+ db -1 ; end
CeladonGameCornerScript2:
ld a, [wd730]
diff --git a/scripts/HallOfFame.asm b/scripts/HallOfFame.asm
index 35ad9fd8..fd13719b 100755
--- a/scripts/HallOfFame.asm
+++ b/scripts/HallOfFame.asm
@@ -69,8 +69,8 @@ HallofFameRoomScript0:
ret
RLEMovement5a528:
- db D_UP,$5
- db $ff
+ db D_UP, 5
+ db -1 ; end
HallofFameRoomScript1:
ld a, [wSimulatedJoypadStatesIndex]
diff --git a/scripts/LancesRoom.asm b/scripts/LancesRoom.asm
index e1b9a1f2..5c7301ef 100755
--- a/scripts/LancesRoom.asm
+++ b/scripts/LancesRoom.asm
@@ -78,12 +78,12 @@ LanceScript0:
jp LanceShowOrHideEntranceBlocks
LanceTriggerMovementCoords:
- db $01,$05
- db $02,$06
- db $0B,$05
- db $0B,$06
- db $10,$18
- db $FF
+ dbmapcoord 5, 1
+ dbmapcoord 6, 2
+ dbmapcoord 5, 11
+ dbmapcoord 6, 11
+ dbmapcoord 24, 16
+ db -1 ; end
LanceScript2:
call EndTrainerBattle
@@ -110,11 +110,11 @@ WalkToLance:
ret
WalkToLance_RLEList:
- db D_UP, $0C
- db D_LEFT, $0C
- db D_DOWN, $07
- db D_LEFT, $06
- db $FF
+ db D_UP, 12
+ db D_LEFT, 12
+ db D_DOWN, 7
+ db D_LEFT, 6
+ db -1 ; end
LanceScript3:
ld a, [wSimulatedJoypadStatesIndex]
diff --git a/scripts/LavenderCuboneHouse.asm b/scripts/LavenderCuboneHouse.asm
index 45f2f8d8..69d74ede 100755
--- a/scripts/LavenderCuboneHouse.asm
+++ b/scripts/LavenderCuboneHouse.asm
@@ -16,14 +16,14 @@ LavenderHouse2Text1:
LavenderHouse2Text2:
text_asm
CheckEvent EVENT_RESCUED_MR_FUJI
- jr nz, .asm_65711
+ jr nz, .rescued_mr_fuji
ld hl, LavenderHouse2Text_1d9dc
call PrintText
- jr .asm_64be1
-.asm_65711
+ jr .done
+.rescued_mr_fuji
ld hl, LavenderHouse2Text_1d9e1
call PrintText
-.asm_64be1
+.done
jp TextScriptEnd
LavenderHouse2Text_1d9dc:
diff --git a/scripts/LavenderTown.asm b/scripts/LavenderTown.asm
index 7902db45..d0c66208 100755
--- a/scripts/LavenderTown.asm
+++ b/scripts/LavenderTown.asm
@@ -20,9 +20,9 @@ LavenderTownText1:
ld a, [wCurrentMenuItem]
and a
ld hl, LavenderTownText_44146
- jr nz, .asm_40831
+ jr nz, .got_text
ld hl, LavenderTownText_44141
-.asm_40831
+.got_text
call PrintText
jp TextScriptEnd
diff --git a/scripts/LoreleisRoom.asm b/scripts/LoreleisRoom.asm
index c04da4aa..8e9730ff 100755
--- a/scripts/LoreleisRoom.asm
+++ b/scripts/LoreleisRoom.asm
@@ -89,11 +89,11 @@ LoreleiScript0:
ret
LoreleiEntranceCoords:
- db $0A,$04
- db $0A,$05
- db $0B,$04
- db $0B,$05
- db $FF
+ dbmapcoord 4, 10
+ dbmapcoord 5, 10
+ dbmapcoord 4, 11
+ dbmapcoord 5, 11
+ db -1 ; end
LoreleiScript3:
ld a, [wSimulatedJoypadStatesIndex]
diff --git a/scripts/MrFujisHouse.asm b/scripts/MrFujisHouse.asm
index 88f36e4f..3ef3017a 100755
--- a/scripts/MrFujisHouse.asm
+++ b/scripts/MrFujisHouse.asm
@@ -13,14 +13,14 @@ MrFujisHouse_TextPointers:
LavenderHouse1Text1:
text_asm
CheckEvent EVENT_RESCUED_MR_FUJI
- jr nz, .asm_72e5d
+ jr nz, .rescued_mr_fuji
ld hl, LavenderHouse1Text_1d8d1
call PrintText
- jr .asm_6957f
-.asm_72e5d
+ jr .done
+.rescued_mr_fuji
ld hl, LavenderHouse1Text_1d8d6
call PrintText
-.asm_6957f
+.done
jp TextScriptEnd
LavenderHouse1Text_1d8d1:
@@ -34,14 +34,14 @@ LavenderHouse1Text_1d8d6:
LavenderHouse1Text2:
text_asm
CheckEvent EVENT_RESCUED_MR_FUJI
- jr nz, .asm_06470
+ jr nz, .rescued_mr_fuji
ld hl, LavenderHouse1Text_1d8f4
call PrintText
- jr .asm_3d208
-.asm_06470
+ jr .done
+.rescued_mr_fuji
ld hl, LavenderHouse1Text_1d8f9
call PrintText
-.asm_3d208
+.done
jp TextScriptEnd
LavenderHouse1Text_1d8f4:
@@ -69,24 +69,24 @@ LavenderHouse1Text4:
LavenderHouse1Text5:
text_asm
CheckEvent EVENT_GOT_POKE_FLUTE
- jr nz, .asm_15ac2
+ jr nz, .got_item
ld hl, LavenderHouse1Text_1d94c
call PrintText
lb bc, POKE_FLUTE, 1
call GiveItem
- jr nc, .BagFull
+ jr nc, .bag_full
ld hl, ReceivedFluteText
call PrintText
SetEvent EVENT_GOT_POKE_FLUTE
- jr .asm_da749
-.BagFull
+ jr .done
+.bag_full
ld hl, FluteNoRoomText
call PrintText
- jr .asm_da749
-.asm_15ac2
+ jr .done
+.got_item
ld hl, MrFujiAfterFluteText
call PrintText
-.asm_da749
+.done
jp TextScriptEnd
LavenderHouse1Text_1d94c:
diff --git a/scripts/MrPsychicsHouse.asm b/scripts/MrPsychicsHouse.asm
index 1e694772..399edfbd 100755
--- a/scripts/MrPsychicsHouse.asm
+++ b/scripts/MrPsychicsHouse.asm
@@ -7,24 +7,24 @@ MrPsychicsHouse_TextPointers:
SaffronHouse2Text1:
text_asm
CheckEvent EVENT_GOT_TM29
- jr nz, .asm_9e72b
+ jr nz, .got_item
ld hl, TM29PreReceiveText
call PrintText
lb bc, TM_PSYCHIC_M, 1
call GiveItem
- jr nc, .BagFull
+ jr nc, .bag_full
ld hl, ReceivedTM29Text
call PrintText
SetEvent EVENT_GOT_TM29
- jr .asm_fe4e1
-.BagFull
+ jr .done
+.bag_full
ld hl, TM29NoRoomText
call PrintText
- jr .asm_fe4e1
-.asm_9e72b
+ jr .done
+.got_item
ld hl, TM29ExplanationText
call PrintText
-.asm_fe4e1
+.done
jp TextScriptEnd
TM29PreReceiveText:
diff --git a/scripts/MtMoonB2F.asm b/scripts/MtMoonB2F.asm
index 9ecb8b1c..addfb2c2 100755
--- a/scripts/MtMoonB2F.asm
+++ b/scripts/MtMoonB2F.asm
@@ -19,23 +19,23 @@ MtMoonB2F_Script:
ret
CoordsData_49d37:
- db $05,$0B
- db $05,$0C
- db $05,$0D
- db $05,$0E
- db $06,$0B
- db $06,$0C
- db $06,$0D
- db $06,$0E
- db $07,$0B
- db $07,$0C
- db $07,$0D
- db $07,$0E
- db $08,$0B
- db $08,$0C
- db $08,$0D
- db $08,$0E
- db $FF
+ dbmapcoord 11, 5
+ dbmapcoord 12, 5
+ dbmapcoord 13, 5
+ dbmapcoord 14, 5
+ dbmapcoord 11, 6
+ dbmapcoord 12, 6
+ dbmapcoord 13, 6
+ dbmapcoord 14, 6
+ dbmapcoord 11, 7
+ dbmapcoord 12, 7
+ dbmapcoord 13, 7
+ dbmapcoord 14, 7
+ dbmapcoord 11, 8
+ dbmapcoord 12, 8
+ dbmapcoord 13, 8
+ dbmapcoord 14, 8
+ db -1 ; end
MtMoon3Script_49d58:
xor a
@@ -110,22 +110,22 @@ MtMoon3Script4:
ret
CoordsData_49dea:
- db $07,$0C
- db $06,$0B
- db $05,$0C
- db $FF
+ dbmapcoord 12, 7
+ dbmapcoord 11, 6
+ dbmapcoord 12, 5
+ db -1 ; end
CoordsData_49df1:
- db $07,$0D
- db $06,$0E
- db $05,$0E
- db $FF
+ dbmapcoord 13, 7
+ dbmapcoord 14, 6
+ dbmapcoord 14, 5
+ db -1 ; end
MovementData_49df8:
db NPC_MOVEMENT_RIGHT
-
MovementData_49df9:
- db NPC_MOVEMENT_UP,$FF
+ db NPC_MOVEMENT_UP
+ db -1 ; end
MtMoon3Script5:
ld a, [wd730]
diff --git a/scripts/MtMoonPokecenter.asm b/scripts/MtMoonPokecenter.asm
index 3dafd780..e4b881d1 100755
--- a/scripts/MtMoonPokecenter.asm
+++ b/scripts/MtMoonPokecenter.asm
@@ -11,7 +11,7 @@ MtMoonPokecenter_TextPointers:
dw MtMoonTradeNurseText
MtMoonHealNurseText:
- db $ff
+ script_pokecenter_nurse
MtMoonPokecenterText2:
text_far _MtMoonPokecenterText1
diff --git a/scripts/Museum1F.asm b/scripts/Museum1F.asm
index caec03be..b7240154 100755
--- a/scripts/Museum1F.asm
+++ b/scripts/Museum1F.asm
@@ -1,5 +1,5 @@
Museum1F_Script:
- ld a, $1
+ ld a, TRUE
ld [wAutoTextBoxDrawingControl], a
xor a
ld [wDoNotWaitForButtonPressAfterDisplayingText], a
@@ -188,24 +188,24 @@ Museum1FText_5c251:
Museum1FText3:
text_asm
CheckEvent EVENT_GOT_OLD_AMBER
- jr nz, .asm_5c285
+ jr nz, .got_item
ld hl, Museum1FText_5c28e
call PrintText
lb bc, OLD_AMBER, 1
call GiveItem
- jr nc, .BagFull
+ jr nc, .bag_full
SetEvent EVENT_GOT_OLD_AMBER
ld a, HS_OLD_AMBER
ld [wMissableObjectIndex], a
predef HideObject
ld hl, ReceivedOldAmberText
- jr .asm_5c288
-.BagFull
+ jr .done
+.bag_full
ld hl, Museum1FText_5c29e
- jr .asm_5c288
-.asm_5c285
+ jr .done
+.got_item
ld hl, Museum1FText_5c299
-.asm_5c288
+.done
call PrintText
jp TextScriptEnd
diff --git a/scripts/OaksLab.asm b/scripts/OaksLab.asm
index a2e0bfe8..dbc3b071 100755
--- a/scripts/OaksLab.asm
+++ b/scripts/OaksLab.asm
@@ -1,7 +1,7 @@
OaksLab_Script:
CheckEvent EVENT_PALLET_AFTER_GETTING_POKEBALLS_2
call nz, OaksLabScript_1d076
- ld a, $1
+ ld a, TRUE
ld [wAutoTextBoxDrawingControl], a
xor a
ld [wDoNotWaitForButtonPressAfterDisplayingText], a
@@ -60,7 +60,7 @@ OakEntryMovement:
db NPC_MOVEMENT_UP
db NPC_MOVEMENT_UP
db NPC_MOVEMENT_UP
- db $FF
+ db -1 ; end
OaksLabScript2:
ld a, [wd730]
@@ -101,8 +101,8 @@ OaksLabScript3:
ret
PlayerEntryMovementRLE:
- db D_UP,$8
- db $ff
+ db D_UP, 8
+ db -1 ; end
OaksLabScript4:
ld a, [wSimulatedJoypadStatesIndex]
@@ -212,14 +212,14 @@ OaksLabScript8:
db NPC_MOVEMENT_RIGHT
db NPC_MOVEMENT_RIGHT
db NPC_MOVEMENT_UP
- db $FF
+ db -1 ; end
.MiddleBallMovement2
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_RIGHT
db NPC_MOVEMENT_RIGHT
db NPC_MOVEMENT_RIGHT
- db $FF
+ db -1 ; end
.Squirtle
ld de, .RightBallMovement1
@@ -237,7 +237,7 @@ OaksLabScript8:
db NPC_MOVEMENT_RIGHT
db NPC_MOVEMENT_RIGHT
db NPC_MOVEMENT_UP
- db $FF
+ db -1 ; end
.RightBallMovement2
db NPC_MOVEMENT_DOWN
@@ -245,7 +245,7 @@ OaksLabScript8:
db NPC_MOVEMENT_RIGHT
db NPC_MOVEMENT_RIGHT
db NPC_MOVEMENT_RIGHT
- db $FF
+ db -1 ; end
.Bulbasaur
ld de, .LeftBallMovement1
@@ -274,10 +274,10 @@ OaksLabScript8:
.LeftBallMovement1
db NPC_MOVEMENT_DOWN
- db NPC_MOVEMENT_RIGHT ; not yet terminated!
+ db NPC_MOVEMENT_RIGHT
.LeftBallMovement2
db NPC_MOVEMENT_RIGHT
- db $FF
+ db -1 ; end
.moveBlue
ld a, $1
@@ -462,13 +462,13 @@ OaksLabScript13:
ret
.RivalExitMovement
- db $E0 ; change sprite facing direction
+ db NPC_CHANGE_FACING
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
- db $FF
+ db -1 ; end
OaksLabScript14:
ld a, [wd730]
diff --git a/scripts/PewterCity.asm b/scripts/PewterCity.asm
index ec626b8a..f44d2de5 100755
--- a/scripts/PewterCity.asm
+++ b/scripts/PewterCity.asm
@@ -37,11 +37,11 @@ ENDC
jp DisplayTextID
CoordsData_19277:
- db $11,$23
- db $11,$24
- db $12,$25
- db $13,$25
- db $ff
+ dbmapcoord 35, 17
+ dbmapcoord 36, 17
+ dbmapcoord 37, 18
+ dbmapcoord 37, 19
+ db -1 ; end
PewterCityScript1:
ld a, [wNPCMovementScriptPointerTableNum]
@@ -85,7 +85,7 @@ MovementData_PewterMuseumGuyExit:
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
- db $FF
+ db -1 ; end
PewterCityScript2:
ld a, [wd730]
@@ -154,7 +154,7 @@ MovementData_PewterGymGuyExit:
db NPC_MOVEMENT_RIGHT
db NPC_MOVEMENT_RIGHT
db NPC_MOVEMENT_RIGHT
- db $FF
+ db -1 ; end
PewterCityScript5:
ld a, [wd730]
diff --git a/scripts/PewterMart.asm b/scripts/PewterMart.asm
index b2ae5a11..2b732129 100755
--- a/scripts/PewterMart.asm
+++ b/scripts/PewterMart.asm
@@ -1,6 +1,6 @@
PewterMart_Script:
call EnableAutoTextBoxDrawing
- ld a, $1
+ ld a, TRUE
ld [wAutoTextBoxDrawingControl], a
ret
diff --git a/scripts/PewterPokecenter.asm b/scripts/PewterPokecenter.asm
index 1c626541..5030244c 100755
--- a/scripts/PewterPokecenter.asm
+++ b/scripts/PewterPokecenter.asm
@@ -17,14 +17,16 @@ PewterPokecenterText2:
PewterJigglypuffText:
text_asm
- ld a, $1
+ ld a, TRUE
ld [wDoNotWaitForButtonPressAfterDisplayingText], a
- ld hl, .Text
+ ld hl, .JigglypuffText
call PrintText
+
ld a, SFX_STOP_ALL_MUSIC
call PlaySound
ld c, 32
call DelayFrames
+
ld hl, JigglypuffFacingDirections
ld de, wJigglypuffFacingDirections
ld bc, JigglypuffFacingDirectionsEnd - JigglypuffFacingDirections
@@ -37,15 +39,16 @@ PewterJigglypuffText:
inc hl
jr nz, .findMatchingFacingDirectionLoop
dec hl
+
push hl
ld c, BANK(Music_JigglypuffSong)
ld a, MUSIC_JIGGLYPUFF_SONG
call PlayMusic
pop hl
-.loop
+
+.spinMovementLoop
ld a, [hl]
ld [wSprite03StateData1ImageIndex], a
-
; rotate the array
push hl
ld hl, wJigglypuffFacingDirections
@@ -55,22 +58,20 @@ PewterJigglypuffText:
ld a, [wJigglypuffFacingDirections - 1]
ld [wJigglypuffFacingDirections + 3], a
pop hl
-
ld c, 24
call DelayFrames
-
ld a, [wChannelSoundIDs]
ld b, a
ld a, [wChannelSoundIDs + Ch2]
or b
- jr nz, .loop
+ jr nz, .spinMovementLoop
ld c, 48
call DelayFrames
call PlayDefaultMusic
jp TextScriptEnd
-.Text
+.JigglypuffText:
text_far _PewterJigglypuffText
text_end
diff --git a/scripts/PokemonFanClub.asm b/scripts/PokemonFanClub.asm
index 62a5ce84..717ba4bb 100755
--- a/scripts/PokemonFanClub.asm
+++ b/scripts/PokemonFanClub.asm
@@ -115,12 +115,12 @@ FanClubText5:
call PrintText
lb bc, BIKE_VOUCHER, 1
call GiveItem
- jr nc, .BagFull
+ jr nc, .bag_full
ld hl, .receivedvouchertext
call PrintText
SetEvent EVENT_GOT_BIKE_VOUCHER
jr .done
-.BagFull
+.bag_full
ld hl, .bagfulltext
call PrintText
jr .done
diff --git a/scripts/PokemonMansion3F.asm b/scripts/PokemonMansion3F.asm
index f8fbdf52..0f62d6e0 100755
--- a/scripts/PokemonMansion3F.asm
+++ b/scripts/PokemonMansion3F.asm
@@ -51,10 +51,10 @@ Mansion3Script0:
ret
CoordsData_52254:
- db $0E,$10
- db $0E,$11
- db $0E,$13
- db $FF
+ dbmapcoord 16, 14
+ dbmapcoord 17, 14
+ dbmapcoord 19, 14
+ db -1 ; end
Mansion3Script_5225b:
xor a
diff --git a/scripts/PokemonTower2F.asm b/scripts/PokemonTower2F.asm
index 5ab85c2d..b3d7a1cb 100755
--- a/scripts/PokemonTower2F.asm
+++ b/scripts/PokemonTower2F.asm
@@ -58,9 +58,9 @@ ENDC
ret
CoordsData_6055e:
- db $05,$0F
- db $06,$0E
- db $0F ; isn't this supposed to end in $ff?
+ dbmapcoord 15, 5
+ dbmapcoord 14, 6
+ db $0F ; end? (should be $ff?)
PokemonTower2Script1:
ld a, [wIsInBattle]
@@ -98,7 +98,7 @@ MovementData_605a9:
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_RIGHT
db NPC_MOVEMENT_RIGHT
- db $FF
+ db -1 ; end
MovementData_605b2:
db NPC_MOVEMENT_DOWN
@@ -109,7 +109,7 @@ MovementData_605b2:
db NPC_MOVEMENT_RIGHT
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
- db $FF
+ db -1 ; end
PokemonTower2Script2:
ld a, [wd730]
diff --git a/scripts/PokemonTower5F.asm b/scripts/PokemonTower5F.asm
index 01d71755..10189a8e 100755
--- a/scripts/PokemonTower5F.asm
+++ b/scripts/PokemonTower5F.asm
@@ -42,11 +42,11 @@ PokemonTower5Script0:
ret
CoordsData_60992:
- db $08,$0A
- db $08,$0B
- db $09,$0A
- db $09,$0B
- db $FF
+ dbmapcoord 10, 8
+ dbmapcoord 11, 8
+ dbmapcoord 10, 9
+ dbmapcoord 11, 9
+ db -1 ; end
PokemonTower5F_TextPointers:
dw PokemonTower5Text1
diff --git a/scripts/PokemonTower6F.asm b/scripts/PokemonTower6F.asm
index 3c9e1f1d..11091e85 100755
--- a/scripts/PokemonTower6F.asm
+++ b/scripts/PokemonTower6F.asm
@@ -42,7 +42,8 @@ PokemonTower6Script0:
ret
CoordsData_60b45:
- db $10,$0A,$FF
+ dbmapcoord 10, 16
+ db -1 ; end
PokemonTower6Script4:
ld a, [wIsInBattle]
diff --git a/scripts/PokemonTower7F.asm b/scripts/PokemonTower7F.asm
index 91022ce4..e098b95f 100755
--- a/scripts/PokemonTower7F.asm
+++ b/scripts/PokemonTower7F.asm
@@ -117,30 +117,18 @@ PokemonTower7Script_60db6:
jr .asm_60dcb
CoordsData_60de3:
- db $0C,$09
- dw MovementData_60e13
- db $0B,$0A
- dw MovementData_60e1b
- db $0B,$0B
- dw MovementData_60e22
- db $0B,$0C
- dw MovementData_60e22
- db $0A,$0C
- dw MovementData_60e28
- db $09,$0B
- dw MovementData_60e30
- db $09,$0A
- dw MovementData_60e22
- db $09,$09
- dw MovementData_60e22
- db $08,$09
- dw MovementData_60e37
- db $07,$0A
- dw MovementData_60e22
- db $07,$0B
- dw MovementData_60e22
- db $07,$0C
- dw MovementData_60e22
+ map_coord_movement 9, 12, MovementData_60e13
+ map_coord_movement 10, 11, MovementData_60e1b
+ map_coord_movement 11, 11, MovementData_60e22
+ map_coord_movement 12, 11, MovementData_60e22
+ map_coord_movement 12, 10, MovementData_60e28
+ map_coord_movement 11, 9, MovementData_60e30
+ map_coord_movement 10, 9, MovementData_60e22
+ map_coord_movement 9, 9, MovementData_60e22
+ map_coord_movement 9, 8, MovementData_60e37
+ map_coord_movement 10, 7, MovementData_60e22
+ map_coord_movement 11, 7, MovementData_60e22
+ map_coord_movement 12, 7, MovementData_60e22
MovementData_60e13:
db NPC_MOVEMENT_RIGHT
@@ -150,7 +138,7 @@ MovementData_60e13:
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_LEFT
- db $FF
+ db -1 ; end
MovementData_60e1b:
db NPC_MOVEMENT_DOWN
@@ -159,7 +147,7 @@ MovementData_60e1b:
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
- db $FF
+ db -1 ; end
MovementData_60e22:
db NPC_MOVEMENT_DOWN
@@ -167,7 +155,7 @@ MovementData_60e22:
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
- db $FF
+ db -1 ; end
MovementData_60e28:
db NPC_MOVEMENT_LEFT
@@ -177,7 +165,7 @@ MovementData_60e28:
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
- db $FF
+ db -1 ; end
MovementData_60e30:
db NPC_MOVEMENT_DOWN
@@ -186,7 +174,7 @@ MovementData_60e30:
db NPC_MOVEMENT_LEFT
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
- db $FF
+ db -1 ; end
MovementData_60e37:
db NPC_MOVEMENT_RIGHT
@@ -196,7 +184,7 @@ MovementData_60e37:
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
- db $FF
+ db -1 ; end
PokemonTower7F_TextPointers:
dw PokemonTower7Text1
diff --git a/scripts/RedsHouse1F.asm b/scripts/RedsHouse1F.asm
index 9f45a760..bdeb96d7 100755
--- a/scripts/RedsHouse1F.asm
+++ b/scripts/RedsHouse1F.asm
@@ -2,14 +2,14 @@ RedsHouse1F_Script:
jp EnableAutoTextBoxDrawing
RedsHouse1F_TextPointers:
- dw RedsHouse1FText1
- dw RedsHouse1FText2
+ dw RedsHouse1FMomText
+ dw RedsHouse1FTVText
-RedsHouse1FText1: ; Mom
+RedsHouse1FMomText:
text_asm
ld a, [wd72e]
- bit 3, a
- jr nz, .heal ; if player has received a Pokémon from Oak, heal team
+ bit 3, a ; received a Pokémon from Oak?
+ jr nz, .heal
ld hl, MomWakeUpText
call PrintText
jr .done
@@ -49,14 +49,14 @@ MomHealText2:
text_far _MomHealText2
text_end
-RedsHouse1FText2: ; TV
+RedsHouse1FTVText:
text_asm
ld a, [wSpritePlayerStateData1FacingDirection]
cp SPRITE_FACING_UP
ld hl, TVWrongSideText
- jr nz, .notUp
+ jr nz, .got_text
ld hl, StandByMeText
-.notUp
+.got_text
call PrintText
jp TextScriptEnd
diff --git a/scripts/RedsHouse2F.asm b/scripts/RedsHouse2F.asm
index 2e3463ee..b44b9f98 100755
--- a/scripts/RedsHouse2F.asm
+++ b/scripts/RedsHouse2F.asm
@@ -21,4 +21,5 @@ RedsHouse2FScript1:
ret
RedsHouse2F_TextPointers:
- text_end
+
+ text_end ; unused
diff --git a/scripts/RockTunnelPokecenter.asm b/scripts/RockTunnelPokecenter.asm
index 999edf13..755bb8f8 100755
--- a/scripts/RockTunnelPokecenter.asm
+++ b/scripts/RockTunnelPokecenter.asm
@@ -9,7 +9,7 @@ RockTunnelPokecenter_TextPointers:
dw RockTunnelTradeNurseText
RockTunnelHealNurseText:
- db $ff
+ script_pokecenter_nurse
RockTunnelPokecenterText2:
text_far _RockTunnelPokecenterText2
@@ -20,4 +20,4 @@ RockTunnelPokecenterText3:
text_end
RockTunnelTradeNurseText:
- db $f6
+ script_cable_club_receptionist
diff --git a/scripts/RocketHideoutB2F.asm b/scripts/RocketHideoutB2F.asm
index 85f26c31..d6fae24f 100755
--- a/scripts/RocketHideoutB2F.asm
+++ b/scripts/RocketHideoutB2F.asm
@@ -33,273 +33,227 @@ RocketHideout2Script0:
ld [wCurMapScript], a
ret
-;format:
-;db y,x
-;dw pointer to movement
RocketHideout2ArrowTilePlayerMovement:
- db $9,$4
- dw RocketHideout2ArrowMovement1
- db $b,$4
- dw RocketHideout2ArrowMovement2
- db $f,$4
- dw RocketHideout2ArrowMovement3
- db $10,$4
- dw RocketHideout2ArrowMovement4
- db $13,$4
- dw RocketHideout2ArrowMovement1
- db $16,$4
- dw RocketHideout2ArrowMovement5
- db $e,$5
- dw RocketHideout2ArrowMovement6
- db $16,$6
- dw RocketHideout2ArrowMovement7
- db $18,$6
- dw RocketHideout2ArrowMovement8
- db $9,$8
- dw RocketHideout2ArrowMovement9
- db $c,$8
- dw RocketHideout2ArrowMovement10
- db $f,$8
- dw RocketHideout2ArrowMovement8
- db $13,$8
- dw RocketHideout2ArrowMovement9
- db $17,$8
- dw RocketHideout2ArrowMovement11
- db $e,$9
- dw RocketHideout2ArrowMovement12
- db $16,$9
- dw RocketHideout2ArrowMovement12
- db $9,$a
- dw RocketHideout2ArrowMovement13
- db $a,$a
- dw RocketHideout2ArrowMovement14
- db $f,$a
- dw RocketHideout2ArrowMovement15
- db $11,$a
- dw RocketHideout2ArrowMovement16
- db $13,$a
- dw RocketHideout2ArrowMovement17
- db $19,$a
- dw RocketHideout2ArrowMovement2
- db $e,$b
- dw RocketHideout2ArrowMovement18
- db $10,$b
- dw RocketHideout2ArrowMovement19
- db $12,$b
- dw RocketHideout2ArrowMovement12
- db $9,$c
- dw RocketHideout2ArrowMovement20
- db $b,$c
- dw RocketHideout2ArrowMovement21
- db $d,$c
- dw RocketHideout2ArrowMovement22
- db $11,$c
- dw RocketHideout2ArrowMovement23
- db $a,$d
- dw RocketHideout2ArrowMovement24
- db $c,$d
- dw RocketHideout2ArrowMovement25
- db $10,$d
- dw RocketHideout2ArrowMovement26
- db $12,$d
- dw RocketHideout2ArrowMovement27
- db $13,$d
- dw RocketHideout2ArrowMovement28
- db $16,$d
- dw RocketHideout2ArrowMovement29
- db $17,$d
- dw RocketHideout2ArrowMovement30
- db $11,$e
- dw RocketHideout2ArrowMovement31
- db $10,$f
- dw RocketHideout2ArrowMovement12
- db $e,$10
- dw RocketHideout2ArrowMovement32
- db $10,$10
- dw RocketHideout2ArrowMovement33
- db $12,$10
- dw RocketHideout2ArrowMovement34
- db $a,$11
- dw RocketHideout2ArrowMovement35
- db $b,$11
- dw RocketHideout2ArrowMovement36
- db $FF
+ map_coord_movement 4, 9, RocketHideout2ArrowMovement1
+ map_coord_movement 4, 11, RocketHideout2ArrowMovement2
+ map_coord_movement 4, 15, RocketHideout2ArrowMovement3
+ map_coord_movement 4, 16, RocketHideout2ArrowMovement4
+ map_coord_movement 4, 19, RocketHideout2ArrowMovement1
+ map_coord_movement 4, 22, RocketHideout2ArrowMovement5
+ map_coord_movement 5, 14, RocketHideout2ArrowMovement6
+ map_coord_movement 6, 22, RocketHideout2ArrowMovement7
+ map_coord_movement 6, 24, RocketHideout2ArrowMovement8
+ map_coord_movement 8, 9, RocketHideout2ArrowMovement9
+ map_coord_movement 8, 12, RocketHideout2ArrowMovement10
+ map_coord_movement 8, 15, RocketHideout2ArrowMovement8
+ map_coord_movement 8, 19, RocketHideout2ArrowMovement9
+ map_coord_movement 8, 23, RocketHideout2ArrowMovement11
+ map_coord_movement 9, 14, RocketHideout2ArrowMovement12
+ map_coord_movement 9, 22, RocketHideout2ArrowMovement12
+ map_coord_movement 10, 9, RocketHideout2ArrowMovement13
+ map_coord_movement 10, 10, RocketHideout2ArrowMovement14
+ map_coord_movement 10, 15, RocketHideout2ArrowMovement15
+ map_coord_movement 10, 17, RocketHideout2ArrowMovement16
+ map_coord_movement 10, 19, RocketHideout2ArrowMovement17
+ map_coord_movement 10, 25, RocketHideout2ArrowMovement2
+ map_coord_movement 11, 14, RocketHideout2ArrowMovement18
+ map_coord_movement 11, 16, RocketHideout2ArrowMovement19
+ map_coord_movement 11, 18, RocketHideout2ArrowMovement12
+ map_coord_movement 12, 9, RocketHideout2ArrowMovement20
+ map_coord_movement 12, 11, RocketHideout2ArrowMovement21
+ map_coord_movement 12, 13, RocketHideout2ArrowMovement22
+ map_coord_movement 12, 17, RocketHideout2ArrowMovement23
+ map_coord_movement 13, 10, RocketHideout2ArrowMovement24
+ map_coord_movement 13, 12, RocketHideout2ArrowMovement25
+ map_coord_movement 13, 16, RocketHideout2ArrowMovement26
+ map_coord_movement 13, 18, RocketHideout2ArrowMovement27
+ map_coord_movement 13, 19, RocketHideout2ArrowMovement28
+ map_coord_movement 13, 22, RocketHideout2ArrowMovement29
+ map_coord_movement 13, 23, RocketHideout2ArrowMovement30
+ map_coord_movement 14, 17, RocketHideout2ArrowMovement31
+ map_coord_movement 15, 16, RocketHideout2ArrowMovement12
+ map_coord_movement 16, 14, RocketHideout2ArrowMovement32
+ map_coord_movement 16, 16, RocketHideout2ArrowMovement33
+ map_coord_movement 16, 18, RocketHideout2ArrowMovement34
+ map_coord_movement 17, 10, RocketHideout2ArrowMovement35
+ map_coord_movement 17, 11, RocketHideout2ArrowMovement36
+ db -1 ; end
;format: direction, count
;each list is read starting from the $FF and working backwards
RocketHideout2ArrowMovement1:
- db D_LEFT,$02
- db $FF
+ db D_LEFT, 2
+ db -1 ; end
RocketHideout2ArrowMovement2:
- db D_RIGHT,$04
- db $FF
+ db D_RIGHT, 4
+ db -1 ; end
RocketHideout2ArrowMovement3:
- db D_UP,$04
- db D_RIGHT,$04
- db $FF
+ db D_UP, 4
+ db D_RIGHT, 4
+ db -1 ; end
RocketHideout2ArrowMovement4:
- db D_UP,$04
- db D_RIGHT,$04
- db D_UP,$01
- db $FF
+ db D_UP, 4
+ db D_RIGHT, 4
+ db D_UP, 1
+ db -1 ; end
RocketHideout2ArrowMovement5:
- db D_LEFT,$02
- db D_UP,$03
- db $FF
+ db D_LEFT, 2
+ db D_UP, 3
+ db -1 ; end
RocketHideout2ArrowMovement6:
- db D_DOWN,$02
- db D_RIGHT,$04
- db $FF
+ db D_DOWN, 2
+ db D_RIGHT, 4
+ db -1 ; end
RocketHideout2ArrowMovement7:
- db D_UP,$02
- db $FF
+ db D_UP, 2
+ db -1 ; end
RocketHideout2ArrowMovement8:
- db D_UP,$04
- db $FF
+ db D_UP, 4
+ db -1 ; end
RocketHideout2ArrowMovement9:
- db D_LEFT,$06
- db $FF
+ db D_LEFT, 6
+ db -1 ; end
RocketHideout2ArrowMovement10:
- db D_UP,$01
- db $FF
+ db D_UP, 1
+ db -1 ; end
RocketHideout2ArrowMovement11:
- db D_LEFT,$06
- db D_UP,$04
- db $FF
+ db D_LEFT, 6
+ db D_UP, 4
+ db -1 ; end
RocketHideout2ArrowMovement12:
- db D_DOWN,$02
- db $FF
+ db D_DOWN, 2
+ db -1 ; end
RocketHideout2ArrowMovement13:
- db D_LEFT,$08
- db $FF
+ db D_LEFT, 8
+ db -1 ; end
RocketHideout2ArrowMovement14:
- db D_LEFT,$08
- db D_UP,$01
- db $FF
+ db D_LEFT, 8
+ db D_UP, 1
+ db -1 ; end
RocketHideout2ArrowMovement15:
- db D_LEFT,$08
- db D_UP,$06
- db $FF
+ db D_LEFT, 8
+ db D_UP, 6
+ db -1 ; end
RocketHideout2ArrowMovement16:
- db D_UP,$02
- db D_RIGHT,$04
- db $FF
+ db D_UP, 2
+ db D_RIGHT, 4
+ db -1 ; end
RocketHideout2ArrowMovement17:
- db D_UP,$02
- db D_RIGHT,$04
- db D_UP,$02
- db $FF
+ db D_UP, 2
+ db D_RIGHT, 4
+ db D_UP, 2
+ db -1 ; end
RocketHideout2ArrowMovement18:
- db D_DOWN,$02
- db D_RIGHT,$04
- db D_DOWN,$02
- db $FF
+ db D_DOWN, 2
+ db D_RIGHT, 4
+ db D_DOWN, 2
+ db -1 ; end
RocketHideout2ArrowMovement19:
- db D_DOWN,$02
- db D_RIGHT,$04
- db $FF
+ db D_DOWN, 2
+ db D_RIGHT, 4
+ db -1 ; end
RocketHideout2ArrowMovement20:
- db D_LEFT,$0A
- db $FF
+ db D_LEFT, 10
+ db -1 ; end
RocketHideout2ArrowMovement21:
- db D_LEFT,$0A
- db D_UP,$02
- db $FF
+ db D_LEFT, 10
+ db D_UP, 2
+ db -1 ; end
RocketHideout2ArrowMovement22:
- db D_LEFT,$0A
- db D_UP,$04
- db $FF
+ db D_LEFT, 10
+ db D_UP, 4
+ db -1 ; end
RocketHideout2ArrowMovement23:
- db D_UP,$02
- db D_RIGHT,$02
- db $FF
+ db D_UP, 2
+ db D_RIGHT, 2
+ db -1 ; end
RocketHideout2ArrowMovement24:
- db D_RIGHT,$01
- db D_DOWN,$02
- db $FF
+ db D_RIGHT, 1
+ db D_DOWN, 2
+ db -1 ; end
RocketHideout2ArrowMovement25:
- db D_RIGHT,$01
- db $FF
+ db D_RIGHT, 1
+ db -1 ; end
RocketHideout2ArrowMovement26:
- db D_DOWN,$02
- db D_RIGHT,$02
- db $FF
+ db D_DOWN, 2
+ db D_RIGHT, 2
+ db -1 ; end
RocketHideout2ArrowMovement27:
- db D_DOWN,$02
- db D_LEFT,$02
- db $FF
+ db D_DOWN, 2
+ db D_LEFT, 2
+ db -1 ; end
RocketHideout2ArrowMovement28:
- db D_UP,$02
- db D_RIGHT,$04
- db D_UP,$02
- db D_LEFT,$03
- db $FF
+ db D_UP, 2
+ db D_RIGHT, 4
+ db D_UP, 2
+ db D_LEFT, 3
+ db -1 ; end
RocketHideout2ArrowMovement29:
- db D_DOWN,$02
- db D_LEFT,$04
- db $FF
+ db D_DOWN, 2
+ db D_LEFT, 4
+ db -1 ; end
RocketHideout2ArrowMovement30:
- db D_LEFT,$06
- db D_UP,$04
- db D_LEFT,$05
- db $FF
+ db D_LEFT, 6
+ db D_UP, 4
+ db D_LEFT, 5
+ db -1 ; end
RocketHideout2ArrowMovement31:
- db D_UP,$02
- db $FF
+ db D_UP, 2
+ db -1 ; end
RocketHideout2ArrowMovement32:
- db D_UP,$01
- db $FF
+ db D_UP, 1
+ db -1 ; end
RocketHideout2ArrowMovement33:
- db D_UP,$03
- db $FF
+ db D_UP, 3
+ db -1 ; end
RocketHideout2ArrowMovement34:
- db D_UP,$05
- db $FF
+ db D_UP, 5
+ db -1 ; end
RocketHideout2ArrowMovement35:
- db D_RIGHT,$01
- db D_DOWN,$02
- db D_LEFT,$04
- db $FF
+ db D_RIGHT, 1
+ db D_DOWN, 2
+ db D_LEFT, 4
+ db -1 ; end
RocketHideout2ArrowMovement36:
- db D_LEFT,$0A
- db D_UP,$02
- db D_LEFT,$05
- db $FF
+ db D_LEFT, 10
+ db D_UP, 2
+ db D_LEFT, 5
+ db -1 ; end
RocketHideout2Script3:
ld a, [wSimulatedJoypadStatesIndex]
diff --git a/scripts/RocketHideoutB3F.asm b/scripts/RocketHideoutB3F.asm
index 3a8b2290..88876f04 100755
--- a/scripts/RocketHideoutB3F.asm
+++ b/scripts/RocketHideoutB3F.asm
@@ -33,103 +33,84 @@ RocketHideout3Script0:
ld [wCurMapScript], a
ret
-;format:
-;db y,x
-;dw pointer to movement
RocketHideout3ArrowTilePlayerMovement:
- db $d,$a
- dw RocketHideout3ArrowMovement6
- db $13,$a
- dw RocketHideout3ArrowMovement1
- db $12,$b
- dw RocketHideout3ArrowMovement2
- db $b,$c
- dw RocketHideout3ArrowMovement3
- db $11,$c
- dw RocketHideout3ArrowMovement4
- db $14,$c
- dw RocketHideout3ArrowMovement5
- db $10,$d
- dw RocketHideout3ArrowMovement6
- db $b,$e
- dw RocketHideout3ArrowMovement7
- db $f,$e
- dw RocketHideout3ArrowMovement6
- db $11,$e
- dw RocketHideout3ArrowMovement8
- db $13,$e
- dw RocketHideout3ArrowMovement9
- db $10,$f
- dw RocketHideout3ArrowMovement7
- db $12,$f
- dw RocketHideout3ArrowMovement10
- db $d,$10
- dw RocketHideout3ArrowMovement11
- db $c,$11
- dw RocketHideout3ArrowMovement10
- db $10,$12
- dw RocketHideout3ArrowMovement12
- db $FF
+ map_coord_movement 10, 13, RocketHideout3ArrowMovement6
+ map_coord_movement 10, 19, RocketHideout3ArrowMovement1
+ map_coord_movement 11, 18, RocketHideout3ArrowMovement2
+ map_coord_movement 12, 11, RocketHideout3ArrowMovement3
+ map_coord_movement 12, 17, RocketHideout3ArrowMovement4
+ map_coord_movement 12, 20, RocketHideout3ArrowMovement5
+ map_coord_movement 13, 16, RocketHideout3ArrowMovement6
+ map_coord_movement 14, 11, RocketHideout3ArrowMovement7
+ map_coord_movement 14, 15, RocketHideout3ArrowMovement6
+ map_coord_movement 14, 17, RocketHideout3ArrowMovement8
+ map_coord_movement 14, 19, RocketHideout3ArrowMovement9
+ map_coord_movement 15, 16, RocketHideout3ArrowMovement7
+ map_coord_movement 15, 18, RocketHideout3ArrowMovement10
+ map_coord_movement 16, 13, RocketHideout3ArrowMovement11
+ map_coord_movement 17, 12, RocketHideout3ArrowMovement10
+ map_coord_movement 18, 16, RocketHideout3ArrowMovement12
+ db -1 ; end
;format: direction, count
;each list is read starting from the $FF and working backwards
RocketHideout3ArrowMovement1:
- db D_RIGHT,$04
- db D_UP,$04
- db D_RIGHT,$04
- db $FF
+ db D_RIGHT, 4
+ db D_UP, 4
+ db D_RIGHT, 4
+ db -1 ; end
RocketHideout3ArrowMovement2:
- db D_DOWN,$04
- db D_RIGHT,$04
- db $FF
+ db D_DOWN, 4
+ db D_RIGHT, 4
+ db -1 ; end
RocketHideout3ArrowMovement3:
- db D_LEFT,$02
- db $FF
+ db D_LEFT, 2
+ db -1 ; end
RocketHideout3ArrowMovement4:
- db D_RIGHT,$04
- db D_UP,$02
- db D_RIGHT,$02
- db $FF
+ db D_RIGHT, 4
+ db D_UP, 2
+ db D_RIGHT, 2
+ db -1 ; end
RocketHideout3ArrowMovement5:
- db D_RIGHT,$04
- db D_UP,$02
- db D_RIGHT,$02
- db D_UP,$03
- db $FF
+ db D_RIGHT, 4
+ db D_UP, 2
+ db D_RIGHT, 2
+ db D_UP, 3
+ db -1 ; end
RocketHideout3ArrowMovement6:
- db D_RIGHT,$04
- db $FF
+ db D_RIGHT, 4
+ db -1 ; end
RocketHideout3ArrowMovement7:
- db D_RIGHT,$02
- db $FF
+ db D_RIGHT, 2
+ db -1 ; end
RocketHideout3ArrowMovement8:
- db D_RIGHT,$04
- db D_UP,$02
- db $FF
+ db D_RIGHT, 4
+ db D_UP, 2
+ db -1 ; end
RocketHideout3ArrowMovement9:
- db D_RIGHT,$04
- db D_UP,$04
- db $FF
+ db D_RIGHT, 4
+ db D_UP, 4
+ db -1 ; end
RocketHideout3ArrowMovement10:
- db D_DOWN,$04
- db $FF
+ db D_DOWN, 4
+ db -1 ; end
RocketHideout3ArrowMovement11:
- db D_UP,$02
- db $FF
+ db D_UP, 2
+ db -1 ; end
RocketHideout3ArrowMovement12:
- db D_UP,$01
- db $FF
+ db D_UP, 1
+ db -1 ; end
RocketHideout3Script3:
ld a, [wSimulatedJoypadStatesIndex]
diff --git a/scripts/RocketHideoutElevator.asm b/scripts/RocketHideoutElevator.asm
index 45b27e3b..8c51294e 100755
--- a/scripts/RocketHideoutElevator.asm
+++ b/scripts/RocketHideoutElevator.asm
@@ -41,19 +41,18 @@ RocketHideoutElevatorScript_45741:
ret
RocketHideoutElavatorFloors:
- db $03 ; num elements in list
+ db 3 ; #
db FLOOR_B1F
db FLOOR_B2F
db FLOOR_B4F
- db $FF ; terminator
+ db -1 ; end
-RocketHideoutElevatorWarpMaps:
-; first byte is warp number
-; second byte is map number
; These specify where the player goes after getting out of the elevator.
- db $04, ROCKET_HIDEOUT_B1F
- db $04, ROCKET_HIDEOUT_B2F
- db $02, ROCKET_HIDEOUT_B4F
+RocketHideoutElevatorWarpMaps:
+ ; warp number, map id
+ db 4, ROCKET_HIDEOUT_B1F
+ db 4, ROCKET_HIDEOUT_B2F
+ db 2, ROCKET_HIDEOUT_B4F
RocketHideoutElevatorWarpMapsEnd:
RocketHideoutElevatorScript_4575f:
diff --git a/scripts/Route1.asm b/scripts/Route1.asm
index 3aa948c7..bd9afea3 100755
--- a/scripts/Route1.asm
+++ b/scripts/Route1.asm
@@ -9,20 +9,20 @@ Route1_TextPointers:
Route1Text1:
text_asm
CheckAndSetEvent EVENT_GOT_POTION_SAMPLE
- jr nz, .asm_1cada
+ jr nz, .got_item
ld hl, Route1ViridianMartSampleText
call PrintText
lb bc, POTION, 1
call GiveItem
- jr nc, .BagFull
+ jr nc, .bag_full
ld hl, Route1Text_1cae8
- jr .asm_1cadd
-.BagFull
+ jr .done
+.bag_full
ld hl, Route1Text_1caf3
- jr .asm_1cadd
-.asm_1cada
+ jr .done
+.got_item
ld hl, Route1Text_1caee
-.asm_1cadd
+.done
call PrintText
jp TextScriptEnd
diff --git a/scripts/Route11Gate2F.asm b/scripts/Route11Gate2F.asm
index 1797c540..47c8db22 100755
--- a/scripts/Route11Gate2F.asm
+++ b/scripts/Route11Gate2F.asm
@@ -9,7 +9,7 @@ Route11Gate2F_TextPointers:
Route11GateUpstairsText1:
text_asm
- xor a
+ xor a ; TRADE_FOR_TERRY
ld [wWhichTrade], a
predef DoInGameTradeDialogue
Route11GateUpstairsScriptEnd:
@@ -18,10 +18,10 @@ Route11GateUpstairsScriptEnd:
Route11GateUpstairsText2:
text_asm
CheckEvent EVENT_GOT_ITEMFINDER, 1
- jr c, .asm_4949b
- ld a, 30 ; pokemon needed
+ jr c, .got_item
+ ld a, 30
ldh [hOaksAideRequirement], a
- ld a, ITEMFINDER ; oak's aide reward
+ ld a, ITEMFINDER
ldh [hOaksAideRewardItem], a
ld [wd11e], a
call GetItemName
@@ -32,13 +32,13 @@ Route11GateUpstairsText2:
call CopyData
predef OaksAideScript
ldh a, [hOaksAideResult]
- dec a
- jr nz, .asm_494a1
+ dec a ; OAKS_AIDE_GOT_ITEM?
+ jr nz, .no_item
SetEvent EVENT_GOT_ITEMFINDER
-.asm_4949b
+.got_item
ld hl, Route11GateUpstairsText_494a3
call PrintText
-.asm_494a1
+.no_item
jr Route11GateUpstairsScriptEnd
Route11GateUpstairsText_494a3:
diff --git a/scripts/Route12Gate2F.asm b/scripts/Route12Gate2F.asm
index a7e426c9..2174fba8 100755
--- a/scripts/Route12Gate2F.asm
+++ b/scripts/Route12Gate2F.asm
@@ -9,24 +9,24 @@ Route12Gate2F_TextPointers:
Route12GateUpstairsText1:
text_asm
CheckEvent EVENT_GOT_TM39, 1
- jr c, .asm_0ad3c
+ jr c, .got_item
ld hl, TM39PreReceiveText
call PrintText
lb bc, TM_SWIFT, 1
call GiveItem
- jr nc, .BagFull
+ jr nc, .bag_full
ld hl, ReceivedTM39Text
call PrintText
SetEvent EVENT_GOT_TM39
- jr .asm_4ba56
-.BagFull
+ jr .done
+.bag_full
ld hl, TM39NoRoomText
call PrintText
- jr .asm_4ba56
-.asm_0ad3c
+ jr .done
+.got_item
ld hl, TM39ExplanationText
call PrintText
-.asm_4ba56
+.done
jp TextScriptEnd
TM39PreReceiveText:
@@ -68,7 +68,7 @@ GateUpstairsScript_PrintIfFacingUp:
ld a, [wSpritePlayerStateData1FacingDirection]
cp SPRITE_FACING_UP
jr z, .up
- ld a, $1
+ ld a, TRUE
jr .done
.up
call PrintText
diff --git a/scripts/Route12SuperRodHouse.asm b/scripts/Route12SuperRodHouse.asm
index 6cc1602c..fba5426e 100755
--- a/scripts/Route12SuperRodHouse.asm
+++ b/scripts/Route12SuperRodHouse.asm
@@ -7,30 +7,30 @@ Route12SuperRodHouse_TextPointers:
Route12HouseText1:
text_asm
ld a, [wd728]
- bit 5, a
- jr nz, .asm_b4cad
+ bit 5, a ; received super rod?
+ jr nz, .got_item
ld hl, Route12HouseText_564c0
call PrintText
call YesNoChoice
ld a, [wCurrentMenuItem]
and a
- jr nz, .asm_a2d76
+ jr nz, .refused
lb bc, SUPER_ROD, 1
call GiveItem
- jr nc, .BagFull
+ jr nc, .bag_full
ld hl, wd728
- set 5, [hl]
+ set 5, [hl] ; received super rod
ld hl, Route12HouseText_564c5
- jr .asm_df984
-.BagFull
+ jr .done
+.bag_full
ld hl, Route12HouseText_564d9
- jr .asm_df984
-.asm_a2d76
+ jr .done
+.refused
ld hl, Route12HouseText_564cf
- jr .asm_df984
-.asm_b4cad
+ jr .done
+.got_item
ld hl, Route12HouseText_564d4
-.asm_df984
+.done
call PrintText
jp TextScriptEnd
diff --git a/scripts/Route15Gate2F.asm b/scripts/Route15Gate2F.asm
index 9887fbc1..1b85e34e 100755
--- a/scripts/Route15Gate2F.asm
+++ b/scripts/Route15Gate2F.asm
@@ -8,10 +8,10 @@ Route15Gate2F_TextPointers:
Route15GateUpstairsText1:
text_asm
CheckEvent EVENT_GOT_EXP_ALL
- jr nz, .asm_49683
- ld a, 50 ; pokemon needed
+ jr nz, .got_item
+ ld a, 50
ldh [hOaksAideRequirement], a
- ld a, EXP_ALL ; oak's aide reward
+ ld a, EXP_ALL
ldh [hOaksAideRewardItem], a
ld [wd11e], a
call GetItemName
@@ -21,13 +21,13 @@ Route15GateUpstairsText1:
call CopyData
predef OaksAideScript
ldh a, [hOaksAideResult]
- cp $1
- jr nz, .asm_49689
+ cp OAKS_AIDE_GOT_ITEM
+ jr nz, .no_item
SetEvent EVENT_GOT_EXP_ALL
-.asm_49683
+.got_item
ld hl, Route15GateUpstairsText_4968c
call PrintText
-.asm_49689
+.no_item
jp TextScriptEnd
Route15GateUpstairsText_4968c:
diff --git a/scripts/Route16FlyHouse.asm b/scripts/Route16FlyHouse.asm
index d5b0350a..3bb34b75 100755
--- a/scripts/Route16FlyHouse.asm
+++ b/scripts/Route16FlyHouse.asm
@@ -9,18 +9,18 @@ Route16HouseText1:
text_asm
CheckEvent EVENT_GOT_HM02
ld hl, HM02ExplanationText
- jr nz, .asm_13616
+ jr nz, .got_item
ld hl, Route16HouseText3
call PrintText
lb bc, HM_FLY, 1
call GiveItem
- jr nc, .BagFull
+ jr nc, .bag_full
SetEvent EVENT_GOT_HM02
ld hl, ReceivedHM02Text
- jr .asm_13616
-.BagFull
+ jr .got_item
+.bag_full
ld hl, HM02NoRoomText
-.asm_13616
+.got_item
call PrintText
jp TextScriptEnd
diff --git a/scripts/Route16Gate1F.asm b/scripts/Route16Gate1F.asm
index 5bb77075..e992fa44 100755
--- a/scripts/Route16Gate1F.asm
+++ b/scripts/Route16Gate1F.asm
@@ -44,11 +44,11 @@ Route16GateScript0:
ret
CoordsData_49714:
- db $07,$04
- db $08,$04
- db $09,$04
- db $0A,$04
- db $FF
+ dbmapcoord 4, 7
+ dbmapcoord 4, 8
+ dbmapcoord 4, 9
+ dbmapcoord 4, 10
+ db -1 ; end
Route16GateScript1:
ld a, [wSimulatedJoypadStatesIndex]
diff --git a/scripts/Route18Gate1F.asm b/scripts/Route18Gate1F.asm
index ea8783df..2caeaedd 100755
--- a/scripts/Route18Gate1F.asm
+++ b/scripts/Route18Gate1F.asm
@@ -44,11 +44,11 @@ Route18GateScript0:
ret
CoordsData_498cc:
- db $03,$04
- db $04,$04
- db $05,$04
- db $06,$04
- db $FF
+ dbmapcoord 4, 3
+ dbmapcoord 4, 4
+ dbmapcoord 4, 5
+ dbmapcoord 4, 6
+ db -1 ; end
Route18GateScript1:
ld a, [wSimulatedJoypadStatesIndex]
diff --git a/scripts/Route18Gate2F.asm b/scripts/Route18Gate2F.asm
index d7511859..efb6d70a 100755
--- a/scripts/Route18Gate2F.asm
+++ b/scripts/Route18Gate2F.asm
@@ -8,7 +8,7 @@ Route18Gate2F_TextPointers:
Route18GateUpstairsText1:
text_asm
- ld a, $5
+ ld a, TRADE_FOR_MARC
ld [wWhichTrade], a
predef DoInGameTradeDialogue
jp TextScriptEnd
diff --git a/scripts/Route20.asm b/scripts/Route20.asm
index e83382d7..f9904d4e 100755
--- a/scripts/Route20.asm
+++ b/scripts/Route20.asm
@@ -33,7 +33,7 @@ Route20Script_50cc6:
db HS_SEAFOAM_ISLANDS_B2F_BOULDER_2
db HS_SEAFOAM_ISLANDS_B3F_BOULDER_3
db HS_SEAFOAM_ISLANDS_B3F_BOULDER_4
- db $FF
+ db -1 ; end
.asm_50cef
CheckBothEventsSet EVENT_SEAFOAM4_BOULDER1_DOWN_HOLE, EVENT_SEAFOAM4_BOULDER2_DOWN_HOLE
diff --git a/scripts/Route22.asm b/scripts/Route22.asm
index 57dc934e..2e3f171e 100755
--- a/scripts/Route22.asm
+++ b/scripts/Route22.asm
@@ -52,7 +52,7 @@ Route22RivalMovementData:
db NPC_MOVEMENT_RIGHT
db NPC_MOVEMENT_RIGHT
db NPC_MOVEMENT_RIGHT
- db $FF
+ db -1 ; end
Route22Script0:
CheckEvent EVENT_ROUTE22_RIVAL_WANTS_BATTLE
@@ -75,9 +75,9 @@ Route22Script0:
ret
.Route22RivalBattleCoords
- db $04, $1D
- db $05, $1D
- db $FF
+ dbmapcoord 29, 4
+ dbmapcoord 29, 5
+ db -1 ; end
.firstRivalBattle
ld a, $1
@@ -141,9 +141,9 @@ Route22Script1:
StarterMons_50faf:
; starter the rival picked, rival trainer number
- db STARTER2,$04
- db STARTER3,$05
- db STARTER1,$06
+ db STARTER2, 4
+ db STARTER3, 5
+ db STARTER1, 6
Route22Script2:
ld a, [wIsInBattle]
@@ -202,7 +202,7 @@ Route22RivalExitMovementData1:
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
- db $FF
+ db -1 ; end
Route22RivalExitMovementData2:
db NPC_MOVEMENT_UP
@@ -215,7 +215,7 @@ Route22RivalExitMovementData2:
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
- db $FF
+ db -1 ; end
Route22Script3:
ld a, [wd730]
@@ -296,9 +296,9 @@ Route22Script4:
ret
StarterMons_510d9:
- db STARTER2,$0a
- db STARTER3,$0b
- db STARTER1,$0c
+ db STARTER2, 10
+ db STARTER3, 11
+ db STARTER1, 12
Route22Script5:
ld a, [wIsInBattle]
@@ -355,12 +355,11 @@ Route22MoveRival2:
MovementData_5114c:
db NPC_MOVEMENT_LEFT
-
MovementData_5114d:
db NPC_MOVEMENT_LEFT
db NPC_MOVEMENT_LEFT
db NPC_MOVEMENT_LEFT
- db $FF
+ db -1 ; end
Route22Script6:
ld a, [wd730]
diff --git a/scripts/Route22Gate.asm b/scripts/Route22Gate.asm
index 59b7d7a2..78143481 100755
--- a/scripts/Route22Gate.asm
+++ b/scripts/Route22Gate.asm
@@ -28,9 +28,9 @@ Route22GateScript0:
jp DisplayTextID
Route22GateScriptCoords:
- db 2,4
- db 2,5
- db $ff
+ dbmapcoord 4, 2
+ dbmapcoord 5, 2
+ db -1 ; end
Route22GateScript_1e6ba:
ld a, $1
diff --git a/scripts/Route23.asm b/scripts/Route23.asm
index f4d65266..e5318862 100755
--- a/scripts/Route23.asm
+++ b/scripts/Route23.asm
@@ -32,16 +32,16 @@ Route23Script0:
EventFlagBit c, EVENT_PASSED_EARTHBADGE_CHECK + 1, EVENT_PASSED_CASCADEBADGE_CHECK
.asm_51224
ld a, [hli]
- cp $ff
+ cp -1
ret z
inc e
dec c
cp b
jr nz, .asm_51224
- cp $23
+ cp 35
jr nz, .asm_51237
ld a, [wXCoord]
- cp $e
+ cp 14
ret nc
.asm_51237
ld a, e
@@ -61,7 +61,14 @@ Route23Script0:
ret
YCoordsData_51255:
- db $23,$38,$55,$60,$69,$77,$88,$FF
+ db 35
+ db 56
+ db 85
+ db 96
+ db 105
+ db 119
+ db 136
+ db -1 ; end
Route23Script_5125d:
ld hl, BadgeTextPointers
diff --git a/scripts/Route24.asm b/scripts/Route24.asm
index 28151393..aed112ac 100755
--- a/scripts/Route24.asm
+++ b/scripts/Route24.asm
@@ -45,7 +45,8 @@ Route24Script0:
ret
CoordsData_5140e:
- db $0F,$0A,$FF
+ dbmapcoord 10, 15
+ db -1 ; end
Route24Script4:
ld a, [wSimulatedJoypadStatesIndex]
@@ -103,12 +104,12 @@ Route24Text1:
text_asm
ResetEvent EVENT_NUGGET_REWARD_AVAILABLE
CheckEvent EVENT_GOT_NUGGET
- jr nz, .asm_514f9
+ jr nz, .got_item
ld hl, Route24Text_51510
call PrintText
lb bc, NUGGET, 1
call GiveItem
- jr nc, .BagFull
+ jr nc, .bag_full
SetEvent EVENT_GOT_NUGGET
ld hl, Route24Text_5151a
call PrintText
@@ -130,11 +131,11 @@ Route24Text1:
ld [wRoute24CurScript], a
ld [wCurMapScript], a
jp TextScriptEnd
-.asm_514f9
+.got_item
ld hl, Route24Text_51530
call PrintText
jp TextScriptEnd
-.BagFull
+.bag_full
ld hl, Route24Text_51521
call PrintText
SetEvent EVENT_NUGGET_REWARD_AVAILABLE
diff --git a/scripts/Route2Gate.asm b/scripts/Route2Gate.asm
index d9d30218..60f6ffe1 100755
--- a/scripts/Route2Gate.asm
+++ b/scripts/Route2Gate.asm
@@ -8,10 +8,10 @@ Route2Gate_TextPointers:
Route2GateText1:
text_asm
CheckEvent EVENT_GOT_HM05
- jr nz, .asm_5d60d
- ld a, 10 ; pokemon needed
+ jr nz, .got_item
+ ld a, 10
ldh [hOaksAideRequirement], a
- ld a, HM_FLASH ; oak's aide reward
+ ld a, HM_FLASH
ldh [hOaksAideRewardItem], a
ld [wd11e], a
call GetItemName
@@ -21,13 +21,13 @@ Route2GateText1:
call CopyData
predef OaksAideScript
ldh a, [hOaksAideResult]
- cp $1
- jr nz, .asm_5d613
+ cp OAKS_AIDE_GOT_ITEM
+ jr nz, .no_item
SetEvent EVENT_GOT_HM05
-.asm_5d60d
+.got_item
ld hl, Route2GateText_5d616
call PrintText
-.asm_5d613
+.no_item
jp TextScriptEnd
Route2GateText_5d616:
diff --git a/scripts/Route2TradeHouse.asm b/scripts/Route2TradeHouse.asm
index fd3c51e3..85ed2d34 100755
--- a/scripts/Route2TradeHouse.asm
+++ b/scripts/Route2TradeHouse.asm
@@ -11,7 +11,7 @@ Route2HouseText1:
Route2HouseText2:
text_asm
- ld a, $1
+ ld a, TRADE_FOR_MARCEL
ld [wWhichTrade], a
predef DoInGameTradeDialogue
jp TextScriptEnd
diff --git a/scripts/Route5Gate.asm b/scripts/Route5Gate.asm
index f2d45112..e155694a 100755
--- a/scripts/Route5Gate.asm
+++ b/scripts/Route5Gate.asm
@@ -46,9 +46,9 @@ Route5GateScript0:
ret
CoordsData_1df8f:
- db 3,3
- db 3,4
- db $ff
+ dbmapcoord 3, 3
+ dbmapcoord 4, 3
+ db -1 ; end
Route5GateScript1:
ld a, [wSimulatedJoypadStatesIndex]
diff --git a/scripts/Route6Gate.asm b/scripts/Route6Gate.asm
index 22d40fd3..143f60ae 100755
--- a/scripts/Route6Gate.asm
+++ b/scripts/Route6Gate.asm
@@ -39,8 +39,9 @@ Route6GateScript0:
jp DisplayTextID
CoordsData_1e08c:
- db $02,$03
- db $02,$04,$FF
+ dbmapcoord 3, 2
+ dbmapcoord 4, 2
+ db -1 ; end
Route6GateScript1:
ld a, [wSimulatedJoypadStatesIndex]
diff --git a/scripts/Route7Gate.asm b/scripts/Route7Gate.asm
index 182dedab..9a647965 100755
--- a/scripts/Route7Gate.asm
+++ b/scripts/Route7Gate.asm
@@ -52,9 +52,9 @@ Route7GateScript0:
ret
CoordsData_1e167:
- db 3,3
- db 4,3
- db $ff
+ dbmapcoord 3, 3
+ dbmapcoord 3, 4
+ db -1 ; end
Route7GateScript1:
ld a, [wSimulatedJoypadStatesIndex]
diff --git a/scripts/Route8Gate.asm b/scripts/Route8Gate.asm
index 9ddaf601..3167cd76 100755
--- a/scripts/Route8Gate.asm
+++ b/scripts/Route8Gate.asm
@@ -50,9 +50,9 @@ Route8GateScript0:
jp DisplayTextID
CoordsData_1e22c:
- db 3,2
- db 4,2
- db $ff
+ dbmapcoord 2, 3
+ dbmapcoord 2, 4
+ db -1 ; end
Route8GateScript1:
ld a, [wSimulatedJoypadStatesIndex]
diff --git a/scripts/SSAnne2F.asm b/scripts/SSAnne2F.asm
index 5060f1e1..6b216350 100755
--- a/scripts/SSAnne2F.asm
+++ b/scripts/SSAnne2F.asm
@@ -58,17 +58,16 @@ SSAnne2Script0:
MovementData_6140c:
db NPC_MOVEMENT_DOWN
-
MovementData_6140d:
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
- db $FF
+ db -1 ; end
CoordsData_61411:
- db $08,$24
- db $08,$25
- db $FF
+ dbmapcoord 36, 8
+ dbmapcoord 37, 8
+ db -1 ; end
SSAnne2Script_61416:
ld a, [wXCoord]
@@ -156,13 +155,12 @@ SSAnne2Script2:
MovementData_614b7:
db NPC_MOVEMENT_RIGHT
db NPC_MOVEMENT_DOWN
-
MovementData_614b9:
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
- db $FF
+ db -1 ; end
SSAnne2Script3:
ld a, [wd730]
diff --git a/scripts/SSAnne2FRooms.asm b/scripts/SSAnne2FRooms.asm
index a82afa26..3fe2d34f 100755
--- a/scripts/SSAnne2FRooms.asm
+++ b/scripts/SSAnne2FRooms.asm
@@ -1,5 +1,5 @@
SSAnne2FRooms_Script:
- ld a, $1
+ ld a, TRUE
ld [wAutoTextBoxDrawingControl], a
xor a
ld [wDoNotWaitForButtonPressAfterDisplayingText], a
diff --git a/scripts/SSAnneB1F.asm b/scripts/SSAnneB1F.asm
index 91452977..f66fdfaa 100755
--- a/scripts/SSAnneB1F.asm
+++ b/scripts/SSAnneB1F.asm
@@ -2,4 +2,5 @@ SSAnneB1F_Script:
jp EnableAutoTextBoxDrawing
SSAnneB1F_TextPointers:
- text_end
+
+ text_end ; unused
diff --git a/scripts/SSAnneCaptainsRoom.asm b/scripts/SSAnneCaptainsRoom.asm
index 8b464b53..3d5c5645 100755
--- a/scripts/SSAnneCaptainsRoom.asm
+++ b/scripts/SSAnneCaptainsRoom.asm
@@ -17,28 +17,28 @@ SSAnneCaptainsRoom_TextPointers:
SSAnne7Text1:
text_asm
CheckEvent EVENT_GOT_HM01
- jr nz, .asm_797c4
+ jr nz, .got_item
ld hl, SSAnne7RubText
call PrintText
ld hl, ReceivingHM01Text
call PrintText
lb bc, HM_CUT, 1
call GiveItem
- jr nc, .BagFull
+ jr nc, .bag_full
ld hl, ReceivedHM01Text
call PrintText
SetEvent EVENT_GOT_HM01
- jr .asm_0faf5
-.BagFull
+ jr .done
+.bag_full
ld hl, HM01NoRoomText
call PrintText
ld hl, wd72d
set 5, [hl]
- jr .asm_0faf5
-.asm_797c4
+ jr .done
+.got_item
ld hl, SSAnne7Text_61932
call PrintText
-.asm_0faf5
+.done
jp TextScriptEnd
SSAnne7RubText:
diff --git a/scripts/SSAnneKitchen.asm b/scripts/SSAnneKitchen.asm
index 969c6b7f..30a9830f 100755
--- a/scripts/SSAnneKitchen.asm
+++ b/scripts/SSAnneKitchen.asm
@@ -41,17 +41,17 @@ SSAnne6Text7:
call PrintText
ldh a, [hRandomAdd]
bit 7, a
- jr z, .asm_93eb1
+ jr z, .not_dialog_1
ld hl, SSAnne6Text_6180c
- jr .asm_63292
-.asm_93eb1
+ jr .done
+.not_dialog_1
bit 4, a
- jr z, .asm_7436c
+ jr z, .not_dialog_2
ld hl, SSAnne6Text_61811
- jr .asm_63292
-.asm_7436c
+ jr .done
+.not_dialog_2
ld hl, SSAnne6Text_61816
-.asm_63292
+.done
call PrintText
jp TextScriptEnd
diff --git a/scripts/SafariZoneGate.asm b/scripts/SafariZoneGate.asm
index a15a5630..fd9a0884 100755
--- a/scripts/SafariZoneGate.asm
+++ b/scripts/SafariZoneGate.asm
@@ -43,9 +43,9 @@ SafariZoneGate_ScriptPointers:
ret
.CoordsData_75221:
- db $02,$03
- db $02,$04
- db $FF
+ dbmapcoord 3, 2
+ dbmapcoord 4, 2
+ db -1 ; end
.SafariZoneEntranceScript1
call SafariZoneEntranceScript_752b4
diff --git a/scripts/SafariZoneSecretHouse.asm b/scripts/SafariZoneSecretHouse.asm
index 35aa90d7..6eeff8ad 100755
--- a/scripts/SafariZoneSecretHouse.asm
+++ b/scripts/SafariZoneSecretHouse.asm
@@ -7,24 +7,24 @@ SafariZoneSecretHouse_TextPointers:
SafariZoneSecretHouseText1:
text_asm
CheckEvent EVENT_GOT_HM03
- jr nz, .asm_20a9b
+ jr nz, .got_item
ld hl, SafariZoneSecretHouseText_4a350
call PrintText
lb bc, HM_SURF, 1
call GiveItem
- jr nc, .BagFull
+ jr nc, .bag_full
ld hl, ReceivedHM03Text
call PrintText
SetEvent EVENT_GOT_HM03
- jr .asm_8f1fc
-.BagFull
+ jr .done
+.bag_full
ld hl, HM03NoRoomText
call PrintText
- jr .asm_8f1fc
-.asm_20a9b
+ jr .done
+.got_item
ld hl, HM03ExplanationText
call PrintText
-.asm_8f1fc
+.done
jp TextScriptEnd
SafariZoneSecretHouseText_4a350:
diff --git a/scripts/SeafoamIslands1F.asm b/scripts/SeafoamIslands1F.asm
index b024a6bd..ceb2a2fb 100755
--- a/scripts/SeafoamIslands1F.asm
+++ b/scripts/SeafoamIslands1F.asm
@@ -38,9 +38,9 @@ SeafoamIslands1F_Script:
jp IsPlayerOnDungeonWarp
Seafoam1HolesCoords:
- db $06,$11
- db $06,$18
- db $ff
+ dbmapcoord 17, 6
+ dbmapcoord 24, 6
+ db -1 ; end
SeafoamIslands1F_TextPointers:
dw BoulderText
diff --git a/scripts/SeafoamIslandsB1F.asm b/scripts/SeafoamIslandsB1F.asm
index a4c5767b..ac667513 100755
--- a/scripts/SeafoamIslandsB1F.asm
+++ b/scripts/SeafoamIslandsB1F.asm
@@ -37,9 +37,9 @@ SeafoamIslandsB1F_Script:
jp IsPlayerOnDungeonWarp
Seafoam2HolesCoords:
- db $06,$12
- db $06,$17
- db $ff
+ dbmapcoord 18, 6
+ dbmapcoord 23, 6
+ db -1 ; end
SeafoamIslandsB1F_TextPointers:
dw BoulderText
diff --git a/scripts/SeafoamIslandsB2F.asm b/scripts/SeafoamIslandsB2F.asm
index eb6d2437..fe4b3ead 100755
--- a/scripts/SeafoamIslandsB2F.asm
+++ b/scripts/SeafoamIslandsB2F.asm
@@ -37,9 +37,9 @@ SeafoamIslandsB2F_Script:
jp IsPlayerOnDungeonWarp
Seafoam3HolesCoords:
- db $06,$13
- db $06,$16
- db $ff
+ dbmapcoord 19, 6
+ dbmapcoord 22, 6
+ db -1 ; end
SeafoamIslandsB2F_TextPointers:
dw BoulderText
diff --git a/scripts/SeafoamIslandsB3F.asm b/scripts/SeafoamIslandsB3F.asm
index 7d0e032b..d735f824 100755
--- a/scripts/SeafoamIslandsB3F.asm
+++ b/scripts/SeafoamIslandsB3F.asm
@@ -45,9 +45,9 @@ SeafoamIslandsB3F_Script:
jp CallFunctionInTable
Seafoam4HolesCoords:
- db $10,$03
- db $10,$06
- db $ff
+ dbmapcoord 3, 16
+ dbmapcoord 6, 16
+ db -1 ; end
SeafoamIslandsB3F_ScriptPointers:
dw SeafoamIslands4Script0
@@ -77,10 +77,10 @@ SeafoamIslands4Script0:
ret
RLEMovement46632:
- db D_DOWN,6
- db D_RIGHT,5
- db D_DOWN,3
- db $ff
+ db D_DOWN, 6
+ db D_RIGHT, 5
+ db D_DOWN, 3
+ db -1 ; end
SeafoamIslands4Script1:
ld a, [wSimulatedJoypadStatesIndex]
@@ -120,17 +120,17 @@ SeafoamIslands4Script2:
ret
RLEData_4667f:
- db D_DOWN,$06
- db D_RIGHT,$02
- db D_DOWN,$04
- db D_LEFT,$01
- db $FF
+ db D_DOWN, 6
+ db D_RIGHT, 2
+ db D_DOWN, 4
+ db D_LEFT, 1
+ db -1 ; end
RLEData_46688:
- db D_DOWN,$06
- db D_RIGHT,$02
- db D_DOWN,$04
- db $FF
+ db D_DOWN, 6
+ db D_RIGHT, 2
+ db D_DOWN, 4
+ db -1 ; end
SeafoamIslands4Script3:
ld a, [wSimulatedJoypadStatesIndex]
diff --git a/scripts/SeafoamIslandsB4F.asm b/scripts/SeafoamIslandsB4F.asm
index 250dfd39..bf80d3e0 100755
--- a/scripts/SeafoamIslandsB4F.asm
+++ b/scripts/SeafoamIslandsB4F.asm
@@ -53,11 +53,11 @@ SeafoamIslands5Script0:
ret
.Coords
- db $11,$14
- db $11,$15
- db $10,$14
- db $10,$15
- db $FF
+ dbmapcoord 20, 17
+ dbmapcoord 21, 17
+ dbmapcoord 20, 16
+ dbmapcoord 21, 16
+ db -1 ; end
SeafoamIslands5Script1:
ld a, [wSimulatedJoypadStatesIndex]
@@ -96,21 +96,21 @@ SeafoamIslands5Script2:
ret
.Coords
- db $0E,$04
- db $0E,$05
- db $FF
+ dbmapcoord 4, 14
+ dbmapcoord 5, 14
+ db -1 ; end
RLEMovementData_46852:
- db D_UP,$03
- db D_RIGHT,$02
- db D_UP,$01
- db $FF
+ db D_UP, 3
+ db D_RIGHT, 2
+ db D_UP, 1
+ db -1 ; end
RLEMovementData_46859:
- db D_UP,$03
- db D_RIGHT,$03
- db D_UP,$01
- db $FF
+ db D_UP, 3
+ db D_RIGHT, 3
+ db D_UP, 1
+ db -1 ; end
SeafoamIslands5Script3:
ld a, [wSimulatedJoypadStatesIndex]
diff --git a/scripts/SilphCo10F.asm b/scripts/SilphCo10F.asm
index 1ac993ed..29b640fd 100755
--- a/scripts/SilphCo10F.asm
+++ b/scripts/SilphCo10F.asm
@@ -24,8 +24,8 @@ SilphCo10Script_5a14f:
predef_jump ReplaceTileBlock
SilphCo10GateCoords:
- db $04,$05
- db $FF
+ dbmapcoord 5, 4
+ db -1 ; end
SilphCo10Text_5a176:
ldh a, [hUnlockedSilphCoDoors]
diff --git a/scripts/SilphCo11F.asm b/scripts/SilphCo11F.asm
index abea6da4..f3a7088b 100755
--- a/scripts/SilphCo11F.asm
+++ b/scripts/SilphCo11F.asm
@@ -24,8 +24,8 @@ SilphCo11Script_62110:
predef_jump ReplaceTileBlock
SilphCo11GateCoords:
- db $06,$03
- db $FF
+ dbmapcoord 3, 6
+ db -1 ; end
SilphCo11Script_62137:
push hl
@@ -85,7 +85,7 @@ SilphCo11Script_6216d:
ld hl, MissableObjectIDs_62194
.asm_62184
ld a, [hli]
- cp $ff
+ cp -1
ret z
push hl
ld [wMissableObjectIndex], a
@@ -100,7 +100,7 @@ MissableObjectIDs_62194:
db HS_SAFFRON_CITY_B
db HS_SAFFRON_CITY_C
db HS_SAFFRON_CITY_D
- db $FF
+ db -1 ; end
MissableObjectIDs_6219b:
db HS_SAFFRON_CITY_1
@@ -143,7 +143,7 @@ MissableObjectIDs_6219b:
db HS_SILPH_CO_11F_1
db HS_SILPH_CO_11F_2
db HS_SILPH_CO_11F_3
- db $FF
+ db -1 ; end
SilphCo11Script_621c4:
xor a
@@ -186,15 +186,15 @@ SilphCo11Script0:
jp SilphCo11Script_621c8
CoordsData_62211:
- db $0D,$06
- db $0C,$07
- db $FF
+ dbmapcoord 6, 13
+ dbmapcoord 7, 12
+ db -1 ; end
MovementData_62216:
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
db NPC_MOVEMENT_DOWN
- db $FF
+ db -1 ; end
SilphCo11Script_6221a:
ld [wPlayerMovingDirection], a
@@ -289,24 +289,24 @@ SilphCo11TrainerHeader1:
SilphCo11Text1:
text_asm
CheckEvent EVENT_GOT_MASTER_BALL
- jp nz, .asm_62308
+ jp nz, .got_item
ld hl, SilphCoPresidentText
call PrintText
lb bc, MASTER_BALL, 1
call GiveItem
- jr nc, .BagFull
+ jr nc, .bag_full
ld hl, ReceivedSilphCoMasterBallText
call PrintText
SetEvent EVENT_GOT_MASTER_BALL
- jr .asm_6230e
-.BagFull
+ jr .done
+.bag_full
ld hl, SilphCoMasterBallNoRoomText
call PrintText
- jr .asm_6230e
-.asm_62308
+ jr .done
+.got_item
ld hl, SilphCo10Text_6231c
call PrintText
-.asm_6230e
+.done
jp TextScriptEnd
SilphCoPresidentText:
diff --git a/scripts/SilphCo2F.asm b/scripts/SilphCo2F.asm
index 5433bca4..4b96c314 100755
--- a/scripts/SilphCo2F.asm
+++ b/scripts/SilphCo2F.asm
@@ -33,9 +33,9 @@ SilphCo2Script_59d07:
predef_jump ReplaceTileBlock
SilphCo2GateCoords:
- db $02,$02
- db $05,$02
- db $FF
+ dbmapcoord 2, 2
+ dbmapcoord 2, 5
+ db -1 ; end
SilphCo2Script_59d43:
push hl
diff --git a/scripts/SilphCo3F.asm b/scripts/SilphCo3F.asm
index f2b4b1fd..69dfdad9 100755
--- a/scripts/SilphCo3F.asm
+++ b/scripts/SilphCo3F.asm
@@ -33,9 +33,9 @@ SilphCo3Script_59f71:
predef_jump ReplaceTileBlock
SilphCo3GateCoords:
- db $04,$04
- db $04,$08
- db $FF
+ dbmapcoord 4, 4
+ dbmapcoord 8, 4
+ db -1 ; end
SilphCo3Script_59fad:
EventFlagAddress hl, EVENT_SILPH_CO_3_UNLOCKED_DOOR1
diff --git a/scripts/SilphCo4F.asm b/scripts/SilphCo4F.asm
index 4b6303a1..8d5d696a 100755
--- a/scripts/SilphCo4F.asm
+++ b/scripts/SilphCo4F.asm
@@ -33,9 +33,9 @@ SilphCo4Script_19d21:
predef_jump ReplaceTileBlock
SilphCo4GateCoords:
- db $06,$02
- db $04,$06
- db $FF
+ dbmapcoord 2, 6
+ dbmapcoord 6, 4
+ db -1 ; end
SilphCo4Script_19d5d:
push hl
diff --git a/scripts/SilphCo5F.asm b/scripts/SilphCo5F.asm
index 94a7ec30..975dacac 100755
--- a/scripts/SilphCo5F.asm
+++ b/scripts/SilphCo5F.asm
@@ -42,10 +42,10 @@ SilphCo5Script_19f4d:
predef_jump ReplaceTileBlock
SilphCo5GateCoords:
- db $02,$03
- db $06,$03
- db $05,$07
- db $FF
+ dbmapcoord 3, 2
+ dbmapcoord 3, 6
+ dbmapcoord 7, 5
+ db -1 ; end
SilphCo5Script_19f9e:
EventFlagAddress hl, EVENT_SILPH_CO_5_UNLOCKED_DOOR1
diff --git a/scripts/SilphCo6F.asm b/scripts/SilphCo6F.asm
index 51d29498..ea8c20c2 100755
--- a/scripts/SilphCo6F.asm
+++ b/scripts/SilphCo6F.asm
@@ -24,8 +24,8 @@ SilphCo6Script_1a1bf:
predef_jump ReplaceTileBlock
SilphCo6GateCoords:
- db $06,$02
- db $FF
+ dbmapcoord 2, 6
+ db -1 ; end
SilphCo6Script_1a1e6:
ldh a, [hUnlockedSilphCoDoors]
diff --git a/scripts/SilphCo7F.asm b/scripts/SilphCo7F.asm
index 3627bc7f..32a95fb5 100755
--- a/scripts/SilphCo7F.asm
+++ b/scripts/SilphCo7F.asm
@@ -42,10 +42,10 @@ SilphCo7Script_51b77:
predef_jump ReplaceTileBlock
SilphCo7GateCoords:
- db $03,$05
- db $02,$0A
- db $06,$0A
- db $FF
+ dbmapcoord 5, 3
+ dbmapcoord 10, 2
+ dbmapcoord 10, 6
+ db -1 ; end
SilphCo7Text_51bc8:
push hl
@@ -156,16 +156,16 @@ SilphCo7Script0:
jp SilphCo7Text_51c10
CoordsData_51c78:
- db $02,$03
- db $03,$03
- db $FF
+ dbmapcoord 3, 2
+ dbmapcoord 3, 3
+ db -1 ; end
MovementData_51c7d:
db NPC_MOVEMENT_UP
db NPC_MOVEMENT_UP
db NPC_MOVEMENT_UP
db NPC_MOVEMENT_UP
- db $FF
+ db -1 ; end
SilphCo7Script3:
ld a, [wd730]
@@ -238,7 +238,7 @@ SilphCo7Script4:
MovementData_51d1a:
db NPC_MOVEMENT_RIGHT
db NPC_MOVEMENT_RIGHT
- db $FF
+ db -1 ; end
MovementData_51d1d:
db NPC_MOVEMENT_LEFT
@@ -248,7 +248,7 @@ MovementData_51d1d:
db NPC_MOVEMENT_RIGHT
db NPC_MOVEMENT_RIGHT
db NPC_MOVEMENT_DOWN
- db $FF
+ db -1 ; end
SilphCo7Script5:
ld a, [wd730]
diff --git a/scripts/SilphCo8F.asm b/scripts/SilphCo8F.asm
index 6b77ce46..c4e022d4 100755
--- a/scripts/SilphCo8F.asm
+++ b/scripts/SilphCo8F.asm
@@ -24,8 +24,8 @@ SilphCo8Script_5651a:
predef_jump ReplaceTileBlock
SilphCo8GateCoords:
- db $04,$03
- db $FF
+ dbmapcoord 3, 4
+ db -1 ; end
SilphCo8Script_56541:
push hl
diff --git a/scripts/SilphCo9F.asm b/scripts/SilphCo9F.asm
index 0fbfc239..1efb3d78 100755
--- a/scripts/SilphCo9F.asm
+++ b/scripts/SilphCo9F.asm
@@ -51,11 +51,11 @@ SilphCo9Script_5d7d1:
predef_jump ReplaceTileBlock
SilphCo9GateCoords:
- db $04,$01
- db $02,$09
- db $05,$09
- db $06,$05
- db $FF
+ dbmapcoord 1, 4
+ dbmapcoord 9, 2
+ dbmapcoord 9, 5
+ dbmapcoord 5, 6
+ db -1 ; end
SilphCo9Script_5d837:
push hl
diff --git a/scripts/SilphCoElevator.asm b/scripts/SilphCoElevator.asm
index e660cd0f..c898cbd1 100755
--- a/scripts/SilphCoElevator.asm
+++ b/scripts/SilphCoElevator.asm
@@ -41,7 +41,7 @@ SilphCoElevatorScript_457f1:
ret
SilphCoElevatorFloors:
- db $0B ; num elements in list
+ db 11 ; #
db FLOOR_1F
db FLOOR_2F
db FLOOR_3F
@@ -53,23 +53,22 @@ SilphCoElevatorFloors:
db FLOOR_9F
db FLOOR_10F
db FLOOR_11F
- db $FF ; terminator
+ db -1 ; end
-SilphCoElevatorWarpMaps:
-; first byte is warp number
-; second byte is map number
; These specify where the player goes after getting out of the elevator.
- db $03, SILPH_CO_1F
- db $02, SILPH_CO_2F
- db $02, SILPH_CO_3F
- db $02, SILPH_CO_4F
- db $02, SILPH_CO_5F
- db $02, SILPH_CO_6F
- db $02, SILPH_CO_7F
- db $02, SILPH_CO_8F
- db $02, SILPH_CO_9F
- db $02, SILPH_CO_10F
- db $01, SILPH_CO_11F
+SilphCoElevatorWarpMaps:
+ ; warp number, map id
+ db 3, SILPH_CO_1F
+ db 2, SILPH_CO_2F
+ db 2, SILPH_CO_3F
+ db 2, SILPH_CO_4F
+ db 2, SILPH_CO_5F
+ db 2, SILPH_CO_6F
+ db 2, SILPH_CO_7F
+ db 2, SILPH_CO_8F
+ db 2, SILPH_CO_9F
+ db 2, SILPH_CO_10F
+ db 1, SILPH_CO_11F
SilphCoElevatorWarpMapsEnd:
SilphCoElevatorScript_45827:
diff --git a/scripts/TradeCenter.asm b/scripts/TradeCenter.asm
index b91996e0..dbed79c1 100755
--- a/scripts/TradeCenter.asm
+++ b/scripts/TradeCenter.asm
@@ -15,16 +15,16 @@ TradeCenter_Script:
set 0, [hl]
ret nz
ld hl, wSprite01StateData2MapY
- ld a, $8
+ ld a, 8 ; y
ld [hli], a
- ld a, $a
+ ld a, 10 ; x
ld [hl], a
ld a, SPRITE_FACING_LEFT
ld [wSprite01StateData1FacingDirection], a
ldh a, [hSerialConnectionStatus]
cp USING_INTERNAL_CLOCK
ret z
- ld a, $7
+ ld a, 7 ; x
ld [wSprite01StateData2MapX], a
ld a, SPRITE_FACING_RIGHT
ld [wSprite01StateData1FacingDirection], a
diff --git a/scripts/UndergroundPathNorthSouth.asm b/scripts/UndergroundPathNorthSouth.asm
index eb8fe4fd..00a7ef90 100755
--- a/scripts/UndergroundPathNorthSouth.asm
+++ b/scripts/UndergroundPathNorthSouth.asm
@@ -2,4 +2,5 @@ UndergroundPathNorthSouth_Script:
jp EnableAutoTextBoxDrawing
UndergroundPathNorthSouth_TextPointers:
- text_end
+
+ text_end ; unused
diff --git a/scripts/UndergroundPathRoute5.asm b/scripts/UndergroundPathRoute5.asm
index 1cb1f78a..5c078050 100755
--- a/scripts/UndergroundPathRoute5.asm
+++ b/scripts/UndergroundPathRoute5.asm
@@ -11,7 +11,7 @@ UndergroundPathRoute5_TextPointers:
UndergroundPathEntranceRoute5Text1:
text_asm
- ld a, $9
+ ld a, TRADE_FOR_SPOT
ld [wWhichTrade], a
predef DoInGameTradeDialogue
ld hl, UndergroundPathEntranceRoute5_TextScriptEndingText
diff --git a/scripts/UndergroundPathWestEast.asm b/scripts/UndergroundPathWestEast.asm
index e21c3268..98571e17 100755
--- a/scripts/UndergroundPathWestEast.asm
+++ b/scripts/UndergroundPathWestEast.asm
@@ -2,4 +2,5 @@ UndergroundPathWestEast_Script:
jp EnableAutoTextBoxDrawing
UndergroundPathWestEast_TextPointers:
- text_end
+
+ text_end ; unused
diff --git a/scripts/VermilionCity.asm b/scripts/VermilionCity.asm
index 9178cd65..629bb0c8 100755
--- a/scripts/VermilionCity.asm
+++ b/scripts/VermilionCity.asm
@@ -68,8 +68,8 @@ VermilionCityScript0:
ret
SSAnneTicketCheckCoords:
- db $1e,$12 ; y, x
- db $ff
+ dbmapcoord 18, 30
+ db -1 ; end
VermilionCityScript4:
ld hl, SSAnneTicketCheckCoords
@@ -191,9 +191,9 @@ VermilionCityText3:
jp TextScriptEnd
.inFrontOfOrBehindGuardCoords
- db $1d,$13 ; y, x of tile in front of guard
- db $1f,$13 ; y, x of tile behind guard
- db $ff
+ dbmapcoord 19, 29 ; in front of guard
+ dbmapcoord 19, 31 ; behind guard
+ db -1 ; end
SSAnneWelcomeText4:
text_far _SSAnneWelcomeText4
diff --git a/scripts/VermilionDock.asm b/scripts/VermilionDock.asm
index 9dc4b2b9..728675eb 100755
--- a/scripts/VermilionDock.asm
+++ b/scripts/VermilionDock.asm
@@ -155,6 +155,7 @@ VermilionDock_EmitSmokePuff:
ret
VermilionDockOAMBlock:
+ ; tile id, attribute
db $fc, $10
db $fd, $10
db $fe, $10
diff --git a/scripts/VermilionOldRodHouse.asm b/scripts/VermilionOldRodHouse.asm
index 5305820d..524395d4 100755
--- a/scripts/VermilionOldRodHouse.asm
+++ b/scripts/VermilionOldRodHouse.asm
@@ -7,30 +7,30 @@ VermilionOldRodHouse_TextPointers:
VermilionHouse2Text1:
text_asm
ld a, [wd728]
- bit 3, a
- jr nz, .asm_03ef5
+ bit 3, a ; got old rod?
+ jr nz, .got_item
ld hl, VermilionHouse2Text_560b1
call PrintText
call YesNoChoice
ld a, [wCurrentMenuItem]
and a
- jr nz, .asm_eb1b7
+ jr nz, .refused
lb bc, OLD_ROD, 1
call GiveItem
- jr nc, .BagFull
+ jr nc, .bag_full
ld hl, wd728
- set 3, [hl]
+ set 3, [hl] ; got old rod
ld hl, VermilionHouse2Text_560b6
- jr .asm_5dd95
-.BagFull
+ jr .done
+.bag_full
ld hl, VermilionHouse2Text_560ca
- jr .asm_5dd95
-.asm_eb1b7
+ jr .done
+.refused
ld hl, VermilionHouse2Text_560c0
- jr .asm_5dd95
-.asm_03ef5
+ jr .done
+.got_item
ld hl, VermilionHouse2Text_560c5
-.asm_5dd95
+.done
call PrintText
jp TextScriptEnd
diff --git a/scripts/VermilionTradeHouse.asm b/scripts/VermilionTradeHouse.asm
index 368654d9..7fdb9f40 100755
--- a/scripts/VermilionTradeHouse.asm
+++ b/scripts/VermilionTradeHouse.asm
@@ -6,7 +6,7 @@ VermilionTradeHouse_TextPointers:
VermilionHouse3Text1:
text_asm
- ld a, $4
+ ld a, TRADE_FOR_DUX
ld [wWhichTrade], a
predef DoInGameTradeDialogue
jp TextScriptEnd
diff --git a/scripts/VictoryRoad1F.asm b/scripts/VictoryRoad1F.asm
index 784329f0..b70f0dd4 100755
--- a/scripts/VictoryRoad1F.asm
+++ b/scripts/VictoryRoad1F.asm
@@ -35,7 +35,8 @@ VictoryRoad1Script0:
ret
CoordsData_5da5c:
- db $0D,$11,$FF
+ dbmapcoord 17, 13
+ db -1 ; end
VictoryRoad1F_TextPointers:
dw VictoryRoad1Text1
diff --git a/scripts/VictoryRoad2F.asm b/scripts/VictoryRoad2F.asm
index 82cd1c18..9622206c 100755
--- a/scripts/VictoryRoad2F.asm
+++ b/scripts/VictoryRoad2F.asm
@@ -64,9 +64,9 @@ VictoryRoad2Script0:
ret
CoordsData_51816:
- db $10,$01
- db $10,$09
- db $FF
+ dbmapcoord 1, 16
+ dbmapcoord 9, 16
+ db -1 ; end
VictoryRoad2F_TextPointers:
dw VictoryRoad2Text1
diff --git a/scripts/VictoryRoad3F.asm b/scripts/VictoryRoad3F.asm
index 4715941d..7febdd3d 100755
--- a/scripts/VictoryRoad3F.asm
+++ b/scripts/VictoryRoad3F.asm
@@ -51,9 +51,9 @@ VictoryRoad3Script0:
predef_jump ShowObject
.coordsData_449f9:
- db $05,$03
- db $0F,$17
- db $FF
+ dbmapcoord 3, 5
+ dbmapcoord 23, 15
+ db -1 ; end
.asm_449fe
ld a, VICTORY_ROAD_2F
diff --git a/scripts/ViridianCity.asm b/scripts/ViridianCity.asm
index 62d98c4c..543ffa97 100755
--- a/scripts/ViridianCity.asm
+++ b/scripts/ViridianCity.asm
@@ -18,11 +18,11 @@ ViridianCityScript_1900b:
CheckEvent EVENT_VIRIDIAN_GYM_OPEN
ret nz
ld a, [wObtainedBadges]
- cp %01111111
- jr nz, .gymClosed
+ cp $ff ^ (1 << BIT_EARTHBADGE)
+ jr nz, .gym_closed
SetEvent EVENT_VIRIDIAN_GYM_OPEN
ret
-.gymClosed
+.gym_closed
ld a, [wYCoord]
cp $8
ret nz
@@ -148,13 +148,13 @@ ViridianCityText1:
ViridianCityText2:
text_asm
ld a, [wObtainedBadges]
- cp %01111111
+ cp $ff ^ (1 << BIT_EARTHBADGE)
ld hl, ViridianCityText_19127
- jr z, .printAndDone
+ jr z, .done
CheckEvent EVENT_BEAT_VIRIDIAN_GYM_GIOVANNI
- jr nz, .printAndDone
+ jr nz, .done
ld hl, ViridianCityText_19122
-.printAndDone
+.done
call PrintText
jp TextScriptEnd
@@ -232,21 +232,21 @@ ViridianCityText_19191:
ViridianCityText6:
text_asm
CheckEvent EVENT_GOT_TM42
- jr nz, .gotTm42
+ jr nz, .got_item
ld hl, ViridianCityText_191ca
call PrintText
lb bc, TM_DREAM_EATER, 1
call GiveItem
- jr nc, .BagFull
+ jr nc, .bag_full
ld hl, ReceivedTM42Text
call PrintText
SetEvent EVENT_GOT_TM42
jr .done
-.BagFull
+.bag_full
ld hl, TM42NoRoomText
call PrintText
jr .done
-.gotTm42
+.got_item
ld hl, TM42Explanation
call PrintText
.done
@@ -278,13 +278,13 @@ ViridianCityText7:
call YesNoChoice
ld a, [wCurrentMenuItem]
and a
- jr z, .hurry
+ jr z, .refused
ld hl, ViridianCityText_1920f
call PrintText
ld a, $1
ld [wViridianCityCurScript], a
jr .done
-.hurry
+.refused
ld hl, ViridianCityText_19214
call PrintText
.done
diff --git a/scripts/ViridianGym.asm b/scripts/ViridianGym.asm
index f169f1f5..4a5dd6b7 100755
--- a/scripts/ViridianGym.asm
+++ b/scripts/ViridianGym.asm
@@ -49,72 +49,68 @@ ViridianGymScript0:
ld [wCurMapScript], a
ret
-;format:
-;db y,x
-;dw pointer to movement
ViridianGymArrowTilePlayerMovement:
- db $b,$13
- dw ViridianGymArrowMovement1
- db $1,$13
- dw ViridianGymArrowMovement2
- db $2,$12
- dw ViridianGymArrowMovement3
- db $2,$b
- dw ViridianGymArrowMovement4
- db $a,$10
- dw ViridianGymArrowMovement5
- db $6,$4
- dw ViridianGymArrowMovement6
- db $d,$5
- dw ViridianGymArrowMovement7
- db $e,$4
- dw ViridianGymArrowMovement8
- db $f,$0
- dw ViridianGymArrowMovement9
- db $f,$1
- dw ViridianGymArrowMovement10
- db $10,$d
- dw ViridianGymArrowMovement11
- db $11,$d
- dw ViridianGymArrowMovement12
- db $FF
-
-;format: direction, count
+ map_coord_movement 19, 11, ViridianGymArrowMovement1
+ map_coord_movement 19, 1, ViridianGymArrowMovement2
+ map_coord_movement 18, 2, ViridianGymArrowMovement3
+ map_coord_movement 11, 2, ViridianGymArrowMovement4
+ map_coord_movement 16, 10, ViridianGymArrowMovement5
+ map_coord_movement 4, 6, ViridianGymArrowMovement6
+ map_coord_movement 5, 13, ViridianGymArrowMovement7
+ map_coord_movement 4, 14, ViridianGymArrowMovement8
+ map_coord_movement 0, 15, ViridianGymArrowMovement9
+ map_coord_movement 1, 15, ViridianGymArrowMovement10
+ map_coord_movement 13, 16, ViridianGymArrowMovement11
+ map_coord_movement 13, 17, ViridianGymArrowMovement12
+ db -1 ; end
+
ViridianGymArrowMovement1:
- db D_UP,$09,$FF
+ db D_UP, 9
+ db -1 ; end
ViridianGymArrowMovement2:
- db D_LEFT,$08,$FF
+ db D_LEFT, 8
+ db -1 ; end
ViridianGymArrowMovement3:
- db D_DOWN,$09,$FF
+ db D_DOWN, 9
+ db -1 ; end
ViridianGymArrowMovement4:
- db D_RIGHT,$06,$FF
+ db D_RIGHT, 6
+ db -1 ; end
ViridianGymArrowMovement5:
- db D_DOWN,$02,$FF
+ db D_DOWN, 2
+ db -1 ; end
ViridianGymArrowMovement6:
- db D_DOWN,$07,$FF
+ db D_DOWN, 7
+ db -1 ; end
ViridianGymArrowMovement7:
- db D_RIGHT,$08,$FF
+ db D_RIGHT, 8
+ db -1 ; end
ViridianGymArrowMovement8:
- db D_RIGHT,$09,$FF
+ db D_RIGHT, 9
+ db -1 ; end
ViridianGymArrowMovement9:
- db D_UP,$08,$FF
+ db D_UP, 8
+ db -1 ; end
ViridianGymArrowMovement10:
- db D_UP,$06,$FF
+ db D_UP, 6
+ db -1 ; end
ViridianGymArrowMovement11:
- db D_LEFT,$06,$FF
+ db D_LEFT, 6
+ db -1 ; end
ViridianGymArrowMovement12:
- db D_LEFT,$0C,$FF
+ db D_LEFT, 12
+ db -1 ; end
ViridianGymScript4:
ld a, [wSimulatedJoypadStatesIndex]
diff --git a/scripts/ViridianMart.asm b/scripts/ViridianMart.asm
index ea1c373f..f71cc6ef 100755
--- a/scripts/ViridianMart.asm
+++ b/scripts/ViridianMart.asm
@@ -7,12 +7,12 @@ ViridianMart_Script:
ViridianMartScript_1d47d:
CheckEvent EVENT_OAK_GOT_PARCEL
- jr nz, .asm_1d489
+ jr nz, .delivered_parcel
ld hl, ViridianMart_TextPointers
- jr .asm_1d48c
-.asm_1d489
+ jr .done
+.delivered_parcel
ld hl, ViridianMart_TextPointers2
-.asm_1d48c
+.done
ld a, l
ld [wMapTextPtr], a
ld a, h
@@ -40,9 +40,9 @@ ViridianMartScript0:
ret
RLEMovement1d4bb:
- db D_LEFT, $01
- db D_UP, $02
- db $ff
+ db D_LEFT, 1
+ db D_UP, 2
+ db -1 ; end
ViridianMartScript1:
ld a, [wSimulatedJoypadStatesIndex]
@@ -67,6 +67,7 @@ ViridianMart_TextPointers:
dw ViridianMartText3
dw ViridianMartText4
dw ViridianMartText5
+
ViridianMart_TextPointers2:
dw ViridianCashierText
dw ViridianMartText2
diff --git a/scripts/WardensHouse.asm b/scripts/WardensHouse.asm
index 6705a450..2dd0410c 100755
--- a/scripts/WardensHouse.asm
+++ b/scripts/WardensHouse.asm
@@ -11,48 +11,48 @@ WardensHouse_TextPointers:
FuchsiaHouse2Text1:
text_asm
CheckEvent EVENT_GOT_HM04
- jr nz, .subtract
+ jr nz, .got_item
ld b, GOLD_TEETH
call IsItemInBag
- jr nz, .asm_3f30f
+ jr nz, .have_gold_teeth
CheckEvent EVENT_GAVE_GOLD_TEETH
- jr nz, .asm_60cba
+ jr nz, .gave_gold_teeth
ld hl, WardenGibberishText1
call PrintText
call YesNoChoice
ld a, [wCurrentMenuItem]
and a
ld hl, WardenGibberishText3
- jr nz, .asm_61238
+ jr nz, .refused
ld hl, WardenGibberishText2
-.asm_61238
+.refused
call PrintText
- jr .asm_52039
-.asm_3f30f
+ jr .done
+.have_gold_teeth
ld hl, WardenTeethText1
call PrintText
ld a, GOLD_TEETH
ldh [hItemToRemoveID], a
farcall RemoveItemByID
SetEvent EVENT_GAVE_GOLD_TEETH
-.asm_60cba
+.gave_gold_teeth
ld hl, WardenThankYouText
call PrintText
lb bc, HM_STRENGTH, 1
call GiveItem
- jr nc, .BagFull
+ jr nc, .bag_full
ld hl, ReceivedHM04Text
call PrintText
SetEvent EVENT_GOT_HM04
- jr .asm_52039
-.subtract
+ jr .done
+.got_item
ld hl, HM04ExplanationText
call PrintText
- jr .asm_52039
-.BagFull
+ jr .done
+.bag_full
ld hl, HM04NoRoomText
call PrintText
-.asm_52039
+.done
jp TextScriptEnd
WardenGibberishText1: