#dynamic 0x0FF5E1

#org @start
lock
checkflag 0x200
compare LASTRESULT 0x1
if 0x1 call @already
msgbox @honeytree MSG_NORMAL
checkitem ITEM_HONEY 0x1
compare LASTRESULT 0x1
if 0x1 call @honey
setflag 0x200
release
end

#org @honey
msgbox @hunny MSG_QUESTION
compare LASTRESULT 0x1
if 0x1 call @ona
return

#org @already
msgbox @pokemon MSG_NORMAL
random 0x0A
compare LASTRESULT 0x0
if 0x1 call @1
compare LASTRESULT 0x1
if 0x1 call @2
compare LASTRESULT 0x2
if 0x1 call @3
compare LASTRESULT 0x3
if 0x1 call @4
compare LASTRESULT 0x4
if 0x1 call @5
compare LASTRESULT 0x5
if 0x1 call @6
compare LASTRESULT 0x6
if 0x1 call @7
compare LASTRESULT 0x7
if 0x1 call @8
compare LASTRESULT 0x8
if 0x1 call @9
compare LASTRESULT 0x9
if 0x1 call @10
clearflag 0x200
release
end

#org @1
wildbattle PKMN_WURMPLE 0x8 0x0
return

#org @2
wildbattle PKMN_COMBEE 0xD 0x0
return

#org @3
wildbattle PKMN_WURMPLE 0x7 0x0
return

#org @4
wildbattle PKMN_WURMPLE 0xA 0x0
return

#org @5
wildbattle PKMN_MUNCHLAX 0xE 0x0
return

#org @6
wildbattle PKMN_HERACROSS 0x8 0x0
return

#org @7
wildbattle PKMN_AIPOM 0x8 0x0
return

#org @8
wildbattle PKMN_COMBEE 0x8 0x0
return

#org @9
wildbattle PKMN_CHERUBI 0x8 0x0
return

#org @10
wildbattle PKMN_CHERUBI 0x8 0x0
return

#org @ona
removeitem ITEM_HONEY 0x1
msgbox @hungry MSG_NORMAL
return

#org @pokemon
= Huh?\pIt looks like there's a POKéMON on\nthe HONEY TREE!

#org @honeytree
= It's a HONEY TREE.

#org @hunny
= Would you like to slather the bark\nwith HONEY?

#org @hungry
= [player] slathered the bark with\nHONEY.