Shinyizer is soooo much easier than people make it out to be. I hate how confused everyone gets. There is no need to callasm. The way it is written, is the game, when creating a pokemon, now checks var 0x8003. It works like this:
If 0x8003 = 0 : no shines
if 0x8003 = 1 : The next, and only the next, pokemon the game creates (givepokemon, trainer pokemon, wild pokemon) will be shiny
if 0x8003 = 2 : The next 2 pokemon the game creates will be shiny.
if 0x8003 = 3 : The next 3 pokemon the game creates will be shiny.
etc.
Code:
'---------------
#org 0x723C80
lock
faceplayer
checkflag 0x500
if 0x1 goto 0x8723DAB
msgbox 0x8723DB6 MSG_YESNO '"Hello there, young trainer! I've\n..."
compare LASTRESULT 0x0
if 0x1 goto 0x8723CF3
checkmoney 0xBB8 0x0
compare LASTRESULT 0x0
if 0x1 goto 0x8723CFE
countpokemon
compare LASTRESULT 0x6
if 0x1 goto 0x8723DA0
paymoney 0xBB8 0x0
fanfare 0x101
msgbox 0x8723EC6 MSG_FACE '"[player] recieved a POKéMON!"
[COLOR=red]setvar 0x8003 0x1[/COLOR]
givepokemon 0x81 0xA 0x0 0x0 0x0 0x0
callasm 0x8723D10
setflag 0x500
msgbox 0x8723EDF MSG_NORMAL '"I told you that POKéMON was super\..."
release
end
'---------------
#org 0x723DAB
msgbox 0x8723EDF MSG_NORMAL '"I told you that POKéMON was super\..."
release
end
'---------------
#org 0x723CF3
msgbox 0x8723E3D MSG_FACE '"Oh well, I'll find someone else."
release
end
'---------------
#org 0x723CFE
msgbox 0x8723E60 MSG_FACE '"You don't have enough money. I\nsu..."
release
end
'---------------
#org 0x723DA0
msgbox 0x8723E96 MSG_FACE '"Your party is full. You'll need to..."
release
end
'---------
' Strings
'---------
#org 0x723DB6
= Hello there, young trainer! I've\ngot a special deal for you today.\lHow would you like to buy a super\lspecial POKéMON for just [$]3000?
#org 0x723EC6
= [player] recieved a POKéMON!
#org 0x723EDF
= I told you that POKéMON was super\nspecial!
#org 0x723E3D
= Oh well, I'll find someone else.
#org 0x723E60
= You don't have enough money. I\nsuggest you save up!
#org 0x723E96
= Your party is full. You'll need to\nmake room.
That is all you need to do.