[Script] Help making Steven, RED and Leaf Rebattle

[darthbr]

Hello guys,

I did these 3 scripts, each trainer will give a KEY item, but I want them to be ''battleable again'', but without giving the KEY item again.

Someone can help me?

STEVEN STONE:

'---------------
#org 0x23B182
lock
checkflag 0x4F8
if 0x1 goto 0x823B1CD
checksound
sound 0x15
applymovement 0x1 0x8272598
waitmovement 0x0
applymovement 0x1 0x827259A
waitmovement 0x0
applymovement 0x1 0x827259E
waitmovement 0x0
msgbox 0x823B1E1 MSG_KEEPOPEN '"STEVEN: Oh, wow, [player]\v\h05.\n..."
trainerbattle 0x3 0x324 0x0 0x823B32D
goto 0x8E46938

'---------------
#org 0x23B1CD
applymovement 0x1 0x827259E
waitmovement 0x0
msgbox 0x823B358 MSG_KEEPOPEN '"STEVEN: Come to think of it, ever ..."
release
end

'---------------
#org 0xE46938
msgbox 0x8E4695A MSG_KEEPOPEN '"STEVEN: [player]!\pThat was an ext..."
giveitem 0xAF 0x1 MSG_OBTAIN
msgbox 0x823B358 MSG_KEEPOPEN '"STEVEN: Come to think of it, ever ..."
setflag 0x4F8
release
end


'---------
' Strings
'---------
#org 0x23B1E1
= STEVEN: Oh, wow, [player]\v\h05.\nI'm amazed you knew where to find me.\pDo you, uh[.]maybe think of me as\njust a rock maniac?\pNo, that can't be right.\pWe battled alongside each other at\nthe MOSSDEEP SPACE CENTER.\pYou should have a very good idea\nabout how good I am.\pOkay, [player]\v\h05, if you're going to mount\na serious challenge, expect the worst!

#org 0x23B32D
= You[.]\nI had no idea you'd become so strong[.]

#org 0x23B358
= STEVEN: Come to think of it, ever since\nour paths first crossed in GRANITE\lCAVE in DEWFORD, I had this feeling.\pI thought that you would eventually\nbecome the CHAMPION.\pMy predictions usually come true.\pAnd where will you go from here?\p[.] [.] [.] [.] [.] [.]\n[.] [.] [.] [.] [.] [.]\pFufufu, even I couldn't tell you that.

#org 0xE4695A
= STEVEN: [player]!\pThat was an extraordinary battle.\pI feel honored to have been a part\nof it.\pHere, take this as a thank you.\pI know you'll find a good use for\nit.


'-----------
' Movements
'-----------
#org 0x272598
#raw 0x56 'Exclamation Mark (!)
#raw 0xFE 'End of Movements

#org 0x27259A
#raw 0x14 'Delay5
#raw 0x14 'Delay5
#raw 0x14 'Delay5
#raw 0xFE 'End of Movements

#org 0x27259E
#raw 0x3E 'Face Player
#raw 0xFE 'End of Movements

======================================================
RED:

'---------------
#org 0xE44520
lock
faceplayer
checkflag 0x4BD
if 0x1 goto 0x8E44573
trainerbattle 0x1 0x353 0x0 0x8E4453F 0x8E4453F 0x8E44559
end

'---------------
#org 0xE44573
setflag 0x8D6
msgbox 0x8E4453F MSG_KEEPOPEN '". . . . . .\n. . . . . ."
release
end

'---------------
#org 0xE44559
setflag 0x4BD
msgbox 0x8E4453F MSG_KEEPOPEN '". . . . . .\n. . . . . ."
checkflag 0x8D6
giveitem 0x178 0x1 MSG_OBTAIN
setflag 0x8D6
msgbox 0x8E4453F MSG_KEEPOPEN '". . . . . .\n. . . . . ."
release
end


'---------
' Strings
'---------
#org 0xE4453F
= . . . . . .\n. . . . . .

========================================================

LEAF:

'---------------
#org 0xE44584
lock
faceplayer
checkflag 0x493
if 0x1 goto 0x8E44573
trainerbattle 0x1 0x354 0x0 0x8E4453F 0x8E4453F 0x8E445A3
end

'---------------
#org 0xE44573
setflag 0x8D6
msgbox 0x8E4453F MSG_KEEPOPEN '". . . . . .\n. . . . . ."
release
end

'---------------
#org 0xE445A3
msgbox 0x8E4453F MSG_KEEPOPEN '". . . . . .\n. . . . . ."
setflag 0x493
checkflag 0x8E0
giveitem 0x172 0x1 MSG_OBTAIN
setflag 0x8E0

'---------
' Strings
'---------
#org 0xE4453F
= . . . . . .\n. . . . . .