mirror of https://github.com/pret/pokecrystal.git
239 lines
5.0 KiB
NASM
239 lines
5.0 KiB
NASM
const_def 2 ; object constants
|
|
const GOLDENRODDEPTSTORE5F_CLERK
|
|
const GOLDENRODDEPTSTORE5F_LASS
|
|
const GOLDENRODDEPTSTORE5F_MIKE
|
|
const GOLDENRODDEPTSTORE5F_POKEFAN_M
|
|
const GOLDENRODDEPTSTORE5F_CARRIE
|
|
const GOLDENRODDEPTSTORE5F_RECEPTIONIST
|
|
|
|
GoldenrodDeptStore5F_MapScripts:
|
|
db 0 ; scene scripts
|
|
|
|
db 1 ; callbacks
|
|
callback MAPCALLBACK_OBJECTS, .CheckIfSunday
|
|
|
|
.CheckIfSunday:
|
|
checkcode VAR_WEEKDAY
|
|
if_equal SUNDAY, .yes
|
|
disappear GOLDENRODDEPTSTORE5F_RECEPTIONIST
|
|
return
|
|
|
|
.yes
|
|
appear GOLDENRODDEPTSTORE5F_RECEPTIONIST
|
|
return
|
|
|
|
ClerkScript_0x5609c:
|
|
faceplayer
|
|
opentext
|
|
checkevent EVENT_GOT_TM02_HEADBUTT
|
|
iftrue .headbutt
|
|
checkevent EVENT_GOT_TM08_ROCK_SMASH
|
|
iftrue .onlyrocksmash
|
|
jump .neither
|
|
|
|
.headbutt
|
|
checkevent EVENT_GOT_TM08_ROCK_SMASH
|
|
iftrue .both
|
|
jump .onlyheadbutt
|
|
|
|
.neither
|
|
pokemart MARTTYPE_STANDARD, MART_GOLDENROD_5F_1
|
|
closetext
|
|
end
|
|
|
|
.onlyheadbutt
|
|
pokemart MARTTYPE_STANDARD, MART_GOLDENROD_5F_2
|
|
closetext
|
|
end
|
|
|
|
.onlyrocksmash
|
|
pokemart MARTTYPE_STANDARD, MART_GOLDENROD_5F_3
|
|
closetext
|
|
end
|
|
|
|
.both
|
|
pokemart MARTTYPE_STANDARD, MART_GOLDENROD_5F_4
|
|
closetext
|
|
end
|
|
|
|
ReceptionistScript_0x560ce:
|
|
faceplayer
|
|
opentext
|
|
checkcode VAR_WEEKDAY
|
|
if_not_equal SUNDAY, .EventIsOver
|
|
checkflag ENGINE_GOLDENROD_DEPT_STORE_TM27_RETURN
|
|
iftrue .EventIsOver
|
|
special GetFirstPokemonHappiness
|
|
writetext UnknownText_0x56143
|
|
buttonsound
|
|
if_greater_than 150 - 1, .VeryHappy
|
|
if_greater_than 50 - 1, .SomewhatHappy
|
|
jump .NotVeryHappy
|
|
|
|
.VeryHappy:
|
|
writetext UnknownText_0x5615a
|
|
buttonsound
|
|
verbosegiveitem TM_RETURN
|
|
iffalse .Done
|
|
setflag ENGINE_GOLDENROD_DEPT_STORE_TM27_RETURN
|
|
closetext
|
|
end
|
|
|
|
.SomewhatHappy:
|
|
writetext UnknownText_0x561a6
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
.NotVeryHappy:
|
|
writetext UnknownText_0x561d8
|
|
buttonsound
|
|
verbosegiveitem TM_FRUSTRATION
|
|
iffalse .Done
|
|
setflag ENGINE_GOLDENROD_DEPT_STORE_TM27_RETURN
|
|
closetext
|
|
end
|
|
|
|
.EventIsOver:
|
|
writetext UnknownText_0x56202
|
|
waitbutton
|
|
.Done:
|
|
closetext
|
|
end
|
|
|
|
Carrie:
|
|
faceplayer
|
|
opentext
|
|
special GameboyCheck
|
|
if_not_equal GBCHECK_CGB, .NotGBC ; This is a dummy check from Gold/Silver
|
|
writetext UnknownText_0x56241
|
|
waitbutton
|
|
closetext
|
|
special UnlockMysteryGift
|
|
end
|
|
|
|
.NotGBC:
|
|
writetext UnknownText_0x56279
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
GoldenrodDeptStore5FLassScript:
|
|
jumptextfaceplayer GoldenrodDeptStore5FLassText
|
|
|
|
Mike:
|
|
faceplayer
|
|
opentext
|
|
trade NPCTRADE_MIKE
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
GoldenrodDeptStore5FPokefanMScript:
|
|
jumptextfaceplayer GoldenrodDeptStore5FPokefanMText
|
|
|
|
GoldenrodDeptStore5FDirectory:
|
|
jumptext GoldenrodDeptStore5FDirectoryText
|
|
|
|
GoldenrodDeptStore5FElevatorButton:
|
|
jumpstd elevatorbutton
|
|
|
|
UnknownText_0x56143:
|
|
text "Hello. Oh, your"
|
|
line "#MON…"
|
|
done
|
|
|
|
UnknownText_0x5615a:
|
|
text "It's very attached"
|
|
line "to you."
|
|
|
|
para "This move should"
|
|
line "be perfect for a"
|
|
cont "pair like you."
|
|
done
|
|
|
|
UnknownText_0x561a6:
|
|
text "It's adorable!"
|
|
|
|
para "You should teach"
|
|
line "it good TM moves."
|
|
done
|
|
|
|
UnknownText_0x561d8:
|
|
text "It looks evil. How"
|
|
line "about this TM for"
|
|
cont "it?"
|
|
done
|
|
|
|
UnknownText_0x56202:
|
|
text "There are sure to"
|
|
line "be TMs that are"
|
|
|
|
para "just perfect for"
|
|
line "your #MON."
|
|
done
|
|
|
|
UnknownText_0x56241:
|
|
text "MYSTERY GIFT."
|
|
|
|
para "With just a"
|
|
line "little beep, you"
|
|
cont "get a gift."
|
|
done
|
|
|
|
UnknownText_0x56279:
|
|
text "The MYSTERY GIFT"
|
|
line "option requires a"
|
|
cont "Game Boy Color."
|
|
done
|
|
|
|
GoldenrodDeptStore5FLassText:
|
|
text "On Sundays, a lady"
|
|
line "comes to check out"
|
|
cont "#MON."
|
|
|
|
para "She even gives"
|
|
line "away TMs!"
|
|
done
|
|
|
|
GoldenrodDeptStore5FPokefanMText:
|
|
text "You can't rename a"
|
|
line "#MON you get in"
|
|
cont "a trade."
|
|
|
|
para "The name is a re-"
|
|
line "flection of the"
|
|
|
|
para "original trainer's"
|
|
line "feelings for it."
|
|
done
|
|
|
|
GoldenrodDeptStore5FDirectoryText:
|
|
text "Customize Your"
|
|
line "#MON"
|
|
|
|
para "5F TM CORNER"
|
|
done
|
|
|
|
GoldenrodDeptStore5F_MapEvents:
|
|
db 0, 0 ; filler
|
|
|
|
db 3 ; warp events
|
|
warp_event 12, 0, 1, GOLDENROD_DEPT_STORE_4F
|
|
warp_event 15, 0, 1, GOLDENROD_DEPT_STORE_6F
|
|
warp_event 2, 0, 1, GOLDENROD_DEPT_STORE_ELEVATOR
|
|
|
|
db 0 ; coord events
|
|
|
|
db 2 ; bg events
|
|
bg_event 14, 0, BGEVENT_READ, GoldenrodDeptStore5FDirectory
|
|
bg_event 3, 0, BGEVENT_READ, GoldenrodDeptStore5FElevatorButton
|
|
|
|
db 6 ; object events
|
|
object_event 8, 5, SPRITE_CLERK, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, ClerkScript_0x5609c, -1
|
|
object_event 3, 6, SPRITE_LASS, SPRITEMOVEDATA_WANDER, 1, 1, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, GoldenrodDeptStore5FLassScript, -1
|
|
object_event 6, 3, SPRITE_COOLTRAINER_M, SPRITEMOVEDATA_SPINRANDOM_SLOW, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Mike, -1
|
|
object_event 13, 5, SPRITE_POKEFAN_M, SPRITEMOVEDATA_WANDER, 2, 2, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, GoldenrodDeptStore5FPokefanMScript, -1
|
|
object_event 9, 1, SPRITE_TWIN, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_SCRIPT, 0, Carrie, -1
|
|
object_event 7, 5, SPRITE_RECEPTIONIST, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, ReceptionistScript_0x560ce, EVENT_GOLDENROD_DEPT_STORE_5F_HAPPINESS_EVENT_LADY
|