summaryrefslogtreecommitdiff
path: root/npc/instances/EndlessTower.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/instances/EndlessTower.txt')
-rw-r--r--npc/instances/EndlessTower.txt136
1 files changed, 68 insertions, 68 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";
generated by cgit v1.2.3-60-g2f50 (git 2.42.0) at 2024-07-02 21:22:21 +0000