'---------------
#org 0x210E78
setvar 0x800B 0x1
call 0x827191E
waitmsg
waitkeypress
release
end

'---------------
#org 0x27191E
lock
faceplayer
setvar 0x8004 0x0
special2 LASTRESULT 0x1D9
compare LASTRESULT 0x4
if 0x1 goto 0x8271A68
msgbox 0x82726EB MSG_YESNO '"Hello, and welcome to\nthe POKéMON..."
compare LASTRESULT 0x1
if 0x1 goto 0x827195A
compare LASTRESULT 0x0
if 0x1 goto 0x8271954
end

'---------------
#org 0x271A68
checkflag 0x159
if 0x1 goto 0x8271AAC
setflag 0x159
msgbox 0x82727F5 MSG_KEEPOPEN '"Hello, and welcome to\nthe POKéMON..."
sound 0x15
applymovement 0x800B 0x8272598
waitmovement 0x0
applymovement 0x800B 0x827259A
waitmovement 0x0
msgbox 0x8272860 MSG_YESNO '"Th-that card[.]\nCould it be[.] Th..."
compare LASTRESULT 0x1
if 0x1 goto 0x8271AC5
preparemsg 0x8272A07 '"We hope to see you again!"
return

'---------------
#org 0x27195A
cmdc3 0xF
compare 0x8004 0x0
if 0x1 call 0x8271987
compare 0x8004 0x1
if 0x1 call 0x827198D
waitmsg
call 0x8271993
checkflag 0x111
if 0x0 goto 0x8271A43
goto 0x82719B1

'---------------
#org 0x271954
preparemsg 0x82727DB '"We hope to see you again!"
return

'---------------
#org 0x271AAC
msgbox 0x8272982 MSG_YESNO '"I'm delighted to see you, [player]..."
compare LASTRESULT 0x1
if 0x1 goto 0x8271AC5
preparemsg 0x8272A07 '"We hope to see you again!"
return

'---------------
#org 0x271AC5
setvar 0x8004 0x1
goto 0x827195A

'---------------
#org 0x271987
preparemsg 0x8272768 '"Okay, I'll take your POKéMON\nfor ..."
return

'---------------
#org 0x27198D
preparemsg 0x82729C0 '"Okay, I'll take your POKéMON\nfor ..."
return

'---------------
#org 0x271993
applymovement 0x800B 0x82725A4
waitmovement 0x0
doanimation 0x19
checkanimation 0x19
applymovement 0x800B 0x82725AA
waitmovement 0x0
special 0x0
return

'---------------
#org 0x271A43
special2 LASTRESULT 0x136
compare LASTRESULT 0x1
if 0x1 goto 0x8271A5F
compare LASTRESULT 0x0
if 0x1 goto 0x82719B1
end

'---------------
#org 0x2719B1
special2 LASTRESULT 0x203
compare LASTRESULT 0x0
if 0x1 goto 0x82719E2
special2 LASTRESULT 0x1A5
copyvar 0x8008 LASTRESULT
compare 0x8008 0x0
if 0x1 goto 0x82719E2
compare 0x8008 0x1
if 0x1 goto 0x8271A19
end

'---------------
#org 0x271A5F
preparemsg 0x8272F07 '"Your POKéMON may be infected with\..."
setflag 0x111
return

'---------------
#org 0x2719E2
compare 0x8004 0x1
if 0x1 goto 0x8271A03
preparemsg 0x8272798 '"Thank you for waiting.\pWe've rest..."
waitmsg
applymovement 0x800B 0x8271AD0
waitmovement 0x0
preparemsg 0x82727DB '"We hope to see you again!"
return

'---------------
#org 0x271A19
checkflag 0x880
if 0x1 goto 0x82719E2
msgbox 0x8272798 MSG_KEEPOPEN '"Thank you for waiting.\pWe've rest..."
setflag 0x880
preparemsg 0x8278A48 '"It appears as if [buffer1] is play..."
waitmsg
applymovement 0x800B 0x8271AD0
waitmovement 0x0
preparemsg 0x82727DB '"We hope to see you again!"
return

'---------------
#org 0x271A03
preparemsg 0x82729F0 '"Thank you for waiting."
waitmsg
applymovement 0x800B 0x8271AD0
waitmovement 0x0
preparemsg 0x8272A07 '"We hope to see you again!"
return


'---------
' Strings
'---------
#org 0x2726EB
= Hello, and welcome to\nthe POKéMON CENTER.\pWe restore your tired POKéMON\nto full health.\pWould you like to rest your POKéMON?

#org 0x2727F5
= Hello, and welcome to\nthe POKéMON CENTER.\pWe restore your tired POKéMON\nto full health.\pWould you like to[.]

#org 0x272860
= Th-that card[.]\nCould it be[.] The GOLD CARD?!\pOh, the gold color is brilliant!\nThe four stars seem to sparkle!\pI've seen several TRAINERS with\na SILVER CARD before, but, [player],\lyou're the first TRAINER I've ever\lseen with a GOLD CARD!\pOkay, [player], please allow me\nthe honor of resting your POKéMON!

#org 0x272A07
= We hope to see you again!

#org 0x2727DB
= We hope to see you again!

#org 0x272982
= I'm delighted to see you, [player]!\nYou want the usual, am I right?

#org 0x272768
= Okay, I'll take your POKéMON\nfor a few seconds.

#org 0x2729C0
= Okay, I'll take your POKéMON\nfor a few seconds.

#org 0x272F07
= Your POKéMON may be infected with\nPOKéRUS.\pLittle is known about the POKéRUS\nexcept that they are microscopic life-\lforms that attach to POKéMON.\pWhile infected, POKéMON are said to\ngrow exceptionally well.

#org 0x272798
= Thank you for waiting.\pWe've restored your POKéMON\nto full health.

#org 0x278A48
= It appears as if [buffer1] is playing\nright now.\lGo for it!

#org 0x2729F0
= Thank you for waiting.


'-----------
' Movements
'-----------
#org 0x272598
#raw 0x56 'Exclamation Mark (!)
#raw 0xFE 'End of Movements

#org 0x27259A
#raw 0x14 'Delay5
#raw 0x14 'Delay5
#raw 0x14 'Delay5
#raw 0xFE 'End of Movements

#org 0x2725A4
#raw 0x27 'Step on the Spot Left (Fastest)
#raw 0xFE 'End of Movements

#org 0x2725AA
#raw 0x25 'Step on the Spot Down (Fastest)
#raw 0xFE 'End of Movements

#org 0x271AD0
#raw 0x4F 'mov4F
#raw 0x12 'Delay3
#raw 0xFE 'End of Movements