#org @Loop
addvar 0x8009 0x1
compare 0x8009 0x10
if 0x1 goto @NoMoreOWsToCheck
call 0x020370B8
compare 0x8008 0x5F
if 0x5 goto @TreeFailNextOW
addvar 0x8002 0x300
compare 0x8002 0x2FF
if 0x3 call @ValueReNumerate
call 0x020370B8
copyvar 0x800A 0x8008
addvar 0x8002 0x800
compare 0x8002 0x7FF
if 0x3 call @ValueReNumerate
call 0x020370B8
comparevars 0x8008 0x8005
if 0x5 goto @XFailNextOW
addvar 0x8002 0x200
call 0x020370B8
comparevars 0x8008 0x8006
if 0x5 goto @YFailNextOW
givepokemon 0x7B 0x0 0x0 0x0 0x0 0x0
bufferfirstpokemon 0x0
setanimation 0x0 0x0
msgbox @cutmsg 0x5
compare 0x800D 0x0
if 0x1 goto @no
msgbox @cutanim 0x4
closeonkeypress
doanimation 0x2
waitstate
applymovement 0x800A @TreeAnimation
waitmovement 0x0
hidesprite 0x800A
moveoffscreen 0x800A
special 0x28
release
end

#org @TreeFailNextOW
addvar 0x8002 0x2400
compare 0x8002 0x23FF
if 0x3 call @ValueReNumerate
goto @Loop

#org @XFailNextOW
addvar 0x8002 0x1900
compare 0x8002 0x17FF
if 0x3 call @ValueReNumerate
goto @Loop

#org @YFailNextOW
addvar 0x8002 0x1700
compare 0x8002 0x16FF
if 0x3 call @ValueReNumerate
goto @Loop

#org @ValueReNumerate
addvar 0x8003 0x1
return

#org @NoMoreOWsToCheck
msgbox @Failure 0x2
release
end

#org @Failure
= Incorrect

#org @cutanim
= Scyther used Cut!

#org @no
closeonkeypress
releaseall
end