summaryrefslogtreecommitdiff
path: root/npc/re/instances
diff options
context:
space:
mode:
Diffstat (limited to 'npc/re/instances')
-rw-r--r--npc/re/instances/BakonawaLake.txt66
-rw-r--r--npc/re/instances/BangungotHospital.txt169
-rw-r--r--npc/re/instances/BuwayaCave.txt44
-rw-r--r--npc/re/instances/HazyForest.txt61
-rw-r--r--npc/re/instances/MalangdoCulvert.txt152
-rw-r--r--npc/re/instances/OctopusCave.txt58
-rw-r--r--npc/re/instances/OldGlastHeim.txt126
-rw-r--r--npc/re/instances/WolfchevLaboratory.txt18
8 files changed, 346 insertions, 348 deletions
diff --git a/npc/re/instances/BakonawaLake.txt b/npc/re/instances/BakonawaLake.txt
index 89ce64ac4..9cf9ea8cd 100644
--- a/npc/re/instances/BakonawaLake.txt
+++ b/npc/re/instances/BakonawaLake.txt
@@ -36,33 +36,33 @@ ma_scene01,174,179,4 script Taho 4_M_DEWZATIMAN,{
close;
}
- set .@party_id,getcharid(1);
- set .@md_name$, "Bakonawa Lake";
+ .@party_id = getcharid(1);
+ .@md_name$ = "Bakonawa Lake";
- set .@baku_time, checkquest(12278,PLAYTIME);
- if (.@baku_time == -1) {
- if (checkquest(12279) == -1) setquest 12279;
+ .@baku_time = questprogress(12278,PLAYTIME);
+ if (!.@baku_time) {
+ if (!questprogress(12279)) setquest 12279;
}
if (!.@party_id) {
mes "[Taho]";
mes "Isn't there any company who can go with you? Or even if you wanna go alone, come after organizing a party.";
close;
}
- if (.@baku_time == -1) {
+ if (!.@baku_time) {
if (getcharid(0) == getpartyleader(.@party_id,2)) {
mes "[Taho]";
mes "Are you the leader of the Bakonawa slayers? The road is not well so we have to go down the cliff with a rope, is that OK?";
next;
- set .@i, select("Please weave a rope.:Now I will go down.:Cancel.");
+ .@i = select("Please weave a rope.:Now I will go down.:Cancel.");
} else {
mes "[Taho]";
mes "You came for slaying Bakonawa. The leader of your party has to help me weaving the rope for going down.";
next;
- set .@i, select(":Now I will go down.:Cancel.");
+ .@i = select(":Now I will go down.:Cancel.");
}
switch(.@i) {
case 1:
- set .@instance,instance_create(.@md_name$,.@party_id);
+ .@instance = instance_create(.@md_name$,.@party_id);
if (.@instance < 0) {
mes "[Taho]";
mes "Oh, the rope got dropped. I have to make a new one.";
@@ -92,7 +92,7 @@ ma_scene01,174,179,4 script Taho 4_M_DEWZATIMAN,{
case 3:
close;
}
- } else if (.@baku_time == 0 || .@baku_time == 1) {
+ } else if (.@baku_time == 1) {
mes "[Taho]";
mes "The rope used for getting to the Lake is already broken. We are now cleaning up the surroundings so come back after some time.";
close;
@@ -111,8 +111,8 @@ sec_in02,26,26,4 script Bakonawa's Rage 4_M_DEWZATIMAN,{
if (callfunc("F_GM_NPC",1854,0) == 1) {
erasequest 12278;
erasequest 12279;
- set malaya_bakona1,7;
- set malaya_bakona2,15;
+ malaya_bakona1 = 7;
+ malaya_bakona2 = 15;
}
close;
}
@@ -157,7 +157,7 @@ OnInstanceInit:
end;
OnStart:
enablenpc instance_npcname("#Bakonawan1");
- set .@map$, instance_mapname("1@ma_b");
+ .@map$ = instance_mapname("1@ma_b");
mapannounce .@map$,"Taho: I can see him there on the surface! ATTACK!!!",bc_map,"0x00ffff"; //FW_NORMAL 15 0 0
monster .@map$,78,81,"Bakonawa",2320,1,instance_npcname("#Bakonawan1")+"::OnMyMobDead"; //original: (78,83)
initnpctimer;
@@ -166,7 +166,7 @@ OnFail:
killmonster instance_mapname("1@ma_b"),instance_npcname("#Bakonawan1")+"::OnMyMobDead";
end;
OnMyMobDead:
- set .@map$, instance_mapname("1@ma_b");
+ .@map$ = instance_mapname("1@ma_b");
if (mobcount(.@map$,instance_npcname("#Bakonawan1")+"::OnMyMobDead") < 1) {
donpcevent instance_npcname("#BakonawaDeadn1")+"::OnStart";
killmonster .@map$,instance_npcname("#Bakonawan1")+"::OnMyMobDead";
@@ -189,7 +189,7 @@ OnTimer570000:
donpcevent instance_npcname("#SummonPuppetsn1")+"::OnStart";
end;
OnTimer600000:
- set .@map$, instance_mapname("1@ma_b");
+ .@map$ = instance_mapname("1@ma_b");
mapannounce .@map$,"Bakonawa has escaped deep into the lake.",bc_map,"0xffff00"; //FW_NORMAL 20 0 0
donpcevent instance_npcname("Taho#Fail")+"::OnStart";
donpcevent instance_npcname("#Bakonawan1")+"::OnFail";
@@ -220,9 +220,9 @@ OnTouch:
OnTimer5000:
setarray .@x[0],79,71,60,61,57,89,95,96,99;
setarray .@y[0],71,72,80,90,99,73,82,90,99;
- set .@map$, instance_mapname("1@ma_b");
- for(set .@i,0; .@i<9; set .@i,.@i+1) {
- set .@rand, rand(1,10);
+ .@map$ = instance_mapname("1@ma_b");
+ for(.@i = 0; .@i<9; ++.@i) {
+ .@rand = rand(1,10);
if (.@rand > 7)
monster .@map$,.@x[.@i],.@y[.@i],"Bakonawa's Will",2337,1,instance_npcname("#SummonPuppetsn1")+"::OnMyMobDead";
else if (.@rand < 4)
@@ -271,8 +271,8 @@ OnInstanceInit:
end;
OnStart:
enablenpc instance_npcname("#Bakonawan2");
- set .@label$, instance_npcname("#Bakonawan2")+"::OnMyMobDead";
- set .@map$, instance_mapname("1@ma_b");
+ .@label$ = instance_npcname("#Bakonawan2")+"::OnMyMobDead";
+ .@map$ = instance_mapname("1@ma_b");
monster .@map$,95,98,"Caldron",2328,1,.@label$;
monster .@map$,60,98,"Caldron",2328,1,.@label$;
monster .@map$,97,104,"Gong",2328,1,.@label$;
@@ -281,8 +281,8 @@ OnStart:
initnpctimer;
end;
OnMyMobDead:
- set .@map$, instance_mapname("1@ma_b");
- set .@mob_dead_num, mobcount(.@map$,instance_npcname("#Bakonawan2")+"::OnMyMobDead");
+ .@map$ = instance_mapname("1@ma_b");
+ .@mob_dead_num = mobcount(.@map$,instance_npcname("#Bakonawan2")+"::OnMyMobDead");
if (.@mob_dead_num < 1) {
donpcevent instance_npcname("#Bakonawan2-1")+"::OnEnd";
stopnpctimer;
@@ -304,7 +304,7 @@ OnTimer297000: callsub OnAnnounce,"3 seconds",18,0;
OnTimer298000: callsub OnAnnounce,"2 seconds",19,0;
OnTimer299000: callsub OnAnnounce,"1 second",20,0;
OnTimer300000:
- set .@map$, instance_mapname("1@ma_b");
+ .@map$ = instance_mapname("1@ma_b");
mapannounce .@map$,"Bakonawa has escaped deep into the lake.",bc_map,"0xffff00"; //FW_NORMAL 20 0 0
donpcevent instance_npcname("Taho#Fail")+"::OnStart";
donpcevent instance_npcname("#Bakonawan2-1")+"::OnFail";
@@ -363,8 +363,8 @@ OnStart:
donpcevent instance_npcname("#Bakonawan3-1")+"::OnStart";
end;
OnMyMobDead:
- set .@map$, instance_mapname("1@ma_b");
- set .@mob_dead_num, mobcount(.@map$,instance_npcname("#Bakonawan3")+"::OnMyMobDead");
+ .@map$ = instance_mapname("1@ma_b");
+ .@mob_dead_num = mobcount(.@map$,instance_npcname("#Bakonawan3")+"::OnMyMobDead");
if (.@mob_dead_num < 1) {
mapannounce .@map$,"Taho: We got him! I can see he has threw up something that looks like a box.",bc_map,"0x00ffff"; //FW_NORMAL 15 0 0
donpcevent instance_npcname("Taho#Completed")+"::OnStart";
@@ -397,7 +397,7 @@ OnTimer597000: callsub OnAnnounce,"3 seconds",18,0;
OnTimer598000: callsub OnAnnounce,"2 seconds",19,0;
OnTimer599000: callsub OnAnnounce,"1 second",20,0;
OnTimer600000:
- set .@map$, instance_mapname("1@ma_b");
+ .@map$ = instance_mapname("1@ma_b");
mapannounce .@map$,"Bakonawa has escaped deep into the lake.",bc_map,"0xffff00"; //FW_NORMAL 20 0 0
donpcevent instance_npcname("Taho#Fail")+"::OnStart";
killmonster .@map$,instance_npcname("#Bakonawan3")+"::OnMyMobDead";
@@ -440,17 +440,17 @@ OnTimer600000:
stopnpctimer;
end;
OnMobSpawn:
- set .@label$, instance_npcname("#Bakonawan3-1")+"::OnMyMobDead";
- set .@map$, instance_mapname("1@ma_b");
+ .@label$ = instance_npcname("#Bakonawan3-1")+"::OnMyMobDead";
+ .@map$ = instance_mapname("1@ma_b");
killmonster .@map$,.@label$;
- set .@mob_dead_num, mobcount(.@map$,.@label$);
+ .@mob_dead_num = mobcount(.@map$,.@label$);
if (.@mob_dead_num < 50) {
- set .@mob_rg, 50 - .@mob_dead_num;
+ .@mob_rg = 50 - .@mob_dead_num;
if (.@mob_rg > getarg(0))
- set .@mob_rg, getarg(0);
+ .@mob_rg = getarg(0);
while(1) {
areamonster .@map$,74,74,82,74,"Bakonawa's Puppet",2334,1,.@label$;
- set .@mob_dead_num, mobcount(.@map$,.@label$);
+ .@mob_dead_num = mobcount(.@map$,.@label$);
if (.@mob_dead_num >= .@mob_rg) {
break;
}
@@ -469,7 +469,7 @@ OnMobSpawn:
mes "It seems you are already carrying items of too much weight. Please try again after reducing the weight.";
close;
}
- if (checkquest(12279,HUNTING) == 2) {
+ if (questprogress(12279,HUNTING) == 2) {
erasequest 12279;
mes "[Taho]";
mes "This was found from Bakonawa's corpse. It would be better if you take this.";
diff --git a/npc/re/instances/BangungotHospital.txt b/npc/re/instances/BangungotHospital.txt
index b995092a1..911abfced 100644
--- a/npc/re/instances/BangungotHospital.txt
+++ b/npc/re/instances/BangungotHospital.txt
@@ -21,11 +21,11 @@
ma_dun01,147,10,5 script Nurse#ma_dun01 4_F_NURSE,{
if (BaseLevel < 100) end;
- set .@party_id,getcharid(1);
+ .@party_id = getcharid(1);
cutin "malaya_nurseB",2;
- if (checkquest(9223) == -1) {
- set .@quest, checkquest(9222);
- if (.@quest == -1) {
+ if (!questprogress(9223)) {
+ .@quest = questprogress(9222);
+ if (!.@quest) {
if (!.@party_id) {
if (malaya_bang == 30)
callsub L_Closed,1;
@@ -34,9 +34,9 @@ ma_dun01,147,10,5 script Nurse#ma_dun01 4_F_NURSE,{
else
goto L_NoParty;
}
- if (checkquest(11309,HUNTING) < 2) {
- set .@playtime, checkquest(9224,PLAYTIME);
- if (.@playtime == -1) {
+ if (questprogress(11309,HUNTING) != 2) {
+ .@playtime = questprogress(9224,PLAYTIME);
+ if (!.@playtime) {
if (malaya_bang == 30)
callsub L_Closed,1;
else if (malaya_bang == 31)
@@ -50,8 +50,8 @@ ma_dun01,147,10,5 script Nurse#ma_dun01 4_F_NURSE,{
cutin "",255;
end;
}
- } else if (.@playtime == 0 || .@playtime == 1) {
- if (checkquest(11309) == -1) {
+ } else if (.@playtime == 1) {
+ if (!questprogress(11309)) {
mes "[Nurse Maenne]";
mes "This is a fatal situation.";
close2;
@@ -73,10 +73,10 @@ ma_dun01,147,10,5 script Nurse#ma_dun01 4_F_NURSE,{
end;
}
} else {
- set .@quest2, checkquest(11309);
- if (.@quest2 == -1) {
+ .@quest2 = questprogress(11309);
+ if (!.@quest2) {
callsub L_Closed,0;
- } else if (.@quest2 == 0 || .@quest2 == 1) {
+ } else if (.@quest2 == 1) {
callsub L_Complete;
completequest 9224;
erasequest 9224;
@@ -105,13 +105,12 @@ ma_dun01,147,10,5 script Nurse#ma_dun01 4_F_NURSE,{
cutin "",255;
end;
}
- } else if (.@quest == 0 || .@quest == 1) {
+ } else if (.@quest == 1) {
if (!.@party_id) goto L_NoParty;
if (malaya_bang > 39) {
- set .@hunting, checkquest(9222,HUNTING);
- if (.@hunting == 0 || .@hunting == 1) {
- set .@playtime, checkquest(9224,PLAYTIME);
- if (.@playtime == 0 || .@playtime == 1) {
+ if (questprogress(9222,HUNTING) == 1) {
+ .@playtime = questprogress(9224,PLAYTIME);
+ if (.@playtime == 1) {
mes "[Nurse Maenne]";
mes "Do you want go up to the second floor again?";
next;
@@ -190,7 +189,7 @@ ma_dun01,147,10,5 script Nurse#ma_dun01 4_F_NURSE,{
end;
}
} else {
- if (checkquest(9223,PLAYTIME) == 0 || checkquest(9223,PLAYTIME) == 1) {
+ if (questprogress(9223,PLAYTIME) == 1) {
callsub L_Complete;
close2;
cutin "",255;
@@ -216,7 +215,7 @@ L_Closed:
mes "I call her behind, but";
mes "she doesn't respond. -";
if (getarg(0)) {
- set malaya_bang,31;
+ malaya_bang = 31;
changequest 11302,11303;
}
close2;
@@ -233,7 +232,7 @@ L_NoParty:
end;
L_Enter:
- set .@md_name$,"Bangungot Hospital 2F";
+ .@md_name$ = "Bangungot Hospital 2F";
if (getarg(2) == 0) {
mes "[Nurse Maenne]";
mes "I already heard that story so";
@@ -258,7 +257,7 @@ L_Enter:
next;
switch(select(((getarg(0))?"Prepare to enter the second floor.":"")+":Enter the second floor.:Do not enter.")) {
case 1:
- set .@instance, instance_create(.@md_name$,getcharid(1));
+ .@instance = instance_create(.@md_name$,getcharid(1));
if (.@instance < 0) {
mes "[Nurse Maenne]";
mes "A critical situation has happened.";
@@ -297,13 +296,13 @@ L_Enter:
} else {
mapannounce "ma_dun01", getpartyname(getcharid(1))+" party's "+strcharinfo(0)+" member entered "+.@md_name$+".",bc_map,"0x00ff99";
if (getarg(1)) {
- if (checkquest(9223) > -1) {
+ if (questprogress(9223)) {
completequest 9223;
erasequest 9223;
}
- if (checkquest(9222) > -1)
+ if (questprogress(9222))
erasequest 9222;
- if (checkquest(9224) > -1)
+ if (questprogress(9224))
erasequest 9224;
setquest 9222;
}
@@ -352,8 +351,8 @@ sec_in02,27,30,0 script Bangungot Gate 2_MONEMUS,{
case 4: erasequest 9223; close;
case 5: setquest 9224; close;
case 6: erasequest 9224; close;
- case 7: set malaya_bang,30; close;
- case 8: set malaya_bang,40; close;
+ case 7: malaya_bang = 30; close;
+ case 8: malaya_bang = 40; close;
case 9: setquest 11309; close;
case 10: completequest 11309; close;
case 11: close;
@@ -365,7 +364,7 @@ sec_in02,27,30,0 script Bangungot Gate 2_MONEMUS,{
1@ma_h,43,157,0 script #Memorial Start HIDDEN_WARP_NPC,2,2,{
end;
OnTouch:
- set .@map$, instance_mapname("1@ma_h");
+ .@map$ = instance_mapname("1@ma_h");
mapannounce .@map$,"Bangungot: You silly "+strcharinfo(0)+" ....",bc_map,"0xFF82FF";
mapannounce .@map$,"Bangungot: Get out before you die...",bc_map,"0xFF82FF";
areamonster .@map$,44,156,46,158,"Bangungot's Mangkukulam",2339,1,instance_npcname("#Memorial Start")+"::OnMyMobDead";
@@ -375,7 +374,7 @@ OnMyMobDead:
initnpctimer;
end;
OnTimer1000:
- set .@map$, instance_mapname("1@ma_h");
+ .@map$ = instance_mapname("1@ma_h");
if (mobcount(.@map$,instance_npcname("#Memorial Start")+"::OnMyMobDead") < 1) {
donpcevent instance_npcname("#Ward1 Entry")+"::OnEnable1";
donpcevent instance_npcname("#Memorial Start_time")+"::OnDisable";
@@ -413,8 +412,8 @@ OnInstanceInit:
disablenpc instance_npcname(strnpcinfo(0));
end;
OnEnable1:
- set .@map$, instance_mapname("1@ma_h");
- set .@label$, instance_npcname(strnpcinfo(0))+"::OnMyMobDead";
+ .@map$ = instance_mapname("1@ma_h");
+ .@label$ = instance_npcname(strnpcinfo(0))+"::OnMyMobDead";
enablenpc instance_npcname(strnpcinfo(0));
specialeffect EF_BAT2;
switch(atoi(charat(strnpcinfo(2),4))) {
@@ -450,7 +449,7 @@ OnEnable2:
end;
*/
OnEnable3:
- set .@i, atoi(charat(strnpcinfo(2),4))+1;
+ .@i = atoi(charat(strnpcinfo(2),4))+1;
donpcevent instance_npcname("#Ward"+.@i+" Entry")+"::OnEnable1";
disablenpc instance_npcname(strnpcinfo(0));
end;
@@ -458,16 +457,16 @@ OnMyMobDead:
initnpctimer;
end;
OnTimer1000:
- set .@map$, instance_mapname("1@ma_h");
+ .@map$ = instance_mapname("1@ma_h");
if (mobcount(.@map$,instance_npcname(strnpcinfo(0))+"::OnMyMobDead") < 1) {
specialeffect EF_BAT2;
donpcevent instance_npcname(strnpcinfo(0))+"::OnEnable3";
switch(atoi(charat(strnpcinfo(2),4))) {
- case 1: set .@str$,"Bangungot: I will let you see the pain and the agony actually be real....."; break;
- case 2: set .@str$,"Bangungot: Diseased spirits are the source of my energy, and my life..."; break;
- case 3: set .@str$,"Bangungot: Scream more....and more...... your pain..."; break;
- case 4: set .@str$,"Bangungot: Deeply and more deeply in pain..."; break;
- case 5: set .@str$,"Bangungot: Be horrified...be petrified."; break;
+ case 1: .@str$ = "Bangungot: I will let you see the pain and the agony actually be real....."; break;
+ case 2: .@str$ = "Bangungot: Diseased spirits are the source of my energy, and my life..."; break;
+ case 3: .@str$ = "Bangungot: Scream more....and more...... your pain..."; break;
+ case 4: .@str$ = "Bangungot: Deeply and more deeply in pain..."; break;
+ case 5: .@str$ = "Bangungot: Be horrified...be petrified."; break;
}
mapannounce .@map$,.@str$,bc_map,"0xFF82FF";
}
@@ -485,8 +484,8 @@ OnInstanceInit:
disablenpc instance_npcname("#Ward6 Entry");
end;
OnEnable1:
- set .@map$, instance_mapname("1@ma_h");
- set .@label$, instance_npcname("#Ward6 Entry")+"::OnMyMobDead";
+ .@map$ = instance_mapname("1@ma_h");
+ .@label$ = instance_npcname("#Ward6 Entry")+"::OnMyMobDead";
enablenpc instance_npcname("#Ward6 Entry");
specialeffect EF_BAT2;
areamonster .@map$,93,137,95,139,"Bangungot's Mangkukulam",2339,1,.@label$;
@@ -505,7 +504,7 @@ OnMyMobDead:
initnpctimer;
end;
OnTimer3000:
- set .@map$, instance_mapname("1@ma_h");
+ .@map$ = instance_mapname("1@ma_h");
if (mobcount(.@map$,instance_npcname("#Ward6 Entry")+"::OnMyMobDead") < 1) {
specialeffect EF_BAT2;
donpcevent instance_npcname("#Summon Boss")+"::OnEnable";
@@ -564,7 +563,7 @@ OnMyMobDead:
initnpctimer;
end;
OnTimer1000:
- set .@map$, instance_mapname("1@ma_h");
+ .@map$ = instance_mapname("1@ma_h");
if (mobcount(.@map$,instance_npcname("#Boss Room Entry")+"::OnMyMobDead") < 1)
mapannounce .@map$,"Bangungot: HAHAHAH... That's not enough, I will be even stronger....",bc_map,"0xFF82FF";
stopnpctimer;
@@ -606,12 +605,12 @@ OnEnable:
end;
OnTimer25000:
mapannounce instance_mapname("1@ma_h"),"Bangungot: You will know what it is...",bc_map,"0xFF82FF";
- for(set .@i,10; .@i<=22; set .@i,.@i+1)
+ for(.@i = 10; .@i<=22; ++.@i)
disablenpc instance_npcname("#Patternwarp"+.@i);
end;
OnTimer35000:
mapannounce instance_mapname("1@ma_h"),"Bangungot: Real pain! You will know!!",bc_map,"0xFF82FF";
- for(set .@i,25; .@i<=33; set .@i,.@i+1)
+ for(.@i = 25; .@i<=33; ++.@i)
disablenpc instance_npcname("#Patternwarp"+.@i);
end;
OnTimer45000:
@@ -623,13 +622,13 @@ OnTimer55000:
donpcevent instance_npcname("#Summon Ward Mob")+"::OnEnable7";
end;
OnTimer60000:
- for(set .@i,1; .@i<=8; set .@i,.@i+1)
+ for(.@i = 1; .@i<=8; ++.@i)
enablenpc instance_npcname("#Patternwarp"+.@i);
- for(set .@i,34; .@i<=38; set .@i,.@i+1)
+ for(.@i = 34; .@i<=38; ++.@i)
enablenpc instance_npcname("#Patternwarp"+.@i);
end;
OnTimer60500:
- for(set .@i,41; .@i<=49; set .@i,.@i+1)
+ for(.@i = 41; .@i<=49; ++.@i)
enablenpc instance_npcname("#Patternwarp"+.@i);
end;
OnTimer90000:
@@ -644,13 +643,13 @@ OnTimer125000:
mapannounce instance_mapname("1@ma_h"),"Bangungot: You wanna hang out with me ......?",bc_map,"0xFF82FF";
end;
OnTimer128000:
- for(set .@i,1; .@i<=8; set .@i,.@i+1)
+ for(.@i = 1; .@i<=8; ++.@i)
disablenpc instance_npcname("#Patternwarp"+.@i);
- for(set .@i,34; .@i<=38; set .@i,.@i+1)
+ for(.@i = 34; .@i<=38; ++.@i)
disablenpc instance_npcname("#Patternwarp"+.@i);
end;
OnTimer128500:
- for(set .@i,41; .@i<=49; set .@i,.@i+1)
+ for(.@i = 41; .@i<=49; ++.@i)
disablenpc instance_npcname("#Patternwarp"+.@i);
end;
OnTimer129000:
@@ -658,11 +657,11 @@ OnTimer129000:
end;
OnTimer129500:
donpcevent instance_npcname("#Boss Room Entry")+"::OnSpawn";
- for(set .@i,10; .@i<=22; set .@i,.@i+1)
+ for(.@i = 10; .@i<=22; ++.@i)
enablenpc instance_npcname("#Patternwarp"+.@i);
end;
OnTimer130000:
- for(set .@i,25; .@i<=33; set .@i,.@i+1)
+ for(.@i = 25; .@i<=33; ++.@i)
enablenpc instance_npcname("#Patternwarp"+.@i);
stopnpctimer;
end;
@@ -687,22 +686,22 @@ OnTimer6000:
mapannounce instance_mapname("1@ma_h"),"Bangungot: ...defeat me again...?",bc_map,"0xFF82FF";
end;
OnTimer9000:
- for(set .@i,1; .@i<=8; set .@i,.@i+1)
+ for(.@i = 1; .@i<=8; ++.@i)
disablenpc instance_npcname("#Patternwarp"+.@i);
- for(set .@i,34; .@i<=38; set .@i,.@i+1)
+ for(.@i = 34; .@i<=38; ++.@i)
disablenpc instance_npcname("#Patternwarp"+.@i);
end;
OnTimer9500:
- for(set .@i,41; .@i<=49; set .@i,.@i+1)
+ for(.@i = 41; .@i<=49; ++.@i)
disablenpc instance_npcname("#Patternwarp"+.@i);
end;
OnTimer10000:
mapannounce instance_mapname("1@ma_h"),"Bangungot: You stupid persoon....",bc_map,"0xFF82FF";
- for(set .@i,10; .@i<=22; set .@i,.@i+1)
+ for(.@i = 10; .@i<=22; ++.@i)
enablenpc instance_npcname("#Patternwarp"+.@i);
end;
OnTimer10500:
- for(set .@i,25; .@i<=33; set .@i,.@i+1)
+ for(.@i = 25; .@i<=33; ++.@i)
enablenpc instance_npcname("#Patternwarp"+.@i);
stopnpctimer;
end;
@@ -718,8 +717,8 @@ OnTouch:
specialeffect EF_CURSEATTACK;
end;
OnEnable1:
- set .@map$, instance_mapname("1@ma_h");
- set .@label$, instance_npcname("#Summon Ward Mob")+"::OnMyMobDead";
+ .@map$ = instance_mapname("1@ma_h");
+ .@label$ = instance_npcname("#Summon Ward Mob")+"::OnMyMobDead";
areamonster .@map$,47,77,49,79,"Bangungot's Tiyanak",2340,1,.@label$;
areamonster .@map$,49,77,51,79,"Bangungot's Tiyanak",2340,1,.@label$;
areamonster .@map$,51,77,53,79,"Bangungot's Tiyanak",2340,1,.@label$;
@@ -729,8 +728,8 @@ OnEnable1:
areamonster .@map$,49,81,51,83,"Bangungot's Tiyanak",2339,1,.@label$;
end;
OnEnable2:
- set .@map$, instance_mapname("1@ma_h");
- set .@label$, instance_npcname("#Summon Ward Mob")+"::OnMyMobDead";
+ .@map$ = instance_mapname("1@ma_h");
+ .@label$ = instance_npcname("#Summon Ward Mob")+"::OnMyMobDead";
areamonster .@map$,51,45,53,47,"Bangungot's Tiyanak",2339,1,.@label$;
areamonster .@map$,53,45,55,47,"Bangungot's Tiyanak",2339,1,.@label$;
areamonster .@map$,49,47,51,49,"Bangungot's Mangkukulam",2339,1,.@label$;
@@ -740,8 +739,8 @@ OnEnable2:
areamonster .@map$,53,49,55,51,"Bangungot's Tiyanak",2340,1,.@label$;
end;
OnEnable3:
- set .@map$, instance_mapname("1@ma_h");
- set .@label$, instance_npcname("#Summon Ward Mob")+"::OnMyMobDead";
+ .@map$ = instance_mapname("1@ma_h");
+ .@label$ = instance_npcname("#Summon Ward Mob")+"::OnMyMobDead";
areamonster .@map$,69,75,71,77,"Bangungot's Tiyanak",2340,1,.@label$;
areamonster .@map$,71,75,73,77,"Bangungot's Tiyanak",2340,1,.@label$;
areamonster .@map$,73,75,75,77,"Bangungot's Tiyanak",2340,1,.@label$;
@@ -751,8 +750,8 @@ OnEnable3:
areamonster .@map$,71,79,73,81,"Bangungot's Tiyanak",2339,1,.@label$;
end;
OnEnable4:
- set .@map$, instance_mapname("1@ma_h");
- set .@label$, instance_npcname("#Summon Ward Mob")+"::OnMyMobDead";
+ .@map$ = instance_mapname("1@ma_h");
+ .@label$ = instance_npcname("#Summon Ward Mob")+"::OnMyMobDead";
areamonster .@map$,73,45,75,47,"Bangungot's Tiyanak",2339,1,.@label$;
areamonster .@map$,75,45,77,47,"Bangungot's Tiyanak",2339,1,.@label$;
areamonster .@map$,71,47,73,49,"Bangungot's Mangkukulam",2339,1,.@label$;
@@ -762,8 +761,8 @@ OnEnable4:
areamonster .@map$,75,49,77,51,"Bangungot's Tiyanak",2340,1,.@label$;
end;
OnEnable5:
- set .@map$, instance_mapname("1@ma_h");
- set .@label$, instance_npcname("#Summon Ward Mob")+"::OnMyMobDead";
+ .@map$ = instance_mapname("1@ma_h");
+ .@label$ = instance_npcname("#Summon Ward Mob")+"::OnMyMobDead";
areamonster .@map$,93,77,95,79,"Bangungot's Tiyanak",2340,1,.@label$;
areamonster .@map$,95,77,97,79,"Bangungot's Tiyanak",2340,1,.@label$;
areamonster .@map$,97,77,99,79,"Bangungot's Tiyanak",2340,1,.@label$;
@@ -773,8 +772,8 @@ OnEnable5:
areamonster .@map$,95,81,97,83,"Bangungot's Tiyanak",2339,1,.@label$;
end;
OnEnable6:
- set .@map$, instance_mapname("1@ma_h");
- set .@label$, instance_npcname("#Summon Ward Mob")+"::OnMyMobDead";
+ .@map$ = instance_mapname("1@ma_h");
+ .@label$ = instance_npcname("#Summon Ward Mob")+"::OnMyMobDead";
areamonster .@map$,93,43,95,45,"Bangungot's Tiyanak",2339,1,.@label$;
areamonster .@map$,95,43,97,45,"Bangungot's Tiyanak",2339,1,.@label$;
areamonster .@map$,91,45,93,47,"Bangungot's Mangkukulam",2339,1,.@label$;
@@ -822,9 +821,9 @@ OnTimer10000:
"Moaning Patient","Screaming Patient","Patient in Pain","Passed Out Patient","Patient with Nightmare","Sick Looking Patient",
"Horrified Patient","Patient in Sorrow","Suffering Patient","Wriggling Patient","Patient in Cold Sweat","Howling Patient";
enablenpc instance_npcname("#Summon Ward Mob");
- set .@rand, rand(1,6);
+ .@rand = rand(1,6);
donpcevent instance_npcname("#Summon Ward Mob")+"::OnEnable"+.@rand;
- set .@id, (.@rand*2)-rand(2);
+ .@id = (.@rand*2)-rand(2);
donpcevent instance_npcname(.@npc$[.@id]+"#"+.@id)+"::OnEnable";
stopnpctimer;
end;
@@ -852,7 +851,7 @@ OnMyMobDead:
initnpctimer;
end;
OnTimer1000:
- set .@map$, instance_mapname("1@ma_h");
+ .@map$ = instance_mapname("1@ma_h");
if (mobcount(.@map$,instance_npcname("#Summon Pillar")+"::OnMyMobDead") < 1) {
donpcevent instance_npcname("#Summon Pillar_time")+"::OnStopTimer";
donpcevent instance_npcname("#Summon Pillar")+"::OnEnable3";
@@ -969,17 +968,17 @@ OnTimer30000:
end;
OnEnable:
switch(atoi(strnpcinfo(2))) {
- case 2: set .@str$,"Screaming Patient: Aaaaargh!!"; break;
- case 3: set .@str$,"Patient in Pain: Oooooowwww!! It's killing me!!!"; break;
- case 4: set .@str$,"Passed Out Patient: ........"; break;
- case 5: set .@str$,"Patient with Nightmare: Help~!!! Save me!!!"; break;
- case 6: set .@str$,"Sick Looking Patient: Hu..a...aaah.."; break;
- case 7: set .@str$,"Horrified Patient: Get away!! Please...."; break;
- case 8: set .@str$,"Patient in Sorrow: crying and crying......"; break;
- case 9: set .@str$,"Suffering Patient: Stop... please..."; break;
- case 10: set .@str$,"Wriggling Patient: awwww..."; break;
- case 11: set .@str$,"Patient in Cold Sweat: Help.....help...."; break;
- case 12: set .@str$,"Howling Patient: aaaaahhhhhhhhhh!!"; break;
+ case 2: .@str$ = "Screaming Patient: Aaaaargh!!"; break;
+ case 3: .@str$ = "Patient in Pain: Oooooowwww!! It's killing me!!!"; break;
+ case 4: .@str$ = "Passed Out Patient: ........"; break;
+ case 5: .@str$ = "Patient with Nightmare: Help~!!! Save me!!!"; break;
+ case 6: .@str$ = "Sick Looking Patient: Hu..a...aaah.."; break;
+ case 7: .@str$ = "Horrified Patient: Get away!! Please...."; break;
+ case 8: .@str$ = "Patient in Sorrow: crying and crying......"; break;
+ case 9: .@str$ = "Suffering Patient: Stop... please..."; break;
+ case 10: .@str$ = "Wriggling Patient: awwww..."; break;
+ case 11: .@str$ = "Patient in Cold Sweat: Help.....help...."; break;
+ case 12: .@str$ = "Howling Patient: aaaaahhhhhhhhhh!!"; break;
}
mapannounce instance_mapname("1@ma_h"),.@str$,bc_map,"0xFF0000";
initnpctimer;
@@ -1089,12 +1088,12 @@ OnInstanceInit:
disablenpc instance_npcname("#Boss Room Exit");
disablenpc instance_npcname("#Boss Room Door");
disablenpc instance_npcname("#Boss Room Door1");
- for(set .@i,1; .@i<=8; set .@i,.@i+1)
+ for(.@i = 1; .@i<=8; ++.@i)
disablenpc instance_npcname("#Patternwarp"+.@i);
- for(set .@i,34; .@i<=38; set .@i,.@i+1)
+ for(.@i = 34; .@i<=38; ++.@i)
disablenpc instance_npcname("#Patternwarp"+.@i);
// Skip 39-40 since they're disabled in the official script.
- for(set .@i,41; .@i<=49; set .@i,.@i+1)
+ for(.@i = 41; .@i<=49; ++.@i)
disablenpc instance_npcname("#Patternwarp"+.@i);
disablenpc instance_npcname("#ma_hos_warp_init");
end;
diff --git a/npc/re/instances/BuwayaCave.txt b/npc/re/instances/BuwayaCave.txt
index 0a26dab9c..2333a2428 100644
--- a/npc/re/instances/BuwayaCave.txt
+++ b/npc/re/instances/BuwayaCave.txt
@@ -23,8 +23,8 @@ ma_fild02,312,317,5 script Guard#buwaya_cave 4_MAL_SOLDIER,{
close;
}
- set .@party_id,getcharid(1);
- set .@md_name$,"Buwaya Cave";
+ .@party_id = getcharid(1);
+ .@md_name$ = "Buwaya Cave";
if (!.@party_id) {
mes "[Guard]";
@@ -60,10 +60,10 @@ ma_fild02,312,317,5 script Guard#buwaya_cave 4_MAL_SOLDIER,{
next;
break;
case 2:
- set .@playtime, checkquest(4229,PLAYTIME);
- if (.@playtime == -1) {
+ .@playtime = questprogress(4229,PLAYTIME);
+ if (!.@playtime) {
// fall through
- } else if (.@playtime == 0 || .@playtime == 1) {
+ } else if (.@playtime == 1) {
mes "[Guard]";
mes "Buwaya is still hiding.";
mes "Even if you enter now, Buwaya will not come out. ";
@@ -73,7 +73,7 @@ ma_fild02,312,317,5 script Guard#buwaya_cave 4_MAL_SOLDIER,{
erasequest 4229;
// fall through
}
- set .@instance,instance_create(.@md_name$,.@party_id);
+ .@instance = instance_create(.@md_name$,.@party_id);
if (.@instance < 0) {
mes "[Guard]";
mes "Party name is... "+getpartyname(.@party_id)+".";;
@@ -118,10 +118,10 @@ OnTouch:
mes "This place is dangerous. Please go back.";
close;
}
- set .@playtime, checkquest(4229,PLAYTIME);
- if (.@playtime == -1) {
+ .@playtime = questprogress(4229,PLAYTIME);
+ if (!.@playtime) {
// fall through
- } else if (.@playtime == 0 || .@playtime == 1) {
+ } else if (.@playtime == 1) {
mes "[Guard]";
mes "Buwaya is still hiding.";
mes "Even if you enter now, Buwaya will not come out.";
@@ -247,8 +247,8 @@ OnInstanceInit:
end;
OnEnable:
enablenpc instance_npcname("#box_mob_call");
- set .@label$, instance_npcname("#box_mob_call")+"::OnMyMobDead";
- set .@map$, instance_mapname("1@ma_c");
+ .@label$ = instance_npcname("#box_mob_call")+"::OnMyMobDead";
+ .@map$ = instance_mapname("1@ma_c");
monster .@map$,30,118,"Buwaya's Weakness",2333,1,.@label$;
monster .@map$,35,118,"Buwaya's Weakness",2333,1,.@label$;
end;
@@ -271,8 +271,8 @@ OnEnable:
enablenpc instance_npcname("#box_out");
end;
OnTouch:
- set .@x, rand(1,20) + 97;
- set .@y, rand(1,20) + 74;
+ .@x = rand(1,20) + 97;
+ .@y = rand(1,20) + 74;
warp instance_mapname("1@ma_c"),.@x,.@y;
end;
}
@@ -286,7 +286,7 @@ OnInstanceInit:
OnTimer30000:
mapannounce instance_mapname("1@ma_c"),"Buwaya : I will put you in my treasure box!",bc_map,"0x00ff99"; //FW_NORMAL 12 0 0
// Should execute OnTimer33000, but client doesn't render the effect fast enough.
- for(set .@i,1; .@i<=9; set .@i,.@i+1)
+ for(.@i = 1; .@i<=9; ++.@i)
donpcevent instance_npcname("#yunobi"+.@i)+"::OnEnable";
end;
OnTimer33000:
@@ -352,8 +352,8 @@ OnTimer64000:
mapannounce instance_mapname("1@ma_c"),"Buwaya : This is...MY...Deadly... ATTACK!",bc_map,"0x00ff99"; //FW_NORMAL 12 0 0
end;
OnTimer65000:
- set .@label$, instance_npcname("#bunshin")+"::OnMyMobDead";
- set .@map$, instance_mapname("1@ma_c");
+ .@label$ = instance_npcname("#bunshin")+"::OnMyMobDead";
+ .@map$ = instance_mapname("1@ma_c");
areamonster .@map$,112,89,122,99,"Buwaya",2332,1,.@label$;
areamonster .@map$,112,49,122,59,"Buwaya",2332,1,.@label$;
areamonster .@map$,72,49,82,59,"Buwaya",2332,1,.@label$;
@@ -386,7 +386,7 @@ OnInstanceInit:
areamonster instance_mapname("1@ma_c"),90,67,104,81,"Buwaya",2319,1,instance_npcname("#buwaya_con")+"::OnMyMobDead";
end;
OnMyMobDead:
- set .@map$, instance_mapname("1@ma_c");
+ .@map$ = instance_mapname("1@ma_c");
if (mobcount(.@map$,instance_npcname("#buwaya_con")+"::OnMyMobDead") < 1) {
donpcevent instance_npcname("#box_call")+"::OnDisable";
donpcevent instance_npcname("#bunshin")+"::OnDisable";
@@ -403,12 +403,12 @@ OnInstanceInit:
initnpctimer;
end;
OnTimer60000:
- set .@label$, instance_npcname("#exit_mob")+"::OnMyMobDead";
- set .@map$, instance_mapname("1@ma_c");
+ .@label$ = instance_npcname("#exit_mob")+"::OnMyMobDead";
+ .@map$ = instance_mapname("1@ma_c");
if (mobcount(.@map$,.@label$) < 30)
- set .@amount,10;
+ .@amount = 10;
else
- set .@amount,1;
+ .@amount = 1;
areamonster .@map$,43,58,47,60,"Water Plant",2331,.@amount,.@label$;
areamonster .@map$,43,58,47,60,"Egg",2329,.@amount,.@label$;
stopnpctimer;
@@ -440,7 +440,7 @@ OnTouch:
1@ma_c,1,1,0 script #buwaya_spawn_mobs -1,{
OnInstanceInit:
- set .@map$, instance_mapname("1@ma_c");
+ .@map$ = instance_mapname("1@ma_c");
areamonster .@map$,73,81,93,101,"Seaweed",2331,18;
areamonster .@map$,110,97,116,103,"Seaweed",2331,8;
areamonster .@map$,59,63,63,67,"Seaweed",2331,8;
diff --git a/npc/re/instances/HazyForest.txt b/npc/re/instances/HazyForest.txt
index 0c32c73c6..1baa1423f 100644
--- a/npc/re/instances/HazyForest.txt
+++ b/npc/re/instances/HazyForest.txt
@@ -20,8 +20,8 @@
//============================================================
bif_fild01,158,340,5 script Laphine Soldier#mist 4_M_FAIRYSOLDIER,{
- set .@party_id,getcharid(1);
- set .@md_name$,"Mistwood Maze";
+ .@party_id = getcharid(1);
+ .@md_name$ = "Mistwood Maze";
mes "[Laphine Soldier]";
mes "Are you going into the forest?";
@@ -32,9 +32,9 @@ bif_fild01,158,340,5 script Laphine Soldier#mist 4_M_FAIRYSOLDIER,{
mes "Why don't you at least organize a party?";
close;
}
- set .@playtime, checkquest(7211,PLAYTIME);
+ .@playtime = questprogress(7211,PLAYTIME);
if (getcharid(0) == getpartyleader(.@party_id,2)) {
- if (.@playtime == 0 || .@playtime == 1) {
+ if (.@playtime == 1) {
mes "[Laphine Soldier]";
mes "...Are you sure you're not doing too much?";
mes "I think you'd better get some rest.";
@@ -84,12 +84,12 @@ bif_fild01,158,340,5 script Laphine Soldier#mist 4_M_FAIRYSOLDIER,{
mes "[Laphine Soldier]";
mes "Party Name "+getpartyname(.@party_id)+"...";
mes "Party Leader "+strcharinfo(0)+"...";
- set .@instance, instance_create(.@md_name$, .@party_id);
+ .@instance = instance_create(.@md_name$, .@party_id);
if (.@instance < 0) {
mes "Hmm...";
next;
mes "[Laphine Soldier]";
- if (.@playtime == -1)
+ if (!.@playtime)
mes "It's dangerous in the forest.";
else
mes "The atmosphere is somewhat tense in the forest.";
@@ -117,7 +117,7 @@ bif_fild01,158,340,5 script Laphine Soldier#mist 4_M_FAIRYSOLDIER,{
case 2:
mes "[Laphine Soldier]";
mes "Well, you've made the right decision.";
- if (.@playtime == -1)
+ if (!.@playtime)
mes "That's what's good for you.";
close;
}
@@ -147,9 +147,8 @@ bif_fild01,161,355,0 script Log Tunnel CLEAR_NPC,{
next;
if(select("Enter the tunnel.:Give up.") == 2)
close;
- set .@playtime, checkquest(7211,PLAYTIME);
if (has_instance("1@mist") == "") {
- if (.@playtime == 0 || .@playtime == 1) {
+ if (questprogress(7211,PLAYTIME) == 1) {
mes "You try to crawl into the log, but some mysterious power pushes you back with a gush of wind.";
mes "It seems like you can't force your way into the forest.";
close;
@@ -158,8 +157,8 @@ bif_fild01,161,355,0 script Log Tunnel CLEAR_NPC,{
mes "Your instinct is screaming that this forest is dangerous.";
close;
} else {
- if (checkquest(7211,PLAYTIME) == 2) erasequest 7211;
- if (checkquest(7211,PLAYTIME) == -1) setquest 7211;
+ if (questprogress(7211,PLAYTIME) == 2) erasequest 7211;
+ if (!questprogress(7211,PLAYTIME)) setquest 7211;
mapannounce "bif_fild01",getpartyname(getcharid(1))+" party's "+strcharinfo(0)+" member is entering the Mistwood Maze.",bc_map,"0x00ff99"; //FW_NORMAL 12 0 0
warp "1@mist",89,29;
close;
@@ -195,7 +194,7 @@ OnTimer180000:
// callfunc "F_Mora_Mist",<warp to enable>,<success message>,<fail message>{,<end flag>}
function script F_Mora_Mist {
- set .@map$, instance_mapname("1@mist");
+ .@map$ = instance_mapname("1@mist");
if (mobcount(.@map$,instance_npcname(strnpcinfo(0))+"::OnMyMobDead") == 0) {
mes "Obviously no one is taking care of it.";
mes "It seems like you can chop down the garden tree.";
@@ -424,7 +423,7 @@ OnMyMobDead:
"Gardeners: We're not dead, yet!!!!",1;
end;
OnInstanceInit:
- set .@map$, instance_mapname("1@mist");
+ .@map$ = instance_mapname("1@mist");
monster .@map$,318,137,"Baby Tom",2136,1,instance_npcname("The Gardeners' Tree")+"::OnMyMobDead";
monster .@map$,321,137,"Tomba the Baby",2136,1,instance_npcname("The Gardeners' Tree")+"::OnMyMobDead";
monster .@map$,324,137,"Exhausted Remi",2137,1,instance_npcname("The Gardeners' Tree")+"::OnMyMobDead";
@@ -514,7 +513,7 @@ OnInstanceInit:
monster instance_mapname("1@mist"),.@c[0],.@c[1],"Wandering Purple Dragon",2131,1,instance_npcname("#Dragon Herder")+"::OnMyMobDead";
end;
OnMyMobDead:
- set .@map$, instance_mapname("1@mist");
+ .@map$ = instance_mapname("1@mist");
if (mobcount(.@map$,instance_npcname("#Dragon Herder")+"::OnMyMobDead") == 0) {
donpcevent instance_npcname("Collapsed Girl#mist")+"::OnEnable";
donpcevent instance_npcname("Mysterious Young Man#mis")+"::OnEnable";
@@ -600,7 +599,7 @@ OnTimer3000:
mes "[Loki]";
mes "Now we have to say goodbye here.";
mes "If you survive this forest, of course.";
- set ep14_1_mistwoods,2;
+ ep14_1_mistwoods = 2;
setquest 7212;
close;
case 2:
@@ -608,7 +607,7 @@ OnTimer3000:
mes "I understand.";
mes "Step back if you aren't ready.";
mes "This forest doesn't like strangers.";
- set ep14_1_mistwoods,1;
+ ep14_1_mistwoods = 1;
close;
}
} else if (ep14_1_mistwoods == 1) {
@@ -646,7 +645,7 @@ OnTimer3000:
mes "[Loki]";
mes "Now we have to say goodbye here.";
mes "Hopefully, we will see each other again in Mora.";
- set ep14_1_mistwoods,2;
+ ep14_1_mistwoods = 2;
setquest 7212;
close;
}
@@ -706,7 +705,7 @@ OnDisable:
mes "I'll wait for her to wake up and get out of this forest.";
mes "I can manage it on my own.";
mes "I'll see you in Mora.";
- set ep14_1_mistwoods,3;
+ ep14_1_mistwoods = 3;
erasequest 7212;
setquest 7213;
close;
@@ -779,7 +778,7 @@ mora,46,152,5 script Flower Smelling Lady 4_F_NYDHOG,{
mes "I thought I was forsaken...";
next;
mes "The Guardian slowly looked away as if deep in thought.";
- set ep14_1_mistwoods,4;
+ ep14_1_mistwoods = 4;
close2;
} else if (ep14_1_mistwoods == 4) {
mes "- He seems to be deep in thought. -";
@@ -902,7 +901,7 @@ mora,48,152,3 script Sharp Eyed Man 4_M_ROKI2,{
next;
mes "[Nydhogg the Guardian]";
mes "May the blessing of Mother Yggdrasil be with you...";
- set ep14_1_mistwoods,10;
+ ep14_1_mistwoods = 10;
completequest 7213;
getitem 2568,1; //Muffler_Of_Roki
getitem 2858,1; //Pendant_Of_Guardian
@@ -928,8 +927,8 @@ OnInstanceInit:
monster instance_mapname("1@mist"),0,0,"Miming",2137,15,instance_npcname("#Mist Mobs Respawn1")+"::OnMyMobDead";
end;
OnMyMobDead:
- set .@map$, instance_mapname("1@mist");
- set .@num_mobs, 15 - mobcount(.@map$,instance_npcname("#Mist Mobs Respawn1")+"::OnMyMobDead");
+ .@map$ = instance_mapname("1@mist");
+ .@num_mobs = 15 - mobcount(.@map$,instance_npcname("#Mist Mobs Respawn1")+"::OnMyMobDead");
if (.@num_mobs > 0)
monster .@map$,0,0,"Miming",2137,.@num_mobs,instance_npcname("#Mist Mobs Respawn1")+"::OnMyMobDead";
end;
@@ -941,8 +940,8 @@ OnInstanceInit:
monster instance_mapname("1@mist"),0,0,"Pom Spider",2132,35,instance_npcname("#Mist Mobs Respawn2")+"::OnMyMobDead";
end;
OnMyMobDead:
- set .@map$, instance_mapname("1@mist");
- set .@num_mobs, 35 - mobcount(.@map$,instance_npcname("#Mist Mobs Respawn2")+"::OnMyMobDead");
+ .@map$ = instance_mapname("1@mist");
+ .@num_mobs = 35 - mobcount(.@map$,instance_npcname("#Mist Mobs Respawn2")+"::OnMyMobDead");
if (.@num_mobs > 0)
monster .@map$,0,0,"Pom Spider",2132,.@num_mobs,instance_npcname("#Mist Mobs Respawn2")+"::OnMyMobDead";
end;
@@ -954,8 +953,8 @@ OnInstanceInit:
monster instance_mapname("1@mist"),0,0,"Angra Mantis",2133,35,instance_npcname("#Mist Mobs Respawn3")+"::OnMyMobDead";
end;
OnMyMobDead:
- set .@map$, instance_mapname("1@mist");
- set .@num_mobs, 35 - mobcount(.@map$,instance_npcname("#Mist Mobs Respawn3")+"::OnMyMobDead");
+ .@map$ = instance_mapname("1@mist");
+ .@num_mobs = 35 - mobcount(.@map$,instance_npcname("#Mist Mobs Respawn3")+"::OnMyMobDead");
if (.@num_mobs > 0)
monster .@map$,0,0,"Angra Mantis",2133,.@num_mobs,instance_npcname("#Mist Mobs Respawn3")+"::OnMyMobDead";
end;
@@ -967,8 +966,8 @@ OnInstanceInit:
monster instance_mapname("1@mist"),0,0,"Parus",2134,35,instance_npcname("#Mist Mobs Respawn4")+"::OnMyMobDead";
end;
OnMyMobDead:
- set .@map$, instance_mapname("1@mist");
- set .@num_mobs, 35 - mobcount(.@map$,instance_npcname("#Mist Mobs Respawn4")+"::OnMyMobDead");
+ .@map$ = instance_mapname("1@mist");
+ .@num_mobs = 35 - mobcount(.@map$,instance_npcname("#Mist Mobs Respawn4")+"::OnMyMobDead");
if (.@num_mobs > 0)
monster .@map$,0,0,"Parus",2134,.@num_mobs,instance_npcname("#Mist Mobs Respawn4")+"::OnMyMobDead";
end;
@@ -980,8 +979,8 @@ OnInstanceInit:
monster instance_mapname("1@mist"),0,0,"Little Fatum",2136,15,instance_npcname("#Mist Mobs Respawn5")+"::OnMyMobDead";
end;
OnMyMobDead:
- set .@map$, instance_mapname("1@mist");
- set .@num_mobs, 15 - mobcount(.@map$,instance_npcname("#Mist Mobs Respawn5")+"::OnMyMobDead");
+ .@map$ = instance_mapname("1@mist");
+ .@num_mobs = 15 - mobcount(.@map$,instance_npcname("#Mist Mobs Respawn5")+"::OnMyMobDead");
if (.@num_mobs > 0)
monster .@map$,0,0,"Little Fatum",2136,.@num_mobs,instance_npcname("#Mist Mobs Respawn5")+"::OnMyMobDead";
end;
@@ -1025,7 +1024,7 @@ bif_fild01,38,374,0 script Mysterious Flower#ep14_1 CLEAR_NPC,{
1@mist,109,70,0 script a1_a2 WARPNPC,1,1,{
end;
OnTouch:
- if (checkquest(7211,PLAYTIME) == -1)
+ if (!questprogress(7211,PLAYTIME))
setquest 7211;
warp instance_mapname("1@mist"),116,40;
end;
diff --git a/npc/re/instances/MalangdoCulvert.txt b/npc/re/instances/MalangdoCulvert.txt
index f209f409b..0751b46a2 100644
--- a/npc/re/instances/MalangdoCulvert.txt
+++ b/npc/re/instances/MalangdoCulvert.txt
@@ -42,24 +42,24 @@ mal_in01,172,28,2 script Albo#mal 4_CAT_SAILOR5,{
setarray .@names$[0],
"General Culvert Daily Service","^990000Hard Culvert Daily Service^000000",
"General Culvert Weekly Service","^990000Hard Culvert Weekly Service^000000";
- set .@menu$,"Why are doing this job?:";
- for(set .@i,0; .@i<4; set .@i,.@i+1) {
- if (checkquest(.@quests[.@i],PLAYTIME) > -1) {
- set .@status[.@i],2;
- set .@menu$, .@menu$+"^aaaaaa- There is no new task -^000000:";
+ .@menu$ = "Why are doing this job?:";
+ for(.@i = 0; .@i<4; ++.@i) {
+ if (questprogress(.@quests[.@i],PLAYTIME)) {
+ .@status[.@i] = 2;
+ .@menu$ += "^aaaaaa- There is no new task -^000000:";
} else if (.@i%2 && BaseLevel < 140) {
- set .@status[.@i],0;
- set .@menu$, .@menu$+"^aaaaaaCan't take this job because level is too low^000000:";
+ .@status[.@i] = 0;
+ .@menu$ += "^aaaaaaCan't take this job because level is too low^000000:";
} else {
- set .@status[.@i],1;
- set .@menu$, .@menu$+.@names$[.@i]+":";
+ .@status[.@i] = 1;
+ .@menu$ += .@names$[.@i]+":";
}
}
mes "[Albo]";
mes "We crossed the sea!";
mes "We are great heroes of Culvert! We do not forgive the seafood that aims at Culvert!";
next;
- set .@i, select(.@menu$)-1;
+ .@i = select(.@menu$)-1;
if (.@i == 0) {
mes "[Albo]";
mes "We used to be the henchmen of Mr. Missing! We almost became guards of such a historic site.";
@@ -169,7 +169,7 @@ mal_in01,172,26,2 script Madeca#mal 4_CAT_SAILOR1,{
mes "Oh?";
mes "You're the one who took care of my big brother Albo's request. It was a hard job!";
next;
- set .@i, select("What are you doing here?:General Culvert Daily Service Compensation:Hard Culvert Daily Service Compensation:General Culvert Weekly Service Compensation:Hard Culvert Weekly Service Compensation")-1;
+ .@i = select("What are you doing here?:General Culvert Daily Service Compensation:Hard Culvert Daily Service Compensation:General Culvert Weekly Service Compensation:Hard Culvert Weekly Service Compensation")-1;
if (.@i == 0) {
mes "[Madeca]";
mes "I'm here to help my big brother Albo!";
@@ -192,7 +192,7 @@ mal_in01,172,26,2 script Madeca#mal 4_CAT_SAILOR1,{
specialeffect2 EF_STEAL;
switch(.@i) {
case 1: // General Culvert Daily Service
- if (checkquest(12271,PLAYTIME) == 2)
+ if (questprogress(12271,PLAYTIME) == 2)
callsub L_EraseQuest,12255,12256,12257,12258,12259,12260,12271;
else {
// Reward: 2x B Grade Coin
@@ -205,7 +205,7 @@ mal_in01,172,26,2 script Madeca#mal 4_CAT_SAILOR1,{
}
break;
case 2: // Hard Culvert Daily Service
- if (checkquest(12272,PLAYTIME) == 2)
+ if (questprogress(12272,PLAYTIME) == 2)
callsub L_EraseQuest,12261,12262,12263,12264,12265,12266,12272;
else {
// Reward: 1x A Grade Coin
@@ -218,7 +218,7 @@ mal_in01,172,26,2 script Madeca#mal 4_CAT_SAILOR1,{
}
break;
case 3: // General Culvert Weekly Service
- if (checkquest(12273,PLAYTIME) == 2)
+ if (questprogress(12273,PLAYTIME) == 2)
callsub L_EraseQuest,12267,12268,12273;
else {
// Reward: 1x Sea God's Wrath
@@ -227,7 +227,7 @@ mal_in01,172,26,2 script Madeca#mal 4_CAT_SAILOR1,{
}
break;
case 4: // Hard Culvert Weekly Service
- if (checkquest(12274,PLAYTIME) == 2)
+ if (questprogress(12274,PLAYTIME) == 2)
callsub L_EraseQuest,12269,12270,12274;
else {
// Reward: 5x Sea God's Wrath
@@ -245,8 +245,8 @@ mal_in01,172,26,2 script Madeca#mal 4_CAT_SAILOR1,{
close;
L_EraseQuest:
- for(set .@j,0; .@j<getargcount(); set .@j,.@j+1) {
- if (checkquest(getarg(.@j)) > -1)
+ for(.@j = 0; .@j<getargcount(); ++.@j) {
+ if (questprogress(getarg(.@j)))
erasequest getarg(.@j);
}
mes "[Madeca]";
@@ -255,7 +255,7 @@ L_EraseQuest:
// callsub L_CheckQuest,<quest ID>,<monster>,<reward item ID>,<reward item amount>;
L_CheckQuest:
- if (checkquest(getarg(0),HUNTING) == 2) {
+ if (questprogress(getarg(0),HUNTING) == 2) {
mes "[Madeca]";
mes "You've punished ^0000ff"+getarg(1)+"^000000!";
mes "Here's your pay!";
@@ -376,7 +376,7 @@ mal_in01,160,34,4 script Missing, the Cleaner 4_CAT_SAILOR2,{
mes "[Missing, the Cleaner]";
mes "Don't forget! I will not open the";
mes "door if you do not have Seagod Protection!";
- set in_canal_n,1;
+ in_canal_n = 1;
close;
}
if (countitem(6436) == 0) {
@@ -384,16 +384,16 @@ mal_in01,160,34,4 script Missing, the Cleaner 4_CAT_SAILOR2,{
mes "You don't look like you have Seagod Protection. I can't open door at the moment!";
close;
}
- set .@party_id,getcharid(1);
- set .@md_name$,"Culvert";
+ .@party_id = getcharid(1);
+ .@md_name$ = "Culvert";
if (!.@party_id) {
mes "^0000ffYou have to organize a party of";
mes "more than 1 member or be a member";
mes "of the party and come back.^000000";
close;
}
- set .@playtime, checkquest(12254,PLAYTIME);
- if (.@playtime == -1) {
+ .@playtime = questprogress(12254,PLAYTIME);
+ if (!.@playtime) {
if (getcharid(0) == getpartyleader(.@party_id,2)) {
mes "[Missing, the Cleaner]";
mes "Ummm? What's up? Tell me the password if you're the leader!";
@@ -404,7 +404,7 @@ mal_in01,160,34,4 script Missing, the Cleaner 4_CAT_SAILOR2,{
mes "What a rookie.";
close;
case 2:
- set .@instance,instance_create(.@md_name$,.@party_id);
+ .@instance = instance_create(.@md_name$,.@party_id);
if (.@instance < 0) {
mes "Party name: "+getpartyname(.@party_id);
mes "Party leader: "+strcharinfo(0);
@@ -430,7 +430,7 @@ mal_in01,160,34,4 script Missing, the Cleaner 4_CAT_SAILOR2,{
if(select("Enter Culvert:Cancel") == 2)
end;
callsub L_Enter,1;
- } else if (.@playtime == 0 || .@playtime == 1) {
+ } else if (.@playtime == 1) {
mes "You can enter the Culvert if the gate is open.";
next;
if(select("Enter Culvert:Cancel") == 2)
@@ -444,7 +444,7 @@ mal_in01,160,34,4 script Missing, the Cleaner 4_CAT_SAILOR2,{
end;
L_Enter:
if (has_instance("1@pump") == "") {
- if (checkquest(12254,PLAYTIME) == 0 || checkquest(12254,PLAYTIME) == 1) {
+ if (questprogress(12254,PLAYTIME) == 1) {
mes "The gate to the Culvert is still closed.";
mes "You must wait until you are able to enter or find a party leader who can create the instance.";
close;
@@ -454,7 +454,7 @@ L_Enter:
close;
}
mapannounce "mal_in01", strcharinfo(0)+" of the party "+getpartyname(.@party_id)+" is entering the Culvert.",bc_map,"0x00ff99";
- if (checkquest(12254) == -1) setquest 12254;
+ if (!questprogress(12254)) setquest 12254;
warp "1@pump",63,98;
end;
}
@@ -483,7 +483,7 @@ L_Enter:
mes "Huh? Not ready yet? Talk to me again when you're ready.";
close;
}
- set 'party_id,getcharid(1);
+ 'party_id = getcharid(1);
mapannounce instance_mapname("1@pump"),"Missing: Move toward the 3 o'clock direction and wait for my next order!",bc_map,"0xff88ff",FW_NORMAL,15;
disablenpc instance_npcname("Missing, the Cleaner#0");
enablenpc instance_npcname("Missing, the Cleaner#n");
@@ -505,7 +505,7 @@ L_Enter:
mes "Hmm? Talk to me again when you're ready.";
close;
}
- set 'party_id,getcharid(1);
+ 'party_id = getcharid(1);
mapannounce instance_mapname("1@pump"),"Missing: I'll go in first, so follow me! I'll open up a gate at the 3 o'clock direction!",bc_map,"0xff88ff",FW_NORMAL,15;
disablenpc instance_npcname("Missing, the Cleaner#0");
enablenpc instance_npcname("Culvert Entrance#i");
@@ -597,7 +597,7 @@ function script F_mal_missing {
case 2:
mes "[Missing, the Cleaner]";
mes "Ok! Let's start now!";
- set .@i$, charat(strnpcinfo(2),0);
+ .@i$ = charat(strnpcinfo(2),0);
enablenpc instance_npcname("Missing, the Cleaner#"+.@i$);
donpcevent instance_npcname("Missing, the Cleaner#"+.@i$)+"::OnStart";
disablenpc instance_npcname("Culvert Entrance#"+.@i$);
@@ -625,9 +625,9 @@ OnStart:
initnpctimer;
end;
OnAddSeaweed:
- set .@map$, instance_mapname("1@pump");
+ .@map$ = instance_mapname("1@pump");
areamonster .@map$,55,99,61,105,"Contaminated Seaweed",2191,1,instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead";
- set .@mob_dead_num, mobcount(.@map$,instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead");
+ .@mob_dead_num = mobcount(.@map$,instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead");
if (.@mob_dead_num >= 6)
donpcevent instance_npcname("Missing, the Cleaner#n")+"::OnFail";
else
@@ -638,7 +638,7 @@ OnMyMobDead:
OnFail:
stopnpctimer;
donpcevent instance_npcname("Monster Hole#n")+"::OnClear";
- set .@map$, instance_mapname("1@pump");
+ .@map$ = instance_mapname("1@pump");
killmonster .@map$,instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead";
enablenpc instance_npcname("Missing, the Cleaner#nf");
mapannounce .@map$,"What is this!! Seaweed is all over the culverts! You're done with cleaning! Get out!!",bc_map,"0xff88ff",FW_NORMAL,15;
@@ -673,20 +673,20 @@ OnTimer300000:
OnTimer350000:
OnTimer400000:
OnTimer450000:
- set .@mob_dead_num, mobcount(instance_mapname("1@pump"),instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead");
+ .@mob_dead_num = mobcount(instance_mapname("1@pump"),instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead");
if (.@mob_dead_num >= 6)
donpcevent instance_npcname("Missing, the Cleaner#n")+"::OnFail";
else
donpcevent instance_npcname("Monster Hole#n")+"::OnSpawn";
end;
OnTimer515000:
- set .@map$, instance_mapname("1@pump");
- set .@mob_dead_num, mobcount(.@map$,instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead");
+ .@map$ = instance_mapname("1@pump");
+ .@mob_dead_num = mobcount(.@map$,instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead");
mapannounce .@map$,"Contaminated Seaweed: "+.@mob_dead_num+" stem. Missing will come and inspect the results of the cleaning soon.",bc_map,"0xff3333",FW_NORMAL,20;
end;
OnTimer520000:
stopnpctimer;
- set .@mob_dead_num, mobcount(instance_mapname("1@pump"),instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead");
+ .@mob_dead_num = mobcount(instance_mapname("1@pump"),instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead");
if (.@mob_dead_num >= 6)
donpcevent instance_npcname("Missing, the Cleaner#n")+"::OnFail";
else
@@ -697,20 +697,20 @@ OnTimer520000:
1@pump,1,1,4 script Monster Hole#n -1,{
end;
OnSpawn:
- set .@i$, charat(strnpcinfo(2),0);
+ .@i$ = charat(strnpcinfo(2),0);
if (.@i$ == "n")
- set .@n,6;
+ .@n = 6;
else if (.@i$ == "h")
- set .@n,10;
+ .@n = 10;
donpcevent instance_npcname("#Culvert_"+.@i$+rand(1,.@n))+"::OnEnable";
end;
OnClear:
- set .@i$, charat(strnpcinfo(2),0);
+ .@i$ = charat(strnpcinfo(2),0);
if (.@i$ == "n")
- set .@n,6;
+ .@n = 6;
else if (.@i$ == "h")
- set .@n,10;
- for(set .@i,1; .@i<=.@n; set .@i,.@i+1)
+ .@n = 10;
+ for(.@i = 1; .@i<=.@n; ++.@i)
donpcevent instance_npcname("#Culvert_"+.@i$+.@n)+"::OnClear";
end;
}
@@ -725,9 +725,9 @@ OnInstanceInit:
end;
OnEnable:
enablenpc instance_npcname(strnpcinfo(0));
- set .@label$, instance_npcname(strnpcinfo(0))+"::OnMyMobDead";
- set .@map$, instance_mapname("1@pump");
- set .@index, atoi(charat(strnpcinfo(2),9));
+ .@label$ = instance_npcname(strnpcinfo(0))+"::OnMyMobDead";
+ .@map$ = instance_mapname("1@pump");
+ .@index = atoi(charat(strnpcinfo(2),9));
switch(.@index) {
case 1: setarray .@c[0],32,107,40,115; break;
case 2: setarray .@c[0],64,120,72,128; break;
@@ -746,7 +746,7 @@ OnEnable:
getmapxy(.@map$,.@x,.@y,1);
getpartymember 'party_id,2;
copyarray .@partymemberaid[0],$@partymemberaid[0],$@partymembercount;
- for(set .@i,0; .@i<$@partymembercount; set .@i,.@i+1) {
+ for(.@i = 0; .@i<$@partymembercount; ++.@i) {
if (attachrid(.@partymemberaid[.@i])) {
if (strcharinfo(3) == .@map$)
viewpoint 0,.@x,.@y,.@index,0xFFFF00;
@@ -786,7 +786,7 @@ OnEnable:
initnpctimer;
end;
OnTimer100:
- set .@i$, charat(strnpcinfo(2),0);
+ .@i$ = charat(strnpcinfo(2),0);
if (.@i$ == "n")
mapannounce instance_mapname("1@pump"),"Hmm! That wasn't so bad!",bc_map,"0xff88ff",FW_NORMAL,15;
else if (.@i$ == "h")
@@ -800,8 +800,8 @@ OnTimer10000:
end;
OnTimer20000:
stopnpctimer;
- set .@i$, charat(strnpcinfo(2),0);
- set .@label$, instance_npcname(strnpcinfo(0))+"::OnMyMobDead";
+ .@i$ = charat(strnpcinfo(2),0);
+ .@label$ = instance_npcname(strnpcinfo(0))+"::OnMyMobDead";
if (rand(1,100) > 50) {
if (.@i$ == "n")
monster instance_mapname("1@pump"),0,0,"Weird Coelacanth",2188,1,.@label$;
@@ -819,29 +819,29 @@ OnTimer20000:
OnMyMobDead:
if (mobcount(strnpcinfo(4),instance_npcname(strnpcinfo(0))+"::OnMyMobDead") < 1) {
mapannounce strnpcinfo(4),"You've destroyed all monsters in the culverts. There are trophies lying on the ground, please look for them.",bc_map,"0xffff00",FW_NORMAL,15;
- set .@i$, charat(strnpcinfo(2),0);
- set .@map$, strnpcinfo(4);
+ .@i$ = charat(strnpcinfo(2),0);
+ .@map$ = strnpcinfo(4);
enablenpc instance_npcname("Culvert Entrance#"+.@i$);
enablenpc instance_npcname("Missing, the Cleaner#"+.@i$+"o");
if (.@i$ == "n") {
- for(set .@i,0; .@i<10; set .@i,.@i+1) {
- set .@j, rand(1,6401);
- if (.@j < 5001) set .@item,12636; //Malang_Sp_Can
- else if (.@j < 5501) set .@item,12615; //Low_Coin_Pocket
- else if (.@j < 6001) set .@item,12621; //Egrade_Pocket
- else if (.@j < 6201) set .@item,12620; //Dgrade_Pocket
- else if (.@j < 6401) set .@item,12623; //High_Weapon_Box
+ for(.@i = 0; .@i<10; ++.@i) {
+ .@j = rand(1,6401);
+ if (.@j < 5001) .@item = 12636; //Malang_Sp_Can
+ else if (.@j < 5501) .@item = 12615; //Low_Coin_Pocket
+ else if (.@j < 6001) .@item = 12621; //Egrade_Pocket
+ else if (.@j < 6201) .@item = 12620; //Dgrade_Pocket
+ else if (.@j < 6401) .@item = 12623; //High_Weapon_Box
else continue;
makeitem .@item,1,.@map$,rand(40,77),rand(87,120);
}
} else if (.@i$ == "h") {
- for(set .@i,0; .@i<10; set .@i,.@i+1) {
- set .@j, rand(1,5001);
- if (.@j < 2001) set .@item,12615; //Low_Coin_Pocket
- else if (.@j < 3001) set .@item,12621; //Egrade_Pocket
- else if (.@j < 4001) set .@item,12620; //Dgrade_Pocket
- else if (.@j < 4501) set .@item,12619; //Cgrade_Pocket
- else if (.@j < 5001) set .@item,12623; //High_Weapon_Box
+ for(.@i = 0; .@i<10; ++.@i) {
+ .@j = rand(1,5001);
+ if (.@j < 2001) .@item = 12615; //Low_Coin_Pocket
+ else if (.@j < 3001) .@item = 12621; //Egrade_Pocket
+ else if (.@j < 4001) .@item = 12620; //Dgrade_Pocket
+ else if (.@j < 4501) .@item = 12619; //Cgrade_Pocket
+ else if (.@j < 5001) .@item = 12623; //High_Weapon_Box
else continue;
makeitem .@item,1,.@map$,rand(40,77),rand(87,120);
}
@@ -852,7 +852,7 @@ OnMyMobDead:
}
1@pump,84,105,4 script Missing, the Cleaner#no 4_CAT_SAILOR2,{
- set .@i$, charat(strnpcinfo(2),0);
+ .@i$ = charat(strnpcinfo(2),0);
if (.@i$ == "n") {
mes "[Missing, the Cleaner]";
mes "I was very surprised!!";
@@ -916,9 +916,9 @@ OnStart:
initnpctimer;
end;
OnAddSeaweed:
- set .@map$, instance_mapname("2@pump");
+ .@map$ = instance_mapname("2@pump");
areamonster .@map$,75,78,85,88,"Contaminated Seaweed",2191,1,instance_npcname("Missing, the Cleaner#h")+"::OnMyMobDead";
- set .@mob_dead_num, mobcount(.@map$,instance_npcname("Missing, the Cleaner#h")+"::OnMyMobDead");
+ .@mob_dead_num = mobcount(.@map$,instance_npcname("Missing, the Cleaner#h")+"::OnMyMobDead");
if (.@mob_dead_num >= 6)
donpcevent instance_npcname("Missing, the Cleaner#h")+"::OnFail";
else
@@ -929,7 +929,7 @@ OnMyMobDead:
OnFail:
stopnpctimer;
donpcevent instance_npcname("Monster Hole#h")+"::OnClear";
- set .@map$, instance_mapname("2@pump");
+ .@map$ = instance_mapname("2@pump");
killmonster .@map$, instance_npcname("Missing, the Cleaner#h")+"::OnMyMobDead";
enablenpc instance_npcname("Missing, the Cleaner#hf");
mapannounce .@map$,"What is this!! Seaweed is all over the culverts! You're done with cleaning! Get out!!",bc_map,"0xff88ff",FW_NORMAL,15;
@@ -964,7 +964,7 @@ OnTimer240000:
OnTimer280000:
OnTimer320000:
OnTimer360000:
- set .@mob_dead_num, mobcount(instance_mapname("2@pump"),instance_npcname("Missing, the Cleaner#h")+"::OnMyMobDead");
+ .@mob_dead_num = mobcount(instance_mapname("2@pump"),instance_npcname("Missing, the Cleaner#h")+"::OnMyMobDead");
if (.@mob_dead_num >= 6)
donpcevent instance_npcname("Missing, the Cleaner#h")+"::OnFail";
else
@@ -975,7 +975,7 @@ OnTimer420000:
end;
OnTimer425000:
stopnpctimer;
- set .@mob_dead_num, mobcount(instance_mapname("2@pump"),instance_npcname("Missing, the Cleaner#h")+"::OnMyMobDead");
+ .@mob_dead_num = mobcount(instance_mapname("2@pump"),instance_npcname("Missing, the Cleaner#h")+"::OnMyMobDead");
if (.@mob_dead_num >= 6)
donpcevent instance_npcname("Missing, the Cleaner#h")+"::OnFail";
else
@@ -993,9 +993,9 @@ OnInstanceInit:
end;
OnEnable:
enablenpc instance_npcname(strnpcinfo(0));
- set .@label$, instance_npcname(strnpcinfo(0))+"::OnMyMobDead";
- set .@map$, instance_mapname("2@pump");
- set .@index, atoi(substr(strnpcinfo(2),9,getstrlen(strnpcinfo(2))-1));
+ .@label$ = instance_npcname(strnpcinfo(0))+"::OnMyMobDead";
+ .@map$ = instance_mapname("2@pump");
+ .@index = atoi(substr(strnpcinfo(2),9,getstrlen(strnpcinfo(2))-1));
switch(.@index) {
case 1: setarray .@c[0],49,110,57,118; break;
case 2: setarray .@c[0],75,105,83,113; break;
diff --git a/npc/re/instances/OctopusCave.txt b/npc/re/instances/OctopusCave.txt
index 43c2ac66f..c55d5e2bf 100644
--- a/npc/re/instances/OctopusCave.txt
+++ b/npc/re/instances/OctopusCave.txt
@@ -19,8 +19,8 @@
//============================================================
mal_dun01,151,235,5 script Starfish 4_ASTER,{
- set .@party_id,getcharid(1);
- set .@md_name$,"Octopus Cave";
+ .@party_id = getcharid(1);
+ .@md_name$ = "Octopus Cave";
if (!.@party_id) {
mes "[Starfish]";
@@ -76,8 +76,8 @@ mal_dun01,151,235,5 script Starfish 4_ASTER,{
next;
break;
case 2:
- set .@playtime, checkquest(4197,PLAYTIME);
- if (.@playtime == 0 || .@playtime == 1) {
+ .@playtime = questprogress(4197,PLAYTIME);
+ if (.@playtime == 1) {
mes "[Starfish]";
mes "Octopus is not around now, hehe.";
mes "Please come back later.";
@@ -85,7 +85,7 @@ mal_dun01,151,235,5 script Starfish 4_ASTER,{
}
if (.@playtime == 2) erasequest 4197;
if (countitem(6442)) {
- set .@instance,instance_create(.@md_name$,.@party_id);
+ .@instance = instance_create(.@md_name$,.@party_id);
if (.@instance < 0) {
mes "[Starfish]";
mes "Party name is... "+getpartyname(.@party_id)+".";
@@ -130,7 +130,7 @@ mal_dun01,153,237,5 script Weird Entrance CLEAR_NPC,{
case 1:
if (countitem(6442)) {
if (has_instance("1@cash") == "") {
- if (checkquest(4197,PLAYTIME) == 0 || checkquest(4197,PLAYTIME) == 1) {
+ if (questprogress(4197,PLAYTIME) == 1) {
mes "[Starfish]";
mes "Ah, now is not the time...";
mes "Would you come back later? Hehe.";
@@ -143,7 +143,7 @@ mal_dun01,153,237,5 script Weird Entrance CLEAR_NPC,{
close;
}
mapannounce "mal_dun01", getpartyname(getcharid(1))+" party's "+strcharinfo(0)+" member started to hunt the Octopus!",bc_map,"0x00ff99";
- if (checkquest(4197) == -1) setquest 4197;
+ if (!questprogress(4197)) setquest 4197;
warp "1@cash",199,99;
end;
}
@@ -209,7 +209,7 @@ OnEnable:
donpcevent instance_npcname("oct_foot2")+"::OnEnable";
donpcevent instance_npcname("oct_foot3")+"::OnEnable";
donpcevent instance_npcname("oct_foot4")+"::OnEnable";
- set .@map$, instance_mapname("1@cash");
+ .@map$ = instance_mapname("1@cash");
monster .@map$,20,114,"Octopus Leg#1",2193,1,instance_npcname("oct_foot_4")+"::OnMyMobDead";
monster .@map$,88,190,"Octopus Leg#2",2193,1,instance_npcname("oct_foot_4")+"::OnMyMobDead";
monster .@map$,307,215,"Octopus Leg#3",2193,1,instance_npcname("oct_foot_4")+"::OnMyMobDead";
@@ -219,7 +219,7 @@ OnDisable:
disablenpc instance_npcname("oct_foot_4");
end;
OnMyMobDead:
- set .@map$, instance_mapname("1@cash");
+ .@map$ = instance_mapname("1@cash");
if (mobcount(.@map$,instance_npcname("oct_foot_4")+"::OnMyMobDead") < 1) {
donpcevent instance_npcname("oct_boss_con")+"::OnEnable";
mapannounce .@map$,"Hey you!! I'll personally take care of you all! Let's bring it on!",bc_map,"0x00ff99";
@@ -238,9 +238,9 @@ OnInstanceInit:
end;
OnEnable:
enablenpc instance_npcname(strnpcinfo(0));
- set .@label$, instance_npcname(strnpcinfo(0))+"::OnMyMobDead";
- set .@i, atoi(charat(strnpcinfo(0),8));
- set .@map$, instance_mapname("1@cash");
+ .@label$ = instance_npcname(strnpcinfo(0))+"::OnMyMobDead";
+ .@i = atoi(charat(strnpcinfo(0),8));
+ .@map$ = instance_mapname("1@cash");
switch(.@i) {
case 1:
areamonster .@map$,34,96,38,100,"Octopus's Henchman",2192,3,.@label$;
@@ -308,10 +308,10 @@ OnTouch:
initnpctimer;
end;
OnTimer5000:
- set .@map$, instance_mapname("1@cash");
+ .@map$ = instance_mapname("1@cash");
mapannounce .@map$,"Let's give them a lesson!",bc_map,"0xFFFF00";
- set .@label$, instance_npcname(strnpcinfo(0))+"::OnMyMobDead";
- set .@i, atoi(charat(strnpcinfo(0),8));
+ .@label$ = instance_npcname(strnpcinfo(0))+"::OnMyMobDead";
+ .@i = atoi(charat(strnpcinfo(0),8));
switch(.@i) {
case 1:
areamonster .@map$,18,112,22,116,"Octopus's Henchman",2192,3,.@label$;
@@ -334,17 +334,17 @@ OnTimer5000:
OnTimer30000:
setd "."+strnpcinfo(0)+instance_id(),0;
stopnpctimer;
- set .@i, atoi(charat(strnpcinfo(0),8));
+ .@i = atoi(charat(strnpcinfo(0),8));
donpcevent instance_npcname("oct_foot_exit"+.@i)+"::OnEnable";
donpcevent instance_npcname(strnpcinfo(0))+"::OnDisable";
end;
OnMyMobDead:
- set .@map$, instance_mapname("1@cash");
+ .@map$ = instance_mapname("1@cash");
if (mobcount(.@map$,instance_npcname(strnpcinfo(0))+"::OnMyMobDead") < 1) {
mapannounce .@map$,"You hurt my babies!!? You'll have to pay for this!!!",bc_map,"0x00ff99";
setd "."+strnpcinfo(0)+instance_id(),0;
stopnpctimer;
- set .@i, atoi(charat(strnpcinfo(0),8));
+ .@i = atoi(charat(strnpcinfo(0),8));
donpcevent instance_npcname("oct_foot_exit"+.@i)+"::OnEnable";
donpcevent instance_npcname(strnpcinfo(0))+"::OnDisable";
end;
@@ -377,7 +377,7 @@ OnInstanceInit:
donpcevent instance_npcname("oct_mob_con")+"::OnDisable";
end;
OnEnable:
- set .@map$, instance_mapname("1@cash");
+ .@map$ = instance_mapname("1@cash");
enablenpc instance_npcname("oct_mob_con");
monster .@map$,32,94,"Hydra",1068,1;
monster .@map$,41,101,"Hydra",1068,1;
@@ -439,7 +439,7 @@ OnInstanceInit:
disablenpc instance_npcname("oct_backattack1");
end;
OnTouch:
- set .@map$, instance_mapname("1@cash");
+ .@map$ = instance_mapname("1@cash");
monster .@map$,39,59,"Hydra",1068,1;
monster .@map$,40,59,"Hydra",1068,1;
monster .@map$,41,59,"Hydra",1068,1;
@@ -465,28 +465,28 @@ OnTouch:
if (getd("."+instance_id())) end;
setd "."+instance_id(),1;
initnpctimer;
- set .@map$, instance_mapname("1@cash");
+ .@map$ = instance_mapname("1@cash");
monster .@map$,71,105,"Octopus's Henchman ",2192,1;
mapannounce .@map$,"Headquarters are empty, GO!!!",bc_map,"0x00ff99";
hideonnpc instance_npcname("oct_backattack2");
end;
OnTimer2000:
- set .@map$, instance_mapname("1@cash");
+ .@map$ = instance_mapname("1@cash");
monster .@map$,71,105,"Octopus's Henchman ",2192,1;
mapannounce .@map$,"Run, RUN! Go, GO!!!",bc_map,"0x00ff99";
end;
OnTimer4000:
- set .@map$, instance_mapname("1@cash");
+ .@map$ = instance_mapname("1@cash");
monster .@map$,71,105,"Octopus's Henchman ",2192,1;
mapannounce .@map$,"No time, come out fast!",bc_map,"0x00ff99";
end;
OnTimer6000:
- set .@map$, instance_mapname("1@cash");
+ .@map$ = instance_mapname("1@cash");
monster .@map$,71,105,"Octopus's Henchman ",2192,3;
mapannounce .@map$,"Let's take over the headquarters!!!",bc_map,"0x00ff99";
end;
OnTimer8000:
- set .@map$, instance_mapname("1@cash");
+ .@map$ = instance_mapname("1@cash");
monster .@map$,71,105,"Octopus's Henchman ",2192,1;
mapannounce .@map$,"There is no time to lose, hurry up!!!",bc_map,"0x00ff99";
stopnpctimer;
@@ -504,7 +504,7 @@ OnInstanceInit:
OnTouch:
if (getd("."+instance_id())) end;
setd "."+instance_id(),1;
- set .@map$, instance_mapname("1@cash");
+ .@map$ = instance_mapname("1@cash");
monster .@map$,293,153,"Octopus's Henchman ",2192,1;
monster .@map$,294,152,"Octopus's Henchman ",2192,1;
monster .@map$,292,153,"Octopus's Henchman ",2192,1;
@@ -531,7 +531,7 @@ OnInstanceInit:
OnTouch:
if (getd("."+instance_id())) end;
setd "."+instance_id(),1;
- set .@map$, instance_mapname("1@cash");
+ .@map$ = instance_mapname("1@cash");
monster .@map$,332,37,"Octopus's Henchman ",2192,1;
monster .@map$,332,36,"Octopus's Henchman ",2192,1;
monster .@map$,332,35,"Octopus's Henchman ",2192,1;
@@ -623,7 +623,7 @@ OnAnnounce:
mapannounce instance_mapname("1@cash"),"Disgusting Octopus : "+getarg(rand(3)),bc_map,"0xFFFF00";
return;
OnMyMobDead:
- set .@map$, instance_mapname("1@cash");
+ .@map$ = instance_mapname("1@cash");
if (mobcount(.@map$,instance_npcname("oct_boss_con")+"::OnMyMobDead") < 1) {
mapannounce .@map$,"Disgusting Octopus : That's it for the today! Next time, I will play with you badly!",bc_map,"0xFFFF00";
enablenpc instance_npcname("oct_exit_1");
@@ -646,7 +646,7 @@ OnEnable:
initnpctimer;
end;
OnCall:
- set .@map$, instance_mapname("1@cash");
+ .@map$ = instance_mapname("1@cash");
if (mobcount(.@map$,instance_npcname("oct_boss_foot")+"::OnMyMobDead") < 100) {
switch(rand(2)) {
case 0:
diff --git a/npc/re/instances/OldGlastHeim.txt b/npc/re/instances/OldGlastHeim.txt
index 4be3133bc..be0d4d002 100644
--- a/npc/re/instances/OldGlastHeim.txt
+++ b/npc/re/instances/OldGlastHeim.txt
@@ -20,12 +20,12 @@ glast_01,204,273,6 script Hugin#ghinstance 4_M_SAGE_C,{
mes "[Hugin]";
mes "Huh? You feel like you have seen me in different places? I see. What can I say?";
next;
- set .@ghins_time, checkquest(12317,PLAYTIME);
- if (.@ghins_time == -1) {
+ .@ghins_time = questprogress(12317,PLAYTIME);
+ if (!.@ghins_time) {
- set .@party_id,getcharid(1);
- set .@p_name$,getpartyname(.@party_id);
- set .@md_name$,"Old Glast Heim";
+ .@party_id = getcharid(1);
+ .@p_name$ = getpartyname(.@party_id);
+ .@md_name$ = "Old Glast Heim";
if (!instance_check_party(.@party_id,2)) {
//custom
@@ -35,12 +35,12 @@ glast_01,204,273,6 script Hugin#ghinstance 4_M_SAGE_C,{
}
if (getcharid(0) == getpartyleader(.@party_id,2))
- set .@menu$, "Create the time gap.:Enter the Old Glast Heim.:Cancel.";
+ .@menu$ = "Create the time gap.:Enter the Old Glast Heim.:Cancel.";
else
- set .@menu$, ":Enter the Old Glast Heim.:Cancel.";
+ .@menu$ = ":Enter the Old Glast Heim.:Cancel.";
switch(select(.@menu$)) {
case 1:
- set .@instance, instance_create(.@md_name$,.@party_id);
+ .@instance = instance_create(.@md_name$,.@party_id);
if (.@instance < 0) {
mes "Party Name: "+.@p_name$;
mes "Party Leader: "+strcharinfo(0);
@@ -72,7 +72,7 @@ glast_01,204,273,6 script Hugin#ghinstance 4_M_SAGE_C,{
case 3:
close;
}
- } else if (.@ghins_time == 0 || .@ghins_time == 1) {
+ } else if (.@ghins_time == 1) {
mes "[Hugin]";
mes "Oh, geez.";
mes "Your body is still under the effects of time travel. In this state, you will not be able to travel again.";
@@ -83,8 +83,8 @@ glast_01,204,273,6 script Hugin#ghinstance 4_M_SAGE_C,{
} else {
mes "^0000ffOld Glast Heim access trail has been cleared. It is now possible to talk to Hugin.^000000";
erasequest 12317;
- if (checkquest(12318) > -1) erasequest 12318;
- if (checkquest(12319) > -1) erasequest 12319;
+ if (questprogress(12318)) erasequest 12318;
+ if (questprogress(12319)) erasequest 12319;
close;
}
}
@@ -151,7 +151,7 @@ OnDisable:
OnDisable2:
hideonnpc instance_npcname("Varmunt#ghinstance1");
- for(set .@i,1; .@i<=20; set .@i,.@i+4) {
+ for(.@i = 1; .@i<=20; .@i += 4) {
hideoffnpc instance_npcname("Khalitzburg Crusader#"+.@i);
hideoffnpc instance_npcname("Khalitzburg Crusader#"+(.@i+1));
hideoffnpc instance_npcname("White Knight#"+(.@i+2));
@@ -507,7 +507,7 @@ OnTimer85000:
donpcevent instance_npcname("Heinrich#ghinstance2")+"::OnTalk7";
hideonnpc instance_npcname("Varmunt#ghinstance1");
- for(set .@i,1; .@i<=20; set .@i,.@i+4) {
+ for(.@i = 1; .@i<=20; .@i += 4) {
hideonnpc instance_npcname("Khalitzburg Crusader#"+.@i);
hideonnpc instance_npcname("Khalitzburg Crusader#"+(.@i+1));
hideonnpc instance_npcname("White Knight#"+(.@i+2));
@@ -516,8 +516,8 @@ OnTimer85000:
hideonnpc instance_npcname("Khalitzburg Crusader#21");
hideonnpc instance_npcname("Khalitzburg Crusader#22");
- set .@map$, instance_mapname("1@gl_k");
- set .@label$, instance_npcname("#talkinstance1")+"::OnMyMobDead";
+ .@map$ = instance_mapname("1@gl_k");
+ .@label$ = instance_npcname("#talkinstance1")+"::OnMyMobDead";
monster .@map$,145,59,"Abyss Knight",2470,1,.@label$;
monster .@map$,154,59,"Abyss Knight",2470,1,.@label$;
monster .@map$,145,69,"Abyss Knight",2470,1,.@label$;
@@ -529,7 +529,7 @@ OnTimer85000:
monster .@map$,145,99,"Abyss Knight",2470,1,.@label$;
monster .@map$,154,99,"Abyss Knight",2470,1,.@label$;
- for(set .@i,1; .@i<=22; set .@i,.@i+1)
+ for(.@i = 1; .@i<=22; ++.@i)
hideoffnpc instance_npcname(".#ghinstance"+.@i);
donpcevent instance_npcname(".#ghinstance22")+"::OnTalkK";
@@ -548,7 +548,7 @@ OnTimer85000:
OnTimer88000:
donpcevent instance_npcname("Heinrich#ghinstance2")+"::OnTalk8";
- for(set .@i,1; .@i<=20; set .@i,.@i+4) {
+ for(.@i = 1; .@i<=20; .@i += 4) {
hideonnpc instance_npcname(".#ghinstance"+.@i);
hideonnpc instance_npcname(".#ghinstance"+(.@i+1));
disablenpc instance_npcname(".#ghinstance"+(.@i+2));
@@ -557,8 +557,8 @@ OnTimer88000:
hideonnpc instance_npcname(".#ghinstance21");
hideonnpc instance_npcname(".#ghinstance22");
- set .@map$, instance_mapname("1@gl_k");
- set .@label$, instance_npcname("#talkinstance1")+"::OnMyMobDead";
+ .@map$ = instance_mapname("1@gl_k");
+ .@label$ = instance_npcname("#talkinstance1")+"::OnMyMobDead";
monster .@map$,145,54,"Khalitzburg",2471,1,.@label$;
monster .@map$,154,54,"Khalitzburg",2471,1,.@label$;
monster .@map$,145,64,"Khalitzburg",2471,1,.@label$;
@@ -784,8 +784,8 @@ OnEnable:
enablenpc instance_npcname(strnpcinfo(0));
end;
OnTouch:
- set .@map1$, instance_mapname("1@gl_k");
- set .@map2$, instance_mapname("2@gl_k");
+ .@map1$ = instance_mapname("1@gl_k");
+ .@map2$ = instance_mapname("2@gl_k");
switch(atoi(replacestr(strnpcinfo(2),"ghinstancewarp",""))) {
case 1: warp .@map1$,80,80; break;
case 2: warp .@map1$,105,80; break;
@@ -826,8 +826,8 @@ OnDisable:
end;
OnEnable:
enablenpc instance_npcname("#ghmemorialmob01");
- set .@map$, instance_mapname("1@gl_k");
- set .@label$, instance_npcname("#ghmemorialmob01")+"::OnMyMobDead";
+ .@map$ = instance_mapname("1@gl_k");
+ .@label$ = instance_npcname("#ghmemorialmob01")+"::OnMyMobDead";
areamonster .@map$,76,99,87,10,"Suffering Chamberlain",2466,15,.@label$;
areamonster .@map$,67,39,12,6,"Fallen Monk",2465,20,.@label$;
areamonster .@map$,67,39,12,6,"Suffering Chamberlain",2466,3,.@label$;
@@ -835,9 +835,9 @@ OnEnable:
areamonster .@map$,45,84,6,137,"Decayed Butler",2464,12,.@label$;
end;
OnMyMobDead:
- set .@map$, instance_mapname("1@gl_k");
- set .@label$, instance_npcname("#ghmemorialmob01")+"::OnMyMobDead";
- set .@mob_dead_num, 56 - mobcount(.@map$,.@label$);
+ .@map$ = instance_mapname("1@gl_k");
+ .@label$ = instance_npcname("#ghmemorialmob01")+"::OnMyMobDead";
+ .@mob_dead_num = 56 - mobcount(.@map$,.@label$);
if (.@mob_dead_num > 35) {
mapannounce .@map$, "Seems like Himmelmez drains the dead's souls. They must be destroyed.",bc_map,"0xFFFFFF";
killmonster .@map$,.@label$;
@@ -966,8 +966,8 @@ OnEnable:
enablenpc instance_npcname("#ghmemorialmob02");
donpcevent instance_npcname("#ghinstancewarp3")+"::OnEnable";
donpcevent instance_npcname("#ghinstancewarp4")+"::OnEnable";
- set .@map$, instance_mapname("1@gl_k");
- set .@label$, instance_npcname("#ghmemorialmob02")+"::OnMyMobDead";
+ .@map$ = instance_mapname("1@gl_k");
+ .@label$ = instance_npcname("#ghmemorialmob02")+"::OnMyMobDead";
mapannounce .@map$,"3 o'clock warp leading to zone 3 is now open.",bc_map,"0xFFFF00";
areamonster .@map$,241,113,291,19,"Suffering Chamberlain",2466,12,.@label$;
areamonster .@map$,241,113,291,19,"Decayed Monk",2464,12,.@label$;
@@ -975,9 +975,9 @@ OnEnable:
areamonster .@map$,227,217,291,135,"Decayed Monk",2464,12,.@label$;
end;
OnMyMobDead:
- set .@map$, instance_mapname("1@gl_k");
- set .@label$, instance_npcname("#ghmemorialmob02")+"::OnMyMobDead";
- set .@mob_dead_num, 48 - mobcount(.@map$,.@label$);
+ .@map$ = instance_mapname("1@gl_k");
+ .@label$ = instance_npcname("#ghmemorialmob02")+"::OnMyMobDead";
+ .@mob_dead_num = 48 - mobcount(.@map$,.@label$);
if (.@mob_dead_num > 28) {
mapannounce .@map$, "Seems like Himmelmez drains the dead's souls. They must be destroyed.",bc_map,"0xFFFFFF";
killmonster .@map$,.@label$;
@@ -992,12 +992,12 @@ OnMyMobDead:
1@gl_k,221,82,3 script Breathless Man#GHtramp1 4_M_DIEMAN,4,4,{
end;
OnTouch:
- set .@i, rand(1,10);
- if (.@i == 1) set .@mobs,3;
- else if (.@i == 2) set .@mobs,4;
- else if (.@i == 3) set .@mobs,5;
- else if (.@i < 7) set .@mobs,6;
- else set .@mobs,7;
+ .@i = rand(1,10);
+ if (.@i == 1) .@mobs = 3;
+ else if (.@i == 2) .@mobs = 4;
+ else if (.@i == 3) .@mobs = 5;
+ else if (.@i < 7) .@mobs = 6;
+ else .@mobs = 7;
getmapxy(.@map$,.@x,.@y,1);
specialeffect EF_VENOMDUST;
monster .@map$,.@x,.@y,"Muck Worm",2467,.@mobs,instance_npcname(strnpcinfo(0))+"::OnMyMobDead";
@@ -1060,8 +1060,8 @@ OnEnable:
enablenpc instance_npcname("#ghmemorialmob03");
donpcevent instance_npcname("#ghinstancewarp5")+"::OnEnable";
donpcevent instance_npcname("#ghinstancewarp6")+"::OnEnable";
- set .@map$, instance_mapname("1@gl_k");
- set .@label$, instance_npcname("#ghmemorialmob03")+"::OnMyMobDead";
+ .@map$ = instance_mapname("1@gl_k");
+ .@label$ = instance_npcname("#ghmemorialmob03")+"::OnMyMobDead";
mapannounce .@map$,"12 o'clock warp leading to the zone 4 was opened.",bc_map,"0xFFFF00";
areamonster .@map$,17,259,53,180,"Decayed Guard",2468,11,.@label$;
areamonster .@map$,17,259,53,180,"Sharpshooter Ranger",2469,14,.@label$;
@@ -1073,9 +1073,9 @@ OnEnable:
areamonster .@map$,108,281,231,234,"Sharpshooter Ranger",2469,14,.@label$;
end;
OnMyMobDead:
- set .@map$, instance_mapname("1@gl_k");
- set .@label$, instance_npcname("#ghmemorialmob03")+"::OnMyMobDead";
- set .@mob_dead_num, 100 - mobcount(.@map$,.@label$);
+ .@map$ = instance_mapname("1@gl_k");
+ .@label$ = instance_npcname("#ghmemorialmob03")+"::OnMyMobDead";
+ .@mob_dead_num = 100 - mobcount(.@map$,.@label$);
if (.@mob_dead_num > 85) {
mapannounce .@map$,"Himmelmez: Nice parry. I thought you were going to die slowly surrounded by the dead I summoned~",bc_map,"0xFFFFFF";
killmonster .@map$,.@label$;
@@ -1102,7 +1102,7 @@ OnEnable:
monster instance_mapname("1@gl_k"),150,258,"Root of Corruption",2475,1,instance_npcname("#ghmemorialmob04")+"::OnMyMobDead";
end;
OnMyMobDead:
- set .@map$, instance_mapname("1@gl_k");
+ .@map$ = instance_mapname("1@gl_k");
if (mobcount(.@map$,instance_npcname("#ghmemorialmob04")+"::OnMyMobDead") < 1) {
mapannounce .@map$, "12 o'clock warp leading to the Chivalry's Second Floor is now open.",bc_map,"0xFFFF00";
donpcevent instance_npcname("#ghinstancewarp7")+"::OnEnable";
@@ -1259,8 +1259,8 @@ OnTalk6:
}
1@gl_k,156,259,3 script Varmunt#ghinstance3 4_M_BARMUND,{
- if (checkquest(12318,HUNTING) == 2) {
- if (checkquest(12319,HUNTING) == -1) {
+ if (questprogress(12318,HUNTING) == 2) {
+ if (!questprogress(12319,HUNTING)) {
mes "[Varmunt]";
mes "There's something unusual about this thing's aura. Maybe someday we will be able to understand what is behind all of this.";
cutin "gl_barmund1",2;
@@ -1520,25 +1520,25 @@ OnDisable:
end;
OnEnable:
enablenpc instance_npcname("#ghmemorialmob05");
- set .@map$, instance_mapname("2@gl_k");
- set .@label$, instance_npcname("#ghmemorialmob05")+"::OnMyMobDead";
+ .@map$ = instance_mapname("2@gl_k");
+ .@label$ = instance_npcname("#ghmemorialmob05")+"::OnMyMobDead";
areamonster .@map$,124,20,31,162,"Decayed Guard",2468,8,.@label$;
areamonster .@map$,124,20,31,162,"Sharpshooter Ranger",2469,8,.@label$;
areamonster .@map$,124,20,31,162,"Fallen Abyss Knight",2470,8,.@label$;
areamonster .@map$,124,20,31,162,"Suffering Khalitzburg",2471,8,.@label$;
areamonster .@map$,124,20,31,162,"Swollen Knight",2472,8,.@label$;
- set .MyMobs,80;
+ .MyMobs = 80;
end;
OnMyMobDead:
- set .@map$, instance_mapname("2@gl_k");
- set .MyMobs, .MyMobs-1;
+ .@map$ = instance_mapname("2@gl_k");
+ --.MyMobs;
if (.MyMobs == 0) {
mapannounce .@map$, "A being with an evil aura seems to be appearing in this region.",bc_map,"0xFFFF00";
donpcevent instance_npcname("#ghmemorialmob06")+"::OnDisable2";
donpcevent instance_npcname("#ghmemorialmob07")+"::OnEnable";
donpcevent instance_npcname("#ghmemorialmob05")+"::OnDisable";
} else {
- set .@label$, instance_npcname("#ghmemorialmob05")+"::OnMyMobDead";
+ .@label$ = instance_npcname("#ghmemorialmob05")+"::OnMyMobDead";
switch(rand(5)) {
case 0:
areamonster .@map$,124,20,31,162,"Decayed Guard",2468,1,.@label$;
@@ -1579,8 +1579,8 @@ OnSpawn:
initnpctimer;
end;
OnTimer90000:
- set .@map$, instance_mapname("2@gl_k");
- set .@label$, instance_npcname("#ghmemorialmob05")+"::OnMyMobDead";
+ .@map$ = instance_mapname("2@gl_k");
+ .@label$ = instance_npcname("#ghmemorialmob05")+"::OnMyMobDead";
setarray .@c[0],
114,141,118,139,
128,83,131,78,
@@ -1589,7 +1589,7 @@ OnTimer90000:
58,83,63,78,
69,138,80,127,
34,143,39,138;
- for(set .@i,0; .@i<getarraysize(.@c); set .@i,.@i+4) {
+ for(.@i = 0; .@i<getarraysize(.@c); .@i += 4) {
areamonster .@map$,.@c[.@i],.@c[.@i+1],.@c[.@i+2],.@c[.@i+3],"Decayed Guard",2468,1,.@label$;
areamonster .@map$,.@c[.@i],.@c[.@i+1],.@c[.@i+2],.@c[.@i+3],"Sharpshooter Ranger",2469,1,.@label$;
areamonster .@map$,.@c[.@i],.@c[.@i+1],.@c[.@i+2],.@c[.@i+3],"Fallen Abyss Knight",2470,1,.@label$;
@@ -1615,7 +1615,7 @@ OnEnable:
areamonster instance_mapname("2@gl_k"),124,20,31,162,"The Destruction of the First Captain",2473,1,instance_npcname("#ghmemorialmob07")+"::OnMyMobDead";
end;
OnMyMobDead:
- set .@map$, instance_mapname("2@gl_k");
+ .@map$ = instance_mapname("2@gl_k");
if (mobcount(.@map$,instance_npcname("#ghmemorialmob07")+"::OnMyMobDead") < 1) {
mapannounce .@map$, "3 o'clock positioned warp leading to the 2nd zone has been opened. Use the central hallway to get there.",bc_map,"0xFFFF00";
donpcevent instance_npcname("#ghinstancewarp10")+"::OnEnable";
@@ -1635,24 +1635,24 @@ OnDisable:
end;
OnEnable:
enablenpc instance_npcname("#ghmemorialmob08");
- set .@map$, instance_mapname("2@gl_k");
- set .@label$, instance_npcname("#ghmemorialmob08")+"::OnMyMobDead";
+ .@map$ = instance_mapname("2@gl_k");
+ .@label$ = instance_npcname("#ghmemorialmob08")+"::OnMyMobDead";
areamonster .@map$,175,163,265,18,"Decayed Guard",2468,7,.@label$;
areamonster .@map$,175,163,265,18,"Sharpshooter Ranger",2469,7,.@label$;
areamonster .@map$,175,163,265,18,"Fallen Abyss Knight",2470,7,.@label$;
areamonster .@map$,175,163,265,18,"Suffering Khalitzburg",2471,7,.@label$;
areamonster .@map$,175,163,265,18,"Swollen Knight",2472,7,.@label$;
- set .MyMobs,35;
+ .MyMobs = 35;
end;
OnMyMobDead:
- set .@map$, instance_mapname("2@gl_k");
- set .MyMobs, .MyMobs-1;
+ .@map$ = instance_mapname("2@gl_k");
+ --.MyMobs;
if (.MyMobs == 0) {
mapannounce .@map$, "A being with an evil aura seems to be appearing in this region.",bc_map,"0xFFFF00";
donpcevent instance_npcname("#ghmemorialmob09")+"::OnEnable";
donpcevent instance_npcname("#ghmemorialmob08")+"::OnDisable";
} else {
- set .@label$, instance_npcname("#ghmemorialmob08")+"::OnMyMobDead";
+ .@label$ = instance_npcname("#ghmemorialmob08")+"::OnMyMobDead";
switch(rand(5)) {
case 0:
areamonster .@map$,175,163,265,18,"Decayed Guard",2468,1,.@label$;
@@ -1686,7 +1686,7 @@ OnEnable:
areamonster instance_mapname("2@gl_k"),175,163,265,18,"The Destruction of the Second Captain",2474,1,instance_npcname("#ghmemorialmob09")+"::OnMyMobDead";
end;
OnMyMobDead:
- set .@map$, instance_mapname("2@gl_k");
+ .@map$ = instance_mapname("2@gl_k");
if (mobcount(.@map$,instance_npcname("#ghmemorialmob09")+"::OnMyMobDead") < 1) {
mapannounce .@map$, "12 o'clock positioned warp leading to the 3rd zone has been opened. Use the central hallway to get there.",bc_map,"0xFFFF00";
donpcevent instance_npcname("#ghinstancewarp12")+"::OnEnable";
@@ -1998,7 +1998,7 @@ OnTimer80000:
}
2@gl_k,158,241,1 script Hugin#ghinstance1 4_M_SAGE_C,{
- if (checkquest(12319,HUNTING) == 2) {
+ if (questprogress(12319,HUNTING) == 2) {
mes "[Hugin]";
mes "Well, you are pretty ridiculous. Beginners shouldn't get the loot Amdarias drops.";
erasequest 12318;
diff --git a/npc/re/instances/WolfchevLaboratory.txt b/npc/re/instances/WolfchevLaboratory.txt
index dc625dca1..dcf726ed3 100644
--- a/npc/re/instances/WolfchevLaboratory.txt
+++ b/npc/re/instances/WolfchevLaboratory.txt
@@ -1690,10 +1690,9 @@ lhz_dun04,151,276,3 script Researcher#memo 4_LGTSCIENCE,{
mes "^FF0000You cannot continue the process due to possessing too many belongings.^000000";
close;
}
- .@quest_time = checkquest(5112, PLAYTIME);
.@killed_bosses = true;
for(.@quest_id = 5113; .@quest_id <= 5125; .@quest_id++) {
- if(checkquest(.@quest_id, HUNTING) <= 1)
+ if(questprogress(.@quest_id, HUNTING) != 2)
.@killed_bosses = false;
}
if (lght_duk01 < 6) {
@@ -1780,14 +1779,15 @@ lhz_dun04,151,276,3 script Researcher#memo 4_LGTSCIENCE,{
mes "And just so you know, please do not touch random things out of curiosity. I don't want you to get hurt.";
close;
case 2:
- if (.@quest_time == 0) {
+ .@quest_time = questprogress(5112, PLAYTIME);
+ if (!.@quest_time) {
mes "[Wolfchev]";
mes "I'm sorry, but it seems you still cannot enter to the laboratory yet. Will you come back later? The system is kind of tricky you know.";
close;
} else {
//if (.@quest_time == 2)
//recall_completequest 5112;
- if (.@quest_time >= 0)
+ if (.@quest_time)
erasequest 5112;
if (!.@killed_bosses) {
if (lght_duk01 == 9) {
@@ -1908,13 +1908,13 @@ lhz_dun04,147,279,0 script Laboratory Entrance#memo CLEAR_NPC,{
mes "^FF0000You cannot continue the process due to possessing too many belongings.^000000";
close;
}
- .@lhz_time = checkquest(5112, PLAYTIME);
+ .@lhz_time = questprogress(5112, PLAYTIME);
if (lght_duk01 < 7) {
mes "It says,";
mes "'^0000FF****'s laboratory member only^000000'";
close;
}
- if (.@lhz_time == -1) {
+ if (!.@lhz_time) {
mes "This is an entrance towards Wolfchev's laboratory. Something is howling over the entrance.";
next;
if(select("Go inside", "Think one more time") == 2) {
@@ -1938,7 +1938,7 @@ lhz_dun04,147,279,0 script Laboratory Entrance#memo CLEAR_NPC,{
warp "1@lhz.gat", 45, 148;
close;
}
- } else if (.@lhz_time == 0) {
+ } else if (.@lhz_time == 1) {
mes "Di Rit- Di- Di- Dit-";
next;
mes ""+ strcharinfo(PC_NAME) +". . .";
@@ -1946,7 +1946,7 @@ lhz_dun04,147,279,0 script Laboratory Entrance#memo CLEAR_NPC,{
next;
mes "The system denied your entrance.";
close;
- } else if (.@lhz_time >= 1) {
+ } else if (.@lhz_time == 2) {
mes "Di Rit- Di- Di- Dit-";
next;
//if (.@lhz_time == 2)
@@ -3113,7 +3113,7 @@ lhz_dun04,147,279,0 script Laboratory Entrance#memo CLEAR_NPC,{
}
.@all_quests_complete = true;
for(.@i = 5113; .@i <= 5125; .@i++) {
- if(checkquest(.@i, HUNTING) != 2)
+ if(questprogress(.@i, HUNTING) != 2)
.@all_quests_complete = false;
}
if (.@all_quests_complete) {
generated by cgit v1.2.3-60-g2f50 (git 2.42.0) at 2024-07-04 23:46:51 +0000