P3D-Legacy/P3D/Content/Data/Scripts/trainer/cianwood_gym/leader.dat

<EFBFBD><EFBFBD>version=2
:if:<register.registered(stormbadge_obtain)>=False
@Music.play(trainer_encounter)
@Text.show(WAHAHAHA!*So you've come~this far!*Let me tell you,~I'm tough!~My Pok<00>mon will~crush stones and~shatter bones!~Watch this!)
@npc.turn(0,3)
@Level.wait(5)
@Player.turnto(3)
@player.move(1)
@player.turnto(0)
@text.show(CHUCK: Urggh!~...*Ooooarrgh!)

@sound.play(destroy)
:while:<entity.positiony(5)><1

@entity.addtoposition(5,0,0.1,0)
@level.wait(2)
@level.update

:endwhile

:while:<entity.positiony(5)>>-0.3

@entity.addtoposition(5,0,-0.1,0)
@level.wait(2)
@level.update

:endwhile

@Level.Update
@sound.play(destroy)
@Entity.Move(5,1)
@Level.wait(10)
@Player.turnto(1)
@player.move(1)
@player.turnto(0)
@npc.turn(0,2)
@battle.starttrainer(cianwood_gym\leader)
@Music.play(gym)
@register.register(stormbadge_obtain)
@register.register(trainer_cianwood_gym\001)
@register.register(trainer_cianwood_gym\002)
@register.register(trainer_cianwood_gym\003)
@register.register(trainer_cianwood_gym\004)
@player.GetBadge(13)
@player.AchieveEmblem(storm)
@text.show(Stormbadge makes~all Pok<00>mon up to*Level 70 obey, even~traded ones.*It also lets your~Pok<00>mon use Fly*when you're not in~a battle.*Here, take this too!)
@item.give(191,1)
@item.messagegive(191,1)
@text.show(That is Dynamicpunch.*It doesn't always~hit, but when it*does, it causes~confusion!)
:end
:endif

@battle.starttrainer(cianwood_gym\leader)
:end