#freespace 0xFF
#include stdpoke.rbh
#dynamic 0xF00000

#org @chikorita
setvar 0x4001 PKMN_CHIKORITA
call @showpic
msgbox 0x81FB8E0 MSG_YESNO
compare LASTRESULT 0x0
if 0x1 goto @reject
setflag 0x346
hidesprite 0x6
goto @give

#org @cyndaquil
setvar 0x4001 PKMN_CYNDAQUIL
call @showpic
msgbox 0x81FB7F6 MSG_YESNO
compare LASTRESULT 0x0
if 0x1 goto @reject
setflag 0x32B
hidesprite 0x4
goto @give

#org @totodile
setvar 0x4001 PKMN_TOTODILE
call @showpic
msgbox 0x81FB869 MSG_YESNO
compare LASTRESULT 0x0
if 0x1 goto @reject
setflag 0x32C
hidesprite 0x5
goto @give

#org @showpic
release
applymovement 0x2 0x82725A8
waitmovement 0x0
showpokepic 0x4001 0xA 0x3
return

#org @reject
hidepokepic
msgbox 0x81FB959 MSG_KEEPOPEN
releaseall
end

#org @give
bufferpokemon 0x0 0x4001
givepokemon 0x4001 0x5 0x0 0x0 0x0 0x0
checkflag 0x32B
if 0x0 goto @nickbox
checkflag 0x32C
if 0x0 goto @nickbox
checkflag 0x346
if 0x0 goto @nickbox
setvar 0x40D3 0x6
goto @nickbox

#org @nickbox
compare LASTRESULT 0x0
if 0x1 goto 0x81FA0A1
compare LASTRESULT 0x1
if 0x1 goto 0x81FA0CC
hidepokepic
goto 0x8273811

#org 0x1FA0FD
goto @listen

#org @listen
hidepokepic
checkflag 0x346
if 0x0 goto @end
checkflag 0x32B
if 0x0 goto @end
checkflag 0x32C
if 0x0 goto @end
msgbox 0x81FBA2C MSG_KEEPOPEN '"PROF. BIRCH: Listen, [player]\v\h0..."
setvar 0x40D3 0x6
releaseall
end

#org @end
releaseall
end