312 lines
8.6 KiB
Plaintext
312 lines
8.6 KiB
Plaintext
version=2
|
|
|
|
#Warp Player/NPCs
|
|
@screen.fadeout
|
|
@player.warp(18,0.1,25)
|
|
@player.turnto(0)
|
|
@level.update
|
|
@npc.warp(10,0,-2,0)
|
|
@npc.warp(11,0,-2,0)
|
|
@npc.warp(12,0,-2,0)
|
|
@npc.warp(13,0,-2,0)
|
|
@npc.warp(14,0,-2,0)
|
|
@npc.warp(15,0,-2,0)
|
|
@npc.warp(16,0,-2,0)
|
|
@npc.warp(17,0,-2,0)
|
|
@npc.warp(18,0,-2,0)
|
|
@npc.warp(19,0,-2,0)
|
|
@npc.warp(20,0,-2,0)
|
|
@npc.warp(4,16,0,25)
|
|
@npc.warp(5,20,0,25)
|
|
@npc.warp(6,22,0,25)
|
|
@npc.warp(7,19,0,24)
|
|
@level.update
|
|
|
|
#Activate third person
|
|
@storage.set(boolean,thirdperson,<player.thirdperson>)
|
|
:if:<player.thirdperson>=false
|
|
:then
|
|
@camera.activatethirdperson
|
|
:endif
|
|
|
|
@camera.setposition(1,1,4)
|
|
@camera.setyaw(0)
|
|
@camera.setpitch(-0.1)
|
|
|
|
#build scenario
|
|
#select NPC 1
|
|
:select:<system.random(1,4)>
|
|
:when:1
|
|
@npc.wearskin(6,13)
|
|
@storage.set(string,name1,Ace Trainer Nick)
|
|
@storage.set(string,pokename1,Pinsir)
|
|
@storage.set(integer,score1,190)
|
|
@npc.register(nationalpark\nationalpark2.dat|1|position|7,0,3)
|
|
:when:2
|
|
@npc.wearskin(6,23)
|
|
@storage.set(string,name1,Ace Trainer Abby)
|
|
@storage.set(string,pokename1,Scyther)
|
|
@storage.set(integer,score1,170)
|
|
@npc.register(nationalpark\nationalpark2.dat|2|position|7,0,3)
|
|
:when:3
|
|
@npc.wearskin(6,bugcatcher)
|
|
@storage.set(string,name1,Bug Catcher Josh)
|
|
@storage.set(string,pokename1,Butterfree)
|
|
@storage.set(integer,score1,150)
|
|
@npc.register(nationalpark\nationalpark2.dat|3|position|7,0,3)
|
|
:when:4
|
|
@npc.wearskin(6,16)
|
|
@storage.set(string,name1,Picnicker Cindy)
|
|
@storage.set(string,pokename1,Beedrill)
|
|
@storage.set(integer,score1,180)
|
|
@npc.register(nationalpark\nationalpark2.dat|4|position|7,0,3)
|
|
:endwhen
|
|
|
|
#select NPC 2
|
|
:select:<system.random(1,4)>
|
|
:when:1
|
|
@npc.wearskin(5,bugcatcher)
|
|
@storage.set(string,name2,Bug Catcher Ed)
|
|
@storage.set(string,pokename2,Venonat)
|
|
@storage.set(integer,score2,130)
|
|
@npc.register(nationalpark\nationalpark2.dat|10|position|2,0,5)
|
|
:when:2
|
|
@npc.wearskin(5,11)
|
|
@storage.set(string,name2,Pokéfan William)
|
|
@storage.set(string,pokename2,Metapod)
|
|
@storage.set(integer,score2,110)
|
|
@npc.register(nationalpark\nationalpark2.dat|11|position|2,0,5)
|
|
:when:3
|
|
@npc.wearskin(5,17)
|
|
@storage.set(string,name2,Camper Barry)
|
|
@storage.set(string,pokename2,Paras)
|
|
@storage.set(integer,score2,120)
|
|
@npc.register(nationalpark\nationalpark2.dat|12|position|2,0,5)
|
|
:when:4
|
|
@npc.wearskin(5,bugcatcher)
|
|
@storage.set(string,name2,Bug Catcher Don)
|
|
@storage.set(string,pokename2,Kakuna)
|
|
@storage.set(integer,score2,100)
|
|
@npc.register(nationalpark\nationalpark2.dat|13|position|2,0,5)
|
|
:endwhen
|
|
|
|
#select NPC 3
|
|
:select:<system.random(1,4)>
|
|
:when:1
|
|
@npc.wearskin(4,14)
|
|
@storage.set(string,name3,Youngster Samuel)
|
|
@storage.set(string,pokename3,Metapod)
|
|
@storage.set(integer,score3,90)
|
|
@npc.register(nationalpark\nationalpark2.dat|20|position|1,0,2)
|
|
:when:2
|
|
@npc.wearskin(4,bugcatcher)
|
|
@storage.set(string,name3,Bug Catcher Benny)
|
|
@storage.set(string,pokename3,Caterpie)
|
|
@storage.set(integer,score3,80)
|
|
@npc.register(nationalpark\nationalpark2.dat|21|position|1,0,2)
|
|
:when:3
|
|
@npc.wearskin(4,49)
|
|
@storage.set(string,name3,School Kid Kipp)
|
|
@storage.set(string,pokename3,Weedle)
|
|
@storage.set(integer,score3,100)
|
|
@npc.register(nationalpark\nationalpark2.dat|22|position|1,0,2)
|
|
:when:4
|
|
@npc.wearskin(4,bugcatcher)
|
|
@storage.set(string,name3,Bug Catcher Ed)
|
|
@storage.set(string,pokename3,Caterpie)
|
|
@storage.set(integer,score3,90)
|
|
@npc.register(nationalpark\nationalpark2.dat|23|position|1,0,2)
|
|
:endwhen
|
|
|
|
#Update level and fade screen in:
|
|
|
|
@level.update
|
|
@screen.fadein
|
|
@level.update
|
|
|
|
#Get the own Pokemon score
|
|
@storage.set(integer,ownpokemonscore,60)
|
|
:select:<pokemon.number(1)>
|
|
:when:12
|
|
@storage.set(integer,ownpokemonscore,80)
|
|
:when:15
|
|
@storage.set(integer,ownpokemonscore,80)
|
|
:when:46
|
|
@storage.set(integer,ownpokemonscore,80)
|
|
:when:48
|
|
@storage.set(integer,ownpokemonscore,80)
|
|
:when:123
|
|
@storage.set(integer,ownpokemonscore,100)
|
|
:when:127
|
|
@storage.set(integer,ownpokemonscore,100)
|
|
:endwhen
|
|
|
|
@storage.set(integer,ownscore,<pokemon.hp(1)>/<pokemon.maxhp(1)>*100+<storage.get(integer,ownpokemonscore)>)
|
|
|
|
#Calculate the own place in the ranking
|
|
@storage.set(integer,win_place,4)
|
|
:if:<storage.get(integer,ownscore)>><storage.get(integer,score3)>
|
|
:then
|
|
@storage.set(integer,win_place,3)
|
|
:endif
|
|
:if:<storage.get(integer,ownscore)>><storage.get(integer,score2)>
|
|
:then
|
|
@storage.set(integer,win_place,2)
|
|
:endif
|
|
:if:<storage.get(integer,ownscore)>><storage.get(integer,score1)>
|
|
:then
|
|
@storage.set(integer,win_place,1)
|
|
:endif
|
|
|
|
@level.wait(40)
|
|
|
|
#Display results:
|
|
@text.show(Congratulations everyone~for catching a bug Pokémon~in the Bug-Catching Contest.*Now let's see who won~this time.)
|
|
:select:<storage.get(integer,win_place)>
|
|
:when:4
|
|
@text.show(Placed on rank 4~is <player.name>~with a <pokemon.name(1)>!)
|
|
@player.move(1)
|
|
@player.turnto(2)
|
|
@level.wait(40)
|
|
@player.move(1)
|
|
@player.turnto(0)
|
|
@text.show(Placed on rank 3~is <storage.get(string,name3)>~with a <storage.get(string,pokename3)>!)
|
|
@npc.move(4,1)
|
|
@npc.turn(4,2)
|
|
@level.wait(40)
|
|
@npc.move(4,1)
|
|
@npc.turn(4,0)
|
|
@text.show(Placed on rank 2~is <storage.get(string,name2)>~with a <storage.get(string,pokename2)>!)
|
|
@npc.move(5,1)
|
|
@npc.turn(5,2)
|
|
@level.wait(40)
|
|
@npc.move(5,1)
|
|
@npc.turn(5,0)
|
|
@text.show(Placed on rank 1~is <storage.get(string,name1)>~with a <storage.get(string,pokename1)>!*Congratulations,~<storage.get(string,name1)>!~You won the~Bug-Catching Contest!~Come here to get your prize.)
|
|
:when:3
|
|
@text.show(Placed on rank 4~is <storage.get(string,name3)>~with a <storage.get(string,pokename3)>!)
|
|
@npc.move(4,1)
|
|
@npc.turn(4,2)
|
|
@level.wait(40)
|
|
@npc.move(4,1)
|
|
@npc.turn(4,0)
|
|
@text.show(Placed on rank 3~is <player.name>~with a <pokemon.name(1)>!)
|
|
@player.move(1)
|
|
@player.turnto(2)
|
|
@level.wait(40)
|
|
@player.move(1)
|
|
@player.turnto(0)
|
|
@text.show(Placed on rank 2~is <storage.get(string,name2)>~with a <storage.get(string,pokename2)>!)
|
|
@npc.move(5,1)
|
|
@npc.turn(5,2)
|
|
@level.wait(40)
|
|
@npc.move(5,1)
|
|
@npc.turn(5,0)
|
|
@text.show(Placed on rank 1~is <storage.get(string,name1)>~with a <storage.get(string,pokename1)>!*Congratulations,~<storage.get(string,name1)>!~You won the~Bug-Catching Contest!~Come here to get your prize.)
|
|
:when:2
|
|
@text.show(Placed on rank 4~is <storage.get(string,name3)>~with a <storage.get(string,pokename3)>!)
|
|
@npc.move(4,1)
|
|
@npc.turn(4,2)
|
|
@level.wait(40)
|
|
@npc.move(4,1)
|
|
@npc.turn(4,0)
|
|
@text.show(Placed on rank 3~is <storage.get(string,name2)>~with a <storage.get(string,pokename2)>!)
|
|
@npc.move(5,1)
|
|
@npc.turn(5,2)
|
|
@level.wait(40)
|
|
@npc.move(5,1)
|
|
@npc.turn(5,0)
|
|
@text.show(Placed on rank 2~is <player.name>~with a <pokemon.name(1)>!)
|
|
@player.move(1)
|
|
@player.turnto(2)
|
|
@level.wait(40)
|
|
@player.move(1)
|
|
@player.turnto(0)
|
|
@text.show(Placed on rank 1~is <storage.get(string,name1)>~with a <storage.get(string,pokename1)>!*Congratulations,~<storage.get(string,name1)>!~You won the~Bug-Catching Contest!~Come here to get your prize.)
|
|
:when:1
|
|
@text.show(Placed on rank 4~is <storage.get(string,name3)>~with a <storage.get(string,pokename3)>!)
|
|
@npc.move(4,1)
|
|
@npc.turn(4,2)
|
|
@level.wait(40)
|
|
@npc.move(4,1)
|
|
@npc.turn(4,0)
|
|
@text.show(Placed on rank 3~is <storage.get(string,name2)>~with a <storage.get(string,pokename2)>!)
|
|
@npc.move(5,1)
|
|
@npc.turn(5,2)
|
|
@level.wait(40)
|
|
@npc.move(5,1)
|
|
@npc.turn(5,0)
|
|
@text.show(Placed on rank 2~is <storage.get(string,name1)>~with a <storage.get(string,pokename1)>!)
|
|
@npc.move(6,1)
|
|
@npc.turn(6,2)
|
|
@level.wait(40)
|
|
@npc.move(6,1)
|
|
@npc.turn(6,0)
|
|
@text.show(Placed on rank 1~is <player.name>~with a <pokemon.name(1)>!*Congratulations,~<player.name>!~You won the~Bug-Catching Contest!~Come here to get your prize.)
|
|
@player.move(1)
|
|
@player.turnto(3)
|
|
@npc.turn(7,1)
|
|
@item.give(169,1)
|
|
@item.messagegive(169,1)
|
|
@player.turnto(2)
|
|
@player.move(1)
|
|
@npc.turn(7,2)
|
|
@player.turnto(0)
|
|
:endwhen
|
|
|
|
:if:<storage.get(integer,win_place)>=4 <or> <storage.get(integer,win_place)>=3 <or> <storage.get(integer,win_place)>=2
|
|
:then
|
|
@npc.move(6,1)
|
|
@npc.turn(6,1)
|
|
@npc.move(6,2)
|
|
@npc.turn(7,3)
|
|
@level.wait(40)
|
|
@npc.turn(6,3)
|
|
@npc.move(6,2)
|
|
@npc.turn(6,2)
|
|
@npc.move(6,1)
|
|
@npc.turn(6,0)
|
|
@npc.turn(7,2)
|
|
:endif
|
|
|
|
@level.wait(20)
|
|
|
|
@camera.reset
|
|
@text.show(Well, that's it for~today's Bug-Catching Contest.*We hope you all~will participate~in the future.)
|
|
|
|
@screen.fadeout
|
|
@player.warp(nationalpark\nationalpark2.dat,4,0.1,2,0)
|
|
@level.update
|
|
@player.turnto(0)
|
|
@screen.fadein
|
|
@level.update
|
|
:if:<inventory.countitem(177)>>0
|
|
:then
|
|
@text.show(I will take the~Sport Balls.)
|
|
@item.clearitem(177)
|
|
:endif
|
|
|
|
:select:<storage.get(integer,win_place)>
|
|
:when:4
|
|
@text.show(Here's your prize for~being the 4th place.)
|
|
@item.give(154,1)
|
|
@item.messagegive(154,1)
|
|
:when:3
|
|
@text.show(Here's your prize for~being the 3rd place.)
|
|
@item.give(2009,1)
|
|
@item.messagegive(2009,1)
|
|
:when:2
|
|
@text.show(Here's your prize for~being the 2nd place.)
|
|
@item.give(112,1)
|
|
@item.messagegive(112,1)
|
|
:endwhen
|
|
|
|
@text.show(Today's Contest is~over. We hope you*will participate~in the future.)
|
|
|
|
:if:<storage.get(boolean,thirdperson)>=false
|
|
:then
|
|
@camera.deactivatethirdperson
|
|
:endif
|
|
|
|
@storage.clear
|
|
:end |