[Other] givepokemon script error

[Kenna18155]

So I decided to practice the givepokemon script. I wrote the script, debugged, compiled, and assigned it to a person in A-Map. When I booted up VBA and loaded my ROM, i talked to the person and the person disappeared as it said, "MAKENNA recieved a ????????! Too bad!" I took one step away and the person reappeared. When i talk to him again, he disappears, and I supposedly receive a Master Ball, followed by "too bad!" Take a step away, he reappears, I talk to him, he's gone again, i get a Great Ball (too bad!). This continues with me receiving infinite nonexistant Great Balls.

Here is the script i used:

Spoiler:

#dynamic 0x800F00

#org @start
checkflag 0x800
if 0x1 goto @done
compare LASTRESULT 0x1
msgbox @ask 0x1
if 0x1 goto @take
msgbox @notake 0x6
release
end

#org @done
lock
faceplayer
msgbox @aftertalk 0x6
release
end

#org @take
lock
faceplayer
givepokemon 0x4 0x5 0x0 0x0 0x0 0x0
fanfare 0x13E
msgbox @recieved 0x6
waitfanfare
closeonkeypress
setflag 0x800
msgbox @name 0x5
compare LASTRESULT 0x1
if 0x1 call @name
msgbox @gotit 0x6
release
end

#org @name
call 0x1A74EB
return
end

#org @ask
= Do you want a CHARMANDER?

#org @notake
= That's too bad...

#org @aftertalk
= How is CHARMANDER doing?

#org @recieved
= [black_fr] You recieved a CHARMANDER!

#org @name
= [blak_fr] Would you like to give CHARMANDER\na nickname?

#org @gotit
= Take good care of him!

 

[Mana1]

Considering none of that is in your script, maybe it's a compiling error? Did you edit the script at all after it was first compiled to the ROM?

 

[Logan]

#org @start
checkflag 0x800
if 0x1 goto @done
compare LASTRESULT 0x1
msgbox @ask 0x1
if 0x1 goto @take
msgbox @notake 0x6
release
end

I'm very concerned with this part of your script. If you're trying to ask a YESNO question surely it should look more like this:

#org @start
checkflag 0x800
if 0x1 goto @done
msgbox @ask MSG_YESNO
compare 0x800D 0x1
if 0x1 goto @take
msgbox @notake MSG_NORMAL
release
end

 

[Kenna18155]

I think I figured it out. On my @ask message box, I used 0x1 instead of 0x5.

I'll check it out tonight or tomorrow and see if that works.