[Script] buying pokemon script for gba roms

[Shiny_Miner]

i made a pokemon selling script hope it helps xd
script
#dynamic 0x800000
#org @main
lock
faceplayer
showmoney 0x0 0x0 0x0
msgbox @OfferMsg 0x5
compare 0x800D 0x1
if 0x1 goto @AcceptedOffer
msgbox @DeclinedMsg 0x6
hidemoney 0x0 0x0
release
end

#org @AcceptedOffer
checkmoney 0x1F4 0x0
compare LASTRESULT 0x1
if 0x4 goto @Transaction
msgbox @IncorrectAmountMsg 0x6
hidemoney 0x0 0x0
release
end

#org @NoRoom
msgbox @NoRoomMsg 0x6
hidemoney 0x0 0x0
release
end

#org @Transaction
checkitemroom 0x6F 0x1
compare LASTRESULT 0x0
if 0x1 goto @NoRoom
paymoney 0x1F4 0x0
sound 0x58
updatemoney 0x0 0x0 0x0
msgbox @TransactionMsg 0x6
setflag 0x0828
givepokemon 0x4 0x5 0x0 0x0 0x0 0x0
fanfare 0x13E
msgbox @received 0x4
waitfanfare
closeonkeypress
msgbox @givenickname 0x5
compare 0x800D 0x1
if 0x1 call @nickname
hidemoney 0x0 0x0
release
end

#org @OfferMsg
= Hi! Would you like to buy a \ nCHARMENDER for [$] 500?

#org @IncorrectAmountMsg
= Oh, you can't afford one.

#org @DeclinedMsg
= Not interested?

#org @NoRoomMsg
= You don't have room for it.

#org @givenickname
= Would you like to give a nickname \ nto CHARMENDER?

#org @received
= [player] received a CHARMENDER!

#org @TransactionMsg
= Thank you! \ NPlease come again!

#org @nickname
setvar 0x8004 0x0
fadescreen 0x1
special 0x9E
waitstate
return
Pokecommunity post ==== https: //www.pokecommunity.com/showthread.php? T = 456390

hre is a compiled script for xse

MediaFire

MediaFire is a simple to use free service that lets you put all your photos, documents, music, and video in a single place so you can access them anywhere and share them everywhere.

www.mediafire.com

 

[Shiny_Miner]

it can be also in multichoice like in shops haha dm me on discord to see

 

[Shiny_Miner]

Va a ser un gran guión para un hack de rom de robo como Team Rocket.

 

[KiddKey]

I will use it!

la voy a usar

 

[Shiny_Miner]

I will use it!

la voy a usar

Bien