[Script] Script Not Working

#dynamic 0x800000

#org @start
checkflag 0x201
if 0x0 goto @movement
release // The game automatically locks when you step on a script so you need to release the player
end

#org @movement
lock Not needed
applymovement 0x6 @m1
waitmovement 0x0
msgbox @t1 0x6
waitkeypress // Not needed as it is already included in msgbox type 0x6
goto @continue

#org @continue
msgbox @t2 0x6 // Should be @t4
showpokepic 0x188 0x0A 0x03 // Convert Ralts' ID into hexadecimal
waitkeypress
hidepokepic
givepokemon 0x188 0x5 0x0 0x0 0x0 0x0 // Convert Ralts' ID into hexadecimal
setflag 0x828
fanfare 0x13E
msgbox @t2 0x4
waitfanfare
closeonkeypress // Not needed
msgbox @t3 0x5
compare 0x800D 0x1
if 0x1 call @name
fadescreen 0x1
hidesprite 0x6
fadescreen 0x0
setvar 0x4011 0x1
setflag 0x201 // Unnecessary, you're already setting flag 0x828 so its unlikely you need to use this one as well. Just set OW 0x6's ID to 828 and they'll disappear for good
release
end

#org @m1 // The majority of these movements don't make any sense in either FR or Emerald
#raw 0x6
#raw 0x29
#raw 0x2C
#raw 0x29
#raw 0x29
#raw 0x2C
#raw 0x2C
#raw 0x2C
#raw 0x2C
#raw 0x29
#raw 0x62
#raw 0xFE

#org @name
countpokemon
subvar 0x800D 0x1
copyvar 0x8004 0x800D
fadescreen 0x1
special 0x9E
waitstate
return

#org @t1
= [blue_fr]WAAAAAAAAAAAAAAAIT!!!

#org @t4
= [blue_fr]It is dangerous out there without\la Pok\h1Bmon! Good thing I have an\lextra to spare. Here take this\l[red_fr]Ralts[blue_fr].

#org @t2
= [blue_fr][player] recieved a [red_fr]Ralts[blue_fr]!

#org @t3
= [blue_fr]Would you like to name that\n[red_fr]Ralts[blue_fr]?