diff options
| -rw-r--r-- | doc/constants.md | 2 | ||||
| -rw-r--r-- | npc/instances/EndlessTower.txt | 2260 | ||||
| -rw-r--r-- | npc/instances/OrcsMemory.txt | 726 | ||||
| -rw-r--r-- | npc/instances/SealedShrine.txt | 1879 | ||||
| -rw-r--r-- | npc/other/Global_Functions.txt | 19 | ||||
| -rw-r--r-- | src/map/script.c | 70 |
6 files changed, 2434 insertions, 2522 deletions
diff --git a/doc/constants.md b/doc/constants.md index 828ece36a..fa077b965 100644 --- a/doc/constants.md +++ b/doc/constants.md @@ -3787,6 +3787,8 @@ - `UDT_LIFETIME`: 52 - `UDT_MERC_KILLCOUNT`: 53 - `UDT_STATADD`: 54 +- `UDT_ROBE`: 55 +- `UDT_BODY2`: 56 ## Hardcoded Constants (source) diff --git a/npc/instances/EndlessTower.txt b/npc/instances/EndlessTower.txt index f94bc177a..dc60ce766 100644 --- a/npc/instances/EndlessTower.txt +++ b/npc/instances/EndlessTower.txt @@ -37,164 +37,163 @@ //========================================================================= alberta,214,77,6 script Captain Janssen 4_M_SEAMAN,{ - if (checkweight(Knife,1) == 0) { - mes "^008800Wait here!!"; - mes "You're carrying too much stuff. Why don't you put some of it away, and then come back.^000000"; - close; + if (checkweight(Knife, 1) == 0) { + mes("^008800Wait here!!"); + mes("You're carrying too much stuff. Why don't you put some of it away, and then come back.^000000"); + close(); } if (BaseLevel < 50) { - mes "[Captain Janssen]"; - mes "Sigh... I don't know if I can ever go back to sailing the sea..."; - close; + mes("[Captain Janssen]"); + mes("Sigh... I don't know if I can ever go back to sailing the sea..."); + close(); } .@name$ = strcharinfo(PC_NAME); 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; - mes "^0000ffThe old man, after finishing his orders, walks towards you.^000000"; - next; - mes "[Captain Janssen]"; - mes "I was touched when you accepted a request from me, a stranger, so easily. You must truly be one of those good, heroic adventurers. Are you interested in setting out on an ocean voyage?"; - next; - mes "["+.@name$+"]"; - mes "I've sailed a few times... But now that I think about it, I've never gone across the continent."; - next; - mes "[Captain Janssen]"; - mes "No, that's good enough. I may just have one small fishing vessel, but I used to be a captain that commanded a fleet."; - next; - mes "[Captain Janssen]"; - mes "As you may know after a few sea voyages, not many people have gone across the ocean beyond the continent. I too have failed to conquer the ocean."; - next; - 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"; + 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(); + mes("^0000ffThe old man, after finishing his orders, walks towards you.^000000"); + next(); + mes("[Captain Janssen]"); + mes("I was touched when you accepted a request from me, a stranger, so easily. You must truly be one of those good, heroic adventurers. Are you interested in setting out on an ocean voyage?"); + next(); + mesf("[%s]", .@name$); + mes("I've sailed a few times... But now that I think about it, I've never gone across the continent."); + next(); + mes("[Captain Janssen]"); + mes("No, that's good enough. I may just have one small fishing vessel, but I used to be a captain that commanded a fleet."); + next(); + mes("[Captain Janssen]"); + mes("As you may know after a few sea voyages, not many people have gone across the ocean beyond the continent. I too have failed to conquer the ocean."); + next(); + 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"); in_102tower = 2; - close; + close(); } else if (in_102tower == 2) { - mes "[Captain Janssen]"; - mes "So all I could do was cast anchor at that humongous tower after my fleet was wrecked. At first, we were only going to stay there until the rainstorm was over, but it didn't end as soon as we had hoped."; - next; - mes "[Captain Janssen]"; - mes "My crew was starving, and a few of them walked into the tower in order to find food... They never came back."; - next; - mes "["+.@name$+"]"; - mes "Why didn't you go in there with them?"; - next; - mes "[Captain Janssen]"; - mes "My instincts told me that tower was dangerous. I was curious, but I wasn't going to risk my life. We waited for them to come back for 7 days until the rainstorm was finally over, but no one returned."; - next; - mes "[Captain Janssen]"; - mes "In our desperation to survive, we abandoned all our goods, and left the tower only with a little bit of the water and edible plants we'd found around the tower. When we finally reached land, I was the only one alive..."; - next; - mes "^0000ffYou could imagine the heartwretching scene of the dying fleet on their last voyage, even if he didn't explain it any further. A look of somber regret swept over his face as he remained silent a while, and then he said:^000000"; - next; - mes "[Captain Janssen]"; - mes "I have something I must do before I die. I must retrieve the remains of my crew that died in the tower, and give them a proper burial."; - next; - mes "[Captain Janssen]"; - mes "I feel so lucky to meet a warm-hearted adventurer like you. With the money you've given me, I can finally go sailing to the tower again."; - next; - mes "["+.@name$+"]"; - mes "How about hiring me as your first mate?"; - next; - mes "[Captain Janssen]"; - mes "Thank you, but it is an extremely dangerous place. I have my duty to fulfill, but you don't have any obligation to me or them. I don't wish to sacrifice someone as young as you to such a dangerous place."; - next; - mes "["+.@name$+"]"; - mes "No..."; - mes "."; - mes "."; - mes "As an adventurer, there's my obligation to those in need. I'm also very curious about that place..."; - next; - mes "[Captain Janssen]"; - mes "I was going to leave right away, but since you've joined me, I should give you time to prepare. I'll be waiting here until you're ready to go."; - next; - mes "[Captain Janssen]"; - mes "...Okay then..."; - mes "Welcome aboard, first mate."; + mes("[Captain Janssen]"); + mes("So all I could do was cast anchor at that humongous tower after my fleet was wrecked. At first, we were only going to stay there until the rainstorm was over, but it didn't end as soon as we had hoped."); + next(); + mes("[Captain Janssen]"); + mes("My crew was starving, and a few of them walked into the tower in order to find food... They never came back."); + next(); + mesf("[%s]", .@name$); + mes("Why didn't you go in there with them?"); + next(); + mes("[Captain Janssen]"); + mes("My instincts told me that tower was dangerous. I was curious, but I wasn't going to risk my life. We waited for them to come back for 7 days until the rainstorm was finally over, but no one returned."); + next(); + mes("[Captain Janssen]"); + mes("In our desperation to survive, we abandoned all our goods, and left the tower only with a little bit of the water and edible plants we'd found around the tower. When we finally reached land, I was the only one alive..."); + next(); + mes("^0000ffYou could imagine the heartwretching scene of the dying fleet on their last voyage, even if he didn't explain it any further. A look of somber regret swept over his face as he remained silent a while, and then he said:^000000"); + next(); + mes("[Captain Janssen]"); + mes("I have something I must do before I die. I must retrieve the remains of my crew that died in the tower, and give them a proper burial."); + next(); + mes("[Captain Janssen]"); + mes("I feel so lucky to meet a warm-hearted adventurer like you. With the money you've given me, I can finally go sailing to the tower again."); + next(); + mesf("[%s]", .@name$); + mes("How about hiring me as your first mate?"); + next(); + mes("[Captain Janssen]"); + mes("Thank you, but it is an extremely dangerous place. I have my duty to fulfill, but you don't have any obligation to me or them. I don't wish to sacrifice someone as young as you to such a dangerous place."); + next(); + mesf("[%s]", .@name$); + mes("No..."); + mes("."); + mes("."); + mes("As an adventurer, there's my obligation to those in need. I'm also very curious about that place..."); + next(); + mes("[Captain Janssen]"); + mes("I was going to leave right away, but since you've joined me, I should give you time to prepare. I'll be waiting here until you're ready to go."); + next(); + mes("[Captain Janssen]"); + mes("...Okay then..."); + mes("Welcome aboard, first mate."); in_102tower = 3; - close; + close(); } else if (in_102tower == 3) { - mes "[Captain Janssen]"; - mes "Shall we leave now?"; - next; - switch(select("Yes, let's go!", "No, I'm not quite ready...")) { + mes("[Captain Janssen]"); + mes("Shall we leave now?"); + next(); + switch (select("Yes, let's go!", "No, I'm not quite ready...")) { case 1: - mes "[Captain Janssen]"; - mes "Then pull up the anchor, first mate!"; - close2; + mes("[Captain Janssen]"); + mes("Then pull up the anchor, first mate!"); + close2(); in_102tower = 4; - warp "e_tower",70,114; + warp("e_tower", 70, 114); end; case 2: - mes "[Captain Janssen]"; - mes "Sure, no problem. Come back when you're ready."; - close; + mes("[Captain Janssen]"); + mes("Sure, no problem. Come back when you're ready."); + close(); } } else if (in_102tower > 3) { - mes "[Captain Janssen]"; - mes "Well, to travel the ocean again, we need to restock on goods. If you give me 10,000 Zeny, I'll take care of the rest."; - next; - switch(select("I'll come back later.", "Let's go, now!")) { + mes("[Captain Janssen]"); + mes("Well, to travel the ocean again, we need to restock on goods. If you give me 10,000 Zeny, I'll take care of the rest."); + next(); + switch (select("I'll come back later.", "Let's go, now!")) { case 1: - mes "["+.@name$+"]"; - mes "I'm sorry, but I don't have that much money. I'll come back when I save enough."; - next; - mes "[Captain Janssen]"; - mes "Sure, no problem. I'll be waiting for your return."; - close; + mesf("[%s]", .@name$); + mes("I'm sorry, but I don't have that much money. I'll come back when I save enough."); + next(); + mes("[Captain Janssen]"); + mes("Sure, no problem. I'll be waiting for your return."); + close(); case 2: if (Zeny < 10000) { - mes "[Captain Janssen]"; - mes "I'm sorry, but you don't have enough money. I need at least 10,000 Zeny to restock our supplies..."; - close; - } - else { - mes "[Captain Janssen]"; - mes "Excellent! Now we're good to go. Let's pull up the anchor again!"; + mes("[Captain Janssen]"); + mes("I'm sorry, but you don't have enough money. I need at least 10,000 Zeny to restock our supplies..."); + close(); + } else { + mes("[Captain Janssen]"); + mes("Excellent! Now we're good to go. Let's pull up the anchor again!"); Zeny -= 10000; - close2; - warp "e_tower",70,114; + close2(); + warp("e_tower", 70, 114); end; } } } else { - mes "[Captain Janssen]"; - mes "Excuse me, are you an adventurer?"; - next; - mes "[Captain Janssen]"; - mes "I'm sorry to ask you this, especially when this is the first time we've ever met, but can you do me a favor? I'll make it short."; - next; - mes "[Captain Janssen]"; - mes "Can you donate ^0000ff10,000 Zeny^000000 to me? It's for a cause that's important to me..."; - next; - switch(select("No!", "Sure thing.")) { + mes("[Captain Janssen]"); + mes("Excuse me, are you an adventurer?"); + next(); + mes("[Captain Janssen]"); + mes("I'm sorry to ask you this, especially when this is the first time we've ever met, but can you do me a favor? I'll make it short."); + next(); + mes("[Captain Janssen]"); + mes("Can you donate ^0000ff10,000 Zeny^000000 to me? It's for a cause that's important to me..."); + next(); + switch (select("No!", "Sure thing.")) { case 1: - mes "["+.@name$+"]"; - mes "I'm sorry, but you've got the wrong person to ask that."; - next; - mes "[Captain Janssen]"; - mes "I see... Sorry to bother you. I understand it was too rude to ask something like that to begin with."; - close; + mesf("[%s]", .@name$); + mes("I'm sorry, but you've got the wrong person to ask that."); + next(); + mes("[Captain Janssen]"); + mes("I see... Sorry to bother you. I understand it was too rude to ask something like that to begin with."); + close(); case 2: - mes "[Captain Janssen]"; - mes "Huh? Are you sure that you don't mind giving me that much money? Wow, thank you so much!"; - next; + mes("[Captain Janssen]"); + mes("Huh? Are you sure that you don't mind giving me that much money? Wow, thank you so much!"); + next(); if (Zeny < 10000) { - mes "[Captain Janssen]"; - mes "...I'm sorry, but I don't think you have 10,000 Zeny. Thank you for your kindness, but I need more than that."; - close; + mes("[Captain Janssen]"); + mes("...I'm sorry, but I don't think you have 10,000 Zeny. Thank you for your kindness, but I need more than that."); + close(); } else { - mes "["+.@name$+"]"; - mes "I don't know why you'd need so much money, but here. You can take it."; - next; - mes "^0000ffYou have donated 10,000 Zeny to Captain Janssen^000000."; - next; - 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!"; + mesf("[%s]", .@name$); + mes("I don't know why you'd need so much money, but here. You can take it."); + next(); + mes("^0000ffYou have donated 10,000 Zeny to Captain Janssen^000000."); + next(); + 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; in_102tower = 1; - close; + close(); } } } @@ -204,116 +203,119 @@ e_tower,81,105,0 script Tower Protection Stone 2_MONEMUS,{ .@party_id = getcharid(CHAR_ID_PARTY); .@p_name$ = getpartyname(.@party_id); - .@md_name$ = "Endless Tower"; + .@md_name$ = _("Endless Tower"); - .@etower_timer = questprogress(60200,PLAYTIME); // 1 week - .@etower_timer2 = questprogress(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 (!instance_check_party(.@party_id, 2)) { + mes("Make or join a party with more than 1 member and try again."); + close(); } if (!.@etower_timer) { - if (getcharid(CHAR_ID_CHAR) == 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")) { + if (getcharid(CHAR_ID_CHAR) == getpartyleader(.@party_id, 2)) { + mes("Confirmed the party has been made. Would you like to reserve entrance to the Endless Tower?"); + next(); + .@str$ = sprintf(_$("Generate Dungeon %s"), .@md_name$); + switch (select(.@str$, "Enter the Dungeon", "Return to Alberta", "Cancel")) { case 1: - .@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(PC_NAME); - mes "^0000ff"+.@md_name$+" ^000000- Reservation Failed!"; - close; + mesf("Party Name: %s", .@p_name$); + mesf("Party Leader: %s", strcharinfo(PC_NAME)); + mesf("^0000ff%s ^000000- Reservation Failed!", .@md_name$); + close(); } - 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."; + mesf("^0000ff%s^000000 - Try to reserve", .@md_name$); + mes("After making a reservation, you have to talk to NPC behind and select the menu 'Enter the Dungeon' to enter the dungeon."); for (.@i = 1; .@i <= 6; ++.@i) { - if( instance_attachmap(.@i + "@tower", .@instance) == "" ) { - mes "^0000ff"+.@md_name$+" ^000000- Reservation Failed!"; + if (instance_attachmap(.@i + "@tower", .@instance) == "") { + mesf("^0000ff%s ^000000- Reservation Failed!", .@md_name$); instance_destroy(.@instance); - close; + close(); } } - instance_set_timeout 14400,300,.@instance; + instance_set_timeout(14400, 300, .@instance); instance_init(.@instance); - close; + close(); case 2: - callsub L_Enter,0,1,.@md_name$,.@p_name$; + callsub(L_Enter, 0, 1, .@md_name$, .@p_name$); case 3: - mes "I will move you to Alberta."; - close2; - warp "alberta",223,36; + mes("I will move you to Alberta."); + close2(); + warp("alberta", 223, 36); end; case 4: - close; + close(); } } - switch(select("Enter the "+.@md_name$, "Return to Alberta", "Cancel")) { + mes("If you have the dungeon generated already, you can enter it."); + next(); + switch (select("Enter the Dungeon", "Return to Alberta", "Cancel")) { case 1: - callsub L_Enter,1,1,.@md_name$,.@p_name$; + callsub(L_Enter, 1, 1, .@md_name$, .@p_name$); case 2: - mes "I will move you to Alberta."; - close2; - warp "alberta",223,36; + mes("I will move you to Alberta."); + close2(); + warp("alberta", 223, 36); end; case 3: end; } } else if (.@etower_timer == 1 && .@etower_timer2 == 2) { - .@dun_lim_time = etower_timer+604800; // 1 week - .@dun_lim_time2 = etower_timer+14400; // 4 hours + .@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_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; - mes "It is dangerous here. Let me move you to Alberta."; - close2; - warp "alberta",223,36; + mesf("Due to the tower's aftereffects, you cannot enter the dungeon right now, %d hours %d minutes %d seconds left to enter the next dungeon.", .@dun_h, .@dun_m, .@dun_s); + next(); + mes("It is dangerous here. Let me move you to Alberta."); + close2(); + warp("alberta", 223, 36); end; } 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")) { + mes("If you have the dungeon generated already, you can enter it."); + next(); + switch (select("Enter the Dungeon", "Return to Alberta", "Cancel")) { case 1: - callsub L_Enter,0,0,.@md_name$,.@p_name$; + callsub(L_Enter, 0, 0, .@md_name$, .@p_name$); case 2: - mes "I will move you to Alberta."; - close2; - warp "alberta",223,36; + mes("I will move you to Alberta."); + close2(); + warp("alberta", 223, 36); end; case 3: break; } - close; + close(); } else { 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"; - close; + 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"); + close(); } L_Enter: if (has_instance("1@tower") == "") { - mes "The memorial dungeon " +getarg(2)+ " does not exist."; - mes "The party leader did not generate the dungeon yet."; - close; + mesf("The memorial dungeon %s does not exist.", getarg(2)); + mes("The party leader did not generate the dungeon yet."); + close(); } else { - mapannounce "e_tower", strcharinfo(PC_NAME)+" of the party, " +getarg(3)+", is entering the dungeon, Endless Tower.",bc_map,"0x00ff99",FW_NORMAL,12; + mapannounce("e_tower", sprintf(_$("%s of the party, %s, is entering the dungeon, Endless Tower."), strcharinfo(PC_NAME), getarg(3)), bc_map, C_SPRINGGREEN, FW_NORMAL, 12); if (getarg(1)) { etower_timer = gettimetick(2); - setquest 60200; - setquest 60201; + setquest(60200); + setquest(60201); } - warp "1@tower",52,354; + warp("1@tower", 52, 354); if (getarg(0) == 0) - close; + close(); else end; } @@ -322,75 +324,75 @@ L_Enter: e_tower,30,30,2 script Huge Vortex CLEAR_NPC,2,2,{ end; OnTouch: - mapannounce "e_tower","[ " + strcharinfo(PC_NAME) + " ], seems to be engulfed by a huge vortex",bc_map,"0x00ff99",FW_NORMAL,12; - warp "alberta",223,36; + mapannounce("e_tower", sprintf(_$("[ %s ], seems to be engulfed by a huge vortex"), strcharinfo(PC_NAME)), bc_map, C_SPRINGGREEN, FW_NORMAL, 12); + warp("alberta", 223, 36); end; } // Original name: "#102Administrator Mode104" e_tower,1,1,2 script #102Administrator Mode CLEAR_NPC,{ - callfunc "F_GM_NPC"; - mes "Please enter the password"; - .@i = callfunc("F_GM_NPC","dmc2008",1); - next; + callfunc("F_GM_NPC"); + mes("Please enter the password."); + .@i = callfunc("F_GM_NPC", "dmc2008", 1); + next(); if (.@i == 1) { - switch(select("Generate Purification Stone", "Remove Purification Stone", "Cancel")) { + switch (select("Generate Purification Stone", "Remove Purification Stone", "Cancel")) { case 1: - mes "Create the Purification Stone that stays for 30 minutes."; - donpcevent "Purification Stone#et1::OnEnable"; + mes("Create the Purification Stone that stays for 30 minutes."); + donpcevent("Purification Stone#et1::OnEnable"); break; case 2: - mes "Destroy the Purification Stone immediately"; - donpcevent "Purification Stone#et1::OnDisable"; + mes("Destroy the Purification Stone immediately"); + donpcevent("Purification Stone#et1::OnDisable"); break; case 3: - mes "You have canceled it."; + mes("You have canceled it."); break; } - close; + close(); } else { - mes "Enter the password exactly."; - close; + mes("Enter the password exactly."); + close(); } } e_tower,69,117,4 script Purification Stone#et1 2_MONEMUS,{ 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; + mes("^0000ffThe records and aftereffects related to the Endless Tower have been removed. You can generate and enter the Endless Tower again.^000000"); + close(); OnInit: - disablenpc "Purification Stone#et1"; + disablenpc("Purification Stone#et1"); end; OnEnable: - initnpctimer; + initnpctimer(); end; OnDisable: - stopnpctimer; - disablenpc "Purification Stone#et1"; + stopnpctimer(); + disablenpc("Purification Stone#et1"); end; OnTimer1000: - enablenpc "Purification Stone#et1"; + enablenpc("Purification Stone#et1"); end; OnTimer1740000: - mapannounce "e_tower", "The Purification Stone will be destroyed in one minute.",bc_map,"0x00ff99"; + mapannounce("e_tower", _("The Purification Stone will be destroyed in one minute."), bc_map, C_SPRINGGREEN); end; OnTimer1800000: - disablenpc "Purification Stone#et1"; + disablenpc("Purification Stone#et1"); end; } e_tower,151,185,4 script Purification Stone#et2 CLEAR_NPC,{ - callfunc "F_GM_NPC"; + callfunc("F_GM_NPC"); 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; + 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); end; } @@ -401,677 +403,677 @@ function script F_Tower_Monster { .@map$ = getarg(1); .@label$ = getarg(2); - switch(.@level) { + switch (.@level) { case 1: - areamonster .@map$,7,351,17,387,"Metaling",1613,15,.@label$; - areamonster .@map$,7,351,17,387,"Marin",1242,5,.@label$; - areamonster .@map$,7,351,17,387,"Poporing",1031,5,.@label$; - areamonster .@map$,7,351,17,387,"Drops",1113,5,.@label$; - areamonster .@map$,7,351,17,387,"Mastering",1090,1,.@label$; - areamonster .@map$,7,351,17,387,"Poring",1002,5,.@label$; + areamonster(.@map$, 7, 351, 17, 387, _("Metaling"), METALING, 15, .@label$); + areamonster(.@map$, 7, 351, 17, 387, _("Marin"), MARIN, 5, .@label$); + areamonster(.@map$, 7, 351, 17, 387, _("Poporing"), POPORING, 5, .@label$); + areamonster(.@map$, 7, 351, 17, 387, _("Drops"), DROPS, 5, .@label$); + areamonster(.@map$, 7, 351, 17, 387, _("Mastering"), MASTERING, 1, .@label$); + areamonster(.@map$, 7, 351, 17, 387, _("Poring"), PORING, 5, .@label$); break; case 2: - areamonster .@map$,93,351,103,387,"Desert Wolf",1106,20,.@label$; - areamonster .@map$,93,351,103,387,"Vagabond Wolf",1092,1,.@label$; - areamonster .@map$,93,351,103,387,"Baby Desert Wolf",1107,10,.@label$; + areamonster(.@map$, 93, 351, 103, 387, _("Desert Wolf"), DESERT_WOLF, 20, .@label$); + areamonster(.@map$, 93, 351, 103, 387, _("Vagabond Wolf"), VAGABOND_WOLF, 1, .@label$); + areamonster(.@map$, 93, 351, 103, 387, _("Baby Desert Wolf"), DESERT_WOLF_B, 10, .@label$); break; case 3: - areamonster .@map$,181,351,191,387,"Archer Skeleton",1016,5,.@label$; - areamonster .@map$,181,351,191,387,"Skel Worker",1169,5,.@label$; - areamonster .@map$,181,351,191,387,"Soldier Skeleton",1028,5,.@label$; - areamonster .@map$,181,351,191,387,"Orc Skeleton",1152,5,.@label$; - areamonster .@map$,181,351,191,387,"Pirate Skeleton",1071,5,.@label$; - areamonster .@map$,181,351,191,387,"Skeleton",1076,5,.@label$; + areamonster(.@map$, 181, 351, 191, 387, _("Archer Skeleton"), ARCHER_SKELETON, 5, .@label$); + areamonster(.@map$, 181, 351, 191, 387, _("Skel Worker"), SKEL_WORKER, 5, .@label$); + areamonster(.@map$, 181, 351, 191, 387, _("Soldier Skeleton"), SOLDIER_SKELETON, 5, .@label$); + areamonster(.@map$, 181, 351, 191, 387, _("Orc Skeleton"), ORC_SKELETON, 5, .@label$); + areamonster(.@map$, 181, 351, 191, 387, _("Pirate Skeleton"), PIRATE_SKEL, 5, .@label$); + areamonster(.@map$, 181, 351, 191, 387, _("Skeleton"), SKELETON, 5, .@label$); break; case 4: - areamonster .@map$,267,351,277,387,"Argiope",1099,15,.@label$; - areamonster .@map$,267,351,277,387,"Mantis",1139,5,.@label$; - areamonster .@map$,267,351,277,387,"Argos",1100,5,.@label$; - areamonster .@map$,267,351,277,387,"Vocal",1088,1,.@label$; - areamonster .@map$,267,351,277,387,"Rocker",1052,5,.@label$; - areamonster .@map$,267,351,277,387,"Hornet",1004,5,.@label$; + areamonster(.@map$, 267, 351, 277, 387, _("Argiope"), ARGIOPE, 15, .@label$); + areamonster(.@map$, 267, 351, 277, 387, _("Mantis"), MANTIS, 5, .@label$); + areamonster(.@map$, 267, 351, 277, 387, _("Argos"), ARGOS, 5, .@label$); + areamonster(.@map$, 267, 351, 277, 387, _("Vocal"), VOCAL, 1, .@label$); + areamonster(.@map$, 267, 351, 277, 387, _("Rocker"), ROCKER, 5, .@label$); + areamonster(.@map$, 267, 351, 277, 387, _("Hornet"), HORNET, 5, .@label$); break; case 5: - areamonster .@map$,352,351,362,387,"Golden Thief Bug",1086,1,.@label$; - areamonster .@map$,352,351,362,387,"Thief Bug Male",1054,15,.@label$; - areamonster .@map$,352,351,362,387,"Thief Bug Female",1053,15,.@label$; - areamonster .@map$,352,351,362,387,"Thief Bug",1051,15,.@label$; - areamonster .@map$,352,351,362,387,"Thief Bug Egg",1048,5,.@label$; + areamonster(.@map$, 352, 351, 362, 387, _("Golden Thief Bug"), GOLDEN_BUG, 1, .@label$); + areamonster(.@map$, 352, 351, 362, 387, _("Thief Bug Male"), THIEF_BUG__, 15, .@label$); + areamonster(.@map$, 352, 351, 362, 387, _("Thief Bug Female"), THIEF_BUG_, 15, .@label$); + areamonster(.@map$, 352, 351, 362, 387, _("Thief Bug"), THIEF_BUG, 15, .@label$); + areamonster(.@map$, 352, 351, 362, 387, _("Thief Bug Egg"), THIEF_BUG_EGG, 5, .@label$); break; case 6: - areamonster .@map$,9,267,19,303,"Dragon Egg",1721,5,.@label$; - areamonster .@map$,9,267,19,303,"Thief Bug Egg",1048,5,.@label$; - areamonster .@map$,9,267,19,303,"Ant Egg",1097,5,.@label$; - areamonster .@map$,9,267,19,303,"Pupa",1008,5,.@label$; + areamonster(.@map$, 9, 267, 19, 303, _("Dragon Egg"), DRAGON_EGG, 5, .@label$); + areamonster(.@map$, 9, 267, 19, 303, _("Thief Bug Egg"), THIEF_BUG_EGG, 5, .@label$); + areamonster(.@map$, 9, 267, 19, 303, _("Ant Egg"), ANT_EGG, 5, .@label$); + areamonster(.@map$, 9, 267, 19, 303, _("Pupa"), PUPA, 5, .@label$); break; case 7: - areamonster .@map$,93,267,103,303,"Explosion",1383,15,.@label$; - areamonster .@map$,93,267,103,303,"Drainliar",1111,15,.@label$; - areamonster .@map$,93,267,103,303,"Anopheles",1627,15,.@label$; - areamonster .@map$,93,267,103,303,"Farmiliar",1005,15,.@label$; + areamonster(.@map$, 93, 267, 103, 303, _("Explosion"), EXPLOSION, 15, .@label$); + areamonster(.@map$, 93, 267, 103, 303, _("Drainliar"), DRAINLIAR, 15, .@label$); + areamonster(.@map$, 93, 267, 103, 303, _("Anopheles"), ANOPHELES, 15, .@label$); + areamonster(.@map$, 93, 267, 103, 303, _("Farmiliar"), FARMILIAR, 15, .@label$); break; case 8: - areamonster .@map$,181,267,191,303,"Firelock Soldier",1403,15,.@label$; - areamonster .@map$,181,267,191,303,"Cruiser",1248,15,.@label$; + areamonster(.@map$, 181, 267, 191, 303, _("Firelock Soldier"), ANTIQUE_FIRELOCK, 15, .@label$); + areamonster(.@map$, 181, 267, 191, 303, _("Cruiser"), CRUISER, 15, .@label$); break; case 9: - areamonster .@map$,267,267,277,303,"Obsidian",1615,15,.@label$; - areamonster .@map$,267,267,277,303,"Golem",1040,15,.@label$; - areamonster .@map$,267,267,277,303,"Stapo",1784,10,.@label$; + areamonster(.@map$, 267, 267, 277, 303, _("Obsidian"), OBSIDIAN, 15, .@label$); + areamonster(.@map$, 267, 267, 277, 303, _("Golem"), GOLEM, 15, .@label$); + areamonster(.@map$, 267, 267, 277, 303, _("Stapo"), STAPO, 10, .@label$); break; case 10: - areamonster .@map$,352,267,362,303,"Mistress",1059,1,.@label$; - areamonster .@map$,352,267,362,303,"Giant Hornet",1303,25,.@label$; - areamonster .@map$,352,267,362,303,"Hornet",1004,20,.@label$; + areamonster(.@map$, 352, 267, 362, 303, _("Mistress"), MISTRESS, 1, .@label$); + areamonster(.@map$, 352, 267, 362, 303, _("Giant Hornet"), GIANT_HONET, 25, .@label$); + areamonster(.@map$, 352, 267, 362, 303, _("Hornet"), HORNET, 20, .@label$); break; case 11: - areamonster .@map$,9,180,19,216,"Dryad",1493,15,.@label$; - areamonster .@map$,9,180,19,216,"Parasite",1500,15,.@label$; - areamonster .@map$,9,180,19,216,"Hermit Plant",1413,15,.@label$; - areamonster .@map$,9,180,19,216,"Rafflesia",1162,5,.@label$; + areamonster(.@map$, 9, 180, 19, 216, _("Dryad"), DRYAD, 15, .@label$); + areamonster(.@map$, 9, 180, 19, 216, _("Parasite"), PARASITE, 15, .@label$); + areamonster(.@map$, 9, 180, 19, 216, _("Hermit Plant"), WILD_GINSENG, 15, .@label$); + areamonster(.@map$, 9, 180, 19, 216, _("Rafflesia"), RAFFLESIA, 5, .@label$); break; case 12: - areamonster .@map$,93,180,103,216,"Demon Pungus",1378,25,.@label$; - areamonster .@map$,93,180,103,216,"Punk",1199,25,.@label$; + areamonster(.@map$, 93, 180, 103, 216, _("Demon Pungus"), DEMON_PUNGUS, 25, .@label$); + areamonster(.@map$, 93, 180, 103, 216, _("Punk"), PUNK, 25, .@label$); break; case 13: - areamonster .@map$,181,180,191,216,"Yao Yun",1512,15,.@label$; - areamonster .@map$,181,180,191,216,"Bongunn",1188,15,.@label$; - areamonster .@map$,181,180,191,216,"Munak",1026,10,.@label$; + areamonster(.@map$, 181, 180, 191, 216, _("Yao Yun"), HYEGUN, 15, .@label$); + areamonster(.@map$, 181, 180, 191, 216, _("Bongunn"), BON_GUN, 15, .@label$); + areamonster(.@map$, 181, 180, 191, 216, _("Munak"), MUNAK, 10, .@label$); break; case 14: - areamonster .@map$,267,180,277,216,"High Orc",1213,15,.@label$; - areamonster .@map$,267,180,277,216,"Orc Archer",1189,10,.@label$; - areamonster .@map$,267,180,277,216,"Orc Lady",1273,10,.@label$; - areamonster .@map$,267,180,277,216,"Orc Warrior",1023,5,.@label$; - areamonster .@map$,267,180,277,216,"Orc Baby",1686,5,.@label$; + areamonster(.@map$, 267, 180, 277, 216, _("High Orc"), HIGH_ORC, 15, .@label$); + areamonster(.@map$, 267, 180, 277, 216, _("Orc Archer"), ORC_ARCHER, 10, .@label$); + areamonster(.@map$, 267, 180, 277, 216, _("Orc Lady"), ORC_LADY, 10, .@label$); + areamonster(.@map$, 267, 180, 277, 216, _("Orc Warrior"), ORK_WARRIOR, 5, .@label$); + areamonster(.@map$, 267, 180, 277, 216, _("Orc Baby"), ORC_BABY, 5, .@label$); break; case 15: - areamonster .@map$,352,180,362,216,"Maya",1147,1,.@label$; - areamonster .@map$,352,180,362,216,"Phreeoni",1159,1,.@label$; - areamonster .@map$,352,180,362,216,"Deniro",1105,15,.@label$; - areamonster .@map$,352,180,362,216,"Pierre",1160,15,.@label$; - areamonster .@map$,352,180,362,216,"Andre",1095,15,.@label$; - areamonster .@map$,352,180,362,216,"Ant Egg",1097,5,.@label$; + areamonster(.@map$, 352, 180, 362, 216, _("Maya"), MAYA, 1, .@label$); + areamonster(.@map$, 352, 180, 362, 216, _("Phreeoni"), PHREEONI, 1, .@label$); + areamonster(.@map$, 352, 180, 362, 216, _("Deniro"), DENIRO, 15, .@label$); + areamonster(.@map$, 352, 180, 362, 216, _("Pierre"), PIERE, 15, .@label$); + areamonster(.@map$, 352, 180, 362, 216, _("Andre"), ANDRE, 15, .@label$); + areamonster(.@map$, 352, 180, 362, 216, _("Ant Egg"), ANT_EGG, 5, .@label$); break; case 16: - areamonster .@map$,9,96,19,132,"Raydric Archer",1276,10,.@label$; - areamonster .@map$,9,96,19,132,"Orc Archer",1189,10,.@label$; - areamonster .@map$,9,96,19,132,"Gargoyle",1253,10,.@label$; - areamonster .@map$,9,96,19,132,"Archer Skeleton",1016,10,.@label$; + areamonster(.@map$, 9, 96, 19, 132, _("Raydric Archer"), RAYDRIC_ARCHER, 10, .@label$); + areamonster(.@map$, 9, 96, 19, 132, _("Orc Archer"), ORC_ARCHER, 10, .@label$); + areamonster(.@map$, 9, 96, 19, 132, _("Gargoyle"), GARGOYLE, 10, .@label$); + areamonster(.@map$, 9, 96, 19, 132, _("Archer Skeleton"), ARCHER_SKELETON, 10, .@label$); break; case 17: - areamonster .@map$,93,96,103,132,"Merman",1264,10,.@label$; - areamonster .@map$,93,96,103,132,"Baphomet Jr.",1101,10,.@label$; - areamonster .@map$,93,96,103,132,"Strouf",1065,15,.@label$; - areamonster .@map$,93,96,103,132,"Hill Wind",1629,5,.@label$; + areamonster(.@map$, 93, 96, 103, 132, _("Merman"), MERMAN, 10, .@label$); + areamonster(.@map$, 93, 96, 103, 132, _("Baphomet Jr."), BAPHOMET_, 10, .@label$); + areamonster(.@map$, 93, 96, 103, 132, _("Strouf"), STROUF, 15, .@label$); + areamonster(.@map$, 93, 96, 103, 132, _("Hill Wind"), HILL_WIND, 5, .@label$); break; case 18: - areamonster .@map$,181,96,191,132,"Cramp",1209,25,.@label$; - areamonster .@map$,181,96,191,132,"Tarou",1175,15,.@label$; + areamonster(.@map$, 181, 96, 191, 132, _("Cramp"), CRAMP, 25, .@label$); + areamonster(.@map$, 181, 96, 191, 132, _("Tarou"), TAROU, 15, .@label$); break; case 19: - areamonster .@map$,267,96,277,132,"Deviace",1108,10,.@label$; - areamonster .@map$,267,96,277,132,"Megalodon",1064,10,.@label$; - areamonster .@map$,267,96,277,132,"Swordfish",1069,10,.@label$; - areamonster .@map$,267,96,277,132,"Phen",1158,10,.@label$; + areamonster(.@map$, 267, 96, 277, 132, _("Deviace"), DEVIACE, 10, .@label$); + areamonster(.@map$, 267, 96, 277, 132, _("Megalodon"), MEGALODON, 10, .@label$); + areamonster(.@map$, 267, 96, 277, 132, _("Swordfish"), SWORD_FISH, 10, .@label$); + areamonster(.@map$, 267, 96, 277, 132, _("Phen"), PHEN, 10, .@label$); break; case 20: - areamonster .@map$,352,96,362,132,"Drake",1112,1,.@label$; - areamonster .@map$,352,96,362,132,"Pirate Skeleton",1071,50,.@label$; + areamonster(.@map$, 352, 96, 362, 132, _("Drake"), DRAKE, 1, .@label$); + areamonster(.@map$, 352, 96, 362, 132, _("Pirate Skeleton"), PIRATE_SKEL, 50, .@label$); break; case 21: - areamonster .@map$,9,9,19,45,"Plasma",1693,10,.@label$; - areamonster .@map$,9,9,19,45,"Plasma",1696,10,.@label$; - areamonster .@map$,9,9,19,45,"Plasma",1695,5,.@label$; - areamonster .@map$,9,9,19,45,"Plasma",1697,5,.@label$; - areamonster .@map$,9,9,19,45,"Plasma",1694,5,.@label$; + areamonster(.@map$, 9, 9, 19, 45, _("Plasma"), PLASMA_Y, 10, .@label$); + areamonster(.@map$, 9, 9, 19, 45, _("Plasma"), PLASMA_P, 10, .@label$); + areamonster(.@map$, 9, 9, 19, 45, _("Plasma"), PLASMA_G, 5, .@label$); + areamonster(.@map$, 9, 9, 19, 45, _("Plasma"), PLASMA_B, 5, .@label$); + areamonster(.@map$, 9, 9, 19, 45, _("Plasma"), PLASMA_R, 5, .@label$); break; case 22: - areamonster .@map$,93,9,103,45,"Muscipular",1780,15,.@label$; - areamonster .@map$,93,9,103,45,"Drosera",1781,15,.@label$; - areamonster .@map$,93,9,103,45,"Flora",1118,15,.@label$; - areamonster .@map$,93,9,103,45,"Hydra",1068,15,.@label$; - areamonster .@map$,93,9,103,45,"Mandragora",1020,10,.@label$; - areamonster .@map$,93,9,103,45,"Rafflesia",1162,10,.@label$; + areamonster(.@map$, 93, 9, 103, 45, _("Muscipular"), MUSCIPULAR, 15, .@label$); + areamonster(.@map$, 93, 9, 103, 45, _("Drosera"), DROSERA, 15, .@label$); + areamonster(.@map$, 93, 9, 103, 45, _("Flora"), FLORA, 15, .@label$); + areamonster(.@map$, 93, 9, 103, 45, _("Hydra"), HYDRA, 15, .@label$); + areamonster(.@map$, 93, 9, 103, 45, _("Mandragora"), MANDRAGORA, 10, .@label$); + areamonster(.@map$, 93, 9, 103, 45, _("Rafflesia"), RAFFLESIA, 10, .@label$); break; case 23: - areamonster .@map$,181,9,191,45,"Penomena",1216,15,.@label$; - areamonster .@map$,181,9,191,45,"Obeaune",1044,10,.@label$; - areamonster .@map$,181,9,191,45,"Marse",1144,10,.@label$; - areamonster .@map$,181,9,191,45,"Swordfish",1069,10,.@label$; - areamonster .@map$,181,9,191,45,"Hydra",1068,5,.@label$; + areamonster(.@map$, 181, 9, 191, 45, _("Penomena"), PENOMENA, 15, .@label$); + areamonster(.@map$, 181, 9, 191, 45, _("Obeaune"), OBEAUNE, 10, .@label$); + areamonster(.@map$, 181, 9, 191, 45, _("Marse"), MARSE, 10, .@label$); + areamonster(.@map$, 181, 9, 191, 45, _("Swordfish"), SWORD_FISH, 10, .@label$); + areamonster(.@map$, 181, 9, 191, 45, _("Hydra"), HYDRA, 5, .@label$); break; case 24: - areamonster .@map$,267,9,277,45,"Joker",1131,15,.@label$; - areamonster .@map$,267,9,277,45,"Carat",1267,15,.@label$; - areamonster .@map$,267,9,277,45,"Jakk",1130,10,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Joker"), JOKER, 15, .@label$); + areamonster(.@map$, 267, 9, 277, 45, _("Carat"), CARAT, 15, .@label$); + areamonster(.@map$, 267, 9, 277, 45, _("Jakk"), JAKK, 10, .@label$); break; case 25: - areamonster .@map$,352,9,362,45,"Cat o' Nine Tails",1307,15,.@label$; - areamonster .@map$,352,9,362,45,"Moonlight",1150,1,.@label$; - areamonster .@map$,352,9,362,45,"Nine Tail",1180,15,.@label$; + areamonster(.@map$, 352, 9, 362, 45, _("Cat o' Nine Tails"), CAT_O_NINE_TAIL, 15, .@label$); + areamonster(.@map$, 352, 9, 362, 45, _("Moonlight"), MOONLIGHT, 1, .@label$); + areamonster(.@map$, 352, 9, 362, 45, _("Nine Tail"), NINE_TAIL, 15, .@label$); break; case 26: - areamonster .@map$,9,351,19,387,"Gibbet",1503,10,.@label$; - areamonster .@map$,9,351,19,387,"Enchanted Peach Tree",1410,10,.@label$; - areamonster .@map$,9,351,19,387,"Wooden Golem",1497,10,.@label$; - areamonster .@map$,9,351,19,387,"Stone Shooter",1495,10,.@label$; - areamonster .@map$,9,351,19,387,"Elder Willow",1033,5,.@label$; + areamonster(.@map$, 9, 351, 19, 387, _("Gibbet"), GIBBET, 10, .@label$); + areamonster(.@map$, 9, 351, 19, 387, _("Enchanted Peach Tree"), LIVE_PEACH_TREE, 10, .@label$); + areamonster(.@map$, 9, 351, 19, 387, _("Wooden Golem"), WOODEN_GOLEM, 10, .@label$); + areamonster(.@map$, 9, 351, 19, 387, _("Stone Shooter"), STONE_SHOOTER, 10, .@label$); + areamonster(.@map$, 9, 351, 19, 387, _("Elder Willow"), ELDER_WILOW, 5, .@label$); break; case 27: - areamonster .@map$,93,351,103,387,"Goblin Archer",1258,10,.@label$; - areamonster .@map$,93,351,103,387,"Goblin",1122,10,.@label$; - areamonster .@map$,93,351,103,387,"Goblin",1123,5,.@label$; - areamonster .@map$,93,351,103,387,"Goblin",1124,5,.@label$; - areamonster .@map$,93,351,103,387,"Gobin",1125,5,.@label$; - areamonster .@map$,93,351,103,387,"Goblin",1126,5,.@label$; + areamonster(.@map$, 93, 351, 103, 387, _("Goblin Archer"), GOBLIN_ARCHER, 10, .@label$); + areamonster(.@map$, 93, 351, 103, 387, _("Goblin"), GOBLIN_1, 10, .@label$); + areamonster(.@map$, 93, 351, 103, 387, _("Goblin"), GOBLIN_2, 5, .@label$); + areamonster(.@map$, 93, 351, 103, 387, _("Goblin"), GOBLIN_3, 5, .@label$); + areamonster(.@map$, 93, 351, 103, 387, _("Gobin"), GOBLIN_4, 5, .@label$); + areamonster(.@map$, 93, 351, 103, 387, _("Goblin"), GOBLIN_5, 5, .@label$); break; case 28: - areamonster .@map$,181,351,191,387,"Arclouse",1194,30,.@label$; - areamonster .@map$,181,351,191,387,"Neraid",1255,15,.@label$; - areamonster .@map$,181,351,191,387,"Pest",1256,15,.@label$; - areamonster .@map$,181,351,191,387,"Kukre",1070,10,.@label$; + areamonster(.@map$, 181, 351, 191, 387, _("Arclouse"), ARCLOUSE, 30, .@label$); + areamonster(.@map$, 181, 351, 191, 387, _("Neraid"), NERAID, 15, .@label$); + areamonster(.@map$, 181, 351, 191, 387, _("Pest"), PEST, 15, .@label$); + areamonster(.@map$, 181, 351, 191, 387, _("Kukre"), KUKRE, 10, .@label$); break; case 29: - areamonster .@map$,267,351,277,387,"Dark Frame",1260,10,.@label$; - areamonster .@map$,267,351,277,387,"The Paper",1375,10,.@label$; - areamonster .@map$,267,351,277,387,"Hylozoist",1510,10,.@label$; - areamonster .@map$,267,351,277,387,"Quve",1508,5,.@label$; - areamonster .@map$,267,351,277,387,"Lude",1509,5,.@label$; - areamonster .@map$,267,351,277,387,"Whisper",1179,10,.@label$; + areamonster(.@map$, 267, 351, 277, 387, _("Dark Frame"), DARK_FRAME, 10, .@label$); + areamonster(.@map$, 267, 351, 277, 387, _("The Paper"), THE_PAPER, 10, .@label$); + areamonster(.@map$, 267, 351, 277, 387, _("Hylozoist"), HYLOZOIST, 10, .@label$); + areamonster(.@map$, 267, 351, 277, 387, _("Quve"), QUVE, 5, .@label$); + areamonster(.@map$, 267, 351, 277, 387, _("Lude"), LUDE, 5, .@label$); + areamonster(.@map$, 267, 351, 277, 387, _("Whisper"), WHISPER, 10, .@label$); break; case 30: - areamonster .@map$,352,351,362,387,"White Lady",1630,1,.@label$; - areamonster .@map$,352,351,362,387,"Evil Nymph",1416,30,.@label$; + areamonster(.@map$, 352, 351, 362, 387, _("White Lady"), BACSOJIN_, 1, .@label$); + areamonster(.@map$, 352, 351, 362, 387, _("Evil Nymph"), WICKED_NYMPH, 30, .@label$); break; case 31: - areamonster .@map$,9,267,19,303,"Gig",1387,20,.@label$; - areamonster .@map$,9,267,19,303,"Iron Fist",1212,15,.@label$; - areamonster .@map$,9,267,19,303,"Argiope",1099,10,.@label$; - areamonster .@map$,9,267,19,303,"Scorpion",1001,5,.@label$; + areamonster(.@map$, 9, 267, 19, 303, _("Gig"), GIG, 20, .@label$); + areamonster(.@map$, 9, 267, 19, 303, _("Iron Fist"), IRON_FIST, 15, .@label$); + areamonster(.@map$, 9, 267, 19, 303, _("Argiope"), ARGIOPE, 10, .@label$); + areamonster(.@map$, 9, 267, 19, 303, _("Scorpion"), SCORPION, 5, .@label$); break; case 32: - areamonster .@map$,93,267,103,303,"Goblin Leader",1299,1,.@label$; - areamonster .@map$,93,267,103,303,"Goblin Archer",1258,10,.@label$; - areamonster .@map$,93,267,103,303,"Goblin",1122,10,.@label$; - areamonster .@map$,93,267,103,303,"Goblin",1123,5,.@label$; - areamonster .@map$,93,267,103,303,"Goblin",1124,5,.@label$; - areamonster .@map$,93,267,103,303,"Goblin",1125,5,.@label$; - areamonster .@map$,93,267,103,303,"Goblin",1126,5,.@label$; + areamonster(.@map$, 93, 267, 103, 303, _("Goblin Leader"), GOBLIN_LEADER, 1, .@label$); + areamonster(.@map$, 93, 267, 103, 303, _("Goblin Archer"), GOBLIN_ARCHER, 10, .@label$); + areamonster(.@map$, 93, 267, 103, 303, _("Goblin"), GOBLIN_1, 10, .@label$); + areamonster(.@map$, 93, 267, 103, 303, _("Goblin"), GOBLIN_2, 5, .@label$); + areamonster(.@map$, 93, 267, 103, 303, _("Goblin"), GOBLIN_3, 5, .@label$); + areamonster(.@map$, 93, 267, 103, 303, _("Goblin"), GOBLIN_4, 5, .@label$); + areamonster(.@map$, 93, 267, 103, 303, _("Goblin"), GOBLIN_5, 5, .@label$); break; case 33: - areamonster .@map$,181,267,191,303,"Kobold Leader",1296,1,.@label$; - areamonster .@map$,181,267,191,303,"Kobold",1133,15,.@label$; - areamonster .@map$,181,267,191,303,"Kobold_Archer",1282,15,.@label$; - areamonster .@map$,181,267,191,303,"Kobold",1134,10,.@label$; - areamonster .@map$,181,267,191,303,"Kobold",1135,5,.@label$; + areamonster(.@map$, 181, 267, 191, 303, _("Kobold Leader"), KOBOLD_LEADER, 1, .@label$); + areamonster(.@map$, 181, 267, 191, 303, _("Kobold"), KOBOLD_1, 15, .@label$); + areamonster(.@map$, 181, 267, 191, 303, _("Kobold_Archer"), KOBOLD_ARCHER, 15, .@label$); + areamonster(.@map$, 181, 267, 191, 303, _("Kobold"), KOBOLD_2, 10, .@label$); + areamonster(.@map$, 181, 267, 191, 303, _("Kobold"), KOBOLD_3, 5, .@label$); break; case 34: - areamonster .@map$,267,267,277,303,"Flame Skull",1869,20,.@label$; - areamonster .@map$,267,267,277,303,"Whisper",1179,10,.@label$; - areamonster .@map$,267,267,277,303,"Giant Whisper",1186,10,.@label$; + areamonster(.@map$, 267, 267, 277, 303, _("Flame Skull"), FLAME_SKULL, 20, .@label$); + areamonster(.@map$, 267, 267, 277, 303, _("Whisper"), WHISPER, 10, .@label$); + areamonster(.@map$, 267, 267, 277, 303, _("Giant Whisper"), WHISPER_BOSS, 10, .@label$); break; case 35: - areamonster .@map$,352,267,362,303,"Turtle General",1312,1,.@label$; - areamonster .@map$,352,267,362,303,"Freezer",1319,10,.@label$; - areamonster .@map$,352,267,362,303,"Solider",1316,10,.@label$; - areamonster .@map$,352,267,362,303,"Heater",1318,10,.@label$; - areamonster .@map$,352,267,362,303,"Permeter",1314,10,.@label$; + areamonster(.@map$, 352, 267, 362, 303, _("Turtle General"), TURTLE_GENERAL, 1, .@label$); + areamonster(.@map$, 352, 267, 362, 303, _("Freezer"), FREEZER, 10, .@label$); + areamonster(.@map$, 352, 267, 362, 303, _("Solider"), SOLIDER, 10, .@label$); + areamonster(.@map$, 352, 267, 362, 303, _("Heater"), HEATER, 10, .@label$); + areamonster(.@map$, 352, 267, 362, 303, _("Permeter"), PERMETER, 10, .@label$); break; case 36: - areamonster .@map$,9,180,19,216,"Anolian",1206,30,.@label$; - areamonster .@map$,9,180,19,216,"Grove",1687,10,.@label$; - areamonster .@map$,9,180,19,216,"Alligator",1271,10,.@label$; + areamonster(.@map$, 9, 180, 19, 216, _("Anolian"), ANOLIAN, 30, .@label$); + areamonster(.@map$, 9, 180, 19, 216, _("Grove"), GREEN_IGUANA, 10, .@label$); + areamonster(.@map$, 9, 180, 19, 216, _("Alligator"), ALLIGATOR, 10, .@label$); break; case 37: - areamonster .@map$,93,180,103,216,"Clock Tower Manager",1270,10,.@label$; - areamonster .@map$,93,180,103,216,"Clock",1269,10,.@label$; - areamonster .@map$,93,180,103,216,"Alarm",1193,30,.@label$; + areamonster(.@map$, 93, 180, 103, 216, _("Clock Tower Manager"), C_TOWER_MANAGER, 10, .@label$); + areamonster(.@map$, 93, 180, 103, 216, _("Clock"), CLOCK, 10, .@label$); + areamonster(.@map$, 93, 180, 103, 216, _("Alarm"), ALARM, 30, .@label$); break; case 38: - areamonster .@map$,181,180,191,216,"Death Word",1698,25,.@label$; - areamonster .@map$,181,180,191,216,"Rideword",1195,25,.@label$; + areamonster(.@map$, 181, 180, 191, 216, _("Death Word"), DEATHWORD, 25, .@label$); + areamonster(.@map$, 181, 180, 191, 216, _("Rideword"), RIDEWORD, 25, .@label$); break; case 39: - areamonster .@map$,267,180,277,216,"Evil Nymph",1416,10,.@label$; - areamonster .@map$,267,180,277,216,"Mao Gui",1513,10,.@label$; - areamonster .@map$,267,180,277,216,"Taoist Hermit",1412,10,.@label$; - areamonster .@map$,267,180,277,216,"Zhu Po Long",1514,10,.@label$; - areamonster .@map$,267,180,277,216,"Jin Guai",1517,5,.@label$; + areamonster(.@map$, 267, 180, 277, 216, _("Evil Nymph"), WICKED_NYMPH, 10, .@label$); + areamonster(.@map$, 267, 180, 277, 216, _("Mao Gui"), CIVIL_SERVANT, 10, .@label$); + areamonster(.@map$, 267, 180, 277, 216, _("Taoist Hermit"), EVIL_CLOUD_HERMIT, 10, .@label$); + areamonster(.@map$, 267, 180, 277, 216, _("Zhu Po Long"), DANCING_DRAGON, 10, .@label$); + areamonster(.@map$, 267, 180, 277, 216, _("Jin Guai"), LI_ME_MANG_RYANG, 5, .@label$); break; case 40: - areamonster .@map$,352,180,362,216,"Samurai Specter",1492,1,.@label$; - areamonster .@map$,352,180,362,216,"Shinobi",1401,10,.@label$; - areamonster .@map$,352,180,362,216,"Tengu",1405,10,.@label$; - areamonster .@map$,352,180,362,216,"Firelock Soldier",1403,5,.@label$; - areamonster .@map$,352,180,362,216,"Miyabi Doll",1404,10,.@label$; - areamonster .@map$,352,180,362,216,"Karakasa",1400,5,.@label$; + areamonster(.@map$, 352, 180, 362, 216, _("Samurai Specter"), INCANTATION_SAMURAI, 1, .@label$); + areamonster(.@map$, 352, 180, 362, 216, _("Shinobi"), SHINOBI, 10, .@label$); + areamonster(.@map$, 352, 180, 362, 216, _("Tengu"), TENGU, 10, .@label$); + areamonster(.@map$, 352, 180, 362, 216, _("Firelock Soldier"), ANTIQUE_FIRELOCK, 5, .@label$); + areamonster(.@map$, 352, 180, 362, 216, _("Miyabi Doll"), MIYABI_NINGYO, 10, .@label$); + areamonster(.@map$, 352, 180, 362, 216, _("Karakasa"), KARAKASA, 5, .@label$); break; case 41: - areamonster .@map$,9,96,19,132,"Kraben",1587,50,.@label$; + areamonster(.@map$, 9, 96, 19, 132, _("Kraben"), KRABEN, 50, .@label$); break; case 42: - areamonster .@map$,93,96,103,132,"Sleeper",1386,20,.@label$; - areamonster .@map$,93,96,103,132,"Sting",1207,10,.@label$; - areamonster .@map$,93,96,103,132,"Mi Gao",1516,10,.@label$; - areamonster .@map$,93,96,103,132,"Sandman",1165,5,.@label$; - areamonster .@map$,93,96,103,132,"Hode",1127,5,.@label$; + areamonster(.@map$, 93, 96, 103, 132, _("Sleeper"), SLEEPER, 20, .@label$); + areamonster(.@map$, 93, 96, 103, 132, _("Sting"), STING, 10, .@label$); + areamonster(.@map$, 93, 96, 103, 132, _("Mi Gao"), INCREASE_SOIL, 10, .@label$); + areamonster(.@map$, 93, 96, 103, 132, _("Sandman"), SAND_MAN, 5, .@label$); + areamonster(.@map$, 93, 96, 103, 132, _("Hode"), HODE, 5, .@label$); break; case 43: - areamonster .@map$,181,96,191,132,"Medusa",1148,10,.@label$; - areamonster .@map$,181,96,191,132,"Sidewinder",1037,40,.@label$; - areamonster .@map$,181,96,191,132,"Anacondaq",1030,5,.@label$; - areamonster .@map$,181,96,191,132,"Boa",1025,5,.@label$; + areamonster(.@map$, 181, 96, 191, 132, _("Medusa"), MEDUSA, 10, .@label$); + areamonster(.@map$, 181, 96, 191, 132, _("Sidewinder"), SIDE_WINDER, 40, .@label$); + areamonster(.@map$, 181, 96, 191, 132, _("Anacondaq"), ANACONDAQ, 5, .@label$); + areamonster(.@map$, 181, 96, 191, 132, _("Boa"), SNAKE, 5, .@label$); break; case 44: - areamonster .@map$,267,96,277,132,"Hatii Baby",1515,20,.@label$; - areamonster .@map$,267,96,277,132,"Baphomet Jr.",1101,20,.@label$; - areamonster .@map$,267,96,277,132,"Orc Baby",1686,1,.@label$; - areamonster .@map$,267,96,277,132,"Baby Desert Wolf",1107,10,.@label$; - areamonster .@map$,267,96,277,132,"Savage Babe",1167,10,.@label$; + areamonster(.@map$, 267, 96, 277, 132, _("Hatii Baby"), GARM_BABY, 20, .@label$); + areamonster(.@map$, 267, 96, 277, 132, _("Baphomet Jr."), BAPHOMET_, 20, .@label$); + areamonster(.@map$, 267, 96, 277, 132, _("Orc Baby"), ORC_BABY, 1, .@label$); + areamonster(.@map$, 267, 96, 277, 132, _("Baby Desert Wolf"), DESERT_WOLF_B, 10, .@label$); + areamonster(.@map$, 267, 96, 277, 132, _("Savage Babe"), SAVAGE_BABE, 10, .@label$); break; case 45: - areamonster .@map$,352,96,362,132,"Osiris",1038,1,.@label$; - areamonster .@map$,352,96,362,132,"Ancient Mummy",1297,15,.@label$; - areamonster .@map$,352,96,362,132,"Verit",1032,15,.@label$; - areamonster .@map$,352,96,362,132,"Mummy",1041,20,.@label$; + areamonster(.@map$, 352, 96, 362, 132, _("Osiris"), OSIRIS, 1, .@label$); + areamonster(.@map$, 352, 96, 362, 132, _("Ancient Mummy"), ANCIENT_MUMMY, 15, .@label$); + areamonster(.@map$, 352, 96, 362, 132, _("Verit"), VERIT, 15, .@label$); + areamonster(.@map$, 352, 96, 362, 132, _("Mummy"), MUMMY, 20, .@label$); break; case 46: - areamonster .@map$,9,9,19,45,"Seeker",1774,20,.@label$; - areamonster .@map$,9,9,19,45,"Beholder",1633,20,.@label$; + areamonster(.@map$, 9, 9, 19, 45, _("Seeker"), SEEKER, 20, .@label$); + areamonster(.@map$, 9, 9, 19, 45, _("Beholder"), BEHOLDER, 20, .@label$); break; case 47: - areamonster .@map$,93,9,103,45,"Deleter",1384,20,.@label$; - areamonster .@map$,93,9,103,45,"Deleter",1385,10,.@label$; - areamonster .@map$,93,9,103,45,"Petite",1156,10,.@label$; - areamonster .@map$,93,9,103,45,"Petite",1155,10,.@label$; + areamonster(.@map$, 93, 9, 103, 45, _("Deleter"), DELETER, 20, .@label$); + areamonster(.@map$, 93, 9, 103, 45, _("Deleter"), DELETER_, 10, .@label$); + areamonster(.@map$, 93, 9, 103, 45, _("Petite"), PETIT_, 10, .@label$); + areamonster(.@map$, 93, 9, 103, 45, _("Petite"), PETIT, 10, .@label$); break; case 48: - areamonster .@map$,181,9,191,45,"Ancient Worm",1305,10,.@label$; - areamonster .@map$,181,9,191,45,"Ancient Mummy",1297,10,.@label$; - areamonster .@map$,181,9,191,45,"Ancient Mimic",1699,10,.@label$; + areamonster(.@map$, 181, 9, 191, 45, _("Ancient Worm"), ANCIENT_WORM, 10, .@label$); + areamonster(.@map$, 181, 9, 191, 45, _("Ancient Mummy"), ANCIENT_MUMMY, 10, .@label$); + areamonster(.@map$, 181, 9, 191, 45, _("Ancient Mimic"), ANCIENT_MIMIC, 10, .@label$); break; case 49: - areamonster .@map$,267,9,277,45,"Grizzly",1381,20,.@label$; - areamonster .@map$,267,9,277,45,"Leib Olmai",1306,7,.@label$; - areamonster .@map$,267,9,277,45,"Zipper Bear",1417,5,.@label$; - areamonster .@map$,267,9,277,45,"Sasquatch",1243,5,.@label$; - areamonster .@map$,267,9,277,45,"Bigfoot",1060,5,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Grizzly"), GRIZZLY, 20, .@label$); + areamonster(.@map$, 267, 9, 277, 45, _("Leib Olmai"), LEIB_OLMAI, 7, .@label$); + areamonster(.@map$, 267, 9, 277, 45, _("Zipper Bear"), ZIPPER_BEAR, 5, .@label$); + areamonster(.@map$, 267, 9, 277, 45, _("Sasquatch"), SASQUATCH, 5, .@label$); + areamonster(.@map$, 267, 9, 277, 45, _("Bigfoot"), BIGFOOT, 5, .@label$); break; case 50: - areamonster .@map$,352,9,362,45,"Pharaoh",1157,1,.@label$; - areamonster .@map$,352,9,362,45,"Amon Ra",1511,1,.@label$; - areamonster .@map$,352,9,362,45,"Anubis",1098,10,.@label$; - areamonster .@map$,352,9,362,45,"Marduk",1140,10,.@label$; - areamonster .@map$,352,9,362,45,"Matyr",1146,10,.@label$; + areamonster(.@map$, 352, 9, 362, 45, _("Pharaoh"), PHARAOH, 1, .@label$); + areamonster(.@map$, 352, 9, 362, 45, _("Amon Ra"), AMON_RA, 1, .@label$); + areamonster(.@map$, 352, 9, 362, 45, _("Anubis"), ANUBIS, 10, .@label$); + areamonster(.@map$, 352, 9, 362, 45, _("Marduk"), MARDUK, 10, .@label$); + areamonster(.@map$, 352, 9, 362, 45, _("Matyr"), MATYR, 10, .@label$); break; case 51: - areamonster .@map$,9,351,19,387,"Mini Demon",1292,20,.@label$; - areamonster .@map$,9,351,19,387,"Diabolic",1382,20,.@label$; - areamonster .@map$,9,351,19,387,"Deviruchi",1109,10,.@label$; + areamonster(.@map$, 9, 351, 19, 387, _("Mini Demon"), MINI_DEMON, 20, .@label$); + areamonster(.@map$, 9, 351, 19, 387, _("Diabolic"), DIABOLIC, 20, .@label$); + areamonster(.@map$, 9, 351, 19, 387, _("Deviruchi"), DEVIRUCHI, 10, .@label$); break; case 52: - areamonster .@map$,93,351,103,387,"Harpy",1376,20,.@label$; - areamonster .@map$,93,351,103,387,"Grand Peco",1369,10,.@label$; - areamonster .@map$,93,351,103,387,"Bloody Butterfly",1408,10,.@label$; - areamonster .@map$,93,351,103,387,"Gargoyle",1253,10,.@label$; - areamonster .@map$,93,351,103,387,"Hill Wind",1680,5,.@label$; - areamonster .@map$,93,351,103,387,"Hill Wind",1629,5,.@label$; + areamonster(.@map$, 93, 351, 103, 387, _("Harpy"), HARPY, 20, .@label$); + areamonster(.@map$, 93, 351, 103, 387, _("Grand Peco"), GRAND_PECO, 10, .@label$); + areamonster(.@map$, 93, 351, 103, 387, _("Bloody Butterfly"), BLOOD_BUTTERFLY, 10, .@label$); + areamonster(.@map$, 93, 351, 103, 387, _("Gargoyle"), GARGOYLE, 10, .@label$); + areamonster(.@map$, 93, 351, 103, 387, _("Hill Wind"), HILL_WIND_1, 5, .@label$); + areamonster(.@map$, 93, 351, 103, 387, _("Hill Wind"), HILL_WIND, 5, .@label$); break; case 53: - areamonster .@map$,181,351,191,387,"Assaulter",1315,25,.@label$; - areamonster .@map$,181,351,191,387,"Shinobi",1401,30,.@label$; + areamonster(.@map$, 181, 351, 191, 387, _("Assaulter"), ASSULTER, 25, .@label$); + areamonster(.@map$, 181, 351, 191, 387, _("Shinobi"), SHINOBI, 30, .@label$); break; case 54: - areamonster .@map$,267,351,277,387,"Chepet",1250,10,.@label$; - areamonster .@map$,267,351,277,387,"Mariontte",1143,10,.@label$; - areamonster .@map$,267,351,277,387,"Miyabi Doll",1404,10,.@label$; + areamonster(.@map$, 267, 351, 277, 387, _("Chepet"), CHEPET, 10, .@label$); + areamonster(.@map$, 267, 351, 277, 387, _("Mariontte"), MARIONETTE, 10, .@label$); + areamonster(.@map$, 267, 351, 277, 387, _("Miyabi Doll"), MIYABI_NINGYO, 10, .@label$); break; case 55: - areamonster .@map$,352,351,362,387,"Medusa",1148,25,.@label$; - areamonster .@map$,352,351,362,387,"Evil Snake Lord",1418,1,.@label$; - areamonster .@map$,352,351,362,387,"Isis",1029,15,.@label$; - areamonster .@map$,352,351,362,387,"Sidewinder",1037,15,.@label$; + areamonster(.@map$, 352, 351, 362, 387, _("Medusa"), MEDUSA, 25, .@label$); + areamonster(.@map$, 352, 351, 362, 387, _("Evil Snake Lord"), DARK_SNAKE_LORD, 1, .@label$); + areamonster(.@map$, 352, 351, 362, 387, _("Isis"), ISIS, 15, .@label$); + areamonster(.@map$, 352, 351, 362, 387, _("Sidewinder"), SIDE_WINDER, 15, .@label$); break; case 56: - areamonster .@map$,9,267,19,303,"Freezer",1319,10,.@label$; - areamonster .@map$,9,267,19,303,"Hatii Baby",1515,10,.@label$; - areamonster .@map$,9,267,19,303,"Ice Titan",1777,15,.@label$; - areamonster .@map$,9,267,19,303,"Snowier",1775,10,.@label$; - areamonster .@map$,9,267,19,303,"Gazeti",1778,10,.@label$; + areamonster(.@map$, 9, 267, 19, 303, _("Freezer"), FREEZER, 10, .@label$); + areamonster(.@map$, 9, 267, 19, 303, _("Hatii Baby"), GARM_BABY, 10, .@label$); + areamonster(.@map$, 9, 267, 19, 303, _("Ice Titan"), ICE_TITAN, 15, .@label$); + areamonster(.@map$, 9, 267, 19, 303, _("Snowier"), SNOWIER, 10, .@label$); + areamonster(.@map$, 9, 267, 19, 303, _("Gazeti"), GAZETI, 10, .@label$); break; case 57: - areamonster .@map$,93,267,103,303,"Arc Angeling",1388,1,.@label$; - areamonster .@map$,93,267,103,303,"Deviling",1582,1,.@label$; - areamonster .@map$,93,267,103,303,"Angeling",1096,1,.@label$; - areamonster .@map$,93,267,103,303,"Ghostring",1120,1,.@label$; - areamonster .@map$,93,267,103,303,"Mastering",1090,1,.@label$; - areamonster .@map$,93,267,103,303,"Metaling",1613,25,.@label$; - areamonster .@map$,93,267,103,303,"Marin",1242,5,.@label$; - areamonster .@map$,93,267,103,303,"Poporing",1031,5,.@label$; - areamonster .@map$,93,267,103,303,"Drops",1113,5,.@label$; + areamonster(.@map$, 93, 267, 103, 303, _("Arc Angeling"), ARCHANGELING, 1, .@label$); + areamonster(.@map$, 93, 267, 103, 303, _("Deviling"), DEVILING, 1, .@label$); + areamonster(.@map$, 93, 267, 103, 303, _("Angeling"), ANGELING, 1, .@label$); + areamonster(.@map$, 93, 267, 103, 303, _("Ghostring"), GHOSTRING, 1, .@label$); + areamonster(.@map$, 93, 267, 103, 303, _("Mastering"), MASTERING, 1, .@label$); + areamonster(.@map$, 93, 267, 103, 303, _("Metaling"), METALING, 25, .@label$); + areamonster(.@map$, 93, 267, 103, 303, _("Marin"), MARIN, 5, .@label$); + areamonster(.@map$, 93, 267, 103, 303, _("Poporing"), POPORING, 5, .@label$); + areamonster(.@map$, 93, 267, 103, 303, _("Drops"), DROPS, 5, .@label$); break; case 58: - areamonster .@map$,181,267,191,303,"Phendark",1202,20,.@label$; - areamonster .@map$,181,267,191,303,"Rybio",1201,10,.@label$; - areamonster .@map$,181,267,191,303,"Zombie Prisoner",1197,10,.@label$; - areamonster .@map$,181,267,191,303,"Skeleton Prisoner",1196,5,.@label$; - areamonster .@map$,181,267,191,303,"Injustice",1257,5,.@label$; + areamonster(.@map$, 181, 267, 191, 303, _("Phendark"), PHENDARK, 20, .@label$); + areamonster(.@map$, 181, 267, 191, 303, _("Rybio"), RYBIO, 10, .@label$); + areamonster(.@map$, 181, 267, 191, 303, _("Zombie Prisoner"), ZOMBIE_PRISONER, 10, .@label$); + areamonster(.@map$, 181, 267, 191, 303, _("Skeleton Prisoner"), SKEL_PRISONER, 5, .@label$); + areamonster(.@map$, 181, 267, 191, 303, _("Injustice"), INJUSTICE, 5, .@label$); break; case 59: - areamonster .@map$,267,267,277,303,"Ancient Mimic",1699,30,.@label$; - areamonster .@map$,267,267,277,303,"Mimic",1191,20,.@label$; - areamonster .@map$,267,267,277,303,"Mystcase",1249,10,.@label$; + areamonster(.@map$, 267, 267, 277, 303, _("Ancient Mimic"), ANCIENT_MIMIC, 30, .@label$); + areamonster(.@map$, 267, 267, 277, 303, _("Mimic"), MIMIC, 20, .@label$); + areamonster(.@map$, 267, 267, 277, 303, _("Mystcase"), MYSTCASE, 10, .@label$); break; case 60: - areamonster .@map$,352,267,362,303,"Egnigem Cenia",1658,1,.@label$; - areamonster .@map$,352,267,362,303,"Doppelganger",1046,1,.@label$; - areamonster .@map$,352,267,362,303,"Armeyer Dinze",1654,10,.@label$; - areamonster .@map$,352,267,362,303,"Wickebine Tres",1653,10,.@label$; - areamonster .@map$,352,267,362,303,"Laurell Winder",1657,10,.@label$; - areamonster .@map$,352,267,362,303,"Kavach Icarus",1656,10,.@label$; - areamonster .@map$,352,267,362,303,"Errende Ebecee",1655,10,.@label$; - areamonster .@map$,352,267,362,303,"Egnigem Cenia",1652,10,.@label$; + areamonster(.@map$, 352, 267, 362, 303, _("Egnigem Cenia"), B_YGNIZEM, 1, .@label$); + areamonster(.@map$, 352, 267, 362, 303, _("Doppelganger"), DOPPELGANGER, 1, .@label$); + areamonster(.@map$, 352, 267, 362, 303, _("Armeyer Dinze"), ARMAIA, 10, .@label$); + areamonster(.@map$, 352, 267, 362, 303, _("Wickebine Tres"), WHIKEBAIN, 10, .@label$); + areamonster(.@map$, 352, 267, 362, 303, _("Laurell Winder"), RAWREL, 10, .@label$); + areamonster(.@map$, 352, 267, 362, 303, _("Kavach Icarus"), KAVAC, 10, .@label$); + areamonster(.@map$, 352, 267, 362, 303, _("Errende Ebecee"), EREND, 10, .@label$); + areamonster(.@map$, 352, 267, 362, 303, _("Egnigem Cenia"), YGNIZEM, 10, .@label$); break; case 61: - areamonster .@map$,9,180,19,216,"Agav",1769,10,.@label$; - areamonster .@map$,9,180,19,216,"Echio",1770,10,.@label$; - areamonster .@map$,9,180,19,216,"Isilla",1772,5,.@label$; - areamonster .@map$,9,180,19,216,"Mobster",1313,10,.@label$; - areamonster .@map$,9,180,19,216,"Pasana",1154,10,.@label$; - areamonster .@map$,9,180,19,216,"Vanberk",1771,5,.@label$; + areamonster(.@map$, 9, 180, 19, 216, _("Agav"), AGAV, 10, .@label$); + areamonster(.@map$, 9, 180, 19, 216, _("Echio"), ECHIO, 10, .@label$); + areamonster(.@map$, 9, 180, 19, 216, _("Isilla"), ISILLA, 5, .@label$); + areamonster(.@map$, 9, 180, 19, 216, _("Mobster"), MOBSTER, 10, .@label$); + areamonster(.@map$, 9, 180, 19, 216, _("Pasana"), PASANA, 10, .@label$); + areamonster(.@map$, 9, 180, 19, 216, _("Vanberk"), VANBERK, 5, .@label$); break; case 62: - areamonster .@map$,93,180,103,216,"Wanderer",1208,35,.@label$; + areamonster(.@map$, 93, 180, 103, 216, _("Wanderer"), WANDER_MAN, 35, .@label$); break; case 63: - areamonster .@map$,181,180,191,216,"Ragged Zombie",1865,20,.@label$; - areamonster .@map$,181,180,191,216,"Zombie Master",1298,10,.@label$; - areamonster .@map$,181,180,191,216,"Zombie Prisoner",1197,5,.@label$; - areamonster .@map$,181,180,191,216,"Orc Zombie",1153,5,.@label$; - areamonster .@map$,181,180,191,216,"Zombie",1015,5,.@label$; + areamonster(.@map$, 181, 180, 191, 216, _("Ragged Zombie"), RAGGED_ZOMBIE, 20, .@label$); + areamonster(.@map$, 181, 180, 191, 216, _("Zombie Master"), ZOMBIE_MASTER, 10, .@label$); + areamonster(.@map$, 181, 180, 191, 216, _("Zombie Prisoner"), ZOMBIE_PRISONER, 5, .@label$); + areamonster(.@map$, 181, 180, 191, 216, _("Orc Zombie"), ORC_ZOMBIE, 5, .@label$); + areamonster(.@map$, 181, 180, 191, 216, _("Zombie"), ZOMBIE, 5, .@label$); break; case 64: - areamonster .@map$,267,180,277,216,"Ungoliant",1618,30,.@label$; - areamonster .@map$,267,180,277,216,"Ancient Worm",1305,2,.@label$; - areamonster .@map$,267,180,277,216,"Caterpillar",1300,2,.@label$; - areamonster .@map$,267,180,277,216,"Creamy Fear",1293,2,.@label$; - areamonster .@map$,267,180,277,216,"Killer Mantis",1294,2,.@label$; - areamonster .@map$,267,180,277,216,"Giant Hornet",1303,2,.@label$; + areamonster(.@map$, 267, 180, 277, 216, _("Ungoliant"), UNGOLIANT, 30, .@label$); + areamonster(.@map$, 267, 180, 277, 216, _("Ancient Worm"), ANCIENT_WORM, 2, .@label$); + areamonster(.@map$, 267, 180, 277, 216, _("Caterpillar"), CATERPILLAR, 2, .@label$); + areamonster(.@map$, 267, 180, 277, 216, _("Creamy Fear"), CREMY_FEAR, 2, .@label$); + areamonster(.@map$, 267, 180, 277, 216, _("Killer Mantis"), KILLER_MANTIS, 2, .@label$); + areamonster(.@map$, 267, 180, 277, 216, _("Giant Hornet"), GIANT_HONET, 2, .@label$); break; case 65: - areamonster .@map$,352,180,362,216,"Atros",1785,1,.@label$; - areamonster .@map$,352,180,362,216,"Galion",1783,20,.@label$; + areamonster(.@map$, 352, 180, 362, 216, _("Atros"), ATROCE, 1, .@label$); + areamonster(.@map$, 352, 180, 362, 216, _("Galion"), GALION, 20, .@label$); break; case 66: - areamonster .@map$,9,96,19,132,"Incubus",1374,20,.@label$; - areamonster .@map$,9,96,19,132,"Aliot",1736,20,.@label$; - areamonster .@map$,9,96,19,132,"Injustice",1257,10,.@label$; + areamonster(.@map$, 9, 96, 19, 132, _("Incubus"), INCUBUS, 20, .@label$); + areamonster(.@map$, 9, 96, 19, 132, _("Aliot"), ALIOT, 20, .@label$); + areamonster(.@map$, 9, 96, 19, 132, _("Injustice"), INJUSTICE, 10, .@label$); break; case 67: - areamonster .@map$,93,96,103,132,"Acidus",1716,10,.@label$; - areamonster .@map$,93,96,103,132,"Acidus",1713,10,.@label$; - areamonster .@map$,93,96,103,132,"Deleter",1384,5,.@label$; - areamonster .@map$,93,96,103,132,"Mutant Dragonoid",1262,10,.@label$; - areamonster .@map$,93,96,103,132,"Petite",1156,5,.@label$; + areamonster(.@map$, 93, 96, 103, 132, _("Acidus"), ACIDUS_, 10, .@label$); + areamonster(.@map$, 93, 96, 103, 132, _("Acidus"), ACIDUS, 10, .@label$); + areamonster(.@map$, 93, 96, 103, 132, _("Deleter"), DELETER, 5, .@label$); + areamonster(.@map$, 93, 96, 103, 132, _("Mutant Dragonoid"), MUTANT_DRAGON, 10, .@label$); + areamonster(.@map$, 93, 96, 103, 132, _("Petite"), PETIT_, 5, .@label$); break; case 68: - areamonster .@map$,181,96,191,132,"Lava Golem",1366,10,.@label$; - areamonster .@map$,181,96,191,132,"Stalactic Golem",1278,10,.@label$; - areamonster .@map$,181,96,191,132,"Ice Titan",1777,10,.@label$; - areamonster .@map$,181,96,191,132,"Wooden Golem",1497,5,.@label$; - areamonster .@map$,181,96,191,132,"Golem",1040,5,.@label$; + areamonster(.@map$, 181, 96, 191, 132, _("Lava Golem"), LAVA_GOLEM, 10, .@label$); + areamonster(.@map$, 181, 96, 191, 132, _("Stalactic Golem"), STALACTIC_GOLEM, 10, .@label$); + areamonster(.@map$, 181, 96, 191, 132, _("Ice Titan"), ICE_TITAN, 10, .@label$); + areamonster(.@map$, 181, 96, 191, 132, _("Wooden Golem"), WOODEN_GOLEM, 5, .@label$); + areamonster(.@map$, 181, 96, 191, 132, _("Golem"), GOLEM, 5, .@label$); break; case 69: - areamonster .@map$,267,96,277,132,"Dame of Sentinel",1700,20,.@label$; - areamonster .@map$,267,96,277,132,"Mistress of Shelter",1701,10,.@label$; - areamonster .@map$,267,96,277,132,"Baroness of Retribution",1702,10,.@label$; - areamonster .@map$,267,96,277,132,"Lady Solace",1703,10,.@label$; - areamonster .@map$,267,96,277,132,"False Angel",1371,10,.@label$; + areamonster(.@map$, 267, 96, 277, 132, _("Dame of Sentinel"), OBSERVATION, 20, .@label$); + areamonster(.@map$, 267, 96, 277, 132, _("Mistress of Shelter"), SHELTER, 10, .@label$); + areamonster(.@map$, 267, 96, 277, 132, _("Baroness of Retribution"), RETRIBUTION, 10, .@label$); + areamonster(.@map$, 267, 96, 277, 132, _("Lady Solace"), SOLACE, 10, .@label$); + areamonster(.@map$, 267, 96, 277, 132, _("False Angel"), FAKE_ANGEL, 10, .@label$); break; case 70: - areamonster .@map$,352,96,362,132,"Orc Hero",1087,1,.@label$; - areamonster .@map$,352,96,362,132,"Orc Lord",1190,1,.@label$; - areamonster .@map$,352,96,362,132,"Orc Baby",1686,20,.@label$; + areamonster(.@map$, 352, 96, 362, 132, _("Orc Hero"), ORK_HERO, 1, .@label$); + areamonster(.@map$, 352, 96, 362, 132, _("Orc Lord"), ORC_LORD, 1, .@label$); + areamonster(.@map$, 352, 96, 362, 132, _("Orc Baby"), ORC_BABY, 20, .@label$); break; case 71: - areamonster .@map$,9,9,19,45,"Succubus",1370,20,.@label$; - areamonster .@map$,9,9,19,45,"Nightmare Terror",1379,20,.@label$; - areamonster .@map$,9,9,19,45,"Incubus",1374,20,.@label$; - areamonster .@map$,9,9,19,45,"Nightmare",1061,5,.@label$; + areamonster(.@map$, 9, 9, 19, 45, _("Succubus"), SUCCUBUS, 20, .@label$); + areamonster(.@map$, 9, 9, 19, 45, _("Nightmare Terror"), NIGHTMARE_TERROR, 20, .@label$); + areamonster(.@map$, 9, 9, 19, 45, _("Incubus"), INCUBUS, 20, .@label$); + areamonster(.@map$, 9, 9, 19, 45, _("Nightmare"), NIGHTMARE, 5, .@label$); break; case 72: - areamonster .@map$,93,9,103,45,"Margaretha Sorin",1637,10,.@label$; - areamonster .@map$,93,9,103,45,"Permeter",1314,10,.@label$; - areamonster .@map$,93,9,103,45,"Errende Ebecee",1655,10,.@label$; - areamonster .@map$,93,9,103,45,"Enchanted Peach Tree",1410,10,.@label$; + areamonster(.@map$, 93, 9, 103, 45, _("Margaretha Sorin"), MAGALETA, 10, .@label$); + areamonster(.@map$, 93, 9, 103, 45, _("Permeter"), PERMETER, 10, .@label$); + areamonster(.@map$, 93, 9, 103, 45, _("Errende Ebecee"), EREND, 10, .@label$); + areamonster(.@map$, 93, 9, 103, 45, _("Enchanted Peach Tree"), LIVE_PEACH_TREE, 10, .@label$); break; case 73: - areamonster .@map$,181,9,191,45,"Succubus",1370,10,.@label$; - areamonster .@map$,181,9,191,45,"Loli Ruri",1505,20,.@label$; - areamonster .@map$,181,9,191,45,"Aliza",1737,10,.@label$; - areamonster .@map$,181,9,191,45,"Zealotus",1200,5,.@label$; - areamonster .@map$,181,9,191,45,"Alice",1275,5,.@label$; - areamonster .@map$,181,9,191,45,"Green Maiden",1519,10,.@label$; + areamonster(.@map$, 181, 9, 191, 45, _("Succubus"), SUCCUBUS, 10, .@label$); + areamonster(.@map$, 181, 9, 191, 45, _("Loli Ruri"), LOLI_RURI, 20, .@label$); + areamonster(.@map$, 181, 9, 191, 45, _("Aliza"), ALIZA, 10, .@label$); + areamonster(.@map$, 181, 9, 191, 45, _("Zealotus"), ZHERLTHSH, 5, .@label$); + areamonster(.@map$, 181, 9, 191, 45, _("Alice"), ALICE, 5, .@label$); + areamonster(.@map$, 181, 9, 191, 45, _("Green Maiden"), CHUNG_E, 10, .@label$); break; case 74: - areamonster .@map$,267,9,277,45,"Dimik",1671,6,.@label$; - areamonster .@map$,267,9,277,45,"Dimik",1673,6,.@label$; - areamonster .@map$,267,9,277,45,"Dimik",1672,6,.@label$; - areamonster .@map$,267,9,277,45,"Venatu",1677,6,.@label$; - areamonster .@map$,267,9,277,45,"Dimik",1670,6,.@label$; - areamonster .@map$,267,9,277,45,"Archdam",1668,6,.@label$; - areamonster .@map$,267,9,277,45,"Venatu",1678,6,.@label$; - areamonster .@map$,267,9,277,45,"Venatu",1679,6,.@label$; - areamonster .@map$,267,9,277,45,"Venatu",1676,6,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Dimik"), DIMIK_2, 6, .@label$); + areamonster(.@map$, 267, 9, 277, 45, _("Dimik"), DIMIK_4, 6, .@label$); + areamonster(.@map$, 267, 9, 277, 45, _("Dimik"), DIMIK_3, 6, .@label$); + areamonster(.@map$, 267, 9, 277, 45, _("Venatu"), VENATU_2, 6, .@label$); + areamonster(.@map$, 267, 9, 277, 45, _("Dimik"), DIMIK_1, 6, .@label$); + areamonster(.@map$, 267, 9, 277, 45, _("Archdam"), ARCHDAM, 6, .@label$); + areamonster(.@map$, 267, 9, 277, 45, _("Venatu"), VENATU_3, 6, .@label$); + areamonster(.@map$, 267, 9, 277, 45, _("Venatu"), VENATU_4, 6, .@label$); + areamonster(.@map$, 267, 9, 277, 45, _("Venatu"), VENATU_1, 6, .@label$); break; case 75: - areamonster .@map$,352,9,362,45,"Baphomet",1039,1,.@label$; - areamonster .@map$,352,9,362,45,"Dark Lord",1272,1,.@label$; - areamonster .@map$,352,9,362,45,"Baphomet Jr.",1101,20,.@label$; - areamonster .@map$,352,9,362,45,"Dark Illusion",1302,10,.@label$; + areamonster(.@map$, 352, 9, 362, 45, _("Baphomet"), BAPHOMET, 1, .@label$); + areamonster(.@map$, 352, 9, 362, 45, _("Dark Lord"), DARK_LORD, 1, .@label$); + areamonster(.@map$, 352, 9, 362, 45, _("Baphomet Jr."), BAPHOMET_, 20, .@label$); + areamonster(.@map$, 352, 9, 362, 45, _("Dark Illusion"), DARK_ILLUSION, 10, .@label$); break; case 76: - areamonster .@map$,9,351,19,387,"Abysmal Knight",1219,30,.@label$; - areamonster .@map$,9,351,19,387,"Nightmare Terror",1379,20,.@label$; - areamonster .@map$,9,351,19,387,"Nightmare",1061,10,.@label$; + areamonster(.@map$, 9, 351, 19, 387, _("Abysmal Knight"), KNIGHT_OF_ABYSS, 30, .@label$); + areamonster(.@map$, 9, 351, 19, 387, _("Nightmare Terror"), NIGHTMARE_TERROR, 20, .@label$); + areamonster(.@map$, 9, 351, 19, 387, _("Nightmare"), NIGHTMARE, 10, .@label$); break; case 77: - areamonster .@map$,93,351,103,387,"Banshee",1867,30,.@label$; - areamonster .@map$,93,351,103,387,"Wraith Dead",1291,10,.@label$; - areamonster .@map$,93,351,103,387,"Evil Druid",1117,10,.@label$; - areamonster .@map$,93,351,103,387,"Wraith",1192,10,.@label$; - areamonster .@map$,93,351,103,387,"Wind Ghost",1263,10,.@label$; + areamonster(.@map$, 93, 351, 103, 387, _("Banshee"), BANSHEE, 30, .@label$); + areamonster(.@map$, 93, 351, 103, 387, _("Wraith Dead"), WRAITH_DEAD, 10, .@label$); + areamonster(.@map$, 93, 351, 103, 387, _("Evil Druid"), EVIL_DRUID, 10, .@label$); + areamonster(.@map$, 93, 351, 103, 387, _("Wraith"), WRAITH, 10, .@label$); + areamonster(.@map$, 93, 351, 103, 387, _("Wind Ghost"), WIND_GHOST, 10, .@label$); break; case 78: - areamonster .@map$,181,351,191,387,"Sword Master",1829,5,.@label$; - areamonster .@map$,181,351,191,387,"Bloody Knight",1268,10,.@label$; - areamonster .@map$,181,351,191,387,"Abysmal Knight",1219,5,.@label$; - areamonster .@map$,181,351,191,387,"Dullahan",1504,10,.@label$; - areamonster .@map$,181,351,191,387,"Raydric",1163,20,.@label$; + areamonster(.@map$, 181, 351, 191, 387, _("Sword Master"), SWORD_GUARDIAN, 5, .@label$); + areamonster(.@map$, 181, 351, 191, 387, _("Bloody Knight"), BLOODY_KNIGHT, 10, .@label$); + areamonster(.@map$, 181, 351, 191, 387, _("Abysmal Knight"), KNIGHT_OF_ABYSS, 5, .@label$); + areamonster(.@map$, 181, 351, 191, 387, _("Dullahan"), DULLAHAN, 10, .@label$); + areamonster(.@map$, 181, 351, 191, 387, _("Raydric"), RAYDRIC, 20, .@label$); break; case 79: - areamonster .@map$,267,351,277,387,"Hydro",1720,10,.@label$; - areamonster .@map$,267,351,277,387,"Ferus",1714,10,.@label$; - areamonster .@map$,267,351,277,387,"Ferus",1717,10,.@label$; - areamonster .@map$,267,351,277,387,"Deleter",1385,5,.@label$; - areamonster .@map$,267,351,277,387,"Petite",1155,5,.@label$; + areamonster(.@map$, 267, 351, 277, 387, _("Hydro"), HYDRO, 10, .@label$); + areamonster(.@map$, 267, 351, 277, 387, _("Ferus"), FERUS, 10, .@label$); + areamonster(.@map$, 267, 351, 277, 387, _("Ferus"), FERUS_, 10, .@label$); + areamonster(.@map$, 267, 351, 277, 387, _("Deleter"), DELETER_, 5, .@label$); + areamonster(.@map$, 267, 351, 277, 387, _("Petite"), PETIT, 5, .@label$); break; case 80: - areamonster .@map$,352,351,362,387,"Falling Bishop",1871,1,.@label$; - areamonster .@map$,352,351,362,387,"Necromancer",1870,15,.@label$; + areamonster(.@map$, 352, 351, 362, 387, _("Falling Bishop"), FALLINGBISHOP, 1, .@label$); + areamonster(.@map$, 352, 351, 362, 387, _("Necromancer"), NECROMANCER, 15, .@label$); break; case 81: - areamonster .@map$,9,267,19,303,"Mysteltainn",1203,20,.@label$; - areamonster .@map$,9,267,19,303,"Ogretooth",1204,20,.@label$; - areamonster .@map$,9,267,19,303,"Executioner",1205,20,.@label$; + areamonster(.@map$, 9, 267, 19, 303, _("Mysteltainn"), MYSTELTAINN, 20, .@label$); + areamonster(.@map$, 9, 267, 19, 303, _("Ogretooth"), TIRFING, 20, .@label$); + areamonster(.@map$, 9, 267, 19, 303, _("Executioner"), EXECUTIONER, 20, .@label$); break; case 82: - areamonster .@map$,93,267,103,303,"Bloody Knight",1268,10,.@label$; - areamonster .@map$,93,267,103,303,"Agav",1769,10,.@label$; - areamonster .@map$,93,267,103,303,"Bloody Murderer",1507,10,.@label$; - areamonster .@map$,93,267,103,303,"Skogul",1752,10,.@label$; - areamonster .@map$,93,267,103,303,"Injustice",1257,10,.@label$; + areamonster(.@map$, 93, 267, 103, 303, _("Bloody Knight"), BLOODY_KNIGHT, 10, .@label$); + areamonster(.@map$, 93, 267, 103, 303, _("Agav"), AGAV, 10, .@label$); + areamonster(.@map$, 93, 267, 103, 303, _("Bloody Murderer"), BLOODY_MURDERER, 10, .@label$); + areamonster(.@map$, 93, 267, 103, 303, _("Skogul"), SKOGUL, 10, .@label$); + areamonster(.@map$, 93, 267, 103, 303, _("Injustice"), INJUSTICE, 10, .@label$); break; case 83: - areamonster .@map$,181,267,191,303,"Skeggiold",1754,10,.@label$; - areamonster .@map$,181,267,191,303,"Dark Illusion",1302,10,.@label$; - areamonster .@map$,181,267,191,303,"Gryphon",1259,10,.@label$; - areamonster .@map$,181,267,191,303,"Chimera",1283,10,.@label$; + areamonster(.@map$, 181, 267, 191, 303, _("Skeggiold"), SKEGGIOLD, 10, .@label$); + areamonster(.@map$, 181, 267, 191, 303, _("Dark Illusion"), DARK_ILLUSION, 10, .@label$); + areamonster(.@map$, 181, 267, 191, 303, _("Gryphon"), GRYPHON, 10, .@label$); + areamonster(.@map$, 181, 267, 191, 303, _("Chimera"), CHIMERA, 10, .@label$); break; case 84: - areamonster .@map$,267,267,277,303,"Succubus",1370,10,.@label$; - areamonster .@map$,267,267,277,303,"Dark Illusion",1302,20,.@label$; - areamonster .@map$,267,267,277,303,"Owl Duke",1320,10,.@label$; - areamonster .@map$,267,267,277,303,"Owl Baron",1295,10,.@label$; - areamonster .@map$,267,267,277,303,"Incubus",1374,10,.@label$; + areamonster(.@map$, 267, 267, 277, 303, _("Succubus"), SUCCUBUS, 10, .@label$); + areamonster(.@map$, 267, 267, 277, 303, _("Dark Illusion"), DARK_ILLUSION, 20, .@label$); + areamonster(.@map$, 267, 267, 277, 303, _("Owl Duke"), OWL_DUKE, 10, .@label$); + areamonster(.@map$, 267, 267, 277, 303, _("Owl Baron"), OWL_BARON, 10, .@label$); + areamonster(.@map$, 267, 267, 277, 303, _("Incubus"), INCUBUS, 10, .@label$); break; case 85: - areamonster .@map$,352,267,362,303,"Ifrit",1832,1,.@label$; + areamonster(.@map$, 352, 267, 362, 303, _("Ifrit"), IFRIT, 1, .@label$); break; case 86: - areamonster .@map$,9,180,19,216,"Hydro",1720,10,.@label$; - areamonster .@map$,9,180,19,216,"Gryphon",1259,10,.@label$; - areamonster .@map$,9,180,19,216,"Chimera",1283,10,.@label$; - areamonster .@map$,9,180,19,216,"Majoruros",1310,10,.@label$; + areamonster(.@map$, 9, 180, 19, 216, _("Hydro"), HYDRO, 10, .@label$); + areamonster(.@map$, 9, 180, 19, 216, _("Gryphon"), GRYPHON, 10, .@label$); + areamonster(.@map$, 9, 180, 19, 216, _("Chimera"), CHIMERA, 10, .@label$); + areamonster(.@map$, 9, 180, 19, 216, _("Majoruros"), MAJORUROS, 10, .@label$); break; case 87: - areamonster .@map$,93,180,103,216,"Salamander",1831,15,.@label$; - areamonster .@map$,93,180,103,216,"Kasa",1833,20,.@label$; - areamonster .@map$,93,180,103,216,"Lava Golem",1366,15,.@label$; - areamonster .@map$,93,180,103,216,"Gajomart",1309,10,.@label$; + areamonster(.@map$, 93, 180, 103, 216, _("Salamander"), SALAMANDER, 15, .@label$); + areamonster(.@map$, 93, 180, 103, 216, _("Kasa"), KASA, 20, .@label$); + areamonster(.@map$, 93, 180, 103, 216, _("Lava Golem"), LAVA_GOLEM, 15, .@label$); + areamonster(.@map$, 93, 180, 103, 216, _("Gajomart"), GAJOMART, 10, .@label$); break; case 88: - areamonster .@map$,181,180,191,216,"Necromancer",1870,15,.@label$; - areamonster .@map$,181,180,191,216,"Anubis",1098,15,.@label$; - areamonster .@map$,181,180,191,216,"Wraith Dead",1291,10,.@label$; - areamonster .@map$,181,180,191,216,"Ancient Mummy",1297,10,.@label$; - areamonster .@map$,181,180,191,216,"Khalitzburg",1132,10,.@label$; + areamonster(.@map$, 181, 180, 191, 216, _("Necromancer"), NECROMANCER, 15, .@label$); + areamonster(.@map$, 181, 180, 191, 216, _("Anubis"), ANUBIS, 15, .@label$); + areamonster(.@map$, 181, 180, 191, 216, _("Wraith Dead"), WRAITH_DEAD, 10, .@label$); + areamonster(.@map$, 181, 180, 191, 216, _("Ancient Mummy"), ANCIENT_MUMMY, 10, .@label$); + areamonster(.@map$, 181, 180, 191, 216, _("Khalitzburg"), KHALITZBURG, 10, .@label$); break; case 89: - areamonster .@map$,267,180,277,216,"Odium of Thanatos",1704,6,.@label$; - areamonster .@map$,267,180,277,216,"Despero of Thanatos",1705,6,.@label$; - areamonster .@map$,267,180,277,216,"Maero of Thanatos",1706,6,.@label$; - areamonster .@map$,267,180,277,216,"Dolor of Thanatos",1707,6,.@label$; + areamonster(.@map$, 267, 180, 277, 216, _("Odium of Thanatos"), THA_ODIUM, 6, .@label$); + areamonster(.@map$, 267, 180, 277, 216, _("Despero of Thanatos"), THA_DESPERO, 6, .@label$); + areamonster(.@map$, 267, 180, 277, 216, _("Maero of Thanatos"), THA_MAERO, 6, .@label$); + areamonster(.@map$, 267, 180, 277, 216, _("Dolor of Thanatos"), THA_DOLOR, 6, .@label$); break; case 90: - areamonster .@map$,352,180,362,216,"Valkyrie Randgris",1751,1,.@label$; - areamonster .@map$,352,180,362,216,"Baroness of Retribution",1702,10,.@label$; - areamonster .@map$,352,180,362,216,"Lady Solace",1703,10,.@label$; - areamonster .@map$,352,180,362,216,"False Angel",1371,10,.@label$; + areamonster(.@map$, 352, 180, 362, 216, _("Valkyrie Randgris"), RANDGRIS, 1, .@label$); + areamonster(.@map$, 352, 180, 362, 216, _("Baroness of Retribution"), RETRIBUTION, 10, .@label$); + areamonster(.@map$, 352, 180, 362, 216, _("Lady Solace"), SOLACE, 10, .@label$); + areamonster(.@map$, 352, 180, 362, 216, _("False Angel"), FAKE_ANGEL, 10, .@label$); break; case 91: - areamonster .@map$,9,96,19,132,"Cecil Damon",1638,10,.@label$; - areamonster .@map$,9,96,19,132,"Bow Master",1830,10,.@label$; - areamonster .@map$,9,96,19,132,"Kavac",1656,30,.@label$; + areamonster(.@map$, 9, 96, 19, 132, _("Cecil Damon"), SHECIL, 10, .@label$); + areamonster(.@map$, 9, 96, 19, 132, _("Bow Master"), BOW_GUARDIAN, 10, .@label$); + areamonster(.@map$, 9, 96, 19, 132, _("Kavac"), KAVAC, 30, .@label$); break; case 92: - areamonster .@map$,93,96,103,132,"Kathryne Keyron",1639,15,.@label$; - areamonster .@map$,93,96,103,132,"Elder",1377,10,.@label$; - areamonster .@map$,93,96,103,132,"Laurell Weinder",1657,10,.@label$; - areamonster .@map$,93,96,103,132,"Wind Ghost",1263,10,.@label$; - areamonster .@map$,93,96,103,132,"Marduk",1140,10,.@label$; + areamonster(.@map$, 93, 96, 103, 132, _("Kathryne Keyron"), KATRINN, 15, .@label$); + areamonster(.@map$, 93, 96, 103, 132, _("Elder"), ELDER, 10, .@label$); + areamonster(.@map$, 93, 96, 103, 132, _("Laurell Weinder"), RAWREL, 10, .@label$); + areamonster(.@map$, 93, 96, 103, 132, _("Wind Ghost"), WIND_GHOST, 10, .@label$); + areamonster(.@map$, 93, 96, 103, 132, _("Marduk"), MARDUK, 10, .@label$); break; case 93: - areamonster .@map$,181,96,191,132,"Seyren Windsor",1634,15,.@label$; - areamonster .@map$,181,96,191,132,"Bloody Knight",1268,10,.@label$; - areamonster .@map$,181,96,191,132,"Abysmal Knight",1219,10,.@label$; - areamonster .@map$,181,96,191,132,"Wanderer",1208,10,.@label$; + areamonster(.@map$, 181, 96, 191, 132, _("Seyren Windsor"), SEYREN, 15, .@label$); + areamonster(.@map$, 181, 96, 191, 132, _("Bloody Knight"), BLOODY_KNIGHT, 10, .@label$); + areamonster(.@map$, 181, 96, 191, 132, _("Abysmal Knight"), KNIGHT_OF_ABYSS, 10, .@label$); + areamonster(.@map$, 181, 96, 191, 132, _("Wanderer"), WANDER_MAN, 10, .@label$); break; case 94: - areamonster .@map$,267,96,277,132,"Sword Master",1829,15,.@label$; - areamonster .@map$,267,96,277,132,"Bow Master",1830,15,.@label$; + areamonster(.@map$, 267, 96, 277, 132, _("Sword Master"), SWORD_GUARDIAN, 15, .@label$); + areamonster(.@map$, 267, 96, 277, 132, _("Bow Master"), BOW_GUARDIAN, 15, .@label$); break; case 95: - areamonster .@map$,352,96,362,132,"Beelzebub",1873,1,.@label$; - areamonster .@map$,352,96,362,132,"Hunter Fly",1035,30,.@label$; - areamonster .@map$,352,96,362,132,"Steel Chonchon",1042,5,.@label$; - areamonster .@map$,352,96,362,132,"Dragon FLy",1091,5,.@label$; - areamonster .@map$,352,96,362,132,"Chonchon",1011,5,.@label$; + areamonster(.@map$, 352, 96, 362, 132, _("Beelzebub"), BEELZEBUB, 1, .@label$); + areamonster(.@map$, 352, 96, 362, 132, _("Hunter Fly"), HUNTER_FLY, 30, .@label$); + areamonster(.@map$, 352, 96, 362, 132, _("Steel Chonchon"), STEEL_CHONCHON, 5, .@label$); + areamonster(.@map$, 352, 96, 362, 132, _("Dragon FLy"), DRAGON_FLY, 5, .@label$); + areamonster(.@map$, 352, 96, 362, 132, _("Chonchon"), CHONCHON, 5, .@label$); break; case 96: - areamonster .@map$,9,9,19,45,"Valkyrie",1765,5,.@label$; - areamonster .@map$,9,9,19,45,"Skeggiold",1755,10,.@label$; - areamonster .@map$,9,9,19,45,"Skeggiold",1754,10,.@label$; + areamonster(.@map$, 9, 9, 19, 45, _("Valkyrie"), G_RANDGRIS, 5, .@label$); + areamonster(.@map$, 9, 9, 19, 45, _("Skeggiold"), SKEGGIOLD_, 10, .@label$); + areamonster(.@map$, 9, 9, 19, 45, _("Skeggiold"), SKEGGIOLD, 10, .@label$); break; case 97: - areamonster .@map$,93,9,103,45,"Incarnation of Morroc",1918,5,.@label$; - areamonster .@map$,93,9,103,45,"Incarnation of Morroc",1919,5,.@label$; - areamonster .@map$,93,9,103,45,"Incarnation of Morroc",1920,5,.@label$; - areamonster .@map$,93,9,103,45,"Incarnation of Morroc",1921,5,.@label$; + areamonster(.@map$, 93, 9, 103, 45, _("Incarnation of Morroc"), MOROCC_1, 5, .@label$); + areamonster(.@map$, 93, 9, 103, 45, _("Incarnation of Morroc"), MOROCC_2, 5, .@label$); + areamonster(.@map$, 93, 9, 103, 45, _("Incarnation of Morroc"), MOROCC_3, 5, .@label$); + areamonster(.@map$, 93, 9, 103, 45, _("Incarnation of Morroc"), MOROCC_4, 5, .@label$); break; case 98: - areamonster .@map$,181,9,191,45,"Kathryne Keyron",1639,2,.@label$; - areamonster .@map$,181,9,191,45,"Seyren Windsor",1634,2,.@label$; - areamonster .@map$,181,9,191,45,"Margaretha Sorin",1637,2,.@label$; - areamonster .@map$,181,9,191,45,"Eremes Guile",1635,2,.@label$; - areamonster .@map$,181,9,191,45,"Howard Alt-Eisen",1636,2,.@label$; - areamonster .@map$,181,9,191,45,"Cecil Damon",1638,2,.@label$; + areamonster(.@map$, 181, 9, 191, 45, _("Kathryne Keyron"), KATRINN, 2, .@label$); + areamonster(.@map$, 181, 9, 191, 45, _("Seyren Windsor"), SEYREN, 2, .@label$); + areamonster(.@map$, 181, 9, 191, 45, _("Margaretha Sorin"), MAGALETA, 2, .@label$); + areamonster(.@map$, 181, 9, 191, 45, _("Eremes Guile"), EREMES, 2, .@label$); + areamonster(.@map$, 181, 9, 191, 45, _("Howard Alt-Eisen"), HARWORD, 2, .@label$); + areamonster(.@map$, 181, 9, 191, 45, _("Cecil Damon"), SHECIL, 2, .@label$); break; case 99: - for(.@i = 1; .@i<=7; ++.@i) { - .@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$; + areamonster(.@map$, 267, 9, 277, 45, _("Kathryne Keyron"), KATRINN, 2, .@label$); else if (.@mob_ran == 2) - areamonster .@map$,267,9,277,45,"Seyren Windsor",1634,2,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Seyren Windsor"), SEYREN, 2, .@label$); else if (.@mob_ran == 3) - areamonster .@map$,267,9,277,45,"Margaretha Sorin",1637,2,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Margaretha Sorin"), MAGALETA, 2, .@label$); else if (.@mob_ran == 4) - areamonster .@map$,267,9,277,45,"Eremes Guile",1635,2,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Eremes Guile"), EREMES, 2, .@label$); else if (.@mob_ran == 5) - areamonster .@map$,267,9,277,45,"Howard Alt-Eisen",1636,2,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Howard Alt-Eisen"), HARWORD, 2, .@label$); else if (.@mob_ran == 6) - areamonster .@map$,267,9,277,45,"Cecil Damon",1638,2,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Cecil Damon"), SHECIL, 2, .@label$); else if (.@mob_ran == 7) - areamonster .@map$,267,9,277,45,"Incarnation of Morroc",1918,5,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Incarnation of Morroc"), MOROCC_1, 5, .@label$); else if (.@mob_ran == 8) - areamonster .@map$,267,9,277,45,"Incarnation of Morroc",1919,5,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Incarnation of Morroc"), MOROCC_2, 5, .@label$); else if (.@mob_ran == 9) - areamonster .@map$,267,9,277,45,"Incarnation of Morroc",1920,5,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Incarnation of Morroc"), MOROCC_3, 5, .@label$); else if (.@mob_ran == 10) - areamonster .@map$,267,9,277,45,"Incarnation of Morroc",1921,5,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Incarnation of Morroc"), MOROCC_4, 5, .@label$); else if (.@mob_ran == 11) - areamonster .@map$,267,9,277,45,"Valkyrie",1765,5,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Valkyrie"), G_RANDGRIS, 5, .@label$); else if (.@mob_ran == 12) - areamonster .@map$,267,9,277,45,"Skeggiold",1755,10,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Skeggiold"), SKEGGIOLD_, 10, .@label$); else if (.@mob_ran == 13) - areamonster .@map$,267,9,277,45,"Skeggiold",1754,10,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Skeggiold"), SKEGGIOLD, 10, .@label$); else if (.@mob_ran == 14) - areamonster .@map$,267,9,277,45,"Seyren Windsor",1634,15,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Seyren Windsor"), SEYREN, 15, .@label$); else if (.@mob_ran == 15) - areamonster .@map$,267,9,277,45,"Bloody Knight",1268,10,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Bloody Knight"), BLOODY_KNIGHT, 10, .@label$); else if (.@mob_ran == 16) - areamonster .@map$,267,9,277,45,"Abysmal Knight",1219,10,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Abysmal Knight"), KNIGHT_OF_ABYSS, 10, .@label$); else if (.@mob_ran == 17) - areamonster .@map$,267,9,277,45,"Wanderer",1208,10,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Wanderer"), WANDER_MAN, 10, .@label$); else if (.@mob_ran == 18) - areamonster .@map$,267,9,277,45,"Sword Master",1829,15,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Sword Master"), SWORD_GUARDIAN, 15, .@label$); else if (.@mob_ran == 19) - areamonster .@map$,267,9,277,45,"Bow Master",1830,15,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Bow Master"), BOW_GUARDIAN, 15, .@label$); else if (.@mob_ran == 20) - areamonster .@map$,267,9,277,45,"Kathryne Keyron",1639,15,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Kathryne Keyron"), KATRINN, 15, .@label$); else if (.@mob_ran == 21) - areamonster .@map$,267,9,277,45,"Elder",1377,10,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Elder"), ELDER, 10, .@label$); else if (.@mob_ran == 22) - areamonster .@map$,267,9,277,45,"Laurell Weinder",1657,10,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Laurell Weinder"), RAWREL, 10, .@label$); else if (.@mob_ran == 23) - areamonster .@map$,267,9,277,45,"Wind Ghost",1263,10,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Wind Ghost"), WIND_GHOST, 10, .@label$); else if (.@mob_ran == 24) - areamonster .@map$,267,9,277,45,"Marduk",1140,10,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Marduk"), MARDUK, 10, .@label$); else if (.@mob_ran == 25) - areamonster .@map$,267,9,277,45,"Cecil Damon",1638,10,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Cecil Damon"), SHECIL, 10, .@label$); else if (.@mob_ran == 26) - areamonster .@map$,267,9,277,45,"Bow Master",1830,10,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Bow Master"), BOW_GUARDIAN, 10, .@label$); else if (.@mob_ran == 27) - areamonster .@map$,267,9,277,45,"Kavach Icarus",1656,30,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Kavach Icarus"), KAVAC, 30, .@label$); else if (.@mob_ran == 28) - areamonster .@map$,267,9,277,45,"Baroness of Retribution",1702,10,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Baroness of Retribution"), RETRIBUTION, 10, .@label$); else if (.@mob_ran == 29) - areamonster .@map$,267,9,277,45,"Lady Solace",1703,10,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("Lady Solace"), SOLACE, 10, .@label$); else - areamonster .@map$,267,9,277,45,"False Angel",1371,10,.@label$; + areamonster(.@map$, 267, 9, 277, 45, _("False Angel"), FAKE_ANGEL, 10, .@label$); } break; } @@ -1080,139 +1082,60 @@ function script F_Tower_Monster { function script F_Tower_Warp { + setarray(.@x[2], 136, 224, 310, 395, 52, 136, 224, 310, 395, // 2 - 10 + 52, 136, 224, 310, 395, 52, 136, 224, 310, 395, // 11 - 20 + 52, 136, 224, 310, 395, 0, 136, 224, 310, 395, // 21 - 30 + 52, 136, 224, 310, 395, 52, 136, 224, 310, 395, // 31 - 40 + 52, 136, 224, 310, 395, 52, 136, 224, 310, 395, // 41 - 50 + 0, 136, 224, 310, 395, 52, 136, 224, 310, 395, // 51 - 60 + 52, 136, 224, 310, 395, 52, 136, 224, 310, 395, // 61 - 70 + 52, 136, 224, 310, 395, 0, 136, 224, 310, 395, // 71 - 80 + 52, 136, 224, 310, 395, 52, 136, 224, 310, 395, // 81 - 90 + 52, 136, 224, 310, 395, 52, 136, 224, 309); // 91 - 99 + setarray(.@y[2], 354, 354, 354, 354, 270, 270, 270, 270, 270, // 2 - 10 + 183, 183, 183, 183, 183, 99, 99, 99, 99, 99, // 11 - 20 + 12, 12, 12, 12, 12, 0, 354, 354, 354, 354, // 21 - 30 + 270, 270, 270, 270, 270, 183, 183, 183, 183, 183, // 31 - 40 + 99, 99, 99, 99, 99, 12, 12, 12, 12, 12, // 41 - 50 + 0, 354, 354, 354, 354, 270, 270, 270, 270, 270, // 51 - 60 + 183, 183, 183, 183, 183, 99, 99, 99, 99, 99, // 61 - 70 + 12, 12, 12, 12, 12, 0, 354, 354, 354, 354, // 71 - 80 + 270, 270, 270, 270, 270, 183, 183, 183, 183, 183, // 81 - 90 + 99, 99, 99, 99, 99, 12, 12, 12, 12); // 91 - 99 .@level = getarg(0); .@map$ = getarg(1); - - switch(.@level) { - case 2: warp .@map$,136,354; break; - case 3: warp .@map$,224,354; break; - case 4: warp .@map$,310,354; break; - case 5: warp .@map$,395,354; break; - case 6: warp .@map$,52,270; break; - case 7: warp .@map$,136,270; break; - case 8: warp .@map$,224,270; break; - case 9: warp .@map$,310,270; break; - case 10: warp .@map$,395,270; break; - case 11: warp .@map$,52,183; break; - case 12: warp .@map$,136,183; break; - case 13: warp .@map$,224,183; break; - case 14: warp .@map$,310,183; break; - case 15: warp .@map$,395,183; break; - case 16: warp .@map$,52,99; break; - case 17: warp .@map$,136,99; break; - case 18: warp .@map$,224,99; break; - case 19: warp .@map$,310,99; break; - case 20: warp .@map$,395,99; break; - case 21: warp .@map$,52,12; break; - case 22: warp .@map$,136,12; break; - case 23: warp .@map$,224,12; break; - case 24: warp .@map$,310,12; break; - case 25: warp .@map$,395,12; break; - - case 27: warp .@map$,136,354; break; - case 28: warp .@map$,224,354; break; - case 29: warp .@map$,310,354; break; - case 30: warp .@map$,395,354; break; - case 31: warp .@map$,52,270; break; - case 32: warp .@map$,136,270; break; - case 33: warp .@map$,224,270; break; - case 34: warp .@map$,310,270; break; - case 35: warp .@map$,395,270; break; - case 36: warp .@map$,52,183; break; - case 37: warp .@map$,136,183; break; - case 38: warp .@map$,224,183; break; - case 39: warp .@map$,310,183; break; - case 40: warp .@map$,395,183; break; - case 41: warp .@map$,52,99; break; - case 42: warp .@map$,136,99; break; - case 43: warp .@map$,224,99; break; - case 44: warp .@map$,310,99; break; - case 45: warp .@map$,395,99; break; - case 46: warp .@map$,52,12; break; - case 47: warp .@map$,136,12; break; - case 48: warp .@map$,224,12; break; - case 49: warp .@map$,310,12; break; - case 50: warp .@map$,395,12; break; - - case 52: warp .@map$,136,354; break; - case 53: warp .@map$,224,354; break; - case 54: warp .@map$,310,354; break; - case 55: warp .@map$,395,354; break; - case 56: warp .@map$,52,270; break; - case 57: warp .@map$,136,270; break; - case 58: warp .@map$,224,270; break; - case 59: warp .@map$,310,270; break; - case 60: warp .@map$,395,270; break; - case 61: warp .@map$,52,183; break; - case 62: warp .@map$,136,183; break; - case 63: warp .@map$,224,183; break; - case 64: warp .@map$,310,183; break; - case 65: warp .@map$,395,183; break; - case 66: warp .@map$,52,99; break; - case 67: warp .@map$,136,99; break; - case 68: warp .@map$,224,99; break; - case 69: warp .@map$,310,99; break; - case 70: warp .@map$,395,99; break; - case 71: warp .@map$,52,12; break; - case 72: warp .@map$,136,12; break; - case 73: warp .@map$,224,12; break; - case 74: warp .@map$,310,12; break; - case 75: warp .@map$,395,12; break; - - case 77: warp .@map$,136,354; break; - case 78: warp .@map$,224,354; break; - case 79: warp .@map$,310,354; break; - case 80: warp .@map$,395,354; break; - case 81: warp .@map$,52,270; break; - case 82: warp .@map$,136,270; break; - case 83: warp .@map$,224,270; break; - case 84: warp .@map$,310,270; break; - case 85: warp .@map$,395,270; break; - case 86: warp .@map$,52,183; break; - case 87: warp .@map$,136,183; break; - case 88: warp .@map$,224,183; break; - case 89: warp .@map$,310,183; break; - case 90: warp .@map$,395,183; break; - case 91: warp .@map$,52,99; break; - case 92: warp .@map$,136,99; break; - case 93: warp .@map$,224,99; break; - case 94: warp .@map$,310,99; break; - case 95: warp .@map$,395,99; break; - case 96: warp .@map$,52,12; break; - case 97: warp .@map$,136,12; break; - case 98: warp .@map$,224,12; break; - case 99: warp .@map$,309,12; break; - } + if (.@x[.@level] > 0 && .@y[.@level] > 0) + warp(.@map$, .@x[.@level], .@y[.@level]); return; } //== Levels 1-25 =========================================== 1@tower,50,360,0 script Immortal Brazier# CLEAR_NPC,{ - mes "- A Message is Engraved on the Brazier -"; - mes "The one who scatters the ashes of the darkness in this place shall become one step closer to Nacht Sieger, the Hegemon King of the Darkness..."; - next; + mes("- A Message is Engraved on the Brazier -"); + mes("The one who scatters the ashes of the darkness in this place shall become one step closer to Nacht Sieger, the Hegemon King of the Darkness..."); + next(); - setarray .@level$[1],"26th","51st","76th"; - setarray .@map$[1],"2@tower","3@tower","4@tower"; + setarray(.@level$[1], _("26th"), _("51st"), _("76th")); + setarray(.@map$[1], "2@tower", "3@tower", "4@tower"); .@i = select("26th Level", "51st Level", "76th Level"); if (countitem(Dark_Ashes) < .@i) { - mes "-Warning-"; - mes "To warp to the "+.@level$[.@i]+" Level, you need "+.@i+" Ashes of the Darkness."; - close; + mes("-Warning-"); + mesf("To warp to the %s Level, you need %d Ashes of the Darkness.", .@level$[.@i], .@i); + close(); } - delitem Dark_Ashes,.@i; - mapannounce instance_mapname("1@tower"), strcharinfo(PC_NAME)+". You will be warped to the "+.@level$[.@i]+" Level.",bc_map,"0x00ff99"; - warp instance_mapname(.@map$[.@i]),52,354; - close; + delitem(Dark_Ashes, .@i); + mapannounce(instance_mapname("1@tower"), sprintf(_$("%s. You will be warped to the %s Level."), strcharinfo(PC_NAME), .@level$[.@i]), bc_map, C_SPRINGGREEN); + warp(instance_mapname(.@map$[.@i]), 52, 354); + close(); OnInstanceInit: - initnpctimer; + initnpctimer(); end; OnTimer10000: - mapannounce instance_mapname("1@tower"), "Notice : Taming a monster does not count towards defeating them.",bc_map,"0xff0000"; - stopnpctimer; + mapannounce(instance_mapname("1@tower"), _("Notice : Taming a monster does not count towards defeating them."), bc_map, C_RED); + stopnpctimer(); end; } @@ -1220,26 +1143,24 @@ OnTimer10000: end; OnInstanceInit: - callfunc "F_Tower_Monster", - 1, - instance_mapname("1@tower"), - instance_npcname("#1F Controller")+"::OnMyMobDead"; + callfunc("F_Tower_Monster", 1, instance_mapname("1@tower"), instance_npcname("#1F Controller")+"::OnMyMobDead"); end; OnMyMobDead: .@map$ = instance_mapname("1@tower"); - .@mob_dead_num = mobcount(.@map$,instance_npcname("#1F Controller")+"::OnMyMobDead"); + .@mob_dead_num = mobcount(.@map$, instance_npcname("#1F Controller")+"::OnMyMobDead"); if (.@mob_dead_num < 1) { - initnpctimer; + initnpctimer(); //SetItemPartyInMap in_102floor 1 - } else - mapannounce .@map$, "Remaining Monsters on the 1st Level - "+.@mob_dead_num,bc_map,"0x00ff99"; + } else { + mapannounce(.@map$, sprintf(_$("Remaining Monsters on the 1st Level - %d"), .@mob_dead_num), bc_map, C_SPRINGGREEN); + } end; OnTimer5000: - mapannounce instance_mapname("1@tower"), "All Monsters on the 1st Level have been defeated.",bc_map,"0xffff00"; - donpcevent instance_npcname("1FGate102tower")+"::OnEnable"; - stopnpctimer; + mapannounce(instance_mapname("1@tower"), _("All Monsters on the 1st Level have been defeated."), bc_map, C_YELLOW); + donpcevent(instance_npcname("1FGate102tower")+"::OnEnable"); + stopnpctimer(); end; } @@ -1247,49 +1168,50 @@ OnTimer5000: end; OnInstanceInit: - disablenpc instance_npcname(strnpcinfo(NPC_NAME)); + disablenpc(instance_npcname(strnpcinfo(NPC_NAME))); end; OnEnable: - enablenpc instance_npcname(strnpcinfo(NPC_NAME)); - callfunc "F_Tower_Monster", - atoi(replacestr(strnpcinfo(NPC_NAME),"FGate102tower","")) + 1, - strnpcinfo(NPC_MAP), - instance_npcname(strnpcinfo(NPC_NAME))+"::OnMyMobDead"; + enablenpc(instance_npcname(strnpcinfo(NPC_NAME))); + callfunc("F_Tower_Monster", atoi(replacestr(strnpcinfo(NPC_NAME), "FGate102tower", "")) + 1, strnpcinfo(NPC_MAP), instance_npcname(strnpcinfo(NPC_NAME))+"::OnMyMobDead"); end; OnTouch_: - callfunc "F_Tower_Warp", - atoi(replacestr(strnpcinfo(NPC_NAME),"FGate102tower","")) + 1, - strnpcinfo(NPC_MAP); + callfunc("F_Tower_Warp", atoi(replacestr(strnpcinfo(NPC_NAME), "FGate102tower", "")) + 1, strnpcinfo(NPC_MAP)); end; OnMyMobDead: .@map$ = strnpcinfo(NPC_MAP); - .@level = atoi(replacestr(strnpcinfo(NPC_NAME),"FGate102tower","")) + 1; - .@mob_dead_num = mobcount(.@map$,instance_npcname(strnpcinfo(NPC_NAME))+"::OnMyMobDead"); + .@level = atoi(replacestr(strnpcinfo(NPC_NAME), "FGate102tower", "")) + 1; + .@mob_dead_num = mobcount(.@map$, instance_npcname(strnpcinfo(NPC_NAME))+"::OnMyMobDead"); if (.@mob_dead_num < 1) { - initnpctimer; + initnpctimer(); //SetItemPartyInMap in_102floor .@level } else - mapannounce .@map$, "Remaining Monsters on the "+callsub(L_Display,.@level)+" Level - "+.@mob_dead_num,bc_map,"0x00ff99"; + mapannounce(.@map$, sprintf(_$("Remaining Monsters on the %s Level - %d"), callsub(L_Display, .@level), .@mob_dead_num), bc_map, C_SPRINGGREEN); end; OnTimer5000: - .@level = atoi(replacestr(strnpcinfo(NPC_NAME),"FGate102tower","")) + 1; - mapannounce strnpcinfo(NPC_MAP), "All Monsters on the "+callsub(L_Display,.@level)+" Level have been defeated.",bc_map,"0xffff00"; - donpcevent instance_npcname(.@level+"FGate102tower")+"::OnEnable"; - stopnpctimer; + .@level = atoi(replacestr(strnpcinfo(NPC_NAME), "FGate102tower", "")) + 1; + mapannounce(strnpcinfo(NPC_MAP), sprintf(_$("All Monsters on the %s Level have been defeated."), callsub(L_Display, .@level)), bc_map, C_YELLOW); + donpcevent(instance_npcname(.@level+"FGate102tower")+"::OnEnable"); + stopnpctimer(); end; L_Display: // Display level properly. .@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"; - else return getarg(0)+"th"; + if (.@mod == 1 && getarg(0) != 11) + return sprintf(_$("%dst"), getarg(0)); + else if (.@mod == 2 && getarg(0) != 12) + return sprintf(_$("%dnd"), getarg(0)); + else if (.@mod == 3 && getarg(0) != 13) + return sprintf(_$("%drd"), getarg(0)); + else + return sprintf(_$("%dth"), getarg(0)); + end; } + 1@tower,96,393,0 duplicate(1FGate102tower) 2FGate102tower WARPNPC,2,2 1@tower,184,393,0 duplicate(1FGate102tower) 3FGate102tower WARPNPC,2,2 1@tower,270,393,0 duplicate(1FGate102tower) 4FGate102tower WARPNPC,2,2 @@ -1318,23 +1240,23 @@ L_Display: end; OnInstanceInit: - disablenpc instance_npcname("25FGate102tower"); + disablenpc(instance_npcname("25FGate102tower")); end; OnEnable: - enablenpc instance_npcname("25FGate102tower"); - initnpctimer; + enablenpc(instance_npcname("25FGate102tower")); + initnpctimer(); end; OnTouch_: - getitem Dark_Ashes,1; - warp instance_mapname("2@tower"),52,354; + getitem(Dark_Ashes, 1); + warp(instance_mapname("2@tower"), 52, 354); end; OnTimer120000: - disablenpc instance_npcname("25FGate102tower"); - donpcevent instance_npcname("25FGate102tower-2")+"::OnEnable"; - stopnpctimer; + disablenpc(instance_npcname("25FGate102tower")); + donpcevent(instance_npcname("25FGate102tower-2")+"::OnEnable"); + stopnpctimer(); end; } @@ -1342,15 +1264,15 @@ OnTimer120000: end; OnInstanceInit: - disablenpc instance_npcname("25FGate102tower-2"); + disablenpc(instance_npcname("25FGate102tower-2")); end; OnEnable: - enablenpc instance_npcname("25FGate102tower-2"); + enablenpc(instance_npcname("25FGate102tower-2")); end; OnTouch_: - warp instance_mapname("2@tower"),52,354; + warp(instance_mapname("2@tower"), 52, 354); end; } @@ -1358,38 +1280,38 @@ OnTouch_: end; OnInstanceInit: - initnpctimer; + initnpctimer(); end; OnTimer15000: OnTimer60000: - mapannounce instance_mapname("1@tower"), "Notice : In any abnormal situation where you defeat a monster, you can't advance to the next level!",bc_map,"0xff0000"; + mapannounce(instance_mapname("1@tower"), _("Notice : In any abnormal situation where you defeat a monster, you can't advance to the next level!"), bc_map, C_RED); end; OnTimer120000: - mapannounce instance_mapname("1@tower"), "Notice : In any abnormal situation where you defeat a monster, you can't advance to the next level!",bc_map,"0xff0000"; - stopnpctimer; + mapannounce(instance_mapname("1@tower"), _("Notice : In any abnormal situation where you defeat a monster, you can't advance to the next level!"), bc_map, C_RED); + stopnpctimer(); end; } 1@tower,71,1,0 script #Manager Mode1 CLEAR_NPC,{ - callfunc "F_GM_NPC"; - mes "Please enter the password."; - .@i = callfunc("F_GM_NPC","dmc2008",1); - next; + callfunc("F_GM_NPC"); + mes("Please enter the password."); + .@i = callfunc("F_GM_NPC", "dmc2008", 1); + next(); if (.@i == 1) { - mes "This NPC manages the tower from the 1st to the 25th Level."; - mes "Please enter the Level number to open."; - mes "(i.g.: 1F->1, 25F->25)"; - input .@input,1,25; - next; - if (.@input < 1 || .@input > 25) - mes "You can only enter a number from 1 to 25."; - else { - donpcevent instance_npcname(.@input+"FGate102tower")+"::OnEnable"; - mes "*** Level "+ .@input + " is now being opened. ***"; + mes("This NPC manages the tower from the 1st to the 25th Level."); + mes("Please enter the Level number to open."); + mes("(i.g.: 1F->1, 25F->25)"); + input(.@input, 1, 25); + next(); + if (.@input < 1 || .@input > 25) { + mes("You can only enter a number from 1 to 25."); + } else { + donpcevent(instance_npcname(.@input+"FGate102tower")+"::OnEnable"); + mesf("*** Level %d is now being opened. ***", .@input); } } - close; + close(); } //== Levels 26-50 ========================================== @@ -1397,27 +1319,24 @@ OnTimer120000: end; OnInstanceInit: - callfunc "F_Tower_Monster", - 26, - instance_mapname("2@tower"), - instance_npcname("Immortal Furnace#1")+"::OnMyMobDead"; + callfunc("F_Tower_Monster", 26, instance_mapname("2@tower"), instance_npcname("Immortal Furnace#1")+"::OnMyMobDead"); end; OnMyMobDead: .@map$ = instance_mapname("2@tower"); - .@mob_dead_num = mobcount(.@map$,instance_npcname("Immortal Furnace#1")+"::OnMyMobDead"); + .@mob_dead_num = mobcount(.@map$, instance_npcname("Immortal Furnace#1")+"::OnMyMobDead"); if (.@mob_dead_num < 1) { - initnpctimer; + initnpctimer(); //SetItemPartyInMap in_102floor 26 + } else { + mapannounce(.@map$, sprintf(_$("Remaining Monsters on the 26th Level - %d"), .@mob_dead_num), bc_map, C_SPRINGGREEN); } - else - mapannounce .@map$, "Remaining Monsters on the 26th Level - " + .@mob_dead_num,bc_map,"0x00ff99"; end; OnTimer5000: - mapannounce instance_mapname("2@tower"), "All Monsters on the 26th Level have been defeated.",bc_map,"0xffff00"; - donpcevent instance_npcname("26FGate102tower")+"::OnEnable"; - stopnpctimer; + mapannounce(instance_mapname("2@tower"), _("All Monsters on the 26th Level have been defeated."), bc_map, C_YELLOW); + donpcevent(instance_npcname("26FGate102tower")+"::OnEnable"); + stopnpctimer(); end; } @@ -1450,23 +1369,23 @@ OnTimer5000: end; OnInstanceInit: - disablenpc instance_npcname("50FGate102tower"); + disablenpc(instance_npcname("50FGate102tower")); end; OnEnable: - enablenpc instance_npcname("50FGate102tower"); - initnpctimer; + enablenpc(instance_npcname("50FGate102tower")); + initnpctimer(); end; OnTouch_: - getitem Dark_Ashes,1; - warp instance_mapname("3@tower"),52,354; + getitem(Dark_Ashes, 1); + warp(instance_mapname("3@tower"), 52, 354); end; OnTimer120000: - disablenpc instance_npcname("50FGate102tower"); - donpcevent instance_npcname("50FGate102tower-2")+"::OnEnable"; - stopnpctimer; + disablenpc(instance_npcname("50FGate102tower")); + donpcevent(instance_npcname("50FGate102tower-2")+"::OnEnable"); + stopnpctimer(); end; } @@ -1474,37 +1393,37 @@ OnTimer120000: end; OnInstanceInit: - disablenpc instance_npcname("50FGate102tower-2"); + disablenpc(instance_npcname("50FGate102tower-2")); end; OnEnable: - enablenpc instance_npcname("50FGate102tower-2"); + enablenpc(instance_npcname("50FGate102tower-2")); end; OnTouch_: - warp instance_mapname("3@tower"),52,354; + warp(instance_mapname("3@tower"), 52, 354); end; } 2@tower,71,1,0 script #Manager Mode2 CLEAR_NPC,{ - callfunc "F_GM_NPC"; - mes "Please enter the password."; - .@i = callfunc("F_GM_NPC","dmc2008",1); - next; + callfunc("F_GM_NPC"); + mes("Please enter the password."); + .@i = callfunc("F_GM_NPC", "dmc2008", 1); + next(); if (.@i == 1) { - mes "This NPC manages the tower from the 26st to the 50th Level."; - mes "Please enter the Level number to open."; - mes "(i.g.: 26F->26, 50F->50)"; - input .@input,26,50; - next; - if (.@onput < 26 || .@input > 50) - mes "You can only enter a number from 26 to 50."; - else { - donpcevent instance_npcname(.@input+"FGate102tower")+"::OnEnable"; - mes "*** Level "+ .@input + " is now being opened. ***"; + mes("This NPC manages the tower from the 26st to the 50th Level."); + mes("Please enter the Level number to open."); + mes("(i.g.: 26F->26, 50F->50)"); + input(.@input, 26, 50); + next(); + if (.@onput < 26 || .@input > 50) { + mes("You can only enter a number from 26 to 50."); + } else { + donpcevent(instance_npcname(.@input+"FGate102tower")+"::OnEnable"); + mesf("*** Level %d is now being opened. ***", .@input); } } - close; + close(); } //== Levels 51-75 ========================================== @@ -1512,27 +1431,24 @@ OnTouch_: end; OnInstanceInit: - callfunc "F_Tower_Monster", - 51, - instance_mapname("3@tower"), - instance_npcname("Immortal Furnace#2")+"::OnMyMobDead"; + callfunc("F_Tower_Monster", 51, instance_mapname("3@tower"), instance_npcname("Immortal Furnace#2")+"::OnMyMobDead"); end; OnMyMobDead: .@map$ = instance_mapname("3@tower"); - .@mob_dead_num = mobcount(.@map$,instance_npcname("Immortal Furnace#2")+"::OnMyMobDead"); + .@mob_dead_num = mobcount(.@map$, instance_npcname("Immortal Furnace#2")+"::OnMyMobDead"); if (.@mob_dead_num < 1) { - initnpctimer; + initnpctimer(); //SetItemPartyInMap in_102floor 51 + } else { + mapannounce(.@map$, sprintf(_$("Remaining Monsters on the 51st Level - %d"), .@mob_dead_num), bc_map, C_SPRINGGREEN); } - else - mapannounce .@map$, "Remaining Monsters on the 51st Level - " + .@mob_dead_num,bc_map,"0x00ff99"; end; OnTimer5000: - mapannounce instance_mapname("3@tower"), "All Monsters on the 51st Level have been defeated.",bc_map,"0xffff00"; - donpcevent instance_npcname("51FGate102tower")+"::OnEnable"; - stopnpctimer; + mapannounce(instance_mapname("3@tower"), _("All Monsters on the 51st Level have been defeated."), bc_map, C_YELLOW); + donpcevent(instance_npcname("51FGate102tower")+"::OnEnable"); + stopnpctimer(); end; } @@ -1565,23 +1481,23 @@ OnTimer5000: end; OnInstanceInit: - disablenpc instance_npcname("75FGate102tower"); + disablenpc(instance_npcname("75FGate102tower")); end; OnEnable: - enablenpc instance_npcname("75FGate102tower"); - initnpctimer; + enablenpc(instance_npcname("75FGate102tower")); + initnpctimer(); end; OnTouch_: - getitem Dark_Ashes,1; - warp instance_mapname("4@tower"),52,354; + getitem(Dark_Ashes, 1); + warp(instance_mapname("4@tower"), 52, 354); end; OnTimer120000: - disablenpc instance_npcname("75FGate102tower"); - donpcevent instance_npcname("75FGate102tower-2")+"::OnEnable"; - stopnpctimer; + disablenpc(instance_npcname("75FGate102tower")); + donpcevent(instance_npcname("75FGate102tower-2")+"::OnEnable"); + stopnpctimer(); end; } @@ -1589,37 +1505,37 @@ OnTimer120000: end; OnInstanceInit: - disablenpc instance_npcname("75FGate102tower-2"); + disablenpc(instance_npcname("75FGate102tower-2")); end; OnEnable: - enablenpc instance_npcname("75FGate102tower-2"); + enablenpc(instance_npcname("75FGate102tower-2")); end; OnTouch_: - warp instance_mapname("4@tower"),52,354; + warp(instance_mapname("4@tower"), 52, 354); end; } 3@tower,71,1,0 script #Manager Mode3 CLEAR_NPC,{ - callfunc "F_GM_NPC"; - mes "Please enter the password."; - .@i = callfunc("F_GM_NPC","dmc2008",1); - next; + callfunc("F_GM_NPC"); + mes("Please enter the password."); + .@i = callfunc("F_GM_NPC", "dmc2008", 1); + next(); if (.@i == 1) { - mes "This NPC manages the tower from the 51st to the 75th Level."; - mes "Please enter the Level number to open."; - mes "(i.g.: 51F->51, 75F->75)"; - input .@input,51,75; - next; - if (.@input < 51 || .@input > 75) - mes "You can only enter a number from 51 to 75."; - else { - donpcevent instance_npcname(.@input+"FGate102tower")+"::OnEnable"; - mes "*** Level "+ .@input + " is now being opened. ***"; + mes("This NPC manages the tower from the 51st to the 75th Level."); + mes("Please enter the Level number to open."); + mes("(i.g.: 51F->51, 75F->75)"); + input(.@input, 51, 75); + next(); + if (.@input < 51 || .@input > 75) { + mes("You can only enter a number from 51 to 75."); + } else { + donpcevent(instance_npcname(.@input+"FGate102tower")+"::OnEnable"); + mesf("*** Level %d is now being opened. ***", .@input); } } - close; + close(); } //== Levels 76-99 ========================================== @@ -1627,27 +1543,24 @@ OnTouch_: end; OnInstanceInit: - callfunc "F_Tower_Monster", - 76, - instance_mapname("4@tower"), - instance_npcname("Immortal Furnace#3")+"::OnMyMobDead"; + callfunc("F_Tower_Monster", 76, instance_mapname("4@tower"), instance_npcname("Immortal Furnace#3")+"::OnMyMobDead"); end; OnMyMobDead: .@map$ = instance_mapname("4@tower"); - .@mob_dead_num = mobcount(.@map$,instance_npcname("Immortal Furnace#3")+"::OnMyMobDead"); + .@mob_dead_num = mobcount(.@map$, instance_npcname("Immortal Furnace#3")+"::OnMyMobDead"); if (.@mob_dead_num < 1) { - initnpctimer; + initnpctimer(); //SetItemPartyInMap in_102floor 76 + } else { + mapannounce(.@map$, sprintf(_$("Remaining Monsters on the 76th Level - %d"), .@mob_dead_num), bc_map, C_SPRINGGREEN); } - else - mapannounce .@map$,"Remaining Monsters on the 76th Level - " + .@mob_dead_num,bc_map,"0x00ff99"; end; OnTimer5000: - mapannounce instance_mapname("4@tower"),"All Monsters on the 76th Level have been defeated.",bc_map,"0xffff00"; - donpcevent instance_npcname("76FGate102tower")+"::OnEnable"; - stopnpctimer; + mapannounce(instance_mapname("4@tower"), _("All Monsters on the 76th Level have been defeated."), bc_map, C_YELLOW); + donpcevent(instance_npcname("76FGate102tower")+"::OnEnable"); + stopnpctimer(); end; } @@ -1679,23 +1592,23 @@ OnTimer5000: end; OnInstanceInit: - disablenpc instance_npcname("99FGate102tower"); + disablenpc(instance_npcname("99FGate102tower")); end; OnEnable: - enablenpc instance_npcname("99FGate102tower"); - initnpctimer; + enablenpc(instance_npcname("99FGate102tower")); + initnpctimer(); end; OnTouch_: - getitem Dark_Ashes,1; - warp instance_mapname("5@tower"),101,72; + getitem(Dark_Ashes, 1); + warp(instance_mapname("5@tower"), 101, 72); end; OnTimer120000: - disablenpc instance_npcname("99FGate102tower"); - donpcevent instance_npcname("99FGate102tower-2")+"::OnEnable"; - stopnpctimer; + disablenpc(instance_npcname("99FGate102tower")); + donpcevent(instance_npcname("99FGate102tower-2")+"::OnEnable"); + stopnpctimer(); end; } @@ -1703,89 +1616,88 @@ OnTimer120000: end; OnInstanceInit: - disablenpc instance_npcname("99FGate102tower-2"); + disablenpc(instance_npcname("99FGate102tower-2")); end; OnEnable: - enablenpc instance_npcname("99FGate102tower-2"); + enablenpc(instance_npcname("99FGate102tower-2")); end; OnTouch_: - warp instance_mapname("5@tower"),101,72; + warp(instance_mapname("5@tower"), 101, 72); end; } 4@tower,71,1,0 script #Manager Mode4 CLEAR_NPC,{ - callfunc "F_GM_NPC"; - mes "Please enter the password."; - .@i = callfunc("F_GM_NPC","dmc2008",1); - next; + callfunc("F_GM_NPC"); + mes("Please enter the password."); + .@i = callfunc("F_GM_NPC", "dmc2008", 1); + next(); if (.@i == 1) { - mes "This NPC manages the tower from the 76th to the 99th Level."; - mes "Please enter the Level number to open."; - mes "(i.g.: 76F->76, 99F->99)"; - input .@input,76,99; - next; - if (.@input < 76 || .@input > 99) - mes "You can only enter a number from 76 to 99."; - else { - donpcevent instance_npcname(.@input+"FGate102tower")+"::OnEnable"; - mes "*** Level "+ .@input + " is now being opened. ***"; + mes("This NPC manages the tower from the 76th to the 99th Level."); + mes("Please enter the Level number to open."); + mes("(i.g.: 76F->76, 99F->99)"); + input(.@input, 76, 99); + next(); + if (.@input < 76 || .@input > 99) { + mes("You can only enter a number from 76 to 99."); + } else { + donpcevent(instance_npcname(.@input+"FGate102tower")+"::OnEnable"); + mesf("*** Level %d is now being opened. ***", .@input); } } - close; + close(); } //== Level 100 ============================================= 5@tower,106,109,2 script Lucid Crystal#102 CLEAR_NPC,{ if (in_102tower < 10) { - mes "^0000ffA mysterious voice echoes through the room as you touch the lucid crystal radiating a strong light.^000000"; - next; - mes "[Mysterious Voice]"; - mes "Welcome to my place, intruders. I've had fun watching you endure all the difficulties I've set before you."; - next; - mes "[Mysterious Voice]"; - mes "Unfortunately, the time has come to end the show."; - next; - mes "[Mysterious Voice]"; - mes "It's still too early to celebrate your victory against my right-hand man Knothen because he isn't completely destroyed!"; - next; - mes "[Mysterious Voice]"; - mes "I shall resurrect him for your next show. Defeat him again, and then I'll gladly accept your challenge."; - next; - mes "[Mysterious Voice]"; - mes "Good-bye for now."; - mes "Once again, I had such a great time, humans. I look forward to seeing you again."; - next; - mes "^0000ffAs soon as the voice stopped talking, an irresistible force lifted and moved you somewhere else."; - close2; + mes("^0000ffA mysterious voice echoes through the room as you touch the lucid crystal radiating a strong light.^000000"); + next(); + mes("[Mysterious Voice]"); + mes("Welcome to my place, intruders. I've had fun watching you endure all the difficulties I've set before you."); + next(); + mes("[Mysterious Voice]"); + mes("Unfortunately, the time has come to end the show."); + next(); + mes("[Mysterious Voice]"); + mes("It's still too early to celebrate your victory against my right-hand man Knothen because he isn't completely destroyed!"); + next(); + mes("[Mysterious Voice]"); + mes("I shall resurrect him for your next show. Defeat him again, and then I'll gladly accept your challenge."); + next(); + mes("[Mysterious Voice]"); + mes("Good-bye for now."); + mes("Once again, I had such a great time, humans. I look forward to seeing you again."); + next(); + mes("^0000ffAs soon as the voice stopped talking, an irresistible force lifted and moved you somewhere else."); + close2(); in_102tower = 10; - warp "alberta",223,36; - } - else { - mes "^0000ffThe radiating crystal piece seems to beckon you, just like last time.^000000"; - next; - mes "[Mysterious Voice]"; - mes "I must have underestimated you... I didn't expect to see you again."; - next; - mes "[Mysterious Voice]"; - mes "I can smell your sweat, hear the gasps of your exhaustion in combat. Ah~ The human desire for victory always excites me."; - next; - mes "[Mysterious Voice]"; - mes "I now allow you to come receive an audience from me. Come to me, to Nacht Sieger the Hegemon-King of the Darkness!"; - close2; - warp instance_mapname("6@tower"),32,12; + warp("alberta", 223, 36); + } else { + mes("^0000ffThe radiating crystal piece seems to beckon you, just like last time.^000000"); + next(); + mes("[Mysterious Voice]"); + mes("I must have underestimated you... I didn't expect to see you again."); + next(); + mes("[Mysterious Voice]"); + mes("I can smell your sweat, hear the gasps of your exhaustion in combat. Ah~ The human desire for victory always excites me."); + next(); + mes("[Mysterious Voice]"); + mes("I now allow you to come receive an audience from me. Come to me, to Nacht Sieger the Hegemon-King of the Darkness!"); + close2(); + warp(instance_mapname("6@tower"), 32, 12); } end; OnInstanceInit: OnDisable: - disablenpc instance_npcname("Lucid Crystal#102"); + disablenpc(instance_npcname("Lucid Crystal#102")); end; OnEnable: - enablenpc instance_npcname("Lucid Crystal#102"); - donpcevent instance_npcname("#102Effect1")+"::OnEnable"; + enablenpc(instance_npcname("Lucid Crystal#102")); + donpcevent(instance_npcname("#102Effect1")+"::OnEnable"); end; } @@ -1793,22 +1705,22 @@ OnEnable: end; OnInstanceInit: - disablenpc instance_npcname("#102Effect1"); + disablenpc(instance_npcname("#102Effect1")); end; OnDisable: - disablenpc instance_npcname("#102Effect1"); + disablenpc(instance_npcname("#102Effect1")); end; OnEnable: - enablenpc instance_npcname("#102Effect1"); - initnpctimer; + enablenpc(instance_npcname("#102Effect1")); + initnpctimer(); end; OnTimer500: - specialeffect EF_ENHANCE; - stopnpctimer; - donpcevent instance_npcname("#102Effect2")+"::OnEnable"; + specialeffect(EF_ENHANCE); + stopnpctimer(); + donpcevent(instance_npcname("#102Effect2")+"::OnEnable"); end; } @@ -1816,22 +1728,22 @@ OnTimer500: end; OnInstanceInit: - disablenpc instance_npcname("#102Effect2"); + disablenpc(instance_npcname("#102Effect2")); end; OnDisable: - disablenpc instance_npcname("#102Effect2"); + disablenpc(instance_npcname("#102Effect2")); end; OnEnable: - enablenpc instance_npcname("#102Effect2"); - initnpctimer; + enablenpc(instance_npcname("#102Effect2")); + initnpctimer(); end; OnTimer500: - specialeffect EF_ENHANCE; - stopnpctimer; - donpcevent instance_npcname("#102Effect1")+"::OnEnable"; + specialeffect(EF_ENHANCE); + stopnpctimer(); + donpcevent(instance_npcname("#102Effect1")+"::OnEnable"); end; } @@ -1839,17 +1751,17 @@ OnTimer500: end; OnInstanceInit: - donpcevent instance_npcname("#102FShadowDust")+"::OnEnable"; - monster instance_mapname("5@tower"),83,85,"Entweihen Crothen",1957,1,instance_npcname("#102FShadowDust1")+"::OnMyMobDead"; + donpcevent(instance_npcname("#102FShadowDust")+"::OnEnable"); + monster(instance_mapname("5@tower"), 83, 85, _("Entweihen Crothen"), ENTWEIHEN, 1, instance_npcname("#102FShadowDust1")+"::OnMyMobDead"); end; OnMyMobDead: .@map$ = instance_mapname("5@tower"); - .@mob_dead_num = mobcount(.@map$,instance_npcname("#102FShadowDust1")+"::OnMyMobDead"); + .@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"; - donpcevent instance_npcname("Lucid Crystal#102")+"::OnEnable"; + mapannounce(.@map$, _("Mysterious Voice: Who are you to dare intrude upon my sanctuary?!"), bc_map, C_YELLOW); + donpcevent(instance_npcname("#102FShadowDust")+"::OnDisable"); + donpcevent(instance_npcname("Lucid Crystal#102")+"::OnEnable"); //SetItemPartyInMap in_102floor 100 } end; @@ -1859,74 +1771,86 @@ OnMyMobDead: end; OnInstanceInit: - disablenpc instance_npcname("#102FShadowDust"); + disablenpc(instance_npcname("#102FShadowDust")); end; OnDisable: - killmonsterall instance_mapname("5@tower"); + killmonsterall(instance_mapname("5@tower")); end; OnEnable: .@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; - monster .@map$,70,80,"Thorny Skeleton",1958,1; - monster .@map$,74,81,"Thorn of Magic",1960,1; - monster .@map$,78,72,"Thorn of Magic",1960,1; - monster .@map$,81,70,"Thorny Skeleton",1958,1; - monster .@map$,78,84,"Thorn of Recovery",1959,1; - monster .@map$,85,72,"Thorn of Magic",1960,1; - monster .@map$,91,74,"Thorny Skeleton",1958,1; - monster .@map$,79,77,"Thorn of Pureness",1961,1; - monster .@map$,82,80,"Thorn of Recovery",1959,1; - monster .@map$,87,83,"Thorn of Recovery",1959,1; - monster .@map$,80,92,"Thorn of Pureness",1961,1; - monster .@map$,81,89,"Thorny Skeleton",1958,1; - monster .@map$,85,93,"Thorn of Magic",1960,1; - monster .@map$,86,90,"Thorn of Recovery",1959,1; - monster .@map$,88,88,"Thorny Skeleton",1958,1; - monster .@map$,91,87,"Thorn of Magic",1960,1; - monster .@map$,95,94,"Thorn of Magic",1960,1; - monster .@map$,91,96,"Thorny Skeleton",1958,1; - monster .@map$,90,82,"Thorn of Pureness",1961,1; - monster .@map$,96,98,"Thorn of Magic",1960,1; - monster .@map$,83,76,"Thorny Skeleton",1958,1; - monster .@map$,74,85,"Thorny Skeleton",1958,1; - switch(rand(1,3)) { - case 1: monster .@map$,82,85,"Thorny Skeleton",1958,1; break; - case 2: monster .@map$,82,85,"Thorn of Magic",1960,1; break; - case 3: monster .@map$,82,85,"Thorn of Pureness",1961,1; break; + monster(.@map$, 72, 93, _("Thorny Skeleton"), G_ENTWEIHEN_R, 1); + monster(.@map$, 70, 87, _("Thorn of Magic"), G_ENTWEIHEN_M, 1); + monster(.@map$, 68, 83, _("Thorn of Pureness"), G_ENTWEIHEN_S, 1); + monster(.@map$, 70, 80, _("Thorny Skeleton"), G_ENTWEIHEN_R, 1); + monster(.@map$, 74, 81, _("Thorn of Magic"), G_ENTWEIHEN_M, 1); + monster(.@map$, 78, 72, _("Thorn of Magic"), G_ENTWEIHEN_M, 1); + monster(.@map$, 81, 70, _("Thorny Skeleton"), G_ENTWEIHEN_R, 1); + monster(.@map$, 78, 84, _("Thorn of Recovery"), G_ENTWEIHEN_H, 1); + monster(.@map$, 85, 72, _("Thorn of Magic"), G_ENTWEIHEN_M, 1); + monster(.@map$, 91, 74, _("Thorny Skeleton"), G_ENTWEIHEN_R, 1); + monster(.@map$, 79, 77, _("Thorn of Pureness"), G_ENTWEIHEN_S, 1); + monster(.@map$, 82, 80, _("Thorn of Recovery"), G_ENTWEIHEN_H, 1); + monster(.@map$, 87, 83, _("Thorn of Recovery"), G_ENTWEIHEN_H, 1); + monster(.@map$, 80, 92, _("Thorn of Pureness"), G_ENTWEIHEN_S, 1); + monster(.@map$, 81, 89, _("Thorny Skeleton"), G_ENTWEIHEN_R, 1); + monster(.@map$, 85, 93, _("Thorn of Magic"), G_ENTWEIHEN_M, 1); + monster(.@map$, 86, 90, _("Thorn of Recovery"), G_ENTWEIHEN_H, 1); + monster(.@map$, 88, 88, _("Thorny Skeleton"), G_ENTWEIHEN_R, 1); + monster(.@map$, 91, 87, _("Thorn of Magic"), G_ENTWEIHEN_M, 1); + monster(.@map$, 95, 94, _("Thorn of Magic"), G_ENTWEIHEN_M, 1); + monster(.@map$, 91, 96, _("Thorny Skeleton"), G_ENTWEIHEN_R, 1); + monster(.@map$, 90, 82, _("Thorn of Pureness"), G_ENTWEIHEN_S, 1); + monster(.@map$, 96, 98, _("Thorn of Magic"), G_ENTWEIHEN_M, 1); + monster(.@map$, 83, 76, _("Thorny Skeleton"), G_ENTWEIHEN_R, 1); + monster(.@map$, 74, 85, _("Thorny Skeleton"), G_ENTWEIHEN_R, 1); + switch (rand(1, 3)) { + case 1: + monster(.@map$, 82, 85, _("Thorny Skeleton"), G_ENTWEIHEN_R, 1); + break; + case 2: + monster(.@map$, 82, 85, _("Thorn of Magic"), G_ENTWEIHEN_M, 1); + break; + case 3: + monster(.@map$, 82, 85, _("Thorn of Pureness"), G_ENTWEIHEN_S, 1); + break; } - switch(rand(1,3)) { - case 1: monster .@map$,84,85,"Thorny Skeleton",1958,1; break; - case 2: monster .@map$,84,85,"Thorn of Magic",1960,1; break; - case 3: monster .@map$,84,85,"Thorn of Pureness",1961,1; break; + switch (rand(1, 3)) { + case 1: + monster(.@map$, 84, 85, _("Thorny Skeleton"), G_ENTWEIHEN_R, 1); + break; + case 2: + monster(.@map$, 84, 85, _("Thorn of Magic"), G_ENTWEIHEN_M, 1); + break; + case 3: + monster(.@map$, 84, 85, _("Thorn of Pureness"), G_ENTWEIHEN_S, 1); + break; } end; } 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."; - .@i = callfunc("F_GM_NPC","dmc2008",1); - next; + callfunc("F_GM_NPC"); + mes("This NPC manages the crystal on the 100th Level. Please enter the password."); + .@i = callfunc("F_GM_NPC", "dmc2008", 1); + next(); if (.@i == 1) { - donpcevent instance_npcname("Lucid Crystal#102")+"::OnEnable"; - mes "The 100th Level's crystal has been activated."; + donpcevent(instance_npcname("Lucid Crystal#102")+"::OnEnable"); + mes("The 100th Level's crystal has been activated."); } else - mes "Please enter the correct password."; - close; + mes("Please enter the correct password."); + close(); } //== Level 101 ============================================= 6@tower,45,89,2 script Life Spring#1 CLEAR_NPC,{ - mes "^0066ffYou took a sip of the spring's clear water, and you feel invigorated.^000000"; - heal (MaxHp-Hp),(MaxSp-Sp); - close; + mes("^0066ffYou took a sip of the spring's clear water, and you feel invigorated.^000000"); + heal((MaxHp - Hp), (MaxSp - Sp)); + close(); OnInstanceInit: - donpcevent instance_npcname("Life Spring#2")+"::OnEnable"; + donpcevent(instance_npcname("Life Spring#2")+"::OnEnable"); end; } @@ -1934,13 +1858,13 @@ OnInstanceInit: end; OnEnable: - specialeffect EF_BUBBLE; - initnpctimer; + specialeffect(EF_BUBBLE); + initnpctimer(); end; OnTimer2000: - stopnpctimer; - donpcevent instance_npcname("Life Spring#3")+"::OnEnable"; + stopnpctimer(); + donpcevent(instance_npcname("Life Spring#3")+"::OnEnable"); end; } @@ -1948,13 +1872,13 @@ OnTimer2000: end; OnEnable: - specialeffect EF_BUBBLE; - initnpctimer; + specialeffect(EF_BUBBLE); + initnpctimer(); end; OnTimer2000: - stopnpctimer; - donpcevent instance_npcname("Life Spring#2")+"::OnEnable"; + stopnpctimer(); + donpcevent(instance_npcname("Life Spring#2")+"::OnEnable"); end; } @@ -1964,14 +1888,14 @@ OnTimer2000: end; OnInstanceInit: - areamonster instance_mapname("6@tower"),154,73,156,75,"Watcher's Son",1627,10,instance_npcname("Tyrant's Throne#")+"::OnMyMobDead"; + areamonster(instance_mapname("6@tower"), 154, 73, 156, 75, _("Watcher's Son"), ANOPHELES, 10, instance_npcname("Tyrant's Throne#")+"::OnMyMobDead"); end; OnMyMobDead: - .@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#"); + donpcevent(instance_npcname("#1st Beeper")+"::OnEnable"); + disablenpc(instance_npcname("Tyrant's Throne#")); } end; } @@ -1980,42 +1904,42 @@ OnMyMobDead: end; OnEnable: - initnpctimer; + initnpctimer(); end; OnTimer500: - mapannounce instance_mapname("6@tower"),"Guests, huh? I hope you've come here knowing that you'll be buried in this place. If you didn't know, well... it's too late!",bc_map,"0x00ffcc"; + mapannounce(instance_mapname("6@tower"), _("Guests, huh? I hope you've come here knowing that you'll be buried in this place. If you didn't know, well... it's too late!"), bc_map, "0x00ffcc"); end; OnTimer5500: - mapannounce instance_mapname("6@tower"),"This is why you adventurers always end up dead.",bc_map,"0x00ffcc"; + mapannounce(instance_mapname("6@tower"), _("This is why you adventurers always end up dead."), bc_map, "0x00ffcc"); end; OnTimer10500: - mapannounce instance_mapname("6@tower"),"I may applaud you for your courage... Of course, I intend to play with you a little bit first.",bc_map,"0x00ffcc"; + mapannounce(instance_mapname("6@tower"), _("I may applaud you for your courage... Of course, I intend to play with you a little bit first."), bc_map, "0x00ffcc"); end; OnTimer15500: - mapannounce instance_mapname("6@tower"),"You know, I like watching humans running around in fear.",bc_map,"0x00ffcc"; + mapannounce(instance_mapname("6@tower"), _("You know, I like watching humans running around in fear."), bc_map, "0x00ffcc"); end; OnTimer20500: .@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"; - areamonster .@map$,158,66,160,106,"Bone Guardian",1152,50,instance_npcname("#1st Beeper")+"::OnMyMobDead"; + mapannounce(.@map$, _("Let's see who runs fastest. Are you ready?"), bc_map, "0x00ffcc"); + stopnpctimer(); + areamonster(.@map$, 151, 66, 153, 106, _("Bone Guardian"), ORC_SKELETON, 50, instance_npcname("#1st Beeper")+"::OnMyMobDead"); + areamonster(.@map$, 158, 66, 160, 106, _("Bone Guardian"), ORC_SKELETON, 50, instance_npcname("#1st Beeper")+"::OnMyMobDead"); end; OnMyMobDead: .@map$ = instance_mapname("6@tower"); - .@mob_dead_num = mobcount(.@map$,instance_npcname("#1st Beeper")+"::OnMyMobDead"); + .@mob_dead_num = mobcount(.@map$, instance_npcname("#1st Beeper")+"::OnMyMobDead"); if (.@mob_dead_num < 1) { - donpcevent instance_npcname("#2nd Beeper")+"::OnEnable"; + donpcevent(instance_npcname("#2nd Beeper")+"::OnEnable"); //SetItemPartyInMap in_102floor 101 + } else { + mapannounce(.@map$, sprintf(_$("Remaining Targets %dea"), .@mob_dead_num), bc_map, C_SPRINGGREEN); } - else - mapannounce .@map$,"Remaining Targets " + .@mob_dead_num + "ea",bc_map,"0x00ff99"; end; } @@ -2023,34 +1947,34 @@ OnMyMobDead: end; OnEnable: - initnpctimer; + initnpctimer(); end; OnTimer500: - mapannounce instance_mapname("6@tower"),"Well, I guess they aren't too challenging for you.",bc_map,"0x00ffcc"; + mapannounce(instance_mapname("6@tower"), _("Well, I guess they aren't too challenging for you."), bc_map, "0x00ffcc"); end; OnTimer5500: - mapannounce instance_mapname("6@tower"),"Let's speed up a little bit, shall we?",bc_map,"0x00ffcc"; + mapannounce(instance_mapname("6@tower"), _("Let's speed up a little bit, shall we?"), bc_map, "0x00ffcc"); end; OnTimer10500: .@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"; - areamonster .@map$,158,66,160,106,"Wind Guardian",1263,30,instance_npcname("#2nd Beeper")+"::OnMyMobDead"; + mapannounce(.@map$, _("I demand an encore!"), bc_map, "0x00ffcc"); + stopnpctimer(); + areamonster(.@map$, 151, 66, 153, 106, _("Wind Guardian"), WIND_GHOST, 30, instance_npcname("#2nd Beeper")+"::OnMyMobDead"); + areamonster(.@map$, 158, 66, 160, 106, _("Wind Guardian"), WIND_GHOST, 30, instance_npcname("#2nd Beeper")+"::OnMyMobDead"); end; OnMyMobDead: .@map$ = instance_mapname("6@tower"); - .@mob_dead_num = mobcount(.@map$,instance_npcname("#2nd Beeper")+"::OnMyMobDead"); + .@mob_dead_num = mobcount(.@map$, instance_npcname("#2nd Beeper")+"::OnMyMobDead"); if (.@mob_dead_num < 1) { - donpcevent instance_npcname("#3rd Beeper")+"::OnEnable"; + donpcevent(instance_npcname("#3rd Beeper")+"::OnEnable"); //SetItemPartyInMap in_102floor 102 + } else { + mapannounce(.@map$, sprintf(_$("Remaining Targets %dea"), .@mob_dead_num), bc_map, C_SPRINGGREEN); } - else - mapannounce .@map$,"Remaining Targets " + .@mob_dead_num + "ea",bc_map,"0x00ff99"; end; } @@ -2058,34 +1982,34 @@ OnMyMobDead: end; OnEnable: - initnpctimer; + initnpctimer(); end; OnTimer500: - mapannounce instance_mapname("6@tower"),"Yes, this is getting exciting!",bc_map,"0x00ffcc"; + mapannounce(instance_mapname("6@tower"), _("Yes, this is getting exciting!"), bc_map, "0x00ffcc"); end; OnTimer5500: - mapannounce instance_mapname("6@tower"),"I'll remember you as one of a few that have managed to entertain me.",bc_map,"0x00ffcc"; + mapannounce(instance_mapname("6@tower"), _("I'll remember you as one of a few that have managed to entertain me."), bc_map, "0x00ffcc"); end; OnTimer10500: .@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"; - areamonster .@map$,158,66,160,106,"Sword Edge Guardian",1132,20,instance_npcname("#3rd Beeper")+"::OnMyMobDead"; + mapannounce(.@map$, _("How would you like to play one more round?"), bc_map, "0x00ffcc"); + stopnpctimer(); + areamonster(.@map$, 151, 66, 153, 106, _("Sword Edge Guardian"), KHALITZBURG, 20, instance_npcname("#3rd Beeper")+"::OnMyMobDead"); + areamonster(.@map$, 158, 66, 160, 106, _("Sword Edge Guardian"), KHALITZBURG, 20, instance_npcname("#3rd Beeper")+"::OnMyMobDead"); end; OnMyMobDead: .@map$ = instance_mapname("6@tower"); - .@mob_dead_num = mobcount(.@map$,instance_npcname("#3rd Beeper")+"::OnMyMobDead"); + .@mob_dead_num = mobcount(.@map$, instance_npcname("#3rd Beeper")+"::OnMyMobDead"); if (.@mob_dead_num < 1) { - donpcevent instance_npcname("#4th Beeper")+"::OnEnable"; + donpcevent(instance_npcname("#4th Beeper")+"::OnEnable"); //SetItemPartyInMap in_102floor 103 + } else { + mapannounce(.@map$, sprintf(_$("Remaining Targets %dea"), .@mob_dead_num), bc_map, C_SPRINGGREEN); } - else - mapannounce .@map$,"Remaining Targets " + .@mob_dead_num + "ea",bc_map,"0x00ff99"; end; } @@ -2093,106 +2017,106 @@ OnMyMobDead: end; OnEnable: - initnpctimer; + initnpctimer(); end; OnTimer500: - mapannounce instance_mapname("6@tower"),"Okay, the time has come to make my appearance!",bc_map,"0x00ffcc"; + mapannounce(instance_mapname("6@tower"), _("Okay, the time has come to make my appearance!"), bc_map, "0x00ffcc"); end; OnTimer5500: - mapannounce instance_mapname("6@tower"),"Do you want to know who I am?",bc_map,"0x00ffcc"; + mapannounce(instance_mapname("6@tower"), _("Do you want to know who I am?"), bc_map, "0x00ffcc"); end; OnTimer10500: .@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"; + mapannounce(.@map$, _("You'll soon know. Mine is the face of death!"), bc_map, "0x00ffcc"); + stopnpctimer(); + monster(.@map$, 156, 147, _("Nacht Sieger"), NAGHT_SIEGER, 1, instance_npcname("#4th Beeper")+"::OnMyMobDead"); end; OnMyMobDead: - donpcevent instance_npcname("Lost Soul#102")+"::OnEnable"; + donpcevent(instance_npcname("Lost Soul#102")+"::OnEnable"); end; } 6@tower,169,127,2 script Lost Soul#102 4_M_NFDEADSWDMAN,{ - if (checkweight(Knife,1) == 0) { - mes "You're carrying too much stuff. Why don't you put some of it away, and then come back?"; - close; + if (checkweight(Knife, 1) == 0) { + mes("You're carrying too much stuff. Why don't you put some of it away, and then come back?"); + close(); } - mes "[Lost Souls]"; - mes "It's you that have liberated us from the evil Nacht Sieger."; - next; - mes "[Lost Souls]"; - mes "Thank you so much. Now we can escape from this cold and dark place... to heaven."; - next; - if ((countitem(Twin_Edge_B) > 0) && (countitem(Twin_Edge_R) > 0)) { - mes "[Lost Souls]"; - mes "Hey, you have the remnants of Nacht Sieger with you."; - next; - mes "[Lost Souls]"; - mes "They may appear to be one-handed swords, but I can put them together to make a two-handed one if you want. That's the only way I can repay you for freeing me."; - next; - switch(select("Make a Two-Handed Sword.", "No, thanks.")) { + mes("[Lost Souls]"); + mes("It's you that have liberated us from the evil Nacht Sieger."); + next(); + mes("[Lost Souls]"); + mes("Thank you so much. Now we can escape from this cold and dark place... to heaven."); + next(); + if (countitem(Twin_Edge_B) > 0 && countitem(Twin_Edge_R) > 0) { + mes("[Lost Souls]"); + mes("Hey, you have the remnants of Nacht Sieger with you."); + next(); + mes("[Lost Souls]"); + mes("They may appear to be one-handed swords, but I can put them together to make a two-handed one if you want. That's the only way I can repay you for freeing me."); + next(); + switch (select("Make a Two-Handed Sword.", "No, thanks.")) { case 1: - mes "[Lost Souls]"; - mes "If it is already upgraded or has a card inside, those effects will be disappear. Is this ok with you?"; - next; - switch(select("It's fine with me. Please make one.", "No way!")) { + mes("[Lost Souls]"); + mes("If it is already upgraded or has a card inside, those effects will be disappear. Is this ok with you?"); + next(); + switch (select("It's fine with me. Please make one.", "No way!")) { case 1: - mes "[Lost Souls]"; - mes "Good, then I'll combine these to create a two-handed sword."; - next; - delitem Twin_Edge_B,1; - delitem Twin_Edge_R,1; - getitem Violet_Fear,1; + mes("[Lost Souls]"); + mes("Good, then I'll combine these to create a two-handed sword."); + next(); + delitem(Twin_Edge_B, 1); + delitem(Twin_Edge_R, 1); + getitem(Violet_Fear, 1); break; case 2: - mes "[Lost Souls]"; - mes "I see. I guess you aren't as greedy or ambitious as those other adventurers."; - next; + mes("[Lost Souls]"); + mes("I see. I guess you aren't as greedy or ambitious as those other adventurers."); + next(); break; } break; case 2: - mes "[Lost Souls]"; - mes "I see. I guess you aren't as greedy or ambitious as those other adventurers."; - next; + mes("[Lost Souls]"); + mes("I see. I guess you aren't as greedy or ambitious as those other adventurers."); + next(); break; } } - mes "[Lost Souls]"; - mes "I'd like to talk to you more, but I've... I've got to go now."; - next; - mes "[Lost Souls]"; - mes "Farewell, young adventurer. I wish you good luck."; - close2; - warp "alberta",223,36; + mes("[Lost Souls]"); + mes("I'd like to talk to you more, but I've... I've got to go now."); + next(); + mes("[Lost Souls]"); + mes("Farewell, young adventurer. I wish you good luck."); + close2(); + warp("alberta", 223, 36); end; OnInstanceInit: - disablenpc instance_npcname("Lost Soul#102"); + disablenpc(instance_npcname("Lost Soul#102")); end; OnEnable: - initnpctimer; - enablenpc instance_npcname("Lost Soul#102"); - donpcevent instance_npcname("#Effect30")+"::OnEnable"; + initnpctimer(); + enablenpc(instance_npcname("Lost Soul#102")); + donpcevent(instance_npcname("#Effect30")+"::OnEnable"); //SetItemPartyInMap in_102floor 104 end; OnTimer500: - mapannounce instance_mapname("6@tower"),"This... This can't be happening! I can't be defeated!",bc_map,"0xffff00"; + mapannounce(instance_mapname("6@tower"), _("This... This can't be happening! I can't be defeated!"), bc_map, C_YELLOW); end; OnTimer5500: - mapannounce instance_mapname("6@tower"),"Nooo! My soul... My shell...! Nooo~!",bc_map,"0xffff00"; + mapannounce(instance_mapname("6@tower"), _("Nooo! My soul... My shell...! Nooo~!"), bc_map, C_YELLOW); end; OnTimer10500: - mapannounce instance_mapname("6@tower"),"Nacht Sieger's body has turned into dark ashes that scattered in the wind.",bc_map,"0x00ffcc"; - stopnpctimer; + mapannounce(instance_mapname("6@tower"), _("Nacht Sieger's body has turned into dark ashes that scattered in the wind."), bc_map, "0x00ffcc"); + stopnpctimer(); end; } @@ -2200,17 +2124,17 @@ OnTimer10500: end; OnInstanceInit: - disablenpc instance_npcname("#Effect30"); + disablenpc(instance_npcname("#Effect30")); end; OnEnable: - specialeffect EF_CONE; - initnpctimer; + specialeffect(EF_CONE); + initnpctimer(); end; OnTimer1000: - stopnpctimer; - donpcevent instance_npcname("#Effect31")+"::OnEnable"; + stopnpctimer(); + donpcevent(instance_npcname("#Effect31")+"::OnEnable"); end; } @@ -2218,16 +2142,16 @@ OnTimer1000: end; OnInstanceInit: - disablenpc instance_npcname("#Effect31"); + disablenpc(instance_npcname("#Effect31")); end; OnEnable: - specialeffect EF_CONE; - initnpctimer; + specialeffect(EF_CONE); + initnpctimer(); end; OnTimer1000: - stopnpctimer; - donpcevent instance_npcname("#Effect30")+"::OnEnable"; + stopnpctimer(); + donpcevent(instance_npcname("#Effect30")+"::OnEnable"); end; } diff --git a/npc/instances/OrcsMemory.txt b/npc/instances/OrcsMemory.txt index 28cc9bbd5..1aaf2fd42 100644 --- a/npc/instances/OrcsMemory.txt +++ b/npc/instances/OrcsMemory.txt @@ -38,132 +38,136 @@ gef_fild10,242,202,0 script Dimensional Gorge Piece 2_MONEMUS,{ .@party_id = getcharid(CHAR_ID_PARTY); .@p_name$ = getpartyname(.@party_id); - .@md_name$ = "Orc's Memory"; + .@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; + if (!instance_check_party(.@party_id, 2, 30, 80)) { + mes("Only users between Levels ^ff000030 ~ 80^000000 can enter this Dungeon."); + close(); } - .@orctime = questprogress(12059,PLAYTIME); + .@orctime = questprogress(12059, PLAYTIME); if (.@orctime == 2) { - mes "^0000ffAll records and after-effects related to the Orc's Memory Dungeon are deleted. You can now regenerate or re-enter the dungeon.^000000"; - erasequest 12059; - close; + mes("^0000ffAll records and after-effects related to the Orc's Memory Dungeon are deleted. You can now regenerate or re-enter the dungeon.^000000"); + erasequest(12059); + close(); } if (.@orctime == 1) { - mes "You can enter the Dungeon if it has been generated."; - next; - if(select("Enter the Dungeon "+.@md_name$, "Cancel") == 2) - close; + mes("You can enter the Dungeon if it has been generated."); + next(); + .@str$ = sprintf(_$("Enter the Dungeon %s"), .@md_name$); + if (select(.@str$, "Cancel") == 2) + close(); // Fall through to access the dungeon } else { // !.@orctime - if (getcharid(CHAR_ID_CHAR) == 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")) { + if (getcharid(CHAR_ID_CHAR) == getpartyleader(.@party_id, 2)) { + mesf("Party status confirmed. Would you like to book entrance to the %s?", .@md_name$); + next(); + .@str$ = sprintf(_$("Reserve the %s"), .@md_name$); + switch (select(.@str$, "Enter the Dungeon", "Cancel")) { case 1: - .@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(PC_NAME); - mes "^0000ff"+.@md_name$+" ^000000 - Reservation Failed."; - close; + mesf("Party Name: %s", .@p_name$); + mesf("Party Leader: %s", strcharinfo(PC_NAME)); + mesf("^0000ff%s ^000000 - Reservation Failed.", .@md_name$); + close(); } - mes "^0000ff"+.@md_name$+"^000000- Attempting to book an entrance"; + mesf("^0000ff%s^000000- Attempting to book an entrance", .@md_name$); for (.@i = 1; .@i <= 2; ++.@i) { - if( instance_attachmap(.@i + "@orcs", .@instance) == "" ) + if (instance_attachmap(.@i + "@orcs", .@instance) == "") break; } - if( .@i < 2 ) { + if (.@i < 2) { instance_destroy(.@instance); - close; + close(); } - instance_set_timeout 7200,300,.@instance; + instance_set_timeout(7200, 300, .@instance); instance_init(.@instance); - mes "After making a reservation, you have to select 'Enter the Dungeon' from the menu if you wish to enter the "+.@md_name$+"."; - close; + mesf("After making a reservation, you have to select 'Enter the Dungeon' from the menu if you wish to enter the %s.", .@md_name$); + close(); case 2: break; // Fall through to access the dungeon (after the else) case 3: - close; + close(); } - } else if (select(.@md_name$ + " Enter the Memorial Dungeon", "Cancel") == 2) + } else if (select(sprintf(_$("%s Enter the Memorial Dungeon"), .@md_name$), "Cancel") == 2) { end; + } // Else access the dungeon } // Dungeon access if (has_instance("1@orcs") == "") { - mes "Memorial Dungeon "+.@md_name$+" does not exist."; - mes "The party leader has not reserved entrance to the dungeon yet."; - next; - mes "Once the reservation is complete, the dungeon will be generated."; - mes "If your dungeon has been destroyed you must wait 7 days before re-entering."; - close; + mesf("Memorial Dungeon %s does not exist.", .@md_name$); + mes("The party leader has not reserved entrance to the dungeon yet."); + next(); + mes("Once the reservation is complete, the dungeon will be generated."); + mes("If your dungeon has been destroyed you must wait 7 days before re-entering."); + close(); } - mapannounce "gef_fild10", strcharinfo(PC_NAME) + " of the party, " + .@p_name$ + " is entering the "+.@md_name$+".",bc_map,"0x00ff99"; - if (!questprogress(12059)) setquest 12059; - warp "1@orcs",179,15; + mapannounce("gef_fild10", sprintf(_$("%s of the party, %s is entering the %s."), strcharinfo(PC_NAME), .@p_name$, .@md_name$), bc_map, C_SPRINGGREEN); + if (!questprogress(12059)) + setquest(12059); + warp("1@orcs", 179, 15); end; } gef_fild10,238,202,6 script Mad Scientist#orc 4_LGTSCIENCE,{ if (BaseLevel < 50) { - mes "The Mad Scientist doesn't seem to notice you and keeps mumbling to himself..."; - close; + mes("The Mad Scientist doesn't seem to notice you and keeps mumbling to himself..."); + close(); } if (mad == 0) { - mes "[Mad Scientist]"; - mes "Haha, no Orcs are coming near me!"; - mes "The power of the Dimensional Gorge is undefeatable!!"; - next; - switch(select("Orcs don't attack you?", "You wish!")) { + mes("[Mad Scientist]"); + mes("Haha, no Orcs are coming near me!"); + mes("The power of the Dimensional Gorge is undefeatable!!"); + next(); + switch (select("Orcs don't attack you?", "You wish!")) { case 1: - mes "[Mad Scientist]"; - mes "Yeah, yeah.. I know it's hard to belive. I don't blame ya."; - mes "I used to study the Dimensional Gorge discovered near Morroc."; - mes "According to my research, the minerals found there have enormous power inside them!"; - next; + mes("[Mad Scientist]"); + mes("Yeah, yeah.. I know it's hard to belive. I don't blame ya."); + mes("I used to study the Dimensional Gorge discovered near Morroc."); + mes("According to my research, the minerals found there have enormous power inside them!"); + next(); break; case 2: - mes "[Mad Scientist]"; - mes "You are a pretty distrustful person, huh?"; - next; + mes("[Mad Scientist]"); + mes("You are a pretty distrustful person, huh?"); + next(); break; } select("Oh? Like what, travel to alternate space?"); - mes "[Mad Scientist]"; - mes "Very smart! I have actually just done that! See that statue over there? It's not your normal Monolith!"; - next; - mes "[Mad Scientist]"; - mes "I have created it with a combination of our technology and the unlimited energy I discovered from the Gorge! Want to try it?"; - next; + mes("[Mad Scientist]"); + mes("Very smart! I have actually just done that! See that statue over there? It's not your normal Monolith!"); + next(); + mes("[Mad Scientist]"); + mes("I have created it with a combination of our technology and the unlimited energy I discovered from the Gorge! Want to try it?"); + next(); select("...Um, that doesn't sound legal?"); - mes "[Mad Scientist]"; - mes "Hey, since when did something so interesting have to be legal!? How about it! You can talk to the Orcs! C'mon!"; - next; - mes "[Mad Scientist]"; - mes "Chances are they'll just give you lots of instructions once they see you, so just wing it! They're always saying the same thing, to the point where I memorized them!"; - next; - switch(select("Alright... What do I do?", "Umm, maybe not.")) { + mes("[Mad Scientist]"); + mes("Hey, since when did something so interesting have to be legal!? How about it! You can talk to the Orcs! C'mon!"); + next(); + mes("[Mad Scientist]"); + mes("Chances are they'll just give you lots of instructions once they see you, so just wing it! They're always saying the same thing, to the point where I memorized them!"); + next(); + switch (select("Alright... What do I do?", "Umm, maybe not.")) { 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!"; + mes("[Mad Scientist]"); + mes("Very good! Just sit in the hands of this statue! And try to act natural when you're in there!"); mad = 1; - close; + close(); case 2: - mes "[Mad Scientist]"; - mes "Oh fine, be that way!"; - close; + mes("[Mad Scientist]"); + mes("Oh fine, be that way!"); + close(); } } else if (mad == 1) { - mes "[Mad Scientist]"; - mes "Hmm? Put your hand on that Monemus Statue if you want to experience traveling through dimensions!"; - close; + mes("[Mad Scientist]"); + mes("Hmm? Put your hand on that Monemus Statue if you want to experience traveling through dimensions!"); + close(); } else { mad = 1; end; @@ -175,60 +179,53 @@ gef_fild10,238,202,6 script Mad Scientist#orc 4_LGTSCIENCE,{ end; OnInstanceInit: - disablenpc instance_npcname("#Resurrect Monsters1"); + disablenpc(instance_npcname("#Resurrect Monsters1")); end; OnDisable: - stopnpctimer; - killmonster instance_mapname("1@orcs"),instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead"; + stopnpctimer(); + killmonster(instance_mapname("1@orcs"), instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead"); end; OnEnable: - enablenpc instance_npcname("#Resurrect Monsters1"); - monster instance_mapname("1@orcs"),0,0,"Orc Warrior",1023,30,instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead"; + enablenpc(instance_npcname("#Resurrect Monsters1")); + monster(instance_mapname("1@orcs"), 0, 0, _("Orc Warrior"), ORK_WARRIOR, 30, instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead"); end; OnMyMobDead: .@map$ = instance_mapname("1@orcs"); - .@mob_dead_num = 30 - mobcount(.@map$,instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead"); + .@mob_dead_num = 30 - mobcount(.@map$, instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead"); if (.@mob_dead_num > 0) { - .@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"; - } - else if ((.@mob_ran > 28) && (.@mob_ran < 30)) { - monster .@map$,0,0,"High Orc",1213,.@mob_dead_num,instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead"; - if (rand(1,10) == 9) { - mapannounce .@map$, "High Orc: We need more defenses! Get more people here!",bc_map,"0xff4444"; - } - } - else if ((.@mob_ran > 26) && (.@mob_ran < 29)) { - areamonster .@map$,41,91,51,81,"High Orc",1213,.@mob_dead_num,instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead"; - if (rand(1,10) == 9) { - mapannounce .@map$, "Where are the High Orcs!? Get them to stop the enemies!",bc_map,"0xff4444"; - } - } - else { - areamonster .@map$,17,187,27,177,"High Orc",1213,.@mob_dead_num,instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead"; - if (rand(1,5) == 3) { - mapannounce .@map$, "Caution: The army's starting to concentrate at Zone No. 4.",bc_map,"0x77ff77"; - } - if (rand(1,100) == 50) { - initnpctimer; - } + monster(.@map$, 0, 0, _("Orc Warrior"), ORK_WARRIOR, .@mob_dead_num, instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead"); + } else if (.@mob_ran > 28 && .@mob_ran < 30) { + monster(.@map$, 0, 0, _("High Orc"), HIGH_ORC, .@mob_dead_num, instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead"); + if (rand(1, 10) == 9) + mapannounce(.@map$, _("High Orc: We need more defenses! Get more people here!"), bc_map, "0xff4444"); + } else if (.@mob_ran > 26 && .@mob_ran < 29) { + areamonster(.@map$, 41, 91, 51, 81, _("High Orc"), HIGH_ORC, .@mob_dead_num, instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead"); + if (rand(1, 10) == 9) + mapannounce(.@map$, _("Where are the High Orcs!? Get them to stop the enemies!"), bc_map, "0xff4444"); + } else { + areamonster(.@map$, 17, 187, 27, 177, _("High Orc"), HIGH_ORC, .@mob_dead_num, instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead"); + if (rand(1, 5) == 3) + mapannounce(.@map$, _("Caution: The army's starting to concentrate at Zone No. 4."), bc_map, "0x77ff77"); + if (rand(1, 100) == 50) + initnpctimer(); } } end; OnTimer10: - mapannounce instance_mapname("1@orcs"), "Shouts of the Chief Orc of Safeguards: Looks like this will take longer than expected. Summon the Stalactic Golems!",bc_map,"0xff4444"; + mapannounce(instance_mapname("1@orcs"), _("Shouts of the Chief Orc of Safeguards: Looks like this will take longer than expected. Summon the Stalactic Golems!"), bc_map, "0xff4444"); end; OnTimer4010: .@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; + mapannounce(.@map$, _("Stalactic Golems are digging out of the deep underground."), bc_map, "0x77ff77"); + areamonster(.@map$, 17, 187, 27, 177, _("Stalactic Golem"), STALACTIC_GOLEM, 20, instance_npcname("#Resurrect Monsters1")+"::OnMyMobDead"); + stopnpctimer(); end; } @@ -236,30 +233,27 @@ OnTimer4010: end; OnInstanceInit: - disablenpc instance_npcname("#Resurrect Monsters2"); + disablenpc(instance_npcname("#Resurrect Monsters2")); end; OnDisable: - killmonster instance_mapname("1@orcs"),instance_npcname("#Resurrect Monsters2")+"::OnMyMobDead"; + killmonster(instance_mapname("1@orcs"), instance_npcname("#Resurrect Monsters2")+"::OnMyMobDead"); end; OnEnable: - enablenpc instance_npcname("#Resurrect Monsters2"); - monster instance_mapname("1@orcs"),0,0,"Trained Wolf",1106,15,instance_npcname("#Resurrect Monsters2")+"::OnMyMobDead"; + enablenpc(instance_npcname("#Resurrect Monsters2")); + monster(instance_mapname("1@orcs"), 0, 0, _("Trained Wolf"), DESERT_WOLF, 15, instance_npcname("#Resurrect Monsters2")+"::OnMyMobDead"); end; 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"; - } - } - else { - if (.@mob_dead_num > 0) { - areamonster .@map$,17,187,27,177,"Trained Wolf",1106,.@mob_dead_num,instance_npcname("#Resurrect Monsters2")+"::OnMyMobDead"; - } + .@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"), DESERT_WOLF, .@mob_dead_num, instance_npcname("#Resurrect Monsters2")+"::OnMyMobDead"); + } else { + if (.@mob_dead_num > 0) + areamonster(.@map$, 17, 187, 27, 177, _("Trained Wolf"), DESERT_WOLF, .@mob_dead_num, instance_npcname("#Resurrect Monsters2")+"::OnMyMobDead"); } end; } @@ -268,39 +262,34 @@ OnMyMobDead: end; OnInstanceInit: - disablenpc instance_npcname("#Resurrect Monsters3"); + disablenpc(instance_npcname("#Resurrect Monsters3")); end; OnDisable: - killmonster instance_mapname("1@orcs"),instance_npcname("#Resurrect Monsters3")+"::OnMyMobDead"; + killmonster(instance_mapname("1@orcs"), instance_npcname("#Resurrect Monsters3")+"::OnMyMobDead"); end; OnEnable: - enablenpc instance_npcname("#Resurrect Monsters3"); - monster instance_mapname("1@orcs"),0,0,"Orc Archer",1189,15,instance_npcname("#Resurrect Monsters3")+"::OnMyMobDead"; + enablenpc(instance_npcname("#Resurrect Monsters3")); + monster(instance_mapname("1@orcs"), 0, 0, _("Orc Archer"), ORC_ARCHER, 15, instance_npcname("#Resurrect Monsters3")+"::OnMyMobDead"); end; OnMyMobDead: .@map$ = instance_mapname("1@orcs"); - .@mob_dead_num = 15 - mobcount(.@map$,instance_npcname("#Resurrect Monsters3")+"::OnMyMobDead"); - .@mob_ran = rand(1,30); + .@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"), ORC_ARCHER, .@mob_dead_num, instance_npcname("#Resurrect Monsters3")+"::OnMyMobDead"); + } else if (.@mob_ran > 26 && .@mob_ran < 30) { if (.@mob_dead_num > 0) { - monster .@map$,0,0,"Orc Archer",1189,.@mob_dead_num,instance_npcname("#Resurrect Monsters3")+"::OnMyMobDead"; - } - } - else if ((.@mob_ran > 26) && (.@mob_ran < 30)) { - if (.@mob_dead_num > 0) { - areamonster .@map$,43,155,47,159,"Orc Archer",1189,.@mob_dead_num,instance_npcname("#Resurrect Monsters3")+"::OnMyMobDead"; - if (rand(1,3) == 3) { - mapannounce .@map$, "High Orc: Attack them from behind! Cut off their support!",bc_map,"0xff4444"; - } - } - } - else { - if (.@mob_dead_num > 0) { - areamonster .@map$,17,187,27,177,"Orc Archer",1189,.@mob_dead_num,instance_npcname("#Resurrect Monsters3")+"::OnMyMobDead"; + areamonster(.@map$, 43, 155, 47, 159, _("Orc Archer"), ORC_ARCHER, .@mob_dead_num, instance_npcname("#Resurrect Monsters3")+"::OnMyMobDead"); + if (rand(1, 3) == 3) + mapannounce(.@map$, _("High Orc: Attack them from behind! Cut off their support!"), bc_map, "0xff4444"); } + } else { + if (.@mob_dead_num > 0) + areamonster(.@map$, 17, 187, 27, 177, _("Orc Archer"), ORC_ARCHER, .@mob_dead_num, instance_npcname("#Resurrect Monsters3")+"::OnMyMobDead"); } end; } @@ -309,25 +298,24 @@ OnMyMobDead: end; OnInstanceInit: - enablenpc instance_npcname("#Resurrect Monsters4"); - areamonster instance_mapname("1@orcs"),98,35,178,115,"Anopheles",1627,10,instance_npcname("#Resurrect Monsters4")+"::OnMyMobDead"; + enablenpc(instance_npcname("#Resurrect Monsters4")); + areamonster(instance_mapname("1@orcs"), 98, 35, 178, 115, _("Anopheles"), ANOPHELES, 10, instance_npcname("#Resurrect Monsters4")+"::OnMyMobDead"); end; 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"; - } + .@mob_dead_num = 10 - mobcount(.@map$, instance_npcname("#Resurrect Monsters4")+"::OnMyMobDead"); + if (.@mob_dead_num > 0) + monster(.@map$, 0, 0, _("Anopheles"), ANOPHELES, .@mob_dead_num, instance_npcname("#Resurrect Monsters4")+"::OnMyMobDead"); end; OnDisable: - killmonster instance_mapname("1@orcs"),instance_npcname("#Resurrect Monsters4")+"::OnMyMobDead"; + killmonster(instance_mapname("1@orcs"), instance_npcname("#Resurrect Monsters4")+"::OnMyMobDead"); end; } 1@orcs,180,29,4 script Kruger#1-1 4_ORCWARRIOR,{ - donpcevent instance_npcname("Kruger#1-2")+"::OnEnable"; + donpcevent(instance_npcname("Kruger#1-2")+"::OnEnable"); end; } @@ -335,164 +323,164 @@ OnDisable: end; OnInstanceInit: - disablenpc instance_npcname("Kruger#1-2"); + disablenpc(instance_npcname("Kruger#1-2")); end; OnEnable: - disablenpc instance_npcname("Kruger#1-1"); - enablenpc instance_npcname("Kruger#1-2"); - initnpctimer; + disablenpc(instance_npcname("Kruger#1-1")); + enablenpc(instance_npcname("Kruger#1-2")); + initnpctimer(); end; OnTimer10: - mapannounce instance_mapname("1@orcs"), "Kruger: Damn... What took you so long!! I don't have all day!!",bc_map,"0xffff00"; + mapannounce(instance_mapname("1@orcs"), _("Kruger: Damn... What took you so long!! I don't have all day!!"), bc_map, C_YELLOW); end; OnTimer5710: - mapannounce instance_mapname("1@orcs"), "Kruger: My plan was to let our comrades open the gate, but it's all ruined since I got busted by the Orc Shaman.",bc_map,"0xffff00"; + mapannounce(instance_mapname("1@orcs"), _("Kruger: My plan was to let our comrades open the gate, but it's all ruined since I got busted by the Orc Shaman."), bc_map, C_YELLOW); end; OnTimer14610: - mapannounce instance_mapname("1@orcs"), "Shouts of the Chief Orc of Safeguards: I smell a rat.. Send some patrols to the entrance!!",bc_map,"0xff4444"; + mapannounce(instance_mapname("1@orcs"), _("Shouts of the Chief Orc of Safeguards: I smell a rat.. Send some patrols to the entrance!!"), bc_map, "0xff4444"); end; OnTimer20210: - mapannounce instance_mapname("1@orcs"), "Kruger: Darn it.. They'll be here any minute. Ok. Listen to me now.",bc_map,"0xffff00"; + mapannounce(instance_mapname("1@orcs"), _("Kruger: Darn it.. They'll be here any minute. Ok. Listen to me now."), bc_map, C_YELLOW); end; OnTimer24910: - mapannounce instance_mapname("1@orcs"), "Kruger: The Orc Shaman has sealed the 1st basement by dividing it into 4 zones. Each zone has one Enchanted Orc who has the power to unseal the next zone.",bc_map,"0xffff00"; + mapannounce(instance_mapname("1@orcs"), _("Kruger: The Orc Shaman has sealed the 1st basement by dividing it into 4 zones. Each zone has one Enchanted Orc who has the power to unseal the next zone."), bc_map, C_YELLOW); end; OnTimer34310: - mapannounce instance_mapname("1@orcs"), "Kruger: Find those Enchanted Orcs and get rid of them to move to the next zone.",bc_map,"0xffff00"; + mapannounce(instance_mapname("1@orcs"), _("Kruger: Find those Enchanted Orcs and get rid of them to move to the next zone."), bc_map, C_YELLOW); end; OnTimer39710: - mapannounce instance_mapname("1@orcs"), "Kruger: Try to avoid encountering Orcs other then the Enchanted ones. Everytime you kill a normal Orc, High Orcs will gather at the last path to the 2nd floor.",bc_map,"0xffff00"; + mapannounce(instance_mapname("1@orcs"), _("Kruger: Try to avoid encountering Orcs other then the Enchanted ones. Everytime you kill a normal Orc, High Orcs will gather at the last path to the 2nd floor."), bc_map, C_YELLOW); end; OnTimer49210: - mapannounce instance_mapname("1@orcs"), "Kruger: In the worst case, the path to the 2nd floor could be completely blocked. For your own sake, you should be as sneaky as possible.",bc_map,"0xffff00"; + mapannounce(instance_mapname("1@orcs"), _("Kruger: In the worst case, the path to the 2nd floor could be completely blocked. For your own sake, you should be as sneaky as possible."), bc_map, C_YELLOW); end; OnTimer56310: - mapannounce instance_mapname("1@orcs"), "Mission: Sneak in and get rid of the 'Enchanted Orcs'. Avoiding battles with other Orcs is the best way of getting into the 2nd floor.",bc_map,"0x44ffff"; - donpcevent instance_npcname("#Resurrect Monsters1")+"::OnEnable"; - donpcevent instance_npcname("#Resurrect Monsters2")+"::OnEnable"; - donpcevent instance_npcname("#Resurrect Monsters3")+"::OnEnable"; - disablenpc instance_npcname("Kruger#1-2"); + mapannounce(instance_mapname("1@orcs"), _("Mission: Sneak in and get rid of the 'Enchanted Orcs'. Avoiding battles with other Orcs is the best way of getting into the 2nd floor."), bc_map, "0x44ffff"); + donpcevent(instance_npcname("#Resurrect Monsters1")+"::OnEnable"); + donpcevent(instance_npcname("#Resurrect Monsters2")+"::OnEnable"); + donpcevent(instance_npcname("#Resurrect Monsters3")+"::OnEnable"); + disablenpc(instance_npcname("Kruger#1-2")); end; OnTimer60000: - areamonster instance_mapname("1@orcs"),137,83,143,89,"Enchanted Orc",1023,1,instance_npcname("B1 Area Mobs")+"::OnMyMobDead"; - stopnpctimer; + areamonster(instance_mapname("1@orcs"), 137, 83, 143, 89, _("Enchanted Orc"), ORK_WARRIOR, 1, instance_npcname("B1 Area Mobs")+"::OnMyMobDead"); + stopnpctimer(); end; } 1@orcs,168,125,0 script B1 Area 1 WARPNPC,3,3,{ OnInstanceInit: - disablenpc instance_npcname("B1 Area 1"); + disablenpc(instance_npcname("B1 Area 1")); end; OnEnable: - enablenpc instance_npcname("B1 Area 1"); - areamonster instance_mapname("1@orcs"),103,105,109,111,"Enchanted Orc",1023,1,instance_npcname("B1 Area Mobs")+"::OnMyMobDead1"; + enablenpc(instance_npcname("B1 Area 1")); + areamonster(instance_mapname("1@orcs"), 103, 105, 109, 111, _("Enchanted Orc"), ORK_WARRIOR, 1, instance_npcname("B1 Area Mobs")+"::OnMyMobDead1"); end; OnTouch: - warp instance_mapname("1@orcs"),168,130; + warp(instance_mapname("1@orcs"), 168, 130); end; OnContinue: - donpcevent instance_npcname("B1 Area 2")+"::OnEnable"; - initnpctimer; + donpcevent(instance_npcname("B1 Area 2")+"::OnEnable"); + initnpctimer(); end; OnTimer10300: - mapannounce instance_mapname("1@orcs"), "Kruger's Whisper: The Orcs here used to be my companions. They just lost their will ever since the Orc Shaman started to control them with her magic.",bc_map,"0xff4499"; + mapannounce(instance_mapname("1@orcs"), _("Kruger's Whisper: The Orcs here used to be my companions. They just lost their will ever since the Orc Shaman started to control them with her magic."), bc_map, "0xff4499"); end; OnTimer18700: - mapannounce instance_mapname("1@orcs"), "Kruger's Whisper: There's nothing we can do but to defeat the Orc Shaman if we want to save the remaining tribes.",bc_map,"0xff4499"; - stopnpctimer; + mapannounce(instance_mapname("1@orcs"), _("Kruger's Whisper: There's nothing we can do but to defeat the Orc Shaman if we want to save the remaining tribes."), bc_map, "0xff4499"); + stopnpctimer(); end; } 1@orcs,89,94,0 script B1 Area 2 WARPNPC,3,3,{ OnInstanceInit: - disablenpc instance_npcname("B1 Area 2"); + disablenpc(instance_npcname("B1 Area 2")); end; OnEnable: - enablenpc instance_npcname("B1 Area 2"); - areamonster instance_mapname("1@orcs"),32,40,38,46,"Enchanted Orc",1023,1,instance_npcname("B1 Area Mobs")+"::OnMyMobDead2"; + enablenpc(instance_npcname("B1 Area 2")); + areamonster(instance_mapname("1@orcs"), 32, 40, 38, 46, _("Enchanted Orc"), ORK_WARRIOR, 1, instance_npcname("B1 Area Mobs")+"::OnMyMobDead2"); end; OnTouch: - warp instance_mapname("1@orcs"),85,85; + warp(instance_mapname("1@orcs"), 85, 85); end; OnContinue: - donpcevent instance_npcname("B1 Area 3")+"::OnEnable"; - initnpctimer; + donpcevent(instance_npcname("B1 Area 3")+"::OnEnable"); + initnpctimer(); end; OnTimer30300: - mapannounce instance_mapname("1@orcs"), "Kruger's Whisper: I saw the bodies of our tribe. It seems that the Orc Shaman used those Orcs for her rituals.",bc_map,"0xff4499"; + mapannounce(instance_mapname("1@orcs"), _("Kruger's Whisper: I saw the bodies of our tribe. It seems that the Orc Shaman used those Orcs for her rituals."), bc_map, "0xff4499"); end; OnTimer37600: - mapannounce instance_mapname("1@orcs"), "Kruger's Whisper: ... It all has to do with me. I am responsible for this evil.",bc_map,"0xff4499"; - stopnpctimer; + mapannounce(instance_mapname("1@orcs"), _("Kruger's Whisper: ... It all has to do with me. I am responsible for this evil."), bc_map, "0xff4499"); + stopnpctimer(); end; } 1@orcs,38,105,0 script B1 Area 3 WARPNPC,3,3,{ OnInstanceInit: - disablenpc instance_npcname("B1 Area 3"); + disablenpc(instance_npcname("B1 Area 3")); end; OnEnable: - enablenpc instance_npcname("B1 Area 3"); - areamonster instance_mapname("1@orcs"),19,177,25,183,"Enchanted Orc",1023,1,instance_npcname("B1 Area Mobs")+"::OnMyMobDead3"; + enablenpc(instance_npcname("B1 Area 3")); + areamonster(instance_mapname("1@orcs"), 19, 177, 25, 183, _("Enchanted Orc"), ORK_WARRIOR, 1, instance_npcname("B1 Area Mobs")+"::OnMyMobDead3"); end; OnTouch: - warp instance_mapname("1@orcs"),38,110; + warp(instance_mapname("1@orcs"), 38, 110); end; OnContinue: - donpcevent instance_npcname("B1 Area 4")+"::OnEnable"; - initnpctimer; + donpcevent(instance_npcname("B1 Area 4")+"::OnEnable"); + initnpctimer(); end; OnTimer30300: - mapannounce instance_mapname("1@orcs"), "Please, hang in there!",bc_map,"0xff4499"; + mapannounce(instance_mapname("1@orcs"), _("Please, hang in there!"), bc_map, "0xff4499"); end; OnTimer32700: - mapannounce instance_mapname("1@orcs"), "We'll get some rest when we get to the 2nd basement after passing through here.",bc_map,"0xff4499"; - stopnpctimer; + mapannounce(instance_mapname("1@orcs"), _("We'll get some rest when we get to the 2nd basement after passing through here."), bc_map, "0xff4499"); + stopnpctimer(); end; } 1@orcs,21,189,0 script B1 Area 4 WARPNPC,3,3,{ OnInstanceInit: - disablenpc instance_npcname("B1 Area 4"); + disablenpc(instance_npcname("B1 Area 4")); end; OnEnable: - enablenpc instance_npcname("B1 Area 4"); - donpcevent instance_npcname("#Resurrect Monsters1")+"::OnDisable"; - donpcevent instance_npcname("#Resurrect Monsters2")+"::OnDisable"; - donpcevent instance_npcname("#Resurrect Monsters3")+"::OnDisable"; - donpcevent instance_npcname("#Resurrect Monsters4")+"::OnDisable"; + enablenpc(instance_npcname("B1 Area 4")); + donpcevent(instance_npcname("#Resurrect Monsters1")+"::OnDisable"); + donpcevent(instance_npcname("#Resurrect Monsters2")+"::OnDisable"); + donpcevent(instance_npcname("#Resurrect Monsters3")+"::OnDisable"); + donpcevent(instance_npcname("#Resurrect Monsters4")+"::OnDisable"); end; OnTouch: - warp instance_mapname("2@orcs"),32,171; + warp(instance_mapname("2@orcs"), 32, 171); end; } @@ -500,19 +488,19 @@ OnTouch: end; OnMyMobDead: - donpcevent instance_npcname("B1 Area 1")+"::OnEnable"; + donpcevent(instance_npcname("B1 Area 1")+"::OnEnable"); end; OnMyMobDead1: - donpcevent instance_npcname("B1 Area 1")+"::OnContinue"; + donpcevent(instance_npcname("B1 Area 1")+"::OnContinue"); end; OnMyMobDead2: - donpcevent instance_npcname("B1 Area 2")+"::OnContinue"; + donpcevent(instance_npcname("B1 Area 2")+"::OnContinue"); end; OnMyMobDead3: - donpcevent instance_npcname("B1 Area 3")+"::OnContinue"; + donpcevent(instance_npcname("B1 Area 3")+"::OnContinue"); end; } @@ -521,57 +509,51 @@ OnMyMobDead3: end; OnInstanceInit: - disablenpc instance_npcname("#2Resurrect Monsters1"); + disablenpc(instance_npcname("#2Resurrect Monsters1")); end; OnEnable: - enablenpc instance_npcname("#2Resurrect Monsters1"); - monster instance_mapname("2@orcs"),0,0,"Vengeful Orc",1152,30,instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead"; + enablenpc(instance_npcname("#2Resurrect Monsters1")); + monster(instance_mapname("2@orcs"), 0, 0, _("Vengeful Orc"), ORC_SKELETON, 30, instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead"); end; OnDisable: - stopnpctimer; - killmonster instance_mapname("2@orcs"),instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead"; + stopnpctimer(); + killmonster(instance_mapname("2@orcs"), instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead"); end; OnMyMobDead: .@map$ = instance_mapname("2@orcs"); - .@mob_dead_num = 30 - mobcount(.@map$,instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead"); + .@mob_dead_num = 30 - mobcount(.@map$, instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead"); if (.@mob_dead_num > 0) { - .@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"; - } - else if ((.@mob_ran > 28) && (.@mob_ran < 30)) { - monster .@map$,0,0,"High Orc",1213,.@mob_dead_num,instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead"; - } - else if ((.@mob_ran > 26) && (.@mob_ran < 29)) { - areamonster .@map$,157,112,167,122,"High Orc",1213,.@mob_dead_num,instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead"; - if (rand(1,10) == 9) { - mapannounce .@map$, "Warning: High Orcs are gathering near area 3.",bc_map,"0xff4444"; - } - } - else { - areamonster .@map$,173,13,183,23,"High Orc",1213,.@mob_dead_num,instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead"; - if (rand(1,5) == 3) { - mapannounce .@map$, "Caution: The Forces have started to concentrate at the Shaman's Altar.",bc_map,"0x77ff77"; - } - if (rand(1,70) == 50) { - initnpctimer; - } + monster(.@map$, 0, 0, _("Vengeful Orc"), ORC_SKELETON, .@mob_dead_num, instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead"); + } else if (.@mob_ran > 28 && .@mob_ran < 30) { + monster(.@map$, 0, 0, _("High Orc"), HIGH_ORC, .@mob_dead_num, instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead"); + } else if (.@mob_ran > 26 && .@mob_ran < 29) { + areamonster(.@map$, 157, 112, 167, 122, _("High Orc"), HIGH_ORC, .@mob_dead_num, instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead"); + if (rand(1, 10) == 9) + mapannounce(.@map$, _("Warning: High Orcs are gathering near area 3."), bc_map, "0xff4444"); + } else { + areamonster(.@map$, 173, 13, 183, 23, _("High Orc"), HIGH_ORC, .@mob_dead_num, instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead"); + if (rand(1, 5) == 3) + mapannounce(.@map$, _("Caution: The Forces have started to concentrate at the Shaman's Altar."), bc_map, "0x77ff77"); + if (rand(1, 70) == 50) + initnpctimer(); } } end; OnTimer10: - mapannounce instance_mapname("2@orcs"), "Voice from somewhere: Foolish... Do you really think the altar would fall like that?",bc_map,"0xff4444"; + mapannounce(instance_mapname("2@orcs"), _("Voice from somewhere: Foolish... Do you really think the altar would fall like that?"), bc_map, "0xff4444"); end; OnTimer4010: .@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; + mapannounce(.@map$, _("[ Wraiths were summoned by an unknown power ]"), bc_map, "0x77ff77"); + areamonster(.@map$, 167, 25, 177, 35, _("Wraith"), G_WRAITH, 30, instance_npcname("#2Resurrect Monsters1")+"::OnMyMobDead"); + stopnpctimer(); end; } @@ -579,40 +561,36 @@ OnTimer4010: end; OnInstanceInit: - disablenpc instance_npcname("#2Resurrect Monsters3"); + disablenpc(instance_npcname("#2Resurrect Monsters3")); end; OnEnable: - enablenpc instance_npcname("#2Resurrect Monsters3"); - monster instance_mapname("2@orcs"),0,0,"Orc Zombie",1153,15,instance_npcname("#2Resurrect Monsters3")+"::OnMyMobDead"; + enablenpc(instance_npcname("#2Resurrect Monsters3")); + monster(instance_mapname("2@orcs"), 0, 0, _("Orc Zombie"), ORC_ZOMBIE, 15, instance_npcname("#2Resurrect Monsters3")+"::OnMyMobDead"); end; OnMyMobDead: .@map$ = instance_mapname("2@orcs"); - .@mob_dead_num = 15 - mobcount(.@map$,instance_npcname("#2Resurrect Monsters3")+"::OnMyMobDead"); - .@mob_ran = rand(1,30); + .@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"; + monster(.@map$, 0, 0, _("Orc Archer"), ORC_ARCHER, .@mob_dead_num, instance_npcname("#2Resurrect Monsters3")+"::OnMyMobDead"); } - } - else if ((.@mob_ran > 6) && (.@mob_ran < 30)) { - if (.@mob_dead_num > 0) { - areamonster .@map$,168,10,184,26,"Orc Archer",1189,.@mob_dead_num,instance_npcname("#2Resurrect Monsters3")+"::OnMyMobDead"; - if (rand(1,15) == 3) { - mapannounce .@map$, "Warning: Orc Archer teams are gathering near the altar.",bc_map,"0xff4444"; - } - } - } - else { + } else if (.@mob_ran > 6 && .@mob_ran < 30) { if (.@mob_dead_num > 0) { - areamonster .@map$,168,21,184,21,"Orc Archer",1189,.@mob_dead_num,instance_npcname("#2Resurrect Monsters3")+"::OnMyMobDead"; + areamonster(.@map$, 168, 10, 184, 26, _("Orc Archer"), ORC_ARCHER, .@mob_dead_num, instance_npcname("#2Resurrect Monsters3")+"::OnMyMobDead"); + if (rand(1, 15) == 3) + mapannounce(.@map$, _("Warning: Orc Archer teams are gathering near the altar."), bc_map, "0xff4444"); } + } else { + if (.@mob_dead_num > 0) + areamonster(.@map$, 168, 21, 184, 21, _("Orc Archer"), ORC_ARCHER, .@mob_dead_num, instance_npcname("#2Resurrect Monsters3")+"::OnMyMobDead"); } end; OnDisable: - killmonster instance_mapname("2@orcs"),instance_npcname("#2Resurrect Monsters3")+"::OnMyMobDead"; + killmonster(instance_mapname("2@orcs"), instance_npcname("#2Resurrect Monsters3")+"::OnMyMobDead"); end; } @@ -620,21 +598,20 @@ OnDisable: end; OnInstanceInit: - enablenpc instance_npcname("#2Resurrect Monsters4"); - monster instance_mapname("2@orcs"),0,0,"Anopheles",1627,10,instance_npcname("#2Resurrect Monsters4")+"::OnMyMobDead"; + enablenpc(instance_npcname("#2Resurrect Monsters4")); + monster(instance_mapname("2@orcs"), 0, 0, _("Anopheles"), ANOPHELES, 10, instance_npcname("#2Resurrect Monsters4")+"::OnMyMobDead"); end; 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"; - } + .@mob_dead_num = 10 - mobcount(.@map$, instance_npcname("#2Resurrect Monsters4")+"::OnMyMobDead"); + if (.@mob_dead_num > 0) + monster(.@map$, 0, 0, _("Anopheles"), ANOPHELES, 1, instance_npcname("#2Resurrect Monsters4")+"::OnMyMobDead"); end; } 2@orcs,35,169,4 script Kruger#2-1 4_ORCWARRIOR,{ - donpcevent instance_npcname("Kruger#2-2")+"::OnEnable"; + donpcevent(instance_npcname("Kruger#2-2")+"::OnEnable"); end; } @@ -642,72 +619,73 @@ OnMyMobDead: end; OnInstanceInit: - disablenpc instance_npcname("Kruger#2-2"); + disablenpc(instance_npcname("Kruger#2-2")); end; OnEnable: - disablenpc instance_npcname("Kruger#2-1"); - enablenpc instance_npcname("Kruger#2-2"); - initnpctimer; + disablenpc(instance_npcname("Kruger#2-1")); + enablenpc(instance_npcname("Kruger#2-2")); + initnpctimer(); end; OnTimer10: - mapannounce instance_mapname("2@orcs"), "Kruger's Whisper: I'll tell you how to get to the Shaman's altar.",bc_map,"0xffff00"; + mapannounce(instance_mapname("2@orcs"), _("Kruger's Whisper: I'll tell you how to get to the Shaman's altar."), bc_map, C_YELLOW); end; OnTimer3510: - mapannounce instance_mapname("2@orcs"), "Kruger's Whisper: Do you see the braziers that light the path? Unseal the next zone by strengthening their flames.",bc_map,"0xffff00"; + mapannounce(instance_mapname("2@orcs"), _("Kruger's Whisper: Do you see the braziers that light the path? Unseal the next zone by strengthening their flames."), bc_map, C_YELLOW); end; OnTimer10710: - mapannounce instance_mapname("2@orcs"), "Kruger's Whisper: Of course those monsters won't let you touch the braziers that easily.",bc_map,"0xffff00"; + mapannounce(instance_mapname("2@orcs"), _("Kruger's Whisper: Of course those monsters won't let you touch the braziers that easily."), bc_map, C_YELLOW); end; OnTimer16310: - mapannounce instance_mapname("2@orcs"), "Kruger's Whisper: But still, try keep the battles not too noticable so the Shaman won't guard the altar with her army squad.",bc_map,"0xffff00"; + mapannounce(instance_mapname("2@orcs"), _("Kruger's Whisper: But still, try keep the battles not too noticable so the Shaman won't guard the altar with her army squad."), bc_map, C_YELLOW); end; OnTimer21910: - mapannounce instance_mapname("2@orcs"), "Kruger's Whisper: Only the Party Leader can strengthen the flames, so protect your leader.",bc_map,"0xffff00"; + mapannounce(instance_mapname("2@orcs"), _("Kruger's Whisper: Only the Party Leader can strengthen the flames, so protect your leader."), bc_map, C_YELLOW); end; OnTimer23910: - mapannounce instance_mapname("2@orcs"), "Mission: Unseal the zone by lighting the braziers. They can only be lit in a certain order, so be careful.",bc_map,"0x4444ff"; - donpcevent instance_npcname("#2Resurrect Monsters1")+"::OnEnable"; - donpcevent instance_npcname("#2Resurrect Monsters3")+"::OnEnable"; - donpcevent instance_npcname("Torch#1-1")+"::OnEnable"; - disablenpc instance_npcname("Kruger#2-2"); + mapannounce(instance_mapname("2@orcs"), _("Mission: Unseal the zone by lighting the braziers. They can only be lit in a certain order, so be careful."), bc_map, "0x4444ff"); + donpcevent(instance_npcname("#2Resurrect Monsters1")+"::OnEnable"); + donpcevent(instance_npcname("#2Resurrect Monsters3")+"::OnEnable"); + donpcevent(instance_npcname("Torch#1-1")+"::OnEnable"); + disablenpc(instance_npcname("Kruger#2-2")); end; } 2@orcs,26,164,0 script Torch#1-1 CLEAR_NPC,{ - if(getpartyleader(getcharid(CHAR_ID_PARTY),2) != getcharid(CHAR_ID_CHAR)) end; - progressbar "ffff00",5; - setarray .@id[0], atoi(charat(strnpcinfo(NPC_NAME_HIDDEN),0)), atoi(charat(strnpcinfo(NPC_NAME_HIDDEN),2)); + if (getpartyleader(getcharid(CHAR_ID_PARTY), 2) != getcharid(CHAR_ID_CHAR)) + end; + progressbar(sprintf("0x%x", C_YELLOW), 5); + setarray(.@id[0], atoi(charat(strnpcinfo(NPC_NAME_HIDDEN), 0)), atoi(charat(strnpcinfo(NPC_NAME_HIDDEN), 2))); if (.@id[1] == 4) - donpcevent instance_npcname("#Warp2-"+.@id[0])+"::OnEnable"; + donpcevent(instance_npcname("#Warp2-"+.@id[0])+"::OnEnable"); else - donpcevent instance_npcname("Torch#"+.@id[0]+"-"+(.@id[1]+1))+"::OnEnable"; - initnpctimer; - disablenpc instance_npcname(strnpcinfo(NPC_NAME)); + donpcevent(instance_npcname("Torch#"+.@id[0]+"-"+(.@id[1]+1))+"::OnEnable"); + initnpctimer(); + disablenpc(instance_npcname(strnpcinfo(NPC_NAME))); end; OnInstanceInit: if (strnpcinfo(NPC_NAME) != "Torch#2-1" && strnpcinfo(NPC_NAME) != "Torch#3-1") - disablenpc instance_npcname(strnpcinfo(NPC_NAME)); + disablenpc(instance_npcname(strnpcinfo(NPC_NAME))); end; OnEnable: - enablenpc instance_npcname(strnpcinfo(NPC_NAME)); + enablenpc(instance_npcname(strnpcinfo(NPC_NAME))); end; OnTimer100: - specialeffect EF_FIREPILLAR; + specialeffect(EF_FIREPILLAR); end; OnTimer2000: - specialeffect EF_FIREPILLARBOMB; - stopnpctimer; + specialeffect(EF_FIREPILLARBOMB); + stopnpctimer(); end; } 2@orcs,55,155,0 duplicate(Torch#1-1) Torch#1-2 CLEAR_NPC @@ -716,27 +694,27 @@ OnTimer2000: 2@orcs,48,100,0 script #Warp2-1 WARPNPC,3,3,{ OnInstanceInit: - disablenpc instance_npcname("#Warp2-1"); + disablenpc(instance_npcname("#Warp2-1")); end; OnEnable: .@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"; + monster(.@map$, 109, 156, _("Safeguard Chief"), I_HIGH_ORC, 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; OnContinue: - enablenpc instance_npcname("#Warp2-1"); - initnpctimer; + enablenpc(instance_npcname("#Warp2-1")); + initnpctimer(); end; OnTimer10000: - areamonster instance_mapname("2@orcs"),28,158,40,170,"Safeguard Chief",1981,1,instance_npcname("#Mobs Control")+"::OnMyMobDead1"; - stopnpctimer; + areamonster(instance_mapname("2@orcs"), 28, 158, 40, 170, _("Safeguard Chief"), I_HIGH_ORC, 1, instance_npcname("#Mobs Control")+"::OnMyMobDead1"); + stopnpctimer(); end; OnTouch: - warp instance_mapname("2@orcs"),47,93; + warp(instance_mapname("2@orcs"), 47, 93); end; } @@ -747,27 +725,27 @@ OnTouch: 2@orcs,101,55,0 script #Warp2-2 WARPNPC,3,3,{ OnInstanceInit: - disablenpc instance_npcname("#Warp2-2"); + disablenpc(instance_npcname("#Warp2-2")); end; OnEnable: .@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"; + monster(.@map$, 67, 64, _("Orc Sniper"), I_ORC_ARCHER, 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; OnContinue: - enablenpc instance_npcname("#Warp2-2"); - initnpctimer; + enablenpc(instance_npcname("#Warp2-2")); + initnpctimer(); end; OnTimer10000: - areamonster instance_mapname("2@orcs"),40,91,52,103,"Orc Sniper",1982,1,instance_npcname("#Mobs Control")+"::OnMyMobDead2"; - stopnpctimer; + areamonster(instance_mapname("2@orcs"), 40, 91, 52, 103, _("Orc Sniper"), I_ORC_ARCHER, 1, instance_npcname("#Mobs Control")+"::OnMyMobDead2"); + stopnpctimer(); end; OnTouch: - warp instance_mapname("2@orcs"),107,55; + warp(instance_mapname("2@orcs"), 107, 55); end; } @@ -778,41 +756,41 @@ OnTouch: 2@orcs,167,104,0 script #Warp2-3 WARPNPC,3,3,{ OnInstanceInit: - disablenpc instance_npcname("#Warp2-3"); + disablenpc(instance_npcname("#Warp2-3")); end; OnEnable: .@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"; + monster(.@map$, 152, 147, _("Depraved Orc Spirit"), I_ORC_SKELETON, 1, instance_npcname("#Mobs Control")+"::OnMyMobDead3"); + mapannounce(.@map$, _("Depraved Orc Spirit: I smell flesh! Hungry! Wanna try some human meat!!"), bc_map, "0xff8888"); end; OnContinue: - areamonster instance_mapname("2@orcs"),117,61,129,73,"Depraved Orc Spirit",1983,1; - donpcevent instance_npcname("#Boss Control")+"::OnEnable"; - enablenpc instance_npcname("#Warp2-3"); - initnpctimer; + areamonster(instance_mapname("2@orcs"), 117, 61, 129, 73, _("Depraved Orc Spirit"), I_ORC_SKELETON, 1); + donpcevent(instance_npcname("#Boss Control")+"::OnEnable"); + enablenpc(instance_npcname("#Warp2-3")); + initnpctimer(); end; OnTimer10: - mapannounce instance_mapname("2@orcs"), "Shaman Cargalache: Hahaha!! So, you finally made it here. The assassin you sent was just terrible. That stupid Orc is getting cold under my feet.",bc_map,"0xffff00"; + mapannounce(instance_mapname("2@orcs"), _("Shaman Cargalache: Hahaha!! So, you finally made it here. The assassin you sent was just terrible. That stupid Orc is getting cold under my feet."), bc_map, C_YELLOW); end; OnTimer6810: - mapannounce instance_mapname("2@orcs"), "Shaman Cargalache: My loyal slave, go get those intruders!",bc_map,"0xffff00"; + mapannounce(instance_mapname("2@orcs"), _("Shaman Cargalache: My loyal slave, go get those intruders!"), bc_map, C_YELLOW); end; OnTimer10310: - mapannounce instance_mapname("2@orcs"), "Depraved Orc Hero: Whatever you say, my lord.",bc_map,"0xff7777"; + mapannounce(instance_mapname("2@orcs"), _("Depraved Orc Hero: Whatever you say, my lord."), bc_map, "0xff7777"); end; OnTimer13110: - mapannounce instance_mapname("2@orcs"), "Caution: You have been discovered by Shaman Cargalache. Kruger's plan to assassinate the Shaman has failed. You must defeat Cargalache and find traces of Kruger.",bc_map,"0x8888ff"; - stopnpctimer; + mapannounce(instance_mapname("2@orcs"), _("Caution: You have been discovered by Shaman Cargalache. Kruger's plan to assassinate the Shaman has failed. You must defeat Cargalache and find traces of Kruger."), bc_map, "0x8888ff"); + stopnpctimer(); end; OnTouch: - warp instance_mapname("2@orcs"),167,95; + warp(instance_mapname("2@orcs"), 167, 95); end; } @@ -820,93 +798,87 @@ OnTouch: end; OnInstanceInit: - disablenpc instance_npcname("#Boss Control"); + disablenpc(instance_npcname("#Boss Control")); end; OnEnable: .@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"); + monster(.@map$, 185, 8, _("Shaman Cargalache"), I_ORC_LADY, 1, instance_npcname("#Boss Control")+"::OnMyMobDead"); + monster(.@map$, 179, 15, _("Depraved Orc Hero"), ORK_HERO, 1); + enablenpc(instance_npcname("#Boss Control")); end; OnMyMobDead: - donpcevent instance_npcname("Kruger#")+"::OnEnable"; + donpcevent(instance_npcname("Kruger#")+"::OnEnable"); .@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"; - } - else if (.@mob_ran == 2) { - mapannounce .@map$, "Shaman Cargalache: How is it that I've been overpowered by mere humans!",bc_map,"0xffff00"; - } - else if (.@mob_ran == 3) { - mapannounce .@map$, "Shaman Cargalache: This... This can't be the end...",bc_map,"0xffff00"; - } - else if (.@mob_ran == 4) { - mapannounce .@map$, "Shaman Cargalache: I... Can't die... Yet...!",bc_map,"0xffff00"; - } - else { - mapannounce .@map$, "Shaman Cargalache: Defeated by these fools... It can't be happening...!",bc_map,"0xffff00"; - } - donpcevent instance_npcname("#2Resurrect Monsters1")+"::OnDisable"; - donpcevent instance_npcname("#2Resurrect Monsters3")+"::OnDisable"; - donpcevent instance_npcname("#Warp Outside Orc Dun")+"::OnEnable"; + .@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, C_YELLOW); + else if (.@mob_ran == 2) + mapannounce(.@map$, _("Shaman Cargalache: How is it that I've been overpowered by mere humans!"), bc_map, C_YELLOW); + else if (.@mob_ran == 3) + mapannounce(.@map$, _("Shaman Cargalache: This... This can't be the end..."), bc_map, C_YELLOW); + else if (.@mob_ran == 4) + mapannounce(.@map$, _("Shaman Cargalache: I... Can't die... Yet...!"), bc_map, C_YELLOW); + else + mapannounce(.@map$, _("Shaman Cargalache: Defeated by these fools... It can't be happening...!"), bc_map, C_YELLOW); + donpcevent(instance_npcname("#2Resurrect Monsters1")+"::OnDisable"); + donpcevent(instance_npcname("#2Resurrect Monsters3")+"::OnDisable"); + donpcevent(instance_npcname("#Warp Outside Orc Dun")+"::OnEnable"); end; } 2@orcs,182,8,0 script #Warp Outside Orc Dun WARPNPC,3,3,{ OnInstanceInit: - disablenpc instance_npcname("#Warp Outside Orc Dun"); + disablenpc(instance_npcname("#Warp Outside Orc Dun")); end; OnEnable: - enablenpc instance_npcname("#Warp Outside Orc Dun"); + enablenpc(instance_npcname("#Warp Outside Orc Dun")); end; OnTouch: - warp "gef_fild10",240,197; + warp("gef_fild10", 240, 197); end; } 2@orcs,172,13,0 script Kruger# 4_ORCWARRIOR2,{ if (yong_odun < 2) { - mes "[Kruger]"; - mes "*Coughing*"; - mes ""+strcharinfo(PC_NAME)+", it's you..."; - next; - mes "["+strcharinfo(PC_NAME)+"] "; - mes "Don't move! You are wounded!"; - next; - mes "[Kruger]"; - mes "It's... all right.. I'm dying..."; - mes "...."; - mes "The Shaman? What about the Shaman?"; - next; - mes "["+strcharinfo(PC_NAME)+"] "; - mes "The Shaman's dead now. Who was that Shaman really?"; - next; - mes "Kruger seemed to be relieved as he hears of the death of the Shaman, but you notice the bitter expression on his face."; - next; - mes "[Kruger]"; - mes "I.. I just couldn't kill my own daughter..."; - 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..."; + mes("[Kruger]"); + mes("*Coughing*"); + mesf("%s, it's you...", strcharinfo(PC_NAME)); + next(); + mesf("[%s]", strcharinfo(PC_NAME)); + mes("Don't move! You are wounded!"); + next(); + mes("[Kruger]"); + mes("It's... all right.. I'm dying..."); + mes("...."); + mes("The Shaman? What about the Shaman?"); + next(); + mesf("[%s]", strcharinfo(PC_NAME)); + mes("The Shaman's dead now. Who was that Shaman really?"); + next(); + mes("Kruger seemed to be relieved as he hears of the death of the Shaman, but you notice the bitter expression on his face."); + next(); + mes("[Kruger]"); + mes("I.. I just couldn't kill my own daughter..."); + 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..."); yong_odun = 2; - close; - } - else { - mes "You can see the dead body of Kruger, peacefully lying on the ground."; - close; + close(); + } else { + mes("You can see the dead body of Kruger, peacefully lying on the ground."); + close(); } OnInstanceInit: - disablenpc instance_npcname("Kruger#"); + disablenpc(instance_npcname("Kruger#")); end; OnEnable: - enablenpc instance_npcname("Kruger#"); + enablenpc(instance_npcname("Kruger#")); end; } @@ -914,14 +886,14 @@ OnEnable: end; OnMyMobDead1: - donpcevent instance_npcname("#Warp2-1")+"::OnContinue"; + donpcevent(instance_npcname("#Warp2-1")+"::OnContinue"); end; OnMyMobDead2: - donpcevent instance_npcname("#Warp2-2")+"::OnContinue"; + donpcevent(instance_npcname("#Warp2-2")+"::OnContinue"); end; OnMyMobDead3: - donpcevent instance_npcname("#Warp2-3")+"::OnContinue"; + donpcevent(instance_npcname("#Warp2-3")+"::OnContinue"); end; } diff --git a/npc/instances/SealedShrine.txt b/npc/instances/SealedShrine.txt index 1b1022dcf..3bc3d951a 100644 --- a/npc/instances/SealedShrine.txt +++ b/npc/instances/SealedShrine.txt @@ -37,65 +37,64 @@ //== Sealed Catacomb Entrance ============================== monk_test,309,146,3 script Friar Patrick#edq 4_M_OLDFRIAR,{ - cutin "ins_cata_pri_n",2; - mes "[Friar Patrick]"; - mes "The peace of this world cannot last forever... The hands of Evil are reaching into the world again..."; - next; - mes "[Friar Patrick]"; - mes "What brought you to this place?"; - next; + cutin("ins_cata_pri_n", 2); + mes("[Friar Patrick]"); + mes("The peace of this world cannot last forever... The hands of Evil are reaching into the world again..."); + next(); + mes("[Friar Patrick]"); + mes("What brought you to this place?"); + next(); if (countitem(Bapho_Doll) > 0) { .@doll = 1; .@selection = select("What is this place?", "I want to enter.", "About the Cursed Baphomet Doll.", "Cancel."); - } - else { + } else { .@selection = select("What is this place?", "I want to enter.", "Cancel."); } - switch(.@selection) { + switch (.@selection) { case 1: - mes "[Friar Patrick]"; - mes "Huh... Don't you know? This is St. Capitolina Monastery where the Brothers who wish to become monks train and pray."; - next; - mes "[Friar Patrick]"; - mes "And this place is... What can I say... Yes. It's the grave of the Devil. Grave..."; - next; - mes "[Friar Patrick]"; - mes "The very place where the great Devil who once demolished this world is sleeping."; - next; - switch(select("Tell me more.", "Stop talking.")) { + mes("[Friar Patrick]"); + mes("Huh... Don't you know? This is St. Capitolina Monastery where the Brothers who wish to become monks train and pray."); + next(); + mes("[Friar Patrick]"); + mes("And this place is... What can I say... Yes. It's the grave of the Devil. Grave..."); + next(); + mes("[Friar Patrick]"); + mes("The very place where the great Devil who once demolished this world is sleeping."); + next(); + switch (select("Tell me more.", "Stop talking.")) { case 1: - cutin "ins_cata_pri_n",2; - mes "[Friar Patrick]"; - mes "Baphomet... is the name of the Devil... I think you have heard of his name."; - next; - mes "[Friar Patrick]"; - mes "Numerous brave men and brothers have trained in this monastery..."; - next; - mes "[Friar Patrick]"; - mes "Under this gravestone in front of you... Baphomet is sealed."; - next; - mes "[Friar Patrick]"; - mes "But... As we speak Satan Morocc is marshalling his powerful magic in order to affect all life on this continent."; - next; - mes "[Friar Patrick]"; - mes "Baphomet also... has awakened and is preparing for his revival, into this world, by weakening the power of the seal through the power of Satan Morocc..."; - next; - mes "[Friar Patrick]"; - mes "Now... I'm looking for someone brave enough to reseal Baphomet in its shrine... as we once did many years ago..."; - next; - mes "[Friar Patrick]"; - mes "Anyone who fights for good will know, deep inside, that evil is threatening to conquer this world..."; - next; - mes "[Friar Patrick]"; - mes "Train more and use your skills to protect the world from evil's looming presence..."; + cutin("ins_cata_pri_n", 2); + mes("[Friar Patrick]"); + mes("Baphomet... is the name of the Devil... I think you have heard of his name."); + next(); + mes("[Friar Patrick]"); + mes("Numerous brave men and brothers have trained in this monastery..."); + next(); + mes("[Friar Patrick]"); + mes("Under this gravestone in front of you... Baphomet is sealed."); + next(); + mes("[Friar Patrick]"); + mes("But... As we speak Satan Morocc is marshalling his powerful magic in order to affect all life on this continent."); + next(); + mes("[Friar Patrick]"); + mes("Baphomet also... has awakened and is preparing for his revival, into this world, by weakening the power of the seal through the power of Satan Morocc..."); + next(); + mes("[Friar Patrick]"); + mes("Now... I'm looking for someone brave enough to reseal Baphomet in its shrine... as we once did many years ago..."); + next(); + mes("[Friar Patrick]"); + mes("Anyone who fights for good will know, deep inside, that evil is threatening to conquer this world..."); + next(); + mes("[Friar Patrick]"); + mes("Train more and use your skills to protect the world from evil's looming presence..."); break; case 2: - cutin "ins_cata_pri_n",2; - mes "[Friar Patrick]"; - mes "Anyone who fights for good will know, deep inside, that evil is threatening to conquer this world..."; - next; - mes "[Friar Patrick]"; - mes "Train more and use your skills to protect the world from evil's looming presence..."; + cutin("ins_cata_pri_n", 2); + mes("[Friar Patrick]"); + mes("Anyone who fights for good will know, deep inside, that evil is threatening to conquer this world..."); + next(); + mes("[Friar Patrick]"); + mes("Train more and use your skills to protect the world from evil's looming presence..."); break; } break; @@ -104,332 +103,327 @@ monk_test,309,146,3 script Friar Patrick#edq 4_M_OLDFRIAR,{ .@party_id = getcharid(CHAR_ID_PARTY); - mes "[Friar Patrick]"; - mes "Do you mean you'll go to the shrine and reseal Baphomet?"; - next; + mes("[Friar Patrick]"); + mes("Do you mean you'll go to the shrine and reseal Baphomet?"); + next(); // 12 hour cooldown - .@ins_bapho_check = questprogress(3040,PLAYTIME); + .@ins_bapho_check = questprogress(3040, PLAYTIME); // Two hour play limit - //.@ins_bapho_check2 = questprogress(3045,PLAYTIME); + //.@ins_bapho_check2 = questprogress(3045, PLAYTIME); if (!.@ins_bapho_check) { - if (getpartyleader(.@party_id,2) == getcharid(CHAR_ID_CHAR) && instance_check_party(.@party_id,2,75)) { - mes "[Friar Patrick]"; - mes "Party name is "+getpartyname(.@party_id)+"..."; - mes "Name of the leader is "+strcharinfo(PC_NAME)+"..."; - .@instance = instance_create("Sealed Catacomb",.@party_id); + if (getpartyleader(.@party_id, 2) == getcharid(CHAR_ID_CHAR) && instance_check_party(.@party_id, 2, 75)) { + mes("[Friar Patrick]"); + mesf("Party name is %s...", getpartyname(.@party_id)); + mesf("Name of the leader is %s...", strcharinfo(PC_NAME)); + .@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 { + mes("Umm... But it seems that there is a problem here... I'll check quickly. Please wait."); + } else { for (.@i = 1; .@i <= 2; .@i++) { - if( instance_attachmap(.@i + "@cata", .@instance) == "" ) { - mes "Failed to attach "+.@i+"@cata as a map!"; + if (instance_attachmap(.@i + "@cata", .@instance) == "") { + mesf("Failed to attach %d@cata as a map!", .@i); instance_destroy(.@instance); - close; + close(); } } - instance_set_timeout 7200,300,.@instance; + instance_set_timeout(7200, 300, .@instance); instance_init(.@instance); - mes "Okay... I'll adjust the shrine's seal so that you and your group can enter."; - next; - mes "[Friar Patrick]"; - mes "You will see a sign when the seal has broken. Please wait until the sign appears..."; - next; - mes "[Friar Patrick]"; - mes "When you see the sign, put your hands on the gravestone... Then you can move inside."; - next; - mes "[Friar Patrick]"; - mes "One thing that you should remember is... Anyone who enters this shrine will be cursed by Baphomet and cannot enter or leave while they are cursed."; - next; - mes "[Friar Patrick]"; - mes "And one more thing... In this cursed area, some skills, which are protected by outer physical power are prohibited by the effect of the seal."; - next; - mes "[Friar Patrick]"; - mes "For example, the skills like ^0000FFSafety Wall and Assumptio^000000... So you'd better prepare before entering the shrine."; + mes("Okay... I'll adjust the shrine's seal so that you and your group can enter."); + next(); + mes("[Friar Patrick]"); + mes("You will see a sign when the seal has broken. Please wait until the sign appears..."); + next(); + mes("[Friar Patrick]"); + mes("When you see the sign, put your hands on the gravestone... Then you can move inside."); + next(); + mes("[Friar Patrick]"); + mes("One thing that you should remember is... Anyone who enters this shrine will be cursed by Baphomet and cannot enter or leave while they are cursed."); + next(); + mes("[Friar Patrick]"); + mes("And one more thing... In this cursed area, some skills, which are protected by outer physical power are prohibited by the effect of the seal."); + next(); + mes("[Friar Patrick]"); + mes("For example, the skills like ^0000FFSafety Wall and Assumptio^000000... So you'd better prepare before entering the shrine."); } + } else { + mes("[Friar Patrick]"); + mes("Umm... I recognize your courage, but... I can't permit anyone to enter this place. I can only permit the leader of a party to enter first."); + next(); + mes("[Friar Patrick]"); + 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 { - mes "[Friar Patrick]"; - mes "Umm... I recognize your courage, but... I can't permit anyone to enter this place. I can only permit the leader of a party to enter first."; - next; - mes "[Friar Patrick]"; - 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 == 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."); + } else if (.@ins_bapho_check == 2) { + mes("[Friar Patrick]"); + mes("Umm... It seems that Baphomet's Curse has weakened. I can remove it now."); + next(); + mes("[Friar Patrick]"); + mes("Haaaaaaap... Hocus Pocus Wingardium Abracadabra!!!!!"); + next(); + erasequest(3040); + 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."); } - 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."; - } - else if (.@ins_bapho_check == 2) { - mes "[Friar Patrick]"; - mes "Umm... It seems that Baphomet's Curse has weakened. I can remove it now."; - next; - mes "[Friar Patrick]"; - mes "Haaaaaaap... Hocus Pocus Wingardium Abracadabra!!!!!"; - next; - erasequest 3040; - 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."; - } - } - else { - mes "[Friar Patrick]"; - mes "Umm... You should train more to enter this dangerous place... You should reach at least Lv 75 to enter here."; - next; - mes "[Friar Patrick]"; - mes "Please train more and come again."; + } else { + mes("[Friar Patrick]"); + mes("Umm... You should train more to enter this dangerous place... You should reach at least Lv 75 to enter here."); + next(); + mes("[Friar Patrick]"); + mes("Please train more and come again."); } break; case 3: if (.@doll == 1) { - mes "[Friar Patrick]"; - mes "That is... the villainous doll that you are holding... Let me see it."; - next; - mes "[Friar Patrick]"; - mes "... ... ..."; - next; - mes "[Friar Patrick]"; - mes "That's correct... I can feel Baphomet's evil inside... So, what will you do with the doll?"; - next; - mes "[Friar Patrick]"; - mes "It is just a dangerous and useless thing if you do nothing with it... I'll introduce someone who can help you... Do you want to see him?"; - next; - mes "[Friar Patrick]"; - mes "Go to see ^0000FFRust Blackhand^000000 who is near the main building of the monastery... He will make this doll helpful to you."; - setquest 3042; + mes("[Friar Patrick]"); + mes("That is... the villainous doll that you are holding... Let me see it."); + next(); + mes("[Friar Patrick]"); + mes("... ... ..."); + next(); + mes("[Friar Patrick]"); + mes("That's correct... I can feel Baphomet's evil inside... So, what will you do with the doll?"); + next(); + mes("[Friar Patrick]"); + mes("It is just a dangerous and useless thing if you do nothing with it... I'll introduce someone who can help you... Do you want to see him?"); + next(); + mes("[Friar Patrick]"); + mes("Go to see ^0000FFRust Blackhand^000000 who is near the main building of the monastery... He will make this doll helpful to you."); + setquest(3042); break; } case 4: - mes "[Friar Patrick]"; - mes "Anyone who fights for good will know, deep inside, that evil is threatening to conquer this world..."; - next; - mes "[Friar Patrick]"; - mes "Train more and use your skills to protect the world from evil's looming presence..."; + mes("[Friar Patrick]"); + mes("Anyone who fights for good will know, deep inside, that evil is threatening to conquer this world..."); + next(); + mes("[Friar Patrick]"); + mes("Train more and use your skills to protect the world from evil's looming presence..."); break; } - close2; - cutin "",255; + close2(); + cutin("", 255); end; } monk_test,306,151,3 script Grave of Baphomet#edq HIDDEN_NPC,{ - if (countitem(Token_Of_Apostle)) delitem Token_Of_Apostle,countitem(Token_Of_Apostle); - mes "This gravestone has a carving of a wicked devil with large horns. It arouses an ominous feeling."; - next; - if(select("Touch the stone.", "Step back.") == 2) - close; + if (countitem(Token_Of_Apostle)) + delitem(Token_Of_Apostle, countitem(Token_Of_Apostle)); + mes("This gravestone has a carving of a wicked devil with large horns. It arouses an ominous feeling."); + next(); + if (select("Touch the stone.", "Step back.") == 2) + close(); // 12 hour cooldown - .@ins_bapho_check = questprogress(3040,PLAYTIME); + .@ins_bapho_check = questprogress(3040, PLAYTIME); // Two hour play limit - //.@ins_bapho_check2 = questprogress(3045,PLAYTIME); + //.@ins_bapho_check2 = questprogress(3045, PLAYTIME); if (!.@ins_bapho_check) { if (has_instance("1@cata") == "") { - mes "It's cold to the touch. It doesn't respond."; - close; + mes("It's cold to the touch. It doesn't respond."); + close(); } else { - mapannounce "monk_test","[" + strcharinfo(PC_NAME) + "] member of the [" + getpartyname(.@party_id) + "] party has entered the Sealed Shrine.",bc_map,"0x00ff99"; - setquest 3040; - warp "1@cata",100,224; + mapannounce("monk_test", sprintf(_$("[%s] member of the [%s] party has entered the Sealed Shrine."), strcharinfo(PC_NAME), getpartyname(.@party_id)), bc_map, C_SPRINGGREEN); + setquest(3040); + warp("1@cata", 100, 224); end; } } 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."; - close; + 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."); + close(); } else if (.@ins_bapho_check == 2) { - mes "[Friar Patrick]"; - mes "Umm... It seems the curse of Baphomet weakened. I'll clear the bad curse."; - next; - mes "[Friar Patrick]"; - mes "Haaaaaaap... Wingardium Leviosa Expecto Patronum !!!!!"; + mes("[Friar Patrick]"); + mes("Umm... It seems the curse of Baphomet weakened. I'll clear the bad curse."); + next(); + mes("[Friar Patrick]"); + mes("Haaaaaaap... Wingardium Leviosa Expecto Patronum !!!!!"); specialeffect(EF_HOLYHIT, AREA, playerattached()); - erasequest 3040; - 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."; - close; + erasequest(3040); + 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."); + close(); } } prt_monk,261,91,3 script Rust Blackhand#edq 4_M_DWARF,{ .@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; + 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 == 1) { - mes "[Rust Blackhand]"; - mes "Did you bring all of the ingredients?"; - next; - if (countitem(Bapho_Doll) && countitem(Magestic_Goat) && (countitem(Dark_Crystal) > 29) && (countitem(Dark_Debris) > 49) && (Zeny >= 990000)) { - mes "[Rust Blackhand]"; - mes "kkk... You prepared the ingredients well. Why don't you leave it there and wait?"; - next; - mes "[Rust Blackhand]"; - mes "Hmm... It's been such a long time since I last saw these wicked horns... kkk... Let me start..."; - next; - mes "..."; - next; - mes "... ..."; - next; - mes "... ... ..."; - next; - delitem Bapho_Doll,1; - delitem Magestic_Goat,1; - delitem Dark_Crystal,30; - delitem Dark_Debris,50; + mes("[Rust Blackhand]"); + mes("Did you bring all of the ingredients?"); + next(); + if (countitem(Bapho_Doll) && countitem(Magestic_Goat) && countitem(Dark_Crystal) > 29 && countitem(Dark_Debris) > 49 && Zeny >= 990000) { + mes("[Rust Blackhand]"); + mes("kkk... You prepared the ingredients well. Why don't you leave it there and wait?"); + next(); + mes("[Rust Blackhand]"); + mes("Hmm... It's been such a long time since I last saw these wicked horns... kkk... Let me start..."); + next(); + mes("..."); + next(); + mes("... ..."); + next(); + mes("... ... ..."); + next(); + delitem(Bapho_Doll, 1); + delitem(Magestic_Goat, 1); + delitem(Dark_Crystal, 30); + delitem(Dark_Debris, 50); Zeny -= 990000; - completequest 3043; - getitem L_Magestic_Goat,1; - mes "[Rust Blackhand]"; - mes "It's done. You may be excited, of course. I understand..."; - next; - mes "[Rust Blackhand]"; - mes "I don't accept complaints or A/S requests, so use it with care. I must go..."; - close; - } - else { - mes "[Rust Blackhand]"; - mes "Huu... You don't understand what I said. You cannot make anything with these ingredients."; - next; - mes "[Rust Blackhand]"; - mes "I'll tell you the ingredients one more time, so please gather them correctly."; - next; - mes "[Rust Blackhand]"; - mes "^0000FFCursed Baphomet Doll, Magestic Goat, 30 Crystal of Darkness, 50 Fragment of Darkness^000000, and the most important, production cost is ^0000FF990000^000000 Zeny."; - close; + completequest(3043); + getitem(L_Magestic_Goat, 1); + mes("[Rust Blackhand]"); + mes("It's done. You may be excited, of course. I understand..."); + next(); + mes("[Rust Blackhand]"); + mes("I don't accept complaints or A/S requests, so use it with care. I must go..."); + close(); + } else { + mes("[Rust Blackhand]"); + mes("Huu... You don't understand what I said. You cannot make anything with these ingredients."); + next(); + mes("[Rust Blackhand]"); + mes("I'll tell you the ingredients one more time, so please gather them correctly."); + next(); + mes("[Rust Blackhand]"); + mes("^0000FFCursed Baphomet Doll, Magestic Goat, 30 Crystal of Darkness, 50 Fragment of Darkness^000000, and the most important, production cost is ^0000FF990000^000000 Zeny."); + close(); } - } - else if (!.@new_maje && countitem(Bapho_Doll) > 0) { - switch(select("About the Cursed Baphomet Doll", "Stop talking.")) { + } else if (!.@new_maje && countitem(Bapho_Doll) > 0) { + switch (select("About the Cursed Baphomet Doll", "Stop talking.")) { case 1: - mes "[Rust Blackhand]"; - mes "What?... Hmmm... Did you get the doll? You're pretty good, unlike your appearance..."; - next; - mes "[Rust Blackhand]"; - mes "Let me see... Needless to say, Patric must have sent you here to deal with the doll, right?"; - next; - mes "[Rust Blackhand]"; - mes "Cool... I'll help you make the evil doll useful. What? What can I do?"; - next; - mes "[Rust Blackhand]"; - mes "I can make the strong and large horns of the wicked devil Baphomet for you. A helm that has his immense power."; - next; - mes "[Rust Blackhand]"; - mes "It is called the ^4d4dffGigantic Magestic Goat^000000. You'll realize that the Magestic Goat you're familiar with is nothing in comparison."; - next; - mes "[Rust Blackhand]"; - mes "The Cursed Baphomet Doll is the most important ingredient... I'll make you if you want. What would you like to do?"; - next; - switch(select("I want to make one!", "I don't need one.")) { + mes("[Rust Blackhand]"); + mes("What?... Hmmm... Did you get the doll? You're pretty good, unlike your appearance..."); + next(); + mes("[Rust Blackhand]"); + mes("Let me see... Needless to say, Patric must have sent you here to deal with the doll, right?"); + next(); + mes("[Rust Blackhand]"); + mes("Cool... I'll help you make the evil doll useful. What? What can I do?"); + next(); + mes("[Rust Blackhand]"); + mes("I can make the strong and large horns of the wicked devil Baphomet for you. A helm that has his immense power."); + next(); + mes("[Rust Blackhand]"); + mes("It is called the ^4d4dffGigantic Magestic Goat^000000. You'll realize that the Magestic Goat you're familiar with is nothing in comparison."); + next(); + mes("[Rust Blackhand]"); + mes("The Cursed Baphomet Doll is the most important ingredient... I'll make you if you want. What would you like to do?"); + next(); + switch (select("I want to make one!", "I don't need one.")) { case 1: - mes "[Rust Blackhand]"; - mes "kkk... Yes, wise men take their chances when the opportunity comes. I'll tell you the ingredients. Don't forget, and bring them all."; - next; - mes "[Rust Blackhand]"; - mes "^0000FFCursed Baphomet Doll, Magestic Goat, 30 Crystal of Darkness, 50 Fragment of Darkness^000000, and the most important, production cost is ^0000FF990000^000000 Zeny."; - next; - mes "[Rust Blackhand]"; - mes "You can get the Magestic Goat from the weak Baphomet in the Labyrinth Forest. Crystal of Darkness and Fragment of Darkness are from the Incarnation of Morocc."; - next; - mes "[Rust Blackhand]"; - mes "I'm sure that you can get the ingredients because you sealed the real Baphomet. Can't you? kkk..."; - next; - mes "[Rust Blackhand]"; - mes "You'll never know how great this hat is until you get one. If you understood, go and get the ingredients."; + mes("[Rust Blackhand]"); + mes("kkk... Yes, wise men take their chances when the opportunity comes. I'll tell you the ingredients. Don't forget, and bring them all."); + next(); + mes("[Rust Blackhand]"); + mes("^0000FFCursed Baphomet Doll, Magestic Goat, 30 Crystal of Darkness, 50 Fragment of Darkness^000000, and the most important, production cost is ^0000FF990000^000000 Zeny."); + next(); + mes("[Rust Blackhand]"); + mes("You can get the Magestic Goat from the weak Baphomet in the Labyrinth Forest. Crystal of Darkness and Fragment of Darkness are from the Incarnation of Morocc."); + next(); + mes("[Rust Blackhand]"); + mes("I'm sure that you can get the ingredients because you sealed the real Baphomet. Can't you? kkk..."); + next(); + mes("[Rust Blackhand]"); + mes("You'll never know how great this hat is until you get one. If you understood, go and get the ingredients."); if (questprogress(3042)) - erasequest 3042; - setquest 3043; - close; + erasequest(3042); + setquest(3043); + close(); case 2: - mes "[Rust Blackhand]"; - mes "Huh... Do you? Do whatever you want... Do you really want to let this opportunity go to waste?"; - next; - mes "[Rust Blackhand]"; - mes "Tut, tut... I don't care if the wicked doll threatens your life all the time!"; - close; + mes("[Rust Blackhand]"); + mes("Huh... Do you? Do whatever you want... Do you really want to let this opportunity go to waste?"); + next(); + mes("[Rust Blackhand]"); + mes("Tut, tut... I don't care if the wicked doll threatens your life all the time!"); + close(); } case 2: - mes "[Rust Blackhand]"; - mes "What a dull boy he is... huh..."; - close; + mes("[Rust Blackhand]"); + mes("What a dull boy he is... huh..."); + close(); } - } - else if (!.@new_maje && !countitem(Bapho_Doll)) { - 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(Bapho_Doll)) { - switch(select("About the Cursed Baphomet Doll", "Stop talking.")) { + } else if (!.@new_maje && !countitem(Bapho_Doll)) { + 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(Bapho_Doll)) { + switch (select("About the Cursed Baphomet Doll", "Stop talking.")) { case 1: - mes "[Rust Blackhand]"; - mes "What?... You again? What do you want this time?"; - next; - mes "[Rust Blackhand]"; - mes "What? You got another doll from the wicked devil? Umm... You're much better than I thought..."; - next; - mes "[Rust Blackhand]"; - mes "Alright... I'll help you again."; - next; - mes "[Rust Blackhand]"; - mes "If you want to make the doll into a ^4d4dffGigantic Magestic Goat^000000 again, I can make you another."; - next; - mes "[Rust Blackhand]"; - mes "I'll tell you the ingredients again. So, do you want to make?"; - next; - switch(select("I want.", "No, I don't want.")) { + mes("[Rust Blackhand]"); + mes("What?... You again? What do you want this time?"); + next(); + mes("[Rust Blackhand]"); + mes("What? You got another doll from the wicked devil? Umm... You're much better than I thought..."); + next(); + mes("[Rust Blackhand]"); + mes("Alright... I'll help you again."); + next(); + mes("[Rust Blackhand]"); + mes("If you want to make the doll into a ^4d4dffGigantic Magestic Goat^000000 again, I can make you another."); + next(); + mes("[Rust Blackhand]"); + mes("I'll tell you the ingredients again. So, do you want to make?"); + next(); + switch (select("I want.", "No, I don't want.")) { case 1: - mes "[Rust Blackhand]"; - mes "kkk... Yes, wise men take their chances when the opportunity comes. I'll tell you the ingredients. Don't forget, and bring them all."; - next; - mes "[Rust Blackhand]"; - mes "^0000FFCursed Baphomet Doll, Magestic Goat, 30 Crystal of Darkness, 50 Fragment of Darkness^000000, and the most important, production cost is ^0000FF990000^000000 Zeny."; - next; - mes "[Rust Blackhand]"; - mes "You can get the Magestic Goat from the weak Baphomet in the Labyrinth Forest. Crystal of Darkness and Fragment of Darkness are from the Incarnation of Morocc."; - next; - mes "[Rust Blackhand]"; - mes "I'm sure that you can get the ingredients because you sealed the real Baphomet. Can't you? kkk..."; - next; - mes "[Rust Blackhand]"; - mes "You'll never know how great this hat is until you get one. If you understood, go and get the ingredients."; + mes("[Rust Blackhand]"); + mes("kkk... Yes, wise men take their chances when the opportunity comes. I'll tell you the ingredients. Don't forget, and bring them all."); + next(); + mes("[Rust Blackhand]"); + mes("^0000FFCursed Baphomet Doll, Magestic Goat, 30 Crystal of Darkness, 50 Fragment of Darkness^000000, and the most important, production cost is ^0000FF990000^000000 Zeny."); + next(); + mes("[Rust Blackhand]"); + mes("You can get the Magestic Goat from the weak Baphomet in the Labyrinth Forest. Crystal of Darkness and Fragment of Darkness are from the Incarnation of Morocc."); + next(); + mes("[Rust Blackhand]"); + mes("I'm sure that you can get the ingredients because you sealed the real Baphomet. Can't you? kkk..."); + next(); + mes("[Rust Blackhand]"); + mes("You'll never know how great this hat is until you get one. If you understood, go and get the ingredients."); if (questprogress(3042)) - erasequest 3042; - erasequest 3043; - setquest 3043; - close; + erasequest(3042); + erasequest(3043); + setquest(3043); + close(); case 2: - mes "[Rust Blackhand]"; - mes "Huh... Do you? Do whatever you want... Do you really want to let this opportunity go to waste?"; - next; - mes "[Rust Blackhand]"; - mes "Tut, tut... I don't care if the wicked doll threatens your life all the time!"; - close; + mes("[Rust Blackhand]"); + mes("Huh... Do you? Do whatever you want... Do you really want to let this opportunity go to waste?"); + next(); + mes("[Rust Blackhand]"); + mes("Tut, tut... I don't care if the wicked doll threatens your life all the time!"); + close(); } case 2: - mes "[Rust Blackhand]"; - mes "What a dull boy he is... huh..."; - close; + mes("[Rust Blackhand]"); + mes("What a dull boy he is... huh..."); + close(); } - } - else if (.@new_maje == 2 && !countitem(Bapho_Doll)) { - mes "[Rust Blackhand]"; - mes "Why are you hanging around here? If you don't want a ^4d4dffGigantic Magestic Goat^000000, go away."; - close; + } else if (.@new_maje == 2 && !countitem(Bapho_Doll)) { + mes("[Rust Blackhand]"); + mes("Why are you hanging around here? If you don't want a ^4d4dffGigantic Magestic Goat^000000, go away."); + close(); } } @@ -437,18 +431,17 @@ prt_monk,261,91,3 script Rust Blackhand#edq 4_M_DWARF,{ 1@cata,1,2,0 script ins_baphomet_lotto FAKE_NPC,{ OnInstanceInit: // Pick one "true" Gravestone and 12 "false" Gravestones. - .@true = rand(1,13); - for (.@i = 1; .@i <= 13; ++.@i) { - disablenpc instance_npcname("Gravestone#1F_"+.@i+((.@i == .@true)?"T":"F")); - } - disablenpc instance_npcname("ins_baphomet_lotto"); + .@true = rand(1, 13); + for (.@i = 1; .@i <= 13; ++.@i) + disablenpc(instance_npcname("Gravestone#1F_"+.@i+((.@i == .@true)?"T":"F"))); + disablenpc(instance_npcname("ins_baphomet_lotto")); end; } 1@cata,3,2,0 script ins_baphomet_lotto2 FAKE_NPC,{ OnEnable: for (.@i = 1; .@i <= 12; ++.@i) - enablenpc instance_npcname("Bobbing Torch#"+.@i); + enablenpc(instance_npcname("Bobbing Torch#"+.@i)); end; } @@ -456,33 +449,32 @@ OnEnable: OnEnable: .@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$; - monster .@map$,0,0,"Apostle of Baphomet",1291,1,.@label$; - 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$; - monster .@map$,0,0,"Apostle of Baphomet",1132,1,.@label$; - monster .@map$,0,0,"Apostle of Baphomet",1117,1,.@label$; - monster .@map$,0,0,"Apostle of Baphomet",1132,1,.@label$; - monster .@map$,0,0,"Apostle of Baphomet",1117,1,.@label$; - monster .@map$,0,0,"Apostle of Baphomet",1132,1,.@label$; - monster .@map$,0,0,"Apostle of Baphomet",1291,1,.@label$; - monster .@map$,0,0,"Apostle of Baphomet",1117,1,.@label$; - monster .@map$,0,0,"Apostle of Baphomet",1869,1,.@label$; + monster(.@map$, 0, 0, _("Apostle of Baphomet"), FLAME_SKULL, 1, .@label$); + monster(.@map$, 0, 0, _("Apostle of Baphomet"), WRAITH_DEAD, 1, .@label$); + monster(.@map$, 0, 0, _("Apostle of Baphomet"), FLAME_SKULL, 1, .@label$); + monster(.@map$, 0, 0, _("Apostle of Baphomet"), WRAITH_DEAD, 1, .@label$); + monster(.@map$, 0, 0, _("Apostle of Baphomet"), FLAME_SKULL, 1, .@label$); + monster(.@map$, 0, 0, _("Apostle of Baphomet"), WRAITH_DEAD, 1, .@label$); + monster(.@map$, 0, 0, _("Apostle of Baphomet"), FLAME_SKULL, 1, .@label$); + monster(.@map$, 0, 0, _("Apostle of Baphomet"), KHALITZBURG, 1, .@label$); + monster(.@map$, 0, 0, _("Apostle of Baphomet"), EVIL_DRUID, 1, .@label$); + monster(.@map$, 0, 0, _("Apostle of Baphomet"), KHALITZBURG, 1, .@label$); + monster(.@map$, 0, 0, _("Apostle of Baphomet"), EVIL_DRUID, 1, .@label$); + monster(.@map$, 0, 0, _("Apostle of Baphomet"), KHALITZBURG, 1, .@label$); + monster(.@map$, 0, 0, _("Apostle of Baphomet"), WRAITH_DEAD, 1, .@label$); + monster(.@map$, 0, 0, _("Apostle of Baphomet"), EVIL_DRUID, 1, .@label$); + monster(.@map$, 0, 0, _("Apostle of Baphomet"), FLAME_SKULL, 1, .@label$); end; OnDisable: - killmonster instance_mapname("1@cata"),instance_npcname("ins_baphomet_lotto3")+"::OnMyMobDead"; + killmonster(instance_mapname("1@cata"), instance_npcname("ins_baphomet_lotto3")+"::OnMyMobDead"); end; OnMyMobDead: .@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"; - } - getitem Token_Of_Apostle,1; + if (mobcount(.@map$, instance_npcname("ins_baphomet_lotto3")+"::OnMyMobDead") < 1) + mapannounce(.@map$, _("All apostles of Baphomet are dead!"), bc_map, C_SPRINGGREEN); + getitem(Token_Of_Apostle, 1); end; } @@ -490,102 +482,98 @@ OnMyMobDead: 1@cata,141,221,0 script Gravestone# CLEAR_NPC,3,3,{ .@party_id = getcharid(CHAR_ID_PARTY); if ('ins_baphomet == 0) { - mes "The gravestone is trembling..."; - next; - mes "When touching the gravestone, I hear a voice."; - next; + mes("The gravestone is trembling..."); + next(); + mes("When touching the gravestone, I hear a voice."); + next(); specialeffect(EF_CONE, AREA, playerattached()); - mes "[Voice of the Gravestone]"; - mes "I have waited and waited for a brave adventurer like you who will come back here again..."; - next; - while(1) { - switch(select("Who are you?", "Waited for me?", "Cancel.")) { + mes("[Voice of the Gravestone]"); + mes("I have waited and waited for a brave adventurer like you who will come back here again..."); + next(); + while (true) { + switch (select("Who are you?", "Waited for me?", "Cancel.")) { case 1: - mes "[Voice of the Gravestone]"; - mes "I was one of the warriors to stop Baphomet like you. Now, I'm dead and only my soul remains..."; - next; - mes "[Voice of the Gravestone]"; - mes "As you know... We don't have much time. You can't stop Baphomet by yourselves. The power of the devil has strengthened over the years."; - next; - mes "[Voice of the Gravestone]"; - mes "In the past, my companions and I sealed Baphomet at the altar located on the 2nd basement and blocked the entrance."; - next; - mes "[Voice of the Gravestone]"; - mes "I moved my soul's essence to my pendant, so that I could remain in this world. That's when I became this grave's guardian."; - next; + mes("[Voice of the Gravestone]"); + mes("I was one of the warriors to stop Baphomet like you. Now, I'm dead and only my soul remains..."); + next(); + mes("[Voice of the Gravestone]"); + mes("As you know... We don't have much time. You can't stop Baphomet by yourselves. The power of the devil has strengthened over the years."); + next(); + mes("[Voice of the Gravestone]"); + mes("In the past, my companions and I sealed Baphomet at the altar located on the 2nd basement and blocked the entrance."); + next(); + mes("[Voice of the Gravestone]"); + mes("I moved my soul's essence to my pendant, so that I could remain in this world. That's when I became this grave's guardian."); + next(); break; case 2: - mes "[Voice of the Gravestone]"; - mes "Baphomet's power is about to break the seal that we made. If you don't reactivate them... Baphomet's revival will only be a matter of time."; - next; - mes "[Voice of the Gravestone]"; - mes "To open the entrance, you must substantialize my soul. I'll open the entrance and reactivate the weakened seals after I am substantilized."; - next; - mes "[Voice of the Gravestone]"; - mes "To substantialize my soul, you should find my pendant. You can find my body near a grave here."; - next; - mes "[Voice of the Gravestone]"; - mes "If your ^0000FFparty leader^000000 brings me the pendant, my soul can be substantialized. So, hurry up."; + mes("[Voice of the Gravestone]"); + mes("Baphomet's power is about to break the seal that we made. If you don't reactivate them... Baphomet's revival will only be a matter of time."); + next(); + mes("[Voice of the Gravestone]"); + mes("To open the entrance, you must substantialize my soul. I'll open the entrance and reactivate the weakened seals after I am substantilized."); + next(); + mes("[Voice of the Gravestone]"); + mes("To substantialize my soul, you should find my pendant. You can find my body near a grave here."); + next(); + mes("[Voice of the Gravestone]"); + mes("If your ^0000FFparty leader^000000 brings me the pendant, my soul can be substantialized. So, hurry up."); 'ins_baphomet = 1; - close; + close(); case 3: - mes "I can feel the voice becoming faint."; - close; + mes("I can feel the voice becoming faint."); + close(); } } - } - else if ('ins_baphomet == 1) { - mes "[Voice of the Gravestone]"; - mes "To open the entrance, you must substantialize my soul. I'll open the entrance and reactivate the weakened seals after I am substantilized."; - next; - mes "[Voice of the Gravestone]"; - mes "To substantialize my soul, you should find my pendant. You can find my body near a grave here."; - next; - mes "[Voice of the Gravestone]"; - mes "If your ^0000FFparty leader^000000 brings me the pendant, my soul can be substantialized. So, hurry up."; - close; - } - else if (('ins_baphomet == 2) && (getpartyleader(.@party_id,2) == getcharid(CHAR_ID_CHAR))) { - mes "[Voice of the Gravestone]"; - mes "Did you find the pendant?"; - next; + } else if ('ins_baphomet == 1) { + mes("[Voice of the Gravestone]"); + mes("To open the entrance, you must substantialize my soul. I'll open the entrance and reactivate the weakened seals after I am substantilized."); + next(); + mes("[Voice of the Gravestone]"); + mes("To substantialize my soul, you should find my pendant. You can find my body near a grave here."); + next(); + mes("[Voice of the Gravestone]"); + mes("If your ^0000FFparty leader^000000 brings me the pendant, my soul can be substantialized. So, hurry up."); + close(); + } else if ('ins_baphomet == 2 && getpartyleader(.@party_id, 2) == getcharid(CHAR_ID_CHAR)) { + mes("[Voice of the Gravestone]"); + mes("Did you find the pendant?"); + next(); if (countitem(Soul_Pendant) > 0) { - specialeffect EF_MAPPILLAR; - mes "[Voice of the Gravestone]"; - mes "Yes... This is... My pendant..."; - next; - delitem Soul_Pendant,1; - enablenpc instance_npcname("Ancient Hero's Soul#1F"); - disablenpc instance_npcname("Gravestone#"); - mes "[Voice of the Gravestone]"; - mes "Now I can substantialize my soul. I'll wait for you in front of the altar of fire located at the center of this grave. Let's meet there."; - next; - mapannounce instance_mapname("1@cata"), "Ancient Hero's Soul : I'll wait for you in front of the altar of fire located at the center",bc_map,"0xFFFF00"; - mes "I can feel the voice becoming faint."; - close; - } - else { - mes "[Voice of the Gravestone]"; - mes "Are you still there? Bring back my pendant as soon as possible."; - next; - mes "[Voice of the Gravestone]"; - mes "You can find my body near a grave here. Go and get my pendant there."; - close; + specialeffect(EF_MAPPILLAR); + mes("[Voice of the Gravestone]"); + mes("Yes... This is... My pendant..."); + next(); + delitem(Soul_Pendant, 1); + enablenpc(instance_npcname("Ancient Hero's Soul#1F")); + disablenpc(instance_npcname("Gravestone#")); + mes("[Voice of the Gravestone]"); + mes("Now I can substantialize my soul. I'll wait for you in front of the altar of fire located at the center of this grave. Let's meet there."); + next(); + mapannounce(instance_mapname("1@cata"), _("Ancient Hero's Soul : I'll wait for you in front of the altar of fire located at the center"), bc_map, C_YELLOW); + mes("I can feel the voice becoming faint."); + close(); + } else { + mes("[Voice of the Gravestone]"); + mes("Are you still there? Bring back my pendant as soon as possible."); + next(); + mes("[Voice of the Gravestone]"); + mes("You can find my body near a grave here. Go and get my pendant there."); + close(); } - } - else { - mes "[Voice of the Gravestone]"; - mes "I want to talk to ^0000FFa representative among your party^000000. Everyone else, wait here."; - close; + } else { + mes("[Voice of the Gravestone]"); + mes("I want to talk to ^0000FFa representative among your party^000000. Everyone else, wait here."); + close(); } end; OnTouch: if ('ins_baphomet == 0) { - mes "'Krrrr... Krrrr...'"; - next; - mes "I can feel something odd at the grave. It's like someone is calling out silently..."; - close; + mes("'Krrrr... Krrrr...'"); + next(); + mes("I can feel something odd at the grave. It's like someone is calling out silently..."); + close(); } end; @@ -596,220 +584,210 @@ OnInstanceInit: // Temporary fix for @reloadscript. 1@cata,176,119,4 script Ancient Hero's Soul#1F 4_M_CHAMPSOUL,{ .@party_id = getcharid(CHAR_ID_PARTY); - cutin "ins_cata_champ_n",2; + cutin("ins_cata_champ_n", 2); if ('ins_baphomet == 2) { - mes "[Ancient Hero's Soul]"; - mes "With your help, my soul can be substantialized. I want to talk more, but we do not have enough time..."; - next; - mes "[Ancient Hero's Soul]"; - mes "I must be substantialized within the next hour. To reach the Main Altar underground, you must help me perform the ceremony for opening each seal."; - next; - mes "[Ancient Hero's Soul]"; - mes "Now I'll tell you what should you do. First, collect ^0000FFEssence of Fire^000000 from the torches on the graves..."; - next; - mes "[Ancient Hero's Soul]"; - mes "Second, all members who will enter the underground must carry a symbol, called the Token of Apostle."; - next; - while(1) { - 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.")) { + mes("[Ancient Hero's Soul]"); + mes("With your help, my soul can be substantialized. I want to talk more, but we do not have enough time..."); + next(); + mes("[Ancient Hero's Soul]"); + mes("I must be substantialized within the next hour. To reach the Main Altar underground, you must help me perform the ceremony for opening each seal."); + next(); + mes("[Ancient Hero's Soul]"); + mes("Now I'll tell you what should you do. First, collect ^0000FFEssence of Fire^000000 from the torches on the graves..."); + next(); + mes("[Ancient Hero's Soul]"); + mes("Second, all members who will enter the underground must carry a symbol, called the Token of Apostle."); + next(); + while (true) { + 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: ++.@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; - mes "[Ancient Hero's Soul]"; - mes "To open the sealed underground gate, I must be purified by the ^0000FFEssence of Fire^000000 which has the power of Thor. Collect ^0000FF10 Essence of Fire^000000 from the torches."; - next; - mes "[Ancient Hero's Soul]"; - mes "One thing you must remember is... ^0000FFEssence of Fire^000000 can only be collected by the Inheritor of Faith."; - next; - mes "[Ancient Hero's Soul]"; - mes "I'll give the token of the Inheritor of Faith to the party leader. Only the party leader can collect the ^0000FFEssence of Fire^000000."; - next; + 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(); + mes("[Ancient Hero's Soul]"); + mes("To open the sealed underground gate, I must be purified by the ^0000FFEssence of Fire^000000 which has the power of Thor. Collect ^0000FF10 Essence of Fire^000000 from the torches."); + next(); + mes("[Ancient Hero's Soul]"); + mes("One thing you must remember is... ^0000FFEssence of Fire^000000 can only be collected by the Inheritor of Faith."); + next(); + mes("[Ancient Hero's Soul]"); + mes("I'll give the token of the Inheritor of Faith to the party leader. Only the party leader can collect the ^0000FFEssence of Fire^000000."); + next(); break; case 2: ++.@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; - mes "[Ancient Hero's Soul]"; - mes "However, Baphomet never gave up. He continuously strengthened his power. And his power has brought new life to this shrine."; - next; - mes "[Ancient Hero's Soul]"; - mes "Some of these monsters have magical powers. Baphomet calls them his 'Apostles'."; - next; - mes "[Ancient Hero's Soul]"; - mes "The apostles are cloning themselves to fill the shrine with their evil energy. They are the monsters here in this catacomb."; - next; - mes "[Ancient Hero's Soul]"; - mes "Kill the Apostles. They can only be distinguished from their clones because they will possess a ^0000FFToken of Apostle^000000..."; - next; - mes "[Ancient Hero's Soul]"; - mes "If each party member possesses a ^0000FFToken of Apostle^000000, Baphomet will not be able to perceive your entrance to the Main Altar underground."; - next; - mes "[Ancient Hero's Soul]"; - mes "If Baphomet perceives you when you pass through the sealed gate, he may release his tremendous magical power. Then, this abbey will be demolished."; - next; - mes "[Ancient Hero's Soul]"; - mes "Kill the apostles and get the ^0000FFToken of Apostle^000000."; - next; + 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(); + mes("[Ancient Hero's Soul]"); + mes("However, Baphomet never gave up. He continuously strengthened his power. And his power has brought new life to this shrine."); + next(); + mes("[Ancient Hero's Soul]"); + mes("Some of these monsters have magical powers. Baphomet calls them his 'Apostles'."); + next(); + mes("[Ancient Hero's Soul]"); + mes("The apostles are cloning themselves to fill the shrine with their evil energy. They are the monsters here in this catacomb."); + next(); + mes("[Ancient Hero's Soul]"); + mes("Kill the Apostles. They can only be distinguished from their clones because they will possess a ^0000FFToken of Apostle^000000..."); + next(); + mes("[Ancient Hero's Soul]"); + mes("If each party member possesses a ^0000FFToken of Apostle^000000, Baphomet will not be able to perceive your entrance to the Main Altar underground."); + next(); + mes("[Ancient Hero's Soul]"); + mes("If Baphomet perceives you when you pass through the sealed gate, he may release his tremendous magical power. Then, this abbey will be demolished."); + next(); + mes("[Ancient Hero's Soul]"); + mes("Kill the apostles and get the ^0000FFToken of Apostle^000000."); + next(); break; case 3: ++.@ins_baphomet_1f_3; - if (getpartyleader(.@party_id,2) == getcharid(CHAR_ID_CHAR)) { - 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."; - next; - mes "[Ancient Hero's Soul]"; - mes "Now I'll carve you the symbol which shows you're a inheritor of faith. Be aware that no one in your party but you can collect the Essence of Fire."; - next; + if (getpartyleader(.@party_id, 2) == getcharid(CHAR_ID_CHAR)) { + 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."); + next(); + mes("[Ancient Hero's Soul]"); + mes("Now I'll carve you the symbol which shows you're a inheritor of faith. Be aware that no one in your party but you can collect the Essence of Fire."); + next(); specialeffect(EF_HOLYHIT, AREA, playerattached()); - mes "[Ancient Hero's Soul]"; - mes "You should also carry a ^0000FFToken of Apostle^000000, so find one for yourself too."; - next; - mes "[Ancient Hero's Soul]"; - mes "When all of you are ready to go, let me know. I'll open the sealed gate when you're ready."; - next; - } - else { - mes "[Ancient Hero's Soul]"; - mes "Make sure that your party leader has listened to my explanation of what you and your companions must do."; - next; - mes "[Ancient Hero's Soul]"; - mes "Kill the Apostles of Baphomet and find their ^0000FFToken of Apostle^000000."; - next; - mes "[Ancient Hero's Soul]"; - mes "It might be better to kill all of them because there is no way to differentiate them from their clones."; - next; - mes "[Ancient Hero's Soul]"; - mes "Are you ready?"; - mes "Make sure that you have listened to all that I have to say before saying that you are ready."; - next; + mes("[Ancient Hero's Soul]"); + mes("You should also carry a ^0000FFToken of Apostle^000000, so find one for yourself too."); + next(); + mes("[Ancient Hero's Soul]"); + mes("When all of you are ready to go, let me know. I'll open the sealed gate when you're ready."); + next(); + } else { + mes("[Ancient Hero's Soul]"); + mes("Make sure that your party leader has listened to my explanation of what you and your companions must do."); + next(); + mes("[Ancient Hero's Soul]"); + mes("Kill the Apostles of Baphomet and find their ^0000FFToken of Apostle^000000."); + next(); + mes("[Ancient Hero's Soul]"); + mes("It might be better to kill all of them because there is no way to differentiate them from their clones."); + next(); + mes("[Ancient Hero's Soul]"); + mes("Are you ready?"); + mes("Make sure that you have listened to all that I have to say before saying that you are ready."); + next(); } break; case 4: - if ((.@ins_baphomet_1f_1 > 0) && (.@ins_baphomet_1f_2 > 0) && (.@ins_baphomet_1f_3 > 0)) { - cutin "ins_cata_champ_n",2; - mes "[Ancient Hero's Soul]"; - mes "Are you ready to go? Then I'll open this sealed gate now."; - next; + if (.@ins_baphomet_1f_1 > 0 && .@ins_baphomet_1f_2 > 0 && .@ins_baphomet_1f_3 > 0) { + cutin("ins_cata_champ_n", 2); + mes("[Ancient Hero's Soul]"); + mes("Are you ready to go? Then I'll open this sealed gate now."); + next(); .@exitloop = 1; - } - else { - cutin "ins_cata_champ_a",2; - mes "[Ancient Hero's Soul]"; - mes "It may be difficult but I wish you luck braving the perils of this catacomb."; - next; - mes "[Ancient Hero's Soul]"; - mes "Remember, you need to collect ^0000FF10 Essence of Fire^000000 from the torches and the ^0000FFToken of Apostle^000000 from the Apostles of Baphomet."; - next; + } else { + cutin("ins_cata_champ_a", 2); + mes("[Ancient Hero's Soul]"); + mes("It may be difficult but I wish you luck braving the perils of this catacomb."); + next(); + mes("[Ancient Hero's Soul]"); + mes("Remember, you need to collect ^0000FF10 Essence of Fire^000000 from the torches and the ^0000FFToken of Apostle^000000 from the Apostles of Baphomet."); + next(); } break; } - if (.@exitloop) break; + if (.@exitloop) + break; } - if (getpartyleader(.@party_id,2) == getcharid(CHAR_ID_CHAR)) { - 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!"; + if (getpartyleader(.@party_id, 2) == getcharid(CHAR_ID_CHAR)) { + 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!"); '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"; - } - 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."; + donpcevent(instance_npcname("ins_baphomet_1f_timer")+"::OnEnable"); + donpcevent(instance_npcname("ins_baphomet_lotto2")+"::OnEnable"); + donpcevent(instance_npcname("ins_baphomet_lotto3")+"::OnEnable"); + } 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."); //'ins_baphomet = 3; } - close2; - cutin "",255; + close2(); + cutin("", 255); end; - } - else if (('ins_baphomet == 3) && (getpartyleader(.@party_id,2) == getcharid(CHAR_ID_CHAR))) { - cutin "ins_cata_champ_n",2; - mes "[Ancient Hero's Soul]"; - mes "Did you get 10 ^0000FFEssence of Fire^000000 and ^0000FFToken of Apostle^000000?"; - next; - if ((countitem(Essence_Of_Fire) > 9) && (countitem(Token_Of_Apostle) > 0)) { - delitem Essence_Of_Fire,countitem(Essence_Of_Fire); + } else if ('ins_baphomet == 3 && getpartyleader(.@party_id, 2) == getcharid(CHAR_ID_CHAR)) { + cutin("ins_cata_champ_n", 2); + mes("[Ancient Hero's Soul]"); + mes("Did you get 10 ^0000FFEssence of Fire^000000 and ^0000FFToken of Apostle^000000?"); + next(); + if (countitem(Essence_Of_Fire) > 9 && countitem(Token_Of_Apostle) > 0) { + delitem(Essence_Of_Fire, countitem(Essence_Of_Fire)); '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."; - } - else { - mes "[Ancient Hero's Soul]"; - mes "Not ready yet? You should prepare 10 ^0000FFEssence of Fire^000000 and ^0000FFToken of Apostle^000000."; + 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."); + } else { + mes("[Ancient Hero's Soul]"); + mes("Not ready yet? You should prepare 10 ^0000FFEssence of Fire^000000 and ^0000FFToken of Apostle^000000."); } - close2; - cutin "",255; + close2(); + cutin("", 255); end; - } - else if ('ins_baphomet == 3) { - cutin "ins_cata_champ_n",2; - mes "[Ancient Hero's Soul]"; - mes "Do you have a ^0000FFToken of Apostle^000000?"; - next; + } else if ('ins_baphomet == 3) { + cutin("ins_cata_champ_n", 2); + mes("[Ancient Hero's Soul]"); + mes("Do you have a ^0000FFToken of Apostle^000000?"); + next(); if (countitem(Token_Of_Apostle) > 0) { '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."; - } - else { - mes "[Ancient Hero's Soul]"; - mes "Not ready yet? You should prepare ^0000FFToken of Apostle^000000."; + 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."); + } else { + mes("[Ancient Hero's Soul]"); + mes("Not ready yet? You should prepare ^0000FFToken of Apostle^000000."); } - close2; - cutin "",255; + close2(); + cutin("", 255); end; - } - else if (('ins_baphomet == 4) && (getpartyleader(.@party_id,2) == getcharid(CHAR_ID_CHAR))) { - cutin "ins_cata_champ_n",2; - 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; + } else if ('ins_baphomet == 4 && getpartyleader(.@party_id, 2) == getcharid(CHAR_ID_CHAR)) { + cutin("ins_cata_champ_n", 2); + 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(); 'ins_baphomet = 5; - specialeffect EF_TELEPORTATION; - enablenpc instance_npcname("ins_bapho_to_2f"); - mes "[Ancient Hero's Soul]"; - mes "Now you can go to the main altar. It is located in the bottom right corner of this floor."; - next; - mes "[Ancient Hero's Soul]"; - mes "Your real battle will begin... I'll follow you soon and find a way to help you."; - next; - mes "[Ancient Hero's Soul]"; - mes "Go ahead, warriors."; - cutin "",255; - mapannounce instance_mapname("1@cata"), "Ancient Hero's Soul : Now you can go to the Main Altar's gate. It is located in the Southeast",bc_map,"0xFFFF00"; - close; - } - else if ('ins_baphomet == 4) { - cutin "ins_cata_champ_n",2; - 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; - mes "[Ancient Hero's Soul]"; - mes "I'll complete opening the sealed gate when your representative tells me that you're ready."; - cutin "",255; - close; - } - else if ('ins_baphomet == 5) { - cutin "ins_cata_champ_n",2; - mes "[Ancient Hero's Soul]"; - mes "What are you doing? The entrance of the main altar is opened now, go and fight! The entrance is near the bottom right side of this floor."; - cutin "",255; - close; - } - else { - cutin "ins_cata_champ_n",2; - mes "[Ancient Hero's Soul]"; - mes "I have nothing to say to you..."; - cutin "",255; - close; + specialeffect(EF_TELEPORTATION); + enablenpc(instance_npcname("ins_bapho_to_2f")); + mes("[Ancient Hero's Soul]"); + mes("Now you can go to the main altar. It is located in the bottom right corner of this floor."); + next(); + mes("[Ancient Hero's Soul]"); + mes("Your real battle will begin... I'll follow you soon and find a way to help you."); + next(); + mes("[Ancient Hero's Soul]"); + mes("Go ahead, warriors."); + cutin("", 255); + mapannounce(instance_mapname("1@cata"), _("Ancient Hero's Soul : Now you can go to the Main Altar's gate. It is located in the Southeast"), bc_map, C_YELLOW); + close(); + } else if ('ins_baphomet == 4) { + cutin("ins_cata_champ_n", 2); + 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(); + mes("[Ancient Hero's Soul]"); + mes("I'll complete opening the sealed gate when your representative tells me that you're ready."); + cutin("", 255); + close(); + } else if ('ins_baphomet == 5) { + cutin("ins_cata_champ_n", 2); + mes("[Ancient Hero's Soul]"); + mes("What are you doing? The entrance of the main altar is opened now, go and fight! The entrance is near the bottom right side of this floor."); + cutin("", 255); + close(); + } else { + cutin("ins_cata_champ_n", 2); + mes("[Ancient Hero's Soul]"); + mes("I have nothing to say to you..."); + cutin("", 255); + close(); } OnInstanceInit: - disablenpc instance_npcname("Ancient Hero's Soul#1F"); + disablenpc(instance_npcname("Ancient Hero's Soul#1F")); end; } @@ -817,38 +795,37 @@ OnInstanceInit: 1@cata,281,12,0 script ins_bapho_to_2f WARPNPC,1,1,{ OnTouch: if (countitem(Token_Of_Apostle) > 0) { - delitem Token_Of_Apostle,countitem(Token_Of_Apostle); + delitem(Token_Of_Apostle, countitem(Token_Of_Apostle)); 'ins_baphomet = 5; - warp instance_mapname("2@cata"),80,144; + warp(instance_mapname("2@cata"), 80, 144); end; - } - else { - mes "[Ancient Hero's Soul]"; - mes "Where is your Token of Apostle? I said you should carry the Token of Apostle to pass this gate."; - close; + } else { + mes("[Ancient Hero's Soul]"); + mes("Where is your Token of Apostle? I said you should carry the Token of Apostle to pass this gate."); + close(); } OnInstanceInit: - disablenpc instance_npcname("ins_bapho_to_2f"); + disablenpc(instance_npcname("ins_bapho_to_2f")); end; } //== Gravestones =========================================== - script Gravestone#SS1 FAKE_NPC,{ if ('ins_baphomet == 1) { - getitem Soul_Pendant,1; + getitem(Soul_Pendant, 1); 'ins_baphomet = 2; - mes "A small object is shining under a leaning grave."; - next; - mes "[" + strcharinfo(PC_NAME) + "]"; - mes "I think this is the pendant..."; - close; - } - else { - mes "I can only feel gloom from this Gravestone."; - close; + mes("A small object is shining under a leaning grave."); + next(); + mesf("[%s]", strcharinfo(PC_NAME)); + mes("I think this is the pendant..."); + close(); + } else { + mes("I can only feel gloom from this Gravestone."); + close(); } } + 1@cata,86,214,0 duplicate(Gravestone#SS1) Gravestone#1F_1T CLEAR_NPC 1@cata,200,209,0 duplicate(Gravestone#SS1) Gravestone#1F_2T CLEAR_NPC 1@cata,230,195,0 duplicate(Gravestone#SS1) Gravestone#1F_3T CLEAR_NPC @@ -864,9 +841,10 @@ OnInstanceInit: 1@cata,267,30,0 duplicate(Gravestone#SS1) Gravestone#1F_13T CLEAR_NPC - script Gravestone#SS2 FAKE_NPC,{ - mes "I can only feel gloom from this Gravestone."; - close; + mes("I can only feel gloom from this Gravestone."); + close(); } + 1@cata,86,214,0 duplicate(Gravestone#SS2) Gravestone#1F_1F CLEAR_NPC 1@cata,200,209,0 duplicate(Gravestone#SS2) Gravestone#1F_2F CLEAR_NPC 1@cata,230,195,0 duplicate(Gravestone#SS2) Gravestone#1F_3F CLEAR_NPC @@ -884,41 +862,39 @@ OnInstanceInit: //== Bobbing Torches ======================================= - script Bobbing Torch#SS FAKE_NPC,{ .@party_id = getcharid(CHAR_ID_PARTY); - if (getpartyleader(.@party_id,2) == getcharid(CHAR_ID_CHAR)) { - if (('ins_baphomet == 3) && (countitem(Essence_Of_Fire) < 11)) { - mes "A huge torch appearing as if it can burn everything is bobbing up and down in front of me."; - next; - mes "The grand appearance and heat of the fire makes me step back... But I pluck up my courage and reach out to pick up the torch."; - next; + if (getpartyleader(.@party_id, 2) == getcharid(CHAR_ID_CHAR)) { + if ('ins_baphomet == 3 && countitem(Essence_Of_Fire) < 11) { + mes("A huge torch appearing as if it can burn everything is bobbing up and down in front of me."); + next(); + mes("The grand appearance and heat of the fire makes me step back... But I pluck up my courage and reach out to pick up the torch."); + next(); specialeffect(EF_HOLYHIT, AREA, playerattached()); - getitem Essence_Of_Fire,1; - mes "The symbol of inheritor shines. Then a small crystal falls into my hand from the torch."; - disablenpc instance_npcname(strnpcinfo(NPC_NAME)); - close; - } - else if (('ins_baphomet == 3) && (countitem(Essence_Of_Fire) > 10)) { - mes "You have 10 Essence of Fire already, so you don't need to collect any more."; - close; - } - else { - mes "You don't need to collect Essence of Fire anymore."; - close; + getitem(Essence_Of_Fire, 1); + mes("The symbol of inheritor shines. Then a small crystal falls into my hand from the torch."); + disablenpc(instance_npcname(strnpcinfo(NPC_NAME))); + close(); + } else if ('ins_baphomet == 3 && countitem(Essence_Of_Fire) > 10) { + mes("You have 10 Essence of Fire already, so you don't need to collect any more."); + close(); + } else { + mes("You don't need to collect Essence of Fire anymore."); + close(); } - } - else { - mes "A huge torch appearing as if it can burn everything is bobbing up and down in front of me.."; - next; - mes "[Unknown Voice]"; - mes "You are not a inheritor of faith. Do not desecrate the Essence of Fire with your disrespectful hands."; + } else { + mes("A huge torch appearing as if it can burn everything is bobbing up and down in front of me.."); + next(); + mes("[Unknown Voice]"); + mes("You are not a inheritor of faith. Do not desecrate the Essence of Fire with your disrespectful hands."); specialeffect(EF_FIRESPLASHHIT, AREA, playerattached()); - percentheal -50,0; - close; + percentheal(-50, 0); + close(); } OnInstanceInit: - disablenpc instance_npcname(strnpcinfo(NPC_NAME)); + disablenpc(instance_npcname(strnpcinfo(NPC_NAME))); end; } + 1@cata,267,210,0 duplicate(Bobbing Torch#SS) Bobbing Torch#1 CLEAR_NPC 1@cata,85,182,0 duplicate(Bobbing Torch#SS) Bobbing Torch#2 CLEAR_NPC 1@cata,267,154,0 duplicate(Bobbing Torch#SS) Bobbing Torch#3 CLEAR_NPC @@ -934,186 +910,193 @@ OnInstanceInit: 1@cata,1,1,0 script ins_baphomet_1f_timer FAKE_NPC,{ OnInstanceInit: - disablenpc instance_npcname("ins_baphomet_1f_timer"); + disablenpc(instance_npcname("ins_baphomet_1f_timer")); end; OnEnable: - enablenpc instance_npcname("ins_baphomet_1f_timer"); - initnpctimer; + enablenpc(instance_npcname("ins_baphomet_1f_timer")); + initnpctimer(); end; OnDisable: - disablenpc instance_npcname("ins_baphomet_1f_timer"); - stopnpctimer; + disablenpc(instance_npcname("ins_baphomet_1f_timer")); + stopnpctimer(); end; OnTimer1800000: - mapannounce instance_mapname("1@cata"), "Ancient Hero's Soul : We don't have enough time! Hurry up!",bc_map,"0xFFFF00"; + mapannounce(instance_mapname("1@cata"), _("Ancient Hero's Soul : We don't have enough time! Hurry up!"), bc_map, C_YELLOW); end; OnTimer2400000: - mapannounce instance_mapname("1@cata"), "Ancient Hero's Soul : My body is disappearing... Hurry up!",bc_map,"0xFFFF00"; + mapannounce(instance_mapname("1@cata"), _("Ancient Hero's Soul : My body is disappearing... Hurry up!"), bc_map, C_YELLOW); end; OnTimer3000000: - mapannounce instance_mapname("1@cata"), "Ancient Hero's Soul : Everything is over... There is no other way but to wait for the next chance...",bc_map,"0xFFFF00"; + mapannounce(instance_mapname("1@cata"), _("Ancient Hero's Soul : Everything is over... There is no other way but to wait for the next chance..."), bc_map, C_YELLOW); end; OnTimer3050000: - mapannounce instance_mapname("1@cata"), "Ancient Hero's Soul : We failed... However... We still have a chance. I hope you will train yourselves until the time comes.",bc_map,"0xFFFF00"; + mapannounce(instance_mapname("1@cata"), _("Ancient Hero's Soul : We failed... However... We still have a chance. I hope you will train yourselves until the time comes."), bc_map, C_YELLOW); end; OnTimer3100000: - mapannounce instance_mapname("1@cata"), "You've failed to open the seal of main altar.",bc_map,"0xFFFF00"; + mapannounce(instance_mapname("1@cata"), _("You've failed to open the seal of main altar."), bc_map, C_YELLOW); end; OnTimer3500000: - instance_warpall "monk_test",310,150; - stopnpctimer; + instance_warpall("monk_test", 310, 150); + stopnpctimer(); end; } 2@cata,80,144,0 script ins_2f_enter FAKE_NPC,3,3,{ OnTouch: - donpcevent instance_npcname("ins_2f_enter_broad")+"::OnEnable"; - disablenpc instance_npcname("ins_2f_enter"); + donpcevent(instance_npcname("ins_2f_enter_broad")+"::OnEnable"); + disablenpc(instance_npcname("ins_2f_enter")); end; } 2@cata,1,1,0 script ins_2f_enter_broad FAKE_NPC,{ OnInstanceInit: OnDisable: - disablenpc instance_npcname("ins_2f_enter_broad"); + disablenpc(instance_npcname("ins_2f_enter_broad")); end; OnEnable: - enablenpc instance_npcname("ins_2f_enter_broad"); - initnpctimer; + enablenpc(instance_npcname("ins_2f_enter_broad")); + initnpctimer(); end; OnTimer10000: - mapannounce instance_mapname("2@cata"), "Baphomet : Humans... interfering again...",bc_map,"0xdb7093"; + mapannounce(instance_mapname("2@cata"), _("Baphomet : Humans... interfering again..."), bc_map, "0xdb7093"); end; OnTimer13000: - mapannounce instance_mapname("2@cata"), "Apostle of Baphomet : Humans! Humans have invaded our sanctum!",bc_map,"0xFFFF00"; + mapannounce(instance_mapname("2@cata"), _("Apostle of Baphomet : Humans! Humans have invaded our sanctum!"), bc_map, C_YELLOW); end; OnTimer16000: - mapannounce instance_mapname("2@cata"), "Apostle of Baphomet : Kill the humans! Do not stop the revival of our Master!",bc_map,"0xFFFF00"; + mapannounce(instance_mapname("2@cata"), _("Apostle of Baphomet : Kill the humans! Do not stop the revival of our Master!"), bc_map, C_YELLOW); end; OnTimer18000: - mapannounce instance_mapname("2@cata"), "Apostle of Baphomet : Hurry up and release the seals of the altars! Our Master's return is upon us!",bc_map,"0xFFFF00"; - stopnpctimer; - disablenpc instance_npcname("ins_2f_enter_broad"); + mapannounce(instance_mapname("2@cata"), _("Apostle of Baphomet : Hurry up and release the seals of the altars! Our Master's return is upon us!"), bc_map, C_YELLOW); + stopnpctimer(); + disablenpc(instance_npcname("ins_2f_enter_broad")); end; } 2@cata,50,67,0 script slave_left FAKE_NPC,5,5,{ OnTouch: .@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; - monster .@map$,58,67,"Apostle of Baphomet",1292,1; - monster .@map$,53,67,"Apostle of Baphomet",1291,1; - monster .@map$,54,67,"Apostle of Baphomet",1869,1; - monster .@map$,55,67,"Apostle of Baphomet",1291,1; - monster .@map$,56,67,"Apostle of Baphomet",1117,1; - monster .@map$,58,66,"Apostle of Baphomet",1869,1; - monster .@map$,56,66,"Apostle of Baphomet",1117,1; - monster .@map$,60,66,"Apostle of Baphomet",1132,1; - monster .@map$,59,66,"Apostle of Baphomet",1117,1; - monster .@map$,54,66,"Apostle of Baphomet",1132,1; - monster .@map$,55,66,"Apostle of Baphomet",1292,1; - monster .@map$,56,66,"Apostle of Baphomet",1132,1; - monster .@map$,50,65,"Apostle of Baphomet",1867,1; - monster .@map$,61,65,"Apostle of Baphomet",1292,1; - disablenpc instance_npcname("slave_left"); + mapannounce(.@map$, _("Apostle of Baphomet : Kill the humans! Don't let them interrupt the revival of our Master!"), bc_map, C_YELLOW); + monster(.@map$, 55, 67, _("Apostle of Baphomet"), FLAME_SKULL, 1); + monster(.@map$, 51, 67, _("Apostle of Baphomet"), WRAITH_DEAD, 1); + monster(.@map$, 58, 67, _("Apostle of Baphomet"), MINI_DEMON, 1); + monster(.@map$, 53, 67, _("Apostle of Baphomet"), WRAITH_DEAD, 1); + monster(.@map$, 54, 67, _("Apostle of Baphomet"), FLAME_SKULL, 1); + monster(.@map$, 55, 67, _("Apostle of Baphomet"), WRAITH_DEAD, 1); + monster(.@map$, 56, 67, _("Apostle of Baphomet"), EVIL_DRUID, 1); + monster(.@map$, 58, 66, _("Apostle of Baphomet"), FLAME_SKULL, 1); + monster(.@map$, 56, 66, _("Apostle of Baphomet"), EVIL_DRUID, 1); + monster(.@map$, 60, 66, _("Apostle of Baphomet"), KHALITZBURG, 1); + monster(.@map$, 59, 66, _("Apostle of Baphomet"), EVIL_DRUID, 1); + monster(.@map$, 54, 66, _("Apostle of Baphomet"), KHALITZBURG, 1); + monster(.@map$, 55, 66, _("Apostle of Baphomet"), MINI_DEMON, 1); + monster(.@map$, 56, 66, _("Apostle of Baphomet"), KHALITZBURG, 1); + monster(.@map$, 50, 65, _("Apostle of Baphomet"), BANSHEE, 1); + monster(.@map$, 61, 65, _("Apostle of Baphomet"), MINI_DEMON, 1); + disablenpc(instance_npcname("slave_left")); end; } 2@cata,109,67,0 script slave_right FAKE_NPC,5,5,{ OnTouch: .@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; - monster .@map$,107,67,"Apostle of Baphomet",1869,1; - monster .@map$,106,67,"Apostle of Baphomet",1291,1; - monster .@map$,102,67,"Apostle of Baphomet",1869,1; - monster .@map$,103,67,"Apostle of Baphomet",1291,1; - monster .@map$,103,67,"Apostle of Baphomet",1117,1; - monster .@map$,109,66,"Apostle of Baphomet",1117,1; - monster .@map$,108,66,"Apostle of Baphomet",1132,1; - monster .@map$,101,66,"Apostle of Baphomet",1117,1; - monster .@map$,106,66,"Apostle of Baphomet",1292,1; - monster .@map$,102,66,"Apostle of Baphomet",1132,1; - monster .@map$,104,66,"Apostle of Baphomet",1292,1; - monster .@map$,103,66,"Apostle of Baphomet",1132,1; - monster .@map$,109,65,"Apostle of Baphomet",1867,1; - monster .@map$,108,65,"Apostle of Baphomet",1292,1; - disablenpc instance_npcname("slave_right"); + mapannounce(.@map$, _("Apostle of Baphomet : Kill the humans! Don't let them interrupt the revival of our Master!"), bc_map, C_YELLOW); + monster(.@map$, 105, 67, _("Apostle of Baphomet"), FLAME_SKULL, 1); + monster(.@map$, 104, 67, _("Apostle of Baphomet"), WRAITH_DEAD, 1); + monster(.@map$, 107, 67, _("Apostle of Baphomet"), FLAME_SKULL, 1); + monster(.@map$, 106, 67, _("Apostle of Baphomet"), WRAITH_DEAD, 1); + monster(.@map$, 102, 67, _("Apostle of Baphomet"), FLAME_SKULL, 1); + monster(.@map$, 103, 67, _("Apostle of Baphomet"), WRAITH_DEAD, 1); + monster(.@map$, 103, 67, _("Apostle of Baphomet"), EVIL_DRUID, 1); + monster(.@map$, 109, 66, _("Apostle of Baphomet"), EVIL_DRUID, 1); + monster(.@map$, 108, 66, _("Apostle of Baphomet"), KHALITZBURG, 1); + monster(.@map$, 101, 66, _("Apostle of Baphomet"), EVIL_DRUID, 1); + monster(.@map$, 106, 66, _("Apostle of Baphomet"), MINI_DEMON, 1); + monster(.@map$, 102, 66, _("Apostle of Baphomet"), KHALITZBURG, 1); + monster(.@map$, 104, 66, _("Apostle of Baphomet"), MINI_DEMON, 1); + monster(.@map$, 103, 66, _("Apostle of Baphomet"), KHALITZBURG, 1); + monster(.@map$, 109, 65, _("Apostle of Baphomet"), BANSHEE, 1); + monster(.@map$, 108, 65, _("Apostle of Baphomet"), MINI_DEMON, 1); + disablenpc(instance_npcname("slave_right")); end; } 2@cata,79,39,0 script slave_down FAKE_NPC,5,5,{ OnTouch: .@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; - monster .@map$,78,46,"Apostle of Baphomet",1869,1; - monster .@map$,81,41,"Apostle of Baphomet",1291,1; - monster .@map$,81,42,"Apostle of Baphomet",1869,1; - monster .@map$,79,43,"Apostle of Baphomet",1291,1; - monster .@map$,77,40,"Apostle of Baphomet",1117,1; - monster .@map$,79,41,"Apostle of Baphomet",1132,1; - monster .@map$,79,42,"Apostle of Baphomet",1117,1; - monster .@map$,79,43,"Apostle of Baphomet",1132,1; - monster .@map$,79,48,"Apostle of Baphomet",1117,1; - monster .@map$,78,49,"Apostle of Baphomet",1132,1; - monster .@map$,78,41,"Apostle of Baphomet",1292,1; - monster .@map$,74,42,"Apostle of Baphomet",1292,1; - monster .@map$,72,48,"Apostle of Baphomet",1867,1; - monster .@map$,72,38,"Apostle of Baphomet",1292,1; - disablenpc instance_npcname("slave_down"); + mapannounce(.@map$, _("Apostle of Baphomet : Kill the humans! Don't let them interrupt the revival of our Master!"), bc_map, C_YELLOW); + monster(.@map$, 78, 41, _("Apostle of Baphomet"), FLAME_SKULL, 1); + monster(.@map$, 79, 42, _("Apostle of Baphomet"), WRAITH_DEAD, 1); + monster(.@map$, 78, 46, _("Apostle of Baphomet"), FLAME_SKULL, 1); + monster(.@map$, 81, 41, _("Apostle of Baphomet"), WRAITH_DEAD, 1); + monster(.@map$, 81, 42, _("Apostle of Baphomet"), FLAME_SKULL, 1); + monster(.@map$, 79, 43, _("Apostle of Baphomet"), WRAITH_DEAD, 1); + monster(.@map$, 77, 40, _("Apostle of Baphomet"), EVIL_DRUID, 1); + monster(.@map$, 79, 41, _("Apostle of Baphomet"), KHALITZBURG, 1); + monster(.@map$, 79, 42, _("Apostle of Baphomet"), EVIL_DRUID, 1); + monster(.@map$, 79, 43, _("Apostle of Baphomet"), KHALITZBURG, 1); + monster(.@map$, 79, 48, _("Apostle of Baphomet"), EVIL_DRUID, 1); + monster(.@map$, 78, 49, _("Apostle of Baphomet"), KHALITZBURG, 1); + monster(.@map$, 78, 41, _("Apostle of Baphomet"), MINI_DEMON, 1); + monster(.@map$, 74, 42, _("Apostle of Baphomet"), MINI_DEMON, 1); + monster(.@map$, 72, 48, _("Apostle of Baphomet"), BANSHEE, 1); + monster(.@map$, 72, 38, _("Apostle of Baphomet"), MINI_DEMON, 1); + disablenpc(instance_npcname("slave_down")); end; } //== Magical Seals ========================================= - script Magical Seal#SS FAKE_NPC,{ - .@seal_check = questprogress(3041,PLAYTIME); + .@seal_check = questprogress(3041, PLAYTIME); if (.@seal_check == 1) { specialeffect(EF_SILENCEATTACK, AREA, playerattached()); - percentheal -50,0; - sc_start Eff_Stone,30000,0; - mes "Your SP has not recovered yet. You lost your SP on the altar, but it seems the power of the seal has returned."; - close; + percentheal(-50, 0); + sc_start(Eff_Stone, 30000, 0); + mes("Your SP has not recovered yet. You lost your SP on the altar, but it seems the power of the seal has returned."); + close(); } - if (.@seal_check == 2) erasequest 3041; - specialeffect EF_LEXDIVINA; - disablenpc instance_npcname(strnpcinfo(NPC_NAME)); + if (.@seal_check == 2) + erasequest(3041); + specialeffect(EF_LEXDIVINA); + disablenpc(instance_npcname(strnpcinfo(NPC_NAME))); .@map$ = instance_mapname("2@cata"); - if (strnpcinfo(NPC_NAME_HIDDEN) == "0") areamobuseskill .@map$,79,81,10,1929,"NPC_INVINCIBLEOFF",1,0,0,e_hlp,0; - else if (strnpcinfo(NPC_NAME_HIDDEN) == "2") areamobuseskill .@map$,123,109,10,1929,"NPC_INVINCIBLEOFF",1,0,0,e_hlp,0; - else if (strnpcinfo(NPC_NAME_HIDDEN) == "4") areamobuseskill .@map$,123,22,10,1929,"NPC_INVINCIBLEOFF",1,0,0,e_hlp,0; - else if (strnpcinfo(NPC_NAME_HIDDEN) == "8") areamobuseskill .@map$,35,21,10,1929,"NPC_INVINCIBLEOFF",1,0,0,e_hlp,0; - else if (strnpcinfo(NPC_NAME_HIDDEN) == "10") areamobuseskill .@map$,35,109,10,1929,"NPC_INVINCIBLEOFF",1,0,0,e_hlp,0; - percentheal -50,0; - sc_start Eff_Stone,20000,0; - setquest 3041; - mapannounce .@map$, "The seal activated by putting magical power into the altar.",bc_map,"0x87ceeb"; - mes "I can feel the power of the altar came back by adding magical power."; - next; - mes "But you can't use your magic for 3 minutes because you used your SP on the altar."; - close; + if (strnpcinfo(NPC_NAME_HIDDEN) == "0") + areamobuseskill(.@map$, 79, 81, 10, BAPHOMET_I, "NPC_INVINCIBLEOFF", 1, 0, 0, e_hlp, 0); + else if (strnpcinfo(NPC_NAME_HIDDEN) == "2") + areamobuseskill(.@map$, 123, 109, 10, BAPHOMET_I, "NPC_INVINCIBLEOFF", 1, 0, 0, e_hlp, 0); + else if (strnpcinfo(NPC_NAME_HIDDEN) == "4") + areamobuseskill(.@map$, 123, 22, 10, BAPHOMET_I, "NPC_INVINCIBLEOFF", 1, 0, 0, e_hlp, 0); + else if (strnpcinfo(NPC_NAME_HIDDEN) == "8") + areamobuseskill(.@map$, 35, 21, 10, BAPHOMET_I, "NPC_INVINCIBLEOFF", 1, 0, 0, e_hlp, 0); + else if (strnpcinfo(NPC_NAME_HIDDEN) == "10") + areamobuseskill(.@map$, 35, 109, 10, BAPHOMET_I, "NPC_INVINCIBLEOFF", 1, 0, 0, e_hlp, 0); + percentheal(-50, 0); + sc_start(Eff_Stone, 20000, 0); + setquest(3041); + mapannounce(.@map$, _("The seal activated by putting magical power into the altar."), bc_map, "0x87ceeb"); + mes("I can feel the power of the altar came back by adding magical power."); + next(); + mes("But you can't use your magic for 3 minutes because you used your SP on the altar."); + close(); OnInstanceInit: - disablenpc instance_npcname(strnpcinfo(NPC_NAME)); + disablenpc(instance_npcname(strnpcinfo(NPC_NAME))); end; } + 2@cata,79,81,0 duplicate(Magical Seal#SS) Magical Seal#0 CLEAR_NPC 2@cata,123,109,0 duplicate(Magical Seal#SS) Magical Seal#2 CLEAR_NPC 2@cata,123,22,0 duplicate(Magical Seal#SS) Magical Seal#4 CLEAR_NPC @@ -1122,137 +1105,137 @@ OnInstanceInit: 2@cata,79,65,0 script The Main Altar#ss CLEAR_NPC,{ .@party_id = getcharid(CHAR_ID_PARTY); - if (('ins_baphomet == 5) && (getpartyleader(.@party_id,2) == getcharid(CHAR_ID_CHAR))) { - mes "An evil power, too terrible to describe, lies under the great altar radiating a violet color."; - next; - mes "Complicated Magical Rune letters blink rapidly, attempting to suppress the dreadful power within."; - next; - mes "The bottom of the Main Altar trembles furiously."; - next; - specialeffect EF_METEORSTORM; - specialeffect EF_METEORSTORM; - mes "[" + strcharinfo(PC_NAME) + "]"; - mes "Watch out! Something... Something is coming."; + if ('ins_baphomet == 5 && getpartyleader(.@party_id, 2) == getcharid(CHAR_ID_CHAR)) { + mes("An evil power, too terrible to describe, lies under the great altar radiating a violet color."); + next(); + mes("Complicated Magical Rune letters blink rapidly, attempting to suppress the dreadful power within."); + next(); + mes("The bottom of the Main Altar trembles furiously."); + next(); + specialeffect(EF_METEORSTORM); + specialeffect(EF_METEORSTORM); + mesf("[%s]", strcharinfo(PC_NAME)); + mes("Watch out! Something... Something is coming."); 'ins_baphomet = 6; - donpcevent instance_npcname("ins_2f_hero_broad")+"::OnEnable"; - disablenpc instance_npcname("The Main Altar#ss"); - close; - } - else { - mes "An evil power, too terrible to describe, lies under the great altar radiating a violet color."; - next; - mes "Complicated Magical Rune letters blink rapidly, attempting to suppress the dreadful power within."; - close; + donpcevent(instance_npcname("ins_2f_hero_broad")+"::OnEnable"); + disablenpc(instance_npcname("The Main Altar#ss")); + close(); + } else { + mes("An evil power, too terrible to describe, lies under the great altar radiating a violet color."); + next(); + mes("Complicated Magical Rune letters blink rapidly, attempting to suppress the dreadful power within."); + close(); } end; } 2@cata,80,63,4 script Ancient Hero's Soul#2F 4_M_CHAMPSOUL,{ - cutin "ins_cata_champ_s",2; - 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; - mes "[Ancient Hero's Soul]"; - mes "I really appreciate your help."; - mes "Our souls can finally rest in peace..."; - next; - mes "[Ancient Hero's Soul]"; - mes "The struggle for peace on this world will never end. But... my role here is finally over because there are brave heroes like you."; - next; - switch(select("Let me leave the shrine.", "Stop talking.")) { + cutin("ins_cata_champ_s", 2); + 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(); + mes("[Ancient Hero's Soul]"); + mes("I really appreciate your help."); + mes("Our souls can finally rest in peace..."); + next(); + mes("[Ancient Hero's Soul]"); + mes("The struggle for peace on this world will never end. But... my role here is finally over because there are brave heroes like you."); + next(); + switch (select("Let me leave the shrine.", "Stop talking.")) { case 1: - mes "[Ancient Hero's Soul]"; - mes "Okay. I'll let you and your group leave here safely."; - next; - mes "[Ancient Hero's Soul]"; - mes "If you leave, please say hello to Patrick for me."; - cutin "",255; + mes("[Ancient Hero's Soul]"); + mes("Okay. I'll let you and your group leave here safely."); + next(); + mes("[Ancient Hero's Soul]"); + mes("If you leave, please say hello to Patrick for me."); + cutin("", 255); 'ins_baphomet = 0; - warp "monk_test",310,150; - close; + warp("monk_test", 310, 150); + close(); case 2: - mes "[Ancient Hero's Soul]"; - mes "Do you still have something to do here? If you're done I'll let you leave safely..."; - cutin "",255; - close; + mes("[Ancient Hero's Soul]"); + mes("Do you still have something to do here? If you're done I'll let you leave safely..."); + cutin("", 255); + close(); } OnInstanceInit: - disablenpc instance_npcname("Ancient Hero's Soul#2F"); + disablenpc(instance_npcname("Ancient Hero's Soul#2F")); end; } 2@cata,1,2,0 script ins_2f_hero_broad FAKE_NPC,{ OnEnable: - enablenpc instance_npcname("ins_2f_hero_broad"); - initnpctimer; + enablenpc(instance_npcname("ins_2f_hero_broad")); + initnpctimer(); end; OnDisable: - disablenpc instance_npcname("ins_2f_hero_broad"); + disablenpc(instance_npcname("ins_2f_hero_broad")); end; OnTimer3000: - mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : My God! The seal of the Main Altar is weakening!",bc_map,"0xFFFF00"; + mapannounce(instance_mapname("2@cata"), _("Ancient Hero's Soul : My God! The seal of the Main Altar is weakening!"), bc_map, C_YELLOW); end; OnTimer6000: - mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : My descendants... Listen carefully to what I'm going to say.",bc_map,"0xFFFF00"; + mapannounce(instance_mapname("2@cata"), _("Ancient Hero's Soul : My descendants... Listen carefully to what I'm going to say."), bc_map, C_YELLOW); end; OnTimer9000: - mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : The altars that control the Main Altar's power are located in the Northeast, Southeast, Southwest and Northwest corners of this room.",bc_map,"0xFFFF00"; + mapannounce(instance_mapname("2@cata"), _("Ancient Hero's Soul : The altars that control the Main Altar's power are located in the Northeast, Southeast, Southwest and Northwest corners of this room."), bc_map, C_YELLOW); end; OnTimer12000: - mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : Find these altars and activate their seals before Baphomet revives.",bc_map,"0xFFFF00"; + mapannounce(instance_mapname("2@cata"), _("Ancient Hero's Soul : Find these altars and activate their seals before Baphomet revives."), bc_map, C_YELLOW); end; OnTimer15000: - mapannounce instance_mapname("2@cata"), "Baphomet : It's too late, weaklings... Now, you'll feel the despair of death!",bc_map,"0xdb7093"; + mapannounce(instance_mapname("2@cata"), _("Baphomet : It's too late, weaklings... Now, you'll feel the despair of death!"), bc_map, "0xdb7093"); end; OnTimer17000: - mapannounce instance_mapname("2@cata"), "Baphomet : No one can harm me here. You will be my first sacrifice.",bc_map,"0xdb7093"; - donpcevent instance_npcname("control_baphomet")+"::OnEnable"; - donpcevent instance_npcname("ins_2f_hero_broad2")+"::OnEnable"; - stopnpctimer; - disablenpc instance_npcname("ins_2f_hero_broad"); + mapannounce(instance_mapname("2@cata"), _("Baphomet : No one can harm me here. You will be my first sacrifice."), bc_map, "0xdb7093"); + donpcevent(instance_npcname("control_baphomet")+"::OnEnable"); + donpcevent(instance_npcname("ins_2f_hero_broad2")+"::OnEnable"); + stopnpctimer(); + disablenpc(instance_npcname("ins_2f_hero_broad")); end; } 2@cata,3,3,0 script control_baphomet FAKE_NPC,{ OnInstanceInit: OnDisable: - disablenpc instance_npcname("control_baphomet"); + disablenpc(instance_npcname("control_baphomet")); end; OnEnable: - enablenpc instance_npcname("control_baphomet"); - donpcevent instance_npcname("2f_callmon_pattern_c")+"::OnEnable"; - monster instance_mapname("2@cata"),79,64,"Baphomet#",1929,1,instance_npcname("control_baphomet")+"::OnMyMobDead"; + enablenpc(instance_npcname("control_baphomet")); + donpcevent(instance_npcname("2f_callmon_pattern_c")+"::OnEnable"); + monster(instance_mapname("2@cata"), 79, 64, "Baphomet#", BAPHOMET_I, 1, instance_npcname("control_baphomet")+"::OnMyMobDead"); end; OnMyMobDead: .@map$ = instance_mapname("2@cata"); - if (mobcount(.@map$,instance_npcname("control_baphomet")+"::OnMyMobDead") < 1) { + if (mobcount(.@map$, instance_npcname("control_baphomet")+"::OnMyMobDead") < 1) { '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"); - disablenpc instance_npcname("slave_down"); - disablenpc instance_npcname("slave_left"); - disablenpc instance_npcname("slave_right"); - donpcevent instance_npcname("ins_2f_hero_broad")+"::OnDisable"; - donpcevent instance_npcname("ins_2f_hero_broad2")+"::OnDisable"; - donpcevent instance_npcname("ins_2f_hero_pattern_c")+"::OnDisable"; - donpcevent instance_npcname("2f_callmon_pattern_c")+"::OnDisable"; - donpcevent instance_npcname("2f_callmon_pattern")+"::OnDisable"; - donpcevent instance_npcname("ins_2f_hero_pattern")+"::OnDisable"; - donpcevent instance_npcname("ins_2f_enter_broad")+"::OnDisable"; - donpcevent instance_npcname("control_baphomet")+"::OnDisable"; - disablenpc instance_npcname("control_baphomet"); + 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")); + disablenpc(instance_npcname("slave_down")); + disablenpc(instance_npcname("slave_left")); + disablenpc(instance_npcname("slave_right")); + donpcevent(instance_npcname("ins_2f_hero_broad")+"::OnDisable"); + donpcevent(instance_npcname("ins_2f_hero_broad2")+"::OnDisable"); + donpcevent(instance_npcname("ins_2f_hero_pattern_c")+"::OnDisable"); + donpcevent(instance_npcname("2f_callmon_pattern_c")+"::OnDisable"); + donpcevent(instance_npcname("2f_callmon_pattern")+"::OnDisable"); + donpcevent(instance_npcname("ins_2f_hero_pattern")+"::OnDisable"); + donpcevent(instance_npcname("ins_2f_enter_broad")+"::OnDisable"); + donpcevent(instance_npcname("control_baphomet")+"::OnDisable"); + disablenpc(instance_npcname("control_baphomet")); } end; } @@ -1260,232 +1243,232 @@ OnMyMobDead: 2@cata,2,2,0 script ins_2f_hero_broad2 FAKE_NPC,{ OnInstanceInit: OnDisable: - disablenpc instance_npcname("ins_2f_hero_broad2"); + disablenpc(instance_npcname("ins_2f_hero_broad2")); end; OnEnable: - enablenpc instance_npcname("ins_2f_hero_broad2"); - initnpctimer; + enablenpc(instance_npcname("ins_2f_hero_broad2")); + initnpctimer(); end; OnTimer8000: - mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : Don't be discouraged, Baphomet can still be defeated!",bc_map,"0xFFFF00"; + mapannounce(instance_mapname("2@cata"), _("Ancient Hero's Soul : Don't be discouraged, Baphomet can still be defeated!"), bc_map, C_YELLOW); end; OnTimer11000: - mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : Go to the altars and activate their seals.",bc_map,"0xFFFF00"; + mapannounce(instance_mapname("2@cata"), _("Ancient Hero's Soul : Go to the altars and activate their seals."), bc_map, C_YELLOW); end; OnTimer13000: - mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : Once the seals recover their power, Baphomet will be vulnerable.",bc_map,"0xFFFF00"; + mapannounce(instance_mapname("2@cata"), _("Ancient Hero's Soul : Once the seals recover their power, Baphomet will be vulnerable."), bc_map, C_YELLOW); end; OnTimer16000: - mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : You should lure Baphomet to the unsealed Altars. Otherwise, your efforts will be futile.",bc_map,"0xFFFF00"; + mapannounce(instance_mapname("2@cata"), _("Ancient Hero's Soul : You should lure Baphomet to the unsealed Altars. Otherwise, your efforts will be futile."), bc_map, C_YELLOW); end; OnTimer19000: - mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : We have only 1 hour to stop Baphomet. If time runs out, the power of the seals will be useless.",bc_map,"0xFFFF00"; + mapannounce(instance_mapname("2@cata"), _("Ancient Hero's Soul : We have only 1 hour to stop Baphomet. If time runs out, the power of the seals will be useless."), bc_map, C_YELLOW); end; OnTimer22000: - mapannounce instance_mapname("2@cata"), "Baphomet : It's useless. Make more seals. I'll crush them all. None of you will survive!",bc_map,"0xdb7093"; + mapannounce(instance_mapname("2@cata"), _("Baphomet : It's useless. Make more seals. I'll crush them all. None of you will survive!"), bc_map, "0xdb7093"); end; OnTimer26000: - mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : The magical power of the central seal is running out. Go to the central seal and put the magical power.",bc_map,"0xFFFF00"; - enablenpc instance_npcname("Magical Seal#0"); - disablenpc instance_npcname("Magical Seal#2"); - disablenpc instance_npcname("Magical Seal#4"); - disablenpc instance_npcname("Magical Seal#8"); - disablenpc instance_npcname("Magical Seal#10"); - donpcevent instance_npcname("ins_2f_hero_pattern_c")+"::OnEnable"; - stopnpctimer; - disablenpc instance_npcname("ins_2f_hero_broad2"); + mapannounce(instance_mapname("2@cata"), _("Ancient Hero's Soul : The magical power of the central seal is running out. Go to the central seal and put the magical power."), bc_map, C_YELLOW); + enablenpc(instance_npcname("Magical Seal#0")); + disablenpc(instance_npcname("Magical Seal#2")); + disablenpc(instance_npcname("Magical Seal#4")); + disablenpc(instance_npcname("Magical Seal#8")); + disablenpc(instance_npcname("Magical Seal#10")); + donpcevent(instance_npcname("ins_2f_hero_pattern_c")+"::OnEnable"); + stopnpctimer(); + disablenpc(instance_npcname("ins_2f_hero_broad2")); end; } 2@cata,4,1,0 script 2f_callmon_pattern_c FAKE_NPC,{ OnInstanceInit: - disablenpc instance_npcname("2f_callmon_pattern_c"); + disablenpc(instance_npcname("2f_callmon_pattern_c")); end; OnEnable: - enablenpc instance_npcname("2f_callmon_pattern_c"); - initnpctimer; - donpcevent instance_npcname("2f_callmon_pattern_c")+"::OnGo"; + enablenpc(instance_npcname("2f_callmon_pattern_c")); + initnpctimer(); + donpcevent(instance_npcname("2f_callmon_pattern_c")+"::OnGo"); end; OnDisable: - stopnpctimer; - disablenpc instance_npcname("2f_callmon_pattern_c"); + stopnpctimer(); + disablenpc(instance_npcname("2f_callmon_pattern_c")); end; OnGo: - donpcevent instance_npcname("2f_callmon_pattern")+"::OnEnable"; + donpcevent(instance_npcname("2f_callmon_pattern")+"::OnEnable"); end; OnTimer3600000: - donpcevent instance_npcname("2f_callmon_pattern_c")+"::OnDisable"; + donpcevent(instance_npcname("2f_callmon_pattern_c")+"::OnDisable"); end; } 2@cata,4,2,0 script 2f_callmon_pattern FAKE_NPC,{ OnInstanceInit: - disablenpc instance_npcname("2f_callmon_pattern"); + disablenpc(instance_npcname("2f_callmon_pattern")); end; OnEnable: - enablenpc instance_npcname("2f_callmon_pattern"); - stopnpctimer; - initnpctimer; + enablenpc(instance_npcname("2f_callmon_pattern")); + stopnpctimer(); + initnpctimer(); end; OnDisable: - disablenpc instance_npcname("2f_callmon_pattern"); - stopnpctimer; + disablenpc(instance_npcname("2f_callmon_pattern")); + stopnpctimer(); end; OnTimer300000: - enablenpc instance_npcname("slave_down"); - enablenpc instance_npcname("slave_left"); - enablenpc instance_npcname("slave_right"); - donpcevent instance_npcname("2f_callmon_pattern_c")+"::OnGo"; + enablenpc(instance_npcname("slave_down")); + enablenpc(instance_npcname("slave_left")); + enablenpc(instance_npcname("slave_right")); + donpcevent(instance_npcname("2f_callmon_pattern_c")+"::OnGo"); end; } 2@cata,3,1,0 script ins_2f_hero_pattern_c FAKE_NPC,{ OnInstanceInit: - disablenpc instance_npcname("ins_2f_hero_pattern_c"); + disablenpc(instance_npcname("ins_2f_hero_pattern_c")); end; OnEnable: - enablenpc instance_npcname("ins_2f_hero_pattern_c"); - initnpctimer; - donpcevent instance_npcname("ins_2f_hero_pattern_c")+"::OnGo"; + enablenpc(instance_npcname("ins_2f_hero_pattern_c")); + initnpctimer(); + donpcevent(instance_npcname("ins_2f_hero_pattern_c")+"::OnGo"); end; OnGo: - donpcevent instance_npcname("ins_2f_hero_pattern")+"::OnEnable"; + donpcevent(instance_npcname("ins_2f_hero_pattern")+"::OnEnable"); end; OnDisable: - stopnpctimer; - disablenpc instance_npcname("Magical Seal#0"); - disablenpc instance_npcname("Magical Seal#2"); - disablenpc instance_npcname("Magical Seal#4"); - disablenpc instance_npcname("Magical Seal#8"); - disablenpc instance_npcname("Magical Seal#10"); - donpcevent instance_npcname("ins_2f_hero_pattern")+"::OnDisable"; - disablenpc instance_npcname("ins_2f_hero_pattern_c"); + stopnpctimer(); + disablenpc(instance_npcname("Magical Seal#0")); + disablenpc(instance_npcname("Magical Seal#2")); + disablenpc(instance_npcname("Magical Seal#4")); + disablenpc(instance_npcname("Magical Seal#8")); + disablenpc(instance_npcname("Magical Seal#10")); + donpcevent(instance_npcname("ins_2f_hero_pattern")+"::OnDisable"); + disablenpc(instance_npcname("ins_2f_hero_pattern_c")); end; OnTimer3600000: - mapannounce instance_mapname("2@cata"), "Baphomet : krrrr... Now you can't stop me with the seals. All you can do is wait for death!",bc_map,"0xdb7093"; + mapannounce(instance_mapname("2@cata"), _("Baphomet : krrrr... Now you can't stop me with the seals. All you can do is wait for death!"), bc_map, "0xdb7093"); end; OnTimer3605000: - mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : We can't stop Baphomet with the magical power of the seals anymore. Now everything depends on God...",bc_map,"0xFFFF00"; - donpcevent instance_npcname("ins_2f_hero_pattern_c")+"::OnDisable"; + mapannounce(instance_mapname("2@cata"), _("Ancient Hero's Soul : We can't stop Baphomet with the magical power of the seals anymore. Now everything depends on God..."), bc_map, C_YELLOW); + donpcevent(instance_npcname("ins_2f_hero_pattern_c")+"::OnDisable"); end; } 2@cata,3,2,0 script ins_2f_hero_pattern FAKE_NPC,{ OnInstanceInit: - disablenpc instance_npcname("ins_2f_hero_pattern"); + disablenpc(instance_npcname("ins_2f_hero_pattern")); end; OnEnable: - enablenpc instance_npcname("ins_2f_hero_pattern"); - initnpctimer; + enablenpc(instance_npcname("ins_2f_hero_pattern")); + initnpctimer(); end; OnDisable: - disablenpc instance_npcname("ins_2f_hero_pattern"); - stopnpctimer; + disablenpc(instance_npcname("ins_2f_hero_pattern")); + stopnpctimer(); end; OnTimer70000: - switch(rand(1,5)) { + switch (rand(1, 5)) { case 1: - mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : The seal of the Main Altar is running out. Strengthen the Main Altar's seal!",bc_map,"0xFFFF00"; - enablenpc instance_npcname("Magical Seal#0"); - disablenpc instance_npcname("Magical Seal#2"); - disablenpc instance_npcname("Magical Seal#4"); - disablenpc instance_npcname("Magical Seal#8"); - disablenpc instance_npcname("Magical Seal#10"); + mapannounce(instance_mapname("2@cata"), _("Ancient Hero's Soul : The seal of the Main Altar is running out. Strengthen the Main Altar's seal!"), bc_map, C_YELLOW); + enablenpc(instance_npcname("Magical Seal#0")); + disablenpc(instance_npcname("Magical Seal#2")); + disablenpc(instance_npcname("Magical Seal#4")); + disablenpc(instance_npcname("Magical Seal#8")); + disablenpc(instance_npcname("Magical Seal#10")); break; case 2: - mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : The magical power of the seal at 2 o'clock is running out. Go to 2 o'clock and put the magical power in the seal.",bc_map,"0xFFFF00"; - disablenpc instance_npcname("Magical Seal#0"); - enablenpc instance_npcname("Magical Seal#2"); - disablenpc instance_npcname("Magical Seal#4"); - disablenpc instance_npcname("Magical Seal#8"); - disablenpc instance_npcname("Magical Seal#10"); + mapannounce(instance_mapname("2@cata"), _("Ancient Hero's Soul : The magical power of the seal at 2 o'clock is running out. Go to 2 o'clock and put the magical power in the seal."), bc_map, C_YELLOW); + disablenpc(instance_npcname("Magical Seal#0")); + enablenpc(instance_npcname("Magical Seal#2")); + disablenpc(instance_npcname("Magical Seal#4")); + disablenpc(instance_npcname("Magical Seal#8")); + disablenpc(instance_npcname("Magical Seal#10")); break; case 3: - mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : The magical power of the seal at 4 o'clock is running out. Go to 4 o'clock and put the magical power in the seal.",bc_map,"0xFFFF00"; - disablenpc instance_npcname("Magical Seal#0"); - disablenpc instance_npcname("Magical Seal#2"); - enablenpc instance_npcname("Magical Seal#4"); - disablenpc instance_npcname("Magical Seal#8"); - disablenpc instance_npcname("Magical Seal#10"); + mapannounce(instance_mapname("2@cata"), _("Ancient Hero's Soul : The magical power of the seal at 4 o'clock is running out. Go to 4 o'clock and put the magical power in the seal."), bc_map, C_YELLOW); + disablenpc(instance_npcname("Magical Seal#0")); + disablenpc(instance_npcname("Magical Seal#2")); + enablenpc(instance_npcname("Magical Seal#4")); + disablenpc(instance_npcname("Magical Seal#8")); + disablenpc(instance_npcname("Magical Seal#10")); break; case 4: - mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : The magical power of the seal at 8 o'clock is running out. Go to 8 o'clock and put the magical power in the seal.",bc_map,"0xFFFF00"; - disablenpc instance_npcname("Magical Seal#0"); - disablenpc instance_npcname("Magical Seal#2"); - disablenpc instance_npcname("Magical Seal#4"); - enablenpc instance_npcname("Magical Seal#8"); - disablenpc instance_npcname("Magical Seal#10"); + mapannounce(instance_mapname("2@cata"), _("Ancient Hero's Soul : The magical power of the seal at 8 o'clock is running out. Go to 8 o'clock and put the magical power in the seal."), bc_map, C_YELLOW); + disablenpc(instance_npcname("Magical Seal#0")); + disablenpc(instance_npcname("Magical Seal#2")); + disablenpc(instance_npcname("Magical Seal#4")); + enablenpc(instance_npcname("Magical Seal#8")); + disablenpc(instance_npcname("Magical Seal#10")); break; case 5: - mapannounce instance_mapname("2@cata"), "Ancient Hero's Soul : The magical power of the seal at 10 o'clock is running out. Go to 10 o'clock and put the magical power in the seal.",bc_map,"0xFFFF00"; - disablenpc instance_npcname("Magical Seal#0"); - disablenpc instance_npcname("Magical Seal#2"); - disablenpc instance_npcname("Magical Seal#4"); - disablenpc instance_npcname("Magical Seal#8"); - enablenpc instance_npcname("Magical Seal#10"); + mapannounce(instance_mapname("2@cata"), _("Ancient Hero's Soul : The magical power of the seal at 10 o'clock is running out. Go to 10 o'clock and put the magical power in the seal."), bc_map, C_YELLOW); + disablenpc(instance_npcname("Magical Seal#0")); + disablenpc(instance_npcname("Magical Seal#2")); + disablenpc(instance_npcname("Magical Seal#4")); + disablenpc(instance_npcname("Magical Seal#8")); + enablenpc(instance_npcname("Magical Seal#10")); } - stopnpctimer; - donpcevent instance_npcname("ins_2f_hero_pattern_c")+"::OnGo"; + stopnpctimer(); + donpcevent(instance_npcname("ins_2f_hero_pattern_c")+"::OnGo"); end; } 1@cata,1,1,0 script ins_1f_spawn_mobs FAKE_NPC,{ OnInstanceInit: .@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; - monster .@map$,0,0,"Flame Skull",1869,10; - monster .@map$,0,0,"Skeleton General",1290,10; - monster .@map$,0,0,"Zombie Master",1298,10; - monster .@map$,0,0,"Skeleton General",1290,10; - monster .@map$,0,0,"Flame Skull",1869,10; - monster .@map$,0,0,"Wraith Dead",1291,10; - monster .@map$,0,0,"Wraith Dead",1291,10; - monster .@map$,0,0,"Khalitzburg",1132,10; - monster .@map$,0,0,"Khalitzburg",1132,10; - monster .@map$,0,0,"Flame Skull",1869,10; - monster .@map$,0,0,"Flame Skull",1869,10; - monster .@map$,0,0,"Ancient Mimic",1699,10; - monster .@map$,0,0,"Zombie Master",1298,10; - monster .@map$,0,0,"Ancient Mimic",1699,10; - monster .@map$,0,0,"Zombie Master",1298,10; - monster .@map$,0,0,"Wraith Dead",1291,10; - monster .@map$,0,0,"Skeleton General",1290,10; - monster .@map$,0,0,"Skeleton General",1290,10; - monster .@map$,0,0,"Wind Ghost",1263,10; - monster .@map$,0,0,"Wind Ghost",1263,10; - monster .@map$,0,0,"Wind Ghost",1263,10; - monster .@map$,0,0,"Lude",1509,10; - monster .@map$,0,0,"Lude",1509,10; - monster .@map$,0,0,"Evil Druid",1117,10; - monster .@map$,0,0,"Evil Druid",1117,10; - monster .@map$,0,0,"Evil Druid",1117,10; - monster .@map$,0,0,"Banshee",1867,10; - monster .@map$,0,0,"Dark Illusion",1302,1; - disablenpc instance_npcname("ins_1f_spawn_mobs"); + monster(.@map$, 0, 0, _("Zombie Master"), ZOMBIE_MASTER, 10); + monster(.@map$, 0, 0, _("Wraith Dead"), WRAITH_DEAD, 10); + //monster(.@map$, 0, 0, _("Ancient Mimic"), ANCIENT_MIMIC, 10); + monster(.@map$, 0, 0, _("Flame Skull"), FLAME_SKULL, 10); + monster(.@map$, 0, 0, _("Skeleton General"), SKELETON_GENERAL, 10); + monster(.@map$, 0, 0, _("Zombie Master"), ZOMBIE_MASTER, 10); + monster(.@map$, 0, 0, _("Skeleton General"), SKELETON_GENERAL, 10); + monster(.@map$, 0, 0, _("Flame Skull"), FLAME_SKULL, 10); + monster(.@map$, 0, 0, _("Wraith Dead"), WRAITH_DEAD, 10); + monster(.@map$, 0, 0, _("Wraith Dead"), WRAITH_DEAD, 10); + monster(.@map$, 0, 0, _("Khalitzburg"), KHALITZBURG, 10); + monster(.@map$, 0, 0, _("Khalitzburg"), KHALITZBURG, 10); + monster(.@map$, 0, 0, _("Flame Skull"), FLAME_SKULL, 10); + monster(.@map$, 0, 0, _("Flame Skull"), FLAME_SKULL, 10); + monster(.@map$, 0, 0, _("Ancient Mimic"), ANCIENT_MIMIC, 10); + monster(.@map$, 0, 0, _("Zombie Master"), ZOMBIE_MASTER, 10); + monster(.@map$, 0, 0, _("Ancient Mimic"), ANCIENT_MIMIC, 10); + monster(.@map$, 0, 0, _("Zombie Master"), ZOMBIE_MASTER, 10); + monster(.@map$, 0, 0, _("Wraith Dead"), WRAITH_DEAD, 10); + monster(.@map$, 0, 0, _("Skeleton General"), SKELETON_GENERAL, 10); + monster(.@map$, 0, 0, _("Skeleton General"), SKELETON_GENERAL, 10); + monster(.@map$, 0, 0, _("Wind Ghost"), WIND_GHOST, 10); + monster(.@map$, 0, 0, _("Wind Ghost"), WIND_GHOST, 10); + monster(.@map$, 0, 0, _("Wind Ghost"), WIND_GHOST, 10); + monster(.@map$, 0, 0, _("Lude"), LUDE, 10); + monster(.@map$, 0, 0, _("Lude"), LUDE, 10); + monster(.@map$, 0, 0, _("Evil Druid"), EVIL_DRUID, 10); + monster(.@map$, 0, 0, _("Evil Druid"), EVIL_DRUID, 10); + monster(.@map$, 0, 0, _("Evil Druid"), EVIL_DRUID, 10); + monster(.@map$, 0, 0, _("Banshee"), BANSHEE, 10); + monster(.@map$, 0, 0, _("Dark Illusion"), DARK_ILLUSION, 1); + disablenpc(instance_npcname("ins_1f_spawn_mobs")); end; } diff --git a/npc/other/Global_Functions.txt b/npc/other/Global_Functions.txt index bc19ff048..5a15ff1d2 100644 --- a/npc/other/Global_Functions.txt +++ b/npc/other/Global_Functions.txt @@ -269,17 +269,30 @@ function script F_GetWeaponType { // Determines equipment type by equip location function script F_GetArmorType { switch(getiteminfo(getarg(0),5)) { - case 001: return "Lower Headgear"; break; - case 2: return "Weapon"; break; + case 1: return "Lower Headgear"; break; + case 2: return callfunc("F_GetWeaponType", getarg(0)); break; case 4: return "Garment"; break; case 8: return "Accessory"; break; case 16: return "Armor"; break; case 32: return "Shield"; break; case 64: return "Shoes"; break; case 128: return "Accessory"; break; + case 136: return "Accessory"; break; case 256: return "Upper Headgear"; break; case 512: return "Middle Headgear"; break; - default: return "Unable to Determine Equip Location"; break; + case 1024: return "Costume Upper Headgear"; break; + case 2048: return "Costume Midle Headgear"; break; + case 4096: return "Costume Lower Headgear"; break; + case 8192: return "Costume Garment"; break; + case 32768: return "Ammo"; break; + case 65536: return "Shadow Armor"; break; + case 131072: return "Shadow Weapon"; break; + case 262144: return "Shadow Shield"; break; + case 524288: return "Shadow Shoes"; break; + case 1048576: return "Shadow Accessory"; break; + case 2097152: return "Shadow Accessory"; break; + case 3145728: return "Shadow Accessory"; break; + default: return "Unknown Equip Type"; break; } end; } diff --git a/src/map/script.c b/src/map/script.c index a836501f7..4dcfa5687 100644 --- a/src/map/script.c +++ b/src/map/script.c @@ -21188,72 +21188,90 @@ BUILDIN(has_instance) const char *str; int16 m; int instance_id = -1; + int i = 0, j = 0; bool type = strcmp(script->getfuncname(st),"has_instance2") == 0 ? true : false; str = script_getstr(st, 2); - if( (m = map->mapname2mapid(str)) < 0 ) { - if( type ) + if ((m = map->mapname2mapid(str)) < 0) { + if (type) { script_pushint(st, -1); - else + } else { script_pushconststr(st, ""); + } return true; } - if( script_hasdata(st, 3) ) + if (script_hasdata(st, 3)) instance_id = script_getnum(st, 3); - else if( st->instance_id >= 0 ) + else if (st->instance_id >= 0) instance_id = st->instance_id; - else if( (sd = script->rid2sd(st)) != NULL ) { + else if ((sd = script->rid2sd(st)) != NULL) { struct party_data *p; - int i = 0, j = 0; - if( sd->instances ) { - for( i = 0; i < sd->instances; i++ ) { - if( sd->instance[i] >= 0 ) { + if (sd->instances) { + for (i = 0; i < sd->instances; i++) { + if (sd->instance[i] >= 0) { ARR_FIND(0, instance->list[sd->instance[i]].num_map, j, map->list[instance->list[sd->instance[i]].map[j]].instance_src_map == m); - if( j != instance->list[sd->instance[i]].num_map ) + if (j != instance->list[sd->instance[i]].num_map) break; } } - if( i != sd->instances ) + if (i != sd->instances) { instance_id = sd->instance[i]; + } } if (instance_id == -1 && sd->status.party_id && (p = party->search(sd->status.party_id)) != NULL && p->instances) { - for( i = 0; i < p->instances; i++ ) { - if( p->instance[i] >= 0 ) { + for (i = 0; i < p->instances; i++) { + if (p->instance[i] >= 0) { ARR_FIND(0, instance->list[p->instance[i]].num_map, j, map->list[instance->list[p->instance[i]].map[j]].instance_src_map == m); - if( j != instance->list[p->instance[i]].num_map ) + if (j != instance->list[p->instance[i]].num_map) break; } } - if( i != p->instances ) + if (i != p->instances) { instance_id = p->instance[i]; + } } - if( instance_id == -1 && sd->guild && sd->guild->instances ) { - for( i = 0; i < sd->guild->instances; i++ ) { - if( sd->guild->instance[i] >= 0 ) { + if (instance_id == -1 && sd->guild && sd->guild->instances) { + for (i = 0; i < sd->guild->instances; i++) { + if (sd->guild->instance[i] >= 0) { ARR_FIND(0, instance->list[sd->guild->instance[i]].num_map, j, map->list[instance->list[sd->guild->instance[i]].map[j]].instance_src_map == m); - if( j != instance->list[sd->guild->instance[i]].num_map ) + if (j != instance->list[sd->guild->instance[i]].num_map) break; } } - if( i != sd->guild->instances ) + if (i != sd->guild->instances) instance_id = sd->guild->instance[i]; } } - if( !instance->valid(instance_id) || (m = instance->map2imap(m, instance_id)) < 0 ) { - if( type ) + if (instance_id == -1) { + for (i = 0; i < instance->instances; i++) { + if (instance->list[i].state != INSTANCE_FREE && instance->list[i].owner_type == IOT_NONE && instance->list[i].num_map > 0) { + ARR_FIND(0, instance->list[i].num_map, j, map->list[instance->list[i].map[j]].instance_src_map == m); + if (j != instance->list[i].num_map) + break; + } + } + if (i != instance->instances) { + instance_id = instance->list[i].id; + } + } + + if (!instance->valid(instance_id) || (m = instance->map2imap(m, instance_id)) < 0) { + if (type) { script_pushint(st, -1); - else + } else { script_pushconststr(st, ""); + } return true; } - if( type ) + if (type) { script_pushint(st, instance_id); - else + } else { script_pushconststr(st, map->list[m].name); + } return true; } |