Ganeshwar

#dynamic 0x800000

#org @begin
lockall
setvar 0x7000 0x1 <-you need to set the var# of this script to match this variable
checkflag 0x822 <-this checks for the winning flag. For the boulder badge I believe its 0x821, but you need to check...
if 0x1 goto @win
applymovement MOVE_PLAYER @look
waitmovement 0x0
msgbox @locked
callstd 0x4
closeonkeypress
applymovement MOVE_PLAYER @done
waitmovement 0x0
setvar 0x7000 0x0 <-this resets it so it'll happen again if you keep trying to get past
releaseall
end

#org @win
releaseall
end

#org @look <-you'll want to change the movements to fit what you need...
#raw 2E
#raw FE

#org @done
#raw 10
#raw FE

#org @locked
= The door is locked[.]\nThere is a note here:\p"Business in CINNABAR.\nBe back soon.\p-Daisy"

Now that your rom has been shinyized, it has turned the variable 0x8003 into a shiny counter. Whatever that var is set to, that number of pokemon will be shiny. So if it is set to 0x3, the nxt three pokemon you see, be it trainer or wild, they will be shiny.

Here is what your script should have looked like:

#dynamic 0x800000

#org @start
lock
faceplayer
setvar 0x8003 0x1
cry 0x19 0x0
msgbox @roar 0x6
waitcry
wildbattle 0x19 0x5 0xCA
checksound
cry 0xAD 0x2
pause 0x28
waitcry
setflag 0x138
setflag 0x300
special 0x138
fadescreen 0x0
hidesprite 0x800F
fadescreen 0x1
release
end

#org @roar
= PIKACHU: PIKA!


What is in bold are the changes. If you notice, I added a set of specials. This is the was I was taught to do wild battles.
From JPAN:
Hope this helps.