#dynamic 0x800000

'---------------
#org @start
msgbox @string1 MSG_YESNO '"The water is dyed a deep blue[.]\n..."
compare LASTRESULT 0x0
if 0x1 goto @snippet1
special 0x6
special 0x62
setvar 0x8004 0x0
givepokemon 0x83 0x0 0x0 0x0 0x0 0x0
bufferfirstpokemon 0x0
setanimation 0x0 0x0
msgbox @string2 MSG_KEEPOPEN '"[buffer1] used SURF!"
doanimation 0x9
checkanimation 0x9
special 0x6
releaseall
end

'---------------
#org @snippet1
releaseall
end

'---------
' Strings
'---------
#org @string1
= The water is dyed a deep blue[.]\nWould you like to SURF?

#org @string2
= [buffer1] used SURF!