P3D-Legacy/P3D/Content/Data/Scripts/ceruleancave/protonencounter.dat

<EFBFBD><EFBFBD>version=2
:if:<register.registered(protoncerulean)>=False
:if:<player.position(x)>=49
	@player.turnto(3)
	@player.move(1)
	@player.turnto(0)
:endif
:if:<player.position(x)>=51
	@player.turnto(1)
	@player.move(1)
	@player.turnto(0)
:endif
@player.move(3)
@text.show(GO MASTER BALL!)
@pokemon.cry(150)
@npc.warp(0,~,-1,~)
@level.update
@music.stop
@sound.play(TossPokeball)
@level.wait(50)
@sound.play(PokeballOpen)
@level.wait(50)
@entity.showmessagebulb(1|50|3|17)
@npc.turn(1,2)
@music.play(johto_rocket_encounter)
@text.show(As I suspected,~you followed me here,~but you are too late!*I captured Mewtwo.*Now that I control~such a legendary Pok<00>mon~you have no chance.*GO MEWTWO!)
@battle.trainer(ceruleancave\promew2)
@pokemon.heal
@text.show(I suspected this~might be a problem.*As strong as Mewtwo is,~it can not stand up to~a full team alone.*However when supported~by my full team~things will be far~different!)
@battle.trainer(ceruleancave\Proton)
@text.show(How is this possible?*Maybe I need a chance~to actually train~Mewtwo?*I shall take my~followers on a training~journey and return~when I am far stronger!*Live in fear of our return!)
@npc.turn(1,0)
@npc.warp(10,48,2,14)
@npc.moveasync(1,2)
@npc.move(10,2)
@music.play(looker_encounter)
@text.show(NOT SO FAST!*I, Looker of the~International Police,~am placing you under arrest!*You will be coming~with me to face trial~for your crimes!*Now I must insist you~release that Pok<00>mon!)
@sound.play(PokeballOpen)
@level.wait(20)
@pokemon.cry(150)
@npc.warp(0,~,2,~-2)
@npc.turn(0,3)
@npc.setspeed(0,5)
@npc.move(0,5)
@text.show(Looker: Mewtwo seems to have~fled the cave.*I doubt it will~return here for sometime.*Thank you very much~for your help,~<player.name>!*Sadly I have no~reward to offer you~besides my gratitude.*I will make sure to~inform the local authorities~of this arrest.*I hope we can~meet again!)
@screen.fadeout
@music.play(ceruleancave)
@npc.remove(0)
@npc.remove(1)
@npc.remove(2)
@npc.remove(3)
@npc.remove(4)
@npc.remove(5)
@npc.remove(6)
@npc.remove(7)
@npc.remove(8)
@npc.remove(9)
@npc.remove(10)
@register.register(protoncerulean)
@register.unregister(rocketkantointerferance)
@npc.register(ceruleancave\bf1.dat|0|remove|0)
@npc.register(ceruleancave\bf1.dat|1|remove|0)
@npc.register(ceruleancave\bf1.dat|2|remove|0)
@npc.register(ceruleancave\bf1.dat|3|remove|0)
@npc.register(ceruleancave\bf1.dat|4|remove|0)
@npc.register(ceruleancave\bf1.dat|5|remove|0)
@npc.register(ceruleancave\bf1.dat|6|remove|0)
@npc.register(ceruleancave\bf1.dat|7|remove|0)
@npc.register(ceruleancave\bf1.dat|8|remove|0)
@npc.register(ceruleancave\bf1.dat|9|remove|0)
@npc.register(ceruleancave\bf1.dat|10|remove|0)
@npc.register(ceruleancave\1f.dat|2|remove|0)
@npc.register(cerulean\main.dat|7|remove|0)
@npc.register(chrono\meadow.dat|0|remove|0)
@npc.register(chrono\meadow.dat|1|remove|0)
@npc.register(chrono\meadow.dat|2|remove|0)
@npc.register(chrono\meadow.dat|3|remove|0)
@npc.register(chrono\meadow.dat|4|remove|0)
@npc.register(routes\route13.dat|0|remove|0)
@npc.register(routes\route13.dat|1|remove|0)
@npc.register(routes\route5.dat|0|remove|0)
@npc.register(routes\route5.dat|1|remove|0)
@npc.register(routes\route6.dat|0|remove|0)
@npc.register(routes\route8.dat|0|remove|0)
@npc.register(routes\route8.dat|1|remove|0)
@npc.register(icefall\bay.dat|0|remove|0)
@npc.register(floe\1.dat|0|position|2,0,3)
@screen.fadein
:endif

:if:<Register.registered(battlemewtwo)>=true
	@player.achieveemblem(genetics)
:endif
:end