summaryrefslogtreecommitdiff
path: root/npc/other
diff options
context:
space:
mode:
Diffstat (limited to 'npc/other')
-rw-r--r--npc/other/Global_Functions.txt166
-rw-r--r--npc/other/acolyte_warp.txt16
-rw-r--r--npc/other/arena/arena_aco.txt196
-rw-r--r--npc/other/arena/arena_lvl50.txt41
-rw-r--r--npc/other/arena/arena_lvl60.txt41
-rw-r--r--npc/other/arena/arena_lvl70.txt41
-rw-r--r--npc/other/arena/arena_lvl80.txt41
-rw-r--r--npc/other/arena/arena_party.txt93
-rw-r--r--npc/other/arena/arena_point.txt16
-rw-r--r--npc/other/arena/arena_room.txt76
-rw-r--r--npc/other/books.txt66
-rw-r--r--npc/other/card_trader.txt24
-rw-r--r--npc/other/comodo_gambling.txt498
-rw-r--r--npc/other/divorce.txt2
-rw-r--r--npc/other/fortune.txt18
-rw-r--r--npc/other/gm_npcs.txt2
-rw-r--r--npc/other/guildpvp.txt4
-rw-r--r--npc/other/gympass.txt8
-rw-r--r--npc/other/hugel_bingo.txt230
-rw-r--r--npc/other/marriage.txt34
-rw-r--r--npc/other/mercenary_rent.txt43
-rw-r--r--npc/other/monster_race.txt277
-rw-r--r--npc/other/poring_war.txt138
-rw-r--r--npc/other/powernpc.txt30
-rw-r--r--npc/other/pvp.txt16
-rw-r--r--npc/other/turbo_track.txt334
26 files changed, 1229 insertions, 1222 deletions
diff --git a/npc/other/Global_Functions.txt b/npc/other/Global_Functions.txt
index 559ba151f..4e9060419 100644
--- a/npc/other/Global_Functions.txt
+++ b/npc/other/Global_Functions.txt
@@ -48,74 +48,74 @@
function script F_ClearJobVar {
// Misc ---------------------------------
- set JBLVL,0;
- set FIRSTAID,0;
- set PLAYDEAD,0;
- set got_bandage,0;
- set got_novnametag,0;
+ JBLVL = 0;
+ FIRSTAID = 0;
+ PLAYDEAD = 0;
+ got_bandage = 0;
+ got_novnametag = 0;
// First Class Jobs ---------------------
- set job_acolyte_q,0; set job_acolyte_q2,0;
- set job_archer_q,0;
- set job_magician_q,0;
- set job_merchant_q,0; set job_merchant_q2,0; set job_merchant_q3,0;
- set job_sword_q,0; set SWTEST, 0;
- set job_thief_q,0;
+ job_acolyte_q = 0; job_acolyte_q2 = 0;
+ job_archer_q = 0;
+ job_magician_q = 0;
+ job_merchant_q = 0; job_merchant_q2 = 0; job_merchant_q3 = 0;
+ job_sword_q = 0; SWTEST = 0;
+ job_thief_q = 0;
// Super Novice
- set SUPNOV_Q,0;
+ SUPNOV_Q = 0;
// 2-1 Jobs ------------------------------
- set ASSIN_Q,0; set ASSIN_Q2,0; set ASSIN_Q3,0;
- set BSMITH_Q,0; set BSMITH_Q2,0;
- set HNTR_Q,0; set HNTR_Q2,0;
- set KNIGHT_Q,0; set KNIGHT_Q2,0;
- set PRIEST_Q,0; set PRIEST_Q2,0; set PRIEST_Q3,0;
- set WIZ_Q,0; set WIZ_Q2,0;
+ ASSIN_Q = 0; ASSIN_Q2 = 0; ASSIN_Q3 = 0;
+ BSMITH_Q = 0; BSMITH_Q2 = 0;
+ HNTR_Q = 0; HNTR_Q2 = 0;
+ KNIGHT_Q = 0; KNIGHT_Q2 = 0;
+ PRIEST_Q = 0; PRIEST_Q2 = 0; PRIEST_Q3 = 0;
+ WIZ_Q = 0; WIZ_Q2 = 0;
// 2-2 Jobs ------------------------------
- set ROGUE_Q,0; set ROGUE_Q2,0;
- set ALCH_Q,0; set ALCH_Q2,0;
- set CRUS_Q,0;
- set MONK_Q,0; set JOB_MONK_C,0;
- set SAGE_Q,0; set SAGE_Q2,0;
- set DANC_Q,0;
- set BARD_Q,0;
+ ROGUE_Q = 0; ROGUE_Q2 = 0;
+ ALCH_Q = 0; ALCH_Q2 = 0;
+ CRUS_Q = 0;
+ MONK_Q = 0; JOB_MONK_C = 0;
+ SAGE_Q = 0; SAGE_Q2 = 0;
+ DANC_Q = 0;
+ BARD_Q = 0;
// Extended Classes
- set TAEK_Q,0; set TK_Q,0;
- set STGL_Q,0;
- set SOUL_Q,0;
- set GUNS_Q,0;
- set NINJ_Q,0;
+ TAEK_Q = 0; TK_Q = 0;
+ STGL_Q = 0;
+ SOUL_Q = 0;
+ GUNS_Q = 0;
+ NINJ_Q = 0;
return;
}
function script F_ClearGarbage {
// Clear outdated global VARS
//Clear TURTLE var if the Turtle Islans Quest is already done
- if(TURTLE==20) set MISC_QUEST,MISC_QUEST | 65536;
- if(MISC_QUEST & 65536) set TURTLE,0; //now clear the var if the quest is over
+ if(TURTLE==20) MISC_QUEST |= 65536;
+ if(MISC_QUEST & 65536) TURTLE = 0; //now clear the var if the quest is over
//Clear previously saved Quest Skills (now it isn't used)
- set ADV_QSK,0;
- set ADV_QSK2,0;
+ ADV_QSK = 0;
+ ADV_QSK2 = 0;
//Old Seset Skill Event used to use RES_SKILL var
- set RES_SKILL,0;
+ RES_SKILL = 0;
//Here you put outdated variables from your outdated EVENTS
//e.g. Is XMAS done? Add the EVENT var clearing code here.
//due to bugs in BS quest:
- set wizard_m2,0;
+ wizard_m2 = 0;
// Old Novice Ground Variables.
- set NEW_MES_FLAG0,0;
- set NEW_MES_FLAG1,0;
- set NEW_MES_FLAG2,0;
- set NEW_MES_FLAG3,0;
- set NEW_MES_FLAG4,0;
- set NEW_MES_FLAG5,0;
- set NEW_LVUP0,0;
- set NEW_LVUP1,0;
- set NEW_JOBLVUP,0;
+ NEW_MES_FLAG0 = 0;
+ NEW_MES_FLAG1 = 0;
+ NEW_MES_FLAG2 = 0;
+ NEW_MES_FLAG3 = 0;
+ NEW_MES_FLAG4 = 0;
+ NEW_MES_FLAG5 = 0;
+ NEW_LVUP0 = 0;
+ NEW_LVUP1 = 0;
+ NEW_JOBLVUP = 0;
// Old DTS variables that are no longer used.
- set dtseligible,0;
- set MISC_QUEST,MISC_QUEST & ~128;
+ dtseligible = 0;
+ MISC_QUEST = MISC_QUEST & ~128;
return;
}
@@ -144,7 +144,7 @@ function script Job_Change {
//returns random argument
// Example: check F_Bye or F_Hi functions
// READ AND THINK: You can use it to pick a random number from a list:
-// set @itemIDfromList, callfunc("F_Rand",1129,1222,1163,1357,1360,1522,1811,1410);
+// @itemIDfromList = callfunc("F_Rand",1129,1222,1163,1357,1360,1522,1811,1410);
function script F_Rand {
return getarg(rand(getargcount()));
@@ -196,20 +196,20 @@ function script F_Bye {
function script F_ItemName {
if(getarg(3))
- set .@t$,.@t$+"+"+getarg(3)+" ";
+ .@t$ += "+"+getarg(3)+" ";
switch(getarg(2)) {
case 0: break;
- case 1: set .@t$,.@t$+"VS "; break;
- case 2: set .@t$,.@t$+"VVS "; break;
- case 3: set .@t$,.@t$+"VVVS "; break;
- default: set .@t$,.@t$+getarg(2)+"xVS "; break;
+ case 1: .@t$ += "VS "; break;
+ case 2: .@t$ += "VVS "; break;
+ case 3: .@t$ += "VVVS "; break;
+ default: .@t$ += getarg(2)+"xVS "; break;
}
switch(getarg(1)) {
- case 1: set .@t$,.@t$+"Ice "; break;
- case 2: set .@t$,.@t$+"Earth "; break;
- case 3: set .@t$,.@t$+"Fire "; break;
- case 4: set .@t$,.@t$+"Wind "; break;
- default: set .@t$,.@t$+"Strange "; break;
+ case 1: .@t$ += "Ice "; break;
+ case 2: .@t$ += "Earth "; break;
+ case 3: .@t$ += "Fire "; break;
+ case 4: .@t$ += "Wind "; break;
+ default: .@t$ += "Strange "; break;
}
return "^000090"+.@t$+getitemname(getarg(0))+"^000000";
}
@@ -218,14 +218,14 @@ function script F_ItemName {
// *** Function "F_SaveQuestSkills": Store learnt quest skills
//////////////////////////////////////////////////////////////////////////////////
function script F_SaveQuestSkills {
- set ADV_QSK,0; set ADV_QSK2,0;
+ ADV_QSK = 0; ADV_QSK2 = 0;
//1st classes quest skills
- for(set .@i, 0; .@i < 14; set .@i, .@i + 1){
- if(getskilllv(144+.@i)) set ADV_QSK,ADV_QSK|pow(2,.@i);
+ for (.@i = 0; .@i < 14; ++.@i) {
+ if(getskilllv(144+.@i)) ADV_QSK |= pow(2,.@i);
}
//2nd classes quest skills
- for(set .@i, 0; .@i < 19; set .@i, .@i + 1){
- if(getskilllv(1001+.@i)) set ADV_QSK2,ADV_QSK2|pow(2,.@i);
+ for (.@i = 0; .@i < 19; ++.@i) {
+ if(getskilllv(1001+.@i)) ADV_QSK2 |= pow(2,.@i);
}
return;
}
@@ -235,10 +235,10 @@ function script F_SaveQuestSkills {
//////////////////////////////////////////////////////////////////////////////////
function script F_Load1Skills {
//1st classes quest skills
- for(set .@i, 0; .@i < 14; set .@i, .@i + 1){
+ for(.@i = 0; .@i < 14; ++.@i) {
if(ADV_QSK|pow(2,.@i) == ADV_QSK) skill 144+.@i,1,0;
}
- set ADV_QSK,0; //Clear var
+ ADV_QSK = 0; //Clear var
return;
}
@@ -247,10 +247,10 @@ function script F_Load1Skills {
//////////////////////////////////////////////////////////////////////////////////
function script F_Load2Skills {
//2nd classes quest skills
- for(set .@i, 0; .@i < 19; set .@i, .@i + 1){
+ for (.@i = 0; .@i < 19; ++.@i) {
if(ADV_QSK2|pow(2,.@i) == ADV_QSK2) skill 1001+.@i,1,0;
}
- set ADV_QSK2,0; //Clear var
+ ADV_QSK2 = 0; //Clear var
return;
}
@@ -309,35 +309,35 @@ function script F_GetArmorType {
// Time calculation Function
// *********************************************************************
function script Time2Str {
- set .@time_left, getarg(0) - gettimetick(2);
+ .@time_left = getarg(0) - gettimetick(2);
- set .@Days, .@time_left / 86400;
- set .@time_left, .@time_left - (.@Days * 86400);
- set .@Hours, .@time_left / 3600;
- set .@time_left, .@time_left - (.@Hours * 3600);
- set .@Minutes, .@time_left / 60;
- set .@time_left, .@time_left - (.@Minutes * 60);
+ .@Days = .@time_left / 86400;
+ .@time_left -= (.@Days * 86400);
+ .@Hours = .@time_left / 3600;
+ .@time_left -= (.@Hours * 3600);
+ .@Minutes = .@time_left / 60;
+ .@time_left -= (.@Minutes * 60);
- set .@Time$, "";
+ .@Time$ = "";
if( .@Days > 1 )
- set .@Time$, .@Time$ + .@Days + " days, ";
+ .@Time$ += .@Days + " days, ";
else if( .@Days > 0 )
- set .@Time$, .@Time$ + .@Days + " day, ";
+ .@Time$ += .@Days + " day, ";
if( .@Hours > 1 )
- set .@Time$, .@Time$ + .@Hours + " hours, ";
+ .@Time$ += .@Hours + " hours, ";
else if( .@Hours > 0 )
- set .@Time$, .@Time$ + .@Hours + " hour, ";
+ .@Time$ += .@Hours + " hour, ";
if( .@Minutes > 1 )
- set .@Time$, .@Time$ + .@Minutes + " minutes, ";
+ .@Time$ += .@Minutes + " minutes, ";
else if( .@Minutes > 0 )
- set .@Time$, .@Time$ + .@Minutes + " minute, ";
+ .@Time$ += .@Minutes + " minute, ";
if( .@time_left > 1 || .@time_left == 0 )
- set .@Time$, .@Time$ + .@time_left + " seconds";
+ .@Time$ += .@time_left + " seconds";
else if( .@time_left == 1 )
- set .@Time$, .@Time$ + .@time_left + " second";
+ .@Time$ += .@time_left + " second";
return .@Time$;
}
diff --git a/npc/other/acolyte_warp.txt b/npc/other/acolyte_warp.txt
index 10cd72124..9760d4e67 100644
--- a/npc/other/acolyte_warp.txt
+++ b/npc/other/acolyte_warp.txt
@@ -41,10 +41,10 @@ prontera,98,121,4 script Acolyte#Prtclear 4_F_01,{
setarray .@maps$[0], "izlude", "geffen", "payon", "morocc", "alberta", "aldebaran", "comodo", "umbala", "yuno";
setarray .@cost[0], 600, 1200, 1200, 1200, 1800, 2200, 2200, 2200, 1800;
- set .@size, getarraysize(.@towns$);
- for(set .@i,0; .@i<.@size; set .@i,.@i+1)
- set .@menu$, .@menu$+.@towns$[.@i]+" -> "+.@cost[.@i]+"z:";
- set .@i, select(.@menu$+"Cancel")-1;
+ .@size = getarraysize(.@towns$);
+ for(.@i = 0; .@i<.@size; ++.@i)
+ .@menu$ += .@towns$[.@i]+" -> "+.@cost[.@i]+"z:";
+ .@i = select(.@menu$+"Cancel")-1;
if (.@i == .@size)
close;
if (Zeny < .@cost[.@i]) {
@@ -104,10 +104,10 @@ yuno,142,184,6 script Acolyte#Junoclear 4_F_01,{
setarray .@maps$[0], "einbroch", "lighthalzen", "hugel", "rachel", "prontera";
setarray .@cost[0], 2200, 2200, 2200, 2200, 1800;
- set .@size, getarraysize(.@towns$);
- for(set .@i,0; .@i<.@size; set .@i,.@i+1)
- set .@menu$, .@menu$+.@towns$[.@i]+" -> "+.@cost[.@i]+"z:";
- set .@i, select(.@menu$+"Cancel")-1;
+ .@size = getarraysize(.@towns$);
+ for(.@i = 0; .@i<.@size; ++.@i)
+ .@menu$ += .@towns$[.@i]+" -> "+.@cost[.@i]+"z:";
+ .@i = select(.@menu$+"Cancel")-1;
if (.@i == .@size)
close;
if (Zeny < .@cost[.@i]) {
diff --git a/npc/other/arena/arena_aco.txt b/npc/other/arena/arena_aco.txt
index cc0b4b640..65ed3c6e3 100644
--- a/npc/other/arena/arena_aco.txt
+++ b/npc/other/arena/arena_aco.txt
@@ -113,7 +113,7 @@ OnReset_09:
- script Trocco#aco1 -1,{
OnEnable:
initnpctimer;
- set $@arn_1,gettimetick(2);
+ $@arn_1 = gettimetick(2);
end;
OnTimer2000:
@@ -302,7 +302,7 @@ OnMyMobDead:
force_5-1,25,69,0 script force_02start#aco -1,1,1,{
OnTouch:
- set $@drop_gate,0;
+ $@drop_gate = 0;
donpcevent "force_02mob#aco::OnEnable";
disablenpc "force_02start#aco";
end;
@@ -320,7 +320,7 @@ OnReset:
OnMyMobDead:
if ((mobcount("force_5-1","force_02mob#aco::OnMyMobDead") < 11) && ($@drop_gate == 0)) {
- set $@drop_gate,1;
+ $@drop_gate = 1;
donpcevent "Trocco#aco1::On02_End";
donpcevent "arena_aco1::OnReset_02";
}
@@ -482,7 +482,7 @@ OnReset:
OnMyMobDead:
if (mobcount("force_5-1","force_09mob#aco::OnMyMobDead") < 1) {
donpcevent "Trocco#aco1::On09_End";
- set $@arn_2,gettimetick(2);
+ $@arn_2 = gettimetick(2);
donpcevent "arena_aco1::OnReset_09";
}
end;
@@ -541,7 +541,7 @@ OnReset_09:
- script Trocco#aco2 -1,{
OnEnable:
initnpctimer;
- set $@arn_1,gettimetick(2);
+ $@arn_1 = gettimetick(2);
end;
OnTimer2000:
@@ -1018,7 +1018,7 @@ OnReset:
OnMyMobDead:
if (mobcount("force_5-1","force_09mob#pri::OnMyMobDead") < 1) {
donpcevent "Trocco#aco2::On09_End";
- set $@arn_2,gettimetick(2);
+ $@arn_2 = gettimetick(2);
donpcevent "arena_aco2::OnReset_09";
}
end;
@@ -1062,7 +1062,7 @@ prt_are_in,181,83,3 script Staff#aco-1 1_F_02,{
next;
}
else {
- set arena_point,arena_point+1;
+ ++arena_point;
}
mes "[Staff]";
mes "Well, let me guide";
@@ -1076,23 +1076,23 @@ prt_are_in,181,83,3 script Staff#aco-1 1_F_02,{
}
prt_are_in,25,31,3 script Staff#aco-2 1_F_02,{
- set .@start_timeaco, $@arn_1;
- set .@hour_startaco, .@start_timeaco / 10000;
- set .@min_startaco, ((.@start_timeaco % 10000) / 100);
- set .@sec_startaco, .@start_timeaco % 100;
- set .@end_timeaco, $@arn_2;
- set .@hour_endaco, .@end_timeaco / 10000;
- set .@min_endaco, ((.@end_timeaco % 10000) / 100);
- set .@sec_endaco, .@end_timeaco % 100;
+ .@start_timeaco = $@arn_1;
+ .@hour_startaco = .@start_timeaco / 10000;
+ .@min_startaco = ((.@start_timeaco % 10000) / 100);
+ .@sec_startaco = .@start_timeaco % 100;
+ .@end_timeaco = $@arn_2;
+ .@hour_endaco = .@end_timeaco / 10000;
+ .@min_endaco = ((.@end_timeaco % 10000) / 100);
+ .@sec_endaco = .@end_timeaco % 100;
if ((.@hour_startaco == 23) && (.@hour_endaco == 0)) {
- set .@hour_endaco,24;
+ .@hour_endaco = 24;
}
- set .@st_to_secaco, ((.@hour_startaco * 3600) + (.@min_startaco * 60) + (.@sec_startaco));
- set .@et_to_secaco, ((.@hour_endaco * 3600) + (.@min_endaco * 60) + (.@sec_endaco));
- set .@record_timeaco, (.@et_to_secaco - .@st_to_secaco);
- set .@record_houraco, .@record_timeaco / 3600;
- set .@record_minaco, ((.@record_timeaco % 3600) / 60);
- set .@record_secaco, .@record_timeaco % 60;
+ .@st_to_secaco = ((.@hour_startaco * 3600) + (.@min_startaco * 60) + (.@sec_startaco));
+ .@et_to_secaco = ((.@hour_endaco * 3600) + (.@min_endaco * 60) + (.@sec_endaco));
+ .@record_timeaco = (.@et_to_secaco - .@st_to_secaco);
+ .@record_houraco = .@record_timeaco / 3600;
+ .@record_minaco = ((.@record_timeaco % 3600) / 60);
+ .@record_secaco = .@record_timeaco % 60;
if ((.@record_timeaco < 0 ) || (.@record_houraco < 0) || (.@record_minaco < 0 ) || (.@record_secaco < 0)) {
emotion e_omg;
mes "[Staff]";
@@ -1126,7 +1126,7 @@ prt_are_in,25,31,3 script Staff#aco-2 1_F_02,{
mes "your time in the Arena~";
close2;
if (arena_point < 29981) {
- set arena_point,arena_point+20;
+ arena_point += 20;
warp "arena_room",100,75;
donpcevent "#arn_timer_aco::OnStop";
donpcevent "Acolyte Waiting Room::OnStart";
@@ -1140,30 +1140,30 @@ prt_are_in,25,31,3 script Staff#aco-2 1_F_02,{
}
else {
if (BaseJob == Job_Acolyte) {
- set .@acotop_t,$arn_acotop;
- set .@acotop_n$,$arn_acotopn$;
+ .@acotop_t = $arn_acotop;
+ .@acotop_n$ = $arn_acotopn$;
}
else {
if (BaseLevel < 70) {
- set .@acotop_t,$arn_pritop60;
- set .@acotop_n$,$arn_pritopn60$;
+ .@acotop_t = $arn_pritop60;
+ .@acotop_n$ = $arn_pritopn60$;
}
else if (BaseLevel < 80) {
- set .@acotop_t,$arn_pritop70;
- set .@acotop_n$,$arn_pritopn70$;
+ .@acotop_t = $arn_pritop70;
+ .@acotop_n$ = $arn_pritopn70$;
}
else if (BaseLevel < 90) {
- set .@acotop_t,$arn_pritop80;
- set .@acotop_n$,$arn_pritopn80$;
+ .@acotop_t = $arn_pritop80;
+ .@acotop_n$ = $arn_pritopn80$;
}
else {
- set .@acotop_t,$arn_pritop90;
- set .@acotop_n$,$arn_pritopn90$;
+ .@acotop_t = $arn_pritop90;
+ .@acotop_n$ = $arn_pritopn90$;
}
}
- set .@topbunaco, ((.@acotop_t % 3600) / 60);
- set .@topchoaco, .@acotop_t % 60;
- set .@gapaco, .@acotop_t - .@record_timeaco;
+ .@topbunaco = ((.@acotop_t % 3600) / 60);
+ .@topchoaco = .@acotop_t % 60;
+ .@gapaco = .@acotop_t - .@record_timeaco;
mes "[Staff]";
mes "^3131FF"+strcharinfo(0)+"^000000, right?";
mes "Hey, you did great! You";
@@ -1196,26 +1196,26 @@ prt_are_in,25,31,3 script Staff#aco-2 1_F_02,{
mes "under the Time Force Battle";
mes "Arena - Acolyte Class Record!";
if (BaseJob == Job_Acolyte) {
- set $arn_acotop,.@record_timeaco;
- set $arn_acotopn$, strcharinfo(0);
+ $arn_acotop = .@record_timeaco;
+ $arn_acotopn$ = strcharinfo(0);
donpcevent "Vendigos::OnLineRec_aco";
}
else {
if (BaseLevel < 70) {
- set $arn_pritop60,.@record_timeaco;
- set $arn_pritopn60$, strcharinfo(0);
+ $arn_pritop60 = .@record_timeaco;
+ $arn_pritopn60$ = strcharinfo(0);
}
else if (BaseLevel < 80) {
- set $arn_pritop70,.@record_timeaco;
- set $arn_pritopn70$, strcharinfo(0);
+ $arn_pritop70 = .@record_timeaco;
+ $arn_pritopn70$ = strcharinfo(0);
}
else if (BaseLevel < 90) {
- set $arn_pritop80,.@record_timeaco;
- set $arn_pritopn80$, strcharinfo(0);
+ $arn_pritop80 = .@record_timeaco;
+ $arn_pritopn80$ = strcharinfo(0);
}
else {
- set $arn_pritop90,.@record_timeaco;
- set $arn_pritopn90$, strcharinfo(0);
+ $arn_pritop90 = .@record_timeaco;
+ $arn_pritopn90$ = strcharinfo(0);
}
donpcevent "Vendigos::OnLineRec_pri";
}
@@ -1251,7 +1251,7 @@ prt_are_in,25,31,3 script Staff#aco-2 1_F_02,{
mes "Now let me guide you";
mes "back to the Arena Lobby...";
close2;
- set arena_point,30000;
+ arena_point = 30000;
}
else {
mes "[Staff]";
@@ -1268,7 +1268,7 @@ prt_are_in,25,31,3 script Staff#aco-2 1_F_02,{
mes "Now let me guide you";
mes "back to the Arena Lobby...";
close2;
- set arena_point,arena_point+50;
+ arena_point += 50;
}
specialeffect2 EF_EXIT;
warp "arena_room",100,75;
@@ -1315,7 +1315,7 @@ prt_are_in,25,31,3 script Staff#aco-2 1_F_02,{
mes "Now let me guide you";
mes "back to the Arena Lobby...";
close2;
- set arena_point,30000;
+ arena_point = 30000;
}
else {
mes "[Staff]";
@@ -1332,7 +1332,7 @@ prt_are_in,25,31,3 script Staff#aco-2 1_F_02,{
mes "Now let me guide you";
mes "back to the Arena Lobby...";
close2;
- set arena_point,arena_point+20;
+ arena_point += 20;
}
specialeffect2 EF_EXIT;
warp "arena_room",100,75;
@@ -1355,29 +1355,29 @@ prt_are_in,25,31,3 script Staff#aco-2 1_F_02,{
mes "Acolyte Class Records.";
mes "Congratulations~";
if (BaseJob == Job_Acolyte) {
- set $arn_acotop,.@record_timeaco;
- set $arn_acotopn$, strcharinfo(0);
+ $arn_acotop = .@record_timeaco;
+ $arn_acotopn$ = strcharinfo(0);
donpcevent "#Vendigos::OnLineRec_aco";
}
else {
if (BaseLevel < 70) {
- set $arn_pritop60,.@record_timeaco;
- set $arn_pritopn60$, strcharinfo(0);
+ $arn_pritop60 = .@record_timeaco;
+ $arn_pritopn60$ = strcharinfo(0);
donpcevent "#Vendigos::OnLineRec_pri60";
}
else if (BaseLevel < 80) {
- set $arn_pritop70,.@record_timeaco;
- set $arn_pritopn70$, strcharinfo(0);
+ $arn_pritop70 = .@record_timeaco;
+ $arn_pritopn70$ = strcharinfo(0);
donpcevent "#Vendigos::OnLineRec_pri70";
}
else if (BaseLevel < 90) {
- set $arn_pritop80,.@record_timeaco;
- set $arn_pritopn80$, strcharinfo(0);
+ $arn_pritop80 = .@record_timeaco;
+ $arn_pritopn80$ = strcharinfo(0);
donpcevent "#Vendigos::OnLineRec_pri80";
}
else {
- set $arn_pritop90,.@record_timeaco;
- set $arn_pritopn90$, strcharinfo(0);
+ $arn_pritop90 = .@record_timeaco;
+ $arn_pritopn90$ = strcharinfo(0);
donpcevent "#Vendigos::OnLineRec_pri90";
}
}
@@ -1413,7 +1413,7 @@ prt_are_in,25,31,3 script Staff#aco-2 1_F_02,{
mes "Now let me guide you";
mes "back to the Arena Lobby...";
close2;
- set arena_point,30000;
+ arena_point = 30000;
}
else {
mes "[Staff]";
@@ -1430,7 +1430,7 @@ prt_are_in,25,31,3 script Staff#aco-2 1_F_02,{
mes "Now let me guide you";
mes "back to the Arena Lobby...";
close2;
- set arena_point,arena_point+20;
+ arena_point += 20;
}
specialeffect2 EF_EXIT;
warp "arena_room",100,75;
@@ -1570,10 +1570,10 @@ arena_room,94,82,7 script Arena Record Staff#aco 1_F_PRIEST,{
next;
switch(select("Acolyte Mode:Priest - Level 70 or lower:Priest - Level 80 or lower:Priest - Level 90 or lower:Priest - Level 91 ~ "+(checkre(0)?"160":"99"))) {
case 1:
- set .@acotop_t,$arn_acotop;
- set .@acotop_n$,$arn_acotopn$;
- set .@acotopbun, ((.@acotop_t % 3600) / 60 );
- set .@acotopcho, (.@acotop_t % 60);
+ .@acotop_t = $arn_acotop;
+ .@acotop_n$ = $arn_acotopn$;
+ .@acotopbun = ((.@acotop_t % 3600) / 60 );
+ .@acotopcho = (.@acotop_t % 60);
mes "[Mathea]";
mes "^3131FF"+.@acotop_n$+"^000000";
mes "is the top player of the";
@@ -1583,24 +1583,24 @@ arena_room,94,82,7 script Arena Record Staff#aco 1_F_PRIEST,{
mes "for participating in the Arena.";
close;
case 2:
- set .@pritop_t,$arn_pritop60;
- set .@pritop_n$,$arn_pritopn60$;
+ .@pritop_t = $arn_pritop60;
+ .@pritop_n$ = $arn_pritopn60$;
break;
case 3:
- set .@pritop_t,$arn_pritop70;
- set .@pritop_n$,$arn_pritopn70$;
+ .@pritop_t = $arn_pritop70;
+ .@pritop_n$ = $arn_pritopn70$;
break;
case 4:
- set .@pritop_t,$arn_pritop80;
- set .@pritop_n$,$arn_pritopn80$;
+ .@pritop_t = $arn_pritop80;
+ .@pritop_n$ = $arn_pritopn80$;
break;
case 5:
- set .@pritop_t,$arn_pritop90;
- set .@pritop_n$,$arn_pritopn90$;
+ .@pritop_t = $arn_pritop90;
+ .@pritop_n$ = $arn_pritopn90$;
break;
}
- set .@pritopbun, ((.@pritop_t % 3600) / 60 );
- set .@pritopcho, (.@pritop_t % 60);
+ .@pritopbun = ((.@pritop_t % 3600) / 60 );
+ .@pritopcho = (.@pritop_t % 60);
mes "[Mathea]";
mes "^3131FF"+.@pritop_n$+"^000000";
mes "is the top player of this";
@@ -1612,16 +1612,16 @@ arena_room,94,82,7 script Arena Record Staff#aco 1_F_PRIEST,{
OnInit:
if ($arn_acotopn$ == "") {
- set $arn_pritop60, 480;
- set $arn_pritop70, 480;
- set $arn_pritop80, 480;
- set $arn_pritop90, 480;
- set $arn_acotop, 480;
- set $arn_pritopn60$, "Default";
- set $arn_pritopn70$, "Default";
- set $arn_pritopn80$, "Default";
- set $arn_pritopn90$, "Default";
- set $arn_acotopn$, "Default";
+ $arn_pritop60 = 480;
+ $arn_pritop70 = 480;
+ $arn_pritop80 = 480;
+ $arn_pritop90 = 480;
+ $arn_acotop = 480;
+ $arn_pritopn60$ = "Default";
+ $arn_pritopn70$ = "Default";
+ $arn_pritopn80$ = "Default";
+ $arn_pritopn90$ = "Default";
+ $arn_acotopn$ = "Default";
}
end;
}
@@ -1709,7 +1709,7 @@ arena_room,140,136,3 script Guide Alias 4_F_NOVICE,{
}
arena_room,195,5,3 script log-on-aco#arena 4_NFWISP,{
- set .@i, callfunc("F_GM_NPC",1357,0);
+ .@i = callfunc("F_GM_NPC",1357,0);
if (.@i == -1) {
mes "^3355FFIncorrect Password.^000000";
close;
@@ -1728,24 +1728,24 @@ arena_room,195,5,3 script log-on-aco#arena 4_NFWISP,{
mes "been canceled.^000000";
close;
case 2:
- set $arn_acotop, 480;
- set $arn_acotopn$, "Default";
+ $arn_acotop = 480;
+ $arn_acotopn$ = "Default";
break;
case 3:
- set $arn_pritop60, 480;
- set $arn_pritopn60$, "Default";
+ $arn_pritop60 = 480;
+ $arn_pritopn60$ = "Default";
break;
case 4:
- set $arn_pritop70, 480;
- set $arn_pritopn70$, "Default";
+ $arn_pritop70 = 480;
+ $arn_pritopn70$ = "Default";
break;
case 5:
- set $arn_pritop80, 480;
- set $arn_pritopn80$, "Default";
+ $arn_pritop80 = 480;
+ $arn_pritopn80$ = "Default";
break;
case 6:
- set $arn_pritop90, 480;
- set $arn_pritopn90$, "Default";
+ $arn_pritop90 = 480;
+ $arn_pritopn90$ = "Default";
break;
}
close;
@@ -1753,7 +1753,7 @@ arena_room,195,5,3 script log-on-aco#arena 4_NFWISP,{
}
arena_room,195,10,3 script acolink#arena 4_NFWISP,{
- set .@i, callfunc("F_GM_NPC",1357,0);
+ .@i = callfunc("F_GM_NPC",1357,0);
if (.@i == -1) {
mes "Command has";
mes "been canceled.";
diff --git a/npc/other/arena/arena_lvl50.txt b/npc/other/arena/arena_lvl50.txt
index e1e98d3b2..9c91c684c 100644
--- a/npc/other/arena/arena_lvl50.txt
+++ b/npc/other/arena/arena_lvl50.txt
@@ -37,8 +37,8 @@ force_1-1,99,20,4 script Heel and Toe#arena 4_F_TELEPORTER,{
OnStart:
initnpctimer;
- set $arena_min50st,gettime(2);
- set $arena_sec50st,gettime(1);
+ $arena_min50st = gettime(2);
+ $arena_sec50st = gettime(1);
end;
OnTimer3000:
@@ -774,8 +774,8 @@ OnMyMobDead:
donpcevent "Heel and Toe#arena::On09_End";
donpcevent "arena#50::OnReset_09";
donpcevent "arena#50::OnReset_All";
- set $arena_min50end,gettime(2);
- set $arena_sec50end,gettime(1);
+ $arena_min50end = gettime(2);
+ $arena_sec50end = gettime(1);
}
end;
}
@@ -791,8 +791,9 @@ prt_are_in,129,188,3 script Staff#50-1 1_F_02,{
mes "You already have enough arena points.";
mes "Please spend some arena points later. When I see you next time, I will make sure to give you some reward.";
next;
+ } else {
+ ++arena_point;
}
- else set arena_point, arena_point + 1;
mes "[Staff]";
mes "Let me guide you outside. I hope you had a good time.";
close2;
@@ -804,22 +805,22 @@ prt_are_in,129,188,3 script Staff#50-1 1_F_02,{
prt_are_in,25,188,3 script Staff#50-2 1_F_02,{
if($arena_min50end < $arena_min50st) {
if($arena_sec50end < $arena_sec50st) {
- set @record_min50,60 - $arena_min50st + $arena_min50end -1;
- set @record_sec50,60 - $arena_sec50st + $arena_sec50end;
+ @record_min50 = 60 - $arena_min50st + $arena_min50end -1;
+ @record_sec50 = 60 - $arena_sec50st + $arena_sec50end;
} else {
- set @record_min50,60 - $arena_min50st + $arena_min50end;
- set @record_sec50,$arena_sec50end - $arena_sec50st;
+ @record_min50 = 60 - $arena_min50st + $arena_min50end;
+ @record_sec50 = $arena_sec50end - $arena_sec50st;
}
} else {
if($arena_sec50end < $arena_sec50st) {
- set @record_min50,$arena_min50end - $arena_min50st -1;
- set @record_sec50,60 - $arena_sec50st + $arena_sec50end;
+ @record_min50 = $arena_min50end - $arena_min50st -1;
+ @record_sec50 = 60 - $arena_sec50st + $arena_sec50end;
} else {
- set @record_min50,$arena_min50end - $arena_min50st;
- set @record_sec50,$arena_sec50end - $arena_sec50st;
+ @record_min50 = $arena_min50end - $arena_min50st;
+ @record_sec50 = $arena_sec50end - $arena_sec50st;
}
}
- set @gap50,(60 * $top_50min + $top_50sec) - (60 * @record_min50 + @record_sec50);
+ @gap50 = (60 * $top_50min + $top_50sec) - (60 * @record_min50 + @record_sec50);
mes "[Staff]";
mes "Wow, you did a good job~ ";
mes "Your name is...^3131FF" + strcharinfo(0) +"^000000, isn't it?";
@@ -852,7 +853,7 @@ prt_are_in,25,188,3 script Staff#50-2 1_F_02,{
mes "Thank you.";
close2;
} else {
- set arena_point, arena_point + 20;
+ arena_point += 20;
mes "[Staff]";
mes "Let me reward you some arena points.";
mes "If you wish to check the amount of arena points you have, please go talk to ^3131FFVendigos^000000 at the arena entrance.";
@@ -877,9 +878,9 @@ prt_are_in,25,188,3 script Staff#50-2 1_F_02,{
next;
mes "[Staff]";
mes "You have been recorded as the fastest player among people who cleared ^FF0000Arena Time Force Battle lvl 50s^000000, ^3131FF"+strcharinfo(0)+"^000000.";
- set $top_50min, @record_min50;
- set $top_50sec, @record_sec50;
- set $arena_50topn$,strcharinfo(0);
+ $top_50min = @record_min50;
+ $top_50sec = @record_sec50;
+ $arena_50topn$ = strcharinfo(0);
donpcevent "Vendigos::OnLineRec_50";
next;
if (arena_point > 29950) {
@@ -899,7 +900,7 @@ prt_are_in,25,188,3 script Staff#50-2 1_F_02,{
mes "Let me reward you with some arena points.";
mes "At the same time, since you have renewed the record you will receive an extra amount of the points this time.";
next;
- set arena_point, arena_point + 50;
+ arena_point += 50;
mes "[Staff]";
mes "Let me reward you some arena points.";
mes "If you wish to check the amount of arena points you have, please go talk to ^3131FFVendigos^000000 at the arena entrance.";
@@ -1007,6 +1008,6 @@ OnEnable:
end;
OnInit:
- if(!$top_50min && !$top_50sec) set $top_50min,5;
+ if(!$top_50min && !$top_50sec) $top_50min = 5;
end;
}
diff --git a/npc/other/arena/arena_lvl60.txt b/npc/other/arena/arena_lvl60.txt
index c3d33f333..51c29def1 100644
--- a/npc/other/arena/arena_lvl60.txt
+++ b/npc/other/arena/arena_lvl60.txt
@@ -38,8 +38,8 @@ force_2-1,99,20,4 script Minilover#arena 4_F_TELEPORTER,{
OnStart:
initnpctimer;
- set $arena_min60st,gettime(2);
- set $arena_sec60st,gettime(1);
+ $arena_min60st = gettime(2);
+ $arena_sec60st = gettime(1);
end;
OnTimer3000:
@@ -784,8 +784,8 @@ OnMyMobDead:
donpcevent "Minilover#arena::On09_End";
donpcevent "arena#60::OnReset_09";
donpcevent "arena#60::OnReset_All";
- set $arena_min60end,gettime(2);
- set $arena_sec60end,gettime(1);
+ $arena_min60end = gettime(2);
+ $arena_sec60end = gettime(1);
}
end;
}
@@ -801,8 +801,9 @@ prt_are_in,129,135,3 script Staff#60-1 1_F_02,{
mes "You already have enough arena points.";
mes "Please spend some arena points later. When I see you next time, I will make sure to give you some reward.";
next;
+ } else {
+ ++arena_point;
}
- else set arena_point, arena_point + 1;
mes "[Staff]";
mes "Let me guide you outside. I hope you had a good time.";
close2;
@@ -814,22 +815,22 @@ prt_are_in,129,135,3 script Staff#60-1 1_F_02,{
prt_are_in,25,135,3 script Staff#60-2 1_F_02,{
if($arena_min60end < $arena_min60st) {
if($arena_sec60end < $arena_sec60st) {
- set @record_min60,60 - $arena_min60st + $arena_min60end -1;
- set @record_sec60,60 - $arena_sec60st + $arena_sec60end;
+ @record_min60 = 60 - $arena_min60st + $arena_min60end -1;
+ @record_sec60 = 60 - $arena_sec60st + $arena_sec60end;
} else {
- set @record_min60,60 - $arena_min60st + $arena_min60end;
- set @record_sec60,$arena_sec60end - $arena_sec60st;
+ @record_min60 = 60 - $arena_min60st + $arena_min60end;
+ @record_sec60 = $arena_sec60end - $arena_sec60st;
}
} else {
if($arena_sec60end < $arena_sec60st) {
- set @record_min60,$arena_min60end - $arena_min60st -1;
- set @record_sec60,60 - $arena_sec60st + $arena_sec60end;
+ @record_min60 = $arena_min60end - $arena_min60st -1;
+ @record_sec60 = 60 - $arena_sec60st + $arena_sec60end;
} else {
- set @record_min60,$arena_min60end - $arena_min60st;
- set @record_sec60,$arena_sec60end - $arena_sec60st;
+ @record_min60 = $arena_min60end - $arena_min60st;
+ @record_sec60 = $arena_sec60end - $arena_sec60st;
}
}
- set @gap60,(60 * $top_60min + $top_60sec) - (60 * @record_min60 + @record_sec60);
+ @gap60 = (60 * $top_60min + $top_60sec) - (60 * @record_min60 + @record_sec60);
mes "[Staff]";
mes "Wow, you did a good job~ ";
mes "Your name is...^3131FF" + strcharinfo(0) +"^000000, isn't it?";
@@ -862,7 +863,7 @@ prt_are_in,25,135,3 script Staff#60-2 1_F_02,{
mes "Thank you.";
close2;
} else {
- set arena_point, arena_point + 20;
+ arena_point += 20;
mes "[Staff]";
mes "Let me reward you some arena points.";
mes "If you wish to check the amount of arena points you have, please go talk to ^3131FFVendigos^000000 at the arena entrance.";
@@ -887,9 +888,9 @@ prt_are_in,25,135,3 script Staff#60-2 1_F_02,{
next;
mes "[Staff]";
mes "You have been recorded as the fastest player among people who cleared ^FF0000Arena Time Force Battle lvl 60s^000000, ^3131FF"+strcharinfo(0)+"^000000.";
- set $top_60min, @record_min60;
- set $top_60sec, @record_sec60;
- set $arena_60topn$,strcharinfo(0);
+ $top_60min = @record_min60;
+ $top_60sec = @record_sec60;
+ $arena_60topn$ = strcharinfo(0);
donpcevent "Vendigos::OnLineRec_60";
next;
if (arena_point > 29950) {
@@ -909,7 +910,7 @@ prt_are_in,25,135,3 script Staff#60-2 1_F_02,{
mes "Let me reward you with some arena points.";
mes "At the same time, since you have renewed the record you will receive an extra amount of the points this time.";
next;
- set arena_point, arena_point + 50;
+ arena_point += 50;
mes "[Staff]";
mes "Let me reward you some arena points.";
mes "If you wish to check the amount of arena points you have, please go talk to ^3131FFVendigos^000000 at the arena entrance.";
@@ -1020,6 +1021,6 @@ OnEnable:
end;
OnInit:
- if(!$top_60min && !$top_60sec) set $top_60min,6;
+ if(!$top_60min && !$top_60sec) $top_60min = 6;
end;
}
diff --git a/npc/other/arena/arena_lvl70.txt b/npc/other/arena/arena_lvl70.txt
index e50113e74..68805437f 100644
--- a/npc/other/arena/arena_lvl70.txt
+++ b/npc/other/arena/arena_lvl70.txt
@@ -37,8 +37,8 @@ force_3-1,99,20,4 script Cadillac#arena 4_F_TELEPORTER,{
OnStart:
initnpctimer;
- set $arena_min70st,gettime(2);
- set $arena_sec70st,gettime(1);
+ $arena_min70st = gettime(2);
+ $arena_sec70st = gettime(1);
end;
OnTimer3000:
@@ -749,8 +749,8 @@ OnMyMobDead:
donpcevent "Cadillac#arena::On09_End";
donpcevent "arena#70::OnReset_09";
donpcevent "arena#70::OnReset_All";
- set $arena_min70end,gettime(2);
- set $arena_sec70end,gettime(1);
+ $arena_min70end = gettime(2);
+ $arena_sec70end = gettime(1);
}
end;
}
@@ -766,8 +766,9 @@ prt_are_in,129,83,3 script Staff#70-1 1_F_02,{
mes "You already have enough arena points.";
mes "Please spend some arena points later. When I see you next time, I will make sure to give you some reward.";
next;
+ } else {
+ ++arena_point;
}
- else set arena_point, arena_point + 1;
mes "[Staff]";
mes "Let me guide you outside. I hope you had a good time.";
close2;
@@ -779,22 +780,22 @@ prt_are_in,129,83,3 script Staff#70-1 1_F_02,{
prt_are_in,25,84,3 script Staff#70-2 1_F_02,{
if($arena_min70end < $arena_min70st) {
if($arena_sec70end < $arena_sec70st) {
- set @record_min70,60 - $arena_min70st + $arena_min70end -1;
- set @record_sec70,60 - $arena_sec70st + $arena_sec70end;
+ @record_min70 = 60 - $arena_min70st + $arena_min70end -1;
+ @record_sec70 = 60 - $arena_sec70st + $arena_sec70end;
} else {
- set @record_min70,60 - $arena_min70st + $arena_min70end;
- set @record_sec70,$arena_sec70end - $arena_sec70st;
+ @record_min70 = 60 - $arena_min70st + $arena_min70end;
+ @record_sec70 = $arena_sec70end - $arena_sec70st;
}
} else {
if($arena_sec70end < $arena_sec70st) {
- set @record_min70,$arena_min70end - $arena_min70st -1;
- set @record_sec70,60 - $arena_sec70st + $arena_sec70end;
+ @record_min70 = $arena_min70end - $arena_min70st -1;
+ @record_sec70 = 60 - $arena_sec70st + $arena_sec70end;
} else {
- set @record_min70,$arena_min70end - $arena_min70st;
- set @record_sec70,$arena_sec70end - $arena_sec70st;
+ @record_min70 = $arena_min70end - $arena_min70st;
+ @record_sec70 = $arena_sec70end - $arena_sec70st;
}
}
- set @gap70,(60 * $top_70min + $top_70sec) - (60 * @record_min70 + @record_sec70);
+ @gap70 = (60 * $top_70min + $top_70sec) - (60 * @record_min70 + @record_sec70);
mes "[Staff]";
mes "Wow, you did a good job~ ";
mes "Your name is...^3131FF" + strcharinfo(0) +"^000000, isn't it?";
@@ -827,7 +828,7 @@ prt_are_in,25,84,3 script Staff#70-2 1_F_02,{
mes "Thank you.";
close2;
} else {
- set arena_point, arena_point + 20;
+ arena_point += 20;
mes "[Staff]";
mes "Let me reward you some arena points.";
mes "If you wish to check the amount of arena points you have, please go talk to ^3131FFVendigos^000000 at the arena entrance.";
@@ -852,9 +853,9 @@ prt_are_in,25,84,3 script Staff#70-2 1_F_02,{
next;
mes "[Staff]";
mes "You have been recorded as the fastest player among people who cleared ^FF0000Arena Time Force Battle lvl 70s^000000, ^3131FF"+strcharinfo(0)+"^000000.";
- set $top_70min, @record_min70;
- set $top_70sec, @record_sec70;
- set $arena_70topn$,strcharinfo(0);
+ $top_70min = @record_min70;
+ $top_70sec = @record_sec70;
+ $arena_70topn$ = strcharinfo(0);
donpcevent "Vendigos::OnLineRec_70";
next;
if (arena_point > 29970) {
@@ -874,7 +875,7 @@ prt_are_in,25,84,3 script Staff#70-2 1_F_02,{
mes "Let me reward you with some arena points.";
mes "At the same time, since you have renewed the record you will receive an extra amount of the points this time.";
next;
- set arena_point, arena_point + 50;
+ arena_point += 50;
mes "[Staff]";
mes "Let me reward you some arena points.";
mes "If you wish to check the amount of arena points you have, please go talk to ^3131FFVendigos^000000 at the arena entrance.";
@@ -984,6 +985,6 @@ OnEnable:
end;
OnInit:
- if(!$top_70min && !$top_70sec) set $top_70min,7;
+ if(!$top_70min && !$top_70sec) $top_70min = 7;
end;
}
diff --git a/npc/other/arena/arena_lvl80.txt b/npc/other/arena/arena_lvl80.txt
index 773175a11..f610619b7 100644
--- a/npc/other/arena/arena_lvl80.txt
+++ b/npc/other/arena/arena_lvl80.txt
@@ -37,8 +37,8 @@ force_4-1,99,20,4 script Octus#arena 4_F_TELEPORTER,{
OnStart:
initnpctimer;
- set $arena_min80st,gettime(2);
- set $arena_sec80st,gettime(1);
+ $arena_min80st = gettime(2);
+ $arena_sec80st = gettime(1);
end;
OnTimer3000:
@@ -730,8 +730,8 @@ OnMyMobDead:
donpcevent "Octus#arena::On09_End";
donpcevent "arena#80::OnReset_09";
donpcevent "arena#80::OnReset_All";
- set $arena_min80end,gettime(2);
- set $arena_sec80end,gettime(1);
+ $arena_min80end = gettime(2);
+ $arena_sec80end = gettime(1);
}
end;
}
@@ -747,8 +747,9 @@ prt_are_in,181,188,3 script Staff#80-1 1_F_02,{
mes "You already have enough arena points.";
mes "Please spend some arena points later. When I see you next time, I will make sure to give you some reward.";
next;
+ } else {
+ ++arena_point;
}
- else set arena_point, arena_point + 1;
mes "[Staff]";
mes "Let me guide you outside. I hope you had a good time.";
close2;
@@ -760,22 +761,22 @@ prt_are_in,181,188,3 script Staff#80-1 1_F_02,{
prt_are_in,77,187,3 script Staff#80-2 1_F_02,{
if($arena_min80end < $arena_min80st) {
if($arena_sec80end < $arena_sec80st) {
- set @record_min80,60 - $arena_min80st + $arena_min80end -1;
- set @record_sec80,60 - $arena_sec80st + $arena_sec80end;
+ @record_min80 = 60 - $arena_min80st + $arena_min80end -1;
+ @record_sec80 = 60 - $arena_sec80st + $arena_sec80end;
} else {
- set @record_min80,60 - $arena_min80st + $arena_min80end;
- set @record_sec80,$arena_sec80end - $arena_sec80st;
+ @record_min80 = 60 - $arena_min80st + $arena_min80end;
+ @record_sec80 = $arena_sec80end - $arena_sec80st;
}
} else {
if($arena_sec80end < $arena_sec80st) {
- set @record_min80,$arena_min80end - $arena_min80st -1;
- set @record_sec80,60 - $arena_sec80st + $arena_sec80end;
+ @record_min80 = $arena_min80end - $arena_min80st -1;
+ @record_sec80 = 60 - $arena_sec80st + $arena_sec80end;
} else {
- set @record_min80,$arena_min80end - $arena_min80st;
- set @record_sec80,$arena_sec80end - $arena_sec80st;
+ @record_min80 = $arena_min80end - $arena_min80st;
+ @record_sec80 = $arena_sec80end - $arena_sec80st;
}
}
- set @gap80,(60 * $top_80min + $top_80sec) - (60 * @record_min80 + @record_sec80);
+ @gap80 = (60 * $top_80min + $top_80sec) - (60 * @record_min80 + @record_sec80);
mes "[Staff]";
mes "Wow, you did a good job~ ";
mes "Your name is...^3131FF" + strcharinfo(0) +"^000000, isn't it?";
@@ -808,7 +809,7 @@ prt_are_in,77,187,3 script Staff#80-2 1_F_02,{
mes "Thank you.";
close2;
} else {
- set arena_point, arena_point + 20;
+ arena_point += 20;
mes "[Staff]";
mes "Let me reward you some arena points.";
mes "If you wish to check the amount of arena points you have, please go talk to ^3131FFVendigos^000000 at the arena entrance.";
@@ -833,9 +834,9 @@ prt_are_in,77,187,3 script Staff#80-2 1_F_02,{
next;
mes "[Staff]";
mes "You have been recorded as the fastest player among people who cleared ^FF0000Arena Time Force Battle lvl 80s^000000, ^3131FF"+strcharinfo(0)+"^000000.";
- set $top_80min, @record_min80;
- set $top_80sec, @record_sec80;
- set $arena_80topn$,strcharinfo(0);
+ $top_80min = @record_min80;
+ $top_80sec = @record_sec80;
+ $arena_80topn$ = strcharinfo(0);
donpcevent "Vendigos::OnLineRec_80";
next;
if (arena_point > 29980) {
@@ -855,7 +856,7 @@ prt_are_in,77,187,3 script Staff#80-2 1_F_02,{
mes "Let me reward you with some arena points.";
mes "At the same time, since you have renewed the record you will receive an extra amount of the points this time.";
next;
- set arena_point, arena_point + 50;
+ arena_point += 50;
mes "[Staff]";
mes "Let me reward you some arena points.";
mes "If you wish to check the amount of arena points you have, please go talk to ^3131FFVendigos^000000 at the arena entrance.";
@@ -963,6 +964,6 @@ OnEnable:
end;
OnInit:
- if(!$top_80min && !$top_80sec) set $top_80min,8;
+ if(!$top_80min && !$top_80sec) $top_80min = 8;
end;
}
diff --git a/npc/other/arena/arena_party.txt b/npc/other/arena/arena_party.txt
index 218a6de90..ca4b74388 100644
--- a/npc/other/arena/arena_party.txt
+++ b/npc/other/arena/arena_party.txt
@@ -40,7 +40,7 @@ OnStart:
prt_are_in,76,87,3 script Helper#party 67,4,4,{
if($arn_partywait == 0) {
- set $arn_partywait,1;
+ $arn_partywait = 1;
emotion e_gasp,0;
mes "[Helper Iriff]";
mes "Good day, challengers!";
@@ -52,7 +52,7 @@ prt_are_in,76,87,3 script Helper#party 67,4,4,{
next;
switch( select( "No","Yes" ) ) {
case 1:
- set $arn_partywait,0;
+ $arn_partywait = 0;
mes "[Helper Iriff]";
mes "I see.";
mes "However, please remember you have only a limited amount of time.";
@@ -80,7 +80,7 @@ OnStop:
end;
OnInit:
- set $arn_partywait,0;
+ $arn_partywait = 0;
end;
}
@@ -94,7 +94,7 @@ OnTouch:
warp "arena_room",100,75;
else {
Zeny -= 1000;
- set $arn_partywait,0;
+ $arn_partywait = 0;
donpcevent "toout#party::OnStop";
warp "force_1-2",99,26;
}
@@ -114,7 +114,7 @@ OnTimer:
end;
OnTimer60000:
- set $arn_partywait,0;
+ $arn_partywait = 0;
enablenpc "toout#party";
end;
@@ -124,7 +124,7 @@ OnTimer70000:
disablenpc "toout#party";
OnTouch:
- set $arn_partywait,0;
+ $arn_partywait = 0;
warp "arena_room",100,75;
OnEnter:
@@ -139,7 +139,7 @@ OnStop:
prt_are_in,73,74,0 script arena_out -1,1,1,{
OnTouch:
- set $arn_partywait,0;
+ $arn_partywait = 0;
warp "arena_room",100,75;
end;
}
@@ -147,8 +147,8 @@ OnTouch:
force_1-2,99,31,4 script Slipslowrun#party 4_F_TELEPORTER,{
OnStart:
initnpctimer;
- set $arena_minptst,gettime(2);
- set $arena_secptst,gettime(1);
+ $arena_minptst = gettime(2);
+ $arena_secptst = gettime(1);
end;
OnTimer2000:
@@ -354,8 +354,8 @@ OnStart:
donpcevent "force_10mob-2#party::OnReset";
donpcevent "force_exitmob#party::OnReset";
donpcevent "Slipslowrun#party::OnStart";
- set $arn_partyc,0;
- set $arn_partywait,0;
+ $arn_partyc = 0;
+ $arn_partywait = 0;
end;
On04_Start:
@@ -412,8 +412,8 @@ OnReset:
force_1-2,95,187,0 script force_09_exit WARPNPC,1,1,{
OnTouch:
- set $arena_minptend,gettime(2);
- set $arena_secptend,gettime(1);
+ $arena_minptend = gettime(2);
+ $arena_secptend = gettime(1);
warp "prt_are_in",73,139;
donpcevent "#arn_timer_pt::OnEnter";
donpcevent "arena_p::OnReset";
@@ -466,7 +466,7 @@ OnMyMobDead:
if (mobcount("force_1-2","force_01mob#party::OnMyMobDead") < 1) {
enablenpc "force_01_00";
donpcevent "Slipslowrun#party::On01_End";
- set $arn_partyc,$arn_partyc +1;
+ ++$arn_partyc;
if($arn_partyc == 3) {
donpcevent "Slipslowrun#party::On04_Start";
enablenpc "force_03_04";
@@ -525,7 +525,7 @@ OnMyMobDead:
if (mobcount("force_1-2","force_02mob#party::OnMyMobDead") < 1) {
enablenpc "force_02_00";
donpcevent "Slipslowrun#party::On02_End";
- set $arn_partyc,$arn_partyc +1;
+ ++$arn_partyc;
if($arn_partyc == 3) {
donpcevent "Slipslowrun#party::On04_Start";
enablenpc "force_03_04";
@@ -580,7 +580,7 @@ OnMyMobDead:
if (mobcount("force_1-2","force_03mob#party::OnMyMobDead") < 1) {
enablenpc "force_03_00";
donpcevent "Slipslowrun#party::On03_End";
- set $arn_partyc,$arn_partyc +1;
+ ++$arn_partyc;
if($arn_partyc == 3) {
donpcevent "Slipslowrun#party::On04_Start";
enablenpc "force_03_04";
@@ -725,7 +725,7 @@ OnMyMobDead:
if (mobcount("force_1-2","force_06mob#party::OnMyMobDead") < 1) {
donpcevent "arena_p::On07_Start";
donpcevent "Slipslowrun#party::On06_End";
- set $arn_partyc,$arn_partyc +1;
+ ++$arn_partyc;
}
end;
}
@@ -761,7 +761,7 @@ OnMyMobDead:
if (mobcount("force_1-2","force_07mob#party::OnMyMobDead") < 1) {
donpcevent "arena_p::On08_Start";
donpcevent "Slipslowrun#party::On07_End";
- set $arn_partyc,$arn_partyc +1;
+ ++$arn_partyc;
}
end;
}
@@ -778,20 +778,20 @@ OnEnable:
monster "force_1-2",172,154,"Khalitzburg",1438,1,"force_08mob#party::OnMyMobDead";
monster "force_1-2",174,145,"Ghostring",1576,1,"force_08mob#party::OnMyMobDead";
monster "force_1-2",174,145,"Chimera",1456,1,"force_08mob#party::OnMyMobDead";
- for(set .@i,0; .@i<5; set .@i,.@i+1) {
+ for(.@i = 0; .@i<5; ++.@i) {
monster "force_1-2",rand(162,184),rand(122,185),"Injustice",1446,1,"force_08mob#party::OnMyMobDead";
}
monster "force_1-2",rand(162,184),rand(122,185),"Raydric Archer",1453,1,"force_08mob#party::OnMyMobDead";
- for(set .@i,0; .@i<5; set .@i,.@i+1) {
+ for(.@i = 0; .@i<5; ++.@i) {
monster "force_1-2",rand(162,184),rand(122,185),"Nightmare Terror",1554,1,"force_08mob#party::OnMyMobDead";
}
- for(set .@i,0; .@i<6; set .@i,.@i+1) {
+ for(.@i = 0; .@i<6; ++.@i) {
monster "force_1-2",rand(162,184),rand(122,185),"Ancient Mummy",1522,1,"force_08mob#party::OnMyMobDead";
}
- for(set .@i,0; .@i<10; set .@i,.@i+1) {
+ for(.@i = 0; .@i<10; ++.@i) {
monster "force_1-2",rand(162,184),rand(122,185),"Skel Prisoner",1479,1,"force_08mob#party::OnMyMobDead";
}
- for(set .@i,0; .@i<5; set .@i,.@i+1) {
+ for(.@i = 0; .@i<5; ++.@i) {
monster "force_1-2",rand(162,184),rand(122,185),"Hunter Fly",1422,1,"force_08mob#party::OnMyMobDead";
}
end;
@@ -804,7 +804,7 @@ OnMyMobDead:
if (mobcount("force_1-2","force_08mob#party::OnMyMobDead") < 1) {
donpcevent "arena_p::On09_Start";
donpcevent "Slipslowrun#party::On08_End";
- set $arn_partyc,$arn_partyc +1;
+ ++$arn_partyc;
}
end;
}
@@ -833,7 +833,7 @@ OnEnable:
monster "force_1-2",122,178,"Anolian",1488,1,"force_09mob#party::OnMyMobDead";
monster "force_1-2",121,177,"Anolian",1488,1,"force_09mob#party::OnMyMobDead";
monster "force_1-2",122,177,"Anolian",1488,1,"force_09mob#party::OnMyMobDead";
- set $force_09_pt,15;
+ $force_09_pt = 15;
end;
OnReset:
@@ -844,7 +844,7 @@ OnMyMobDead:
if (mobcount("force_1-2","force_09mob#party::OnMyMobDead") < 1) {
donpcevent "arena_p::On10_Start";
donpcevent "Slipslowrun#party::On09_End";
- set $arn_partyc,$arn_partyc +1;
+ ++$arn_partyc;
}
end;
}
@@ -896,7 +896,7 @@ OnMyMobDead:
if (mobcount("force_1-2","force_10mob-2#party::OnMyMobDead") < 1) {
donpcevent "arena_p::OnExit";
donpcevent "Slipslowrun#party::On10_End";
- set $arn_partyc,0;
+ $arn_partyc = 0;
}
end;
}
@@ -960,8 +960,9 @@ prt_are_in,181,135,3 script Staff#party-1 1_F_02,{
mes "You already have enough arena points.";
mes "Please spend some arena points later. When I see you next time, I will make sure to give you some reward.";
next;
+ } else {
+ ++arena_point;
}
- else set arena_point, arena_point + 1;
mes "[Staff]";
mes "Let me guide you outside. I hope you had a good time.";
close2;
@@ -973,22 +974,22 @@ prt_are_in,181,135,3 script Staff#party-1 1_F_02,{
prt_are_in,77,135,3 script Staff#party-2 1_F_02,{
if($arena_minptend < $arena_minptst) {
if($arena_secptend < $arena_secptst) {
- set @record_minpt,60 - $arena_minptst + $arena_minptend -1;
- set @record_secpt,60 - $arena_secptst + $arena_secptend;
+ @record_minpt = 60 - $arena_minptst + $arena_minptend -1;
+ @record_secpt = 60 - $arena_secptst + $arena_secptend;
} else {
- set @record_minpt,60 - $arena_minptst + $arena_minptend;
- set @record_secpt,$arena_secptend - $arena_secptst;
+ @record_minpt = 60 - $arena_minptst + $arena_minptend;
+ @record_secpt = $arena_secptend - $arena_secptst;
}
} else {
if($arena_secptend < $arena_secptst) {
- set @record_minpt,$arena_minptend - $arena_minptst -1;
- set @record_secpt,60 - $arena_secptst + $arena_secptend;
+ @record_minpt = $arena_minptend - $arena_minptst -1;
+ @record_secpt = 60 - $arena_secptst + $arena_secptend;
} else {
- set @record_minpt,$arena_minptend - $arena_minptst;
- set @record_secpt,$arena_secptend - $arena_secptst;
+ @record_minpt = $arena_minptend - $arena_minptst;
+ @record_secpt = $arena_secptend - $arena_secptst;
}
}
- set @gappt,(60 * $top_ptmin + $top_ptsec) - (60 * @record_minpt + @record_secpt);
+ @gappt = (60 * $top_ptmin + $top_ptsec) - (60 * @record_minpt + @record_secpt);
mes "[Staff]";
mes "Wow, you did a good job~ ";
mes "Your name is...^3131FF" + strcharinfo(0) +"^000000, isn't it?";
@@ -1004,7 +1005,7 @@ prt_are_in,77,135,3 script Staff#party-2 1_F_02,{
mes "[Staff]";
mes "^3131FF"+$arena_pttopn$+"^000000's running time was ^3131FF"+$top_ptmin+"^000000minutes ^3131FF"+$top_ptsec+"^000000seconds.";
next;
- set .arn_party,getcharid(1);
+ .arn_party = getcharid(1);
if (@gappt < 0) {
mes "[Staff]";
mes "Although you failed to make a new record, I hope you will succeed next time.";
@@ -1022,7 +1023,7 @@ prt_are_in,77,135,3 script Staff#party-2 1_F_02,{
mes "Thank you.";
close2;
} else {
- set arena_point, arena_point + 40;
+ arena_point += 40;
mes "[Staff]";
mes "Let me reward you some arena points.";
mes "If you wish to check the amount of arena points you have, please go talk to ^3131FFVendigos^000000 at the arena entrance.";
@@ -1063,9 +1064,9 @@ prt_are_in,77,135,3 script Staff#party-2 1_F_02,{
next;
switch( select( "Yes","No" ) ) {
case 1:
- set $top_ptmin, @record_minpt;
- set $top_ptsec, @record_secpt;
- set $arena_pttopn$,.@arnparty$;
+ $top_ptmin = @record_minpt;
+ $top_ptsec = @record_secpt;
+ $arena_pttopn$ = .@arnparty$;
donpcevent "Vendigos::OnLineRec_pt";
mes "[Staff]";
mes "Your record has been entered.";
@@ -1100,7 +1101,7 @@ prt_are_in,77,135,3 script Staff#party-2 1_F_02,{
mes "Let me reward you with some arena points.";
mes "At the same time, since you have renewed the record you will receive an extra amount of the points this time.";
next;
- set arena_point, arena_point + 100;
+ arena_point += 100;
mes "[Staff]";
mes "Let me reward you some arena points.";
mes "If you wish to check the amount of arena points you have, please go talk to ^3131FFVendigos^000000 at the arena entrance.";
@@ -1230,14 +1231,14 @@ OnEnable:
donpcevent "Slipslowrun#party::OnTimerOff";
disablenpc "Slipslowrun#party";
disablenpc "arn_warp_pt";
- set $arn_partywait,0;
- set $arn_partyc,0;
+ $arn_partywait = 0;
+ $arn_partyc = 0;
donpcevent "#arn_timer_pt::OnStop";
enablenpc "Slipslowrun#party";
enablenpc "arena_p";
end;
OnInit:
- if(!$top_ptmin && !$top_ptsec) set $top_ptmin,10;
+ if(!$top_ptmin && !$top_ptsec) $top_ptmin = 10;
end;
}
diff --git a/npc/other/arena/arena_point.txt b/npc/other/arena/arena_point.txt
index 3b49596c0..e61db7f78 100644
--- a/npc/other/arena/arena_point.txt
+++ b/npc/other/arena/arena_point.txt
@@ -75,10 +75,10 @@ prt_are_in,103,11,3 script Arena Point Manager 4_M_JOB_HUNTER,{
close;
}
else {
- set .@want_point1,10 * .@input;
- set .@want_point,5 * .@input;
- set .@my_arena_all,arena_point + .@want_point;
- set .@my_turbo_all,tt_point - .@want_point1;
+ .@want_point1 = 10 * .@input;
+ .@want_point = 5 * .@input;
+ .@my_arena_all = arena_point + .@want_point;
+ .@my_turbo_all = tt_point - .@want_point1;
if (.@my_arena_all > 28999) {
mes "[Arena Point Manager]";
mes "You will exceed the";
@@ -111,8 +111,8 @@ prt_are_in,103,11,3 script Arena Point Manager 4_M_JOB_HUNTER,{
mes "into 5 Arena Points " + .@input + " times.";
mes "A total of " + .@want_point1 + " Turbo Track Points were converted into";
mes "" + .@want_point +" Arena Points.";
- set tt_point,tt_point - .@want_point1;
- set arena_point,arena_point+.@want_point;
+ tt_point -= .@want_point1;
+ arena_point += .@want_point;
next;
mes "[Arena Point Manager]";
mes "" + strcharinfo(0) + ",";
@@ -158,8 +158,8 @@ S_ExchangePoints:
mes "" + strcharinfo(0) + ",";
mes "you've converted "+getarg(1)+" Track";
mes "Points into "+getarg(2)+" Arena Point.";
- set tt_point,tt_point-getarg(1);
- set arena_point,arena_point+getarg(2);
+ tt_point -= getarg(1);
+ arena_point += getarg(2);
next;
mes "[Arena Point Manager]";
mes "" + strcharinfo(0) + ",";
diff --git a/npc/other/arena/arena_room.txt b/npc/other/arena/arena_room.txt
index 9330fcf6a..c06aef63d 100644
--- a/npc/other/arena/arena_room.txt
+++ b/npc/other/arena/arena_room.txt
@@ -392,7 +392,7 @@ arena_room,158,82,1 script Helper Lonik 4_M_ROGUE,{
}
sec_in02,72,180,3 script Arena Manager#arena 4_NFWISP,{
- set .@i, callfunc("F_GM_NPC",1357,0);
+ .@i = callfunc("F_GM_NPC",1357,0);
if (.@i == -1) {
mes "[Arena Manager]";
mes "Command has been canceled.";
@@ -408,16 +408,16 @@ sec_in02,72,180,3 script Arena Manager#arena 4_NFWISP,{
case 1:
switch(select("Lv 50:Lv 60:Lv 70:Lv 80:Party Mode")) {
case 1:
- set .@arena,50;
+ .@arena = 50;
break;
case 2:
- set .@arena,60;
+ .@arena = 60;
break;
case 3:
- set .@arena,70;
+ .@arena = 70;
break;
case 4:
- set .@arena,80;
+ .@arena = 80;
break;
case 5:
mes "[Arena Manager]";
@@ -470,29 +470,29 @@ sec_in02,72,180,3 script Arena Manager#arena 4_NFWISP,{
case 2:
switch(select("Lv 50:Lv 60:Lv 70:Lv 80:Party Mode")) {
case 1:
- set .@min$,"$top50min";
- set .@sec$,"$top50sec";
- set .@mode$,"Lv 50";
+ .@min$ = "$top50min";
+ .@sec$ = "$top50sec";
+ .@mode$ = "Lv 50";
break;
case 2:
- set .@min$,"$top60min";
- set .@sec$,"$top60sec";
- set .@mode$,"Lv 60";
+ .@min$ = "$top60min";
+ .@sec$ = "$top60sec";
+ .@mode$ = "Lv 60";
break;
case 3:
- set .@min$,"$top70min";
- set .@sec$,"$top70sec";
- set .@mode$,"Lv 70";
+ .@min$ = "$top70min";
+ .@sec$ = "$top70sec";
+ .@mode$ = "Lv 70";
break;
case 4:
- set .@min$,"$top80min";
- set .@sec$,"$top80sec";
- set .@mode$,"Lv 80";
+ .@min$ = "$top80min";
+ .@sec$ = "$top80sec";
+ .@mode$ = "Lv 80";
break;
case 5:
- set .@min$,"$top_ptmin";
- set .@sec$,"$top_ptsec";
- set .@mode$,"party";
+ .@min$ = "$top_ptmin";
+ .@sec$ = "$top_ptsec";
+ .@mode$ = "party";
break;
}
mes "[Arena Manager]";
@@ -514,7 +514,7 @@ sec_in02,72,180,3 script Arena Manager#arena 4_NFWISP,{
}
sec_in02,79,171,3 script Reward Manager#arena 4_NFWISP,{
- set .@i, callfunc("F_GM_NPC",1357,0);
+ .@i = callfunc("F_GM_NPC",1357,0);
if (.@i == -1) {
mes "[Reward Manager]";
mes "Command has been canceled.";
@@ -616,7 +616,7 @@ prt_are_in,98,14,3 script Givu#arena 4_F_JOB_KNIGHT,{
mes "Please check the total amount of arena points you have.";
close;
}
- set arena_point, arena_point-40;
+ arena_point -= 40;
if (checkre(3)) {
if (BaseLevel < 70) getexp 300,0;
else if (BaseLevel < 80) getexp 900,0;
@@ -661,16 +661,16 @@ prt_are_in,98,14,3 script Givu#arena 4_F_JOB_KNIGHT,{
mes "The NPC will appear for 1 minute and this service requires 10 arena points.";
next;
switch(select("Baphomet:Dark Lord:Doppelganger:Eddga:Dracula:Samurai:Stormy Knight:Phreeoni:Girl:Valkyrie")) {
- case 1: set $@arena_picture_id,1039; break;
- case 2: set $@arena_picture_id,1272; break;
- case 3: set $@arena_picture_id,1046; break;
- case 4: set $@arena_picture_id,1115; break;
- case 5: set $@arena_picture_id,1389; break;
- case 6: set $@arena_picture_id,1492; break;
- case 7: set $@arena_picture_id,1251; break;
- case 8: set $@arena_picture_id,1159; break;
- case 9: set $@arena_picture_id,6969; break;
- case 10: set $@arena_picture_id,7777; break;
+ case 1: $@arena_picture_id = 1039; break;
+ case 2: $@arena_picture_id = 1272; break;
+ case 3: $@arena_picture_id = 1046; break;
+ case 4: $@arena_picture_id = 1115; break;
+ case 5: $@arena_picture_id = 1389; break;
+ case 6: $@arena_picture_id = 1492; break;
+ case 7: $@arena_picture_id = 1251; break;
+ case 8: $@arena_picture_id = 1159; break;
+ case 9: $@arena_picture_id = 6969; break;
+ case 10: $@arena_picture_id = 7777; break;
}
if (arena_point < 10) {
mes "[Givu]";
@@ -688,8 +688,8 @@ prt_are_in,98,14,3 script Givu#arena 4_F_JOB_KNIGHT,{
next;
switch(select("Yes:No")) {
case 1:
- set arena_point, arena_point-10;
- set $@arena_picture,1;
+ arena_point -= 10;
+ $@arena_picture = 1;
enablenpc "#arena_"+$@arena_picture_id+"";
movenpc "#arena_"+$@arena_picture_id+"",96,28;
if ($@arena_picture_id == 6969) {
@@ -941,13 +941,13 @@ OnTimer62000:
mapannounce "prt_are_in","Time is over. Thank you for using my services.",1,0xFFCE00;
movenpc "#arena_"+$@arena_picture_id+"",1,1;
donpcevent "#arena_1039::OnInit";
- set $@arena_picture,0;
+ $@arena_picture = 0;
stopnpctimer;
end;
}
sec_in02,72,171,3 script Picture Manager#arena 4_NFWISP,{
- set .@i, callfunc("F_GM_NPC",1357,0);
+ .@i = callfunc("F_GM_NPC",1357,0);
if (.@i == -1) {
mes "[Picture Manager]";
mes "Command has been canceled.";
@@ -968,7 +968,7 @@ sec_in02,72,171,3 script Picture Manager#arena 4_NFWISP,{
case 2:
mes "[Picture Manager]";
mes "Picture rewarding reseted.";
- set $@arena_picture,0;
+ $@arena_picture = 0;
close;
}
}
@@ -1008,7 +1008,7 @@ function script Func_Are_Rew {
mes "Please check the total amount of arena points you have.";
close;
}
- set arena_point, arena_point - (.@reward * getarg(2));
+ arena_point -= (.@reward * getarg(2));
getitem getarg(0),.@reward * getarg(1);
mes "[Givu]";
mes "Thank you, please come again.";
diff --git a/npc/other/books.txt b/npc/other/books.txt
index 6f83ace1b..fed26bfeb 100644
--- a/npc/other/books.txt
+++ b/npc/other/books.txt
@@ -18,9 +18,9 @@ prt_in,168,56,4 script Monster Encyclopedia#prt HIDDEN_NPC,{
mes "containing information on Water,";
mes "Wind and Ghost property monsters.";
next;
- set .@loop1,1;
+ .@loop1 = 1;
while(.@loop1) {
- set .@loop2,1;
+ .@loop2 = 1;
switch(select("Water Property Monsters:Wind Property Monsters:Spritual Property Monsters:Cancel")) {
case 1:
while(.@loop2) {
@@ -213,7 +213,7 @@ prt_in,168,56,4 script Monster Encyclopedia#prt HIDDEN_NPC,{
break;
case 4:
close2;
- set .@loop2,0;
+ .@loop2 = 0;
end;
}
}
@@ -325,7 +325,7 @@ prt_in,168,56,4 script Monster Encyclopedia#prt HIDDEN_NPC,{
break;
case 4:
close2;
- set .@loop2,0;
+ .@loop2 = 0;
end;
}
}
@@ -379,14 +379,14 @@ prt_in,168,56,4 script Monster Encyclopedia#prt HIDDEN_NPC,{
break;
case 4:
close2;
- set .@loop2,0;
+ .@loop2 = 0;
end;
}
}
case 4:
close2;
- set .@loop1,0;
+ .@loop1 = 0;
end;
}
}
@@ -399,9 +399,9 @@ prt_in,159,56,4 script Monster Encyclopedia#2pr HIDDEN_NPC,{
mes "Fire and Neutral property";
mes "monsters.";
next;
- set .@loop1,1;
+ .@loop1 = 1;
while(.@loop1) {
- set .@loop2,1;
+ .@loop2 = 1;
switch(select("Earth Property Monsters:Fire Property Monsters:Neutral Property Monsters:Cancel")) {
case 1:
while(.@loop2) {
@@ -648,7 +648,7 @@ prt_in,159,56,4 script Monster Encyclopedia#2pr HIDDEN_NPC,{
break;
case 4:
close2;
- set .@loop2,0;
+ .@loop2 = 0;
end;
}
}
@@ -783,7 +783,7 @@ prt_in,159,56,4 script Monster Encyclopedia#2pr HIDDEN_NPC,{
break;
case 4:
close2;
- set .@loop2,0;
+ .@loop2 = 0;
end;
}
}
@@ -858,14 +858,14 @@ prt_in,159,56,4 script Monster Encyclopedia#2pr HIDDEN_NPC,{
break;
case 4:
close2;
- set .@loop2,0;
+ .@loop2 = 0;
end;
}
}
case 4:
close2;
- set .@loop1,0;
+ .@loop1 = 0;
end;
}
}
@@ -877,9 +877,9 @@ prt_in,161,50,4 script Monster Encyclopedia#3pr 111,{
mes "containing information on Dark,";
mes "Poison and Undead monsters.";
next;
- set .@loop1,1;
+ .@loop1 = 1;
while(.@loop1) {
- set .@loop2,1;
+ .@loop2 = 1;
switch(select("Dark Property Monsters:Poison Property Monsters:Undead Property Monsters:Cancel")) {
case 1:
while(.@loop2) {
@@ -1011,7 +1011,7 @@ prt_in,161,50,4 script Monster Encyclopedia#3pr 111,{
break;
case 4:
close2;
- set .@loop2,0;
+ .@loop2 = 0;
end;
}
}
@@ -1099,7 +1099,7 @@ prt_in,161,50,4 script Monster Encyclopedia#3pr 111,{
break;
case 4:
close2;
- set .@loop2,0;
+ .@loop2 = 0;
end;
}
}
@@ -1226,14 +1226,14 @@ prt_in,161,50,4 script Monster Encyclopedia#3pr 111,{
break;
case 4:
close2;
- set .@loop2,0;
+ .@loop2 = 0;
end;
}
}
case 4:
close2;
- set .@loop,0;
+ .@loop = 0;
end;
}
}
@@ -1244,7 +1244,7 @@ prt_in,172,96,4 script Monster Encyclopedia#4pr HIDDEN_NPC,{
mes "This is an Encyclopedia describing";
mes "monsters living in Dungeons.";
next;
- set .@loop1,1;
+ .@loop1 = 1;
switch(select("Ant Hell:Geffen Tower:Sphinx:Cancel")) {
case 1:
while(.@loop1) {
@@ -1350,7 +1350,7 @@ prt_in,172,96,4 script Monster Encyclopedia#4pr HIDDEN_NPC,{
break;
case 3:
close2;
- set .@loop1,0;
+ .@loop1 = 0;
end;
}
}
@@ -1547,7 +1547,7 @@ prt_in,172,96,4 script Monster Encyclopedia#4pr HIDDEN_NPC,{
break;
case 5:
close2;
- set .@loop1,0;
+ .@loop1 = 0;
end;
}
}
@@ -1710,7 +1710,7 @@ prt_in,172,96,4 script Monster Encyclopedia#4pr HIDDEN_NPC,{
break;
case 6:
close2;
- set .@loop1,0;
+ .@loop1 = 0;
end;
}
}
@@ -1726,7 +1726,7 @@ prt_in,164,96,4 script Monster Encyclopedia#5pr HIDDEN_NPC,{
mes "This is an Encyclopedia describing";
mes "Monsters living in Dungeons.";
next;
- set .@loop1,1;
+ .@loop1 = 1;
switch(select("Orc Dungeon:Byalan Cave near Izlude:Prontera Culvert")){
case 1:
while(.@loop1) {
@@ -1803,7 +1803,7 @@ prt_in,164,96,4 script Monster Encyclopedia#5pr HIDDEN_NPC,{
break;
case 3:
close2;
- set .@loop1,0;
+ .@loop1 = 0;
end;
}
}
@@ -2065,7 +2065,7 @@ prt_in,164,96,4 script Monster Encyclopedia#5pr HIDDEN_NPC,{
break;
case 6:
close2;
- set .@loop1,0;
+ .@loop1 = 0;
end;
}
}
@@ -2290,7 +2290,7 @@ prt_in,164,96,4 script Monster Encyclopedia#5pr HIDDEN_NPC,{
break;
case 5:
close2;
- set .@loop1,0;
+ .@loop1 = 0;
end;
}
}
@@ -2304,7 +2304,7 @@ prt_in,172,102,4 script Monster Encyclopedia#6pr HIDDEN_NPC,{
mes "This is an Encyclopedia describing";
mes "Monsters living in Dungeons.";
next;
- set .@loop1,1;
+ .@loop1 = 1;
switch(select("Mjolnir Dead Pit:Payon Cave:Pyramid")) {
case 1:
while(.@loop1) {
@@ -2405,7 +2405,7 @@ prt_in,172,102,4 script Monster Encyclopedia#6pr HIDDEN_NPC,{
break;
case 4:
close2;
- set .@loop1,0;
+ .@loop1 = 0;
end;
}
}
@@ -2583,7 +2583,7 @@ prt_in,172,102,4 script Monster Encyclopedia#6pr HIDDEN_NPC,{
break;
case 6:
close2;
- set .@loop1,0;
+ .@loop1 = 0;
end;
}
}
@@ -2797,7 +2797,7 @@ prt_in,172,102,4 script Monster Encyclopedia#6pr HIDDEN_NPC,{
break;
case 7:
close2;
- set .@loop1,0;
+ .@loop1 = 0;
end;
}
}
@@ -2812,7 +2812,7 @@ prt_in,164,102,4 script Monster Encyclopedia#7pr HIDDEN_NPC,{
mes "This is an Encyclopedia describing";
mes "Monsters living in Dungeons.";
next;
- set .@loop1,1;
+ .@loop1 = 1;
switch(select("Sunken Ship near Alberta:Prontera Maze")) {
case 1:
while(.@loop1) {
@@ -2947,7 +2947,7 @@ prt_in,164,102,4 script Monster Encyclopedia#7pr HIDDEN_NPC,{
break;
case 3:
close2;
- set .@loop1,0;
+ .@loop1 = 0;
end;
}
}
@@ -3442,7 +3442,7 @@ prt_in,164,102,4 script Monster Encyclopedia#7pr HIDDEN_NPC,{
break;
case 3:
close2;
- set .@loop1,0;
+ .@loop1 = 0;
end;
}
}
diff --git a/npc/other/card_trader.txt b/npc/other/card_trader.txt
index 8838bafb9..871dd805a 100644
--- a/npc/other/card_trader.txt
+++ b/npc/other/card_trader.txt
@@ -57,7 +57,7 @@ prontera,115,90,0 script Putty 4_F_01,{
4453;
setarray .card[1], getarraysize(.card1), getarraysize(.card2), getarraysize(.card3);
}
- set .@points,oversea_event9;
+ .@points = oversea_event9;
if (!.@points) {
mes "[Putty]";
mes "Hi there.";
@@ -103,20 +103,20 @@ prontera,115,90,0 script Putty 4_F_01,{
mes "Please tell me what card you want to exchange.";
next;
input .@i$;
- set .@input$, "_"+.@i$;
- set .@card,0;
+ .@input$ = "_"+.@i$;
+ .@card = 0;
freeloop(1);
- for(set .@j,1; .@j<4; set .@j,.@j+1) {
- for(set .@i,0; .@i<.card[.@j]; set .@i,.@i+1)
+ for(.@j = 1; .@j<4; ++.@j) {
+ for(.@i = 0; .@i<.card[.@j]; ++.@i)
if (compare(.@input$,"_"+getitemname(getd(".card"+.@j+"["+.@i+"]")))) {
- set .@card, getd(".card"+.@j+"["+.@i+"]"); break; }
+ .@card = getd(".card"+.@j+"["+.@i+"]"); break; }
sleep2 10; // For good measure
if (.@card) break; }
freeloop(0);
mes "[Putty]";
if (!.@card) mes "Please, come back here if you want to exchange a monster card.";
else {
- set .@count, countitem(.@card);
+ .@count = countitem(.@card);
if (!.@count) {
mes "You don't have any ^0055FF"+getitemname(.@card)+"s^000000 with you!";
close; }
@@ -127,7 +127,7 @@ prontera,115,90,0 script Putty 4_F_01,{
switch(select("Yes, please!","No, thank you.")) {
case 1:
delitem .@card,.@count;
- set oversea_event9, (.@points+.@count);
+ oversea_event9 = (.@points+.@count);
mes "[Putty]";
mes "Alright, you have received ^CC0000"+.@count+"^000000 points.";
break;
@@ -150,7 +150,7 @@ prontera,115,90,0 script Putty 4_F_01,{
mes "Great, I wish you the best";
mes "of luck with this album. I have a";
mes "very good feeling about this one!";
- set oversea_event9, .@points - 100;
+ oversea_event9 = .@points - 100;
getitem 616,1;
close;
case 2:
@@ -158,7 +158,7 @@ prontera,115,90,0 script Putty 4_F_01,{
mes "[Putty]";
mes "Oh, you must like adventures.";
mes "Here you go, just what you need!";
- set oversea_event9, .@points - 50;
+ oversea_event9 = .@points - 50;
getitem 607,20;
close;
case 3:
@@ -166,7 +166,7 @@ prontera,115,90,0 script Putty 4_F_01,{
mes "[Putty]";
mes "Blue Potions? Are you sure?";
mes "If that's what you want, here they are!";
- set oversea_event9, .@points - 20;
+ oversea_event9 = .@points - 20;
getitem 505,10;
close;
case 4:
@@ -175,7 +175,7 @@ prontera,115,90,0 script Putty 4_F_01,{
mes "It took many bees";
mes "to make all of this.";
mes "Make good use of it.";
- set oversea_event9, .@points - 1;
+ oversea_event9 = .@points - 1;
getitem 518,4;
close;
case 5:
diff --git a/npc/other/comodo_gambling.txt b/npc/other/comodo_gambling.txt
index 28a2e799d..ea354e490 100644
--- a/npc/other/comodo_gambling.txt
+++ b/npc/other/comodo_gambling.txt
@@ -100,279 +100,279 @@ comodo,219,158,6 script Kachua 4_F_02,{
switch (select("Weapon", "Armor", "Garment", "Helmet", "Shoes", "Shield")) {
case 1: // Weapons
- set .@gamble1,rand(1,1000);
+ .@gamble1 = rand(1,1000);
if ((.@gamble1 > 920) && (.@gamble1 < 931)) {
- set .@gamble2,rand(1,85);
- if (.@gamble2 == 1) set .@item,1128; // Haedonggum[2]
- else if (.@gamble2 == 2) set .@item,1120; // Tsurugi[2]
- else if (.@gamble2 == 3) set .@item,1127; // Saber[3]
- else if (.@gamble2 == 4) set .@item,1158; // Two-Handed Sword[2]
- else if (.@gamble2 == 5) set .@item,1155; // Bastard Sword[3]
- else if (.@gamble2 == 6) set .@item,1220; // Gladius[3]
- else if (.@gamble2 == 7) set .@item,1222; // Damascus[1]
- else if (.@gamble2 == 8) set .@item,1253; // Katar[2]
- else if (.@gamble2 == 9) set .@item,1529; // Iron Driver
- else if (.@gamble2 == 10) set .@item,1251; // Jur[3]
- else if (.@gamble2 == 11) set .@item,1361; // Two-Handed Axe[2]
- else if (.@gamble2 == 12) set .@item,1258; // Katar of Raging Blaze
- else if (.@gamble2 == 13) set .@item,1257; // Katar of Quaking
- else if (.@gamble2 == 14) set .@item,1256; // Katar of Frozen Icicle
- else if (.@gamble2 == 15) set .@item,1259; // Katar of Piercing Wind
- else if (.@gamble2 == 16) set .@item,1260; // Sharpened Legbone of Ghoul
- else if (.@gamble2 == 17) set .@item,1716; // Gakkung Bow[2]
- else if (.@gamble2 == 18) set .@item,1715; // Arbalest[2]
- else if (.@gamble2 == 19) set .@item,1711; // Crossbow[3]
- else if (.@gamble2 == 20) set .@item,1702; // Bow[4]
- else if (.@gamble2 == 21) set .@item,1520; // Chain[3]
- else if (.@gamble2 == 22) set .@item,1610; // Arc Wand[1]
- else if (.@gamble2 == 23) set .@item,1615; // Evil Bone Wand
- else if (.@gamble2 == 24) set .@item,1602; // Rod[4]
- else if (.@gamble2 == 25) set .@item,1461; // Trident[3]
- else if (.@gamble2 == 26) set .@item,1402; // Javelin[4]
- else if (.@gamble2 == 27) set .@item,1961; // Whip[2]
- else if (.@gamble2 == 28) set .@item,1957; // Rante Whip[1]
- else if (.@gamble2 == 29) set .@item,1552; // Tablet[1]
- else if (.@gamble2 == 30) set .@item,1551; // Bible[2]
- else if (.@gamble2 == 31) set .@item,1553; // Book of Billows
- else if (.@gamble2 == 32) set .@item,1554; // Book of Mother Earth
- else if (.@gamble2 == 33) set .@item,1555; // Book of the Blazing Sun
- else if (.@gamble2 == 34) set .@item,1556; // Book of Gust of Wind
- else if (.@gamble2 == 35) set .@item,1951; // Rope[4]
- else if (.@gamble2 == 36) set .@item,1959; // Tail Whip[2]
- else if (.@gamble2 == 37) set .@item,1953; // Whip[3]
- else if (.@gamble2 == 38) set .@item,1955; // Wire Whip[3]
- else if (.@gamble2 == 39) set .@item,1810; // Claw[2]
- else if (.@gamble2 == 40) set .@item,1910; // Harp[2]
- else if (.@gamble2 == 41) set .@item,1906; // Lute[3]
- else if (.@gamble2 == 42) set .@item,1902; // Violin[4]
- else if (.@gamble2 == 43) set .@item,1904; // Mandolin[3]
- else if (.@gamble2 == 44) set .@item,1912; // Gumoongoh[2]
- else if (.@gamble2 == 45) set .@item,1908; // Guitar[1]
- else if (.@gamble2 == 46) set .@item,1808; // Fist[1]
- else if (.@gamble2 == 47) set .@item,1802; // Waghnak[4]
- else if (.@gamble2 == 48) set .@item,1812; // Finger[2]
- else if (.@gamble2 == 49) set .@item,1806; // Studded Knuckles[3]
- else if (.@gamble2 == 50) set .@item,1804; // Knuckle Duster[3]
- else if (.@gamble2 == 51) set .@item,1550; // Book[3]
- else if (.@gamble2 == 52) set .@item,1246; // Cinquedea[2]
- else if (.@gamble2 == 53) set .@item,1147; // Town Sword
- else if (.@gamble2 > 53 && .@gamble2 < 56) set .@item,1264; // Specialty Jur[4]
- else if (.@gamble2 > 55 && .@gamble2 < 58) set .@item,1262; // Loki's Nail
- else if (.@gamble2 > 57 && .@gamble2 < 60) set .@item,1622; // Hypnotist's Staff[2]
- else if (.@gamble2 == 60) set .@item,1723; // Luna Bow[2]
- else if (.@gamble2 > 60 && .@gamble2 < 63) set .@item,1965; // Red Flame Whip
- else if (.@gamble2 > 62 && .@gamble2 < 65) set .@item,1966; // Icicle Whip
- else if (.@gamble2 > 64 && .@gamble2 < 67) set .@item,1967; // Gaia Whip
- else if (.@gamble2 > 66 && .@gamble2 < 69) set .@item,1968; // Skipping Rope
- else if (.@gamble2 > 68 && .@gamble2 < 71) set .@item,1914; // Burning Passion Guitar
- else if (.@gamble2 > 70 && .@gamble2 < 73) set .@item,1915; // Loner's Guitar
- else if (.@gamble2 > 72 && .@gamble2 < 75) set .@item,1916; // Green Acre Guitar
- else if (.@gamble2 > 74 && .@gamble2 < 77) set .@item,1917; // Gentle Breeze Guitar
- else if (.@gamble2 > 76 && .@gamble2 < 79) set .@item,13004; // Cowardice Blade[2]
- else if (.@gamble2 > 78 && .@gamble2 < 81) set .@item,1307; // Windhawk
- else if (.@gamble2 == 81) set .@item,1560; // Sage's Diary[2]
- else if (.@gamble2 == 82) set .@item,1618; // Survivor's Rod[1]
- else if (.@gamble2 == 83) set .@item,1620; // Survivor's Rod[1]
- else if (.@gamble2 > 83 && .@gamble2 < 86) set .@item,1971; // Electric Wire
+ .@gamble2 = rand(1,85);
+ if (.@gamble2 == 1) .@item = 1128; // Haedonggum[2]
+ else if (.@gamble2 == 2) .@item = 1120; // Tsurugi[2]
+ else if (.@gamble2 == 3) .@item = 1127; // Saber[3]
+ else if (.@gamble2 == 4) .@item = 1158; // Two-Handed Sword[2]
+ else if (.@gamble2 == 5) .@item = 1155; // Bastard Sword[3]
+ else if (.@gamble2 == 6) .@item = 1220; // Gladius[3]
+ else if (.@gamble2 == 7) .@item = 1222; // Damascus[1]
+ else if (.@gamble2 == 8) .@item = 1253; // Katar[2]
+ else if (.@gamble2 == 9) .@item = 1529; // Iron Driver
+ else if (.@gamble2 == 10) .@item = 1251; // Jur[3]
+ else if (.@gamble2 == 11) .@item = 1361; // Two-Handed Axe[2]
+ else if (.@gamble2 == 12) .@item = 1258; // Katar of Raging Blaze
+ else if (.@gamble2 == 13) .@item = 1257; // Katar of Quaking
+ else if (.@gamble2 == 14) .@item = 1256; // Katar of Frozen Icicle
+ else if (.@gamble2 == 15) .@item = 1259; // Katar of Piercing Wind
+ else if (.@gamble2 == 16) .@item = 1260; // Sharpened Legbone of Ghoul
+ else if (.@gamble2 == 17) .@item = 1716; // Gakkung Bow[2]
+ else if (.@gamble2 == 18) .@item = 1715; // Arbalest[2]
+ else if (.@gamble2 == 19) .@item = 1711; // Crossbow[3]
+ else if (.@gamble2 == 20) .@item = 1702; // Bow[4]
+ else if (.@gamble2 == 21) .@item = 1520; // Chain[3]
+ else if (.@gamble2 == 22) .@item = 1610; // Arc Wand[1]
+ else if (.@gamble2 == 23) .@item = 1615; // Evil Bone Wand
+ else if (.@gamble2 == 24) .@item = 1602; // Rod[4]
+ else if (.@gamble2 == 25) .@item = 1461; // Trident[3]
+ else if (.@gamble2 == 26) .@item = 1402; // Javelin[4]
+ else if (.@gamble2 == 27) .@item = 1961; // Whip[2]
+ else if (.@gamble2 == 28) .@item = 1957; // Rante Whip[1]
+ else if (.@gamble2 == 29) .@item = 1552; // Tablet[1]
+ else if (.@gamble2 == 30) .@item = 1551; // Bible[2]
+ else if (.@gamble2 == 31) .@item = 1553; // Book of Billows
+ else if (.@gamble2 == 32) .@item = 1554; // Book of Mother Earth
+ else if (.@gamble2 == 33) .@item = 1555; // Book of the Blazing Sun
+ else if (.@gamble2 == 34) .@item = 1556; // Book of Gust of Wind
+ else if (.@gamble2 == 35) .@item = 1951; // Rope[4]
+ else if (.@gamble2 == 36) .@item = 1959; // Tail Whip[2]
+ else if (.@gamble2 == 37) .@item = 1953; // Whip[3]
+ else if (.@gamble2 == 38) .@item = 1955; // Wire Whip[3]
+ else if (.@gamble2 == 39) .@item = 1810; // Claw[2]
+ else if (.@gamble2 == 40) .@item = 1910; // Harp[2]
+ else if (.@gamble2 == 41) .@item = 1906; // Lute[3]
+ else if (.@gamble2 == 42) .@item = 1902; // Violin[4]
+ else if (.@gamble2 == 43) .@item = 1904; // Mandolin[3]
+ else if (.@gamble2 == 44) .@item = 1912; // Gumoongoh[2]
+ else if (.@gamble2 == 45) .@item = 1908; // Guitar[1]
+ else if (.@gamble2 == 46) .@item = 1808; // Fist[1]
+ else if (.@gamble2 == 47) .@item = 1802; // Waghnak[4]
+ else if (.@gamble2 == 48) .@item = 1812; // Finger[2]
+ else if (.@gamble2 == 49) .@item = 1806; // Studded Knuckles[3]
+ else if (.@gamble2 == 50) .@item = 1804; // Knuckle Duster[3]
+ else if (.@gamble2 == 51) .@item = 1550; // Book[3]
+ else if (.@gamble2 == 52) .@item = 1246; // Cinquedea[2]
+ else if (.@gamble2 == 53) .@item = 1147; // Town Sword
+ else if (.@gamble2 > 53 && .@gamble2 < 56) .@item = 1264; // Specialty Jur[4]
+ else if (.@gamble2 > 55 && .@gamble2 < 58) .@item = 1262; // Loki's Nail
+ else if (.@gamble2 > 57 && .@gamble2 < 60) .@item = 1622; // Hypnotist's Staff[2]
+ else if (.@gamble2 == 60) .@item = 1723; // Luna Bow[2]
+ else if (.@gamble2 > 60 && .@gamble2 < 63) .@item = 1965; // Red Flame Whip
+ else if (.@gamble2 > 62 && .@gamble2 < 65) .@item = 1966; // Icicle Whip
+ else if (.@gamble2 > 64 && .@gamble2 < 67) .@item = 1967; // Gaia Whip
+ else if (.@gamble2 > 66 && .@gamble2 < 69) .@item = 1968; // Skipping Rope
+ else if (.@gamble2 > 68 && .@gamble2 < 71) .@item = 1914; // Burning Passion Guitar
+ else if (.@gamble2 > 70 && .@gamble2 < 73) .@item = 1915; // Loner's Guitar
+ else if (.@gamble2 > 72 && .@gamble2 < 75) .@item = 1916; // Green Acre Guitar
+ else if (.@gamble2 > 74 && .@gamble2 < 77) .@item = 1917; // Gentle Breeze Guitar
+ else if (.@gamble2 > 76 && .@gamble2 < 79) .@item = 13004; // Cowardice Blade[2]
+ else if (.@gamble2 > 78 && .@gamble2 < 81) .@item = 1307; // Windhawk
+ else if (.@gamble2 == 81) .@item = 1560; // Sage's Diary[2]
+ else if (.@gamble2 == 82) .@item = 1618; // Survivor's Rod[1]
+ else if (.@gamble2 == 83) .@item = 1620; // Survivor's Rod[1]
+ else if (.@gamble2 > 83 && .@gamble2 < 86) .@item = 1971; // Electric Wire
}
- else if ((.@gamble1 > 0) && (.@gamble1 < 201)) set .@item,1201; // Knife[3]
- else if ((.@gamble1 > 200) && (.@gamble1 < 301)) set .@item,1101; // Sword[3]
- else if ((.@gamble1 > 300) && (.@gamble1 < 401)) set .@item,1601; // Rod[3]
- else if ((.@gamble1 > 400) && (.@gamble1 < 501)) set .@item,1116; // Katana[3]
- else if ((.@gamble1 > 500) && (.@gamble1 < 601)) set .@item,1250; // Jur[2]
- else if ((.@gamble1 > 600) && (.@gamble1 < 701)) set .@item,1301; // Axe[3]
- else if ((.@gamble1 > 700) && (.@gamble1 < 801)) set .@item,1701; // Bow[3]
- else if ((.@gamble1 > 800) && (.@gamble1 < 851)) set .@item,1504; // Mace[3]
- else if ((.@gamble1 > 850) && (.@gamble1 < 901)) set .@item,1604; // Wand[2]
- else if ((.@gamble1 > 900) && (.@gamble1 < 911)) set .@item,1108; // Blade[4]
- else if ((.@gamble1 > 910) && (.@gamble1 < 921)) set .@item,1163; // Claymore
- else if ((.@gamble1 > 930) && (.@gamble1 < 961)) set .@item,1522; // Stunner
- else if ((.@gamble1 > 960) && (.@gamble1 < 971)) set .@item,1608; // Staff[3]
- else if ((.@gamble1 > 970) && (.@gamble1 < 981)) set .@item,1408; // Pike[4]
- else if ((.@gamble1 > 980) && (.@gamble1 < 991)) set .@item,1452; // Guisarme[3]
- else if ((.@gamble1 > 990) && (.@gamble1 < 1001)) set .@item,1208; // Main Gauche[4]
+ else if ((.@gamble1 > 0) && (.@gamble1 < 201)) .@item = 1201; // Knife[3]
+ else if ((.@gamble1 > 200) && (.@gamble1 < 301)) .@item = 1101; // Sword[3]
+ else if ((.@gamble1 > 300) && (.@gamble1 < 401)) .@item = 1601; // Rod[3]
+ else if ((.@gamble1 > 400) && (.@gamble1 < 501)) .@item = 1116; // Katana[3]
+ else if ((.@gamble1 > 500) && (.@gamble1 < 601)) .@item = 1250; // Jur[2]
+ else if ((.@gamble1 > 600) && (.@gamble1 < 701)) .@item = 1301; // Axe[3]
+ else if ((.@gamble1 > 700) && (.@gamble1 < 801)) .@item = 1701; // Bow[3]
+ else if ((.@gamble1 > 800) && (.@gamble1 < 851)) .@item = 1504; // Mace[3]
+ else if ((.@gamble1 > 850) && (.@gamble1 < 901)) .@item = 1604; // Wand[2]
+ else if ((.@gamble1 > 900) && (.@gamble1 < 911)) .@item = 1108; // Blade[4]
+ else if ((.@gamble1 > 910) && (.@gamble1 < 921)) .@item = 1163; // Claymore
+ else if ((.@gamble1 > 930) && (.@gamble1 < 961)) .@item = 1522; // Stunner
+ else if ((.@gamble1 > 960) && (.@gamble1 < 971)) .@item = 1608; // Staff[3]
+ else if ((.@gamble1 > 970) && (.@gamble1 < 981)) .@item = 1408; // Pike[4]
+ else if ((.@gamble1 > 980) && (.@gamble1 < 991)) .@item = 1452; // Guisarme[3]
+ else if ((.@gamble1 > 990) && (.@gamble1 < 1001)) .@item = 1208; // Main Gauche[4]
break;
case 2: // Armors
- set .@gamble1,rand(1,500);
+ .@gamble1 = rand(1,500);
if ((.@gamble1 > 299) && (.@gamble1 < 303)) {
- set .@gamble2,rand(1,30);
- if ((.@gamble2 > 0) && (.@gamble2 < 3)) set .@item,2315; // Chain Mail[1]
- else if ((.@gamble2 > 2) && (.@gamble2 < 5)) set .@item,2336; // Thief Clothes[1]
- else if ((.@gamble2 > 4) && (.@gamble2 < 7)) set .@item,2318; // Lord's Clothes[1]
- else if ((.@gamble2 > 6) && (.@gamble2 < 9)) set .@item,2326; // Saint's Robe[1]
- else if ((.@gamble2 > 8) && (.@gamble2 < 11)) set .@item,2327; // Holy Robe
- else if ((.@gamble2 > 10) && (.@gamble2 < 13)) set .@item,2342; // Legion Plate Armor[1]
- else if ((.@gamble2 > 12) && (.@gamble2 < 15)) set .@item,2331; // Tights[1]
- else if ((.@gamble2 > 14) && (.@gamble2 < 17)) set .@item,2342; // Legion Plate Armor[1]
- else if ((.@gamble2 > 16) && (.@gamble2 < 19)) set .@item,2311; // Mink Coat[1]
- else if ((.@gamble2 > 18) && (.@gamble2 < 21)) set .@item,2320; // Formal Suit[1]
- else if ((.@gamble2 > 20) && (.@gamble2 < 23)) set .@item,2319; // Glittering Jacket[1]
- else if ((.@gamble2 > 22) && (.@gamble2 < 25)) set .@item,2344; // Lucius's Fierce Armor of Volcano
- else if ((.@gamble2 > 24) && (.@gamble2 < 27)) set .@item,2346; // Saphien's Armor of Ocean
- else if ((.@gamble2 > 26) && (.@gamble2 < 29)) set .@item,2348; // Aebeccee's Raging Typhoon Armor
- else if ((.@gamble2 > 28) && (.@gamble2 < 31)) set .@item,2350; // Claytos Cracking Earth Armor
+ .@gamble2 = rand(1,30);
+ if ((.@gamble2 > 0) && (.@gamble2 < 3)) .@item = 2315; // Chain Mail[1]
+ else if ((.@gamble2 > 2) && (.@gamble2 < 5)) .@item = 2336; // Thief Clothes[1]
+ else if ((.@gamble2 > 4) && (.@gamble2 < 7)) .@item = 2318; // Lord's Clothes[1]
+ else if ((.@gamble2 > 6) && (.@gamble2 < 9)) .@item = 2326; // Saint's Robe[1]
+ else if ((.@gamble2 > 8) && (.@gamble2 < 11)) .@item = 2327; // Holy Robe
+ else if ((.@gamble2 > 10) && (.@gamble2 < 13)) .@item = 2342; // Legion Plate Armor[1]
+ else if ((.@gamble2 > 12) && (.@gamble2 < 15)) .@item = 2331; // Tights[1]
+ else if ((.@gamble2 > 14) && (.@gamble2 < 17)) .@item = 2342; // Legion Plate Armor[1]
+ else if ((.@gamble2 > 16) && (.@gamble2 < 19)) .@item = 2311; // Mink Coat[1]
+ else if ((.@gamble2 > 18) && (.@gamble2 < 21)) .@item = 2320; // Formal Suit[1]
+ else if ((.@gamble2 > 20) && (.@gamble2 < 23)) .@item = 2319; // Glittering Jacket[1]
+ else if ((.@gamble2 > 22) && (.@gamble2 < 25)) .@item = 2344; // Lucius's Fierce Armor of Volcano
+ else if ((.@gamble2 > 24) && (.@gamble2 < 27)) .@item = 2346; // Saphien's Armor of Ocean
+ else if ((.@gamble2 > 26) && (.@gamble2 < 29)) .@item = 2348; // Aebeccee's Raging Typhoon Armor
+ else if ((.@gamble2 > 28) && (.@gamble2 < 31)) .@item = 2350; // Claytos Cracking Earth Armor
}
- else if ((.@gamble1 > 0) && (.@gamble1 < 51)) set .@item,2301; // Cotton Shirt
- else if ((.@gamble1 > 50) && (.@gamble1 < 101)) set .@item,2302; // Cotton Shirt[1]
- else if ((.@gamble1 > 100) && (.@gamble1 < 151)) set .@item,2303; // Jacket
- else if ((.@gamble1 > 150) && (.@gamble1 < 201)) set .@item,2304; // Jacket[1]
- else if ((.@gamble1 > 200) && (.@gamble1 < 251)) set .@item,2305; // Adventurer's Suit
- else if ((.@gamble1 > 250) && (.@gamble1 < 300)) set .@item,2301; // Cotton Shirt
- else if ((.@gamble1 > 301) && (.@gamble1 < 351)) set .@item,2307; // Mantle
- else if ((.@gamble1 > 350) && (.@gamble1 < 401)) set .@item,2309; // Coat
- else if ((.@gamble1 > 400) && (.@gamble1 < 402)) set .@item,2322; // Silk Robe[1]
- else if ((.@gamble1 > 401) && (.@gamble1 < 403)) set .@item,2310; // Coat[1]
- else if ((.@gamble1 > 402) && (.@gamble1 < 411)) set .@item,2306; // Adventurer's Suit[1]
- else if ((.@gamble1 > 410) && (.@gamble1 < 416)) set .@item,2308; // Mantle[1]
- else if ((.@gamble1 > 415) && (.@gamble1 < 421)) set .@item,2313; // Padded Armor[1]
- else if ((.@gamble1 > 420) && (.@gamble1 < 426)) set .@item,2337; // Ninja Suit
- else if ((.@gamble1 > 425) && (.@gamble1 < 431)) set .@item,2341; // Legion Plate Armor
- else if ((.@gamble1 > 430) && (.@gamble1 < 436)) set .@item,2325; // Saint's Robe
- else if ((.@gamble1 > 435) && (.@gamble1 < 441)) set .@item,2317; // Full Plate
- else if ((.@gamble1 > 440) && (.@gamble1 < 446)) set .@item,2330; // Tights
- else if ((.@gamble1 > 445) && (.@gamble1 < 451)) set .@item,2314; // Chain Mail
- else if ((.@gamble1 > 450) && (.@gamble1 < 456)) set .@item,2335; // Thief Clothes
- else if ((.@gamble1 > 455) && (.@gamble1 < 461)) set .@item,2324; // Scapulare[1]
- else if ((.@gamble1 > 460) && (.@gamble1 < 466)) set .@item,2329; // Wooden Mail[1]
- else if ((.@gamble1 > 465) && (.@gamble1 < 471)) set .@item,2340; // Novice Breastplate[1]
- else if ((.@gamble1 > 470) && (.@gamble1 < 476)) set .@item,2312; // Padded Armor
- else if ((.@gamble1 > 475) && (.@gamble1 < 481)) set .@item,2339; // Pantie
- else if ((.@gamble1 > 480) && (.@gamble1 < 486)) set .@item,2328; // Wooden Mail
- else if ((.@gamble1 > 485) && (.@gamble1 < 491)) set .@item,2321; // Silk Robe
- else if ((.@gamble1 > 490) && (.@gamble1 < 501)) set .@item,2323; // Scapulare
+ else if ((.@gamble1 > 0) && (.@gamble1 < 51)) .@item = 2301; // Cotton Shirt
+ else if ((.@gamble1 > 50) && (.@gamble1 < 101)) .@item = 2302; // Cotton Shirt[1]
+ else if ((.@gamble1 > 100) && (.@gamble1 < 151)) .@item = 2303; // Jacket
+ else if ((.@gamble1 > 150) && (.@gamble1 < 201)) .@item = 2304; // Jacket[1]
+ else if ((.@gamble1 > 200) && (.@gamble1 < 251)) .@item = 2305; // Adventurer's Suit
+ else if ((.@gamble1 > 250) && (.@gamble1 < 300)) .@item = 2301; // Cotton Shirt
+ else if ((.@gamble1 > 301) && (.@gamble1 < 351)) .@item = 2307; // Mantle
+ else if ((.@gamble1 > 350) && (.@gamble1 < 401)) .@item = 2309; // Coat
+ else if ((.@gamble1 > 400) && (.@gamble1 < 402)) .@item = 2322; // Silk Robe[1]
+ else if ((.@gamble1 > 401) && (.@gamble1 < 403)) .@item = 2310; // Coat[1]
+ else if ((.@gamble1 > 402) && (.@gamble1 < 411)) .@item = 2306; // Adventurer's Suit[1]
+ else if ((.@gamble1 > 410) && (.@gamble1 < 416)) .@item = 2308; // Mantle[1]
+ else if ((.@gamble1 > 415) && (.@gamble1 < 421)) .@item = 2313; // Padded Armor[1]
+ else if ((.@gamble1 > 420) && (.@gamble1 < 426)) .@item = 2337; // Ninja Suit
+ else if ((.@gamble1 > 425) && (.@gamble1 < 431)) .@item = 2341; // Legion Plate Armor
+ else if ((.@gamble1 > 430) && (.@gamble1 < 436)) .@item = 2325; // Saint's Robe
+ else if ((.@gamble1 > 435) && (.@gamble1 < 441)) .@item = 2317; // Full Plate
+ else if ((.@gamble1 > 440) && (.@gamble1 < 446)) .@item = 2330; // Tights
+ else if ((.@gamble1 > 445) && (.@gamble1 < 451)) .@item = 2314; // Chain Mail
+ else if ((.@gamble1 > 450) && (.@gamble1 < 456)) .@item = 2335; // Thief Clothes
+ else if ((.@gamble1 > 455) && (.@gamble1 < 461)) .@item = 2324; // Scapulare[1]
+ else if ((.@gamble1 > 460) && (.@gamble1 < 466)) .@item = 2329; // Wooden Mail[1]
+ else if ((.@gamble1 > 465) && (.@gamble1 < 471)) .@item = 2340; // Novice Breastplate[1]
+ else if ((.@gamble1 > 470) && (.@gamble1 < 476)) .@item = 2312; // Padded Armor
+ else if ((.@gamble1 > 475) && (.@gamble1 < 481)) .@item = 2339; // Pantie
+ else if ((.@gamble1 > 480) && (.@gamble1 < 486)) .@item = 2328; // Wooden Mail
+ else if ((.@gamble1 > 485) && (.@gamble1 < 491)) .@item = 2321; // Silk Robe
+ else if ((.@gamble1 > 490) && (.@gamble1 < 501)) .@item = 2323; // Scapulare
break;
case 3: // Garments
- set .@gamble1,rand(1,500);
+ .@gamble1 = rand(1,500);
if ((.@gamble1 > 200) && (.@gamble1 < 204)) {
- set .@gamble2,rand(1,16);
- if ((.@gamble2 > 0) && (.@gamble2 < 3)) set .@item,2506; // Manteau[1]
- else if ((.@gamble2 > 2) && (.@gamble2 < 5)) set .@item,2504; // Muffler[1]
- else if ((.@gamble2 > 4) && (.@gamble2 < 8)) set .@item,2508; // Ragamuffin Manteau
- else if ((.@gamble2 > 7) && (.@gamble2 < 11)) set .@item,2507; // Ancient Cape
- else if (.@gamble2 == 11) set .@item,2513; // Heavenly Maiden Robe[1]
- else if (.@gamble2 == 12) set .@item,2514; // Pauldron[1]
- else if (.@gamble2 == 13) set .@item,2523; // Undershirt[1]
- else if (.@gamble2 == 14) set .@item,2530; // Rider Insigna[1]
- else if (.@gamble2 == 15) set .@item,2509; // Survivor's Manteau
- else if (.@gamble2 == 16) set .@item,2515; // Eagle Wing[1]
+ .@gamble2 = rand(1,16);
+ if ((.@gamble2 > 0) && (.@gamble2 < 3)) .@item = 2506; // Manteau[1]
+ else if ((.@gamble2 > 2) && (.@gamble2 < 5)) .@item = 2504; // Muffler[1]
+ else if ((.@gamble2 > 4) && (.@gamble2 < 8)) .@item = 2508; // Ragamuffin Manteau
+ else if ((.@gamble2 > 7) && (.@gamble2 < 11)) .@item = 2507; // Ancient Cape
+ else if (.@gamble2 == 11) .@item = 2513; // Heavenly Maiden Robe[1]
+ else if (.@gamble2 == 12) .@item = 2514; // Pauldron[1]
+ else if (.@gamble2 == 13) .@item = 2523; // Undershirt[1]
+ else if (.@gamble2 == 14) .@item = 2530; // Rider Insigna[1]
+ else if (.@gamble2 == 15) .@item = 2509; // Survivor's Manteau
+ else if (.@gamble2 == 16) .@item = 2515; // Eagle Wing[1]
}
- else if ((.@gamble1 > 0) && (.@gamble1 < 101)) set .@item,2503; // Muffler
- else if ((.@gamble1 > 100) && (.@gamble1 < 201)) set .@item,2505; // Manteau
- else if ((.@gamble1 > 203) && (.@gamble1 < 451)) set .@item,2501; // Hood
- else if ((.@gamble1 > 450) && (.@gamble1 < 501)) set .@item,2502; // Hood[1]
+ else if ((.@gamble1 > 0) && (.@gamble1 < 101)) .@item = 2503; // Muffler
+ else if ((.@gamble1 > 100) && (.@gamble1 < 201)) .@item = 2505; // Manteau
+ else if ((.@gamble1 > 203) && (.@gamble1 < 451)) .@item = 2501; // Hood
+ else if ((.@gamble1 > 450) && (.@gamble1 < 501)) .@item = 2502; // Hood[1]
break;
case 4: // Headgears
- set .@gamble1,rand(1,1000);
+ .@gamble1 = rand(1,1000);
if ((.@gamble1 > 299) && (.@gamble1 < 304)) {
- set .@gamble2,rand(1,93);
- if ((.@gamble2 > 0) && (.@gamble2 < 3)) set .@item,2251; // Monk Hat
- else if ((.@gamble2 > 2) && (.@gamble2 < 5)) set .@item,2285; // Apple of Archer
- else if ((.@gamble2 > 4) && (.@gamble2 < 7)) set .@item,2255; // Evil Wing
- else if ((.@gamble2 > 6) && (.@gamble2 < 9)) set .@item,5045; // Magician Hat
- else if ((.@gamble2 > 8) && (.@gamble2 < 11)) set .@item,2233; // Circlet[1]
- else if ((.@gamble2 > 10) && (.@gamble2 < 13)) set .@item,2231; // Gemmed Sallet[1]
- else if ((.@gamble2 > 12) && (.@gamble2 < 15)) set .@item,2217; // Biretta[1]
- else if ((.@gamble2 > 14) && (.@gamble2 < 17)) set .@item,2206; // Wedding Veil
- else if ((.@gamble2 > 16) && (.@gamble2 < 19)) set .@item,2246; // Golden Gear
- else if ((.@gamble2 > 18) && (.@gamble2 < 21)) set .@item,2261; // Army Cap
- else if ((.@gamble2 > 20) && (.@gamble2 < 23)) set .@item,2287; // Pirate Bandana
- else if ((.@gamble2 > 22) && (.@gamble2 < 25)) set .@item,5012; // Ph.D Hat
- else if ((.@gamble2 > 24) && (.@gamble2 < 27)) set .@item,2244; // Big Ribbon
- else if ((.@gamble2 > 26) && (.@gamble2 < 29)) set .@item,2213; // Kitty Band
- else if ((.@gamble2 > 28) && (.@gamble2 < 31)) set .@item,2248; // Western Grace
- else if ((.@gamble2 > 30) && (.@gamble2 < 33)) set .@item,2223; // Turban[1]
- else if ((.@gamble2 > 32) && (.@gamble2 < 35)) set .@item,2247; // Romantic Gent
- else if ((.@gamble2 > 34) && (.@gamble2 < 37)) set .@item,2245; // Sweet Gent
- else if ((.@gamble2 > 36) && (.@gamble2 < 39)) set .@item,5003; // Joker Jester
- else if ((.@gamble2 > 38) && (.@gamble2 < 41)) set .@item,2225; // Goggles[1]
- else if ((.@gamble2 > 40) && (.@gamble2 < 43)) set .@item,5017; // Bone Helm
- else if ((.@gamble2 > 42) && (.@gamble2 < 45)) set .@item,5030; // Panda Hat
- else if ((.@gamble2 > 44) && (.@gamble2 < 47)) set .@item,5035; // Poring Hat
- else if ((.@gamble2 > 46) && (.@gamble2 < 49)) set .@item,2250; // Cute Ribbon
- else if ((.@gamble2 > 48) && (.@gamble2 < 51)) set .@item,2277; // Nurse Cap
- else if ((.@gamble2 > 50) && (.@gamble2 < 53)) set .@item,5011; // Aerial
- else if ((.@gamble2 > 52) && (.@gamble2 < 55)) set .@item,2290; // Funeral Hat
- else if ((.@gamble2 > 54) && (.@gamble2 < 57)) set .@item,5010; // Indian Fillet
- else if ((.@gamble2 > 56) && (.@gamble2 < 60)) set .@item,2259; // Mini Propeller
- else if ((.@gamble2 > 59) && (.@gamble2 < 62)) set .@item,5008; // Puppy Love
- else if ((.@gamble2 > 61) && (.@gamble2 < 63)) set .@item,2249; // Coronet
- else if ((.@gamble2 > 62) && (.@gamble2 < 65)) set .@item,2229; // Helm[1]
- else if (.@gamble2 == 65) set .@item,2258; // Spiky Band
- else if (.@gamble2 == 66) set .@item,2274; // Ghost Bandana
- else if (.@gamble2 == 67) set .@item,5019; // Corsair
- else if (.@gamble2 == 68) set .@item,2254; // Angel Wing
- else if (.@gamble2 == 69) set .@item,5007; // Grand Circlet
- else if (.@gamble2 == 70) set .@item,5066; // Succubus Horn
- else if (.@gamble2 == 71) set .@item,2235; // Crown
- else if (.@gamble2 == 72) set .@item,2234; // Tiara
- else if (.@gamble2 == 73) set .@item,2256; // Majestic Goat
- else if (.@gamble2 == 74) set .@item,5093; // Coif[1]
- else if (.@gamble2 == 75) set .@item,5072; // Incubus Horn
- else if (.@gamble2 == 76) set .@item,5002; // Jewel Crown
- else if (.@gamble2 > 76 && .@gamble2 < 80) set .@item,5118; // Puppy Headband
- else if (.@gamble2 > 79 && .@gamble2 < 83) set .@item,5120; // Bucket Hat[1]
- else if (.@gamble2 > 82 && .@gamble2 < 86) set .@item,5111; // Galapago Cap
- else if (.@gamble2 > 85 && .@gamble2 < 89) set .@item,5116; // Banana Hat
- else if (.@gamble2 > 88 && .@gamble2 < 92) set .@item,5119; // Super Novice Hat[1]
- else if (.@gamble2 > 91 && .@gamble2 < 94) set .@item,5141; // Marionetta Doll[1]
+ .@gamble2 = rand(1,93);
+ if ((.@gamble2 > 0) && (.@gamble2 < 3)) .@item = 2251; // Monk Hat
+ else if ((.@gamble2 > 2) && (.@gamble2 < 5)) .@item = 2285; // Apple of Archer
+ else if ((.@gamble2 > 4) && (.@gamble2 < 7)) .@item = 2255; // Evil Wing
+ else if ((.@gamble2 > 6) && (.@gamble2 < 9)) .@item = 5045; // Magician Hat
+ else if ((.@gamble2 > 8) && (.@gamble2 < 11)) .@item = 2233; // Circlet[1]
+ else if ((.@gamble2 > 10) && (.@gamble2 < 13)) .@item = 2231; // Gemmed Sallet[1]
+ else if ((.@gamble2 > 12) && (.@gamble2 < 15)) .@item = 2217; // Biretta[1]
+ else if ((.@gamble2 > 14) && (.@gamble2 < 17)) .@item = 2206; // Wedding Veil
+ else if ((.@gamble2 > 16) && (.@gamble2 < 19)) .@item = 2246; // Golden Gear
+ else if ((.@gamble2 > 18) && (.@gamble2 < 21)) .@item = 2261; // Army Cap
+ else if ((.@gamble2 > 20) && (.@gamble2 < 23)) .@item = 2287; // Pirate Bandana
+ else if ((.@gamble2 > 22) && (.@gamble2 < 25)) .@item = 5012; // Ph.D Hat
+ else if ((.@gamble2 > 24) && (.@gamble2 < 27)) .@item = 2244; // Big Ribbon
+ else if ((.@gamble2 > 26) && (.@gamble2 < 29)) .@item = 2213; // Kitty Band
+ else if ((.@gamble2 > 28) && (.@gamble2 < 31)) .@item = 2248; // Western Grace
+ else if ((.@gamble2 > 30) && (.@gamble2 < 33)) .@item = 2223; // Turban[1]
+ else if ((.@gamble2 > 32) && (.@gamble2 < 35)) .@item = 2247; // Romantic Gent
+ else if ((.@gamble2 > 34) && (.@gamble2 < 37)) .@item = 2245; // Sweet Gent
+ else if ((.@gamble2 > 36) && (.@gamble2 < 39)) .@item = 5003; // Joker Jester
+ else if ((.@gamble2 > 38) && (.@gamble2 < 41)) .@item = 2225; // Goggles[1]
+ else if ((.@gamble2 > 40) && (.@gamble2 < 43)) .@item = 5017; // Bone Helm
+ else if ((.@gamble2 > 42) && (.@gamble2 < 45)) .@item = 5030; // Panda Hat
+ else if ((.@gamble2 > 44) && (.@gamble2 < 47)) .@item = 5035; // Poring Hat
+ else if ((.@gamble2 > 46) && (.@gamble2 < 49)) .@item = 2250; // Cute Ribbon
+ else if ((.@gamble2 > 48) && (.@gamble2 < 51)) .@item = 2277; // Nurse Cap
+ else if ((.@gamble2 > 50) && (.@gamble2 < 53)) .@item = 5011; // Aerial
+ else if ((.@gamble2 > 52) && (.@gamble2 < 55)) .@item = 2290; // Funeral Hat
+ else if ((.@gamble2 > 54) && (.@gamble2 < 57)) .@item = 5010; // Indian Fillet
+ else if ((.@gamble2 > 56) && (.@gamble2 < 60)) .@item = 2259; // Mini Propeller
+ else if ((.@gamble2 > 59) && (.@gamble2 < 62)) .@item = 5008; // Puppy Love
+ else if ((.@gamble2 > 61) && (.@gamble2 < 63)) .@item = 2249; // Coronet
+ else if ((.@gamble2 > 62) && (.@gamble2 < 65)) .@item = 2229; // Helm[1]
+ else if (.@gamble2 == 65) .@item = 2258; // Spiky Band
+ else if (.@gamble2 == 66) .@item = 2274; // Ghost Bandana
+ else if (.@gamble2 == 67) .@item = 5019; // Corsair
+ else if (.@gamble2 == 68) .@item = 2254; // Angel Wing
+ else if (.@gamble2 == 69) .@item = 5007; // Grand Circlet
+ else if (.@gamble2 == 70) .@item = 5066; // Succubus Horn
+ else if (.@gamble2 == 71) .@item = 2235; // Crown
+ else if (.@gamble2 == 72) .@item = 2234; // Tiara
+ else if (.@gamble2 == 73) .@item = 2256; // Majestic Goat
+ else if (.@gamble2 == 74) .@item = 5093; // Coif[1]
+ else if (.@gamble2 == 75) .@item = 5072; // Incubus Horn
+ else if (.@gamble2 == 76) .@item = 5002; // Jewel Crown
+ else if (.@gamble2 > 76 && .@gamble2 < 80) .@item = 5118; // Puppy Headband
+ else if (.@gamble2 > 79 && .@gamble2 < 83) .@item = 5120; // Bucket Hat[1]
+ else if (.@gamble2 > 82 && .@gamble2 < 86) .@item = 5111; // Galapago Cap
+ else if (.@gamble2 > 85 && .@gamble2 < 89) .@item = 5116; // Banana Hat
+ else if (.@gamble2 > 88 && .@gamble2 < 92) .@item = 5119; // Super Novice Hat[1]
+ else if (.@gamble2 > 91 && .@gamble2 < 94) .@item = 5141; // Marionetta Doll[1]
}
- else if ((.@gamble1 > 0) && (.@gamble1 < 101)) set .@item,2226; // Cap
- else if ((.@gamble1 > 100) && (.@gamble1 < 201)) set .@item,2211; // Bandana
- else if ((.@gamble1 > 200) && (.@gamble1 < 300)) set .@item,2209; // Ribbon[1]
- else if ((.@gamble1 > 303) && (.@gamble1 < 401)) set .@item,2220; // Hat
- else if ((.@gamble1 > 400) && (.@gamble1 < 501)) set .@item,2232; // Circlet
- else if ((.@gamble1 > 500) && (.@gamble1 < 601)) set .@item,2216; // Biretta
- else if ((.@gamble1 > 600) && (.@gamble1 < 701)) set .@item,2230; // Gemmed Sallet
- else if ((.@gamble1 > 700) && (.@gamble1 < 801)) set .@item,2224; // Goggles
- else if ((.@gamble1 > 800) && (.@gamble1 < 901)) set .@item,2222; // Turban
- else if ((.@gamble1 > 900) && (.@gamble1 < 906)) set .@item,2228; // Helm
- else if ((.@gamble1 > 905) && (.@gamble1 < 911)) set .@item,2252; // Wizard Hat
- else if ((.@gamble1 > 910) && (.@gamble1 < 916)) set .@item,2227; // Cap[1]
- else if ((.@gamble1 > 915) && (.@gamble1 < 921)) set .@item,2221; // Hat[1]
- else if ((.@gamble1 > 920) && (.@gamble1 < 926)) set .@item,2299; // Orc Helm
- else if ((.@gamble1 > 925) && (.@gamble1 < 931)) set .@item,2236; // Santa Hat
- else if ((.@gamble1 > 930) && (.@gamble1 < 936)) set .@item,2275; // Red Bandana
- else if ((.@gamble1 > 935) && (.@gamble1 < 941)) set .@item,5015; // Egg Shell
- else if ((.@gamble1 > 940) && (.@gamble1 < 946)) set .@item,2215; // Flower Band
- else if ((.@gamble1 > 945) && (.@gamble1 < 951)) set .@item,5092; // Coif
- else if ((.@gamble1 > 950) && (.@gamble1 < 1001)) set .@item,2226; // Cap
+ else if ((.@gamble1 > 0) && (.@gamble1 < 101)) .@item = 2226; // Cap
+ else if ((.@gamble1 > 100) && (.@gamble1 < 201)) .@item = 2211; // Bandana
+ else if ((.@gamble1 > 200) && (.@gamble1 < 300)) .@item = 2209; // Ribbon[1]
+ else if ((.@gamble1 > 303) && (.@gamble1 < 401)) .@item = 2220; // Hat
+ else if ((.@gamble1 > 400) && (.@gamble1 < 501)) .@item = 2232; // Circlet
+ else if ((.@gamble1 > 500) && (.@gamble1 < 601)) .@item = 2216; // Biretta
+ else if ((.@gamble1 > 600) && (.@gamble1 < 701)) .@item = 2230; // Gemmed Sallet
+ else if ((.@gamble1 > 700) && (.@gamble1 < 801)) .@item = 2224; // Goggles
+ else if ((.@gamble1 > 800) && (.@gamble1 < 901)) .@item = 2222; // Turban
+ else if ((.@gamble1 > 900) && (.@gamble1 < 906)) .@item = 2228; // Helm
+ else if ((.@gamble1 > 905) && (.@gamble1 < 911)) .@item = 2252; // Wizard Hat
+ else if ((.@gamble1 > 910) && (.@gamble1 < 916)) .@item = 2227; // Cap[1]
+ else if ((.@gamble1 > 915) && (.@gamble1 < 921)) .@item = 2221; // Hat[1]
+ else if ((.@gamble1 > 920) && (.@gamble1 < 926)) .@item = 2299; // Orc Helm
+ else if ((.@gamble1 > 925) && (.@gamble1 < 931)) .@item = 2236; // Santa Hat
+ else if ((.@gamble1 > 930) && (.@gamble1 < 936)) .@item = 2275; // Red Bandana
+ else if ((.@gamble1 > 935) && (.@gamble1 < 941)) .@item = 5015; // Egg Shell
+ else if ((.@gamble1 > 940) && (.@gamble1 < 946)) .@item = 2215; // Flower Band
+ else if ((.@gamble1 > 945) && (.@gamble1 < 951)) .@item = 5092; // Coif
+ else if ((.@gamble1 > 950) && (.@gamble1 < 1001)) .@item = 2226; // Cap
break;
case 5: // Footgear
- set .@gamble1,rand(1,500);
+ .@gamble1 = rand(1,500);
if ((.@gamble1 > 299) && (.@gamble1 < 303)) {
- set .@gamble2,rand(1,10);
- if ((.@gamble2 > 0) && (.@gamble2 < 3)) set .@item,2406; // Boots[1]
- else if ((.@gamble2 > 2) && (.@gamble2 < 5)) set .@item,2412; // Greaves[1]
- else if ((.@gamble2 > 4) && (.@gamble2 < 8)) set .@item,2404; // Shoes[1]
- else if ((.@gamble2 > 7) && (.@gamble2 < 11)) set .@item,2407; // Crystal Pumps
+ .@gamble2 = rand(1,10);
+ if ((.@gamble2 > 0) && (.@gamble2 < 3)) .@item = 2406; // Boots[1]
+ else if ((.@gamble2 > 2) && (.@gamble2 < 5)) .@item = 2412; // Greaves[1]
+ else if ((.@gamble2 > 4) && (.@gamble2 < 8)) .@item = 2404; // Shoes[1]
+ else if ((.@gamble2 > 7) && (.@gamble2 < 11)) .@item = 2407; // Crystal Pumps
}
- else if ((.@gamble1 > 0) && (.@gamble1 < 201)) set .@item,2401; // Sandals
- else if ((.@gamble1 > 200) && (.@gamble1 < 300)) set .@item,2408; // Shackles
- else if ((.@gamble1 > 302) && (.@gamble1 < 351)) set .@item,2411; // Greaves
- else if ((.@gamble1 > 350) && (.@gamble1 < 401)) set .@item,2403; // Shoes
- else if ((.@gamble1 > 400) && (.@gamble1 < 451)) set .@item,2405; // Boots
- else if ((.@gamble1 > 450) && (.@gamble1 < 476)) set .@item,2409; // High Heels
- else if ((.@gamble1 > 475) && (.@gamble1 < 501)) set .@item,2402; // Sandals[1]
+ else if ((.@gamble1 > 0) && (.@gamble1 < 201)) .@item = 2401; // Sandals
+ else if ((.@gamble1 > 200) && (.@gamble1 < 300)) .@item = 2408; // Shackles
+ else if ((.@gamble1 > 302) && (.@gamble1 < 351)) .@item = 2411; // Greaves
+ else if ((.@gamble1 > 350) && (.@gamble1 < 401)) .@item = 2403; // Shoes
+ else if ((.@gamble1 > 400) && (.@gamble1 < 451)) .@item = 2405; // Boots
+ else if ((.@gamble1 > 450) && (.@gamble1 < 476)) .@item = 2409; // High Heels
+ else if ((.@gamble1 > 475) && (.@gamble1 < 501)) .@item = 2402; // Sandals[1]
break;
case 6: // Shields
- set .@gamble1,rand(1,500);
+ .@gamble1 = rand(1,500);
if ((.@gamble1 > 200) && (.@gamble1 < 205)) {
- set .@gamble2,rand(1,10);
- if ((.@gamble2 > 0) && (.@gamble2 < 3)) set .@item,2104; // Buckler[1]
- else if ((.@gamble2 > 2) && (.@gamble2 < 5)) set .@item,2106; // Shield[1]
- else if ((.@gamble2 > 4) && (.@gamble2 < 7)) set .@item,2102; // Guard[1]
- else if ((.@gamble2 > 6) && (.@gamble2 < 9)) set .@item,2111; // Sacred Mission
- else if ((.@gamble2 > 8) && (.@gamble2 < 11)) set .@item,2109; // Memory Book
+ .@gamble2 = rand(1,10);
+ if ((.@gamble2 > 0) && (.@gamble2 < 3)) .@item = 2104; // Buckler[1]
+ else if ((.@gamble2 > 2) && (.@gamble2 < 5)) .@item = 2106; // Shield[1]
+ else if ((.@gamble2 > 4) && (.@gamble2 < 7)) .@item = 2102; // Guard[1]
+ else if ((.@gamble2 > 6) && (.@gamble2 < 9)) .@item = 2111; // Sacred Mission
+ else if ((.@gamble2 > 8) && (.@gamble2 < 11)) .@item = 2109; // Memory Book
}
- else if ((.@gamble1 > 0) && (.@gamble1 < 201)) set .@item,2101; // Guard
- else if ((.@gamble1 > 204) && (.@gamble1 < 301)) set .@item,2103; // Buckler
- else if ((.@gamble1 > 300) && (.@gamble1 < 401)) set .@item,2107; // Mirror Shield
- else if ((.@gamble1 > 401) && (.@gamble1 < 481)) set .@item,2105; // Shield
- else if ((.@gamble1 > 480) && (.@gamble1 < 501)) set .@item,2108; // Mirror Shield[1]
+ else if ((.@gamble1 > 0) && (.@gamble1 < 201)) .@item = 2101; // Guard
+ else if ((.@gamble1 > 204) && (.@gamble1 < 301)) .@item = 2103; // Buckler
+ else if ((.@gamble1 > 300) && (.@gamble1 < 401)) .@item = 2107; // Mirror Shield
+ else if ((.@gamble1 > 401) && (.@gamble1 < 481)) .@item = 2105; // Shield
+ else if ((.@gamble1 > 480) && (.@gamble1 < 501)) .@item = 2108; // Mirror Shield[1]
break;
default: // Cancel button / hack
cutin "katsua01.bmp",255;
@@ -536,8 +536,8 @@ mjolnir_02,85,362,3 script Blacksmith Miner 4_F_JOB_BLACKSMITH,{
mes "Please enter 500 or less.";
close;
}
- set .@cost,.@amount * 55000;
- set .@weight,.@amount * 100;
+ .@cost = .@amount * 55000;
+ .@weight = .@amount * 100;
if (Zeny < .@cost){
mes "[Dwayne]";
mes "Errr...";
diff --git a/npc/other/divorce.txt b/npc/other/divorce.txt
index c95589d74..9ffda4910 100644
--- a/npc/other/divorce.txt
+++ b/npc/other/divorce.txt
@@ -193,7 +193,7 @@ nif_in,190,112,5 script Deviruchi#divorce 4_DEVIRUCHI,{
next;
specialeffect EF_MAGICROD;
specialeffect2 EF_DEVIL;
- set wedding_sign,0;
+ wedding_sign = 0;
Zeny -= 2500000;
percentheal -100,-100;
divorce;
diff --git a/npc/other/fortune.txt b/npc/other/fortune.txt
index a596377d1..a14f63fc9 100644
--- a/npc/other/fortune.txt
+++ b/npc/other/fortune.txt
@@ -66,7 +66,7 @@ payon_in03,117,128,5 script Fortune Teller 4_M_BIBI,{
mes "[Lhimetorra]";
mes " I see it... I see a sign of love... ";
next;
- set .@card_1_love,rand(1,74);
+ .@card_1_love = rand(1,74);
if (.@card_1_love == 1) {
cutin "°¡À̾ƽºÄ«µå",4; // Giearth Card
mes "[Lhimetorra]";
@@ -768,7 +768,7 @@ payon_in03,117,128,5 script Fortune Teller 4_M_BIBI,{
mes "[Lhimetorra]";
mes " Ooh... something about your fortune is starting to show... ";
next;
- set .@card_1_money,rand(1,73);
+ .@card_1_money = rand(1,73);
if (.@card_1_money == 1) {
cutin "°¡À̾ƽºÄ«µå",4; // Giearth Card
mes "[Lhimetorra]";
@@ -1438,7 +1438,7 @@ payon_in03,117,128,5 script Fortune Teller 4_M_BIBI,{
mes "[Lhimetorra]";
mes " Future... the card that sees the future is beginning to speak...... Prepare yourself... ";
next;
- set .@card_1_future,rand(1,67);
+ .@card_1_future = rand(1,67);
if (.@card_1_future == 1) {
cutin "°¡À̾ƽºÄ«µå",4; // Giearth Card
mes "[Lhimetorra]";
@@ -2088,7 +2088,7 @@ payon_in03,117,128,5 script Fortune Teller 4_M_BIBI,{
mes "[Lhimetorra]";
mes " Someone that knows of the dangers you do not, will warn you in the form of cards... so listen carefully-! ";
next;
- set .@card_1_warning,rand(1,70);
+ .@card_1_warning = rand(1,70);
if (.@card_1_warning == 1) {
cutin "°¡À̾ƽºÄ«µå",4; // Giearth Card
mes "[Lhimetorra]";
@@ -2770,7 +2770,7 @@ payon_in03,75,129,5 script Poring Fortune Teller 4_M_BIBI,{
mes " Ohh! Cute love fortune! Heh! Lets look at the cards! ";
next;
mes "[Chocarle]";
- set .@card_2_love,rand(1,33);
+ .@card_2_love = rand(1,33);
if (.@card_2_love == 1) {
cutin "°í½ºÆ®¸µÄ«µå",4; // Ghostring Card
mes " Oh! Your lover is about to leave your side! Hold on tight! ";
@@ -2918,7 +2918,7 @@ payon_in03,75,129,5 script Poring Fortune Teller 4_M_BIBI,{
mes " Issues about studying is a serious matter! Lets take a look! Yap! ";
next;
mes "[Chocarle]";
- set .@card_2_study,rand(1,33);
+ .@card_2_study = rand(1,33);
if (.@card_2_study == 1) {
cutin "°í½ºÆ®¸µÄ«µå",4; // Ghostring Card
mes " Agh! Don't die from studying! Take breaks while you're at it! You need some rest! ";
@@ -3066,7 +3066,7 @@ payon_in03,75,129,5 script Poring Fortune Teller 4_M_BIBI,{
mes " Relationships among friends is more difficult than people think! Let's use the cards to try and solve this complicated puzzle of friendship! ";
next;
mes "[Chocarle]";
- set .@card_2_buddy,rand(1,33);
+ .@card_2_buddy = rand(1,33);
if (.@card_2_buddy == 1) {
cutin "°í½ºÆ®¸µÄ«µå",4; // Ghostring Card
mes " Ah! Your friend has gone crazy! They need the heal of friendship! ";
@@ -3214,7 +3214,7 @@ payon_in03,75,129,5 script Poring Fortune Teller 4_M_BIBI,{
mes " If you say fortunetelling! Of course it is about the future! Let's try to figure this out! ";
next;
mes "[Chocarle]";
- set .@card_2_future,rand(1,33);
+ .@card_2_future = rand(1,33);
if (.@card_2_future == 1) {
cutin "°í½ºÆ®¸µÄ«µå",4; // Ghostring Card
mes " Oh no! You are not confident about the future! Trust yourself a little more! Hope! ";
@@ -3364,7 +3364,7 @@ payon_in03,75,129,5 script Poring Fortune Teller 4_M_BIBI,{
mes " Ok! Let's try it! ";
next;
mes "[Chocarle]";
- set .@card_2_fortune,rand(1,33);
+ .@card_2_fortune = rand(1,33);
if (.@card_2_fortune == 1) {
cutin "°í½ºÆ®¸µÄ«µå",4; // Ghostring Card
mes " Uh oh! You're about to be robbed! You must save a little first! ";
diff --git a/npc/other/gm_npcs.txt b/npc/other/gm_npcs.txt
index c9a65e067..76d95974e 100644
--- a/npc/other/gm_npcs.txt
+++ b/npc/other/gm_npcs.txt
@@ -37,7 +37,7 @@ function script F_GM_NPC {
if (getarg(1) == 0) {
// Integer password
if (getarg(3,0)) {
- set .@error, input(.@input,getarg(2),getarg(3));
+ .@error = input(.@input,getarg(2),getarg(3));
if (.@error)
return -2;
} else
diff --git a/npc/other/guildpvp.txt b/npc/other/guildpvp.txt
index debb96de9..b33fffeee 100644
--- a/npc/other/guildpvp.txt
+++ b/npc/other/guildpvp.txt
@@ -25,14 +25,14 @@ pvp_y_room,77,85,4 script Guild Battle Guide 8W_SOLDIER,{
mes "Let me know to which map";
mes "you want me to move you.";
next;
- set .@i, select("Map 1:Map 2:Map 3:Map 4:Map 5");
+ .@i = select("Map 1:Map 2:Map 3:Map 4:Map 5");
mes "[Guild Battle Guide]";
mes "You've chosen Map "+.@i+".";
mes "Now, which team are";
mes "you on? You can choose";
mes "either Team 1 or Team 2.";
next;
- set .@j, select("Team 1:Team 2");
+ .@j = select("Team 1:Team 2");
mes "[Guild Battle Guide]";
mes "Alright, I'll move you";
mes "to Map "+.@i+" as a member";
diff --git a/npc/other/gympass.txt b/npc/other/gympass.txt
index 3f15debc1..8f5bd738d 100644
--- a/npc/other/gympass.txt
+++ b/npc/other/gympass.txt
@@ -50,8 +50,8 @@ payon,173,141,4 script Ripped Cabus#GymPass 4_M_HUMAN_02,{
switch(select("Yes:No:Um, my workouts wore off.")) {
case 1:
if (gympassmemory < 10) {
- set .@add_carry,gympassmemory + 1;
- set .@remain_carry,10 - .@add_carry;
+ .@add_carry = gympassmemory + 1;
+ .@remain_carry = 10 - .@add_carry;
if (countitem(7776) > 0) {
mes "[Ripped]";
mes "Oh, awesome, I see you";
@@ -76,8 +76,8 @@ payon,173,141,4 script Ripped Cabus#GymPass 4_M_HUMAN_02,{
mes "^FF00000" + .@remain_carry + "^000000 more times if we continue";
mes "training together like this.";
delitem 7776,1; //Max_Weight_Up_Scroll
- set gympassmemory,.@add_carry;
- skill "ALL_INCCARRY",.@add_carry,3;
+ gympassmemory = .@add_carry;
+ skill ALL_INCCARRY,.@add_carry,3;
close;
}
else {
diff --git a/npc/other/hugel_bingo.txt b/npc/other/hugel_bingo.txt
index 2b1e8f410..15b87b117 100644
--- a/npc/other/hugel_bingo.txt
+++ b/npc/other/hugel_bingo.txt
@@ -54,34 +54,34 @@ OnInit:
end;
OnTouch:
- set @bingo_a1$,0;
- set @bingo_a2$,0;
- set @bingo_a3$,0;
- set @bingo_a4$,0;
- set @bingo_a5$,0;
- set @bingo_b1$,0;
- set @bingo_b2$,0;
- set @bingo_b3$,0;
- set @bingo_b4$,0;
- set @bingo_b5$,0;
- set @bingo_c1$,0;
- set @bingo_c2$,0;
- set @bingo_c3$,0;
- set @bingo_c4$,0;
- set @bingo_c5$,0;
- set @bingo_d1$,0;
- set @bingo_d2$,0;
- set @bingo_d3$,0;
- set @bingo_d4$,0;
- set @bingo_d5$,0;
- set @bingo_e1$,0;
- set @bingo_e2$,0;
- set @bingo_e3$,0;
- set @bingo_e4$,0;
- set @bingo_e5$,0;
- set @bingo_case,1;
+ @bingo_a1$ = 0;
+ @bingo_a2$ = 0;
+ @bingo_a3$ = 0;
+ @bingo_a4$ = 0;
+ @bingo_a5$ = 0;
+ @bingo_b1$ = 0;
+ @bingo_b2$ = 0;
+ @bingo_b3$ = 0;
+ @bingo_b4$ = 0;
+ @bingo_b5$ = 0;
+ @bingo_c1$ = 0;
+ @bingo_c2$ = 0;
+ @bingo_c3$ = 0;
+ @bingo_c4$ = 0;
+ @bingo_c5$ = 0;
+ @bingo_d1$ = 0;
+ @bingo_d2$ = 0;
+ @bingo_d3$ = 0;
+ @bingo_d4$ = 0;
+ @bingo_d5$ = 0;
+ @bingo_e1$ = 0;
+ @bingo_e2$ = 0;
+ @bingo_e3$ = 0;
+ @bingo_e4$ = 0;
+ @bingo_e5$ = 0;
+ @bingo_case = 1;
L_Fill:
- set @bingo_fill,callfunc("Func_Bingo",@bingo_case);
+ @bingo_fill = callfunc("Func_Bingo",@bingo_case);
if (!@bingo_fill) {
mes "The numbers you have entered";
mes "exceed the limit, or you have";
@@ -89,7 +89,7 @@ L_Fill:
mes "Please enter your numbers again.";
next;
} else if (@bingo_fill) {
- if(@bingoplate[25] < 10) set @bingo_e5$,"0"+@bingoplate[25]+""; else set @bingo_e5$,@bingoplate[25];
+ if(@bingoplate[25] < 10) @bingo_e5$ = "0"+@bingoplate[25]+""; else @bingo_e5$ = @bingoplate[25];
donpcevent "start#bingo::OnEnter";
mes "["+@bingo_a1$+"] ["+@bingo_a2$+"] ["+@bingo_a3$+"] ["+@bingo_a4$+"] ["+@bingo_a5$+"]";
mes "["+@bingo_b1$+"] ["+@bingo_b2$+"] ["+@bingo_b3$+"] ["+@bingo_b4$+"] ["+@bingo_b5$+"]";
@@ -115,12 +115,12 @@ OnStart:
OnEnter:
if ($@hu_bingoa == 4) {
- set $@hu_bingoa,5;
+ $@hu_bingoa = 5;
donpcevent "start2#bingo::OnStart";
stopnpctimer;
end;
}
- set $@hu_bingoa,$@hu_bingoa +1;
+ ++$@hu_bingoa;
end;
OnTimer1000:
@@ -159,8 +159,8 @@ OnTimer203000:
OnTimer204000:
areawarp "que_bingo",44,115,54,126,"que_bingo",40,121;
disablenpc "out3#bingo";
- set $@hu_bingoa,0;
- set $@hu_bingob,0;
+ $@hu_bingoa = 0;
+ $@hu_bingob = 0;
donpcevent "Bingo Waiting Room::OnStart";
end;
}
@@ -187,12 +187,12 @@ OnTimer2000:
OnTimer5000:
mapannounce "que_bingo","Eukran: Now, let the game begin!",1,0xFFAB54;
setarray $@bingoarray[0],1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25;
- set .@max_index, 24;
- for(set .@i,0; .@i < 25; set .@i,.@i +1) {
- set $@bingo0,rand(0,.@max_index);
- set $bingo[.@i],$@bingoarray[$@bingo0];
- set $@bingoarray[$@bingo0], $@bingoarray[.@max_index];
- set .@max_index, .@max_index - 1;
+ .@max_index = 24;
+ for(.@i = 0; .@i < 25; ++.@i) {
+ $@bingo0 = rand(0,.@max_index);
+ $bingo[.@i] = $@bingoarray[$@bingo0];
+ $@bingoarray[$@bingo0] = $@bingoarray[.@max_index];
+ --.@max_index;
}
end;
@@ -201,7 +201,7 @@ OnTimer8000:
end;
OnTimer10000:
- set $@bingoresult,1;
+ $@bingoresult = 1;
callfunc "Func_BingoResult",$@bingoresult;
end;
@@ -271,7 +271,7 @@ OnTimer460000:
mapannounce "que_bingo","Eukran: I'm sorry, but this game has ended without a winner. Thanks for playing, everyone~",1,0xFFAB54;
donpcevent "1a#bingo::OnInit";
areawarp "que_bingo",44,115,54,126,"que_bingo",40,121;
- set $@hu_bingoa,0;
+ $@hu_bingoa = 0;
donpcevent "Bingo Waiting Room::OnStart";
end;
}
@@ -408,44 +408,44 @@ OnInit:
end;
OnTouch:
- if(@bingoplate[1] == $bingo[$@bingoresult -1]){ set @bingo_a1$,"^ff0000- -^000000"; setarray @bingoplate[1],99; }
- else if(@bingoplate[2] == $bingo[$@bingoresult -1]){ set @bingo_a2$,"^ff0000- -^000000"; setarray @bingoplate[2],99; }
- else if(@bingoplate[3] == $bingo[$@bingoresult -1]){ set @bingo_a3$,"^ff0000- -^000000"; setarray @bingoplate[3],99; }
- else if(@bingoplate[4] == $bingo[$@bingoresult -1]){ set @bingo_a4$,"^ff0000- -^000000"; setarray @bingoplate[4],99; }
- else if(@bingoplate[5] == $bingo[$@bingoresult -1]){ set @bingo_a5$,"^ff0000- -^000000"; setarray @bingoplate[5],99; }
- else if(@bingoplate[6] == $bingo[$@bingoresult -1]){ set @bingo_b1$,"^ff0000- -^000000"; setarray @bingoplate[6],99; }
- else if(@bingoplate[7] == $bingo[$@bingoresult -1]){ set @bingo_b2$,"^ff0000- -^000000"; setarray @bingoplate[7],99; }
- else if(@bingoplate[8] == $bingo[$@bingoresult -1]){ set @bingo_b3$,"^ff0000- -^000000"; setarray @bingoplate[8],99; }
- else if(@bingoplate[9] == $bingo[$@bingoresult -1]){ set @bingo_b4$,"^ff0000- -^000000"; setarray @bingoplate[9],99; }
- else if(@bingoplate[10] == $bingo[$@bingoresult -1]){ set @bingo_b5$,"^ff0000- -^000000"; setarray @bingoplate[10],99; }
- else if(@bingoplate[11] == $bingo[$@bingoresult -1]){ set @bingo_c1$,"^ff0000- -^000000"; setarray @bingoplate[11],99; }
- else if(@bingoplate[12] == $bingo[$@bingoresult -1]){ set @bingo_c2$,"^ff0000- -^000000"; setarray @bingoplate[12],99; }
- else if(@bingoplate[13] == $bingo[$@bingoresult -1]){ set @bingo_c3$,"^ff0000- -^000000"; setarray @bingoplate[13],99; }
- else if(@bingoplate[14] == $bingo[$@bingoresult -1]){ set @bingo_c4$,"^ff0000- -^000000"; setarray @bingoplate[14],99; }
- else if(@bingoplate[15] == $bingo[$@bingoresult -1]){ set @bingo_c5$,"^ff0000- -^000000"; setarray @bingoplate[15],99; }
- else if(@bingoplate[16] == $bingo[$@bingoresult -1]){ set @bingo_d1$,"^ff0000- -^000000"; setarray @bingoplate[16],99; }
- else if(@bingoplate[17] == $bingo[$@bingoresult -1]){ set @bingo_d2$,"^ff0000- -^000000"; setarray @bingoplate[17],99; }
- else if(@bingoplate[18] == $bingo[$@bingoresult -1]){ set @bingo_d3$,"^ff0000- -^000000"; setarray @bingoplate[18],99; }
- else if(@bingoplate[19] == $bingo[$@bingoresult -1]){ set @bingo_d4$,"^ff0000- -^000000"; setarray @bingoplate[19],99; }
- else if(@bingoplate[20] == $bingo[$@bingoresult -1]){ set @bingo_d5$,"^ff0000- -^000000"; setarray @bingoplate[20],99; }
- else if(@bingoplate[21] == $bingo[$@bingoresult -1]){ set @bingo_e1$,"^ff0000- -^000000"; setarray @bingoplate[21],99; }
- else if(@bingoplate[22] == $bingo[$@bingoresult -1]){ set @bingo_e2$,"^ff0000- -^000000"; setarray @bingoplate[22],99; }
- else if(@bingoplate[23] == $bingo[$@bingoresult -1]){ set @bingo_e3$,"^ff0000- -^000000"; setarray @bingoplate[23],99; }
- else if(@bingoplate[24] == $bingo[$@bingoresult -1]){ set @bingo_e4$,"^ff0000- -^000000"; setarray @bingoplate[24],99; }
- else if(@bingoplate[25] == $bingo[$@bingoresult -1]){ set @bingo_e5$,"^ff0000- -^000000"; setarray @bingoplate[25],99; }
- set @bingowin,0;
- if(@bingoplate[1] == @bingoplate[2] && @bingoplate[1] == @bingoplate[3] && @bingoplate[1] == @bingoplate[4] && @bingoplate[1] == @bingoplate[5]) set @bingowin,@bingowin +1;
- if(@bingoplate[6] == @bingoplate[7] && @bingoplate[6] == @bingoplate[8] && @bingoplate[6] == @bingoplate[9] && @bingoplate[6] == @bingoplate[10]) set @bingowin,@bingowin +1;
- if(@bingoplate[11] == @bingoplate[12] && @bingoplate[11] == @bingoplate[13] && @bingoplate[11] == @bingoplate[14] && @bingoplate[11] == @bingoplate[15]) set @bingowin,@bingowin +1;
- if(@bingoplate[16] == @bingoplate[17] && @bingoplate[16] == @bingoplate[18] && @bingoplate[16] == @bingoplate[19] && @bingoplate[16] == @bingoplate[20]) set @bingowin,@bingowin +1;
- if(@bingoplate[21] == @bingoplate[22] && @bingoplate[21] == @bingoplate[23] && @bingoplate[21] == @bingoplate[24] && @bingoplate[21] == @bingoplate[25]) set @bingowin,@bingowin +1;
- if(@bingoplate[1] == @bingoplate[6] && @bingoplate[1] == @bingoplate[11] && @bingoplate[1] == @bingoplate[16] && @bingoplate[1] == @bingoplate[21]) set @bingowin,@bingowin +1;
- if(@bingoplate[2] == @bingoplate[7] && @bingoplate[2] == @bingoplate[12] && @bingoplate[2] == @bingoplate[17] && @bingoplate[2] == @bingoplate[22]) set @bingowin,@bingowin +1;
- if(@bingoplate[3] == @bingoplate[8] && @bingoplate[3] == @bingoplate[13] && @bingoplate[3] == @bingoplate[18] && @bingoplate[3] == @bingoplate[23]) set @bingowin,@bingowin +1;
- if(@bingoplate[4] == @bingoplate[9] && @bingoplate[4] == @bingoplate[14] && @bingoplate[4] == @bingoplate[19] && @bingoplate[4] == @bingoplate[24]) set @bingowin,@bingowin +1;
- if(@bingoplate[5] == @bingoplate[10] && @bingoplate[5] == @bingoplate[15] && @bingoplate[5] == @bingoplate[20] && @bingoplate[5] == @bingoplate[25]) set @bingowin,@bingowin +1;
- if(@bingoplate[1] == @bingoplate[7] && @bingoplate[1] == @bingoplate[13] && @bingoplate[1] == @bingoplate[19] && @bingoplate[1] == @bingoplate[25]) set @bingowin,@bingowin +1;
- if(@bingoplate[5] == @bingoplate[9] && @bingoplate[5] == @bingoplate[13] && @bingoplate[5] == @bingoplate[17] && @bingoplate[5] == @bingoplate[21]) set @bingowin,@bingowin +1;
+ if(@bingoplate[1] == $bingo[$@bingoresult -1]){ @bingo_a1$ = "^ff0000- -^000000"; setarray @bingoplate[1],99; }
+ else if(@bingoplate[2] == $bingo[$@bingoresult -1]){ @bingo_a2$ = "^ff0000- -^000000"; setarray @bingoplate[2],99; }
+ else if(@bingoplate[3] == $bingo[$@bingoresult -1]){ @bingo_a3$ = "^ff0000- -^000000"; setarray @bingoplate[3],99; }
+ else if(@bingoplate[4] == $bingo[$@bingoresult -1]){ @bingo_a4$ = "^ff0000- -^000000"; setarray @bingoplate[4],99; }
+ else if(@bingoplate[5] == $bingo[$@bingoresult -1]){ @bingo_a5$ = "^ff0000- -^000000"; setarray @bingoplate[5],99; }
+ else if(@bingoplate[6] == $bingo[$@bingoresult -1]){ @bingo_b1$ = "^ff0000- -^000000"; setarray @bingoplate[6],99; }
+ else if(@bingoplate[7] == $bingo[$@bingoresult -1]){ @bingo_b2$ = "^ff0000- -^000000"; setarray @bingoplate[7],99; }
+ else if(@bingoplate[8] == $bingo[$@bingoresult -1]){ @bingo_b3$ = "^ff0000- -^000000"; setarray @bingoplate[8],99; }
+ else if(@bingoplate[9] == $bingo[$@bingoresult -1]){ @bingo_b4$ = "^ff0000- -^000000"; setarray @bingoplate[9],99; }
+ else if(@bingoplate[10] == $bingo[$@bingoresult -1]){ @bingo_b5$ = "^ff0000- -^000000"; setarray @bingoplate[10],99; }
+ else if(@bingoplate[11] == $bingo[$@bingoresult -1]){ @bingo_c1$ = "^ff0000- -^000000"; setarray @bingoplate[11],99; }
+ else if(@bingoplate[12] == $bingo[$@bingoresult -1]){ @bingo_c2$ = "^ff0000- -^000000"; setarray @bingoplate[12],99; }
+ else if(@bingoplate[13] == $bingo[$@bingoresult -1]){ @bingo_c3$ = "^ff0000- -^000000"; setarray @bingoplate[13],99; }
+ else if(@bingoplate[14] == $bingo[$@bingoresult -1]){ @bingo_c4$ = "^ff0000- -^000000"; setarray @bingoplate[14],99; }
+ else if(@bingoplate[15] == $bingo[$@bingoresult -1]){ @bingo_c5$ = "^ff0000- -^000000"; setarray @bingoplate[15],99; }
+ else if(@bingoplate[16] == $bingo[$@bingoresult -1]){ @bingo_d1$ = "^ff0000- -^000000"; setarray @bingoplate[16],99; }
+ else if(@bingoplate[17] == $bingo[$@bingoresult -1]){ @bingo_d2$ = "^ff0000- -^000000"; setarray @bingoplate[17],99; }
+ else if(@bingoplate[18] == $bingo[$@bingoresult -1]){ @bingo_d3$ = "^ff0000- -^000000"; setarray @bingoplate[18],99; }
+ else if(@bingoplate[19] == $bingo[$@bingoresult -1]){ @bingo_d4$ = "^ff0000- -^000000"; setarray @bingoplate[19],99; }
+ else if(@bingoplate[20] == $bingo[$@bingoresult -1]){ @bingo_d5$ = "^ff0000- -^000000"; setarray @bingoplate[20],99; }
+ else if(@bingoplate[21] == $bingo[$@bingoresult -1]){ @bingo_e1$ = "^ff0000- -^000000"; setarray @bingoplate[21],99; }
+ else if(@bingoplate[22] == $bingo[$@bingoresult -1]){ @bingo_e2$ = "^ff0000- -^000000"; setarray @bingoplate[22],99; }
+ else if(@bingoplate[23] == $bingo[$@bingoresult -1]){ @bingo_e3$ = "^ff0000- -^000000"; setarray @bingoplate[23],99; }
+ else if(@bingoplate[24] == $bingo[$@bingoresult -1]){ @bingo_e4$ = "^ff0000- -^000000"; setarray @bingoplate[24],99; }
+ else if(@bingoplate[25] == $bingo[$@bingoresult -1]){ @bingo_e5$ = "^ff0000- -^000000"; setarray @bingoplate[25],99; }
+ @bingowin = 0;
+ if(@bingoplate[1] == @bingoplate[2] && @bingoplate[1] == @bingoplate[3] && @bingoplate[1] == @bingoplate[4] && @bingoplate[1] == @bingoplate[5]) @bingowin = @bingowin +1;
+ if(@bingoplate[6] == @bingoplate[7] && @bingoplate[6] == @bingoplate[8] && @bingoplate[6] == @bingoplate[9] && @bingoplate[6] == @bingoplate[10]) @bingowin = @bingowin +1;
+ if(@bingoplate[11] == @bingoplate[12] && @bingoplate[11] == @bingoplate[13] && @bingoplate[11] == @bingoplate[14] && @bingoplate[11] == @bingoplate[15]) @bingowin = @bingowin +1;
+ if(@bingoplate[16] == @bingoplate[17] && @bingoplate[16] == @bingoplate[18] && @bingoplate[16] == @bingoplate[19] && @bingoplate[16] == @bingoplate[20]) @bingowin = @bingowin +1;
+ if(@bingoplate[21] == @bingoplate[22] && @bingoplate[21] == @bingoplate[23] && @bingoplate[21] == @bingoplate[24] && @bingoplate[21] == @bingoplate[25]) @bingowin = @bingowin +1;
+ if(@bingoplate[1] == @bingoplate[6] && @bingoplate[1] == @bingoplate[11] && @bingoplate[1] == @bingoplate[16] && @bingoplate[1] == @bingoplate[21]) @bingowin = @bingowin +1;
+ if(@bingoplate[2] == @bingoplate[7] && @bingoplate[2] == @bingoplate[12] && @bingoplate[2] == @bingoplate[17] && @bingoplate[2] == @bingoplate[22]) @bingowin = @bingowin +1;
+ if(@bingoplate[3] == @bingoplate[8] && @bingoplate[3] == @bingoplate[13] && @bingoplate[3] == @bingoplate[18] && @bingoplate[3] == @bingoplate[23]) @bingowin = @bingowin +1;
+ if(@bingoplate[4] == @bingoplate[9] && @bingoplate[4] == @bingoplate[14] && @bingoplate[4] == @bingoplate[19] && @bingoplate[4] == @bingoplate[24]) @bingowin = @bingowin +1;
+ if(@bingoplate[5] == @bingoplate[10] && @bingoplate[5] == @bingoplate[15] && @bingoplate[5] == @bingoplate[20] && @bingoplate[5] == @bingoplate[25]) @bingowin = @bingowin +1;
+ if(@bingoplate[1] == @bingoplate[7] && @bingoplate[1] == @bingoplate[13] && @bingoplate[1] == @bingoplate[19] && @bingoplate[1] == @bingoplate[25]) @bingowin = @bingowin +1;
+ if(@bingoplate[5] == @bingoplate[9] && @bingoplate[5] == @bingoplate[13] && @bingoplate[5] == @bingoplate[17] && @bingoplate[5] == @bingoplate[21]) @bingowin = @bingowin +1;
if($@bingoresult == 1 || $@bingoresult == 21) mes "[ "+$@bingoresult+"st Number - "+$bingo[$@bingoresult -1]+" ]";
else if($@bingoresult == 2 || $@bingoresult == 22) mes "[ "+$@bingoresult+"nd Number - "+$bingo[$@bingoresult -1]+" ]";
else if($@bingoresult == 3 || $@bingoresult == 23) mes "[ "+$@bingoresult+"rd Number - "+$bingo[$@bingoresult -1]+" ]";
@@ -469,9 +469,9 @@ OnTouch:
input @bingoyell$;
if (@bingoyell$ == "Bingo") {
if ($@hu_bingoa == 5) {
- set $@hu_bingoa,6;
+ $@hu_bingoa = 6;
donpcevent "start2#bingo::OnStop";
- set $@bingowinner$,strcharinfo(0);
+ $@bingowinner$ = strcharinfo(0);
donpcevent "win1a#bingo::OnWin";
close;
@@ -713,7 +713,7 @@ OnTimer5000:
disablenpc "end1d#bingo";
disablenpc "end1e#bingo";
areawarp "que_bingo",44,115,54,126,"que_bingo",40,121;
- set $@hu_bingoa,0;
+ $@hu_bingoa = 0;
donpcevent "Bingo Waiting Room::OnStart";
end;
}
@@ -760,18 +760,18 @@ OnTouch:
case 3: warp "que_bingo",46,116; break;
case 4: warp "que_bingo",45,121; break;
}
- set $@hu_bingob,$@hu_bingob +1;
- if ($@hu_bingob == 5) set $@hu_bingob,0;
+ $@hu_bingob = $@hu_bingob +1;
+ if ($@hu_bingob == 5) $@hu_bingob = 0;
end;
}
function script Func_Bingo {
- for(set .@i,getarg(0); .@i < 26; set .@i,.@i +1) {
- if(@bingoplate[1] < 10) set @bingo_a1$,"0"+@bingoplate[1]+""; else set @bingo_a1$,@bingoplate[1];
- if(@bingoplate[2] < 10) set @bingo_a2$,"0"+@bingoplate[2]+""; else set @bingo_a2$,@bingoplate[2];
- if(@bingoplate[3] < 10) set @bingo_a3$,"0"+@bingoplate[3]+""; else set @bingo_a3$,@bingoplate[3];
- if(@bingoplate[4] < 10) set @bingo_a4$,"0"+@bingoplate[4]+""; else set @bingo_a4$,@bingoplate[4];
- if(@bingoplate[5] < 10) set @bingo_a5$,"0"+@bingoplate[5]+""; else set @bingo_a5$,@bingoplate[5];
+ for(.@i = getarg(0); .@i < 26; ++.@i) {
+ if(@bingoplate[1] < 10) @bingo_a1$ = "0"+@bingoplate[1]+""; else @bingo_a1$ = @bingoplate[1];
+ if(@bingoplate[2] < 10) @bingo_a2$ = "0"+@bingoplate[2]+""; else @bingo_a2$ = @bingoplate[2];
+ if(@bingoplate[3] < 10) @bingo_a3$ = "0"+@bingoplate[3]+""; else @bingo_a3$ = @bingoplate[3];
+ if(@bingoplate[4] < 10) @bingo_a4$ = "0"+@bingoplate[4]+""; else @bingo_a4$ = @bingoplate[4];
+ if(@bingoplate[5] < 10) @bingo_a5$ = "0"+@bingoplate[5]+""; else @bingo_a5$ = @bingoplate[5];
if(.@i > 5) mes "["+@bingo_a1$+"] ["+@bingo_a2$+"] ["+@bingo_a3$+"] ["+@bingo_a4$+"] ["+@bingo_a5$+"]";
else {
switch(.@i) {
@@ -782,11 +782,11 @@ function script Func_Bingo {
case 5: mes "["+@bingo_a1$+"] ["+@bingo_a2$+"] ["+@bingo_a3$+"] ["+@bingo_a4$+"] ^ff0000[__]^000000"; break;
}
}
- if(@bingoplate[6] < 10) set @bingo_b1$,"0"+@bingoplate[6]+""; else set @bingo_b1$,@bingoplate[6];
- if(@bingoplate[7] < 10) set @bingo_b2$,"0"+@bingoplate[7]+""; else set @bingo_b2$,@bingoplate[7];
- if(@bingoplate[8] < 10) set @bingo_b3$,"0"+@bingoplate[8]+""; else set @bingo_b3$,@bingoplate[8];
- if(@bingoplate[9] < 10) set @bingo_b4$,"0"+@bingoplate[9]+""; else set @bingo_b4$,@bingoplate[9];
- if(@bingoplate[10] < 10) set @bingo_b5$,"0"+@bingoplate[10]+""; else set @bingo_b5$,@bingoplate[10];
+ if(@bingoplate[6] < 10) @bingo_b1$ = "0"+@bingoplate[6]+""; else @bingo_b1$ = @bingoplate[6];
+ if(@bingoplate[7] < 10) @bingo_b2$ = "0"+@bingoplate[7]+""; else @bingo_b2$ = @bingoplate[7];
+ if(@bingoplate[8] < 10) @bingo_b3$ = "0"+@bingoplate[8]+""; else @bingo_b3$ = @bingoplate[8];
+ if(@bingoplate[9] < 10) @bingo_b4$ = "0"+@bingoplate[9]+""; else @bingo_b4$ = @bingoplate[9];
+ if(@bingoplate[10] < 10) @bingo_b5$ = "0"+@bingoplate[10]+""; else @bingo_b5$ = @bingoplate[10];
if(.@i > 10) mes "["+@bingo_b1$+"] ["+@bingo_b2$+"] ["+@bingo_b3$+"] ["+@bingo_b4$+"] ["+@bingo_b5$+"]";
else if(.@i < 6) mes "[ ] [ ] [ ] [ ] [ ]";
else {
@@ -798,11 +798,11 @@ function script Func_Bingo {
case 10: mes "["+@bingo_b1$+"] ["+@bingo_b2$+"] ["+@bingo_b3$+"] ["+@bingo_b4$+"] ^ff0000[__]^000000"; break;
}
}
- if(@bingoplate[11] < 10) set @bingo_c1$,"0"+@bingoplate[11]+""; else set @bingo_c1$,@bingoplate[11];
- if(@bingoplate[12] < 10) set @bingo_c2$,"0"+@bingoplate[12]+""; else set @bingo_c2$,@bingoplate[12];
- if(@bingoplate[13] < 10) set @bingo_c3$,"0"+@bingoplate[13]+""; else set @bingo_c3$,@bingoplate[13];
- if(@bingoplate[14] < 10) set @bingo_c4$,"0"+@bingoplate[14]+""; else set @bingo_c4$,@bingoplate[14];
- if(@bingoplate[15] < 10) set @bingo_c5$,"0"+@bingoplate[15]+""; else set @bingo_c5$,@bingoplate[15];
+ if(@bingoplate[11] < 10) @bingo_c1$ = "0"+@bingoplate[11]+""; else @bingo_c1$ = @bingoplate[11];
+ if(@bingoplate[12] < 10) @bingo_c2$ = "0"+@bingoplate[12]+""; else @bingo_c2$ = @bingoplate[12];
+ if(@bingoplate[13] < 10) @bingo_c3$ = "0"+@bingoplate[13]+""; else @bingo_c3$ = @bingoplate[13];
+ if(@bingoplate[14] < 10) @bingo_c4$ = "0"+@bingoplate[14]+""; else @bingo_c4$ = @bingoplate[14];
+ if(@bingoplate[15] < 10) @bingo_c5$ = "0"+@bingoplate[15]+""; else @bingo_c5$ = @bingoplate[15];
if(.@i > 15) mes "["+@bingo_c1$+"] ["+@bingo_c2$+"] ["+@bingo_c3$+"] ["+@bingo_c4$+"] ["+@bingo_c5$+"]";
else if(.@i < 11) mes "[ ] [ ] [ ] [ ] [ ]";
else {
@@ -814,11 +814,11 @@ function script Func_Bingo {
case 15: mes "["+@bingo_c1$+"] ["+@bingo_c2$+"] ["+@bingo_c3$+"] ["+@bingo_c4$+"] ^ff0000[__]^000000"; break;
}
}
- if(@bingoplate[16] < 10) set @bingo_d1$,"0"+@bingoplate[16]+""; else set @bingo_d1$,@bingoplate[16];
- if(@bingoplate[17] < 10) set @bingo_d2$,"0"+@bingoplate[17]+""; else set @bingo_d2$,@bingoplate[17];
- if(@bingoplate[18] < 10) set @bingo_d3$,"0"+@bingoplate[18]+""; else set @bingo_d3$,@bingoplate[18];
- if(@bingoplate[19] < 10) set @bingo_d4$,"0"+@bingoplate[19]+""; else set @bingo_d4$,@bingoplate[19];
- if(@bingoplate[20] < 10) set @bingo_d5$,"0"+@bingoplate[20]+""; else set @bingo_d5$,@bingoplate[20];
+ if(@bingoplate[16] < 10) @bingo_d1$ = "0"+@bingoplate[16]+""; else @bingo_d1$ = @bingoplate[16];
+ if(@bingoplate[17] < 10) @bingo_d2$ = "0"+@bingoplate[17]+""; else @bingo_d2$ = @bingoplate[17];
+ if(@bingoplate[18] < 10) @bingo_d3$ = "0"+@bingoplate[18]+""; else @bingo_d3$ = @bingoplate[18];
+ if(@bingoplate[19] < 10) @bingo_d4$ = "0"+@bingoplate[19]+""; else @bingo_d4$ = @bingoplate[19];
+ if(@bingoplate[20] < 10) @bingo_d5$ = "0"+@bingoplate[20]+""; else @bingo_d5$ = @bingoplate[20];
if(.@i > 20) mes "["+@bingo_d1$+"] ["+@bingo_d2$+"] ["+@bingo_d3$+"] ["+@bingo_d4$+"] ["+@bingo_d5$+"]";
else if(.@i < 16) mes "[ ] [ ] [ ] [ ] [ ]";
else {
@@ -830,10 +830,10 @@ function script Func_Bingo {
case 20: mes "["+@bingo_d1$+"] ["+@bingo_d2$+"] ["+@bingo_d3$+"] ["+@bingo_d4$+"] ^ff0000[__]^000000"; break;
}
}
- if(@bingoplate[21] < 10) set @bingo_e1$,"0"+@bingoplate[21]+""; else set @bingo_e1$,@bingoplate[21];
- if(@bingoplate[22] < 10) set @bingo_e2$,"0"+@bingoplate[22]+""; else set @bingo_e2$,@bingoplate[22];
- if(@bingoplate[23] < 10) set @bingo_e3$,"0"+@bingoplate[23]+""; else set @bingo_e3$,@bingoplate[23];
- if(@bingoplate[24] < 10) set @bingo_e4$,"0"+@bingoplate[24]+""; else set @bingo_e4$,@bingoplate[24];
+ if(@bingoplate[21] < 10) @bingo_e1$ = "0"+@bingoplate[21]+""; else @bingo_e1$ = @bingoplate[21];
+ if(@bingoplate[22] < 10) @bingo_e2$ = "0"+@bingoplate[22]+""; else @bingo_e2$ = @bingoplate[22];
+ if(@bingoplate[23] < 10) @bingo_e3$ = "0"+@bingoplate[23]+""; else @bingo_e3$ = @bingoplate[23];
+ if(@bingoplate[24] < 10) @bingo_e4$ = "0"+@bingoplate[24]+""; else @bingo_e4$ = @bingoplate[24];
if(.@i < 21) mes "[ ] [ ] [ ] [ ] [ ]";
else {
switch(.@i) {
@@ -846,10 +846,10 @@ function script Func_Bingo {
}
next;
input .@bingoinput;
- if(.@bingoinput < 1 || .@bingoinput > 25) { set @bingo_case,.@i; return 0; }
+ if(.@bingoinput < 1 || .@bingoinput > 25) { @bingo_case = .@i; return 0; }
if(.@i > 1) {
- for(set .@j,.@i; .@j > 0; set .@j,.@j -1) {
- if(.@bingoinput == @bingoplate[.@j -1]) { set @bingo_case,.@i; return 0; }
+ for(.@j = .@i; .@j > 0; --.@j) {
+ if(.@bingoinput == @bingoplate[.@j -1]) { @bingo_case = .@i; return 0; }
}
}
setarray @bingoplate[.@i],.@bingoinput;
@@ -858,10 +858,10 @@ function script Func_Bingo {
}
function script Func_BingoResult {
- if (getarg(0) == 1 || getarg(0) == 21) set .@str$,"st";
- else if (getarg(0) == 2 || getarg(0) == 22) set .@str$,"nd";
- else if (getarg(0) == 3 || getarg(0) == 23) set .@str$,"rd";
- else set .@str$,"th";
+ if (getarg(0) == 1 || getarg(0) == 21) .@str$ = "st";
+ else if (getarg(0) == 2 || getarg(0) == 22) .@str$ = "nd";
+ else if (getarg(0) == 3 || getarg(0) == 23) .@str$ = "rd";
+ else .@str$ = "th";
mapannounce "que_bingo","Eukran: The "+getarg(0)+.@str$+" number is "+$bingo[getarg(0) -1]+". Please check your Bingo Plate.",4,0xFFAB54;
enablenpc ""+getarg(0)+"a#bingo";
enablenpc ""+getarg(0)+"b#bingo";
diff --git a/npc/other/marriage.txt b/npc/other/marriage.txt
index be909a207..dead8d61b 100644
--- a/npc/other/marriage.txt
+++ b/npc/other/marriage.txt
@@ -363,7 +363,7 @@ prt_church,97,100,4 script Wedding Staff#w 1_F_LIBRARYGIRL,{
delitem 2338,1; //Wedding_Dress
}
delitem 2613,1; //Diamond_Ring
- set wedding_sign,1;
+ wedding_sign = 1;
goto L_End;
}
mes "[Marry Happy]";
@@ -563,10 +563,10 @@ prt_church,100,128,4 script Bishop#w 1_M_PASTOR,{
if (!$@wedding) {
if (wedding_sign == 1) {
getpartymember(getcharid(1));
- set .@partymembercount,$@partymembercount;
+ .@partymembercount = $@partymembercount;
if (.@partymembercount == 2) {
if (Sex) {
- set $@wedding,1;
+ $@wedding = 1;
initnpctimer;
mes "[Vomars]";
mes "Young lovers, please";
@@ -593,7 +593,7 @@ prt_church,100,128,4 script Bishop#w 1_M_PASTOR,{
mes "Miss " + $@wed_bride$ + "?";
next;
select("I do.");
- set $@wed_groom$,strcharinfo(0);
+ $@wed_groom$ = strcharinfo(0);
mes "[Vomars]";
mes "Now, it is time for";
mes "your bride to make";
@@ -634,7 +634,7 @@ prt_church,100,128,4 script Bishop#w 1_M_PASTOR,{
else if ($@wedding == 1) {
if (wedding_sign == 1) {
getpartymember(getcharid(1));
- set .@partymembercount,$@partymembercount;
+ .@partymembercount = $@partymembercount;
if (.@partymembercount == 2) {
if (Sex == 0) {
if (strcharinfo(0) == $@wed_bride$) {
@@ -662,7 +662,7 @@ prt_church,100,128,4 script Bishop#w 1_M_PASTOR,{
mes "want to marry? Hmm.";
mes "I'm truly sorry for this";
mes "misunderstanding...";
- set $@wedding,0;
+ $@wedding = 0;
close2;
stopnpctimer;
cutin "",255;
@@ -702,9 +702,9 @@ prt_church,100,128,4 script Bishop#w 1_M_PASTOR,{
mes "And lastly...";
mes "Always be happy,";
mes "dear "+$@wed_bride$+"...";
- set $@wed_groom$,"";
- set $@wed_bride$,"";
- set $@wedding,0;
+ $@wed_groom$ = "";
+ $@wed_bride$ = "";
+ $@wedding = 0;
close2;
stopnpctimer;
cutin "",255;
@@ -732,9 +732,9 @@ prt_church,100,128,4 script Bishop#w 1_M_PASTOR,{
mes "must do what your heart";
mes "tells you is right. Now, run!";
}
- set $@wed_groom$,"";
- set $@wed_bride$,"";
- set $@wedding,0;
+ $@wed_groom$ = "";
+ $@wed_bride$ = "";
+ $@wedding = 0;
close2;
stopnpctimer;
cutin "",255;
@@ -795,9 +795,9 @@ OnStop:
end;
OnReset:
- set $@wed_groom$,"";
- set $@wed_bride$,"";
- set $@wedding,0;
+ $@wed_groom$ = "";
+ $@wed_bride$ = "";
+ $@wedding = 0;
end;
OnTimer180000:
@@ -876,7 +876,7 @@ prt_church,20,179,4 script Divorce Staff 1_F_LIBRARYGIRL,{
next;
switch(select("Drop 1 Wedding Ring.:Keep it.")) {
case 1:
- set .@ring, (Sex)?2634:2635; //Bridegroom_Ring, Bride_Ring
+ .@ring = (Sex)?2634:2635; //Bridegroom_Ring, Bride_Ring
if (countitem(.@ring)) {
delitem .@ring,1;
mes "[Bad Ending]";
@@ -931,7 +931,7 @@ prt_church,22,179,4 script Remarry Staff 1_F_LIBRARYGIRL,{
next;
switch(select("Make new Wedding Ring.:Cancel.")) {
case 1:
- set .@ring, (Sex)?2634:2635; //Bridegroom_Ring, Bride_Ring
+ .@ring = (Sex)?2634:2635; //Bridegroom_Ring, Bride_Ring
if (countitem(.@ring) || isequipped(.@ring)) {
mes "[Wedding Again]";
mes "Wait, wait...";
diff --git a/npc/other/mercenary_rent.txt b/npc/other/mercenary_rent.txt
index 422a5ac5b..e9c9a1275 100644
--- a/npc/other/mercenary_rent.txt
+++ b/npc/other/mercenary_rent.txt
@@ -20,10 +20,11 @@
setarray .@name$, "Spear", "Sword", "Bow";
setarray .@faith$, "SPEAR_MERC_GUILD", "SWORD_MERC_GUILD", "ARCH_MERC_GUILD";
setarray .@item, 12182, 12172, 12162;
- set .@npc$, strnpcinfo(2);
- for (set .@size, getarraysize(.@name$); .@i < .@size; set .@i, .@i + 1)
- if (.@npc$ == .@name$[.@i]) set .@type, .@i;
- set .@faith_merc, mercenary_get_faith(getd(.@faith$[.@type]));
+ .@npc$ = strnpcinfo(2);
+ .@size = getarraysize(.@name$);
+ for (.@i = 0; .@i < .@size; ++.@i)
+ if (.@npc$ == .@name$[.@i]) .@type = .@i;
+ .@faith_merc = mercenary_get_faith(getd(.@faith$[.@type]));
mes "[Mercenary Manager]";
mes "Welcome to the";
mes .@npc$ + " Mercenary Guild.";
@@ -38,14 +39,14 @@
mes "interested in hiring?";
next;
setarray .@suffix$, "th","st","nd","rd";
- for (set .@i, 1; .@i <= 9; set .@i, .@i + 1)
- set .@menu$, .@menu$ + .@i + .@suffix$[((.@i <= 3)? .@i : 0)] + " Grade " + .@npc$ + " Mercenary:";
- set .@Grade, select(.@menu$);
- set .@BaseLevel, 5 + (.@Grade * 10);
- set .@BaseLevel, (.@val > 90)? 90 : .@BaseLevel;
- set .@ZenyCost, 7 * .@Grade;
+ for (.@i = 1; .@i <= 9; ++.@i)
+ .@menu$ += .@i + .@suffix$[((.@i <= 3)? .@i : 0)] + " Grade " + .@npc$ + " Mercenary:";
+ .@Grade = select(.@menu$);
+ .@BaseLevel = 5 + (.@Grade * 10);
+ .@BaseLevel = (.@val > 90)? 90 : .@BaseLevel;
+ .@ZenyCost = 7 * .@Grade;
setarray .@FaithCost[7], 50,100,300;
- set .@FaithCost, .@FaithCost[.@Grade];
+ .@FaithCost = .@FaithCost[.@Grade];
mes "[Mercenary Manager]";
mes "So you want to hire a " + .@Grade + .@suffix$[((.@Grade <= 3)? .@i : 0)];
mes "Grade " + .@npc$ + " Mercenary?";
@@ -221,12 +222,13 @@ pay_arche,99,167,4 duplicate(Mercenary Manager#main) Mercenary Manager#Bow 4_M_J
next;
setarray .@item, 12184, 12185, 12241, 12242, 12243;
setarray .@cost, 1750, 3000, 560, 1050, 2100;
- for (set .@size, getarraysize(.@item); .@i < .@size; set .@i, .@i + 1)
- set .@menu$, .@menu$ + getitemname(.@item[.@i]) + ":";
- set .@m, select(.@menu$)-1;
- set .@str$, .@cost[.@m] + "";
- set .@len, getstrlen(.@str$);
- set .@str_cost$, (.@len <= 3)? .@str$ : insertchar(.@str$,",",.@len-3);
+ .@size = getarraysize(.@item);
+ for (.@i = 0; .@i < .@size; ++.@i)
+ .@menu$ += getitemname(.@item[.@i]) + ":";
+ .@m = select(.@menu$)-1;
+ .@str$ = .@cost[.@m] + "";
+ .@len = getstrlen(.@str$);
+ .@str_cost$ = (.@len <= 3)? .@str$ : insertchar(.@str$,",",.@len-3);
mes "[Mercenary Goods Merchant]";
mes getitemname(.@item[.@m]);
mes "each cost " + .@str_cost$ + " zeny.";
@@ -241,7 +243,7 @@ pay_arche,99,167,4 duplicate(Mercenary Manager#main) Mercenary Manager#Bow 4_M_J
mes "to buy any Mercenary Potions.";
close;
}
- else if (.@input < 0 || .@input > 10000) {
+ if (.@input < 0 || .@input > 10000) {
mes "[Mercenary Goods Merchant]";
mes "I'm sorry, but you";
mes "can only buy up to";
@@ -250,7 +252,8 @@ pay_arche,99,167,4 duplicate(Mercenary Manager#main) Mercenary Manager#Bow 4_M_J
mes "a number from 1 to 10,000.";
close;
}
- else if (set(.@total_po, .@input * .@cost[.@m]) > Zeny) {
+ .@total_po = .@input * .@cost[.@m];
+ if (.@total_po > Zeny) {
mes "[Mercenary Goods Merchant]";
mes "I'm sorry, but you don't";
mes "have enough zeny for this";
@@ -260,7 +263,7 @@ pay_arche,99,167,4 duplicate(Mercenary Manager#main) Mercenary Manager#Bow 4_M_J
mes "for your Mercenaries.";
close;
}
- else if (!checkweight(.@item[.@m], .@input)) {
+ if (!checkweight(.@item[.@m], .@input)) {
mes "[Mercenary Goods Merchant]";
mes "If I gave you that many";
mes "potions, you wouldn't be";
diff --git a/npc/other/monster_race.txt b/npc/other/monster_race.txt
index c3c54a426..30dd66bab 100644
--- a/npc/other/monster_race.txt
+++ b/npc/other/monster_race.txt
@@ -30,7 +30,7 @@ hugel,51,61,0 script #race_timer1-1 -1,{
OnInit:
OnEnable:
enablenpc "#race_timer1-1";
- set $@mon_time_1_1,2;
+ $@mon_time_1_1 = 2;
initnpctimer;
end;
@@ -45,7 +45,7 @@ OnTimer10000:
OnTimer30000:
mapannounce "hugel","The Single Monster Race Arena has just opened.",bc_map,"0x87ceeb";
- set $@mon_time_1_1,1;
+ $@mon_time_1_1 = 1;
donpcevent "Race Progress Timer::OnEnable";
end;
@@ -67,7 +67,7 @@ OnTimer272000:
OnTimer330000:
mapannounce "hugel","The race is now starting. If you missed your chance to enter this race, please try again next time~!",bc_map,"0x87ceeb";
- set $@mon_time_1_1,0;
+ $@mon_time_1_1 = 0;
donpcevent "#race_timer1-1::OnDisable";
stopnpctimer;
end;
@@ -77,9 +77,9 @@ p_track01,58,0,0 script Race Progress Timer -1,{
OnEnable:
enablenpc "Race Progress Timer";
initnpctimer;
- for (set .@i, 1; .@i <= 6; set .@i, .@i + 1)
+ for (.@i = 1; .@i <= 6; ++.@i)
enablenpc "starting#"+.@i;
- set .@c, 1;
+ .@c = 1;
while (.@c <= 6) {
setd ".@line_"+.@c,rand(1,70);
if (getd(".@line_"+.@c) <= 10) {
@@ -109,29 +109,29 @@ OnEnable:
enablenpc "Luk"+.@c+"#2";
set getd(".@tired"+.@c),rand(20,40);
setd "$@mr_1_tire"+.@c,getd(".@tired"+.@c);
- for (set .@i, 1; .@i <= 3; set .@i, .@i + 1)
+ for (.@i = 1; .@i <= 3; ++.@i)
enablenpc "Tire"+.@c+"#"+.@i;
if (getd(".@tired"+.@c) < 30) enablenpc "Tire"+.@c+"#4";
} else if (getd(".@line_"+.@c)) <= 60 {
setd "$@mr_1_luk"+.@c,getd(".@line_"+.@c);
- for (set .@i, 1; .@i <= 3; set .@i, .@i + 1)
+ for (.@i = 1; .@i <= 3; ++.@i)
enablenpc "Luk"+.@c+"#"+.@i;
set getd(".@tired"+.@c),rand(10,30);
setd "$@mr_1_tire"+.@c,getd(".@tired"+.@c);
- for (set .@i, 1; .@i <= 4; set .@i, .@i + 1)
+ for (.@i = 1; .@i <= 4; ++.@i)
enablenpc "Tire"+.@c+"#"+.@i;
if (getd(".@tired"+.@c) < 20) enablenpc "Tire"+.@c+"#5";
} else if (getd(".@line_"+.@c) <= 70) {
setd "$@mr_1_luk"+.@c,getd(".@line_"+.@c);
- for (set .@i, 1; .@i <= 4; set .@i, .@i + 1)
+ for (.@i = 1; .@i <= 4; ++.@i)
enablenpc "Luk"+.@c+"#"+.@i;
set getd(".@tired"+.@c),rand(0,20);
setd "$@mr_1_tire"+.@c,getd(".@tired"+.@c);
- for (set .@i, 1; .@i <= 5; set .@i, .@i + 1)
+ for (.@i = 1; .@i <= 5; ++.@i)
enablenpc "Tire"+.@c+"#"+.@i;
if (getd(".@tired"+.@c) < 10) enablenpc "Tire"+.@c+"#6";
}
- set .@c, .@c + 1;
+ ++.@c;
}
end;
@@ -170,10 +170,10 @@ OnTimer243000:
OnTimer300000:
mapannounce "p_track01","The Monster Race has already begun. Good luck to all the participants.",bc_map,"0xffb6c1";
- set $@mon_time_1_1,0;
- set $@monster_race,0;
+ $@mon_time_1_1 = 0;
+ $@monster_race = 0;
disablenpc "Ticket Helper#single";
- for (set .@i, 1; .@i <= 6; set .@i, .@i + 1)
+ for (.@i = 1; .@i <= 6; ++.@i)
donpcevent "Runner No. "+.@i+"::OnEnable";
stopnpctimer;
end;
@@ -201,11 +201,11 @@ p_track01,73,22,1 script Ticket Helper#single 4_M_HUMAN_02,{
mes "too many things...";
close;
}
- for (set .@i, 1; .@i <= 6; set .@i, .@i + 1)
- set .@m$, .@m$ + "Monster "+.@i+":";
- set .@m, select ("Monster Status:"+.@m$) - 1;
+ for (.@i = 1; .@i <= 6; ++.@i)
+ .@m$ += "Monster "+.@i+":";
+ .@m = select ("Monster Status:"+.@m$) - 1;
if (!.@m) {
- for (set .@i, 1; .@i <= 6; set .@i, .@i + 1)
+ for (.@i = 1; .@i <= 6; ++.@i)
mes "Monster "+.@i+" [^CC6600Luck^000000: " + getd("$@mr_1_luk"+.@i) + "] [^EE0000HP^000000: " + getd("$@mr_1_tire"+.@i) + "]";
close;
} else {
@@ -227,7 +227,7 @@ p_track01,73,22,1 script Ticket Helper#single 4_M_HUMAN_02,{
mes "announced. If the monster you";
mes "picked wins, then please use this ticket to redeem your prize.";
getitem 7514,1; //Monster_Ticket
- set monster_race_1,.@m;
+ monster_race_1 = .@m;
close;
}
mes "[Ticket Helper]";
@@ -259,9 +259,9 @@ OnDisable:
OnTouchNPC:
initnpctimer;
- set .@n, WN(0);
- set $@monster_race,.@n;
- for (set .@i, 1; .@i <= 6; set .@i, .@i + 1) {
+ .@n = WN(0);
+ $@monster_race = .@n;
+ for (.@i = 1; .@i <= 6; ++.@i) {
if (.@n == .@i) continue;
donpcevent "Runner No. "+.@i+"::OnDisable";
}
@@ -291,7 +291,7 @@ OnTimer9000:
end;
function WN {
- set .@n, charat(strnpcinfo(0),getstrlen(strnpcinfo(0))-1);
+ .@n = charat(strnpcinfo(0),getstrlen(strnpcinfo(0))-1);
if (!getarg(0)) return .@n;
return ((.@n <= 3)?((.@n == 1)?"1st":((.@n == 2)?"2nd":"3rd")):.@n+"th");
}
@@ -317,7 +317,7 @@ p_track01,67,45,5 script Medal Distributor#single 4_F_RACING,{
mes "available in your Inventory.";
close;
}
- set .@insa,rand(1,1000);
+ .@insa = rand(1,1000);
if (countitem(7514)) {
mes "[Medal Distributor]";
mes "Hello there~";
@@ -389,7 +389,7 @@ p_track01,67,45,5 script Medal Distributor#single 4_F_RACING,{
mes "Wayne in Hugel for some";
mes "interesting items. Thank you~";
delitem 7514,1; //Monster_Ticket
- set monster_race_1,0;
+ monster_race_1 = 0;
getitem 7515,4; //Marvelous_Medal
close;
}
@@ -478,25 +478,25 @@ OnTimer249000:
OnTimer252000:
mapannounce "p_track01","We hope that you enjoyed the Monster Race arena. Come back again soon~",bc_map,"0xFFFF00";
- for (set .@i, 1; .@i <= 6; set .@i, .@i + 1) {
+ for (.@i = 1; .@i <= 6; ++.@i) {
donpcevent "starting#"+.@i+"::OnDisable";
setd "$@mr_1_luk"+.@i,0;
setd "$@mr_1_tire"+.@i,0;
}
- set .@c, 1;
+ .@c = 1;
while (.@c <= 6) {
- for (set .@i, 1; .@i <= 6; set .@i, .@i + 1) {
+ for (.@i = 1; .@i <= 6; ++.@i) {
disablenpc "Tire"+.@c+"#"+.@i;
disablenpc "Luk"+.@c+"#"+.@i;
}
- set .@c, .@c + 1;
+ ++.@c;
}
end;
OnTimer300000:
donpcevent "#race_timer1-1::OnEnable";
- set $@mon_time_1_1,2;
- set $@monster_race,0;
+ $@mon_time_1_1 = 2;
+ $@monster_race = 0;
mapwarp "p_track01","hugel",63,73;
end;
@@ -552,7 +552,7 @@ p_track01,76,36,1 script Exit Guide#single 4_M_NFMAN,{
mes "here in the Monster Race Arena.";
delitem 7514,1; //Monster_Ticket
}
- set monster_race_1,0;
+ monster_race_1 = 0;
close2;
warp "hugel",63,73;
end;
@@ -658,7 +658,7 @@ hugel,58,72,6 script Eckar Ellebird#single 4_M_NFMAN,{
mes "Let me guide you inside";
mes "the Monster Race Arena now.";
Zeny -= 2000;
- set monster_race_1,0;
+ monster_race_1 = 0;
close2;
warp "p_track01",75,41;
end;
@@ -679,7 +679,7 @@ hugel,58,72,6 script Eckar Ellebird#single 4_M_NFMAN,{
mes "Let me guide you now";
mes "to the Monster Race Arena.";
Zeny -= 2000;
- set monster_race_1,0;
+ monster_race_1 = 0;
close2;
warp "p_track01",75,41;
end;
@@ -716,7 +716,7 @@ hugel,58,72,6 script Eckar Ellebird#single 4_M_NFMAN,{
mes "I hope you enjoy";
mes "watching this race!";
Zeny -= 500;
- set monster_race_1,0;
+ monster_race_1 = 0;
close2;
warp "p_track01",75,41;
end;
@@ -843,26 +843,26 @@ p_track01,39,49,3 script Game Guide#single 4_F_RACING,{
- script starting_1 -1,{
OnDisable:
- for(set .@i,1; .@i<7; set .@i,.@i+1)
+ for(.@i = 1; .@i<7; ++.@i)
enablenpc "Luk1#"+.@i;
- for(set .@i,1; .@i<7; set .@i,.@i+1)
+ for(.@i = 1; .@i<7; ++.@i)
enablenpc "Tire1#"+.@i;
setd "$@mr_1_luk"+strnpcinfo(2),0;
setd "$@mr_1_tire"+strnpcinfo(2),0;
end;
OnTouchNPC:
- set .@start,rand(1,100);
- if (.@start < 11) set .@speed,60;
- else if (.@start < 21) set .@speed,70;
- else if (.@start < 31) set .@speed,80;
- else if (.@start < 41) set .@speed,90;
- else if (.@start < 51) set .@speed,100;
- else if (.@start < 61) set .@speed,110;
- else if (.@start < 71) set .@speed,120;
- else if (.@start < 81) set .@speed,130;
- else if (.@start < 91) set .@speed,140;
- else set .@speed,150;
+ .@start = rand(1,100);
+ if (.@start < 11) .@speed = 60;
+ else if (.@start < 21) .@speed = 70;
+ else if (.@start < 31) .@speed = 80;
+ else if (.@start < 41) .@speed = 90;
+ else if (.@start < 51) .@speed = 100;
+ else if (.@start < 61) .@speed = 110;
+ else if (.@start < 71) .@speed = 120;
+ else if (.@start < 81) .@speed = 130;
+ else if (.@start < 91) .@speed = 140;
+ else .@speed = 150;
sc_start SC_WALKSPEED,5000,.@speed;
end;
@@ -874,12 +874,12 @@ OnInit:
- script Luk_1 -1,{
OnTouchNPC:
- set .@start,rand(1,100);
- if (.@start < 61) set .@speed,110;
- else if (.@start < 71) set .@speed,120;
- else if (.@start < 81) set .@speed,130;
- else if (.@start < 91) set .@speed,140;
- else set .@speed,150;
+ .@start = rand(1,100);
+ if (.@start < 61) .@speed = 110;
+ else if (.@start < 71) .@speed = 120;
+ else if (.@start < 81) .@speed = 130;
+ else if (.@start < 91) .@speed = 140;
+ else .@speed = 150;
sc_start SC_WALKSPEED,10000,.@speed;
end;
@@ -890,11 +890,11 @@ OnInit:
- script Luk_2 -1,{
OnTouchNPC:
- set .@start,rand(1,100);
- if (.@start < 61) set .@time,1000;
- else if (.@start < 71) set .@time,2000;
- else if (.@start < 81) set .@time,3000;
- else if (.@start < 91) set .@time,4000;
+ .@start = rand(1,100);
+ if (.@start < 61) .@time = 1000;
+ else if (.@start < 71) .@time = 2000;
+ else if (.@start < 81) .@time = 3000;
+ else if (.@start < 91) .@time = 4000;
if (.@time) sc_start SC_STUN,.@time,0;
end;
@@ -905,11 +905,11 @@ OnInit:
- script Tire_1 -1,{
OnTouchNPC:
- set .@start,rand(1,100);
- if (.@start < 61) set .@time,1000;
- else if (.@start < 71) set .@time,2000;
- else if (.@start < 81) set .@time,3000;
- else if (.@start < 91) set .@time,4000;
+ .@start = rand(1,100);
+ if (.@start < 61) .@time = 1000;
+ else if (.@start < 71) .@time = 2000;
+ else if (.@start < 81) .@time = 3000;
+ else if (.@start < 91) .@time = 4000;
if (.@time) sc_start SC_SLEEP,.@time,0;
end;
@@ -1005,7 +1005,7 @@ p_track01,47,28,0 duplicate(Tire_1) Tire6#6 -1,0,0
hugel,47,56,0 script #race_timer2-1 -1,{
OnEnable:
enablenpc "#race_timer2-1";
- set $@mon_time_2_1,2;
+ $@mon_time_2_1 = 2;
initnpctimer;
end;
@@ -1020,7 +1020,7 @@ OnTimer10000:
OnTimer30000:
mapannounce "hugel","The Dual Monster Race Arena has just opened.",bc_map,"0xffb6c1";
- set $@mon_time_2_1,1;
+ $@mon_time_2_1 = 1;
donpcevent "#race_timer2-2::OnEnable";
enablenpc "Ticket Helper#2";
donpcevent "TrapGlobal#race02::OnEnable";
@@ -1044,14 +1044,14 @@ OnTimer272000:
OnTimer330000:
mapannounce "hugel","The race is now starting. If you missed your chance to enter this race, please try again next time~!",bc_map,"0xffb6c1";
- set $@mon_time_2_1,0;
+ $@mon_time_2_1 = 0;
donpcevent "#race_timer2-1::OnDisable";
stopnpctimer;
end;
OnInit:
enablenpc "#race_timer2-1";
- set $@mon_time_2_1,2;
+ $@mon_time_2_1 = 2;
initnpctimer;
end;
}
@@ -1059,7 +1059,7 @@ OnInit:
p_track02,42,23,0 script #race_timer2-2 -1,{
OnEnable:
enablenpc "#race_timer2-2";
- set $@mon_time_2_2,0;
+ $@mon_time_2_2 = 0;
initnpctimer;
end;
@@ -1094,9 +1094,9 @@ OnTimer242000:
OnTimer300000:
mapannounce "p_track02","The Monster Race is starting now. Good luck, everybody!",bc_map,"0x87ceeb";
- set $@mon_time_2_2,1;
- set $@mon_race_2_1,0;
- set $@mon_race_2_2,0;
+ $@mon_time_2_2 = 1;
+ $@mon_race_2_1 = 0;
+ $@mon_race_2_2 = 0;
disablenpc "Ticket Helper#2";
donpcevent "#poring1::OnEnable";
donpcevent "#lunatic1::OnEnable";
@@ -1109,7 +1109,7 @@ OnTimer300000:
OnInit:
disablenpc "#race_timer2-2";
- set $@mon_time_2_2,0;
+ $@mon_time_2_2 = 0;
end;
}
@@ -1172,8 +1172,8 @@ OnTimer300000:
mapwarp "p_track02","hugel",63,73;
disablenpc "Medal Distributor#medal";
donpcevent "#race_timer2-1::OnEnable";
- set $@mon_race_2_1,0;
- set $@mon_race_2_2,0;
+ $@mon_race_2_1 = 0;
+ $@mon_race_2_2 = 0;
donpcevent "#race_timer2-3::OnDisable";
stopnpctimer;
end;
@@ -1282,8 +1282,8 @@ hugel,62,69,1 script Eckar Erenes#double 4_M_NFMAN,{
mes "Let me guide you inside";
mes "the Monster Race Arena now.";
Zeny -= 2000;
- set monster_race_2_1,0;
- set monster_race_2_2,0;
+ monster_race_2_1 = 0;
+ monster_race_2_2 = 0;
close2;
warp "p_track02",75,41;
end;
@@ -1305,8 +1305,8 @@ hugel,62,69,1 script Eckar Erenes#double 4_M_NFMAN,{
mes "Let me guide you now";
mes "to the Monster Race Arena.";
Zeny -= 2000;
- set monster_race_2_1,0;
- set monster_race_2_2,0;
+ monster_race_2_1 = 0;
+ monster_race_2_2 = 0;
close2;
warp "p_track02",75,41;
end;
@@ -1343,8 +1343,8 @@ hugel,62,69,1 script Eckar Erenes#double 4_M_NFMAN,{
mes "I hope you enjoy";
mes "watching this race!";
Zeny -= 500;
- set monster_race_2_1,0;
- set monster_race_2_2,0;
+ monster_race_2_1 = 0;
+ monster_race_2_2 = 0;
close2;
warp "p_track02",75,41;
end;
@@ -1400,7 +1400,7 @@ p_track02,73,22,1 script Ticket Helper#2 4_M_HUMAN_02,{
next;
switch(select("Check Monster Status:Wager on Race:Monster Race?:Cancel")) {
case 1:
- for (set .@i, 1; .@i <= 6; set .@i, .@i + 1)
+ for (.@i = 1; .@i <= 6; ++.@i)
mes "Monster "+.@i+" [^CC6600Luck^000000: " + getd("$@mon_r02_Luk"+.@i) + "] [^EE0000HP^000000: " + getd("$@mon_r02_tire"+.@i) + "]";
close;
case 2:
@@ -1419,11 +1419,10 @@ p_track02,73,22,1 script Ticket Helper#2 4_M_HUMAN_02,{
mes "will win this race.";
next;
while (1) {
- set .@m$, "";
- for (set .@i, 1; .@i <= 6; set .@i, .@i + 1)
- set .@m$, .@m$ + ((.@i != .@m1)?"Monster "+.@i:"")+":";
- set .@m, 0;
- set .@m, select (.@m$);
+ .@m$ = "";
+ for (.@i = 1; .@i <= 6; ++.@i)
+ .@m$ += ((.@i != .@m1)?"Monster "+.@i:"")+":";
+ .@m = select (.@m$);
switch (.@m) {
case 1: setarray .@w$, "a friendly","Poring type monster"; break;
case 2: setarray .@w$, "an adorable","Lunatic type monster"; break;
@@ -1456,7 +1455,7 @@ p_track02,73,22,1 script Ticket Helper#2 4_M_HUMAN_02,{
mes "you think will place";
mes "1st or 2nd in this race.";
next;
- set .@m1, .@m;
+ .@m1 = .@m;
} else {
if (!$@mon_time_2_2) {
mes "[Ticket Helper]";
@@ -1466,8 +1465,8 @@ p_track02,73,22,1 script Ticket Helper#2 4_M_HUMAN_02,{
mes "I really hope that the odds";
mes "work out in your favor~";
emotion e_kis;
- set monster_race_2_1,.@m1;
- set monster_race_2_2,.@m;
+ monster_race_2_1 = .@m1;
+ monster_race_2_2 = .@m;
getitem 7514,1; //Monster_Ticket
close;
} else {
@@ -1710,8 +1709,8 @@ p_track02,67,45,5 script Medal Distributor#medal 4_F_RACING,{
mes "visit Wayne in Hugel. We hope";
mes "you enjoyed the Monster Race~";
delitem 7514,1; //Monster_Ticket
- set monster_race_2_1,7;
- set monster_race_2_2,7;
+ monster_race_2_1 = 7;
+ monster_race_2_2 = 7;
getitem 7515,15; //Marvelous_Medal
close;
}
@@ -1788,8 +1787,8 @@ p_track02,76,38,1 script Exit Guide#double 4_M_NFMAN,{
mes "here in the Monster Race Arena.";
delitem 7514,1; //Monster_Ticket
}
- set monster_race_2_1,0;
- set monster_race_2_2,0;
+ monster_race_2_1 = 0;
+ monster_race_2_2 = 0;
close2;
warp "hugel",63,73;
end;
@@ -1801,7 +1800,7 @@ OnEnable:
enablenpc strnpcinfo(0);
setarray .@n[1], 1725,1726,1727,1728,1730,1729;
getmapxy(.@m$,.@x,.@y,1);
- set .@i, MN;
+ .@i = MN;
monster "p_track02",58,.@y,"Monster "+.@i,.@n[.@i],1,strnpcinfo(0)+"::OnMyMobDead";
end;
@@ -1811,18 +1810,18 @@ OnDisable:
end;
OnTouchNPC:
- set .@i, MN;
+ .@i = MN;
if (!$@mon_race_2_1) {
emotion e_lv;
specialeffect EF_MVP;
mapannounce "p_track02","Monster "+.@i+" has reached the Finish Line!",bc_map,"0x66FFCC";
- set $@mon_race_2_1,1;
+ $@mon_race_2_1 = 1;
donpcevent strnpcinfo(0)+"::OnDisable";
} else {
emotion e_lv;
specialeffect EF_MVP;
mapannounce "p_track02","The race is over! Monster "+.@i+" has reached the Finish Line!",bc_map,"0x66FFCC";
- set $@mon_race_2_2,1;
+ $@mon_race_2_2 = 1;
donpcevent "#poring1::OnDisable";
donpcevent "#lunatic1::OnDisable";
donpcevent "#savagebebe1::OnDisable";
@@ -1840,7 +1839,7 @@ OnMyMobDead:
function MN {
setarray .@n$[1], "poring","lunatic","savagebebe","desertwolf","deviruchi","baphomet";
- for (set .@i, 1; .@i <= getarraysize(.@n$); set .@i, .@i + 1) {
+ for (.@i = 1; .@i <= getarraysize(.@n$); ++.@i) {
if (compare(strnpcinfo(0),.@n$[.@i]))
break;
}
@@ -1862,9 +1861,9 @@ p_track02,30,28,0 duplicate(mob1#main) #baphomet1 HIDDEN_WARP_NPC,0,0
p_track02,19,48,0 script TrapGlobal#race02 -1,{
OnEnable:
enablenpc "TrapGlobal#race02";
- for (set .@i, 1; .@i <= 6; set .@i, .@i + 1)
+ for (.@i = 1; .@i <= 6; ++.@i)
enablenpc "starting#race02_"+.@i;
- set .@c, 1;
+ .@c = 1;
while (.@c <= 6) {
setd ".@line_"+.@c,rand(1,70);
if (getd(".@line_"+.@c) <= 10) {
@@ -1895,40 +1894,40 @@ OnEnable:
enablenpc "Luk#race02_"+.@c+"_2";
setd ".@tired_"+.@c,rand(20,40);
setd "$@mon_r02_tire"+.@c,getd(".@tired_"+.@c);
- for (set .@i, 1; .@i <= 3; set .@i, .@i + 1)
+ for (.@i = 1; .@i <= 3; ++.@i)
enablenpc "Tire#race02_"+.@c+"_"+.@i;
if (getd(".@tired_"+.@c) < 30) enablenpc "Tire#race02_"+.@c+"_4";
} else if (getd(".@line_"+.@c) <= 60) {
setd "$@mon_r02_luk"+.@c,getd(".@line_"+.@c);
- for (set .@i, 1; .@i <= 3; set .@i, .@i + 1)
+ for (.@i = 1; .@i <= 3; ++.@i)
enablenpc "Luk#race02_"+.@c+"_"+.@i;
setd ".@tired_"+.@c,rand(10,30);
setd "$@mon_r02_tire"+.@c,getd(".@tired_"+.@c);
- for (set .@i, 1; .@i <= 4; set .@i, .@i + 1)
+ for (.@i = 1; .@i <= 4; ++.@i)
enablenpc "Tire#race02_"+.@c+"_"+.@i;
if (getd(".@tired_"+.@c) < 20) enablenpc "Tire#race02_"+.@c+"_5";
} else if (getd(".@line_"+.@c) <= 70) {
setd "$@mon_r02_luk"+.@c,getd(".@line_"+.@c);
- for (set .@i, 1; .@i <= 4; set .@i, .@i + 1)
+ for (.@i = 1; .@i <= 4; ++.@i)
enablenpc "Luk#race02_"+.@c+"_"+.@i;
setd ".@tired_"+.@c,rand(0,20);
setd "$@mon_r02_tire"+.@c,getd(".@tired_"+.@c);
- for (set .@i, 1; .@i <= 5; set .@i, .@i + 1)
+ for (.@i = 1; .@i <= 5; ++.@i)
enablenpc "Tire#race02_"+.@c+"_"+.@i;
if (getd(".@tired_"+.@c) < 10) enablenpc "Tire#race02_"+.@c+"_6";
}
- set .@c, .@c + 1;
+ ++.@c;
}
end;
OnDisable:
disablenpc "TrapGlobal#race02";
- for (set .@i, 1; .@i <= 6; set .@i, .@i + 1)
+ for (.@i = 1; .@i <= 6; ++.@i)
donpcevent "starting#race02_"+.@i+"::OnDisable";
end;
OnInit:
- for (set .@i, 1; .@i <= 6; set .@i, .@i + 1) {
+ for (.@i = 1; .@i <= 6; ++.@i) {
setd "$@mon_r02_luk"+.@i,0;
setd "$@mon_r02_tire"+.@i,0;
}
@@ -1938,24 +1937,24 @@ OnInit:
- script starting_2 -1,{
OnDisable:
disablenpc strnpcinfo(0);
- for(set .@i,1; .@i<7; set .@i,.@i+1)
+ for(.@i = 1; .@i<7; ++.@i)
disablenpc "Luk#"+strnpcinfo(2)+"_"+.@i;
- for(set .@i,1; .@i<7; set .@i,.@i+1)
+ for(.@i = 1; .@i<7; ++.@i)
disablenpc "Tire#"+strnpcinfo(2)+"_"+.@i;
end;
OnTouchNPC:
- set .@start,rand(1,100);
- if (.@start < 11) set .@speed,60;
- else if (.@start < 21) set .@speed,70;
- else if (.@start < 31) set .@speed,80;
- else if (.@start < 41) set .@speed,90;
- else if (.@start < 51) set .@speed,100;
- else if (.@start < 61) set .@speed,110;
- else if (.@start < 71) set .@speed,120;
- else if (.@start < 81) set .@speed,130;
- else if (.@start < 91) set .@speed,140;
- else set .@speed,150;
+ .@start = rand(1,100);
+ if (.@start < 11) .@speed = 60;
+ else if (.@start < 21) .@speed = 70;
+ else if (.@start < 31) .@speed = 80;
+ else if (.@start < 41) .@speed = 90;
+ else if (.@start < 51) .@speed = 100;
+ else if (.@start < 61) .@speed = 110;
+ else if (.@start < 71) .@speed = 120;
+ else if (.@start < 81) .@speed = 130;
+ else if (.@start < 91) .@speed = 140;
+ else .@speed = 150;
sc_start SC_WALKSPEED,5000,.@speed;
end;
@@ -2286,7 +2285,7 @@ ein_in01,85,208,5 script Ei'felle#repay01 4_M_EINMAN2,{
}
}
setarray .@m$, "Dagger","One Handed Sword","Two Handed Sword","Axe","Mace","Bow","Staff","Book","Spear","Katar","Knuckle","Whip","Musical Instrument";
- set .@m, select (implode(.@m$,":")) - 1;
+ .@m = select (implode(.@m$,":")) - 1;
mes "[Ei'felle]";
mes "So you'd like to have a";
mes .@m$[.@m]+"? Please choose";
@@ -2346,7 +2345,7 @@ ein_in01,85,208,5 script Ei'felle#repay01 4_M_EINMAN2,{
setarray .@mw, 1918,1913;
break;
}
- set .@j, select (.@mw$+":Cancel") - 1;
+ .@j = select (.@mw$+":Cancel") - 1;
explode(.@mw$,.@mw$,":");
if (.@j == getarraysize(.@mw$)) close;
callsub S_BonusReward,1500,.@mw[.@j];
@@ -2581,9 +2580,9 @@ S_Reward:
mes "advance my research,";
mes "and I promise to repay";
mes "you as soon as I can!";
- set .@medals,countitem(7515);
+ .@medals = countitem(7515);
delitem 7515,.@medals; //Marvelous_Medal
- set ein_medal01,ein_medal01+.@medals;
+ ein_medal01 += .@medals;
close;
case 2:
mes "[Ei'felle]";
@@ -2631,7 +2630,7 @@ S_Reward:
mes "and I promise to repay";
mes "you as soon as I can!";
delitem 7515,.@input; //Marvelous_Medal
- set ein_medal01,ein_medal01+.@input;
+ ein_medal01 += .@input;
close;
}
case 3:
@@ -2735,7 +2734,7 @@ S_BonusReward:
mes "difficult. In any case, I would";
mes "appreciate your continued help~";
}
- set ein_medal01,ein_medal01-getarg(0);
+ ein_medal01 -= getarg(0);
getitem getarg(1),1;
close;
}
@@ -2800,9 +2799,9 @@ hugel,71,83,4 script Wayne 4_M_HUMERCHANT,{
mes "more Prize Medals at a time.";
next;
setarray .@pm, 1,3,7,8,16,25,42,59;
- for (set .@i, 0; .@i < getarraysize(.@pm); set .@i, .@i + 1)
- set .@m$, .@m$ + .@pm[.@i] + " Prize medal:";
- set .@m, select (.@m$) - 1;
+ for (.@i = 0; .@i < getarraysize(.@pm); ++.@i)
+ .@m$ += .@pm[.@i] + " Prize medal:";
+ .@m = select (.@m$) - 1;
switch (.@m) {
case 0:
setarray .@mr$, "2 Hinale Leaflets:2 Aloe Leaflets:1 Mastela Fruit:5 Witch Starsands:4 Condensed Red Potions";
@@ -2817,23 +2816,23 @@ hugel,71,83,4 script Wayne 4_M_HUMERCHANT,{
setarray .@mr, 12130,1,12110,1;
break;
case 3:
- set .@mr$, "1 Gift Box";
+ .@mr$ = "1 Gift Box";
setarray .@mr, 644,1;
break;
case 4:
- set .@mr$, "1 Old Blue Box";
+ .@mr$ = "1 Old Blue Box";
setarray .@mr, 603,1;
break;
case 5:
- set .@mr$, "1 Taming Gift Set";
+ .@mr$ = "1 Taming Gift Set";
setarray .@mr, 12105,1;
break;
case 6:
- set .@mr$, "1 Old Purple Box";
+ .@mr$ = "1 Old Purple Box";
setarray .@mr, 617,1;
break;
case 7:
- set .@mr$, "1 Poring Box";
+ .@mr$ = "1 Poring Box";
setarray .@mr, 12109,1;
break;
}
@@ -2843,7 +2842,7 @@ hugel,71,83,4 script Wayne 4_M_HUMERCHANT,{
mes "sets that you'd like to receive";
mes "in exchange for "+.@pm[.@m]+" Prize Medal."+((getarraysize(.@mr)<3)?" Well, we have only 1 set, but...":"");
next;
- set .@m2, select (.@mr$) - 1;
+ .@m2 = select (.@mr$) - 1;
if (countitem(7515) < .@pm[.@m]) {
mes "[Wayne]";
mes "Hey, you don't have";
@@ -3074,12 +3073,12 @@ hugel,5,5,3 script Monster Race Manager 4_M_LGTGUARD,{
mes "Entry NPCs for the Single";
mes "and Dual Monster Races.";
next;
- set .@select, select("Single Race Entry - ON:Dual Race Entry - ON:Single Race Entry - OFF:Dual Race Entry - OFF");
+ .@select = select("Single Race Entry - ON:Dual Race Entry - ON:Single Race Entry - OFF:Dual Race Entry - OFF");
mes "[Monster Race Manager]";
mes "Please enter";
mes "the password.";
next;
- set .@i, callfunc("F_GM_NPC",1854,0,0,2000);
+ .@i = callfunc("F_GM_NPC",1854,0,0,2000);
if (.@i == -2) {
mes "[Monster Race Manager]";
mes "Error.";
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;
}
diff --git a/npc/other/powernpc.txt b/npc/other/powernpc.txt
index 33c6980dd..ad81c6438 100644
--- a/npc/other/powernpc.txt
+++ b/npc/other/powernpc.txt
@@ -24,7 +24,7 @@ gonryun,180,118,4 script Iron man#gnp 4_M_03,{
mes "Children are not allowed in here.";
close;
}
- if (in_battle == 3) set in_battle,1;
+ if (in_battle == 3) in_battle = 1;
if (in_battle < 1) {
mes "[Songmoodoo]";
mes "Hey hey~ This is not something";
@@ -84,14 +84,14 @@ gonryun,180,118,4 script Iron man#gnp 4_M_03,{
mes "I'll give you another chance.";
mes "See you again.";
emotion e_pif;
- set in_battle,1;
+ in_battle = 1;
}
close;
L_Lifting:
if (checkweight(7049,getarg(0))) {
mes "You lifted the Stone lightly.^000000";
- set in_battle,1;
+ in_battle = 1;
getitem 7049, getarg(0); // Stone
next;
emotion e_no1;
@@ -138,9 +138,9 @@ gon_test,50,14,4 script Administrator#gnp 8_M_TWSOLDIER,{
close;
}
Zeny -= 500;
- set in_battle,1;
+ in_battle = 1;
warp "gon_test",42,86;
- set $@in_battle,1;
+ $@in_battle = 1;
setnpctimer 0,"Summoner#gnp";
startnpctimer "Summoner#gnp";
end;
@@ -161,15 +161,15 @@ gon_test,42,89,4 script Summoner#gnp 4_M_TWBOY,{
mes "Welcome.";
mes "Which monster will you recall?";
next;
- set .@gnpGroup, select("Group 1:Group 2:Group 3:Group 4:Group 5:Group 6:Group 7:Group 8:Group 9:Group 10:Group 11");
- set .@gnpGroupMob$,.gnpMobsName$[(.@gnpGroup-1)*6];
- for (set .@i,1; .@i < 6; set .@i, .@i+1)
- set .@gnpGroupMob$, .@gnpGroupMob$ + ":" + .gnpMobsName$[(.@gnpGroup-1)*6 + .@i];
- set .@gnpMob, select(.@gnpGroupMob$);
+ .@gnpGroup = select("Group 1:Group 2:Group 3:Group 4:Group 5:Group 6:Group 7:Group 8:Group 9:Group 10:Group 11");
+ .@gnpGroupMob$ = .gnpMobsName$[(.@gnpGroup-1)*6];
+ for (.@i = 1; .@i < 6; ++.@i)
+ .@gnpGroupMob$ += ":" + .gnpMobsName$[(.@gnpGroup-1)*6 + .@i];
+ .@gnpMob = select(.@gnpGroupMob$);
mes "[SongYeunWoo]";
mes "Let the fight begin!";
close2;
- set in_battle,2;
+ in_battle = 2;
if (getnpctimer(0) < 180000) monster "gon_test",56,86,.gnpMobsName$[(.@gnpGroup-1)*6 + .@gnpMob - 1],.gnpMobsId[(.@gnpGroup-1)*6 + .@gnpMob - 1],1,"Summoner#gnp::OnGnpMobDead";
end;
OnInit:
@@ -213,13 +213,13 @@ OnTimer182000:
OnGnpMobDead:
setnpctimer 0;
- set in_battle,1;
+ in_battle = 1;
areaannounce "gon_test",41,81,74,92,"Thank you. Please come again.",0;
sleep 4000;
OnTimer184000:
stopnpctimer;
areawarp "gon_test",41,81,74,92,"gon_test",44,4;
- set $@in_battle,0;
+ $@in_battle = 0;
end;
}
@@ -253,7 +253,7 @@ gon_test,46,14,3 script Guide of field of fight 4_F_TWGIRL,{
mes "Yes, thank you.";
mes "Have a good time.";
close2;
- set in_battle,3;
+ in_battle = 3;
warp "gon_test",25,98;
end;
case 4:
@@ -281,7 +281,7 @@ gon_test,70,103,3 script ChowAnAn#gnp 4_F_TWMIDWOMAN,{
mes "Thank you.";
mes "Please come again.";
close2;
- set in_battle,1;
+ in_battle = 1;
warp "gon_test",44,4;
end;
}
diff --git a/npc/other/pvp.txt b/npc/other/pvp.txt
index 779f332ae..383c67d22 100644
--- a/npc/other/pvp.txt
+++ b/npc/other/pvp.txt
@@ -253,7 +253,7 @@ geffen_in,67,63,4 duplicate(pvpe) PVP Narrator#pe6 4_M_02
close;
L_Warp:
- set .@map$,getarg(0);
+ .@map$ = getarg(0);
if (checkre(0)) {
switch(rand(1,10)) {
case 1: warp .@map$,34,38; break;
@@ -291,7 +291,7 @@ function script F_PVP_FSRS {
}
}
if (strnpcinfo(4) == "pvp_y_room") {
- set .@base$, "pvp_y_"+strnpcinfo(2);
+ .@base$ = "pvp_y_"+strnpcinfo(2);
setarray .@maps$[0], .@base$+"-1", .@base$+"-2", .@base$+"-3", .@base$+"-4", .@base$+"-5";
setarray .@name$[0], "Prontera", "Izlude", "Payon", "Alberta", "Morroc";
setarray .@Limit[0], 128, 128, 128, 128, 128;
@@ -300,10 +300,10 @@ function script F_PVP_FSRS {
setarray .@name$[0], "Sandwich", "Lock on", "Four Room", "Under cross", "Compass Room";
setarray .@Limit[0], 64, 32, 32, 32, 32;
}
- for(set .@i,0; .@i<5; set .@i,.@i+1)
- set .@menu$, .@menu$+.@name$[.@i]+" ["+getmapusers(.@maps$[.@i])+" / "+.@Limit[.@i]+"]:";
- set .@menu$, .@menu$+"Cancel.";
- set .@i, select(.@menu$)-1;
+ for (.@i = 0; .@i<5; ++.@i)
+ .@menu$ += .@name$[.@i]+" ["+getmapusers(.@maps$[.@i])+" / "+.@Limit[.@i]+"]:";
+ .@menu$ += "Cancel.";
+ .@i = select(.@menu$)-1;
if (.@i == 5) close;
if (getmapusers(.@maps$[.@i]) >= .@Limit[.@i]) {
mes "[PVP Fight Square Reception Staff]";
@@ -326,7 +326,7 @@ pvp_room,54,85,4 script Registration Staff#1 8W_SOLDIER,{
mes "For details about viewers please proceed to the Register Staff on your right.";
close;
}
- set .@size, getarraysize(.warp_x);
+ .@size = getarraysize(.warp_x);
if (.@size == 0) {
setarray .warp_x,40,59,20,40;
setarray .warp_y,59,40,40,20;
@@ -342,7 +342,7 @@ pvp_room,54,85,4 script Registration Staff#1 8W_SOLDIER,{
mes "Good luck!";
close2;
delitem 7028,1; //Invite_For_Duel
- set .@rand, rand(.@size);
+ .@rand = rand(.@size);
warp "pvp_2vs2", .warp_x[.@rand], .warp_y[.@rand];
deletearray .warp_x[.@rand],1;
deletearray .warp_y[.@rand],1;
diff --git a/npc/other/turbo_track.txt b/npc/other/turbo_track.txt
index bb38039a4..fdbf58b82 100644
--- a/npc/other/turbo_track.txt
+++ b/npc/other/turbo_track.txt
@@ -19,7 +19,7 @@
function script F_tt {
if (compare(strnpcinfo(2),"main")) end;
- set .@w$,(charat(strnpcinfo(4),6))+((getstrlen(strnpcinfo(4)) > 9)?(substr(strnpcinfo(4),8,9)):(charat(strnpcinfo(4),getstrlen(strnpcinfo(4))-1)));
+ .@w$ = (charat(strnpcinfo(4),6))+((getstrlen(strnpcinfo(4)) > 9)?(substr(strnpcinfo(4),8,9)):(charat(strnpcinfo(4),getstrlen(strnpcinfo(4))-1)));
return .@w$;
}
@@ -33,13 +33,13 @@ OnEnable:
OnStartArena:
if (compare(strnpcinfo(2),"n1")) {
- set .@in$, "n";
- set .@in, 1;
+ .@in$ = "n";
+ .@in = 1;
} else {
- set .@in$,(compare(strnpcinfo(1),"Expert"))?"e":"n";
- if (compare(strnpcinfo(1),"4")) set .@in, 4;
- if (compare(strnpcinfo(1),"8")) set .@in, 8;
- if (compare(strnpcinfo(1),"16")) set .@in, 16;
+ .@in$ = (compare(strnpcinfo(1),"Expert"))?"e":"n";
+ if (compare(strnpcinfo(1),"4")) .@in = 4;
+ if (compare(strnpcinfo(1),"8")) .@in = 8;
+ if (compare(strnpcinfo(1),"16")) .@in = 16;
}
warpwaitingpc "turbo_"+.@in$+"_"+.@in,298,161;
donpcevent "Broadcast#"+.@in$+.@in+"::OnEnable";
@@ -51,9 +51,9 @@ OnInit:
if (compare(strnpcinfo(2),"n1")) {
waitingroom "Solo Mode",60,"Solo Mode#n1::OnStartArena",1;
} else {
- if (compare(strnpcinfo(1),"4")) set .@in, 4;
- if (compare(strnpcinfo(1),"8")) set .@in, 8;
- if (compare(strnpcinfo(1),"16")) set .@in, 16;
+ if (compare(strnpcinfo(1),"4")) .@in = 4;
+ if (compare(strnpcinfo(1),"8")) .@in = 8;
+ if (compare(strnpcinfo(1),"16")) .@in = 16;
waitingroom strnpcinfo(1),60,strnpcinfo(0)+"::OnStartArena",.@in,1000,10,99;
}
enablewaitingroomevent strnpcinfo(0);
@@ -90,7 +90,7 @@ turbo_e_4,298,167,0 script Point#tt_main -1,15,15,{
OnTouch:
if (tt_point < 28999) {
- set tt_point,tt_point+2;
+ tt_point += 2;
warp strnpcinfo(4),59,364;
}
else
@@ -98,7 +98,7 @@ OnTouch:
end;
OnInit:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
disablenpc "Point Give-Away Guy#"+.@w$;
end;
}
@@ -112,7 +112,7 @@ turbo_n_1,298,167,0 duplicate(Point#tt_main) Point Give-Away Guy#n1 -1,15,15
- script Broadcast#tt_main -1,{
OnEnable:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
enablenpc "Broadcast#"+.@w$;
initnpctimer;
end;
@@ -170,25 +170,25 @@ OnTimer47000:
end;
OnTimer49000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
enablenpc "Point Give-Away Guy#"+.@w$;
donpcevent "Master#"+.@w$+"::OnEnable";
end;
OnTimer50000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
donpcevent "snake#"+.@w$+"::OnEnable";
donpcevent "hunting#"+.@w$+"::OnEnable";
if (strnpcinfo(4) != "turbo_n_1") enablenpc "bing#"+.@w$;
end;
OnTimer57000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
disablenpc "Point Give-Away Guy#"+.@w$;
end;
OnInit:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
disablenpc "Broadcast#"+.@w$;
end;
}
@@ -203,13 +203,13 @@ turbo_n_1,167,3,0 duplicate(Broadcast#tt_main) Broadcast#n1 -1
- script Master#tt_main -1,{
function RName;
OnEnable:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
enablenpc "Master#"+.@w$;
initnpctimer;
end;
OnDisable:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
stopnpctimer;
disablenpc "Master#"+.@w$;
end;
@@ -259,11 +259,11 @@ OnTimer22000:
end;
OnTimer23000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
mapannounce strnpcinfo(4),"Now! The race has begun! Go Go Go!!",bc_map,"0x33FF66";
disablenpc "No_Unfair_Start#"+.@w$+"-1";
disablenpc "No_Unfair_Start#"+.@w$+"-2";
- if (strnpcinfo(4) == "turbo_n_1") set $@start_time,gettimetick(0);
+ if (strnpcinfo(4) == "turbo_n_1") $@start_time = gettimetick(0);
end;
OnTimer30000:
@@ -367,7 +367,7 @@ OnTimer925000:
end;
OnTimer927000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
mapannounce strnpcinfo(4),"[Everyone will be transported to a Waiting Room.]",bc_map,"0x33FF66";
mapwarp strnpcinfo(4),"turbo_room",71,89;
disablenpc "Broadcast#"+.@w$;
@@ -393,13 +393,13 @@ OnTimer927000:
end;
OnInit:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
disablenpc "Master#"+.@w$;
end;
function RName {
- set .@s,(getstrlen(getarg(0)) > 2)?(substr(getarg(0),1,2)):(charat(getarg(0),getstrlen(getarg(0))-1));
- set .@rn$,((compare(strnpcinfo(4),"_e_"+.@s))?"Expert mode":"Normal mode")+" - "+.@s+" person";
+ .@s = (getstrlen(getarg(0)) > 2)?(substr(getarg(0),1,2)):(charat(getarg(0),getstrlen(getarg(0))-1));
+ .@rn$ = ((compare(strnpcinfo(4),"_e_"+.@s))?"Expert mode":"Normal mode")+" - "+.@s+" person";
return .@rn$;
}
}
@@ -1177,7 +1177,7 @@ turbo_n_1,381,354,0 duplicate(SandTrap#tt_main) #TBT_trap_n1-23 -1,1,1
- script Trap#tt_main -1,{
OnTouch:
if (rand(1,3) == 1) {
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
cutin "kafra_03",2;
mes "^4d4dffAl De Baran";
mes "Turbo Track";
@@ -1609,7 +1609,7 @@ turbo_n_1,236,3,0 duplicate(WaterTrap#tt_main) flasher#n1-48b -1,3,0
- script snake01#tt_main -1,{
OnTouch:
- set .@turbo2,rand(1,7);
+ .@turbo2 = rand(1,7);
if (.@turbo2 < 3) warp strnpcinfo(4),370,292;
if (.@turbo2 < 5) warp strnpcinfo(4),295,293;
if (.@turbo2 < 7) warp strnpcinfo(4),355,292;
@@ -1626,7 +1626,7 @@ turbo_n_1,324,279,0 duplicate(snake01#tt_main) snake01#n1 WARPNPC,1,1
- script snake02#tt_main -1,{
OnTouch:
- set .@turbo2,rand(1,8);
+ .@turbo2 = rand(1,8);
if (.@turbo2 < 3) warp strnpcinfo(4),287,256;
if (.@turbo2 < 5) warp strnpcinfo(4),303,256;
if (.@turbo2 < 7) warp strnpcinfo(4),347,256;
@@ -1644,7 +1644,7 @@ turbo_n_1,332,279,0 duplicate(snake02#tt_main) snake02#n1 WARPNPC,1,1
- script snake03#tt_main WARPNPC,1,1,{
OnTouch:
- set .@turbo2,rand(1,8);
+ .@turbo2 = rand(1,8);
if (.@turbo2 < 3) warp strnpcinfo(4),279,292;
if (.@turbo2 < 5) warp strnpcinfo(4),311,292;
if (.@turbo2 < 7) warp strnpcinfo(4),347,256;
@@ -1662,7 +1662,7 @@ turbo_n_1,324,270,0 duplicate(snake03#tt_main) snake03#n1 WARPNPC,1,1
- script snake04#tt_main WARPNPC,1,1,{
OnTouch:
- set .@turbo2,rand(1,7);
+ .@turbo2 = rand(1,7);
if (.@turbo2 < 3) warp strnpcinfo(4),363,256;
if (.@turbo2 < 5) warp strnpcinfo(4),295,293;
if (.@turbo2 < 7) warp strnpcinfo(4),355,292;
@@ -1687,7 +1687,7 @@ OnReset:
OnEnable:
if (compare(strnpcinfo(2),"snake")) {
setarray .@n, 279,284,279,268,279,260,287,288,287,280,287,264,295,284,295,268,295,260,303,288,303,280,303,264,311,284,311,268,311,260,347,288,347,280,347,264,355,284,355,268,355,260,363,288,363,280,363,264,371,284,371,268,371,260,379,288,379,280,379,264;
- for (set .@i, 0; .@i < getarraysize(.@n); set .@i, .@i + 2)
+ for (.@i = 0; .@i < getarraysize(.@n); .@i += 2)
monster strnpcinfo(4),.@n[.@i],.@n[.@i+1],"Archer Skeleton",1420,1;
} else {
setarray .@n_1$, "Munak","1610";
@@ -1697,9 +1697,9 @@ OnEnable:
setarray .@n_3$, "Yao Jun","1612";
setarray .@n_3, 68,56,26,46;
while (.@c < 3) {
- for (set .@i, 0; .@i < getarraysize(getd(".@n_"+.@c)); set .@i, .@i + 2)
+ for (.@i = 0; .@i < getarraysize(getd(".@n_"+.@c)); .@i += 2)
monster strnpcinfo(4),getd(".@n_"+.@c+"["+.@i+"]"),getd(".@n_"+.@c+"["+(.@i+1)+"]"),getd(".@n_"+.@c+"$[0]"),atoi(getd(".@n_"+.@c+"$[1]")),1;
- set .@c, .@c + 1;
+ ++.@c;
}
}
@@ -1718,7 +1718,7 @@ turbo_n_1,90,46,0 duplicate(SnakeHunt#tt_main) hunting#n1 HIDDEN_NPC
- script cos#tt_main -1,{
OnTouch:
- set .@n, charat(strnpcinfo(2),getstrlen(strnpcinfo(2))-1);
+ .@n = charat(strnpcinfo(2),getstrlen(strnpcinfo(2))-1);
switch (.@n) {
case 1:
mapannounce strnpcinfo(4),strcharinfo(0) +" has just passed the Log Bridge course!",bc_map,"0x70DBDB";
@@ -1921,8 +1921,8 @@ turbo_n_1,222,65,0 duplicate(TurboHint_4#tt_main) #n1NoWayOut7 -1,1,1
- script cos_end#tt_main -1,{
function GetNumber;
OnTouch:
- set .@w$,callfunc("F_tt");
- if (.@w$ == "n1") set $@end_time,gettimetick(0);
+ .@w$ = callfunc("F_tt");
+ if (.@w$ == "n1") $@end_time = gettimetick(0);
mapannounce strnpcinfo(4),strcharinfo(0) +" has just arrived at the Finish Line! Congratulations!",bc_map,"0xFFFF00";
if (.@w$ != "n1") {
setd "$ttnames$["+GetNumber(.@w$)+"]",strcharinfo(0);
@@ -1940,7 +1940,7 @@ OnTouch:
} else {
if (.@w$ == "e8" || .@w$ == "n8") setarray .@pts, 28951,50;
if (.@w$ == "e16" || .@w$ == "n16") setarray .@pts, 28941,60;
- if (tt_point < .@pts[0]) set tt_point,tt_point+.@pts[1];
+ if (tt_point < .@pts[0]) tt_point += .@pts[1];
warp strnpcinfo(4),384,161;
enablenpc "Winner Helper#TBT_"+.@w$;
enablenpc "#cos_"+.@w$+"_end2";
@@ -1950,14 +1950,14 @@ OnTouch:
function GetNumber {
setarray .@w_n$[1], "n4","n8","n16","e4","e8","e16";
- for (set .@i, 1; .@i <= getarraysize(.@w_n$); set .@i, .@i + 1) {
+ for (.@i = 1; .@i <= getarraysize(.@w_n$); ++.@i) {
if (getarg(0) == .@w_n$[.@i])
return .@i;
}
}
OnInit:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
enablenpc "#cos_"+.@w$+"_end";
end;
}
@@ -1971,18 +1971,18 @@ turbo_n_1,371,47,0 duplicate(cos_end#tt_main) #cos_n1_end WARPNPC,1,1
- script cos_end2#tt_main WARPNPC,1,1,{
OnTouch:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
mapannounce strnpcinfo(4),strcharinfo(0) +" is second to reach the Finish Line! Congratulations!",bc_map,"0xFFFF00";
if (.@w$ == "e8" || .@w$ == "n8") setarray .@pts, 28961,40;
if (.@w$ == "e16" || .@w$ == "n16") setarray .@pts, 28951,50;
- if (tt_points < .@pts[0]) set tt_point,tt_point+.@pts[1];
+ if (tt_points < .@pts[0]) tt_point += .@pts[1];
warp "turbo_room",72,89;
disablenpc "#cos_"+.@w$+"_end2";
enablenpc "#cos_"+.@w$+"_end3";
end;
OnInit:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
disablenpc "#cos_"+.@w$+"_end2";
end;
}
@@ -1993,11 +1993,11 @@ turbo_n_16,371,51,0 duplicate(cos_end2#tt_main) #cos_n16_end2 WARPNPC,1,1
- script cos_end3#tt_main -1,{
OnTouch:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
mapannounce strnpcinfo(4),"" + strcharinfo(0) +" is third to reach the Finish Line! Congratulations!",bc_map,"0xFFFF00";
if (.@w$ == "e8" || .@w$ == "n8") setarray .@pts, 28971,30;
if (.@w$ == "e16" || .@w$ == "n16") setarray .@pts, 28951,50;
- if (tt_point < .@pts[0]) set tt_point,tt_point+.@pts[1];
+ if (tt_point < .@pts[0]) tt_point += .@pts[1];
warp "turbo_room",72,89;
donpcevent "Winner Helper#TBT_"+.@w$+"::OnEnable";
donpcevent "Master#"+.@w$+"::OnDisable";
@@ -2006,7 +2006,7 @@ OnTouch:
end;
OnInit:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
disablenpc "#cos_"+.@w$+"_end3";
end;
}
@@ -2017,7 +2017,7 @@ turbo_n_16,371,43,0 duplicate(cos_end3#tt_main) #cos_n16_end3 WARPNPC,1,1
turbo_e_4,316,365,0 script DSwitch#tt_main -1,1,1,{
OnTouch:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
if (rand(1,2) == 1)
enablenpc "Flasher_Exit_1#"+.@w$;
else
@@ -2040,7 +2040,7 @@ OnTouch:
end;
OnInit:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
disablenpc strnpcinfo(0);
end;
}
@@ -2064,13 +2064,13 @@ turbo_n_1,114,190,0 duplicate(Flasher#tt_main) Flasher_Exit_2#n1 WARPNPC,1,1
if (tt_rank < 29999) {
mes "[Guide]";
mes "Congratulations!";
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
if (compare(.@w$,"4")) {
if (tt_point < 28961) {
mes "As the winner, your reward";
mes "is 40 Turbo Track Points~";
- set tt_point,tt_point+40;
- set my_point,tt_point;
+ tt_point += 40;
+ my_point = tt_point;
mes "You now have a total of";
mes tt_point + " Turbo Track points,";
mes strcharinfo(0) +".";
@@ -2090,7 +2090,7 @@ turbo_n_1,114,190,0 duplicate(Flasher#tt_main) Flasher_Exit_2#n1 WARPNPC,1,1
mes "any points if you exceed the";
mes "point limit. You now have a total of " + my_point + " Turbo Track points.";
}
- set tt_rank,tt_rank+1;
+ ++tt_rank;
next;
if (tt_rank > $ttranks[1]) {
setarray $ttranks[0],$ttranks[0],tt_rank,$ttranks[1],$ttranks[2],$ttranks[3],$ttranks[4];
@@ -2103,13 +2103,13 @@ turbo_n_1,114,190,0 duplicate(Flasher#tt_main) Flasher_Exit_2#n1 WARPNPC,1,1
donpcevent "Turbo Track Guide::OnNew_Top1";
if (tt_rank == 29999) {
if ($ttnames$[7] == "Breezy Havana") {
- set $ttnames$[7],strcharinfo(0);
+ $ttnames$[7] = strcharinfo(0);
mes "You've secured your place in";
mes "the Turbo Track Hall of Honor!";
announce strcharinfo(0) + " has joined the Turbo Track Hall of Honor!",bc_all,"FF0000";
}
else if ($ttnames$[8] == "RS125") {
- set $ttnames$[8],strcharinfo(0);
+ $ttnames$[8] = strcharinfo(0);
mes "You've secured your place in";
mes "the Turbo Track Hall of Honor!";
if (compare(.@w$,"4")) announce strcharinfo(0) + " has joined the Turbo Track Hall of Honor!",bc_all,"FF0000";
@@ -2127,13 +2127,13 @@ turbo_n_1,114,190,0 duplicate(Flasher#tt_main) Flasher_Exit_2#n1 WARPNPC,1,1
donpcevent "Turbo Track Guide::OnNew_Top2";
if (tt_rank == 29999) {
if ($ttnames$[7] == "Breezy Havana") {
- set $ttnames$[7],strcharinfo(0);
+ $ttnames$[7] = strcharinfo(0);
mes "You've secured your place in";
mes "the Turbo Track Hall of Honor!";
announce strcharinfo(0) + " has joined the Turbo Track Hall of Honor!",bc_all,"FF0000";
}
else if ($ttnames$[8] == "RS125") {
- set $ttnames$[8],strcharinfo(0);
+ $ttnames$[8] = strcharinfo(0);
mes "You've secured your place in";
mes "the Turbo Track Hall of Honor!";
announce strcharinfo(0) + " has joined the Turbo Track Hall of Honor!",bc_all,"FF0000";
@@ -2151,13 +2151,13 @@ turbo_n_1,114,190,0 duplicate(Flasher#tt_main) Flasher_Exit_2#n1 WARPNPC,1,1
donpcevent "Turbo Track Guide::OnNew_Top3";
if (tt_rank == 29999) {
if ($ttnames$[7] == "Breezy Havana") {
- set $ttnames$[7],strcharinfo(0);
+ $ttnames$[7] = strcharinfo(0);
mes "You've secured your place in";
mes "the Turbo Track Hall of Honor!";
announce strcharinfo(0) + " has joined the Turbo Track Hall of Honor!",bc_all,"FF0000";
}
else if ($ttnames$[8] == "RS125") {
- set $ttnames$[8],strcharinfo(0);
+ $ttnames$[8] = strcharinfo(0);
mes "You've secured your place in";
mes "the Turbo Track Hall of Honor!";
announce strcharinfo(0) + " has joined the Turbo Track Hall of Honor!",bc_all,"FF0000";
@@ -2175,13 +2175,13 @@ turbo_n_1,114,190,0 duplicate(Flasher#tt_main) Flasher_Exit_2#n1 WARPNPC,1,1
donpcevent "Turbo Track Guide::OnNew_Top4";
if (tt_rank == 29999) {
if ($ttnames$[7] == "Breezy Havana") {
- set $ttnames$[7],strcharinfo(0);
+ $ttnames$[7] = strcharinfo(0);
mes "You've secured your place in";
mes "the Turbo Track Hall of Honor!";
announce strcharinfo(0) + " has joined the Turbo Track Hall of Honor!",bc_all,"FF0000";
}
else if ($ttnames$[8] == "RS125") {
- set $ttnames$[8],strcharinfo(0);
+ $ttnames$[8] = strcharinfo(0);
mes "You've secured your place in";
mes "the Turbo Track Hall of Honor!";
announce strcharinfo(0) + " has joined the Turbo Track Hall of Honor!",bc_all,"FF0000";
@@ -2199,13 +2199,13 @@ turbo_n_1,114,190,0 duplicate(Flasher#tt_main) Flasher_Exit_2#n1 WARPNPC,1,1
donpcevent "Turbo Track Guide::OnNew_Top5";
if (tt_rank == 29999) {
if ($ttnames$[7] == "Breezy Havana") {
- set $ttnames$[7],strcharinfo(0);
+ $ttnames$[7] = strcharinfo(0);
mes "You've secured your place in";
mes "the Turbo Track Hall of Honor!";
announce "" + strcharinfo(0) + " has joined the Turbo Track Hall of Honor!",bc_all,"FF0000";
}
else if ($ttnames$[8] == "RS125") {
- set $ttnames$[8],strcharinfo(0);
+ $ttnames$[8] = strcharinfo(0);
mes "You've secured your place in";
mes "the Turbo Track Hall of Honor!";
announce strcharinfo(0) + " has joined the Turbo Track Hall of Honor!",bc_all,"FF0000";
@@ -2250,7 +2250,7 @@ turbo_n_1,114,190,0 duplicate(Flasher#tt_main) Flasher_Exit_2#n1 WARPNPC,1,1
mes "Right, your reward...";
if (tt_point < 28961) {
mes "40 Turbo Track Points!";
- set tt_point,tt_point+40;
+ tt_point += 40;
mes "You now have a total of";
mes tt_point +" Turbo Track Points.";
}
@@ -2265,7 +2265,7 @@ turbo_n_1,114,190,0 duplicate(Flasher#tt_main) Flasher_Exit_2#n1 WARPNPC,1,1
mes "Oh, I'm sorry! You're";
mes "here so that I can tell you";
mes "how many Turbo Track Points";
- set my_point,tt_point;
+ my_point = tt_point;
mes "you have, right? You've got a total of " + my_point + " Turbo Track Points, "+ strcharinfo(0) +".";
}
next;
@@ -2291,7 +2291,7 @@ turbo_n_1,114,190,0 duplicate(Flasher#tt_main) Flasher_Exit_2#n1 WARPNPC,1,1
mes "Right, your reward...";
if (tt_point < 28961) {
mes "40 Turbo Track Points!";
- set tt_point,tt_point+40;
+ tt_point += 40;
mes "You now have a total of";
mes tt_point +" Turbo Track Points.";
}
@@ -2303,7 +2303,7 @@ turbo_n_1,114,190,0 duplicate(Flasher#tt_main) Flasher_Exit_2#n1 WARPNPC,1,1
}
} else {
mes "Oh right, your current";
- set my_point,tt_point;
+ my_point = tt_point;
mes "Turbo Track Point total!";
mes "You've got a total of";
mes my_point + " Turbo Track points,";
@@ -2332,8 +2332,8 @@ turbo_n_1,114,190,0 duplicate(Flasher#tt_main) Flasher_Exit_2#n1 WARPNPC,1,1
mes "Right, your reward...";
mes "40 Turbo Track Points!";
if (tt_point < 28961) {
- set tt_point,tt_point+40;
- set my_point,tt_point;
+ tt_point += 40;
+ my_point = tt_point;
mes "You now have a total of";
mes tt_point +" Turbo Track Points.";
}
@@ -2363,13 +2363,13 @@ turbo_n_1,114,190,0 duplicate(Flasher#tt_main) Flasher_Exit_2#n1 WARPNPC,1,1
}
OnEnable:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
enablenpc "Winner Helper#TBT_"+.@w$;
initnpctimer;
end;
OnTimer4000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
mapannounce strnpcinfo(4),"This is the ending broadcast for Turbo Track "+RName(.@w$)+".",bc_map,"0x33FF66";
end;
@@ -2382,12 +2382,12 @@ OnTimer12000:
end;
OnTimer16000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
if (compare(.@w$,"4")) mapannounce strnpcinfo(4),"Players in the arena must be ready to leave through the Warp Portal.",bc_map,"0x33FF66";
end;
OnTimer20000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
if (compare(.@w$,"4"))
mapannounce strnpcinfo(4),"In the meantime, winners must proceed to receive their rewards as soon as possible.",bc_map,"0x33FF66";
else
@@ -2395,41 +2395,41 @@ OnTimer20000:
end;
OnTimer24000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
if (compare(.@w$,"4")) mapannounce strnpcinfo(4),"Thank you for visiting Al De Baran Turbo Track.",bc_map,"0x33FF66";
end;
OnTimer25000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
if (!compare(.@w$,"4")) mapannounce strnpcinfo(4),"In the meantime, winners must procceed to receive their rewards as soon as possible.",bc_map,"0x33FF66";
end;
OnTimer28000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
if (compare(.@w$,"4")) mapannounce strnpcinfo(4),"Al De Baran Turbo Track is brought to you by...",bc_map,"0x33FF66";
end;
OnTimer30000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
if (!compare(.@w$,"4")) mapannounce strnpcinfo(4),"Thank you for visiting Al De Baran Turbo Track.",bc_map,"0x33FF66";
OnTimer32000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
if (compare(.@w$,"4")) mapannounce strnpcinfo(4),"[Al De Baran Kafra Corporation Headquarters]",bc_map,"0x33FF66";
end;
OnTimer35000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
if (!compare(.@w$,"4")) mapannounce strnpcinfo(4),"Al De Baran Turbo Track is brought to you by...",bc_map,"0x33FF66";
end;
OnTimer36000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
if (compare(.@w$,"4")) mapannounce strnpcinfo(4),"[Al De Baran Guild Castle Management Luina]",bc_map,"0x33FF66";
end;
OnTimer40000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
if (compare(.@w$,"4"))
mapannounce strnpcinfo(4),"[Blacksmith Union]",bc_map,"0x33FF66";
else
@@ -2437,42 +2437,42 @@ OnTimer40000:
end;
OnTimer44000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
if (compare(.@w$,"4")) mapannounce strnpcinfo(4),"And [Comodo Casino].",bc_map,"0x33FF66";
end;
OnTimer45000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
if (!compare(.@w$,"4")) mapannounce strnpcinfo(4),"[Al De Baran Guild Castle Management Luina]",bc_map,"0x33FF66";
end;
OnTimer48000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
if (compare(.@w$,"4")) mapannounce strnpcinfo(4),"Once again, we'd like to thank our sponsors.",bc_map,"0x33FF66";
end;
OnTimer50000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
if (!compare(.@w$,"4")) mapannounce strnpcinfo(4),"[Blacksmith Union]",bc_map,"0x33FF66";
end;
OnTimer52000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
if (compare(.@w$,"4")) mapannounce strnpcinfo(4),"Have a good day.",bc_map,"0x33FF66";
end;
OnTimer55000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
if (!compare(.@w$,"4")) mapannounce strnpcinfo(4),"And [Comodo Casino].",bc_map,"0x33FF66";
end;
OnTimer58000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
if (compare(.@w$,"4")) mapwarp strnpcinfo(4),"turbo_room",72,89;
end;
OnTimer60000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
if (compare(.@w$,"4")) {
enablenpc "Notice_Maker1#TBT_"+.@w$;
enablenpc "Notice_Maker3#TBT_"+.@w$;
@@ -2494,17 +2494,17 @@ OnTimer60000:
end;
OnTimer65000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
if (!compare(.@w$,"4")) mapannounce strnpcinfo(4),"Have a good day.",bc_map,"0x33FF66";
end;
OnTimer70000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
if (!compare(.@w$,"4")) mapwarp strnpcinfo(4),"turbo_room",72,89;
end;
OnTimer71000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
if (!compare(.@w$,"4")) {
disablenpc "Winner Helper#TBT_"+.@w$;
enablenpc "#cos_"+.@w$+"_end";
@@ -2527,13 +2527,13 @@ OnTimer71000:
end;
function RName {
- set .@s,(getstrlen(getarg(0)) > 2)?(substr(getarg(0),1,2)):(charat(getarg(0),getstrlen(getarg(0))-1));
- set .@rn$,((compare(strnpcinfo(4),"_e_"+.@s))?"Expert mode":"Normal mode")+" - "+.@s+" person";
+ .@s = (getstrlen(getarg(0)) > 2)?(substr(getarg(0),1,2)):(charat(getarg(0),getstrlen(getarg(0))-1));
+ .@rn$ = ((compare(strnpcinfo(4),"_e_"+.@s))?"Expert mode":"Normal mode")+" - "+.@s+" person";
return .@rn$;
}
OnInit:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
disablenpc "Winner Helper#TBT_"+.@w$;
end;
}
@@ -2545,19 +2545,19 @@ turbo_n_8,384,167,1 duplicate(WHelper#tt_main) Winner Helper#TBT_n8 1_M_01
turbo_n_16,384,167,1 duplicate(WHelper#tt_main) Winner Helper#TBT_n16 1_M_01
turbo_n_1,384,167,1 script Guide#TBT_n1 1_M_01,{
- set .@hour_start,$@start_time / 10000;
- set .@min_start,(($@start_time % 10000) / 100);
- set .@sec_start,$@start_time % 100;
- set .@hour_end,$@end_time / 10000;
- set .@min_end,(($@end_time % 10000) / 100);
- set .@sec_end,$@end_time % 100;
- if (hour_start == 23 && hour_end == 0) set .@hour_end,24;
- set .@st_to_sec,((.@hour_start * 3600) + (.@min_start * 60) + (.@sec_start));
- set .@et_to_sec,((.@hour_end * 3600) + (.@min_end * 60) + (.@sec_end));
- set .@record_time,(.@et_to_sec - .@st_to_sec);
- set .@record_hour,.@record_time / 3600;
- set .@record_min,((.@record_time % 3600) / 60);
- set .@record_sec,.@record_time % 60;
+ .@hour_start = $@start_time / 10000;
+ .@min_start = (($@start_time % 10000) / 100);
+ .@sec_start = $@start_time % 100;
+ .@hour_end = $@end_time / 10000;
+ .@min_end = (($@end_time % 10000) / 100);
+ .@sec_end = $@end_time % 100;
+ if (hour_start == 23 && hour_end == 0) .@hour_end = 24;
+ .@st_to_sec = ((.@hour_start * 3600) + (.@min_start * 60) + (.@sec_start));
+ .@et_to_sec = ((.@hour_end * 3600) + (.@min_end * 60) + (.@sec_end));
+ .@record_time = (.@et_to_sec - .@st_to_sec);
+ .@record_hour = .@record_time / 3600;
+ .@record_min = ((.@record_time % 3600) / 60);
+ .@record_sec = .@record_time % 60;
if (.@record_min < 0) {
mes "[Guide]";
mes "Good work! Maybe you didn't";
@@ -2570,8 +2570,8 @@ turbo_n_1,384,167,1 script Guide#TBT_n1 1_M_01,{
if (tt_point < 28991) {
mes "You will be rewarded";
mes "with 10 Turbo Track points~!";
- set tt_point,tt_point+10;
- set my_point,tt_point;
+ tt_point += 10;
+ my_point = tt_point;
mes "You now have a total of";
mes tt_point + " Turbo Track points.";
}
@@ -2594,9 +2594,9 @@ turbo_n_1,384,167,1 script Guide#TBT_n1 1_M_01,{
end;
}
else {
- set .@topbun,(($ttranks[0] % 3600) / 60 );
- set .@topcho,$ttranks[0] % 60;
- set .@gap,$ttranks[0] - .@record_time;
+ .@topbun = (($ttranks[0] % 3600) / 60 );
+ .@topcho = $ttranks[0] % 60;
+ .@gap = $ttranks[0] - .@record_time;
if (.@gap < 0) {
mes "[Guide]";
mes "Good work! Maybe you didn't";
@@ -2609,8 +2609,8 @@ turbo_n_1,384,167,1 script Guide#TBT_n1 1_M_01,{
if (tt_point < 28991) {
mes "You will be rewarded";
mes "with 10 Turbo Track points~!";
- set tt_point,tt_point+10;
- set my_point,tt_point;
+ tt_point += 10;
+ my_point = tt_point;
mes "You now have a total of";
mes tt_point + " Turbo Track points.";
}
@@ -2648,7 +2648,7 @@ turbo_n_1,384,167,1 script Guide#TBT_n1 1_M_01,{
mes "a new record, you";
mes "will be rewarded with";
mes "40 Turbo Track Points!";
- set tt_point,tt_point+40;
+ tt_point += 40;
mes "You now have a total of";
mes tt_point + " Turbo Track points.";
}
@@ -2674,7 +2674,7 @@ turbo_n_1,384,167,1 script Guide#TBT_n1 1_M_01,{
}
OnEnable:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
enablenpc "Guide#TBT_"+.@w$;
initnpctimer;
end;
@@ -2736,7 +2736,7 @@ OnTimer56000:
end;
OnTimer60000:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
disablenpc "Guide#TBT_"+.@w$;
enablenpc "#cos_"+.@w$+"_end";
enablenpc "Notice_Maker1#TBT_"+.@w$;
@@ -2754,21 +2754,21 @@ OnTimer60000:
end;
OnInit:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
disablenpc "Guide#TBT_"+.@w$;
end;
}
- script NMaker1#tt_main -1,{
OnTouch:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
mapannounce strnpcinfo(4),strcharinfo(0) +" is now entering the Small Cave! " + strcharinfo(0) +" is now in the lead!",bc_map,"0xFFFF00";
donpcevent "Turbo Track Guide::OnEnd_"+.@w$;
disablenpc "Notice_Maker1#TBT_"+.@w$;
end;
OnInit:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
enablenpc "Notice_Maker1#TBT_"+.@w$;
end;
}
@@ -2782,13 +2782,13 @@ turbo_n_1,11,91,0 duplicate(NMaker1#tt_main) Notice_Maker1#TBT_n1 -1,3,3
- script NMaker3#tt_main -1,{
OnTouch:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
mapannounce strnpcinfo(4),strcharinfo(0) +" is now entering the Single Snail! " + strcharinfo(0) +" is now in the lead!",bc_map,"0xFFFF00";
disablenpc "Notice_Maker3#TBT_"+.@w$;
end;
OnInit:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
enablenpc "Notice_Maker3#TBT_"+.@w$;
end;
}
@@ -2802,13 +2802,13 @@ turbo_n_1,234,223,0 duplicate(NMaker3#tt_main) Notice_Maker3#TBT_n1 -1,3,3
- script NMaker4#tt_main -1,{
OnTouch:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
mapannounce strnpcinfo(4),strcharinfo(0) +" is currently in First Place!",bc_map,"0xFFFF00";
disablenpc "Notice_Maker4#TBT_"+.@w$;
end;
OnInit:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
enablenpc "Notice_Maker4#TBT_"+.@w$;
end;
@@ -2887,7 +2887,7 @@ turbo_n_1,253,364,0 duplicate(warp#tt_main) Warp#n1_7 -1,2,2
end;
OnTouch:
specialeffect EF_BLASTMINEBOMB;
- set .@HitTrap,10;
+ .@HitTrap = 10;
if (.@HitTrap > 0 && .@HitTrap < 4)
percentheal -1,0;
else if (.@HitTrap > 4 && .@HitTrap < 8)
@@ -3524,7 +3524,7 @@ turbo_n_1,368,36,0 duplicate(TurboTrap#tt_main) trap_n1#F95 HIDDEN_WARP_NPC,1,1
end;
OnTouch:
specialeffect EF_FREEZING;
- set .@HitTrap,10;
+ .@HitTrap = 10;
if (.@HitTrap > 0 && .@HitTrap < 4)
percentheal -1,0;
else if (.@HitTrap > 4 && .@HitTrap < 8) {
@@ -3589,8 +3589,8 @@ turbo_n_1,340,55,0 duplicate(TurboTrap_2#tt_main) trap_n1#F48 HIDDEN_WARP_NPC,1,
- script bing_1#tt_main -1,{
end;
OnTouch:
- set .@w$,callfunc("F_tt");
- set .@bing1,rand(1,10);
+ .@w$ = callfunc("F_tt");
+ .@bing1 = rand(1,10);
if (.@bing1 > 0 && .@bing1 < 4)
warp strnpcinfo(4),217,232;
else if (.@bing1 == 6)
@@ -3627,7 +3627,7 @@ OnTouch:
end;
OnInit:
- set .@w$,callfunc("F_tt");
+ .@w$ = callfunc("F_tt");
disablenpc "bing2#"+.@w$;
end;
}
@@ -3735,7 +3735,7 @@ turbo_room,99,120,4 script Turbo Track Guide 4_F_TELEPORTER,{
mes "game mode. Would you like to";
mes "learn more about a certain course?";
next;
- set .@exitloop,1;
+ .@exitloop = 1;
while (.@exitloop) {
switch(select("Log Bridge and Cube Hills:Cursed Desert and Flasher Maze:Single Snail and Invisible Maze:Snake Dice and Small Cave:No, thanks.")) {
case 1:
@@ -3809,7 +3809,7 @@ turbo_room,99,120,4 script Turbo Track Guide 4_F_TELEPORTER,{
mes "best of luck to";
mes "you in the races!";
next;
- set .@exitloop,0;
+ .@exitloop = 0;
}
}
mes "[Turbo Track Guide]";
@@ -4123,7 +4123,7 @@ turbo_room,93,117,5 script Point Exchange Helper 4_M_TELEPORTER,{
close;
}
else {
- set .@total_point,10 * .@input;
+ .@total_point = 10 * .@input;
if (.@total_point > tt_point) {
mes "[Item Exchange Helper]";
mes "I'm sorry, but you do";
@@ -4134,7 +4134,7 @@ turbo_room,93,117,5 script Point Exchange Helper 4_M_TELEPORTER,{
mes "redeeming your points again.";
close;
}
- set tt_point,tt_point-.@total_point;
+ tt_point -= .@total_point;
getitem 7060,.@input; //Warp_Free_Ticket
mes "[Item Exchange Helper]";
mes "Thank you for";
@@ -4152,40 +4152,40 @@ turbo_room,93,117,5 script Point Exchange Helper 4_M_TELEPORTER,{
next;
switch(select("Earth Spike:Cold Bolt:Fire Bolt:Lightning Bolt:Soul Strike:Fire Ball:Fire Wall:Frost Diver:Heal")) {
case 1:
- set .@scroll,687; //Earth_Scroll_1_5
- set .@name$,"Earth Spike";
+ .@scroll = 687; //Earth_Scroll_1_5
+ .@name$ = "Earth Spike";
break;
case 2:
- set .@scroll,689; //Cold_Scroll_1_5
- set .@name$,"Cold Boltl";
+ .@scroll = 689; //Cold_Scroll_1_5
+ .@name$ = "Cold Boltl";
break;
case 3:
- set .@scroll,691; //Fire_Scroll_1_5
- set .@name$,"Fire Bolt";
+ .@scroll = 691; //Fire_Scroll_1_5
+ .@name$ = "Fire Bolt";
break;
case 4:
- set .@scroll,693; //Wind_Scroll_1_5
- set .@name$,"Lightning Bolt";
+ .@scroll = 693; //Wind_Scroll_1_5
+ .@name$ = "Lightning Bolt";
break;
case 5:
- set .@scroll,695; //Ghost_Scroll_1_5
- set .@name$,"Soul Strike";
+ .@scroll = 695; //Ghost_Scroll_1_5
+ .@name$ = "Soul Strike";
break;
case 6:
- set .@scroll,697; //Fire_Scroll_2_5
- set .@name$,"Fire Ball";
+ .@scroll = 697; //Fire_Scroll_2_5
+ .@name$ = "Fire Ball";
break;
case 7:
- set .@scroll,699; //Fire_Scroll_3_5
- set .@name$,"Fire Wall";
+ .@scroll = 699; //Fire_Scroll_3_5
+ .@name$ = "Fire Wall";
break;
case 8:
- set .@scroll,12000; //Cold_Scroll_2_5
- set .@name$,"Frost Diver";
+ .@scroll = 12000; //Cold_Scroll_2_5
+ .@name$ = "Frost Diver";
break;
case 9:
- set .@scroll,12002; //Holy_Scroll_1_5
- set .@name$,"Heal";
+ .@scroll = 12002; //Holy_Scroll_1_5
+ .@name$ = "Heal";
break;
}
mes "[Item Exchange Helper]";
@@ -4211,7 +4211,7 @@ turbo_room,93,117,5 script Point Exchange Helper 4_M_TELEPORTER,{
close;
}
else {
- set .@total_point,12 * .@input;
+ .@total_point = 12 * .@input;
if (.@total_point > tt_point) {
mes "[Item Exchange Helper]";
mes "I'm sorry, but you do";
@@ -4222,7 +4222,7 @@ turbo_room,93,117,5 script Point Exchange Helper 4_M_TELEPORTER,{
mes "redeeming your points again.";
close;
}
- set tt_point,tt_point-.@total_point;
+ tt_point -= .@total_point;
getitem .@scroll,.@input;
mes "[Item Exchange Helper]";
mes "Thank you for";
@@ -4253,7 +4253,7 @@ turbo_room,93,117,5 script Point Exchange Helper 4_M_TELEPORTER,{
close;
}
- set tt_point,tt_point-40;
+ tt_point -= 40;
if (BaseLevel < 70) getexp 3000,0;
else if (BaseLevel < 80) getexp 9000,0;
else if (BaseLevel < 90) getexp 10000,0;
@@ -4296,7 +4296,7 @@ turbo_room,93,117,5 script Point Exchange Helper 4_M_TELEPORTER,{
close;
}
else {
- set .@total_point,150 * .@input;
+ .@total_point = 150 * .@input;
if (.@total_point > tt_point) {
mes "[Item Exchange Helper]";
mes "I'm sorry, but you do";
@@ -4307,7 +4307,7 @@ turbo_room,93,117,5 script Point Exchange Helper 4_M_TELEPORTER,{
mes "redeeming your points again.";
close;
}
- set tt_point,tt_point-.@total_point;
+ tt_point -= .@total_point;
getitem 732,.@input; //Crystal_Jewel__
mes "[Item Exchange Helper]";
mes "Thank you for";
@@ -4343,7 +4343,7 @@ turbo_room,93,117,5 script Point Exchange Helper 4_M_TELEPORTER,{
close;
}
else {
- set .@total_point,300 * .@input;
+ .@total_point = 300 * .@input;
if (.@total_point > tt_point) {
mes "[Item Exchange Helper]";
mes "I'm sorry, but you do";
@@ -4354,7 +4354,7 @@ turbo_room,93,117,5 script Point Exchange Helper 4_M_TELEPORTER,{
mes "redeeming your points again.";
close;
}
- set tt_point,tt_point-.@total_point;
+ tt_point -= .@total_point;
getitem 644,.@input; //Gift_Box
mes "[Item Exchange Helper]";
mes "Thank you for";
@@ -4390,7 +4390,7 @@ turbo_room,93,117,5 script Point Exchange Helper 4_M_TELEPORTER,{
close;
}
else {
- set .@total_point,400 * .@input;
+ .@total_point = 400 * .@input;
if (.@total_point > tt_point) {
mes "[Item Exchange Helper]";
mes "I'm sorry, but you do";
@@ -4401,7 +4401,7 @@ turbo_room,93,117,5 script Point Exchange Helper 4_M_TELEPORTER,{
mes "redeeming your points again.";
close;
}
- set tt_point,tt_point-.@total_point;
+ tt_point -= .@total_point;
getitem 12016,.@input; //Speed_Up_Potion
mes "[Item Exchange Helper]";
mes "Thank you for";
@@ -4503,10 +4503,10 @@ turbo_room,106,117,3 script Point Manager#tt 4_M_ZONDAOYAJI,{
close;
}
else {
- set .@want_point1,10 * .@input;
- set .@want_point,5 * .@input;
- set .@my_turbo_all,tt_point+.@want_point;
- set .@my_arena_all,arena_point-.@want_point1;
+ .@want_point1 = 10 * .@input;
+ .@want_point = 5 * .@input;
+ .@my_turbo_all = tt_point+.@want_point;
+ .@my_arena_all = arena_point-.@want_point1;
if (.@my_turbo_all > 28999) {
mes "[Turbo Track Point Manager]";
mes "Unfortunately, your Turbo Track Points will exceed the maximum limit if we proceed with point conversion. Please spend more";
@@ -4529,8 +4529,8 @@ turbo_room,106,117,3 script Point Manager#tt 4_M_ZONDAOYAJI,{
mes "A total of " + .@want_point1 + " Arena Points";
mes "has been converted into";
mes "" + .@want_point +" Turbo Track Points.";
- set arena_point,.@my_arena_all; //arena_point
- set tt_point,.@my_turbo_all;
+ arena_point = .@my_arena_all; //arena_point
+ tt_point = .@my_turbo_all;
next;
mes "[Turbo Track Point Manager]";
mes "" + strcharinfo(0) + ",";
@@ -4569,8 +4569,8 @@ S_ExchangePoints:
mes "2 Arena Points";
mes "have been converted";
mes "into 1 Turbo Track Point.";
- set arena_point,arena_point-getarg(1);
- set tt_point,tt_point+getarg(2);
+ arena_point -= getarg(1);
+ tt_point += getarg(2);
next;
mes "[Turbo Track Point Manager]";
mes "" + strcharinfo(0) + ",";