summaryrefslogtreecommitdiff
path: root/data/scripts/berry_tree.inc
diff options
context:
space:
mode:
Diffstat (limited to 'data/scripts/berry_tree.inc')
-rw-r--r--data/scripts/berry_tree.inc48
1 files changed, 25 insertions, 23 deletions
diff --git a/data/scripts/berry_tree.inc b/data/scripts/berry_tree.inc
index 2dc016a52..18378077c 100644
--- a/data/scripts/berry_tree.inc
+++ b/data/scripts/berry_tree.inc
@@ -1,16 +1,16 @@
BerryTreeScript:: @ 82742F9
special EventObjectInteractionGetBerryTreeData
switch VAR_0x8004
- case 255, BerryTree_EventScript_27434F
- case 0, BerryTree_EventScript_CheckSoil
- case 1, BerryTree_EventScript_CheckBerryStage1
- case 2, BerryTree_EventScript_CheckBerryStage2
- case 3, BerryTree_EventScript_CheckBerryStage3
- case 4, BerryTree_EventScript_CheckBerryStage4
- case 5, BerryTree_EventScript_CheckBerryFullyGrown
+ case BERRY_STAGE_SPARKLING, BerryTree_EventScript_Sparkling
+ case BERRY_STAGE_NO_BERRY, BerryTree_EventScript_CheckSoil
+ case BERRY_STAGE_PLANTED, BerryTree_EventScript_CheckBerryStage1
+ case BERRY_STAGE_SPROUTED, BerryTree_EventScript_CheckBerryStage2
+ case BERRY_STAGE_TALLER, BerryTree_EventScript_CheckBerryStage3
+ case BERRY_STAGE_FLOWERING, BerryTree_EventScript_CheckBerryStage4
+ case BERRY_STAGE_BERRIES, BerryTree_EventScript_CheckBerryFullyGrown
end
-BerryTree_EventScript_27434F:: @ 827434F
+BerryTree_EventScript_Sparkling:: @ 827434F
lockall
message BerryTree_Text_ExclamationPoint
waitmessage
@@ -22,7 +22,7 @@ BerryTree_EventScript_CheckSoil:: @ 8274359
lock
faceplayer
specialvar VAR_RESULT, PlayerHasBerries
- compare VAR_RESULT, 1
+ compare VAR_RESULT, TRUE
goto_if_eq BerryTree_EventScript_WantToPlant
message BerryTree_Text_ItsSoftLoamySoil
waitmessage
@@ -32,20 +32,20 @@ BerryTree_EventScript_CheckSoil:: @ 8274359
BerryTree_EventScript_WantToPlant:: @ 8274374
msgbox BerryTree_Text_WantToPlant, MSGBOX_YESNO
- compare VAR_RESULT, 1
+ compare VAR_RESULT, YES
goto_if_eq BerryTree_EventScript_ChooseBerryToPlant
- compare VAR_RESULT, 0
+ compare VAR_RESULT, NO
goto_if_eq BerryTree_EventScript_CancelPlanting
end
BerryTree_EventScript_ChooseBerryToPlant:: @ 8274393
- fadescreen 1
+ fadescreen FADE_TO_BLACK
closemessage
special Bag_ChooseBerry
waitstate
compare VAR_ITEM_ID, 0
goto_if_eq BerryTree_EventScript_CancelPlanting
- takeitem VAR_ITEM_ID, 1
+ removeitem VAR_ITEM_ID
call BerryTree_EventScript_PlantBerry
BerryTree_EventScript_CancelPlanting:: @ 82743AF
@@ -85,6 +85,8 @@ BerryTree_EventScript_CheckBerryStage4:: @ 82743E1
waitbuttonpress
goto BerryTree_EventScript_WantToWater
+@ VAR_0x8005 here is the number of times watered
+@ Buffered by EventObjectInteractionGetBerryTreeData
BerryTree_EventScript_GetCareAdverb:: @ 82743F6
compare VAR_0x8005, 0
goto_if_eq BerryTree_EventScript_SetAdverbPoor
@@ -101,22 +103,23 @@ BerryTree_EventScript_SetAdverbPoor:: @ 827441A
bufferstring 1, BerryTree_Text_CareAdverbPoor
return
+@ VAR_0x8006 here is the number of berries
BerryTree_EventScript_CheckBerryFullyGrown:: @ 8274421
buffernumberstring 1, VAR_0x8006
lock
faceplayer
special EventObjectInteractionGetBerryCountString
msgbox BerryTree_Text_WantToPick, MSGBOX_YESNO
- compare VAR_RESULT, 1
+ compare VAR_RESULT, YES
goto_if_eq BerryTree_EventScript_PickBerry
- compare VAR_RESULT, 0
+ compare VAR_RESULT, NO
goto_if_eq BerryTree_EventScript_CancelPickingBerry
BerryTree_EventScript_PickBerry:: @ 8274448
special EventObjectInteractionPickBerryTree
compare VAR_0x8004, 0
goto_if_eq BerryTree_EventScript_BerryPocketFull
- special sub_80EED34
+ special IncrementDailyPickedBerries
special EventObjectInteractionRemoveBerryTree
message BerryTree_Text_PickedTheBerry
playfanfare MUS_ME_KINOMI
@@ -143,7 +146,7 @@ BerryTree_EventScript_CancelPickingBerry:: @ 8274479
release
end
-BerryTree_EventScript_274482:: @ 8274482
+BerryTree_EventScript_ItemUsePlantBerry:: @ 8274482
lockall
special EventObjectInteractionGetBerryTreeData
call BerryTree_EventScript_PlantBerry
@@ -156,19 +159,18 @@ BerryTree_EventScript_WantToWater:: @ 827448D
goto_if_eq BerryTree_EventScript_DontWater
special EventObjectInteractionGetBerryName
msgbox BerryTree_Text_WantToWater, MSGBOX_YESNO
- compare VAR_RESULT, 1
+ compare VAR_RESULT, YES
goto_if_eq BerryTree_EventScript_WaterBerry
- compare VAR_RESULT, 0
+ compare VAR_RESULT, NO
goto_if_eq BerryTree_EventScript_DontWater
BerryTree_EventScript_DontWater:: @ 82744BE
releaseall
end
-BerryTree_EventScript_2744C0:: @ 82744C0
+BerryTree_EventScript_ItemUseWailmerPail:: @ 82744C0
special EventObjectInteractionGetBerryTreeData
lockall
-
BerryTree_EventScript_WaterBerry:: @ 82744C4
special EventObjectInteractionGetBerryName
message BerryTree_Text_WateredTheBerry
@@ -184,8 +186,8 @@ BerryTree_EventScript_WaterBerry:: @ 82744C4
BerryTree_EventScript_PlantBerry:: @ 82744DD
special EventObjectInteractionPlantBerryTree
- incrementgamestat 3
- special sub_80EED10
+ incrementgamestat GAME_STAT_PLANTED_BERRIES
+ special IncrementDailyPlantedBerries
special EventObjectInteractionGetBerryCountString
message BerryTree_Text_PlantedOneBerry
waitmessage