'---------------
#org 0x1F9DDB
lockall
bufferfirstpokemon 0x0
preparemsg 0x81FA74D '"PROF. BIRCH: So, [player]\v\h05.\p..."
waitmsg
fanfare 0x172
waitfanfare
msgbox 0x81FA8B1 MSG_YESNO '"PROF. BIRCH: While you're at it, w..."
compare LASTRESULT 0x1
if 0x1 goto 0x81F9E07
compare LASTRESULT 0x0
if 0x1 goto 0x81F9E17
end

'---------------
#org 0x1F9E07
setvar 0x8004 0x0
call 0x82723DD
goto 0x81F9E17

'---------------
#org 0x1F9E17
msgbox 0x81FA8F6 MSG_YESNO '"PROF. BIRCH: If you work at POKéMO..."
compare LASTRESULT 0x1
if 0x1 goto 0x81F9E36
compare LASTRESULT 0x0
if 0x1 goto 0x81F9E48
end

'---------------
#org 0x2723DD
fadescreen 0x1
special 0xA1
waitstate
return

'---------------
#org 0x1F9E36
msgbox 0x81FA9D5 MSG_KEEPOPEN '"PROF. BIRCH: Great!\n[rival] shoul..."
clearflag 0x3DF
setvar 0x4084 0x3
releaseall
end

'---------------
#org 0x1F9E48
msgbox 0x81FAA35 MSG_YESNO '"PROF. BIRCH: Oh, don't be that way..."
compare LASTRESULT 0x1
if 0x1 goto 0x81F9E36
compare LASTRESULT 0x0
if 0x1 goto 0x81F9E48
end


'---------
' Strings
'---------
#org 0x1FA74D
= PROF. BIRCH: So, [player]\v\h05.\pI've heard so much about you from\nyour father.\pI've heard that you don't have your\nown POKéMON yet.\pBut the way you battled earlier,\nyou pulled it off with aplomb!\pI guess you have your father's blood\nin your veins after all!\pOh, yes. As thanks for rescuing me,\nI'd like you to have the POKéMON you\lused earlier.\p[player] received the [buffer1]!

#org 0x1FA8B1
= PROF. BIRCH: While you're at it, why not\ngive a nickname to that [buffer1]?

#org 0x1FA8F6
= PROF. BIRCH: If you work at POKéMON\nand gain experience, I think you'll make\lan extremely good TRAINER.\pMy kid, [rival], is also studying\nPOKéMON while helping me out.\p[player]\v\h05, don't you think it might be\na good idea to go see [rival]?

#org 0x1FA9D5
= PROF. BIRCH: Great!\n[rival] should be happy, too.\pGet [rival] to teach you what it\nmeans to be a TRAINER.

#org 0x1FAA35
= PROF. BIRCH: Oh, don't be that way.\nYou should go meet my kid.