pokehacks/pokecrystal-board
0
0
Fork 0
mirror of https://gitlab.com/xCrystal/pokecrystal-board.git synced 2025-09-08 08:13:02 -07:00
Code Issues Packages Projects Releases Wiki Activity

writebackup --> closewindow; game corner prize vendors; others

Browse Source
This commit is contained in:
PikalaxALT
2015-12-24 22:58:42 -05:00
parent 1df28a6beb
commit a5e928eb98
44 changed files with 2604 additions and 2600 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
maps/CeladonDeptStore6F.asm
View File

@@ -30,7 +30,7 @@ CeladonVendingMachine:
special PlaceMoneyTopRight
loadmenudata .MenuData
verticalmenu
writebackup
closewindow
if_equal $1, .FreshWater
if_equal $2, .SodaPop
if_equal $3, .Lemonade

86
maps/CeladonGameCornerPrizeRoom.asm
View File

@@ -9,25 +9,25 @@ CeladonGameCornerPrizeRoom_MapScriptHeader:
.MapCallbacks:
db 0
GentlemanScript_0x726e9:
jumptextfaceplayer UnknownText_0x728b8
CeladonGameCornerPrizeRoomGentlemanScript:
jumptextfaceplayer CeladonGameCornerPrizeRoomGentlemanText
PharmacistScript_0x726ec:
jumptextfaceplayer UnknownText_0x728e9
CeladonGameCornerPrizeRoomPharmacistScript:
jumptextfaceplayer CeladonGameCornerPrizeRoomPharmacistText
MapCeladonGameCornerPrizeRoomSignpost0Script:
GoldenrodGameCornerTMVendor:
faceplayer
opentext
writetext UnknownText_0x7293e
writetext CeladonPrizeRoom_PrizeVendorIntroText
waitbutton
checkitem COIN_CASE
iffalse CeladonPrizeRoom_NoCoinCase
writetext UnknownText_0x72974
writetext CeladonPrizeRoom_AskWhichPrizeText
CeladonPrizeRoom_tmcounterloop:
special Special_DisplayCoinCaseBalance
loadmenudata MenuDataHeader_0x72790
loadmenudata CeladonPrizeRoom_TMMenuDataHeader
verticalmenu
writebackup
closewindow
if_equal $1, .doubleteam
if_equal $2, .psychic
if_equal $3, .hyperbeam
@@ -67,50 +67,50 @@ CeladonPrizeRoom_tmcounterloop:
jump CeladonPrizeRoom_purchased
CeladonPrizeRoom_askbuy:
writetext UnknownText_0x72991
writetext CeladonPrizeRoom_ConfirmPurchaseText
yesorno
end
CeladonPrizeRoom_purchased:
waitsfx
playsound SFX_TRANSACTION
writetext UnknownText_0x729ad
writetext CeladonPrizeRoom_HereYouGoText
waitbutton
jump CeladonPrizeRoom_tmcounterloop
CeladonPrizeRoom_notenoughcoins:
writetext UnknownText_0x729bb
writetext CeladonPrizeRoom_NotEnoughCoinsText
waitbutton
closetext
end
CeladonPrizeRoom_notenoughroom:
writetext UnknownText_0x729d8
writetext CeladonPrizeRoom_NotEnoughRoomText
waitbutton
closetext
end
CeladonPrizeRoom_cancel:
writetext UnknownText_0x729f2
writetext CeladonPrizeRoom_ComeAgainText
waitbutton
closetext
end
CeladonPrizeRoom_NoCoinCase:
writetext UnknownText_0x72a14
writetext CeladonPrizeRoom_NoCoinCaseText
waitbutton
closetext
end
MenuDataHeader_0x72790:
CeladonPrizeRoom_TMMenuDataHeader:
db $40 ; flags
db 02, 00 ; start coords
db 11, 15 ; end coords
dw MenuData2_0x72798
dw .MenuData2
db 1 ; default option
MenuData2_0x72798:
.MenuData2:
db $80 ; flags
db 4 ; items
db "TM32 1500@"
@@ -119,19 +119,19 @@ MenuData2_0x72798:
db "CANCEL@"
MapCeladonGameCornerPrizeRoomSignpost1Script:
GoldenrodGameCornerPokemonVendor:
faceplayer
opentext
writetext UnknownText_0x7293e
writetext CeladonPrizeRoom_PrizeVendorIntroText
waitbutton
checkitem COIN_CASE
iffalse CeladonPrizeRoom_NoCoinCase
.loop:
writetext UnknownText_0x72974
writetext CeladonPrizeRoom_AskWhichPrizeText
special Special_DisplayCoinCaseBalance
loadmenudata MenuDataHeader_0x72877
loadmenudata .MenuDataHeader
verticalmenu
writebackup
closewindow
if_equal $1, .pikachu
if_equal $2, .porygon
if_equal $3, .larvitar
@@ -147,7 +147,7 @@ MapCeladonGameCornerPrizeRoomSignpost1Script:
iffalse CeladonPrizeRoom_cancel
waitsfx
playsound SFX_TRANSACTION
writetext UnknownText_0x729ad
writetext CeladonPrizeRoom_HereYouGoText
waitbutton
writebyte PIKACHU
special Special_GameCornerPrizeMonCheckDex
@@ -165,7 +165,7 @@ MapCeladonGameCornerPrizeRoomSignpost1Script:
iffalse CeladonPrizeRoom_cancel
waitsfx
playsound SFX_TRANSACTION
writetext UnknownText_0x729ad
writetext CeladonPrizeRoom_HereYouGoText
waitbutton
writebyte PORYGON
special Special_GameCornerPrizeMonCheckDex
@@ -183,7 +183,7 @@ MapCeladonGameCornerPrizeRoomSignpost1Script:
iffalse CeladonPrizeRoom_cancel
waitsfx
playsound SFX_TRANSACTION
writetext UnknownText_0x729ad
writetext CeladonPrizeRoom_HereYouGoText
waitbutton
writebyte LARVITAR
special Special_GameCornerPrizeMonCheckDex
@@ -192,14 +192,14 @@ MapCeladonGameCornerPrizeRoomSignpost1Script:
jump .loop
MenuDataHeader_0x72877:
.MenuDataHeader:
db $40 ; flags
db 02, 00 ; start coords
db 11, 17 ; end coords
dw MenuData2_0x7287f
dw .MenuData2
db 1 ; default option
MenuData2_0x7287f:
.MenuData2:
db $80 ; flags
db 4 ; items
db "PIKACHU 2222@"
@@ -208,13 +208,13 @@ MenuData2_0x7287f:
db "CANCEL@"
UnknownText_0x728b8:
CeladonGameCornerPrizeRoomGentlemanText:
text "I wanted PORYGON,"
line "but I was short by"
cont "100 coins…"
done
UnknownText_0x728e9:
CeladonGameCornerPrizeRoomPharmacistText:
text "Whew…"
para "I've got to stay"
@@ -225,7 +225,7 @@ UnknownText_0x728e9:
cont "all my money…"
done
UnknownText_0x7293e:
CeladonPrizeRoom_PrizeVendorIntroText:
text "Welcome!"
para "We exchange your"
@@ -233,38 +233,38 @@ UnknownText_0x7293e:
cont "prizes!"
done
UnknownText_0x72974:
CeladonPrizeRoom_AskWhichPrizeText:
text "Which prize would"
line "you like?"
done
UnknownText_0x72991:
CeladonPrizeRoom_ConfirmPurchaseText:
text "OK, so you wanted"
line "a @"
text_from_ram StringBuffer3
text "?"
done
UnknownText_0x729ad:
CeladonPrizeRoom_HereYouGoText:
text "Here you go!"
done
UnknownText_0x729bb:
CeladonPrizeRoom_NotEnoughCoinsText:
text "You don't have"
line "enough coins."
done
UnknownText_0x729d8:
CeladonPrizeRoom_NotEnoughRoomText:
text "You have no room"
line "for it."
done
UnknownText_0x729f2:
CeladonPrizeRoom_ComeAgainText:
text "Oh. Please come"
line "back with coins!"
done
UnknownText_0x72a14:
CeladonPrizeRoom_NoCoinCaseText:
text "Oh? You don't have"
line "a COIN CASE."
done
@@ -283,10 +283,10 @@ CeladonGameCornerPrizeRoom_MapEventHeader:
.Signposts:
db 2
signpost 1, 2, SIGNPOST_READ, MapCeladonGameCornerPrizeRoomSignpost0Script
signpost 1, 4, SIGNPOST_READ, MapCeladonGameCornerPrizeRoomSignpost1Script
signpost 1, 2, SIGNPOST_READ, GoldenrodGameCornerTMVendor
signpost 1, 4, SIGNPOST_READ, GoldenrodGameCornerPokemonVendor
.PersonEvents:
db 2
person_event SPRITE_GENTLEMAN, 2, 0, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, (1 << 3) | PAL_OW_RED, PERSONTYPE_SCRIPT, 0, GentlemanScript_0x726e9, -1
person_event SPRITE_PHARMACIST, 4, 4, SPRITEMOVEDATA_WALK_UP_DOWN, 1, 0, -1, -1, (1 << 3) | PAL_OW_GREEN, PERSONTYPE_SCRIPT, 0, PharmacistScript_0x726ec, -1
person_event SPRITE_GENTLEMAN, 2, 0, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, (1 << 3) | PAL_OW_RED, PERSONTYPE_SCRIPT, 0, CeladonGameCornerPrizeRoomGentlemanScript, -1
person_event SPRITE_PHARMACIST, 4, 4, SPRITEMOVEDATA_WALK_UP_DOWN, 1, 0, -1, -1, (1 << 3) | PAL_OW_GREEN, PERSONTYPE_SCRIPT, 0, CeladonGameCornerPrizeRoomPharmacistScript, -1

