diff options
Diffstat (limited to 'npc/instances')
-rw-r--r-- | npc/instances/EndlessTower.txt | 136 | ||||
-rw-r--r-- | npc/instances/NydhoggsNest.txt | 122 | ||||
-rw-r--r-- | npc/instances/OrcsMemory.txt | 76 | ||||
-rw-r--r-- | npc/instances/SealedShrine.txt | 118 |
4 files changed, 226 insertions, 226 deletions
diff --git a/npc/instances/EndlessTower.txt b/npc/instances/EndlessTower.txt index 2da7c8719..598ea98f5 100644 --- a/npc/instances/EndlessTower.txt +++ b/npc/instances/EndlessTower.txt @@ -54,7 +54,7 @@ alberta,214,77,6 script Captain Janssen 4_M_SEAMAN,{ mes "Sigh... I don't know if I can ever go back to sailing the sea..."; close; } - set .@name$,strcharinfo(0); + .@name$ = strcharinfo(0); if (in_102tower == 1) { mes "^0000ffLooking incredibly excited, the old man ran into the marine shop hurriedly ordering goods. You don't have anything better to do, so you decide to ask him why he is in such a rush.^000000"; next; @@ -75,7 +75,7 @@ alberta,214,77,6 script Captain Janssen 4_M_SEAMAN,{ mes "^0000ffMr. Janssen talked about his perilous ocean journeys for quite a while. You have enough time on your hands, so you sit down, quietly listening to his story.^000000"; next; mes "^0000ffAt least half of his story sounded grossly exaggerated, but something caught your ear: he insists that a humongous tower exists on the ocean, and that it's so tall, it scrapes across the sky.^000000"; - set in_102tower,2; + in_102tower = 2; close; } else if (in_102tower == 2) { mes "[Captain Janssen]"; @@ -119,7 +119,7 @@ alberta,214,77,6 script Captain Janssen 4_M_SEAMAN,{ mes "[Captain Janssen]"; mes "...Okay then..."; mes "Welcome aboard, first mate."; - set in_102tower,3; + in_102tower = 3; close; } else if (in_102tower == 3) { mes "[Captain Janssen]"; @@ -130,7 +130,7 @@ alberta,214,77,6 script Captain Janssen 4_M_SEAMAN,{ mes "[Captain Janssen]"; mes "Then pull up the anchor, first mate!"; close2; - set in_102tower,4; + in_102tower = 4; warp "e_tower",70,114; end; case 2: @@ -200,7 +200,7 @@ alberta,214,77,6 script Captain Janssen 4_M_SEAMAN,{ mes "[Captain Janssen]"; mes "Thank you so much! Now I can stock up on food and materials for my ship. You're kind, very kind!"; Zeny -= 10000; - set in_102tower,1; + in_102tower = 1; close; } } @@ -209,24 +209,24 @@ alberta,214,77,6 script Captain Janssen 4_M_SEAMAN,{ e_tower,81,105,0 script Tower Protection Stone 2_MONEMUS,{ - set .@party_id,getcharid(1); - set .@p_name$,getpartyname(.@party_id); - set .@md_name$,"Endless Tower"; + .@party_id = getcharid(1); + .@p_name$ = getpartyname(.@party_id); + .@md_name$ = "Endless Tower"; - set .@etower_timer,checkquest(60200,PLAYTIME); // 1 week - set .@etower_timer2,checkquest(60201,PLAYTIME); // 4 hours + .@etower_timer = questprogress(60200,PLAYTIME); // 1 week + .@etower_timer2 = questprogress(60201,PLAYTIME); // 4 hours if (!instance_check_party(.@party_id,2)) { mes "Make or join a party with more than 1 member and try again."; close; } - if (.@etower_timer == -1) { + if (!.@etower_timer) { if (getcharid(0) == getpartyleader(.@party_id,2)) { mes "Confirmed the party has been made. Would you like to reserve entrance to the Endless Tower?"; next; switch(select("Generate dungeon "+.@md_name$+":Enter the dungeon:Return to Alberta:Cancel")) { 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); @@ -235,7 +235,7 @@ e_tower,81,105,0 script Tower Protection Stone 2_MONEMUS,{ } mes "^0000ff"+.@md_name$+"^000000 - Try to reserve"; mes "After making a reservation, you have to talk to NPC behind and select the menu 'Enter the Dungeon' to enter the dungeon."; - for( set .@i, 1; .@i <= 6; set .@i, .@i + 1 ) { + for (.@i = 1; .@i <= 6; ++.@i) { if( instance_attachmap(.@i + "@tower", .@instance) == "" ) { mes "^0000ff"+.@md_name$+" ^000000- Reservation Failed!"; instance_destroy(.@instance); @@ -267,7 +267,7 @@ e_tower,81,105,0 script Tower Protection Stone 2_MONEMUS,{ case 3: end; } - } else if ((.@etower_timer >= 0) && (.@etower_timer2 < 2)) { + } else if (.@etower_timer == 1) { mes "If you have the dungeon generated already, you can enter it. "; next; switch(select("Enter the "+.@md_name$+":Return to Alberta:Cancel")) { @@ -282,15 +282,15 @@ e_tower,81,105,0 script Tower Protection Stone 2_MONEMUS,{ break; } close; - } else if ((.@etower_timer >= 0) && (.@etower_timer < 2) && (.@etower_timer2 == 2)) { + } else if (.@etower_timer == 1 && .@etower_timer2 == 2) { - set .@dun_lim_time,etower_timer+604800; // 1 week - set .@dun_lim_time2,etower_timer+14400; // 4 hours - set .@dun_cur_time,gettimetick(2); - set .@dun_ent_t,(.@dun_lim_time - .@dun_cur_time); - set .@dun_h,(.@dun_ent_t / 3600); - set .@dun_m,(.@dun_ent_t - (.@dun_h * 3600)) / 60; - set .@dun_s,.@dun_ent_t - ((.@dun_h * 3600) + (.@dun_m * 60)); + .@dun_lim_time = etower_timer+604800; // 1 week + .@dun_lim_time2 = etower_timer+14400; // 4 hours + .@dun_cur_time = gettimetick(2); + .@dun_ent_t = (.@dun_lim_time - .@dun_cur_time); + .@dun_h = (.@dun_ent_t / 3600); + .@dun_m = (.@dun_ent_t - (.@dun_h * 3600)) / 60; + .@dun_s = .@dun_ent_t - ((.@dun_h * 3600) + (.@dun_m * 60)); mes "Due to the tower's aftereffects, you cannot enter the dungeon right now, " + .@dun_h + "hours " + .@dun_m + "minutes " + .@dun_s + "seconds left to enter the next dungeon."; next; @@ -299,7 +299,7 @@ e_tower,81,105,0 script Tower Protection Stone 2_MONEMUS,{ warp "alberta",223,36; end; } else { - set etower_timer,0; + etower_timer = 0; erasequest 60200; erasequest 60201; mes "^0000ffThe records and after effects related to the Endless Tower have been removed. You can generate and enter the Endless Tower again.^000000"; @@ -314,7 +314,7 @@ L_Enter: } else { mapannounce "e_tower", strcharinfo(0)+" of the party, " +getarg(3)+", is entering the dungeon, Endless Tower.",bc_map,"0x00ff99",FW_NORMAL,12; if (getarg(1)) { - set etower_timer,gettimetick(2); + etower_timer = gettimetick(2); setquest 60200; setquest 60201; } @@ -338,7 +338,7 @@ OnTouch: e_tower,1,1,2 script #102Administrator Mode CLEAR_NPC,{ callfunc "F_GM_NPC"; mes "Please enter the password"; - set .@i, callfunc("F_GM_NPC","dmc2008",1); + .@i = callfunc("F_GM_NPC","dmc2008",1); next; if (.@i == 1) { switch(select("Generate Purification Stone:Remove Purification Stone:Cancel")) { @@ -362,7 +362,7 @@ e_tower,1,1,2 script #102Administrator Mode CLEAR_NPC,{ } e_tower,69,117,4 script Purification Stone#et1 2_MONEMUS,{ - set etower_timer,0; + etower_timer = 0; mes "^0000ffThe records and aftereffects related to the Endless Tower have been removed. You can generate and enter the Endless Tower again.^000000"; close; @@ -394,7 +394,7 @@ OnTimer1800000: e_tower,151,185,4 script Purification Stone#et2 CLEAR_NPC,{ callfunc "F_GM_NPC"; - set etower_timer,0; + etower_timer = 0; mes "^0000ffThe records and aftereffects related to the Endless Tower have been removed. You can generate and enter the Endless Tower again.^000000"; close2; warp "e_tower",75,108; @@ -405,9 +405,9 @@ e_tower,151,185,4 script Purification Stone#et2 CLEAR_NPC,{ //============================================================ function script F_Tower_Monster { - set .@level, getarg(0); - set .@map$, getarg(1); - set .@label$, getarg(2); + .@level = getarg(0); + .@map$ = getarg(1); + .@label$ = getarg(2); switch(.@level) { case 1: @@ -1018,8 +1018,8 @@ function script F_Tower_Monster { areamonster .@map$,181,9,191,45,"Cecil Damon",1638,2,.@label$; break; case 99: - for(set .@i,1; .@i<=7; set .@i,.@i+1) { - set .@mob_ran,rand(1,30); + for(.@i = 1; .@i<=7; ++.@i) { + .@mob_ran = rand(1,30); if (.@mob_ran == 1) areamonster .@map$,267,9,277,45,"Kathryne Keyron",1639,2,.@label$; else if (.@mob_ran == 2) @@ -1088,8 +1088,8 @@ function script F_Tower_Monster { function script F_Tower_Warp { - set .@level, getarg(0); - set .@map$, getarg(1); + .@level = getarg(0); + .@map$ = getarg(1); switch(.@level) { case 2: warp .@map$,136,354; break; @@ -1203,7 +1203,7 @@ function script F_Tower_Warp { setarray .@level$[1],"26th","51st","76th"; setarray .@map$[1],"2@tower","3@tower","4@tower"; - set .@i, select("26th Level:51st Level:76th Level"); + .@i = select("26th Level:51st Level:76th Level"); if (countitem(6000) < .@i) { mes "-Warning-"; @@ -1236,8 +1236,8 @@ OnInstanceInit: end; OnMyMobDead: - set .@map$, instance_mapname("1@tower"); - set .@mob_dead_num,mobcount(.@map$,instance_npcname("#1F Controller")+"::OnMyMobDead"); + .@map$ = instance_mapname("1@tower"); + .@mob_dead_num = mobcount(.@map$,instance_npcname("#1F Controller")+"::OnMyMobDead"); if (.@mob_dead_num < 1) { initnpctimer; //SetItemPartyInMap in_102floor 1 @@ -1274,9 +1274,9 @@ OnTouch_: end; OnMyMobDead: - set .@map$, strnpcinfo(4); - set .@level, atoi(replacestr(strnpcinfo(0),"FGate102tower","")) + 1; - set .@mob_dead_num,mobcount(.@map$,instance_npcname(strnpcinfo(0))+"::OnMyMobDead"); + .@map$ = strnpcinfo(4); + .@level = atoi(replacestr(strnpcinfo(0),"FGate102tower","")) + 1; + .@mob_dead_num = mobcount(.@map$,instance_npcname(strnpcinfo(0))+"::OnMyMobDead"); if (.@mob_dead_num < 1) { initnpctimer; //SetItemPartyInMap in_102floor .@level @@ -1285,7 +1285,7 @@ OnMyMobDead: end; OnTimer5000: - set .@level, atoi(replacestr(strnpcinfo(0),"FGate102tower","")) + 1; + .@level = atoi(replacestr(strnpcinfo(0),"FGate102tower","")) + 1; mapannounce strnpcinfo(4), "All Monsters on the "+callsub(L_Display,.@level)+" Level have been defeated.",bc_map,"0xffff00"; donpcevent instance_npcname(.@level+"FGate102tower")+"::OnEnable"; stopnpctimer; @@ -1293,7 +1293,7 @@ OnTimer5000: L_Display: // Display level properly. - set .@mod, getarg(0) % 10; + .@mod = getarg(0) % 10; if (.@mod == 1 && getarg(0) != 11) return getarg(0)+"st"; else if (.@mod == 2 && getarg(0) != 12) return getarg(0)+"nd"; else if (.@mod == 3 && getarg(0) != 13) return getarg(0)+"rd"; @@ -1383,7 +1383,7 @@ OnTimer120000: 1@tower,71,1,0 script #Manager Mode1 CLEAR_NPC,{ callfunc "F_GM_NPC"; mes "Please enter the password."; - set .@i, callfunc("F_GM_NPC","dmc2008",1); + .@i = callfunc("F_GM_NPC","dmc2008",1); next; if (.@i == 1) { mes "This NPC manages the tower from the 1st to the 25th Level."; @@ -1414,8 +1414,8 @@ OnInstanceInit: end; OnMyMobDead: - set .@map$, instance_mapname("2@tower"); - set .@mob_dead_num,mobcount(.@map$,instance_npcname("Immortal Furnace#1")+"::OnMyMobDead"); + .@map$ = instance_mapname("2@tower"); + .@mob_dead_num = mobcount(.@map$,instance_npcname("Immortal Furnace#1")+"::OnMyMobDead"); if (.@mob_dead_num < 1) { initnpctimer; //SetItemPartyInMap in_102floor 26 @@ -1499,7 +1499,7 @@ OnTouch_: 2@tower,71,1,0 script #Manager Mode2 CLEAR_NPC,{ callfunc "F_GM_NPC"; mes "Please enter the password."; - set .@i, callfunc("F_GM_NPC","dmc2008",1); + .@i = callfunc("F_GM_NPC","dmc2008",1); next; if (.@i == 1) { mes "This NPC manages the tower from the 26st to the 50th Level."; @@ -1530,8 +1530,8 @@ OnInstanceInit: end; OnMyMobDead: - set .@map$, instance_mapname("3@tower"); - set .@mob_dead_num,mobcount(.@map$,instance_npcname("Immortal Furnace#2")+"::OnMyMobDead"); + .@map$ = instance_mapname("3@tower"); + .@mob_dead_num = mobcount(.@map$,instance_npcname("Immortal Furnace#2")+"::OnMyMobDead"); if (.@mob_dead_num < 1) { initnpctimer; //SetItemPartyInMap in_102floor 51 @@ -1615,7 +1615,7 @@ OnTouch_: 3@tower,71,1,0 script #Manager Mode3 CLEAR_NPC,{ callfunc "F_GM_NPC"; mes "Please enter the password."; - set .@i, callfunc("F_GM_NPC","dmc2008",1); + .@i = callfunc("F_GM_NPC","dmc2008",1); next; if (.@i == 1) { mes "This NPC manages the tower from the 51st to the 75th Level."; @@ -1646,8 +1646,8 @@ OnInstanceInit: end; OnMyMobDead: - set .@map$, instance_mapname("4@tower"); - set .@mob_dead_num,mobcount(.@map$,instance_npcname("Immortal Furnace#3")+"::OnMyMobDead"); + .@map$ = instance_mapname("4@tower"); + .@mob_dead_num = mobcount(.@map$,instance_npcname("Immortal Furnace#3")+"::OnMyMobDead"); if (.@mob_dead_num < 1) { initnpctimer; //SetItemPartyInMap in_102floor 76 @@ -1730,7 +1730,7 @@ OnTouch_: 4@tower,71,1,0 script #Manager Mode4 CLEAR_NPC,{ callfunc "F_GM_NPC"; mes "Please enter the password."; - set .@i, callfunc("F_GM_NPC","dmc2008",1); + .@i = callfunc("F_GM_NPC","dmc2008",1); next; if (.@i == 1) { mes "This NPC manages the tower from the 76th to the 99th Level."; @@ -1772,7 +1772,7 @@ OnTouch_: next; mes "^0000ffAs soon as the voice stopped talking, an irresistible force lifted and moved you somewhere else."; close2; - set in_102tower,10; + in_102tower = 10; warp "alberta",223,36; } else { @@ -1857,8 +1857,8 @@ OnInstanceInit: end; OnMyMobDead: - set .@map$, instance_mapname("5@tower"); - set .@mob_dead_num,mobcount(.@map$,instance_npcname("#102FShadowDust1")+"::OnMyMobDead"); + .@map$ = instance_mapname("5@tower"); + .@mob_dead_num = mobcount(.@map$,instance_npcname("#102FShadowDust1")+"::OnMyMobDead"); if (.@mob_dead_num < 1) { mapannounce .@map$, "Mysterious Voice: Who are you to dare intrude upon my sanctuary?!",bc_map,"0xffff00"; donpcevent instance_npcname("#102FShadowDust")+"::OnDisable"; @@ -1880,7 +1880,7 @@ OnDisable: end; OnEnable: - set .@map$, instance_mapname("5@tower"); + .@map$ = instance_mapname("5@tower"); monster .@map$,72,93,"Thorny Skeleton",1958,1; monster .@map$,70,87,"Thorn of Magic",1960,1; monster .@map$,68,83,"Thorn of Pureness",1961,1; @@ -1922,7 +1922,7 @@ OnEnable: 5@tower,71,1,0 script #Manager Mode5 CLEAR_NPC,{ callfunc "F_GM_NPC"; mes "This NPC manages the crystal on the 100th Level. Please enter the password."; - set .@i, callfunc("F_GM_NPC","dmc2008",1); + .@i = callfunc("F_GM_NPC","dmc2008",1); next; if (.@i == 1) { donpcevent instance_npcname("Lucid Crystal#102")+"::OnEnable"; @@ -1982,7 +1982,7 @@ OnInstanceInit: end; OnMyMobDead: - set .@mob_dead_num,mobcount(instance_mapname("6@tower"),instance_npcname("Tyrant's Throne#")+"::OnMyMobDead"); + .@mob_dead_num = mobcount(instance_mapname("6@tower"),instance_npcname("Tyrant's Throne#")+"::OnMyMobDead"); if (.@mob_dead_num < 1) { donpcevent instance_npcname("#1st Beeper")+"::OnEnable"; disablenpc instance_npcname("Tyrant's Throne#"); @@ -2014,7 +2014,7 @@ OnTimer15500: end; OnTimer20500: - set .@map$, instance_mapname("6@tower"); + .@map$ = instance_mapname("6@tower"); mapannounce .@map$,"Let's see who runs fastest. Are you ready?",bc_map,"0x00ffcc"; stopnpctimer; areamonster .@map$,151,66,153,106,"Bone Guardian",1152,50,instance_npcname("#1st Beeper")+"::OnMyMobDead"; @@ -2022,8 +2022,8 @@ OnTimer20500: end; OnMyMobDead: - set .@map$, instance_mapname("6@tower"); - set .@mob_dead_num,mobcount(.@map$,instance_npcname("#1st Beeper")+"::OnMyMobDead"); + .@map$ = instance_mapname("6@tower"); + .@mob_dead_num = mobcount(.@map$,instance_npcname("#1st Beeper")+"::OnMyMobDead"); if (.@mob_dead_num < 1) { donpcevent instance_npcname("#2nd Beeper")+"::OnEnable"; //SetItemPartyInMap in_102floor 101 @@ -2049,7 +2049,7 @@ OnTimer5500: end; OnTimer10500: - set .@map$, instance_mapname("6@tower"); + .@map$ = instance_mapname("6@tower"); mapannounce .@map$,"I demand an encore!",bc_map,"0x00ffcc"; stopnpctimer; areamonster .@map$,151,66,153,106,"Wind Guardian",1263,30,instance_npcname("#2nd Beeper")+"::OnMyMobDead"; @@ -2057,8 +2057,8 @@ OnTimer10500: end; OnMyMobDead: - set .@map$, instance_mapname("6@tower"); - set .@mob_dead_num,mobcount(.@map$,instance_npcname("#2nd Beeper")+"::OnMyMobDead"); + .@map$ = instance_mapname("6@tower"); + .@mob_dead_num = mobcount(.@map$,instance_npcname("#2nd Beeper")+"::OnMyMobDead"); if (.@mob_dead_num < 1) { donpcevent instance_npcname("#3rd Beeper")+"::OnEnable"; //SetItemPartyInMap in_102floor 102 @@ -2084,7 +2084,7 @@ OnTimer5500: end; OnTimer10500: - set .@map$, instance_mapname("6@tower"); + .@map$ = instance_mapname("6@tower"); mapannounce .@map$,"How would you like to play one more round?",bc_map,"0x00ffcc"; stopnpctimer; areamonster .@map$,151,66,153,106,"Sword Edge Guardian",1132,20,instance_npcname("#3rd Beeper")+"::OnMyMobDead"; @@ -2092,8 +2092,8 @@ OnTimer10500: end; OnMyMobDead: - set .@map$, instance_mapname("6@tower"); - set .@mob_dead_num,mobcount(.@map$,instance_npcname("#3rd Beeper")+"::OnMyMobDead"); + .@map$ = instance_mapname("6@tower"); + .@mob_dead_num = mobcount(.@map$,instance_npcname("#3rd Beeper")+"::OnMyMobDead"); if (.@mob_dead_num < 1) { donpcevent instance_npcname("#4th Beeper")+"::OnEnable"; //SetItemPartyInMap in_102floor 103 @@ -2119,7 +2119,7 @@ OnTimer5500: end; OnTimer10500: - set .@map$, instance_mapname("6@tower"); + .@map$ = instance_mapname("6@tower"); mapannounce .@map$,"You'll soon know. Mine is the face of death!",bc_map,"0x00ffcc"; stopnpctimer; monster .@map$,156,147,"Nacht Sieger",1956,1,instance_npcname("#4th Beeper")+"::OnMyMobDead"; diff --git a/npc/instances/NydhoggsNest.txt b/npc/instances/NydhoggsNest.txt index 9ccdade10..6538330fc 100644 --- a/npc/instances/NydhoggsNest.txt +++ b/npc/instances/NydhoggsNest.txt @@ -32,7 +32,7 @@ nyd_dun02,100,201,3 script Yggdrasil Gatekeeper HIDDEN_NPC,8,8,{ specialeffect2 EF_HOLYHIT; pushpc 3,3; if (ep13_1_edq == 14) - set ep13_1_edq,15; + ep13_1_edq = 15; mes "A mysterious power prevents you from getting too close. It looks like there is something strong beyond the door..."; next; mes "Perhaps there's a great hidden secret beyond the gate, beyond expectation."; @@ -42,7 +42,7 @@ nyd_dun02,100,201,3 script Yggdrasil Gatekeeper HIDDEN_NPC,8,8,{ next; mes "You'll have to obtain the others trust in the expendition camp by working hard."; } - set ins_nyd,1; + ins_nyd = 1; close; case 2: close; @@ -54,7 +54,7 @@ nyd_dun02,100,201,3 script Yggdrasil Gatekeeper HIDDEN_NPC,8,8,{ next; mes "It would be better to go back to camp and inform the others and ask for help."; if (ep13_1_edq == 14 || ep13_1_edq == 15) { - set ep13_1_edq,15; + ep13_1_edq = 15; close; } next; @@ -78,7 +78,7 @@ nyd_dun02,100,201,3 script Yggdrasil Gatekeeper HIDDEN_NPC,8,8,{ mes "In the name of Yggdrasiliad, I will accept you as a servant of the Guardian."; next; specialeffect2 EF_CHANGECOLD; - set ins_nyd,200; + ins_nyd = 200; mes "[Yggdrasil Gatekeeper]"; mes "I accept your entrance through the Guardian's gate. You are now considered a faithful servant of the Guardian Nidhoggur."; next; @@ -89,15 +89,15 @@ nyd_dun02,100,201,3 script Yggdrasil Gatekeeper HIDDEN_NPC,8,8,{ } } else if (ins_nyd == 131 || ins_nyd == 132 || ins_nyd > 199) { - set .@party_id,getcharid(1); - set .@md_name$,"Nidhoggur's Nest"; + .@party_id = getcharid(1); + .@md_name$ = "Nidhoggur's Nest"; - set .@ins_nyd_check,checkquest(3135,PLAYTIME); // 3 Day cooldown - set .@ins_nyd_check2,checkquest(3136,PLAYTIME); // 4 Hour play limit + .@ins_nyd_check = questprogress(3135,PLAYTIME); // 3 Day cooldown + .@ins_nyd_check2 = questprogress(3136,PLAYTIME); // 4 Hour play limit mes "As I put my hands on the stone gate, a voice sounded from the depth of my heart."; next; - if (.@ins_nyd_check == -1 && .@ins_nyd_check2 == -1) { + if (!.@ins_nyd_check && !.@ins_nyd_check2) { if (!instance_check_party(.@party_id,2,70)) { mes "[Yggdrasil Gatekeeper]"; mes "Where are the other servants, so you can work together? Each servant cannot be admitted here individually..."; @@ -115,13 +115,13 @@ nyd_dun02,100,201,3 script Yggdrasil Gatekeeper HIDDEN_NPC,8,8,{ next; switch(select("Please allow me to enter.:I want to go in.:I want to leave.")) { case 1: - set .@instance, instance_create(.@md_name$, .@party_id); + .@instance = instance_create(.@md_name$, .@party_id); if (.@instance < 0) { mes "[Yggdrasil Gatekeeper]"; mes "The Guardian seems to wish to be alone. I will go in and check, please wait out here."; close; } - for( set .@i, 1; .@i <= 2; set .@i, .@i + 1 ) { + for (.@i = 1; .@i <= 2; ++.@i) { if( instance_attachmap(.@i + "@nyd", .@instance) == "" ) break; } @@ -150,7 +150,7 @@ nyd_dun02,100,201,3 script Yggdrasil Gatekeeper HIDDEN_NPC,8,8,{ close; goto L_Enter; } else { - if (.@ins_nyd_check == 0 || .@ins_nyd_check == 1) { + if (.@ins_nyd_check == 1) { if ('ins_nyd2 == 3 || 'ins_nyd2 == 4) { mes "[Yggdrasil Gatekeeper]"; mes "With the defeat of Nidhoggur's Shadow, the roots of the World Tree Yggdrasil are also affected."; @@ -166,7 +166,7 @@ nyd_dun02,100,201,3 script Yggdrasil Gatekeeper HIDDEN_NPC,8,8,{ close; goto L_Enter; } else if (.@ins_nyd_check == 2) { - if (.@ins_nyd_check2 == 0 || .@ins_nyd_check2 == 1) { + if (.@ins_nyd_check2 == 1) { mes "[Yggdrasil Gatekeeper]"; mes "The time limit to enter the dungeon has expired. You must wait for the World Tree to stabilize its power before trying to re-enter."; close; @@ -178,7 +178,7 @@ nyd_dun02,100,201,3 script Yggdrasil Gatekeeper HIDDEN_NPC,8,8,{ mes "If you would like to enter again, please register with me."; erasequest 3135; erasequest 3136; - set 'ins_nyd2,0; + 'ins_nyd2 = 0; close; } } @@ -210,8 +210,8 @@ L_Enter: close; } else { mapannounce "nyd_dun02", getpartyname(getcharid(1))+"'s party member "+strcharinfo(0)+" has entered Nidhoggur's Nest.",bc_map,"0x00ff99"; - if (checkquest(3135) == -1) setquest 3135; - if (checkquest(3136) == -1) setquest 3136; + if (!questprogress(3135)) setquest 3135; + if (!questprogress(3136)) setquest 3136; warp "1@nyd",32,37; close; } @@ -278,7 +278,7 @@ mid_camp,271,299,3 script Historian Magnifier#edq 4_M_SAGE_C,3,3,{ next; mes "[Historian Magnifier]"; mes "I will definitely help you find a way to enter the World Tree directly so, just believe in me! Okay~!!"; - set ins_nyd,3; + ins_nyd = 3; close; } else if (ins_nyd == 3) { mes "Why are you standing there? Go to my assistant in the Prontera Library!"; @@ -336,7 +336,7 @@ mid_camp,271,299,3 script Historian Magnifier#edq 4_M_SAGE_C,3,3,{ next; mes "[Historian Magnifier]"; mes "I'll also keep searching here. If you find anything, come back and let me know."; - set ins_nyd,5; + ins_nyd = 5; close; } } else if ((ins_nyd == 5) || (ins_nyd == 51) || (ins_nyd == 52)) { @@ -375,7 +375,7 @@ mid_camp,271,299,3 script Historian Magnifier#edq 4_M_SAGE_C,3,3,{ next; mes "[Historian Magnifier]"; mes "Let's report to Commander Agip about the situation so far. Then, we wait on his decision."; - set ins_nyd,7; + ins_nyd = 7; close; } else if ((ins_nyd == 7) || (ins_nyd == 8)) { mes "Report to Commander Hibba Agip about what we have discovered, since time is dependent on his decision."; @@ -412,7 +412,7 @@ mid_camp,271,299,3 script Historian Magnifier#edq 4_M_SAGE_C,3,3,{ prt_in,171,94,3 script Assistant Naomi#edq 4_F_HUWOMAN,3,3,{ mes "[Assistant Naomi]"; - set .@name$,strcharinfo(0); + .@name$ = strcharinfo(0); if (ins_nyd == 3) { mes "The doctor never ever tries to come back, and there're too many things to do... How can I do it all..."; next; @@ -519,7 +519,7 @@ prt_in,171,94,3 script Assistant Naomi#edq 4_F_HUWOMAN,3,3,{ next; mes "[Assistant Naomi]"; mes "Before you go back to the Doctor, you had better read these books. So, I will go back to work."; - set ins_nyd,4; + ins_nyd = 4; close; } } else if (ins_nyd == 4) { @@ -615,7 +615,7 @@ splendide,198,178,3 script Grumbling Soldier#edq 4_M_FAIRYSOLDIER,3,3,{ next; mes "[Grumbling Soldier]"; mes "Might be... those Sapha tribesmen have dug in the cave before... They do have a special talent for digging."; - set ins_nyd,51; + ins_nyd = 51; close; case 2: mes "[Grumbling Soldier]"; @@ -675,7 +675,7 @@ splendide,240,164,3 script Sighing Soldier#edq 4_M_FAIRYSOLDIER2,3,3,{ next; mes "[Sighing Soldier]"; mes "We don't know if the monsters there are strong, so we never checked it out. But on a personal level, nobody wants to go there..."; - set ins_nyd,51; + ins_nyd = 51; close; case 2: mes "[Sighing Soldier]"; @@ -761,7 +761,7 @@ spl_in01,109,60,3 script Commander Lebiordirr#edq 4_F_FAIRY,3,3,{ next; mes "[Commander Lebiordirr]"; mes "Now, if you understand this, inform your friends."; - set ins_nyd,61; + ins_nyd = 61; close; } else if (ins_nyd == 61) { mes "If you can't follow this rule, I will stop associating with you and ban all of your people from here."; @@ -843,7 +843,7 @@ spl_in01,109,60,3 script Commander Lebiordirr#edq 4_F_FAIRY,3,3,{ next; mes "[Commander Lebiordirr]"; mes "Here, outsider. Arioss will explain the situation with the giants. Talk with him..."; - set ins_nyd,91; + ins_nyd = 91; close; } else if ((ins_nyd == 91) || (ins_nyd == 101) || (ins_nyd == 111) || (ins_nyd == 200) || (ins_nyd == 201) || (ins_nyd == 202)) { mes "Outsider. Arioss here will explain the situation with the giants, talk with him..."; @@ -906,7 +906,7 @@ spl_in01,109,60,3 script Commander Lebiordirr#edq 4_F_FAIRY,3,3,{ next; mes "[Aide Arioss]"; mes "Commander..."; - set ins_nyd,121; + ins_nyd = 121; close; } else if ((ins_nyd == 121) || (ins_nyd == 131)) { mes "Strange one, thank you for your cooperation in such situations... Please forget what has happened today..."; @@ -978,7 +978,7 @@ spl_in01,104,56,3 script Aide Arioss#edq 4_F_FAIRYKID2,3,3,{ next; mes "[Aide Arioss]"; mes "I have already told you what you wanted to know... If you need anything else, just let me know."; - set ins_nyd,101; + ins_nyd = 101; close; } else if (ins_nyd == 101) { mes "Ah, you said that there is a strange power blocking the entrance to the Guardian's nest, right?"; @@ -1019,7 +1019,7 @@ spl_in01,104,56,3 script Aide Arioss#edq 4_F_FAIRYKID2,3,3,{ next; mes "[Aide Arioss]"; mes "Please meet the Guardian, and come back with an answer to everything. I believe in you."; - set ins_nyd,111; + ins_nyd = 111; close; } else if ((ins_nyd == 101) || (ins_nyd == 111) || (ins_nyd == 200) || (ins_nyd == 201) || (ins_nyd == 202)) { mes "Please meet with the Guardian and take a wise answer from him. I will trust you."; @@ -1039,7 +1039,7 @@ spl_in01,104,56,3 script Aide Arioss#edq 4_F_FAIRYKID2,3,3,{ mes "It can't compare with the effort you have put in for us... but please accept our token of friendship."; getexp 1500000,350000; getitem 6081,10; //Splendide_Coin - set ins_nyd,131; + ins_nyd = 131; mes "[Aide Arioss]"; mes "If we can help you with anything in the future, we will do all we can to assist you. Once again, thank you."; close; @@ -1140,7 +1140,7 @@ man_in01,311,57,3 script Neat Etorr#edq 4_MAN_NITT,3,3,{ next; mes "[Neat Etorr]"; mes "You have heard it all, now please report back to your race."; - set ins_nyd,62; + ins_nyd = 62; close; } else if (ins_nyd == 62) { mes "That captive is the only reference for our tribe, so we have taken good care of her. She is related to your current investigation."; @@ -1225,7 +1225,7 @@ man_in01,311,57,3 script Neat Etorr#edq 4_MAN_NITT,3,3,{ next; mes "[Neat Etorr]"; mes "Strange one, we hope our cooperation will be a good one. Now please go interrogate the Laphine prisoner."; - set ins_nyd,92; + ins_nyd = 92; close; } else if ((ins_nyd == 92) || (ins_nyd == 102) || (ins_nyd == 112) || (ins_nyd == 200) || (ins_nyd == 201) || (ins_nyd == 202)) { mes "Strange one, we hope our cooperation will be a good one. Now please go interrogate the Laphine prisoner."; @@ -1275,7 +1275,7 @@ man_in01,311,57,3 script Neat Etorr#edq 4_MAN_NITT,3,3,{ mes "It's not a lot, but please this as a token of our appreciation."; getexp 1500000,350000; getitem 6080,10; //Manuk_Coin - set ins_nyd,132; + ins_nyd = 132; close; } else if (ins_nyd == 132) { mes "Strange one, thank you for helping us in the time of need. I will never forget your kindness."; @@ -1345,7 +1345,7 @@ man_in01,291,62,3 script Laphine Prisoner#edq 4_F_FAIRYKID2,3,3,{ next; mes "[Laphine Prisoner]"; mes "I just want to say this...if the Sapha tribe intrude that place, we will never forgive them!"; - set ins_nyd,52; + ins_nyd = 52; close; case 3: mes "[Laphine Prisoner]"; @@ -1420,7 +1420,7 @@ man_in01,291,62,3 script Laphine Prisoner#edq 4_F_FAIRYKID2,3,3,{ next; mes "[Laphine Prisoner]"; mes "I have already told you everything you wanted to hear. If you have any other requests, please let me know."; - set ins_nyd,102; + ins_nyd = 102; close; } else if (ins_nyd == 102) { mes "Ah, you said that there is a strange power blocking the entrance to the Guardian's nest, right?"; @@ -1461,7 +1461,7 @@ man_in01,291,62,3 script Laphine Prisoner#edq 4_F_FAIRYKID2,3,3,{ next; mes "[Laphine Prisoner]"; mes "Please meet the Guardian, and come back with an answer to everything. And tell the answer to..."; - set ins_nyd,112; + ins_nyd = 112; close; } else if ((ins_nyd == 71) || (ins_nyd == 81) || (ins_nyd == 91) || (ins_nyd == 101) || (ins_nyd == 111) || (ins_nyd == 121) || (ins_nyd == 131)) { mes "... ..."; @@ -1555,7 +1555,7 @@ OnTouch_: mes "[World Tree Yggdrasil]"; mes "My soul... it has been trapped here. You're the only ones I can trust now."; next; - set .@exit,1; + .@exit = 1; } if (.@exit) break; } @@ -1608,7 +1608,7 @@ OnTouch_: next; mes "[World Tree Yggdrasil]"; mes "And... Be careful... Be careful of the shadow's power."; - set 'ins_nyd2,1; + 'ins_nyd2 = 1; donpcevent instance_npcname("ins_nyd_1f_timer")+"::OnEnable"; donpcevent instance_npcname("nyd_call_mon_1")+"::OnEnable"; close; @@ -1665,7 +1665,7 @@ OnTouch: end; OnInstanceInit: // Temporary fix for @reloadscript. - set 'ins_nyd2,0; + 'ins_nyd2 = 0; end; } @@ -1675,7 +1675,7 @@ OnInstanceInit: end; OnEnable: - set .@map$, instance_mapname("1@nyd"); + .@map$ = instance_mapname("1@nyd"); monster .@map$,220,250,"Nidhoggur's Guardian#1",2020,1,instance_npcname("nyd_call_mon_1")+"::OnMyMobDead"; monster .@map$,220,252,"Nidhoggur's Guardian#2",2020,1,instance_npcname("nyd_call_mon_1")+"::OnMyMobDead"; monster .@map$,240,270,"Nidhoggur's Guardian#3",2020,1,instance_npcname("nyd_call_mon_1")+"::OnMyMobDead"; @@ -1697,13 +1697,13 @@ OnDisable: end; OnMyMobDead: - set .@map$, instance_mapname("1@nyd"); - set .@mob_dead_num,mobcount(.@map$, instance_npcname("nyd_call_mon_1")+"::OnMyMobDead"); + .@map$ = instance_mapname("1@nyd"); + .@mob_dead_num = mobcount(.@map$, instance_npcname("nyd_call_mon_1")+"::OnMyMobDead"); if (.@mob_dead_num < 1) { mapannounce .@map$, "All of Nidhoggur's Guardians have been defeated!",bc_map,"0x00ff99"; donpcevent instance_npcname("ins_nyd_1f_timer")+"::OnDisable"; donpcevent instance_npcname("nyd_to2f_warp")+"::OnEnable"; - set 'ins_nyd2,2; + 'ins_nyd2 = 2; } end; } @@ -1763,14 +1763,14 @@ OnEnable: end; OnTouch: - set 'ins_nyd2,3; + 'ins_nyd2 = 3; warp instance_mapname("2@nyd"),200,10; end; } 1@nyd,1,1,0 script ins_nyd1_spawn_mobs -1,{ OnInstanceInit: - set .@map$, instance_mapname("1@nyd"); + .@map$ = instance_mapname("1@nyd"); monster .@map$,0,0,"Ancient Tree",2019,40,instance_npcname("ins_nyd1_spawn_mobs")+"::OnMyTreeDead"; monster .@map$,0,0,"Rhyncho",2020,30,instance_npcname("ins_nyd1_spawn_mobs")+"::OnMyRhynDead"; monster .@map$,0,0,"Phylla",2021,30,instance_npcname("ins_nyd1_spawn_mobs")+"::OnMyPhyDead"; @@ -1862,7 +1862,7 @@ OnInstanceInit: OnEnable: enablenpc instance_npcname("nyd_2f_boss_enter_call"); - set .@map$, instance_mapname("2@nyd"); + .@map$ = instance_mapname("2@nyd"); monster .@map$,199,327,"Nidhoggur's Shadow",2022,1,instance_npcname("nyd_2f_boss_enter_call")+"::OnMyMobDead"; mapannounce .@map$, "Nidhoggur's Shadow : I will devour all of you... you and the World Tree Yggdrasil.",bc_map,"0x00ff99"; //donpcevent instance_npcname("nyd_2f_boss_enter_call")+"::OnGo"; @@ -1877,7 +1877,7 @@ OnDisable: OnTimer180000: stopnpctimer; OnWarpColor: - set .@map$, instance_mapname("2@nyd"); + .@map$ = instance_mapname("2@nyd"); switch(rand(1,4)) { case 1: mapannounce .@map$, "Nidhoggur's Shadow : In this chaos... your blood is just what I need.",bc_map,"0xFFFF00"; @@ -1915,7 +1915,7 @@ OnWarpColor: end; OnMyMobDead: - set .@map$, instance_mapname("2@nyd"); + .@map$ = instance_mapname("2@nyd"); if (mobcount(.@map$,instance_npcname("nyd_2f_boss_enter_call")+"::OnMyMobDead") < 1) { mapannounce .@map$, "Nidhoggur's Shadow : World Tree Yggdrasil's guardian... his powers are disappearing...",bc_map,"0x00ff99"; donpcevent instance_npcname("World Tree Yggdrasil#2F")+"::OnEnable"; @@ -1925,7 +1925,7 @@ OnMyMobDead: donpcevent instance_npcname("nyd_2f_white_c")+"::OnDisable"; donpcevent instance_npcname("nyd_2f_yellow_c")+"::OnDisable"; donpcevent instance_npcname("nyd_2f_green_c")+"::OnDisable"; - set 'ins_nyd2,4; + 'ins_nyd2 = 4; end; } end; @@ -1976,8 +1976,8 @@ OnTimer180000: next; switch(select("Please let me out.:I want to look around for a while.")) { case 1: - set 'ins_nyd2,0; - set ins_nyd,203; + 'ins_nyd2 = 0; + ins_nyd = 203; //setquest 3135; warp "nyd_dun02",98,196; end; @@ -2051,8 +2051,8 @@ OnInstanceInit: OnEnable: enablenpc instance_npcname(strnpcinfo(0)); initnpctimer; - set .@map$, instance_mapname("2@nyd"); - set .@label$, instance_npcname(strnpcinfo(0))+"::OnMyMobDead"; + .@map$ = instance_mapname("2@nyd"); + .@label$ = instance_npcname(strnpcinfo(0))+"::OnMyMobDead"; if (compare(strnpcinfo(0),"red")) { monster .@map$,120,285,"Nidhoggur's Guardian#1",2020,1,.@label$; monster .@map$,119,286,"Nidhoggur's Guardian#2",2020,1,.@label$; @@ -2081,7 +2081,7 @@ OnEnable: end; OnMyMobDead: - set .@map$, instance_mapname("2@nyd"); + .@map$ = instance_mapname("2@nyd"); if (mobcount(.@map$,instance_npcname(strnpcinfo(0))+"::OnMyMobDead") < 1) { mapannounce .@map$, "Nidhoggur's Shadow : You're not bad... but I will be your opponent this time.",bc_map,"0x00ff99"; donpcevent instance_npcname("nyd_2f_boss_enter_logic")+"::OnEnable"; @@ -2155,7 +2155,7 @@ OnTouch: 2@nyd,1,1,0 script ins_nyd2_spawn_mobs -1,{ OnInstanceInit: - set .@map$, instance_mapname("2@nyd"); + .@map$ = instance_mapname("2@nyd"); areamonster .@map$,200,92,180,80,"Rhyncho",2020,40,instance_npcname("ins_nyd2_spawn_mobs")+"::OnMyRhynDead"; areamonster .@map$,200,92,180,80,"Phylla",2021,40,instance_npcname("ins_nyd2_spawn_mobs")+"::OnMyPhyDead"; areamonster .@map$,200,92,180,80,"Dark Shadow",2023,40,instance_npcname("ins_nyd2_spawn_mobs")+"::OnMyDarkshaDead"; @@ -2193,8 +2193,8 @@ sec_in02,36,167,3 script Nidhoggur Manager 4_M_FAIRYSOLDIER,1,1,{ next; switch(select("Reset variables to allow entrance to Nidhoggur:change variable 'ins_nyd':Remove 3 day timer 3135:Confirm variable number")) { case 1: - set ins_nyd,200; - set ins_nyd2,0; + ins_nyd = 200; + ins_nyd2 = 0; erasequest 3135; mes "ins_nyd set to 200 ins_nyd2 set to 0"; mes "quest 3135 erased."; @@ -2203,8 +2203,8 @@ sec_in02,36,167,3 script Nidhoggur Manager 4_M_FAIRYSOLDIER,1,1,{ mes "Which variable do you want to change?"; next; switch(select("ins_nyd:ins_nyd2")) { - case 1: set .@var$,"ins_nyd"; break; - case 2: set .@var$,"ins_nyd2"; break; + case 1: .@var$ = "ins_nyd"; break; + case 2: .@var$ = "ins_nyd2"; break; } mes "Input the variable number"; next; @@ -2228,7 +2228,7 @@ sec_in02,36,167,3 script Nidhoggur Manager 4_M_FAIRYSOLDIER,1,1,{ nyd_dun02,7,7,2 script Purification Admin#nyd2 CLEAR_NPC,2,0,{ callfunc "F_GM_NPC"; mes "Please enter the password"; - set .@i, callfunc("F_GM_NPC","dragonslayer",1); + .@i = callfunc("F_GM_NPC","dragonslayer",1); next; if (.@i == 0) { mes "Enter the password exactly."; @@ -2259,8 +2259,8 @@ nyd_dun02,7,7,2 script Purification Admin#nyd2 CLEAR_NPC,2,0,{ nyd_dun02,88,195,4 script Purification Stone#nyd2 2_MONEMUS,{ erasequest 3135; erasequest 3136; - set ins_nyd,200; - set ins_nyd2,0; + ins_nyd = 200; + ins_nyd2 = 0; mes "^0000FFThe records and after-effect related to the Nidhoggur's Nest have been removed. You can generate and enter the dungeon again.^000000"; close; OnInit: diff --git a/npc/instances/OrcsMemory.txt b/npc/instances/OrcsMemory.txt index 55f88f99d..e43e3df10 100644 --- a/npc/instances/OrcsMemory.txt +++ b/npc/instances/OrcsMemory.txt @@ -42,23 +42,23 @@ //============================================================ gef_fild10,242,202,0 script Dimensional Gorge Piece 2_MONEMUS,{ - set .@party_id,getcharid(1); - set .@p_name$,getpartyname(.@party_id); - set .@md_name$,"Orc's Memory"; + .@party_id = getcharid(1); + .@p_name$ = getpartyname(.@party_id); + .@md_name$ = "Orc's Memory"; if (!instance_check_party(.@party_id,2,30,80)) { mes "Only users between Levels ^ff000030 ~ 80^000000 can enter this Dungeon."; close; } - set .@orctime,checkquest(12059,PLAYTIME); - if (.@orctime == -1) { + .@orctime = questprogress(12059,PLAYTIME); + if (!.@orctime) { if (getcharid(0) == getpartyleader(.@party_id,2)) { mes "Party status confirmed. Would you like to book entrance to the "+.@md_name$+"?"; next; switch(select("Reserve the "+.@md_name$+":Enter the Dungeon:Cancel")) { 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); @@ -66,7 +66,7 @@ gef_fild10,242,202,0 script Dimensional Gorge Piece 2_MONEMUS,{ close; } mes "^0000ff"+.@md_name$+"^000000- Attempting to book an entrance"; - for( set .@i, 1; .@i <= 2; set .@i, .@i + 1 ) { + for (.@i = 1; .@i <= 2; ++.@i) { if( instance_attachmap(.@i + "@orcs", .@instance) == "" ) break; } @@ -87,7 +87,7 @@ gef_fild10,242,202,0 script Dimensional Gorge Piece 2_MONEMUS,{ if(select(.@md_name$ + " Enter the Memorial Dungeon:Cancel") == 2) end; callsub L_Enter,1; - } else if (.@orctime == 0 || .@orctime == 1) { + } else if (.@orctime == 1) { mes "You can enter the Dungeon if it has been generated."; next; if(select("Enter the Dungeon "+.@md_name$+":Cancel") == 2) @@ -110,7 +110,7 @@ L_Enter: close; } else { mapannounce "gef_fild10", .@p_leader$ + " of the party, " + .@p_name$ + " is entering the "+.@md_name$+".",bc_map,"0x00ff99"; - if (checkquest(12059)== -1) setquest 12059; + if (!questprogress(12059)) setquest 12059; warp "1@orcs",179,15; end; } @@ -158,7 +158,7 @@ gef_fild10,238,202,6 script Mad Scientist#orc 4_LGTSCIENCE,{ case 1: mes "[Mad Scientist]"; mes "Very good! Just sit in the hands of this statue! And try to act natural when you're in there!"; - set mad,1; + mad = 1; close; case 2: mes "[Mad Scientist]"; @@ -170,7 +170,7 @@ gef_fild10,238,202,6 script Mad Scientist#orc 4_LGTSCIENCE,{ mes "Hmm? Put your hand on that Monemus Statue if you want to experience traveling through dimensions!"; close; } else { - set mad,1; + mad = 1; end; } } @@ -195,10 +195,10 @@ OnEnable: end; OnMyMobDead: - set .@map$, instance_mapname("1@orcs"); - set .@mob_dead_num, 30 - mobcount(.@map$,instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead"); + .@map$ = instance_mapname("1@orcs"); + .@mob_dead_num = 30 - mobcount(.@map$,instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead"); if (.@mob_dead_num > 0) { - set .@mob_ran,rand(1,30); + .@mob_ran = rand(1,30); if (.@mob_ran > 29) { monster .@map$,0,0,"Orc Warrior",1023,.@mob_dead_num,instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead"; } @@ -231,7 +231,7 @@ OnTimer10: end; OnTimer4010: - set .@map$, instance_mapname("1@orcs"); + .@map$ = instance_mapname("1@orcs"); mapannounce .@map$, "Stalactic Golems are digging out of the deep underground.",bc_map,"0x77ff77"; areamonster .@map$,17,187,27,177,"Stalactic Golem",1278,20,instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead"; stopnpctimer; @@ -255,8 +255,8 @@ OnEnable: end; OnMyMobDead: - set .@map$, instance_mapname("1@orcs"); - set .@mob_dead_num, 15 - mobcount(.@map$,instance_npcname("#Resurrect Monsters2")+"::OnMyMobDead"); + .@map$ = instance_mapname("1@orcs"); + .@mob_dead_num = 15 - mobcount(.@map$,instance_npcname("#Resurrect Monsters2")+"::OnMyMobDead"); if (rand(1,30) > 15) { if (.@mob_dead_num > 0) { monster .@map$,0,0,"Trained Wolf",1106,.@mob_dead_num,instance_npcname("#Resurrect Monsters2")+"::OnMyMobDead"; @@ -287,9 +287,9 @@ OnEnable: end; OnMyMobDead: - set .@map$, instance_mapname("1@orcs"); - set .@mob_dead_num, 15 - mobcount(.@map$,instance_npcname("#Resurrect Monsters3")+"::OnMyMobDead"); - set .@mob_ran,rand(1,30); + .@map$ = instance_mapname("1@orcs"); + .@mob_dead_num = 15 - mobcount(.@map$,instance_npcname("#Resurrect Monsters3")+"::OnMyMobDead"); + .@mob_ran = rand(1,30); if (.@mob_ran > 29) { if (.@mob_dead_num > 0) { monster .@map$,0,0,"Orc Archer",1189,.@mob_dead_num,instance_npcname("#Resurrect Monsters3")+"::OnMyMobDead"; @@ -320,8 +320,8 @@ OnInstanceInit: end; OnMyMobDead: - set .@map$, instance_mapname("1@orcs"); - set .@mob_dead_num, 10 - mobcount(.@map$,instance_npcname("#Resurrect Monsters4")+"::OnMyMobDead"); + .@map$ = instance_mapname("1@orcs"); + .@mob_dead_num = 10 - mobcount(.@map$,instance_npcname("#Resurrect Monsters4")+"::OnMyMobDead"); if (.@mob_dead_num > 0) { monster .@map$,0,0,"Anopheles",1627,.@mob_dead_num,instance_npcname("#Resurrect Monsters4")+"::OnMyMobDead"; } @@ -542,10 +542,10 @@ OnDisable: end; OnMyMobDead: - set .@map$, instance_mapname("2@orcs"); - set .@mob_dead_num, 30 - mobcount(.@map$,instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead"); + .@map$ = instance_mapname("2@orcs"); + .@mob_dead_num = 30 - mobcount(.@map$,instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead"); if (.@mob_dead_num > 0) { - set .@mob_ran,rand(1,30); + .@mob_ran = rand(1,30); if (.@mob_ran > 29) { monster .@map$,0,0,"Vengeful Orc",1152,.@mob_dead_num,instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead"; } @@ -575,7 +575,7 @@ OnTimer10: end; OnTimer4010: - set .@map$, instance_mapname("2@orcs"); + .@map$ = instance_mapname("2@orcs"); mapannounce .@map$, "[ Wraiths were summoned by an unknown power ]",bc_map,"0x77ff77"; areamonster .@map$,167,25,177,35,"Wraith",1475,30,instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead"; stopnpctimer; @@ -595,9 +595,9 @@ OnEnable: end; OnMyMobDead: - set .@map$, instance_mapname("2@orcs"); - set .@mob_dead_num, 15 - mobcount(.@map$,instance_npcname("#2Resurrect Monsters3")+"::OnMyMobDead"); - set .@mob_ran,rand(1,30); + .@map$ = instance_mapname("2@orcs"); + .@mob_dead_num = 15 - mobcount(.@map$,instance_npcname("#2Resurrect Monsters3")+"::OnMyMobDead"); + .@mob_ran = rand(1,30); if (.@mob_ran > 29) { if (.@mob_dead_num > 0) { monster .@map$,0,0,"Orc Archer",1189,.@mob_dead_num,instance_npcname("#2Resurrect Monsters3")+"::OnMyMobDead"; @@ -632,8 +632,8 @@ OnInstanceInit: end; OnMyMobDead: - set .@map$, instance_mapname("2@orcs"); - set .@mob_dead_num, 10 - mobcount(.@map$,instance_npcname("#2Resurrect Monsters4")+"::OnMyMobDead"); + .@map$ = instance_mapname("2@orcs"); + .@mob_dead_num = 10 - mobcount(.@map$,instance_npcname("#2Resurrect Monsters4")+"::OnMyMobDead"); if (.@mob_dead_num > 0) { monster .@map$,0,0,"Anopheles",1627,1,instance_npcname("#2Resurrect Monsters4")+"::OnMyMobDead"; } @@ -727,7 +727,7 @@ OnInstanceInit: end; OnEnable: - set .@map$, instance_mapname("2@orcs"); + .@map$ = instance_mapname("2@orcs"); monster .@map$,109,156,"Safeguard Chief",1981,1,instance_npcname("#Mobs Control")+"::OnMyMobDead1"; mapannounce .@map$, "The Chief Orc of Safeguards: Oh!! Looks like I have company. Defeat me if you can!!",bc_map,"0xff8888"; end; @@ -758,7 +758,7 @@ OnInstanceInit: end; OnEnable: - set .@map$, instance_mapname("2@orcs"); + .@map$ = instance_mapname("2@orcs"); monster .@map$,67,64,"Orc Sniper",1982,1,instance_npcname("#Mobs Control")+"::OnMyMobDead2"; mapannounce .@map$, "Orc Sniper: Hah! Pretty impressive that you made it this far, but your foolish little trip ends here...",bc_map,"0xff8888"; end; @@ -789,7 +789,7 @@ OnInstanceInit: end; OnEnable: - set .@map$, instance_mapname("2@orcs"); + .@map$ = instance_mapname("2@orcs"); monster .@map$,152,147,"Depraved Orc Spirit",1983,1,instance_npcname("#Mobs Control")+"::OnMyMobDead3"; mapannounce .@map$, "Depraved Orc Spirit: I smell flesh! Hungry! Wanna try some human meat!!",bc_map,"0xff8888"; end; @@ -831,7 +831,7 @@ OnInstanceInit: end; OnEnable: - set .@map$, instance_mapname("2@orcs"); + .@map$ = instance_mapname("2@orcs"); monster .@map$,185,8,"Shaman Cargalache",1984,1,instance_npcname("#Boss Control")+"::OnMyMobDead"; monster .@map$,179,15,"Depraved Orc Hero",1087,1; enablenpc instance_npcname("#Boss Control"); @@ -839,8 +839,8 @@ OnEnable: OnMyMobDead: donpcevent instance_npcname("Kruger#")+"::OnEnable"; - set .@map$, instance_mapname("2@orcs"); - set .@mob_ran,rand(1,5); + .@map$ = instance_mapname("2@orcs"); + .@mob_ran = rand(1,5); if (.@mob_ran == 1) { mapannounce .@map$, "Shaman Cargalache: How... How could this be... How could someone like you...!!",bc_map,"0xffff00"; } @@ -900,7 +900,7 @@ OnTouch: mes "Thank you, I'm sure she's finally free from the nightmare that used to choke her soul."; next; mes "Kruger was about to say something more, but he breathed his last breath before he could..."; - set yong_odun,2; + yong_odun = 2; close; } else { diff --git a/npc/instances/SealedShrine.txt b/npc/instances/SealedShrine.txt index 215ceffeb..82267be7a 100644 --- a/npc/instances/SealedShrine.txt +++ b/npc/instances/SealedShrine.txt @@ -42,11 +42,11 @@ monk_test,309,146,3 script Friar Patrick#edq 4_M_OLDFRIAR,{ mes "What brought you to this place?"; next; if (countitem(6004) > 0) { - set .@doll,1; - set .@selection,select("What is this place?:I want to enter.:About the Cursed Baphomet Doll.:Cancel."); + .@doll = 1; + .@selection = select("What is this place?:I want to enter.:About the Cursed Baphomet Doll.:Cancel."); } else { - set .@selection,select("What is this place?:I want to enter.:Cancel."); + .@selection = select("What is this place?:I want to enter.:Cancel."); } switch(.@selection) { case 1: @@ -99,28 +99,28 @@ monk_test,309,146,3 script Friar Patrick#edq 4_M_OLDFRIAR,{ case 2: if (BaseLevel >= 75) { - set .@party_id,getcharid(1); + .@party_id = getcharid(1); mes "[Friar Patrick]"; mes "Do you mean you'll go to the shrine and reseal Baphomet?"; next; // 12 hour cooldown - set .@ins_bapho_check,checkquest(3040,PLAYTIME); + .@ins_bapho_check = questprogress(3040,PLAYTIME); // Two hour play limit - //set .@ins_bapho_check2,checkquest(3045,PLAYTIME); + //.@ins_bapho_check2 = questprogress(3045,PLAYTIME); - if (.@ins_bapho_check == -1) { + if (!.@ins_bapho_check) { if (getpartyleader(.@party_id,2) == getcharid(0) && instance_check_party(.@party_id,2,75)) { mes "[Friar Patrick]"; mes "Party name is "+getpartyname(.@party_id)+"..."; mes "Name of the leader is "+strcharinfo(0)+"..."; - set .@instance, instance_create("Sealed Catacomb",.@party_id); + .@instance = instance_create("Sealed Catacomb",.@party_id); if (.@instance < 0) { mes "Umm... But it seems that there is a problem here... I'll check quickly. Please wait."; } else { - for( set .@i, 1; .@i <= 2; set .@i, .@i + 1 ) { + for (.@i = 1; .@i <= 2; ++.@i) { if( instance_attachmap("" + .@i + "@cata", .@instance) == "" ) break; } @@ -158,7 +158,7 @@ monk_test,309,146,3 script Friar Patrick#edq 4_M_OLDFRIAR,{ mes "Once the party leader is permitted, the rest of the party can enter. This is a rule of this monastery, so please understand."; } } - else if (.@ins_bapho_check == 0 || .@ins_bapho_check == 1) { + else if (.@ins_bapho_check == 1) { mes "[Friar Patrick]"; mes "It seems you have entered this shrine recently... You cannot reenter because Baphomet's Curse still remains. Baphomet's Curse disappears only after a certain amount of time has passed."; } @@ -170,8 +170,8 @@ monk_test,309,146,3 script Friar Patrick#edq 4_M_OLDFRIAR,{ mes "Haaaaaaap... Hocus Pocus Wingardium Abracadabra!!!!!"; next; erasequest 3040; - if (checkquest(3041)>=0) erasequest 3041; - if (checkquest(3045)>=0) erasequest 3045; + if (questprogress(3041)) erasequest 3041; + if (questprogress(3045)) erasequest 3045; mes "[Friar Patrick]"; mes "Huu... It's over. Now that I've released Baphomet's Curse, you can enter again."; } @@ -224,11 +224,11 @@ monk_test,306,151,3 script Grave of Baphomet#edq HIDDEN_NPC,{ close; // 12 hour cooldown - set .@ins_bapho_check,checkquest(3040,PLAYTIME); + .@ins_bapho_check = questprogress(3040,PLAYTIME); // Two hour play limit - //set .@ins_bapho_check2,checkquest(3045,PLAYTIME); + //.@ins_bapho_check2 = questprogress(3045,PLAYTIME); - if (.@ins_bapho_check == -1) { + if (!.@ins_bapho_check) { if (has_instance("1@cata") == "") { mes "It's cold to the touch. It doesn't respond."; close; @@ -238,7 +238,7 @@ monk_test,306,151,3 script Grave of Baphomet#edq HIDDEN_NPC,{ warp "1@cata",100,224; end; } - } else if (.@ins_bapho_check == 0 || .@ins_bapho_check == 1) { + } else if (.@ins_bapho_check == 1) { mes "[Friar Patrick]"; mes "It seems you have entered this shrine recently... You cannot reenter because the curse of Baphomet still remains."; mes "The curse of Baphomet disappears after a certain amount of time after you entered."; @@ -251,8 +251,8 @@ monk_test,306,151,3 script Grave of Baphomet#edq HIDDEN_NPC,{ mes "Haaaaaaap... Wingardium Leviosa Expecto Patronum !!!!!"; specialeffect2 EF_HOLYHIT; erasequest 3040; - if (checkquest(3041)>=0) erasequest 3041; - if (checkquest(3045)>=0) erasequest 3045; + if (questprogress(3041)) erasequest 3041; + if (questprogress(3045)) erasequest 3045; next; mes "[Friar Patrick]"; mes "Huu... It's over. Now I released all of the curses on you. You can enter again."; @@ -261,14 +261,14 @@ monk_test,306,151,3 script Grave of Baphomet#edq HIDDEN_NPC,{ } prt_monk,261,91,3 script Rust Blackhand#edq 4_M_DWARF,{ - set .@new_maje,checkquest(3043); + .@new_maje = questprogress(3043); mes "[Rust Blackhand]"; mes "Who are you? What do you want me for?"; next; mes "[Rust Blackhand]"; mes "You're not a monk, then what do you want?"; next; - if (.@new_maje == 0 || .@new_maje == 1) { + if (.@new_maje == 1) { mes "[Rust Blackhand]"; mes "Did you bring all of the ingredients?"; next; @@ -311,7 +311,7 @@ prt_monk,261,91,3 script Rust Blackhand#edq 4_M_DWARF,{ close; } } - else if ((.@new_maje == -1) && (countitem(6004) > 0)) { + else if (!.@new_maje && countitem(6004) > 0) { switch(select("About the Cursed Baphomet Doll:Stop talking.")) { case 1: mes "[Rust Blackhand]"; @@ -364,12 +364,12 @@ prt_monk,261,91,3 script Rust Blackhand#edq 4_M_DWARF,{ close; } } - else if ((.@new_maje == -1) && (countitem(6004) == 0)) { + else if (!.@new_maje && countitem(6004) == 0) { mes "[Rust Blackhand]"; mes "If you don't have business with me, go away! As you see, I make equipment for the Brothers at the monastery, not for adventurers like you. Do you understand?"; close; } - else if ((.@new_maje == 2) && (countitem(6004) > 0)) { + else if (.@new_maje == 2 && countitem(6004) > 0) { switch(select("About the Cursed Baphomet Doll:Stop talking.")) { case 1: mes "[Rust Blackhand]"; @@ -420,7 +420,7 @@ prt_monk,261,91,3 script Rust Blackhand#edq 4_M_DWARF,{ close; } } - else if ((.@new_maje == 2) && (countitem(6004) == 0)) { + else if (.@new_maje == 2 && countitem(6004) == 0) { mes "[Rust Blackhand]"; mes "Why are you hanging around here? If you don't want a ^4d4dffGigantic Magestic Goat^000000, go away."; close; @@ -432,8 +432,8 @@ prt_monk,261,91,3 script Rust Blackhand#edq 4_M_DWARF,{ 1@cata,1,2,0 script ins_baphomet_lotto -1,{ OnInstanceInit: // Pick one "true" Gravestone and 12 "false" Gravestones. - set .@true, rand(1,13); - for(set .@i,1; .@i<13; set .@i,.@i+1) { + .@true = rand(1,13); + for (.@i = 1; .@i<13; ++.@i) { disablenpc instance_npcname("Gravestone#1F_1"+((.@i == .@true)?"F":"T")); } disablenpc instance_npcname("ins_baphomet_lotto"); @@ -442,15 +442,15 @@ OnInstanceInit: 1@cata,3,2,0 script ins_baphomet_lotto2 -1,{ OnEnable: - for(set .@i,1; .@i<12; set .@i,.@i+1) + for (.@i = 1; .@i < 12; ++.@i) enablenpc instance_npcname("Bobbing Torch#"+.@i); end; } 1@cata,4,2,0 script ins_baphomet_lotto3 -1,{ OnEnable: - set .@label$, instance_npcname("ins_baphomet_lotto3")+"::OnMyMobDead"; - set .@map$, instance_mapname("1@cata"); + .@label$ = instance_npcname("ins_baphomet_lotto3")+"::OnMyMobDead"; + .@map$ = instance_mapname("1@cata"); monster .@map$,0,0,"Apostle of Baphomet",1869,1,.@label$; monster .@map$,0,0,"Apostle of Baphomet",1291,1,.@label$; monster .@map$,0,0,"Apostle of Baphomet",1869,1,.@label$; @@ -473,7 +473,7 @@ OnDisable: end; OnMyMobDead: - set .@map$, instance_mapname("1@cata"); + .@map$ = instance_mapname("1@cata"); if (mobcount(.@map$,instance_npcname("ins_baphomet_lotto3")+"::OnMyMobDead") < 1) { mapannounce .@map$, "All apostles of Baphomet are dead!",bc_map,"0x00ff99"; } @@ -484,7 +484,7 @@ OnMyMobDead: // Soul of hero near the north grave //============================================================ 1@cata,141,221,0 script Gravestone# CLEAR_NPC,3,3,{ - set .@party_id,getcharid(1); + .@party_id = getcharid(1); if ('ins_baphomet == 0) { mes "The gravestone is trembling..."; next; @@ -522,7 +522,7 @@ OnMyMobDead: next; mes "[Voice of the Gravestone]"; mes "If your ^0000FFparty leader^000000 brings me the pendant, my soul can be substantialized. So, hurry up."; - set 'ins_baphomet,1; + 'ins_baphomet = 1; close; case 3: mes "I can feel the voice becoming faint."; @@ -586,12 +586,12 @@ OnTouch: end; OnInstanceInit: // Temporary fix for @reloadscript. - set 'ins_baphomet,0; + 'ins_baphomet = 0; end; } 1@cata,176,119,4 script Ancient Hero's Soul#1F 4_M_CHAMPSOUL,{ - set .@party_id,getcharid(1); + .@party_id = getcharid(1); cutin "ins_cata_champ_n",2; if ('ins_baphomet == 2) { mes "[Ancient Hero's Soul]"; @@ -610,7 +610,7 @@ OnInstanceInit: // Temporary fix for @reloadscript. cutin "ins_cata_champ_n",2; switch(select("What is Essence of Fire?:What is a Token of Apostle?:What should I do?:I am ready.")) { case 1: - set .@ins_baphomet_1f_1,.@ins_baphomet_1f_1+1; + ++.@ins_baphomet_1f_1; mes "[Ancient Hero's Soul]"; mes "You can see the torches here and there. These torches are the essence of Thor, the god of Thunder. They are inherited from our predecessors to stop the darkness of Baphomet..."; next; @@ -625,7 +625,7 @@ OnInstanceInit: // Temporary fix for @reloadscript. next; break; case 2: - set .@ins_baphomet_1f_2,.@ins_baphomet_1f_2+1; + ++.@ins_baphomet_1f_2; mes "[Ancient Hero's Soul]"; mes "At that time, it was impossible to get rid of Devil Baphomet by ourselves. After numerous heroes sacrificed their lives, we could barely seal him under this Abbey."; next; @@ -652,7 +652,7 @@ OnInstanceInit: // Temporary fix for @reloadscript. next; break; case 3: - set .@ins_baphomet_1f_3,.@ins_baphomet_1f_3+1; + ++.@ins_baphomet_1f_3; if (getpartyleader(.@party_id,2) == getcharid(0)) { mes "[Ancient Hero's Soul]"; mes "You look like the leader of this party. You need to go and get ^0000FF10 Essence of Fire^000000 from the torches."; @@ -690,7 +690,7 @@ OnInstanceInit: // Temporary fix for @reloadscript. mes "[Ancient Hero's Soul]"; mes "Are you ready to go? Then I'll open this sealed gate now."; next; - set .@exitloop,1; + .@exitloop = 1; } else { cutin "ins_cata_champ_a",2; @@ -708,7 +708,7 @@ OnInstanceInit: // Temporary fix for @reloadscript. if (getpartyleader(.@party_id,2) == getcharid(0)) { mes "[Ancient Hero's Soul]"; mes "To remind you again, I must be substantialized within the next hour. So everyone, finish your work within that time!"; - set 'ins_baphomet,3; + 'ins_baphomet = 3; donpcevent instance_npcname("ins_baphomet_1f_timer")+"::OnEnable"; donpcevent instance_npcname("ins_baphomet_lotto2")+"::OnEnable"; donpcevent instance_npcname("ins_baphomet_lotto3")+"::OnEnable"; @@ -716,7 +716,7 @@ OnInstanceInit: // Temporary fix for @reloadscript. else { mes "[Ancient Hero's Soul]"; mes "To remind you again, I can be substantialized for the next hour. So everyone, finish your work within that time."; - //set 'ins_baphomet,3; + //'ins_baphomet = 3; } close2; cutin "",255; @@ -729,7 +729,7 @@ OnInstanceInit: // Temporary fix for @reloadscript. next; if ((countitem(6001) > 9) && (countitem(6002) > 0)) { delitem 6001,countitem(6001); //Essence_Of_Fire - set 'ins_baphomet,4; + 'ins_baphomet = 4; mes "[Ancient Hero's Soul]"; mes "Okay. You've done your work. Now check your companions and tell me when everyone has finished their work."; } @@ -747,7 +747,7 @@ OnInstanceInit: // Temporary fix for @reloadscript. mes "Do you have a ^0000FFToken of Apostle^000000?"; next; if (countitem(6002) > 0) { - set 'ins_baphomet,4; + 'ins_baphomet = 4; mes "[Ancient Hero's Soul]"; mes "Okay. You've done your work. Tell your representative to check your companions and come to me when everyone has finished their work."; } @@ -764,7 +764,7 @@ OnInstanceInit: // Temporary fix for @reloadscript. mes "[Ancient Hero's Soul]"; mes "Are you ready? I opened the sealed gate. To pass the gate, you should carry a ^0000FFToken of Apostle^000000."; next; - set 'ins_baphomet,5; + 'ins_baphomet = 5; specialeffect EF_TELEPORTATION; enablenpc instance_npcname("ins_bapho_to_2f"); mes "[Ancient Hero's Soul]"; @@ -815,7 +815,7 @@ OnInstanceInit: OnTouch: if (countitem(6002) > 0) { delitem 6002,countitem(6002); //Token_Of_Apostle - set 'ins_baphomet,5; + 'ins_baphomet = 5; warp instance_mapname("2@cata"),80,144; end; } @@ -835,7 +835,7 @@ OnInstanceInit: - script Gravestone#SS1 -1,{ if ('ins_baphomet == 1) { getitem 6003,1; //Soul_Pendant - set 'ins_baphomet,2; + 'ins_baphomet = 2; mes "A small object is shining under a leaning grave."; next; mes "[" + strcharinfo(0) + "]"; @@ -882,7 +882,7 @@ OnInstanceInit: // Bobbing Torches //============================================================ - script Bobbing Torch#SS -1,{ - set .@party_id,getcharid(1); + .@party_id = getcharid(1); if (getpartyleader(.@party_id,2) == getcharid(0)) { if (('ins_baphomet == 3) && (countitem(6001) < 11)) { mes "A huge torch appearing as if it can burn everything is bobbing up and down in front of me."; @@ -1011,7 +1011,7 @@ OnTimer18000: 2@cata,50,67,0 script slave_left -1,5,5,{ OnTouch: - set .@map$, instance_mapname("2@cata"); + .@map$ = instance_mapname("2@cata"); mapannounce .@map$, "Apostle of Baphomet : Kill the humans! Don't let them interrupt the revival of our Master!",bc_map,"0xFFFF00"; monster .@map$,55,67,"Apostle of Baphomet",1869,1; monster .@map$,51,67,"Apostle of Baphomet",1291,1; @@ -1035,7 +1035,7 @@ OnTouch: 2@cata,109,67,0 script slave_right -1,5,5,{ OnTouch: - set .@map$, instance_mapname("2@cata"); + .@map$ = instance_mapname("2@cata"); mapannounce .@map$, "Apostle of Baphomet : Kill the humans! Don't let them interrupt the revival of our Master!",bc_map,"0xFFFF00"; monster .@map$,105,67,"Apostle of Baphomet",1869,1; monster .@map$,104,67,"Apostle of Baphomet",1291,1; @@ -1059,7 +1059,7 @@ OnTouch: 2@cata,79,39,0 script slave_down -1,5,5,{ OnTouch: - set .@map$, instance_mapname("2@cata"); + .@map$ = instance_mapname("2@cata"); mapannounce .@map$, "Apostle of Baphomet : Kill the humans! Don't let them interrupt the revival of our Master!",bc_map,"0xFFFF00"; monster .@map$,78,41,"Apostle of Baphomet",1869,1; monster .@map$,79,42,"Apostle of Baphomet",1291,1; @@ -1084,8 +1084,8 @@ OnTouch: // Magical Seals //============================================================ - script Magical Seal#SS -1,{ - set .@seal_check,checkquest(3041,PLAYTIME); - if (.@seal_check == 0 || .@seal_check == 1) { + .@seal_check = questprogress(3041,PLAYTIME); + if (.@seal_check == 1) { specialeffect2 EF_SILENCEATTACK; percentheal -50,0; sc_start Eff_Stone,30000,0; @@ -1095,7 +1095,7 @@ OnTouch: if (.@seal_check == 2) erasequest 3041; specialeffect EF_LEXDIVINA; disablenpc instance_npcname(strnpcinfo(0)); - set .@map$, instance_mapname("2@cata"); + .@map$ = instance_mapname("2@cata"); if (strnpcinfo(2) == "0") areamobuseskill .@map$,79,81,10,1929,"NPC_INVINCIBLEOFF",1,0,0,e_hlp,0; else if (strnpcinfo(2) == "2") areamobuseskill .@map$,123,109,10,1929,"NPC_INVINCIBLEOFF",1,0,0,e_hlp,0; else if (strnpcinfo(2) == "4") areamobuseskill .@map$,123,22,10,1929,"NPC_INVINCIBLEOFF",1,0,0,e_hlp,0; @@ -1121,7 +1121,7 @@ OnInstanceInit: 2@cata,35,109,0 duplicate(Magical Seal#SS) Magical Seal#10 CLEAR_NPC 2@cata,79,65,0 script The Main Altar#ss CLEAR_NPC,{ - set .@party_id,getcharid(1); + .@party_id = getcharid(1); if (('ins_baphomet == 5) && (getpartyleader(.@party_id,2) == getcharid(0))) { mes "An evil power, too terrible to describe, lies under the great altar radiating a violet color."; next; @@ -1133,7 +1133,7 @@ OnInstanceInit: specialeffect EF_METEORSTORM; mes "[" + strcharinfo(0) + "]"; mes "Watch out! Something... Something is coming."; - set 'ins_baphomet,6; + 'ins_baphomet = 6; donpcevent instance_npcname("ins_2f_hero_broad")+"::OnEnable"; disablenpc instance_npcname("The Main Altar#ss"); close; @@ -1149,7 +1149,7 @@ OnInstanceInit: 2@cata,80,63,4 script Ancient Hero's Soul#2F 4_M_CHAMPSOUL,{ cutin "ins_cata_champ_s",2; - if (checkquest(3041)>=0) erasequest 3041; + if (questprogress(3041)) erasequest 3041; mes "[Ancient Hero's Soul]"; mes "Good job, my descendants... You've finished the long-cherished task that me and my bretheren could not complete."; next; @@ -1168,7 +1168,7 @@ OnInstanceInit: mes "[Ancient Hero's Soul]"; mes "If you leave, please say hello to Patrick for me."; cutin "",255; - set 'ins_baphomet,0; + 'ins_baphomet = 0; warp "monk_test",310,150; close; case 2: @@ -1235,9 +1235,9 @@ OnEnable: end; OnMyMobDead: - set .@map$, instance_mapname("2@cata"); + .@map$ = instance_mapname("2@cata"); if (mobcount(.@map$,instance_npcname("control_baphomet")+"::OnMyMobDead") < 1) { - set 'ins_baphomet,7; + 'ins_baphomet = 7; erasequest 3041; mapannounce .@map$, "Baphomet : No! Nonono! How dare these weaklings defeat me!... No!!...",bc_map,"0xdb7093"; enablenpc instance_npcname("Ancient Hero's Soul#2F"); @@ -1455,7 +1455,7 @@ OnTimer70000: 1@cata,1,1,0 script ins_1f_spawn_mobs -1,{ OnInstanceInit: - set .@map$, instance_mapname("1@cata"); + .@map$ = instance_mapname("1@cata"); monster .@map$,0,0,"Zombie Master",1298,10; monster .@map$,0,0,"Wraith Dead",1291,10; //monster .@map$,0,0,"Ancient Mimic",1699,10; |