summaryrefslogtreecommitdiff
path: root/npc/other/poring_war.txt
diff options
context:
space:
mode:
authorHaru <haru@dotalux.com>2014-10-26 02:06:46 +0100
committerHaru <haru@dotalux.com>2014-11-02 01:36:50 +0100
commitbf4b0a281207e46a9b21a9c9f779aeafaa739b62 (patch)
tree0230ee95510255548ebb7f4080460b466c9e2ca6 /npc/other/poring_war.txt
parent6b20c5b6988c889df35b890d93c338f8b87fa430 (diff)
downloadhercules-bf4b0a281207e46a9b21a9c9f779aeafaa739b62.tar.gz
hercules-bf4b0a281207e46a9b21a9c9f779aeafaa739b62.tar.bz2
hercules-bf4b0a281207e46a9b21a9c9f779aeafaa739b62.tar.xz
hercules-bf4b0a281207e46a9b21a9c9f779aeafaa739b62.zip
Replaced 'set' with direct assignment where applicable (common folder)
Signed-off-by: Haru <haru@dotalux.com>
Diffstat (limited to 'npc/other/poring_war.txt')
-rw-r--r--npc/other/poring_war.txt138
1 files changed, 69 insertions, 69 deletions
diff --git a/npc/other/poring_war.txt b/npc/other/poring_war.txt
index 38eac1de1..5e99c97d8 100644
--- a/npc/other/poring_war.txt
+++ b/npc/other/poring_war.txt
@@ -129,13 +129,13 @@ poring_w01,100,97,3 script Poring Vending Machine#w 4_PORING,{
mes "What could it be?";
next;
switch(rand(1,17)) {
- case 5: set .@Random_Figure,2766; break; // Swordman_Figure
- case 6: set .@Random_Figure,2767; break; // Acolyte_Figure
- case 8: set .@Random_Figure,2770; break; // Thief_Figure
- case 11: set .@Random_Figure,2771; break; // Merchant_Figure
- case 13: set .@Random_Figure,2769; break; // Archer_Figure
- case 14: set .@Random_Figure,2768; break; // Mage_Figure
- default: set .@Random_Figure,2765; break; // Novice_Figure
+ case 5: .@Random_Figure = 2766; break; // Swordman_Figure
+ case 6: .@Random_Figure = 2767; break; // Acolyte_Figure
+ case 8: .@Random_Figure = 2770; break; // Thief_Figure
+ case 11: .@Random_Figure = 2771; break; // Merchant_Figure
+ case 13: .@Random_Figure = 2769; break; // Archer_Figure
+ case 14: .@Random_Figure = 2768; break; // Mage_Figure
+ default: .@Random_Figure = 2765; break; // Novice_Figure
}
mes "A nice " + getitemname(.@Random_Figure) + ".";
delitem 7539,50; // Poring_Coin
@@ -291,9 +291,9 @@ poring_w01,96,97,3 script Sweet Devi#wop 4_DEVIRUCHI,{
close2;
if (WoP_SaveMap$ != "") {
savepoint WoP_SaveMap$,WoP_SaveMap_X,WoP_SaveMap_Y;
- set WoP_SaveMap$,"";
- set WoP_SaveMap_X,0;
- set WoP_SaveMap_Y,0;
+ WoP_SaveMap$ = "";
+ WoP_SaveMap_X = 0;
+ WoP_SaveMap_Y = 0;
}
warp getsavepoint(0), getsavepoint(1), getsavepoint(2);
end;
@@ -304,12 +304,12 @@ OnPCLogoutEvent:
if (.@map$ == "poring_w02") {
if (WoP_SaveMap$ != "") {
savepoint WoP_SaveMap$,WoP_SaveMap_X,WoP_SaveMap_Y;
- set WoP_SaveMap$,"";
- set WoP_SaveMap_X,0;
- set WoP_SaveMap_Y,0;
+ WoP_SaveMap$ = "";
+ WoP_SaveMap_X = 0;
+ WoP_SaveMap_Y = 0;
}
delitem 7773,countitem(7773);
- set wop_team,0;
+ wop_team = 0;
}
end;
@@ -317,9 +317,9 @@ OnPCDieEvent:
getmapxy .@map$,.@x,.@y,0;
if (.@map$ == "poring_w02" && wop_team) {
if (getsavepoint(0) != "poring_w02" && WoP_SaveMap$ == "") {
- set WoP_SaveMap$,getsavepoint(0);
- set WoP_SaveMap_X,getsavepoint(1);
- set WoP_SaveMap_Y,getsavepoint(2);
+ WoP_SaveMap$ = getsavepoint(0);
+ WoP_SaveMap_X = getsavepoint(1);
+ WoP_SaveMap_Y = getsavepoint(2);
}
if (wop_team == 1) {
savepoint "poring_w02",rand(44,51),rand(76,87);
@@ -342,13 +342,13 @@ OnInit:
removemapflag "poring_w02",mf_pvp;
removemapflag "poring_w02",mf_pvp_noguild;
removemapflag "poring_w02",mf_pvp_nocalcrank;
- set $@wop_teamcount,0;
- set $@wop_deadcount_a,0;
- set $@wop_deadcount_d,0;
- set $@wop_team_a,0;
- set $@wop_team_d,0;
- set $@wop_doorcount_a,0;
- set $@wop_doorcount_d,0;
+ $@wop_teamcount = 0;
+ $@wop_deadcount_a = 0;
+ $@wop_deadcount_d = 0;
+ $@wop_team_a = 0;
+ $@wop_team_d = 0;
+ $@wop_doorcount_a = 0;
+ $@wop_doorcount_d = 0;
end;
}
@@ -389,7 +389,7 @@ OnStartArena:
warpwaitingpc "poring_w02",26,175;
disablewaitingroomevent;
if ($@wop_teamcount == 0) {
- set $@wop_teamcount,1;
+ $@wop_teamcount = 1;
donpcevent "Poring#wop_door_d::OnDevilingStart";
donpcevent "#wop_warp_rtry::OnStop";
}
@@ -457,7 +457,7 @@ OnTimer55100:
donpcevent "Poring#wop_door_a::OnDisable";
donpcevent "Poring#wop_door_d::OnDisable";
donpcevent "Poring#wop_door_all::OnDisable";
- set $@wop_teamcount,0;
+ $@wop_teamcount = 0;
donpcevent "#wop_master::OnAngelingEnd";
donpcevent "#wop_warp_rtry::OnEnable";
end;
@@ -481,7 +481,7 @@ OnStartArena:
warpwaitingpc "poring_w02",170,175;
disablewaitingroomevent;
if ($@wop_teamcount == 0) {
- set $@wop_teamcount,1;
+ $@wop_teamcount = 1;
donpcevent "Poring#wop_door_a::OnAngelingStart";
donpcevent "#wop_warp_rtry::OnStop";
}
@@ -550,7 +550,7 @@ OnTimer55100:
donpcevent "Poring#wop_door_d::OnDisable";
donpcevent "Poring#wop_door_all::OnDisable";
- set $@wop_teamcount,0;
+ $@wop_teamcount = 0;
donpcevent "#wop_master::OnDevilingEnd";
donpcevent "#wop_warp_rtry::OnEnable";
end;
@@ -627,8 +627,8 @@ poring_w02,26,181,3 script Mr. Doppel#wop_team_a 8_DOPPEL,{
mes "- after you loose some weight. -";
close;
}
- set .@a_tname$,getpartyname($@wop_team_a);
- set .@pname$,getpartyname(getcharid(1));
+ .@a_tname$ = getpartyname($@wop_team_a);
+ .@pname$ = getpartyname(getcharid(1));
if ($@wop_team_a != 0 && $@wop_team_a == getcharid(1)) {
mes "[Mr. Doppel]";
mes "So, everyone joined the party?";
@@ -660,7 +660,7 @@ poring_w02,26,181,3 script Mr. Doppel#wop_team_a 8_DOPPEL,{
mes "Very well. Nice you have done everything on time.";
delitem 7773,countitem(7773);
close2;
- set wop_team,0;
+ wop_team = 0;
warp "poring_w02",44,82;
end;
}
@@ -671,7 +671,7 @@ poring_w02,26,181,3 script Mr. Doppel#wop_team_a 8_DOPPEL,{
mes "Wait for all the other party members there.";
delitem 7773,countitem(7773);
close2;
- set wop_team,0;
+ wop_team = 0;
warp "poring_w02",44,82;
end;
}
@@ -703,7 +703,7 @@ poring_w02,26,181,3 script Mr. Doppel#wop_team_a 8_DOPPEL,{
mes "So, I'll register your party name as - " +.@pname$ + " -.";
mes "Now, Tell your ^4d4dffmembers to confirm your party^000000.";
mes "I'll send you to the battlefield as soon as I confirm your party.";
- set $@wop_team_a,getcharid(1);
+ $@wop_team_a = getcharid(1);
mapannounce "poring_w02","The registration of the Angeling Team has been confirmed. The party members must confirm their team with Mr. Doppel.",0,0x33FF66;
close;
case 3:
@@ -758,8 +758,8 @@ poring_w02,170,181,3 script Mr. Doppel#wop_team_d 8_DOPPEL,{
mes "- after you loose some weight. -";
close;
}
- set .@d_tname$,getpartyname($@wop_team_d);
- set .@pname$,getpartyname(getcharid(1));
+ .@d_tname$ = getpartyname($@wop_team_d);
+ .@pname$ = getpartyname(getcharid(1));
if ($@wop_team_d != 0 && $@wop_team_d == getcharid(1)) {
mes "[Mr. Doppel]";
mes "So, everyone joined the party?";
@@ -791,7 +791,7 @@ poring_w02,170,181,3 script Mr. Doppel#wop_team_d 8_DOPPEL,{
mes "Very well. Nice you have done everything on time.";
delitem 7773,countitem(7773);
close2;
- set wop_team,0;
+ wop_team = 0;
warp "poring_w02",153,82;
end;
}
@@ -801,7 +801,7 @@ poring_w02,170,181,3 script Mr. Doppel#wop_team_d 8_DOPPEL,{
mes "Wait for all the other party members there.";
delitem 7773,countitem(7773);
close2;
- set wop_team,0;
+ wop_team = 0;
warp "poring_w02",153,82;
end;
}
@@ -832,7 +832,7 @@ poring_w02,170,181,3 script Mr. Doppel#wop_team_d 8_DOPPEL,{
mes "So, I'll register your party name as - " + .@pname$ + " -.";
mes "Now, Tell your ^4d4dffmembers to confirm your party^000000.";
mes "I'll send you to the battlefield as soon as I confirm your party.";
- set $@wop_team_d,getcharid(1);
+ $@wop_team_d = getcharid(1);
mapannounce "poring_w02","The registration of the Deviling Team has been confirmed. The party members must confirm their team with Mr. Doppel.",0,0x33FF66;
close;
case 3:
@@ -889,13 +889,13 @@ OnReset:
donpcevent "#wop_angellium2::OnReset";
donpcevent "#wop_devillium1::OnReset";
donpcevent "#wop_devillium2::OnReset";
- set $@wop_team_a,0;
- set $@wop_team_d,0;
- set $@wop_deadcount_a,0;
- set $@wop_deadcount_d,0;
- set $@wop_teamcount,0;
- set $@wop_doorcount_a,0;
- set $@wop_doorcount_d,0;
+ $@wop_team_a = 0;
+ $@wop_team_d = 0;
+ $@wop_deadcount_a = 0;
+ $@wop_deadcount_d = 0;
+ $@wop_teamcount = 0;
+ $@wop_doorcount_a = 0;
+ $@wop_doorcount_d = 0;
donpcevent "#wop_warp_a::OnDisable";
donpcevent "#wop_warp_d::OnDisable";
donpcevent "#wop_warp_rtry::OnDisable";
@@ -930,7 +930,7 @@ OnStop:
end;
OnAngelingWin:
- set .@i,1;
+ .@i = 1;
OnDevilingWin:
removemapflag "poring_w02",mf_partylock;
removemapflag "poring_w02",mf_pvp;
@@ -1044,7 +1044,7 @@ OnDisable:
end;
OnTouch:
- set wop_team,1;
+ wop_team = 1;
warp "poring_w02",57,82;
end;
}
@@ -1066,7 +1066,7 @@ OnDisable:
end;
OnTouch:
- set wop_team,2;
+ wop_team = 2;
warp "poring_w02",140,82;
end;
}
@@ -1086,7 +1086,7 @@ OnAngelingSpawn:
end;
OnMyMobDead:
- set $@wop_deadcount_a,$@wop_deadcount_a + 1;
+ ++$@wop_deadcount_a;
if ($@wop_deadcount_a == 1) {
mapannounce "poring_w02","Mr. Doppel: The Angeling on the 1st base has been killed! 1 point lost!!",0,0x00ff00;
initnpctimer;
@@ -1101,7 +1101,7 @@ OnMyMobDead:
end;
OnTimer120000:
- set $@wop_deadcount_a,$@wop_deadcount_a - 1;
+ --$@wop_deadcount_a;
donpcevent "#wop_angellium1::OnAngelingSpawn";
mapannounce "poring_w02","Mr. Doppel: The Angeling on the 1st base has been revived! 1 point gained!!",0,0x00ff00;
stopnpctimer;
@@ -1120,7 +1120,7 @@ OnAngelingSpawn:
end;
OnMyMobDead:
- set $@wop_deadcount_a,$@wop_deadcount_a + 1;
+ ++$@wop_deadcount_a;
if ($@wop_deadcount_a == 1) {
mapannounce "poring_w02","Mr. Doppel: The Angeling on the 2nd base has been killed! 1 point lost!!",0,0x00ff00;
initnpctimer;
@@ -1135,7 +1135,7 @@ OnMyMobDead:
end;
OnTimer120000:
- set $@wop_deadcount_a,$@wop_deadcount_a - 1;
+ --$@wop_deadcount_a;
donpcevent "#wop_angellium2::OnAngelingSpawn";
mapannounce "poring_w02","Mr. Doppel: The Angeling on the 2nd base has been revived! 1 point gained!!",0,0x00ff00;
stopnpctimer;
@@ -1155,7 +1155,7 @@ OnDevilingSpawn:
end;
OnMyMobDead:
- set $@wop_deadcount_d,$@wop_deadcount_d + 1;
+ ++$@wop_deadcount_d;
if ($@wop_deadcount_d == 1) {
mapannounce "poring_w02","Mr. Doppel: The Deviling on the 1st base has been killed! 1 point lost!!",0,0x00ff00;
initnpctimer;
@@ -1170,7 +1170,7 @@ OnMyMobDead:
end;
OnTimer120000:
- set $@wop_deadcount_d,$@wop_deadcount_d - 1;
+ --$@wop_deadcount_d;
donpcevent "#wop_devillium1::OnDevilingSpawn";
mapannounce "poring_w02","Mr. Doppel: The Deviling on the 1st base has been revived! 1 point gained!!",0,0x00ff00;
stopnpctimer;
@@ -1190,7 +1190,7 @@ OnDevilingSpawn:
end;
OnMyMobDead:
- set $@wop_deadcount_d,$@wop_deadcount_d + 1;
+ ++$@wop_deadcount_d;
if ($@wop_deadcount_d == 1) {
mapannounce "poring_w02","Mr. Doppel: The deviling on the 2nd base has been killed! 1 point lost!!",0,0x00ff00;
initnpctimer;
@@ -1205,7 +1205,7 @@ OnMyMobDead:
end;
OnTimer120000:
- set $@wop_deadcount_d,$@wop_deadcount_d - 1;
+ --$@wop_deadcount_d;
donpcevent "#wop_devillium2::OnDevilingSpawn";
mapannounce "poring_w02","Mr. Doppel: The deviling on the 2nd base has been revived! 1 point gained!!",0,0x00ff00;
stopnpctimer;
@@ -1222,8 +1222,8 @@ poring_w02,99,201,3 script Deviruchi#wop_endmaster 4_DEVIRUCHI,{
mes "- after you loose some weight. -";
close;
}
- set .@a_point,$@wop_deadcount_a;
- set .@d_point,$@wop_deadcount_d;
+ .@a_point = $@wop_deadcount_a;
+ .@d_point = $@wop_deadcount_d;
if (getcharid(1) == $@wop_team_a) {
if (.@a_point < .@d_point) {
mes "[Devi]";
@@ -1427,13 +1427,13 @@ OnTimer68100:
donpcevent "#wop_devillium2::OnReset";
donpcevent "#wop_angellium1::OnReset";
donpcevent "#wop_angellium2::OnReset";
- set $@wop_team_a,0;
- set $@wop_team_d,0;
- set $@wop_deadcount_a,0;
- set $@wop_deadcount_d,0;
- set $@wop_teamcount,0;
- set $@wop_doorcount_a,0;
- set $@wop_doorcount_d,0;
+ $@wop_team_a = 0;
+ $@wop_team_d = 0;
+ $@wop_deadcount_a = 0;
+ $@wop_deadcount_d = 0;
+ $@wop_teamcount = 0;
+ $@wop_doorcount_a = 0;
+ $@wop_doorcount_d = 0;
donpcevent "#wop_warp_a::OnDisable";
donpcevent "#wop_warp_d::OnDisable";
donpcevent "Mr. Doppel#wop_team_a::OnDisable";
@@ -1461,7 +1461,7 @@ poring_w02,99,52,0 script Angeling Guardian#wop_da HIDDEN_NPC,{
if ($@wop_doorcount_a < 4) {
mes "War Badge equipped.";
delitem 7773,1; // War_Badge
- set $@wop_doorcount_a,$@wop_doorcount_a + 1;
+ ++$@wop_doorcount_a;
cutin "wop_emb0" + $@wop_doorcount_a,1;
if ($@wop_doorcount_a == 4) {
next;
@@ -1501,7 +1501,7 @@ poring_w02,99,52,0 script Angeling Guardian#wop_da HIDDEN_NPC,{
end;
OnInit:
- set $@wop_doorcount_a,0;
+ $@wop_doorcount_a = 0;
end;
}
@@ -1558,7 +1558,7 @@ poring_w02,98,113,0 script Deviling Guardian#wop_dd HIDDEN_NPC,{
if ($@wop_doorcount_d < 4) {
mes "War Badge equipped.";
delitem 7773,1; // War_Badge
- set $@wop_doorcount_d,$@wop_doorcount_d + 1;
+ ++$@wop_doorcount_d;
cutin "wop_emb0" + $@wop_doorcount_d,1;
if ($@wop_doorcount_d == 4) {
next;
@@ -1598,7 +1598,7 @@ poring_w02,98,113,0 script Deviling Guardian#wop_dd HIDDEN_NPC,{
end;
OnInit:
- set $@wop_doorcount_d,0;
+ $@wop_doorcount_d = 0;
end;
}