10
maps/DragonShrine.asm
View File

@@ -34,7 +34,7 @@ DragonShrineTestScript:
buttonsound
loadmenudata MenuDataHeader_0x18d215
verticalmenu
writebackup
closewindow
if_equal $1, .RightAnswer
if_equal $2, .WrongAnswer
if_equal $3, .RightAnswer
@@ -46,7 +46,7 @@ DragonShrineTestScript:
buttonsound
loadmenudata MenuDataHeader_0x18d234
verticalmenu
writebackup
closewindow
if_equal $1, .RightAnswer
if_equal $2, .RightAnswer
if_equal $3, .WrongAnswer
@@ -56,7 +56,7 @@ DragonShrineTestScript:
buttonsound
loadmenudata MenuDataHeader_0x18d258
verticalmenu
writebackup
closewindow
if_equal $1, .WrongAnswer
if_equal $2, .RightAnswer
if_equal $3, .RightAnswer
@@ -66,7 +66,7 @@ DragonShrineTestScript:
buttonsound
loadmenudata MenuDataHeader_0x18d283
verticalmenu
writebackup
closewindow
if_equal $1, .RightAnswer
if_equal $2, .WrongAnswer
if_equal $3, .RightAnswer
@@ -76,7 +76,7 @@ DragonShrineTestScript:
buttonsound
loadmenudata MenuDataHeader_0x18d2a5
verticalmenu
writebackup
closewindow
if_equal $1, .WrongAnswer
if_equal $2, .RightAnswer
if_equal $3, .WrongAnswer

2
maps/EarlsPokemonAcademy.asm
View File

@@ -68,7 +68,7 @@ AcademyBlackboard:
.Loop
loadmenudata .MenuHeader
_2dmenu
writebackup
closewindow
if_equal $1, .Poison
if_equal $2, .Paralysis
if_equal $3, .Sleep

2
maps/GoldenrodCity.asm
View File

@@ -69,7 +69,7 @@ MoveTutor:
writetext UnknownText_0x1990ce
loadmenudata .MoveMenuDataHeader
verticalmenu
writebackup
closewindow
if_equal $1, .Flamethrower
if_equal $2, .Thunderbolt
if_equal $3, .IceBeam

2
maps/GoldenrodDeptStore6F.asm
View File

@@ -16,7 +16,7 @@ GoldenrodVendingMachine:
special PlaceMoneyTopRight
loadmenudata .MenuData
verticalmenu
writebackup
closewindow
if_equal $1, .FreshWater
if_equal $2, .SodaPop
if_equal $3, .Lemonade

348
maps/GoldenrodGameCorner.asm
View File

File diff suppressed because it is too large Load Diff

4
maps/GoldenrodPokeComCenter2FMobile.asm
View File

@@ -27,7 +27,7 @@ UnknownScript_0x625df:
reloadmappart
loadmenudata MenuDataHeader_0x62602
verticalmenu
writebackup
closewindow
if_equal $1, UnknownScript_0x625f0
if_equal $2, UnknownScript_0x625f8
jump UnknownScript_0x62600
@@ -72,7 +72,7 @@ UnknownScript_0x62629:
reloadmappart
loadmenudata MenuDataHeader_0x6264c
verticalmenu
writebackup
closewindow
if_equal $1, UnknownScript_0x6263a
if_equal $2, UnknownScript_0x62642
jump UnknownScript_0x6264a