API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Jun 22nd, 2015
1,754
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C 90.81 KB | None | 0 0
raw download clone embed print report
  1. //===== rAthena Script =======================================
  2. //= Old Glast Heim
  3. //===== By: ==================================================
  4. //= Ziu, Heris (translation)
  5. //===== Current Version: =====================================
  6. //= 1.4
  7. //===== Compatible With: =====================================
  8. //= rAthena SVN
  9. //===== Description: =========================================
  10. //= Discover the history of events that took place in the
  11. //= Glast Heim castle and how it ended up in ruins.
  12. //===== Additional Comments: =================================
  13. //= 1.0 First version. [Euphy]
  14. //=     This is a custom version, and may contain bugs.
  15. //= 1.1 Bug fixes; removed redundant OnInstanceInit scripts.
  16. //= 1.2 Add NPC Hugin's Follower [exneval]
  17. //=     NPC that give access to Glast Heim Nightmare Mode.
  18. //= 1.3 Add some NPCs placeholder. [exneval]
  19. //= 1.4 Update to its official text. [exneval]
  20. //=     Support merchant, enchant, socket features.
  21. //============================================================
  22.  
  23. glast_01,204,273,6  script  Hugin#ghinstance    755,{
  24.     if (BaseLevel < 130) {
  25.         mes "[Hugin]";
  26.         mes "Why don't you come back after becoming stronger?";
  27.         mes "Maybe, level 130.";
  28.         close;
  29.     }
  30.     if (ghinstance == 1) {
  31.         mes "[Hugin]";
  32.         mes "Umm? Did you see me at another place? I don't think so. What about this time?";
  33.         if (checkquest(12322) == 1) {
  34.             erasequest 12322;
  35.         }
  36.         next;
  37.     } else {
  38.         mes "[Hugin]";
  39.         mes "A long time ago, this castle did not like this.";
  40.         next;
  41.         mes "[Hugin]";
  42.         mes "Ah I'm sorry. I'm muttering in front of a stranger.";
  43.         next;
  44.         mes "[Hugin]";
  45.         mes "My name is Hugin. I'm studying the dimensional gap between time and space.";
  46.         next;
  47.         select("There's something like that here?");
  48.         mes "[Hugin]";
  49.         mes "Have you ever wondered about history of Glast Heim?";
  50.         next;
  51.         mes "[Hugin]";
  52.         mes "There was a King named Shumiche who was known as a tyrant in the history of the Rune-Midgarts Kingdom.";
  53.         next;
  54.         mes "[Hugin]";
  55.         mes "Time will reveal the true answers if we look in the right places.";
  56.         next;
  57.         if (select("I don't care about history","That is interesting. Find anything?") == 1) {
  58.             mes "[Hugin]";
  59.             mes "Really? Hmm, please come back later when you are interested then.";
  60.             close;
  61.         }
  62.         mes "[Hugin]";
  63.         mes "Actually, dimensional time travel is possible but I'm so afraid to go there.";
  64.         next;
  65.         mes "[Hugin]";
  66.         mes "Yes! It might be possible for you.";
  67.         next;
  68.         mes "[Hugin]";
  69.         mes "Do you want to time travel?";
  70.         next;
  71.         if (select("No, thanks.","Yes, of course I do!") == 1) {
  72.             mes "[Hugin]";
  73.             mes "Really? But, jumping gigawatts this is such a great opportunity.";
  74.             close;
  75.         }
  76.         mes "[Hugin]";
  77.         mes "I knew that you would understand what I said. Well, please tell what you gonna do.";
  78.         setquest 12316;
  79.         set ghinstance,1;
  80.         next;
  81.     }
  82.     set .@ghins_time,checkquest(12317,PLAYTIME);
  83.     if (.@ghins_time == -1) {
  84.         set .@party_id,getcharid(1);
  85.         set .@p_name$,getpartyname(.@party_id);
  86.         set .@md_name$,"Old Glast Heim";
  87.         if (!instance_check_party(.@party_id)) {
  88.             mes "[Hugin]";
  89.             mes "Why don't you make a party with more than 1 person and talk to me again?";
  90.             close;
  91.         }
  92.         if (getcharid(0) == getpartyleader(.@party_id,2)) {
  93.             if (checkquest(12316) == 1)
  94.                 erasequest 12316;
  95.             if (checkquest(12318,HUNTING) == -1)
  96.                 setquest 12318;
  97.             set .@menu$,"Generate Time Gap:Enter Old Glast Heim:Cancel";
  98.         } else {
  99.             if (checkquest(12316) == 1) {
  100.                 mes "[Hugin]";
  101.                 mes "Have we met before? No way. It's my first time seeing you. What do you want?";
  102.                 erasequest 12316;
  103.             }
  104.             if (checkquest(12318,HUNTING) == -1)
  105.                 setquest 12318;
  106.             set .@menu$,":Enter Old Glast Heim:Cancel";
  107.         }
  108.         switch(select(.@menu$)) {
  109.         case 1:
  110.             switch (instance_create(.@md_name$)) {
  111.             case -3:
  112.                 dispbottom "Memorial Dungeon, 'Old Glast Heim' is already in progress.",0xFFFFFF;
  113.                 close;
  114.             case -4:
  115.             case -2:
  116.             case -1:
  117.                 mes "Party Name: "+.@p_name$;
  118.                 mes "Party Leader: "+strcharinfo(0);
  119.                 mes "^0000ff"+.@md_name$+"^000000 - time gap generation failed.";
  120.                 close;
  121.             }
  122.             mes "[Hugin]";
  123.             mes "After the time gap opens, please tell me again.";
  124.             close;
  125.         case 2:
  126.             switch(instance_enter(.@md_name$)) {
  127.             case 3: //Custom text
  128.                 mes "[Hugin]";
  129.                 mes "Sorry, I won't let you enter the time gap. There's something wrong with the dimension right now.";
  130.                 close;
  131.             case 2:
  132.                 mes "[Hugin]";
  133.                 mes "The time gap is not yet open.";
  134.                 close;
  135.             case 1:
  136.                 mes "[Hugin]";
  137.                 mes "Your body is not fit to enter the time gap. You won't be able to get in if you're not in a party.";
  138.                 close;
  139.             case 0:
  140.                 mapannounce "glast_01",.@p_name$ + " party member " + strcharinfo(0) + " enters the Old Glast Heim",bc_map,"0x00ff99";
  141.                 setquest 12317;
  142.                 //warp "1@gl_k",150,20;
  143.                 close;
  144.             }
  145.             break;
  146.         case 3:
  147.             close;
  148.         }
  149.     } else if (.@ghins_time == 0 || .@ghins_time == 1) {
  150.         mes "[Hugin]";
  151.         mes "Oh, my...";
  152.         mes "You still have after-effects of time travel. You can't travel again with this condition.";
  153.         next;
  154.         mes "[Hugin]";
  155.         mes "Staying healthy is important so please take a break and come back again later.";
  156.         close;
  157.     } else {
  158.         mes "^0000ffAll trace of access to Old Glast Heim have been removed. Now you can talk with Hugin again.^000000";
  159.         if (checkquest(12318,HUNTING) == -1)
  160.             setquest 12318;
  161.         erasequest 12317;
  162.         close;
  163.     }
  164. }
  165.  
  166. // Floor 1
  167. //============================================================
  168. 1@gl_k,149,41,6 script  Varmundt#ghinstance1    654,{
  169.     if (getcharid(0) == getpartyleader(getcharid(1),2)) {
  170.         cutin "gl_barmund1",2;
  171.         mes "[Varmundt]";
  172.         mes "Are you the one ^0000ffHerico^000000 sent to help me?";
  173.         npctalk "Are you the one Herico sent to help me?";
  174.         next;
  175.         select("Oh. Well I...");
  176.         mes "["+strcharinfo(0)+"]";
  177.         mes "Ah yes, I am. Herico told me to meet you.";
  178.         unittalk getcharid(3),"Ah yes, I am. Herico told me to meet you.";
  179.         next;
  180.         cutin "gl_barmund2",2;
  181.         mes "[Varmundt]";
  182.         mes "We don't have much time. We must report to Sir. Heinrich about Himelmez's invasion.";
  183.         npctalk "We don't have much time. We must report to Sir. Heinrich about Himelmez's invasion.";
  184.         next;
  185.         select("Himelmez...");
  186.         mes "["+strcharinfo(0)+"]";
  187.         mes "Who is Himelmez?";
  188.         unittalk getcharid(3),"Who is Himelmez?";
  189.         next;
  190.         cutin "gl_barmund3",2;
  191.         mes "[Varmundt]";
  192.         mes "Herico didn't tell you?";
  193.         npctalk "Herico didn't tell you?";
  194.         next;
  195.         cutin "gl_barmund2",2;
  196.         mes "[Varmundt]";
  197.         mes "She is the Ruler of Death, Dead man's Valkyrie. Himelmez is looking to take the hart of Ymir from us.";
  198.         npctalk "She is the Ruler of Death, Dead man's Valkyrie. Himelmez is looking to take the hart of Ymir from us.";
  199.         next;
  200.         mes "[Varmundt]";
  201.         mes "She might even destroy this whole castle if she wanted to.";
  202.         npctalk "She might even destroy this whole castle if she wanted to.";
  203.         next;
  204.         mes "[Varmundt]";
  205.         mes "Hurry! Report to Sir. Heinrich about Himelmez. I must check the defense barrier here!";
  206.         npctalk "Hurry! Report to Sir. Heinrich about Himelmez. I must check the defense barrier here!";
  207.         close2;
  208.         cutin "gl_barmund2",255;
  209.         donpcevent instance_npcname("Varmundt#ghinstance1")+"::OnDisable";
  210.         end;
  211.     } else {
  212.         cutin "gl_barmund2",2;
  213.         mes "[Varmundt]";
  214.         mes "Where's your leader? I need his help.";
  215.         close2;
  216.         cutin "gl_barmund2",255;
  217.         end;
  218.     }
  219. OnInstanceInit:
  220.     donpcevent instance_npcname("Varmundt#ghinstance1")+"::OnEnable";
  221.     end;
  222. OnDisable:
  223.     hideonnpc instance_npcname("Varmundt#ghinstance1");
  224.     hideoffnpc instance_npcname("Heinrich#ghinstance1");
  225.     hideoffnpc instance_npcname("Varmundt#ghinstance2");
  226.     end;
  227. OnEnable:
  228.     hideoffnpc instance_npcname("Varmundt#ghinstance1");
  229.     end;
  230. }
  231.  
  232. 1@gl_k,145,54,6 script  Khalitzburg Knightage#1 655,{
  233.     mes "["+strnpcinfo(1)+"]";
  234.     switch ((atoi(strnpcinfo(2)) + 1) / 2) {
  235.         case 1: mes "Is there something you need?"; break;
  236.         case 2: mes "What can I do for you?"; break;
  237.         case 3: mes "..."; break;
  238.         case 4: mes "I do not like to chat during work."; break;
  239.         case 5: mes "Doesn't this castle seem weird all of a sudden? Something's not quite right."; break;
  240.         case 6: mes "How do you know Varmundt? I heard that he's not really a friendly man..."; break;
  241.         case 7: mes "Orders please."; break;
  242.         case 8: mes "Please do not make a mess here."; break;
  243.         case 9: mes "I had a weird dream last night. My mom was in it... Wonder if she is ok..."; break;
  244.         case 10: mes "Are you wit Varmundt? Commander is waiting for you."; break;
  245.         case 11: mes "My work shift will be over soon, but the next crew is not coming."; break;
  246.     }
  247.     close;
  248. OnDisable:
  249.     hideonnpc instance_npcname(strnpcinfo(0));
  250.     end;
  251. OnEnable:
  252.     hideoffnpc instance_npcname(strnpcinfo(0));
  253.     end;
  254. }
  255. 1@gl_k,154,54,3 duplicate(Khalitzburg Knightage#1)  Khalitzburg Knightage#2 655
  256. 1@gl_k,145,59,6 duplicate(Khalitzburg Knightage#1)  White Knight#3  657
  257. 1@gl_k,154,59,3 duplicate(Khalitzburg Knightage#1)  White Knight#4  657
  258. 1@gl_k,145,64,6 duplicate(Khalitzburg Knightage#1)  Khalitzburg Knightage#5 655
  259. 1@gl_k,154,64,3 duplicate(Khalitzburg Knightage#1)  Khalitzburg Knightage#6 655
  260. 1@gl_k,145,69,6 duplicate(Khalitzburg Knightage#1)  White Knight#7  657
  261. 1@gl_k,154,69,3 duplicate(Khalitzburg Knightage#1)  White Knight#8  657
  262. 1@gl_k,145,74,6 duplicate(Khalitzburg Knightage#1)  Khalitzburg Knightage#9 655
  263. 1@gl_k,154,74,3 duplicate(Khalitzburg Knightage#1)  Khalitzburg Knightage#10    655
  264. 1@gl_k,145,79,6 duplicate(Khalitzburg Knightage#1)  White Knight#11 657
  265. 1@gl_k,154,79,3 duplicate(Khalitzburg Knightage#1)  White Knight#12 657
  266. 1@gl_k,145,84,6 duplicate(Khalitzburg Knightage#1)  Khalitzburg Knightage#13    655
  267. 1@gl_k,154,84,3 duplicate(Khalitzburg Knightage#1)  Khalitzburg Knightage#14    655
  268. 1@gl_k,145,89,6 duplicate(Khalitzburg Knightage#1)  White Knight#15 657
  269. 1@gl_k,154,89,3 duplicate(Khalitzburg Knightage#1)  White Knight#16 657
  270. 1@gl_k,145,94,6 duplicate(Khalitzburg Knightage#1)  Khalitzburg Knightage#17    655
  271. 1@gl_k,154,94,3 duplicate(Khalitzburg Knightage#1)  Khalitzburg Knightage#18    655
  272. 1@gl_k,145,99,6 duplicate(Khalitzburg Knightage#1)  White Knight#19 657
  273. 1@gl_k,154,99,3 duplicate(Khalitzburg Knightage#1)  White Knight#20 657
  274. 1@gl_k,145,104,6    duplicate(Khalitzburg Knightage#1)  Khalitzburg Knightage#21    655
  275. 1@gl_k,154,104,3    duplicate(Khalitzburg Knightage#1)  Khalitzburg Knightage#22    655
  276.  
  277. 1@gl_k,149,100,6    script  Heinrich#ghinstance1    652,{
  278.     if (getcharid(0) == getpartyleader(getcharid(1),2)) {
  279.         cutin "gl_heinrich2",2;
  280.         select("Sir. Heinrich. Varmundt...");
  281.         mes "["+strcharinfo(0)+"]";
  282.         mes "Sir. Heinrich. Do you know what is happening in the castle now?";
  283.         unittalk getcharid(3),"Sir. Heinrich. Do you know what is happening in the castle now?";
  284.         next;
  285.         mes "[Heinrich]";
  286.         mes "Aren't you the adventurer that came along with Varmundt?";
  287.         npctalk "Aren't you the adventurer that came along with Varmundt?";
  288.         next;
  289.         mes "[Heinrich]";
  290.         mes "What is it? Something wrong with the castle?";
  291.         npctalk "What is it? Something wrong with the castle?";
  292.         next;
  293.         select("Himelmez's invasion...");
  294.         mes "["+strcharinfo(0)+"]";
  295.         mes "Dead man's Valkyrie, Himelmez is coming to take the Ymir's Heart piece hidden inside this castle!";
  296.         unittalk getcharid(3),"Dead man's Valkyrie, Himelmez is coming to take the Ymir's Heart piece hidden inside this castle!";
  297.         next;
  298.         cutin "gl_heinrich1",2;
  299.         mes "[Heinrich]";
  300.         mes "Haha. Funny. Do you really think that is possible?";
  301.         npctalk "Haha. Funny. Do you really think that is possible?";
  302.         next;
  303.         cutin "gl_barmund2",2;
  304.         mes "[Varmundt]";
  305.         mes "I'm not kidding, Sir. Heinrich. If I'm correct, then she will be here very soon.";
  306.         donpcevent instance_npcname("Varmundt#ghinstance2")+"::OnTalk1";
  307.         next;
  308.         mes "[Varmundt]";
  309.         mes "We must hide the heart piece to a safe place before Himelmez's attack starts!";
  310.         donpcevent instance_npcname("Varmundt#ghinstance2")+"::OnTalk2";
  311.         next;
  312.         select("Even if you don't believe me...");
  313.         mes "["+strcharinfo(0)+"]";
  314.         mes "I can't make you believe me, but there's no time to argue!";
  315.         unittalk getcharid(3),"I can't make you believe me, but there's no time to argue!";
  316.         cutin "gl_barmund2",255;
  317.         next;
  318.         cutin "gl_heinrich1",2;
  319.         mes "[Heinrich]";
  320.         mes "Thank you for the help. But, we don't even have our king with us right now.";
  321.         npctalk "Thank you for the help. But, we don't even have our king with us right now.";
  322.         next;
  323.         mes "[Heinrich]";
  324.         mes "We cannot risk moving the heart just because some stranger says so.";
  325.         npctalk "We cannot risk moving the heart just because some stranger says so.";
  326.         close2;
  327.         donpcevent instance_npcname("Heinrich#ghinstance1")+"::OnDisable";
  328.         donpcevent instance_npcname("Heinrich#ghinstance2")+"::OnEnable";
  329.         donpcevent instance_npcname("Himelmez#ghinstance1")+"::OnEnable";
  330.         donpcevent instance_npcname("#talkinstance1")+"::OnEnable";
  331.         mapannounce instance_mapname("1@gl_k"),"????'s: Muahahahaha~!",bc_map,"0xFFFF00",FW_NORMAL,18;
  332.         cutin "gl_heinrich1",255;
  333.         end;
  334.     } else {
  335.         cutin "gl_heinrich2",2;
  336.         mes "[Heinrich]";
  337.         mes "Where is your leader? I must talk to him.";
  338.         close2;
  339.         cutin "gl_heinrich2",255;
  340.         end;
  341.     }
  342. OnInstanceInit:
  343. OnDisable:
  344.     hideonnpc instance_npcname("Heinrich#ghinstance1");
  345.     end;
  346. OnEnable:
  347.     hideoffnpc instance_npcname("Heinrich#ghinstance1");
  348.     end;
  349. }
  350.  
  351. 1@gl_k,152,97,3 script  Varmundt#ghinstance2    654,{
  352.     end;
  353. OnInstanceInit:
  354. OnDisable:
  355.     hideonnpc instance_npcname("Varmundt#ghinstance2");
  356.     end;
  357. OnEnable:
  358.     hideoffnpc instance_npcname("Varmundt#ghinstance2");
  359.     end;
  360. OnTalk1:
  361.     npctalk "I'm not kidding, Sir. Heinrich. If I'm correct, then she will be here very soon.";
  362.     end;
  363. OnTalk2:
  364.     npctalk "We must hide the heart piece to a safe place before Himelmez's attack starts!";
  365.     end;
  366. OnTalk3:
  367.     npctalk "Himelmez!! Already!";
  368.     end;
  369. OnTalk4:
  370.     npctalk "Sir. Heinrich, they're all monsters. You need to give them rest!";
  371.     end;
  372. OnTalk5:
  373.     npctalk "Sir. Heinrich! We don't have much time!";
  374.     end;
  375. OnTalk6:
  376.     npctalk "If you hurry now, there's a chance!";
  377.     end;
  378. }
  379.  
  380. 1@gl_k,149,97,6 script  Heinrich#ghinstance2    652,{
  381.     end;
  382. OnInstanceInit:
  383. OnDisable:
  384.     hideonnpc instance_npcname("Heinrich#ghinstance2");
  385.     end;
  386. OnEnable:
  387.     hideoffnpc instance_npcname("Heinrich#ghinstance2");
  388.     end;
  389. OnTalk1:
  390.     npctalk "Who are you?";
  391.     end;
  392. OnTalk2:
  393.     npctalk "Aren't you a little too feminine to be the Ruler of death? We are not afraid of you...";
  394.     end;
  395. OnTalk3:
  396.     npctalk "What?";
  397.     end;
  398. OnTalk4:
  399.     npctalk "My king is visiting the Rune-Midgarts royal family. He's not back yet.";
  400.     end;
  401. OnTalk5:
  402.     npctalk "And now you are trying to trick me, what has happened to him?!";
  403.     end;
  404. OnTalk6:
  405.     npctalk "She probably already knows where the Ymir's heart piece is.";
  406.     end;
  407. OnTalk7:
  408.     npctalk "All Khalitzburg and White Knights should follow me now...";
  409.     end;
  410. OnTalk8:
  411.     npctalk "My men... This can't be happening!";
  412.     end;
  413. OnTalk9:
  414.     npctalk "I'm so sorry...";
  415.     end;
  416. OnTalk10:
  417.     npctalk "I am sorry, my knights! Forgive me!";
  418.     end;
  419. }
  420.  
  421. 1@gl_k,149,100,6    script  Heinrich#ghinstance3    652,{
  422.     end;
  423. OnInstanceInit:
  424. OnDisable:
  425.     hideonnpc instance_npcname("Heinrich#ghinstance3");
  426.     end;
  427. OnEnable:
  428.     hideoffnpc instance_npcname("Heinrich#ghinstance3");
  429.     end;
  430. OnTalk1:
  431.     npctalk "I killed my own men...";
  432.     end;
  433. OnTalk2:
  434.     npctalk "Varmundt is right. Now is not the time for mourning.";
  435.     end;
  436. OnTalk3:
  437.     npctalk "I have a request to you followers.";
  438.     end;
  439. OnTalk4:
  440.     npctalk "Himelmez can turn living beings into monsters.";
  441.     end;
  442. OnTalk5:
  443.     npctalk "But, there might still be survivors here.";
  444.     end;
  445. OnTalk6:
  446.     npctalk "Destroy the monsters and find any survivors.";
  447.     end;
  448. OnTalk7:
  449.     npctalk "Varmundt and I will chase Himelmez.";
  450.     end;
  451. OnTalk8:
  452.     npctalk "Very well, Varmundt. Let's find Himelmez.";
  453.     end;
  454. }
  455.  
  456. 1@gl_k,149,89,1 script  Himelmez#ghinstance1    650,{
  457.     end;
  458. OnInstanceInit:
  459. OnDisable:
  460.     hideonnpc instance_npcname("Himelmez#ghinstance1");
  461.     end;
  462. OnEnable:
  463.     hideoffnpc instance_npcname("Himelmez#ghinstance1");
  464.     end;
  465. OnTalk1:
  466.     npctalk "Well well~ Am I interrupting you? Weren't you expecting me?";
  467.     end;
  468. OnTalk2:
  469.     npctalk "My name is Lisa Kahn Himelmez. Master of Dullahan, Dead man's Valkyrie, that's what they call me.";
  470.     end;
  471. OnTalk3:
  472.     npctalk "Let's see if you can relax like that after you find out where your king is.";
  473.     end;
  474. OnTalk4:
  475.     npctalk "Hmm, now I have your attention do I not?";
  476.     end;
  477. OnTalk5:
  478.     npctalk "It's a pity to meet you in a situation like this.";
  479.     end;
  480. Ontalk6:
  481.     npctalk "Well~ I would love to sit down and explain for you, but I'm kind of busy today~";
  482.     end;
  483. Ontalk7:
  484.     npctalk "I have business to take care of. My minions will treat you well enough for me~";
  485.     end;
  486. }
  487.  
  488. // Control Timer
  489. //============================================================
  490. 1@gl_k,0,0,0    script  #talkinstance1  -1,{
  491. OnInstanceInit:
  492. OnDisable:
  493.     disablenpc instance_npcname("#talkinstance1");
  494.     end;
  495. OnEnable:
  496.     enablenpc instance_npcname("#talkinstance1");
  497.     initnpctimer;
  498.     end;
  499. OnTimer1500:
  500.     donpcevent instance_npcname("Heinrich#ghinstance2")+"::OnTalk1";
  501.     end;
  502. OnTimer4500:
  503.     donpcevent instance_npcname("Himelmez#ghinstance1")+"::OnTalk1";
  504.     end;
  505. OnTimer10000:
  506.     donpcevent instance_npcname("Varmundt#ghinstance2")+"::OnTalk3";
  507.     end;
  508. OnTimer17500:
  509.     donpcevent instance_npcname("Himelmez#ghinstance1")+"::OnTalk2";
  510.     end;
  511. OnTimer22000:
  512.     donpcevent instance_npcname("Heinrich#ghinstance2")+"::OnTalk2";
  513.     end;
  514. OnTimer28500:
  515.     donpcevent instance_npcname("Himelmez#ghinstance1")+"::OnTalk3";
  516.     end;
  517. OnTimer36000:
  518.     donpcevent instance_npcname("Heinrich#ghinstance2")+"::OnTalk3";
  519.     end;
  520. OnTimer41000:
  521.     donpcevent instance_npcname("Himelmez#ghinstance1")+"::OnTalk4";
  522.     end;   
  523. OnTimer54000:
  524.     donpcevent instance_npcname("Himelmez#ghinstance1")+"::OnTalk5";
  525.     end;
  526. OnTimer59000:
  527.     donpcevent instance_npcname("Heinrich#ghinstance2")+"::OnTalk4";
  528.     end;
  529. OnTimer66500:
  530.     donpcevent instance_npcname("Heinrich#ghinstance2")+"::OnTalk5";
  531.     end;
  532. OnTimer71500:
  533.     donpcevent instance_npcname("Himelmez#ghinstance1")+"::OnTalk6";
  534.     end;
  535. OnTimer78000:
  536.     donpcevent instance_npcname("Himelmez#ghinstance1")+"::OnTalk7";
  537.     end;
  538. OnTimer84500:
  539.     donpcevent instance_npcname("Heinrich#ghinstance2")+"::OnTalk6";
  540.     donpcevent instance_npcname("Himelmez#ghinstance1")+"::OnDisable";
  541.     end;
  542. OnTimer90500:
  543.     donpcevent instance_npcname("Heinrich#ghinstance2")+"::OnTalk7";
  544.     end;
  545. OnTimer92000:
  546.     for (set .@i,1; .@i<=20; set .@i,.@i+4) {
  547.         hideonnpc instance_npcname("Khalitzburg Knightage#"+.@i);
  548.         hideonnpc instance_npcname("Khalitzburg Knightage#"+(.@i+1));
  549.         hideonnpc instance_npcname("White Knight#"+(.@i+2));
  550.         hideonnpc instance_npcname("White Knight#"+(.@i+3));
  551.     }
  552.     hideonnpc instance_npcname("Khalitzburg Knightage#21");
  553.     hideonnpc instance_npcname("Khalitzburg Knightage#22");
  554.  
  555.     set .@map$,instance_mapname("1@gl_k");
  556.     set .@label$,instance_npcname("#talkinstance1")+"::OnMyMobDead";
  557.     monster .@map$,145,59,"Abysmal Knight",2470,1,.@label$;
  558.     monster .@map$,154,59,"Abysmal Knight",2470,1,.@label$;
  559.     monster .@map$,145,69,"Abysmal Knight",2470,1,.@label$;
  560.     monster .@map$,154,69,"Abysmal Knight",2470,1,.@label$;
  561.     monster .@map$,145,79,"Abysmal Knight",2470,1,.@label$;
  562.     monster .@map$,154,79,"Abysmal Knight",2470,1,.@label$;
  563.     monster .@map$,145,89,"Abysmal Knight",2470,1,.@label$;
  564.     monster .@map$,154,89,"Abysmal Knight",2470,1,.@label$;
  565.     monster .@map$,145,99,"Abysmal Knight",2470,1,.@label$;
  566.     monster .@map$,154,99,"Abysmal Knight",2470,1,.@label$;
  567.  
  568.     monster .@map$,145,54,"Khalitzburg",2471,1,.@label$;
  569.     unittalk $@mobid[0],"Water... Someone give me water...",1;
  570.     monster .@map$,154,54,"Khalitzburg",2471,1,.@label$;
  571.     unittalk $@mobid[0],"Kkkrrrruughgh...",1;
  572.     monster .@map$,145,64,"Khalitzburg",2471,1,.@label$;
  573.     unittalk $@mobid[0],"Sir. Heinrich. Save me...",1;
  574.     monster .@map$,154,64,"Khalitzburg",2471,1,.@label$;
  575.     unittalk $@mobid[0],"I miss my sister...",1;
  576.     monster .@map$,145,74,"Khalitzburg",2471,1,.@label$;
  577.     unittalk $@mobid[0],"Don't leave me alone, help me.",1;
  578.     monster .@map$,154,74,"Khalitzburg",2471,1,.@label$;
  579.     unittalk $@mobid[0],"Aaarrrrrhhhh",1;
  580.     monster .@map$,145,84,"Khalitzburg",2471,1,.@label$;
  581.     unittalk $@mobid[0],"I am so thirsty.",1;
  582.     monster .@map$,154,84,"Khalitzburg",2471,1,.@label$;
  583.     unittalk $@mobid[0],"Oh...No...I can't die yet...",1;
  584.     monster .@map$,145,94,"Khalitzburg",2471,1,.@label$;
  585.     unittalk $@mobid[0],"I feel sick to my stomach urrgg",1;
  586.     monster .@map$,154,94,"Khalitzburg",2471,1,.@label$;
  587.     unittalk $@mobid[0],"Can someone...",1;
  588.     monster .@map$,145,104,"Khalitzburg",2471,1,.@label$;
  589.     unittalk $@mobid[0],"Arrgg... My body",1;
  590.     monster .@map$,154,104,"Khalitzburg",2471,1,.@label$;
  591.     unittalk $@mobid[0],"My throat is burning!",1;
  592.     end;
  593. OnTimer94000:
  594.     donpcevent instance_npcname("Heinrich#ghinstance2")+"::OnTalk8";
  595.     end;
  596. OnTimer96500:
  597.     donpcevent instance_npcname("Varmundt#ghinstance2")+"::OnTalk4";
  598.     end;
  599. OnTimer100000:
  600.     donpcevent instance_npcname("Heinrich#ghinstance2")+"::OnTalk9";
  601.     end;
  602. OnTimer103000:
  603.     donpcevent instance_npcname("Heinrich#ghinstance2")+"::OnTalk10";
  604.     end;
  605. OnTimer106000:
  606.     mapannounce instance_mapname("1@gl_k"),"Sir. Heinrich: Death to all!",bc_map,"0xFFFF00",FW_NORMAL,18;
  607.     end;
  608. OnTimer109000:
  609.     mapannounce instance_mapname("1@gl_k"),"Sir. Heinrich: Go back to the darkness!",bc_map,"0xFFFF00",FW_NORMAL,18;
  610.     end;
  611. OnTimer109500:
  612.     enablenpc instance_npcname(".#ghinstance22");
  613.     enablenpc instance_npcname(".#ghinstance21");
  614.     donpcevent instance_npcname(".#ghinstance22")+"::OnEffect1";
  615.     donpcevent instance_npcname(".#ghinstance21")+"::OnEffect1";
  616.     end;
  617. OnTimer110000:
  618.     enablenpc instance_npcname(".#ghinstance20");
  619.     enablenpc instance_npcname(".#ghinstance19");
  620.     enablenpc instance_npcname(".#ghinstance18");
  621.     enablenpc instance_npcname(".#ghinstance17");
  622.     donpcevent instance_npcname(".#ghinstance20")+"::OnEffect1";
  623.     donpcevent instance_npcname(".#ghinstance19")+"::OnEffect1";
  624.     donpcevent instance_npcname(".#ghinstance18")+"::OnEffect1";
  625.     donpcevent instance_npcname(".#ghinstance17")+"::OnEffect1";
  626.     end;
  627. OnTimer110500:
  628.     enablenpc instance_npcname(".#ghinstance16");
  629.     enablenpc instance_npcname(".#ghinstance15");
  630.     enablenpc instance_npcname(".#ghinstance14");
  631.     enablenpc instance_npcname(".#ghinstance13");
  632.     donpcevent instance_npcname(".#ghinstance16")+"::OnEffect1";
  633.     donpcevent instance_npcname(".#ghinstance15")+"::OnEffect1";
  634.     donpcevent instance_npcname(".#ghinstance14")+"::OnEffect1";
  635.     donpcevent instance_npcname(".#ghinstance13")+"::OnEffect1";
  636.     end;
  637. OnTimer111000:
  638.     enablenpc instance_npcname(".#ghinstance12");
  639.     enablenpc instance_npcname(".#ghinstance11");
  640.     enablenpc instance_npcname(".#ghinstance10");
  641.     enablenpc instance_npcname(".#ghinstance9");
  642.     donpcevent instance_npcname(".#ghinstance12")+"::OnEffect1";
  643.     donpcevent instance_npcname(".#ghinstance11")+"::OnEffect1";
  644.     donpcevent instance_npcname(".#ghinstance10")+"::OnEffect1";
  645.     donpcevent instance_npcname(".#ghinstance9")+"::OnEffect1";
  646.     end;
  647. OnTimer111500:
  648.     enablenpc instance_npcname(".#ghinstance8");
  649.     enablenpc instance_npcname(".#ghinstance7");
  650.     enablenpc instance_npcname(".#ghinstance6");
  651.     enablenpc instance_npcname(".#ghinstance5");
  652.     donpcevent instance_npcname(".#ghinstance8")+"::OnEffect1";
  653.     donpcevent instance_npcname(".#ghinstance7")+"::OnEffect1";
  654.     donpcevent instance_npcname(".#ghinstance6")+"::OnEffect1";
  655.     donpcevent instance_npcname(".#ghinstance5")+"::OnEffect1";
  656.     end;
  657. OnTimer112000:
  658.     enablenpc instance_npcname(".#ghinstance4");
  659.     enablenpc instance_npcname(".#ghinstance3");
  660.     enablenpc instance_npcname(".#ghinstance2");
  661.     enablenpc instance_npcname(".#ghinstance1");
  662.     donpcevent instance_npcname(".#ghinstance4")+"::OnEffect1";
  663.     donpcevent instance_npcname(".#ghinstance3")+"::OnEffect1";
  664.     donpcevent instance_npcname(".#ghinstance2")+"::OnEffect1";
  665.     donpcevent instance_npcname(".#ghinstance1")+"::OnEffect1";
  666.     donpcevent instance_npcname("Heinrich#ghinstance3")+"::OnEnable";
  667.     donpcevent instance_npcname("Heinrich#ghinstance2")+"::OnDisable";
  668.  
  669.     for (set .@i,1; .@i<=22; set .@i,.@i+1)
  670.         disablenpc instance_npcname(".#ghinstance"+.@i);
  671.  
  672.     killmonster instance_mapname("1@gl_k"),instance_npcname("#talkinstance1")+"::OnMyMobDead";
  673.     end;
  674. OnTimer112500:
  675.     donpcevent instance_npcname("Heinrich#ghinstance3")+"::OnTalk1";
  676.     end;
  677. OnTimer115500:
  678.     donpcevent instance_npcname("Varmundt#ghinstance2")+"::OnTalk5";
  679.     end;
  680. OnTimer118500:
  681.     donpcevent instance_npcname("Varmundt#ghinstance2")+"::OnTalk6";
  682.     end;
  683. OnTimer121500:
  684.     donpcevent instance_npcname("Heinrich#ghinstance3")+"::OnTalk2";
  685.     end;
  686. OnTimer124500:
  687.     donpcevent instance_npcname("Heinrich#ghinstance3")+"::OnTalk3";
  688.     end;
  689. OnTimer127500:
  690.     donpcevent instance_npcname("Heinrich#ghinstance3")+"::OnTalk4";
  691.     end;
  692. OnTimer130500:
  693.     donpcevent instance_npcname("Heinrich#ghinstance3")+"::OnTalk5";
  694.     end;
  695. OnTimer134500:
  696.     donpcevent instance_npcname("Heinrich#ghinstance3")+"::OnTalk6";
  697.     end;
  698. OnTimer138500:
  699.     donpcevent instance_npcname("Heinrich#ghinstance3")+"::OnTalk7";
  700.     end;
  701. OnTimer143500:
  702.     donpcevent instance_npcname("Heinrich#ghinstance3")+"::OnTalk8";
  703.     end;
  704. OnTimer147500:
  705.     donpcevent instance_npcname("Heinrich#ghinstance3")+"::OnDisable";
  706.     end;
  707. OnTimer148500:
  708.     donpcevent instance_npcname("Varmundt#ghinstance2")+"::OnDisable";
  709.     stopnpctimer;
  710.     donpcevent instance_npcname("#ghinstancewarp1")+"::OnEnable";
  711.     donpcevent instance_npcname("#ghinstancewarp2")+"::OnEnable";
  712.     mapannounce instance_mapname("1@gl_k"),"A portal has opened to the west.",bc_map,"0xFFFF00";
  713.     donpcevent instance_npcname("#talkinstance1")+"::OnDisable";
  714.     donpcevent instance_npcname("#ghmemorialmob01")+"::OnEnable";
  715.     end;
  716. OnMyMobDead:
  717.     end;
  718. }
  719.  
  720. 1@gl_k,145,54,6 script  .#ghinstance1   111,{
  721.     end;
  722. OnInstanceInit:
  723. OnDisable:
  724.     disablenpc instance_npcname(strnpcinfo(0));
  725.     end;
  726. OnEnable:
  727.     enablenpc instance_npcname(strnpcinfo(0));
  728.     end;
  729. OnEffect1:
  730.     specialeffect EF_GRANDCROSS;
  731.     specialeffect EF_LEXAETERNA;
  732.     end;
  733. }
  734. 1@gl_k,154,54,3 duplicate(.#ghinstance1)    .#ghinstance2   111
  735. 1@gl_k,145,59,6 duplicate(.#ghinstance1)    .#ghinstance3   111
  736. 1@gl_k,154,59,3 duplicate(.#ghinstance1)    .#ghinstance4   111
  737. 1@gl_k,145,64,6 duplicate(.#ghinstance1)    .#ghinstance5   111
  738. 1@gl_k,154,64,3 duplicate(.#ghinstance1)    .#ghinstance6   111
  739. 1@gl_k,145,69,6 duplicate(.#ghinstance1)    .#ghinstance7   111
  740. 1@gl_k,154,69,3 duplicate(.#ghinstance1)    .#ghinstance8   111
  741. 1@gl_k,145,74,6 duplicate(.#ghinstance1)    .#ghinstance9   111
  742. 1@gl_k,154,74,3 duplicate(.#ghinstance1)    .#ghinstance10  111
  743. 1@gl_k,145,79,6 duplicate(.#ghinstance1)    .#ghinstance11  111
  744. 1@gl_k,154,79,3 duplicate(.#ghinstance1)    .#ghinstance12  111
  745. 1@gl_k,145,84,6 duplicate(.#ghinstance1)    .#ghinstance13  111
  746. 1@gl_k,154,84,3 duplicate(.#ghinstance1)    .#ghinstance14  111
  747. 1@gl_k,145,89,6 duplicate(.#ghinstance1)    .#ghinstance15  111
  748. 1@gl_k,154,89,3 duplicate(.#ghinstance1)    .#ghinstance16  111
  749. 1@gl_k,145,94,6 duplicate(.#ghinstance1)    .#ghinstance17  111
  750. 1@gl_k,154,94,3 duplicate(.#ghinstance1)    .#ghinstance18  111
  751. 1@gl_k,145,99,6 duplicate(.#ghinstance1)    .#ghinstance19  111
  752. 1@gl_k,154,99,3 duplicate(.#ghinstance1)    .#ghinstance20  111
  753. 1@gl_k,145,104,6    duplicate(.#ghinstance1)    .#ghinstance21  111
  754. 1@gl_k,154,104,3    duplicate(.#ghinstance1)    .#ghinstance22  111
  755.  
  756. 1@gl_k,96,80,0  script  #ghinstancewarp1    45,2,2,{
  757.     end;
  758. OnInstanceInit:
  759. OnDisable:
  760.     disablenpc instance_npcname(strnpcinfo(0));
  761.     end;
  762. OnEnable:
  763.     enablenpc instance_npcname(strnpcinfo(0));
  764.     end;
  765. OnTouch:
  766.     set .@map1$,instance_mapname("1@gl_k");
  767.     set .@map2$,instance_mapname("2@gl_k");
  768.     switch(atoi(replacestr(strnpcinfo(2),"ghinstancewarp",""))) {
  769.         case 1: warp .@map1$,80,80; break;
  770.         case 2: warp .@map1$,105,80; break;
  771.         case 3: warp .@map1$,215,79; break;
  772.         case 4: warp .@map1$,195,79; break;
  773.         case 5: warp .@map1$,215,216; break;
  774.         case 6: warp .@map1$,235,216; break;
  775.         case 7: warp .@map2$,150,46; break;
  776.         case 8: warp .@map2$,126,123; break;
  777.         case 9: warp .@map2$,150,116; break;
  778.         case 10: warp .@map2$,174,101; break;
  779.         case 11: warp .@map2$,150,110; break;
  780.         case 12: warp .@map2$,150,179; break;
  781.         case 13: warp .@map2$,150,160; break;
  782.         case 14: warp .@map1$,150,281; break;
  783.         case 15: warp .@map1$,48,168; break;
  784.     }
  785.     end;
  786. }
  787. 1@gl_k,90,80,0  duplicate(#ghinstancewarp1) #ghinstancewarp2    45,2,2
  788. 1@gl_k,202,79,0 duplicate(#ghinstancewarp1) #ghinstancewarp3    45,2,2
  789. 1@gl_k,206,79,0 duplicate(#ghinstancewarp1) #ghinstancewarp4    45,2,2
  790. 1@gl_k,228,216,0    duplicate(#ghinstancewarp1) #ghinstancewarp5    45,2,2
  791. 1@gl_k,222,216,0    duplicate(#ghinstancewarp1) #ghinstancewarp6    45,2,2
  792. 1@gl_k,150,284,0    duplicate(#ghinstancewarp1) #ghinstancewarp7    45,2,2
  793. 2@gl_k,145,123,0    duplicate(#ghinstancewarp1) #ghinstancewarp8    45,2,2
  794. 2@gl_k,136,122,0    duplicate(#ghinstancewarp1) #ghinstancewarp9    45,2,2
  795. 2@gl_k,154,101,0    duplicate(#ghinstancewarp1) #ghinstancewarp10   45,2,2
  796. 2@gl_k,165,101,0    duplicate(#ghinstancewarp1) #ghinstancewarp11   45,2,2
  797. 2@gl_k,150,163,0    duplicate(#ghinstancewarp1) #ghinstancewarp12   45,2,2
  798. 2@gl_k,150,167,0    duplicate(#ghinstancewarp1) #ghinstancewarp13   45,2,2
  799. 2@gl_k,150,32,0 duplicate(#ghinstancewarp1) #ghinstancewarp14   45,2,2
  800. 1@gl_k,69,168,0 duplicate(#ghinstancewarp1) #ghinstancewarp15   45,2,2
  801.  
  802. // Sector 1 Mobs
  803. //============================================================
  804. 1@gl_k,0,0,0    script  #ghmemorialmob01    -1,{
  805. OnInstanceInit:
  806. OnDisable:
  807.     disablenpc instance_npcname("#ghmemorialmob01");
  808.     end;
  809. OnEnable:
  810.     enablenpc instance_npcname("#ghmemorialmob01");
  811.     set .@map$,instance_mapname("1@gl_k");
  812.     set .@label$,instance_npcname("#ghmemorialmob01")+"::OnMyMobDead";
  813.     areamonster .@map$,76,99,87,10,"Grand Chamberlain in pain",2466,15,.@label$;
  814.     areamonster .@map$,67,39,12,6,"Corrupted Monk",2465,20,.@label$;
  815.     areamonster .@map$,67,39,12,6,"Grand Chamberlain in pain",2466,3,.@label$;
  816.     areamonster .@map$,32,75,51,58,"Corrupted Steward",2464,6,.@label$;
  817.     areamonster .@map$,45,84,6,137,"Corrupted Steward",2464,12,.@label$;
  818.     end;
  819. OnMyMobDead:
  820.     set .@map$,instance_mapname("1@gl_k");
  821.     set .@label$,instance_npcname("#ghmemorialmob01")+"::OnMyMobDead";
  822.     set .@mob_dead_num,56 - mobcount(.@map$,.@label$);
  823.     if (.@mob_dead_num > 35) {
  824.         mapannounce .@map$,"Himelmez's curse is getting weaker. Find any survivors!",bc_map,"0xFFFFFF";
  825.         killmonster .@map$,.@label$;
  826.         donpcevent instance_npcname("Altar boy Domun#clearGH")+"::OnEnable";
  827.         donpcevent instance_npcname("#ghmemorialmob01")+"::OnDisable";
  828.     }
  829.     end;
  830. }
  831.  
  832. 1@gl_k,17,51,3  script  Altar boy Domun#clearGH 706,{
  833.     if (getcharid(0) == getpartyleader(getcharid(1),2)) {
  834.         mes "[Altar boy Domun]";
  835.         mes "Save me! Save me!!!";
  836.         npctalk "Save me! Save me!!!",1;
  837.         next;
  838.         select("Hold on! Are you the only survivor?");
  839.         mes "["+strcharinfo(0)+"]";
  840.         mes "Hold on! Are you the only survivor?";
  841.         unittalk getcharid(3),"Hold on! Are you the only survivor?";
  842.         next;
  843.         mes "[Altar boy Domun]";
  844.         mes "Chamberlains... monks... They all turned into monsters. I couldn't do anything.";
  845.         npctalk "Chamberlains... monks... They all turned into monsters. I couldn't do anything.";
  846.         next;
  847.         mes "[Altar boy Domun]";
  848.         mes "All I could do was... Just hide in here... Nothing, nothing I could do...";
  849.         npctalk "All I could do was... Just hide in here... Nothing, nothing I could do...";
  850.         next;
  851.         select("Pull it together!");
  852.         mes "["+strcharinfo(0)+"]";
  853.         mes "Wake up kid! Go east and find the middle passage to the outside! That is safe!";
  854.         unittalk getcharid(3),"Wake up kid! Go east and find the middle passage to the outside! That is safe!";
  855.         next;
  856.         mes "[Altar boy Domun]";
  857.         mes "To the east passage? Alone? How?";
  858.         npctalk "To the east passage? Alone? How?";
  859.         next;
  860.         select("I will give you a weapon.");
  861.         mes "["+strcharinfo(0)+"]";
  862.         mes "Here's a weapon. Just close your eye and swing for those monsters.";
  863.         unittalk getcharid(3),"Here's a weapon. Just close your eye and swing for those monsters.";
  864.         next;
  865.         mes "[Altar boy Domun]";
  866.         mes "Ok, I... I'l try.";
  867.         npctalk "Ok, I... I'l try.";
  868.         close2;
  869.         donpcevent instance_npcname("Altar boy Domun#clearGH")+"::OnDisable";
  870.         donpcevent instance_npcname("#ghmemorialmob02")+"::OnEnable";
  871.         end;
  872.     } else {
  873.         mes "[Altar boy Domun]";
  874.         mes "Save me, save me, please...";
  875.         close;
  876.     }
  877. OnInstanceInit:
  878. OnDisable:
  879.     hideonnpc instance_npcname("Altar boy Domun#clearGH");
  880.     end;
  881. OnEnable:
  882.     hideoffnpc instance_npcname("Altar boy Domun#clearGH");
  883.     end;
  884. }
  885.  
  886. // Sector 2 Mobs
  887. //============================================================
  888. 1@gl_k,0,0,0    script  #ghmemorialmob02    -1,{
  889. OnInstanceInit:
  890. OnDisable:
  891.     disablenpc instance_npcname("#ghmemorialmob02");
  892.     end;
  893. OnEnable:
  894.     enablenpc instance_npcname("#ghmemorialmob02");
  895.     donpcevent instance_npcname("#ghinstancewarp3")+"::OnEnable";
  896.     donpcevent instance_npcname("#ghinstancewarp4")+"::OnEnable";
  897.     set .@map$,instance_mapname("1@gl_k");
  898.     set .@label$,instance_npcname("#ghmemorialmob02")+"::OnMyMobDead";
  899.     mapannounce .@map$,"A portal has opened to the east.",bc_map,"0xFFFF00";
  900.     areamonster .@map$,241,113,291,19,"Outraged Refiner",2466,12,.@label$;
  901.     areamonster .@map$,241,113,291,19,"Decomposed Blacksmith",2464,12,.@label$;
  902.     areamonster .@map$,227,217,291,135,"Outraged Refiner",2466,12,.@label$;
  903.     areamonster .@map$,227,217,291,135,"Decomposed Blacksmith",2464,12,.@label$;
  904.     end;
  905. OnMyMobDead:
  906.     set .@map$,instance_mapname("1@gl_k");
  907.     set .@label$,instance_npcname("#ghmemorialmob02")+"::OnMyMobDead";
  908.     set .@mob_dead_num,48 - mobcount(.@map$,.@label$);
  909.     if (.@mob_dead_num > 28) {
  910.         mapannounce .@map$,"Himelmez's curse is getting weaker. Find any survivors!",bc_map,"0xFFFFFF";
  911.         killmonster .@map$,.@label$;
  912.         donpcevent instance_npcname("Holgren the Destroyer")+"::OnEnable";
  913.         donpcevent instance_npcname("#ghmemorialmob02")+"::OnDisable";
  914.     }
  915.     end;
  916. }
  917.  
  918. 1@gl_k,291,145,3    script  Holgren the Destroyer   726,{
  919.     if (getcharid(0) == getpartyleader(getcharid(1),2)) {
  920.         mes "[Holgren the Destroyer]";
  921.         mes "Die!! You shall die!!!";
  922.         npctalk "Die!! You shall die!!!";
  923.         specialeffect EF_CRASHEARTH;
  924.         next;
  925.         select("Relax! I'm not a monster!");
  926.         mes "["+strcharinfo(0)+"]";
  927.         mes "Relax! I am Human. Are you alone? Anyone else here?";
  928.         unittalk getcharid(3),"Relax! I am Human. Are you alone? Anyone else here?";
  929.         next;
  930.         mes "[Holgren the Destroyer]";
  931.         mes "It's only me alive.";
  932.         npctalk "It's only me alive.";
  933.         next;
  934.         select("It's dangerous here...");
  935.         mes "["+strcharinfo(0)+"]";
  936.         mes "It's dangerous here. You know the way to the middle passage? Can you move?";
  937.         unittalk getcharid(3),"It's dangerous here. You know the way to the middle passage? Can you move?";
  938.         next;
  939.         mes "[Holgren the Destroyer]";
  940.         mes "Yes, I can move. I need to get out of here.";
  941.         npctalk "Yes, I can move. I need to get out of here.";
  942.         next;
  943.         select("Be safe...");
  944.         mes "["+strcharinfo(0)+"]";
  945.         mes "Sorry, I can't go with you.";
  946.         unittalk getcharid(3),"Sorry, I can't go with you.";
  947.         next;
  948.         mes "[Holgren the Destroyer]";
  949.         mes "It's ok. You've already done enough. I can help myself. Good luck to you too.";
  950.         npctalk "It's ok. You've already done enough. I can help myself. Good luck to you too.";
  951.         close2;
  952.         donpcevent instance_npcname("Holgren the Destroyer")+"::OnDisable";
  953.         donpcevent instance_npcname("#ghmemorialmob03")+"::OnEnable";
  954.         end;
  955.     } else {
  956.         mes "[Holgren the Destroyer]";
  957.         mes "You human?";
  958.         close;
  959.     }
  960. OnInstanceInit:
  961. OnDisable:
  962.     hideonnpc instance_npcname("Holgren the Destroyer");
  963.     end;
  964. OnEnable:
  965.     hideoffnpc instance_npcname("Holgren the Destroyer");
  966.     end;
  967. }
  968.  
  969. // Tramp Mobs
  970. //============================================================
  971. 1@gl_k,221,82,3 script  A dead man#GHtramp1 849,4,4,{
  972.     end;
  973. OnTouch:
  974.     set .@i,rand(1,10);
  975.     if (.@i == 1) set .@mobs,3;
  976.     else if (.@i == 2) set .@mobs,4;
  977.     else if (.@i == 3) set .@mobs,5;
  978.     else if (.@i < 7) set .@mobs,6;
  979.     else set .@mobs,7;
  980.     getmapxy(.@map$,.@x,.@y,1);
  981.     specialeffect EF_VENOMDUST;
  982.     monster .@map$,.@x,.@y,"Maggot",2467,.@mobs,instance_npcname(strnpcinfo(0))+"::OnMyMobDead";
  983.     disablenpc instance_npcname(strnpcinfo(0));
  984.     end;
  985. OnMyMobDead:
  986.     end;
  987. OnInstanceInit:
  988. OnEnable:
  989.     enablenpc instance_npcname(strnpcinfo(0));
  990.     end;
  991. OnDisable:
  992.     disablenpc instance_npcname(strnpcinfo(0));
  993.     end;
  994. }
  995. 1@gl_k,213,63,7 duplicate(A dead man#GHtramp1)  A dead man#GHtramp2 849,4,4
  996. 1@gl_k,230,50,2 duplicate(A dead man#GHtramp1)  A dead man#GHtramp3 849,4,4
  997. 1@gl_k,222,39,2 duplicate(A dead man#GHtramp1)  A dead man#GHtramp4 849,4,4
  998. 1@gl_k,214,27,3 duplicate(A dead man#GHtramp1)  A dead man#GHtramp5 849,4,4
  999. 1@gl_k,223,17,2 duplicate(A dead man#GHtramp1)  A dead man#GHtramp6 849,4,4
  1000. 1@gl_k,235,16,4 duplicate(A dead man#GHtramp1)  A dead man#GHtramp7 849,4,4
  1001. 1@gl_k,251,20,5 duplicate(A dead man#GHtramp1)  A dead man#GHtramp8 849,4,4
  1002. 1@gl_k,240,43,7 duplicate(A dead man#GHtramp1)  A dead man#GHtramp9 849,4,4
  1003. 1@gl_k,271,19,1 duplicate(A dead man#GHtramp1)  A dead man#GHtramp10    849,4,4
  1004. 1@gl_k,246,62,7 duplicate(A dead man#GHtramp1)  A dead man#GHtramp11    849,4,4
  1005. 1@gl_k,282,48,5 duplicate(A dead man#GHtramp1)  A dead man#GHtramp12    849,4,4
  1006. 1@gl_k,285,81,7 duplicate(A dead man#GHtramp1)  A dead man#GHtramp13    849,4,4
  1007. 1@gl_k,241,86,5 duplicate(A dead man#GHtramp1)  A dead man#GHtramp14    849,4,4
  1008. 1@gl_k,249,101,3    duplicate(A dead man#GHtramp1)  A dead man#GHtramp15    849,4,4
  1009. 1@gl_k,276,106,7    duplicate(A dead man#GHtramp1)  A dead man#GHtramp16    849,4,4
  1010. 1@gl_k,252,120,7    duplicate(A dead man#GHtramp1)  A dead man#GHtramp17    849,4,4
  1011. 1@gl_k,258,150,1    duplicate(A dead man#GHtramp1)  A dead man#GHtramp18    849,4,4
  1012. 1@gl_k,255,157,6    duplicate(A dead man#GHtramp1)  A dead man#GHtramp19    849,4,4
  1013. 1@gl_k,261,164,7    duplicate(A dead man#GHtramp1)  A dead man#GHtramp20    849,4,4
  1014. 1@gl_k,269,173,7    duplicate(A dead man#GHtramp1)  A dead man#GHtramp21    849,4,4
  1015. 1@gl_k,280,167,3    duplicate(A dead man#GHtramp1)  A dead man#GHtramp22    849,4,4
  1016. 1@gl_k,293,161,3    duplicate(A dead man#GHtramp1)  A dead man#GHtramp23    849,4,4
  1017. 1@gl_k,226,96,3 duplicate(A dead man#GHtramp1)  A dead man#GHtramp24    849,4,4
  1018. 1@gl_k,222,119,5    duplicate(A dead man#GHtramp1)  A dead man#GHtramp25    849,4,4
  1019. 1@gl_k,233,123,3    duplicate(A dead man#GHtramp1)  A dead man#GHtramp26    849,4,4
  1020. 2@gl_k,147,203,5    duplicate(A dead man#GHtramp1)  A dead man#GHtramp27    849,4,4
  1021. 2@gl_k,141,222,3    duplicate(A dead man#GHtramp1)  A dead man#GHtramp28    849,4,4
  1022. 2@gl_k,167,225,5    duplicate(A dead man#GHtramp1)  A dead man#GHtramp29    849,4,4
  1023. 2@gl_k,145,236,5    duplicate(A dead man#GHtramp1)  A dead man#GHtramp30    849,4,4
  1024. 2@gl_k,143,260,3    duplicate(A dead man#GHtramp1)  A dead man#GHtramp31    849,4,4
  1025. 2@gl_k,170,259,3    duplicate(A dead man#GHtramp1)  A dead man#GHtramp32    849,4,4
  1026. 2@gl_k,143,197,5    duplicate(A dead man#GHtramp1)  A dead man#GHtramp33    849,4,4
  1027. 2@gl_k,155,195,5    duplicate(A dead man#GHtramp1)  A dead man#GHtramp34    849,4,4
  1028. 2@gl_k,154,188,3    duplicate(A dead man#GHtramp1)  A dead man#GHtramp35    849,4,4
  1029. 2@gl_k,153,214,3    duplicate(A dead man#GHtramp1)  A dead man#GHtramp36    849,4,4
  1030. 2@gl_k,172,233,3    duplicate(A dead man#GHtramp1)  A dead man#GHtramp37    849,4,4
  1031. 2@gl_k,176,245,3    duplicate(A dead man#GHtramp1)  A dead man#GHtramp38    849,4,4
  1032.  
  1033. // Sector 3 Mobs
  1034. //============================================================
  1035. 1@gl_k,0,0,0    script  #ghmemorialmob03    -1,{
  1036. OnInstanceInit:
  1037. OnDisable:
  1038.     disablenpc instance_npcname("#ghmemorialmob03");
  1039.     end;
  1040. OnEnable:
  1041.     enablenpc instance_npcname("#ghmemorialmob03");
  1042.     donpcevent instance_npcname("#ghinstancewarp5")+"::OnEnable";
  1043.     donpcevent instance_npcname("#ghinstancewarp6")+"::OnEnable";
  1044.     set .@map$,instance_mapname("1@gl_k");
  1045.     set .@label$,instance_npcname("#ghmemorialmob03")+"::OnMyMobDead";
  1046.     mapannounce .@map$,"A portal has appeared to the northwest.",bc_map,"0xFFFF00";
  1047.     areamonster .@map$,17,259,53,180,"Hungry Palace Guard",2468,11,.@label$;
  1048.     areamonster .@map$,17,259,53,180,"Outraged Archer",2469,14,.@label$;
  1049.     areamonster .@map$,62,281,73,186,"Hungry Palace Guard",2468,11,.@label$;
  1050.     areamonster .@map$,62,281,73,186,"Outraged Archer",2469,14,.@label$;
  1051.     areamonster .@map$,74,251,109,224,"Corrupted Palace Guard",2468,11,.@label$;
  1052.     areamonster .@map$,74,251,109,224,"Wandering Archer",2469,14,.@label$;
  1053.     areamonster .@map$,108,281,231,234,"Corrupted Palace Guard",2468,11,.@label$;
  1054.     areamonster .@map$,108,281,231,234,"Wandering Archer",2469,14,.@label$;
  1055.     end;
  1056. OnMyMobDead:
  1057.     set .@map$,instance_mapname("1@gl_k");
  1058.     set .@label$,instance_npcname("#ghmemorialmob03")+"::OnMyMobDead";
  1059.     set .@mob_dead_num,100 - mobcount(.@map$,.@label$);
  1060.     if (.@mob_dead_num > 85) {
  1061.         mapannounce .@map$,"Himelmez: Not bad. Thought you would be dead by now by my creatures~",bc_map,"0xFFFFFF";
  1062.         killmonster .@map$,.@label$;
  1063.         donpcevent instance_npcname("#GHMclear3")+"::OnEnable";
  1064.         donpcevent instance_npcname("Heinrich#ghinstance4")+"::OnEnable";
  1065.         donpcevent instance_npcname("Himelmez#ghinstance2")+"::OnEnable";
  1066.         donpcevent instance_npcname("Varmundt#ghinstance3")+"::OnEnable";
  1067.         donpcevent instance_npcname("#ghmemorialmob03")+"::OnDisable";
  1068.     }
  1069.     end;
  1070. }
  1071.  
  1072. // 1st MVP
  1073. //============================================================
  1074. 1@gl_k,0,0,0    script  #ghmemorialmob04    -1,{
  1075. OnInstanceInit:
  1076. OnDisable:
  1077.     disablenpc instance_npcname("#ghmemorialmob04");
  1078.     end;
  1079. OnEnable:
  1080.     enablenpc instance_npcname("#ghmemorialmob04");
  1081.     monster instance_mapname("1@gl_k"),150,258,"Corrupted Soul",2475,1,instance_npcname("#ghmemorialmob04")+"::OnMyMobDead";
  1082.     unittalk $@mobid[0],"Grrrrrrhh~~~",1;
  1083.     end;
  1084. OnMyMobDead:
  1085.     set .@map$,instance_mapname("1@gl_k");
  1086.     if (mobcount(.@map$,instance_npcname("#ghmemorialmob04")+"::OnMyMobDead") < 1) {
  1087.         mapannounce .@map$,"Opening 2nd floor entrance towards 12 O'clock direction.",bc_map,"0xFFFF00";
  1088.         donpcevent instance_npcname("#ghinstancewarp7")+"::OnEnable";
  1089.         donpcevent instance_npcname("#ghinstancewarp14")+"::OnEnable";
  1090.         donpcevent instance_npcname("Varmundt#ghinstance3")+"::OnTalk2";
  1091.         donpcevent instance_npcname("#effectGH01")+"::OnEnable";
  1092.         donpcevent instance_npcname("Heinrich#ghinstance5")+"::OnEnable";
  1093.         donpcevent instance_npcname("Varmundt#ghinstance4")+"::OnEnable";
  1094.         donpcevent instance_npcname("#ghmemorialmob04")+"::OnDisable";
  1095.     }
  1096.     end;
  1097. }
  1098.  
  1099. 1@gl_k,150,257,3    script  #GHMclear3  111,9,9,{
  1100.     end;
  1101. OnTouch:
  1102.     donpcevent instance_npcname("#controlGH3")+"::OnEnable";
  1103.     specialeffect EF_BASH;
  1104.     donpcevent instance_npcname("#GHMclear3")+"::OnDisable";
  1105.     end;
  1106. OnInstanceInit:
  1107. OnDisable:
  1108.     disablenpc instance_npcname("#GHMclear3");
  1109.     end;
  1110. OnEnable:
  1111.     enablenpc instance_npcname("#GHMclear3");
  1112.     initnpctimer;
  1113.     end;
  1114. OnTimer2000:
  1115.     mapannounce instance_mapname("1@gl_k"),"Himelmez: I'll wait for you at the north of the castle. I want to see you how lucky you are.",bc_map,"0xFFFFFF";
  1116.     stopnpctimer;
  1117.     end;
  1118. }
  1119.  
  1120. 1@gl_k,0,0,0    script  #controlGH3 -1,{
  1121. OnInstanceInit:
  1122. OnDisable:
  1123.     disablenpc instance_npcname("#controlGH3");
  1124.     end;
  1125. OnEnable:
  1126.     enablenpc instance_npcname("#controlGH3");
  1127.     initnpctimer;
  1128.     end;
  1129. OnTimer3000:
  1130.     donpcevent instance_npcname("Himelmez#ghinstance2")+"::OnTalk1";
  1131.     end;
  1132. OnTimer6000:
  1133.     donpcevent instance_npcname("Himelmez#ghinstance2")+"::OnTalk2";
  1134.     end;
  1135. OnTimer9000:
  1136.     donpcevent instance_npcname("Himelmez#ghinstance2")+"::OnTalk3";
  1137.     end;
  1138. OnTimer12000:
  1139.     donpcevent instance_npcname("Heinrich#ghinstance4")+"::OnTalk1";
  1140.     end;
  1141. OnTimer15000:
  1142.     donpcevent instance_npcname("Himelmez#ghinstance2")+"::OnTalk4";
  1143.     end;
  1144. OnTimer18000:
  1145.     donpcevent instance_npcname("Varmundt#ghinstance3")+"::OnTalk1";
  1146.     end;
  1147. OnTimer21000:
  1148.     donpcevent instance_npcname("Heinrich#ghinstance4")+"::OnTalk2";
  1149.     end;
  1150. OnTimer24000:
  1151.     donpcevent instance_npcname("Himelmez#ghinstance2")+"::OnTalk5";
  1152.     end;
  1153. OnTimer27000:
  1154.     donpcevent instance_npcname("Himelmez#ghinstance2")+"::OnTalk6";
  1155.     end;
  1156. OnTimer28000:
  1157.     donpcevent instance_npcname("Himelmez#ghinstance2")+"::OnDisable";
  1158.     end;
  1159. OnTimer31000:
  1160.     donpcevent instance_npcname("Heinrich#ghinstance4")+"::OnTalk3";
  1161.     end;
  1162. OnTimer32000:
  1163.     donpcevent instance_npcname("Heinrich#ghinstance4")+"::OnDisable";
  1164.     end;
  1165. OnTimer35000:
  1166.     mapannounce instance_mapname("1@gl_k"),"An echoing comes from deep inside of the knight's shrine.",bc_map,"0xFFFFFF";
  1167.     end;
  1168. OnTimer38000:
  1169.     donpcevent instance_npcname("#ghmemorialmob04")+"::OnEnable";
  1170.     stopnpctimer;
  1171.     donpcevent instance_npcname("#controlGH3")+"::OnDisable";
  1172.     end;
  1173. }
  1174.  
  1175. 1@gl_k,144,258,6    script  Heinrich#ghinstance4    652,{
  1176.     cutin "gl_heinrich1",2;
  1177.     mes "[Heinrich]";
  1178.     mes "Himelmez... I will never forget what you've done to my men.";
  1179.     close2;
  1180.     cutin "gl_heinrich1",255;
  1181.     end;
  1182. OnInstanceInit:
  1183. OnDisable:
  1184.     hideonnpc instance_npcname("Heinrich#ghinstance4");
  1185.     end;
  1186. OnEnable:
  1187.     hideoffnpc instance_npcname("Heinrich#ghinstance4");
  1188.     end;
  1189. OnTalk1:
  1190.     npctalk "Himelmez! We will not let you get away from us!";
  1191.     end;
  1192. OnTalk2:
  1193.     npctalk "What... These are!";
  1194.     end;
  1195. OnTalk3:
  1196.     npctalk "Sir. Varmundt! Help those adventurers. I will go after Himelmez!";
  1197.     end;
  1198. }
  1199.  
  1200. 1@gl_k,150,257,3    script  Himelmez#ghinstance2    650,{
  1201.     cutin "gl_himel2",2;
  1202.     mes "[Himelmez]";
  1203.     mes "Don't look at me nervous like that.";
  1204.     mes "It will be over soon...";
  1205.     close2;
  1206.     cutin "gl_himel2",255;
  1207.     end;
  1208. OnInstanceInit:
  1209. OnDisable:
  1210.     hideonnpc instance_npcname("Himelmez#ghinstance2");
  1211.     end;
  1212. OnEnable:
  1213.     hideoffnpc instance_npcname("Himelmez#ghinstance2");
  1214.     end;
  1215. OnTalk1:
  1216.     npctalk "Guess you are either lucky or powerful, to make it this far.";
  1217.     end;
  1218. OnTalk2:
  1219.     npctalk "But, it doesn't matter.";
  1220.     end;
  1221. OnTalk3:
  1222.     npctalk "You will all die here.";
  1223.     end;
  1224. OnTalk4:
  1225.     npctalk "Ha ha ha, worry about yourself. You think I am alone here?";
  1226.     end;
  1227. OnTalk5:
  1228.     npctalk "I will go on my way while my new toy entertains you.";
  1229.     end;
  1230. OnTalk6:
  1231.     npctalk "Fare well~, hope to see you again sometime, Heinrich.";
  1232.     end;
  1233. }
  1234.  
  1235. 1@gl_k,156,259,3    script  Varmundt#ghinstance3    654,{
  1236.     if (checkquest(12318,HUNTING) == 2) {
  1237.         cutin "gl_barmund1",2;
  1238.         mes "[Varmundt]";
  1239.         mes "This item has extraordinary aura with it. Can be very useful for someone special.";
  1240.         erasequest 12318;
  1241.         if (checkquest(12319,HUNTING) == -1)
  1242.             setquest 12319;
  1243.         setquest 12320;
  1244.         erasequest 12320;
  1245.         getitem 6607,1; //Temporal_Crystal
  1246.         getitem 6608,1; //Coagulated_Spell
  1247.         getexp 250000,250000;
  1248.         close2;
  1249.         cutin "gl_barmund1",255;
  1250.         end;
  1251.     }
  1252.     cutin "gl_barmund1",2;
  1253.     mes "[Varmundt]";
  1254.     mes "I guess this is it. Is it impossible to stop the time traveler's will?! A portal seems to have appeared to the north.";
  1255.     close2;
  1256.     cutin "gl_barmund2",255;
  1257.     end;
  1258. OnInstanceInit:
  1259. OnDisable:
  1260.     hideonnpc instance_npcname("Varmundt#ghinstance3");
  1261.     end;
  1262. OnEnable:
  1263.     hideoffnpc instance_npcname("Varmundt#ghinstance3");
  1264.     end;
  1265. OnTalk1:
  1266.     npctalk "Sir. Heinrich! I sense something strange and strong coming!";
  1267.     end;
  1268. OnTalk2:
  1269.     npctalk "I collected some items dropped from its body. You can take it from me.";
  1270.     end;
  1271. }
  1272.  
  1273. // Floor 2
  1274. //============================================================
  1275. 2@gl_k,148,67,1 script  Heinrich#ghinstance5    652,{
  1276.     cutin "gl_heinrich1",2;
  1277.     mes "[Heinrich]";
  1278.     mes "Himelmez's closed space covers everywhere...";
  1279.     close2;
  1280.     cutin "gl_heinrich1",255;
  1281.     end;
  1282. OnInstanceInit:
  1283. OnDisable:
  1284.     hideonnpc instance_npcname("Heinrich#ghinstance5");
  1285.     end;
  1286. OnEnable:
  1287.     hideoffnpc instance_npcname("Heinrich#ghinstance5");
  1288.     end;
  1289. OnTalk1:
  1290.     npctalk "This structure was not in the castle before!";
  1291.     end;
  1292. OnTalk2:
  1293.     npctalk "We tried to break it down but it's really strong.";
  1294.     end;
  1295. OnTalk3:
  1296.     npctalk "It is inexcusable behavior.";
  1297.     end;
  1298. OnTalk4:
  1299.     npctalk "I already exterminated all my soldiers and maybe more...";
  1300.     end;
  1301. OnTalk5:
  1302.     npctalk "...";
  1303.     end;
  1304. }
  1305.  
  1306. 2@gl_k,151,71,7 script  Varmundt#ghinstance4    654,{
  1307.     cutin "gl_barmund1",2;
  1308.     mes "[Varmundt]";
  1309.     mes "How many times I do this job. In my dream, I did it over and over again...";
  1310.     close2;
  1311.     cutin "gl_barmund1",255;
  1312.     end;
  1313. OnInstanceInit:
  1314. OnDisable:
  1315.     hideonnpc instance_npcname("Varmundt#ghinstance4");
  1316.     end;
  1317. OnEnable:
  1318.     hideoffnpc instance_npcname("Varmundt#ghinstance4");
  1319.     end;
  1320. OnTalk1:
  1321.     npctalk "This is Himelmez's closed space. We blocked each area and aisle.";
  1322.     end;
  1323. OnTalk2:
  1324.     npctalk "Step back. Let me try to dispel the magic.";
  1325.     end;
  1326. OnTalk3:
  1327.     npctalk "I think that part of closed space is broke down.";
  1328.     end;
  1329. OnTalk4:
  1330.     npctalk "I have never seen this closed space.";
  1331.     end;
  1332. OnTalk5:
  1333.     npctalk "Himelmez hides stone chains in undead people's body.";
  1334.     end;
  1335. OnTalk6:
  1336.     npctalk "Maybe this closed space is maintained with these stone chains.";
  1337.     end;
  1338. OnTalk7:
  1339.     npctalk "If you want to break it, you have to kill one of those who have a stone chain.";
  1340.     end;
  1341. OnTalk8:
  1342.     npctalk "But, we can't recognize who has a stone chain so, we have to purify everything.";
  1343.     end;
  1344. OnTalk9:
  1345.     npctalk "Commander...";
  1346.     end;
  1347. OnTalk10:
  1348.     npctalk "Commander! You need to be strong.";
  1349.     end;
  1350. OnTalk11:
  1351.     npctalk "Our enemy is not human.";
  1352.     end;
  1353. OnTalk12:
  1354.     npctalk "Even though you deny it, they'll never turn back to human.";
  1355.     end;
  1356. OnTalk13:
  1357.     npctalk "Well, let's go then.";
  1358.     end;
  1359. OnTalk14:
  1360.     npctalk "And you guys, just take a break and follow us.";
  1361.     end;
  1362. OnTalk15:
  1363.     npctalk "It could be hard fighting so, stay strong.";
  1364.     end;
  1365. OnTalk16:
  1366.     npctalk "Ok, it's time to begin Heinrich.";
  1367.     end;
  1368. }
  1369.  
  1370. 2@gl_k,150,67,0 script  #effectGH01 111,10,10,{
  1371.     end;
  1372. OnTouch:
  1373.     if (.touch) {
  1374.         set .touch,0;
  1375.         specialeffect EF_BASH;
  1376.         donpcevent instance_npcname("#controlGH4")+"::OnEnable";
  1377.     }
  1378.     end;
  1379. OnEffect:
  1380.     specialeffect EF_LORD;
  1381.     end;
  1382. OnInstanceInit:
  1383. OnDisable:
  1384.     disablenpc instance_npcname("#effectGH01");
  1385.     end;
  1386. OnEnable:
  1387.     enablenpc instance_npcname("#effectGH01");
  1388.     set .touch,1; //Only activate OnTouch once
  1389.     end;
  1390. }
  1391.  
  1392. 2@gl_k,0,0,0    script  #controlGH4 -1,{
  1393. OnInstanceInit:
  1394. OnDisable:
  1395.     disablenpc instance_npcname("#controlGH4");
  1396.     end;
  1397. OnEnable:
  1398.     enablenpc instance_npcname("#controlGH4");
  1399.     initnpctimer;
  1400.     end;
  1401. OnTimer3000:
  1402.     donpcevent instance_npcname("Heinrich#ghinstance5")+"::OnTalk1";
  1403.     donpcevent instance_npcname("#ghmemorialmob05")+"::OnEnable";
  1404.     end;
  1405. OnTimer6000:
  1406.     donpcevent instance_npcname("Varmundt#ghinstance4")+"::OnTalk1";
  1407.     end;
  1408. OnTimer9000:
  1409.     donpcevent instance_npcname("Heinrich#ghinstance5")+"::OnTalk2";
  1410.     end;
  1411. OnTimer12000:
  1412.     donpcevent instance_npcname("Varmundt#ghinstance4")+"::OnTalk2";
  1413.     end;
  1414. OnTimer15000:
  1415.     donpcevent instance_npcname("#effectGH01")+"::OnEffect";
  1416.     end;
  1417. OnTimer18000:
  1418.     donpcevent instance_npcname("#effectGH01")+"::OnDisable";
  1419.     donpcevent instance_npcname("Varmundt#ghinstance4")+"::OnTalk3";
  1420.     end;
  1421. OnTimer21000:
  1422.     donpcevent instance_npcname("Varmundt#ghinstance4")+"::OnTalk4";
  1423.     end;
  1424. OnTimer24000:
  1425.     donpcevent instance_npcname("Varmundt#ghinstance4")+"::OnTalk5";
  1426.     end;
  1427. OnTimer27000:
  1428.     donpcevent instance_npcname("Varmundt#ghinstance4")+"::OnTalk6";
  1429.     end;
  1430. OnTimer30000:
  1431.     donpcevent instance_npcname("Varmundt#ghinstance4")+"::OnTalk7";
  1432.     end;
  1433. OnTimer33000:
  1434.     donpcevent instance_npcname("Varmundt#ghinstance4")+"::OnTalk8";
  1435.     end;
  1436. OnTimer36000:
  1437.     donpcevent instance_npcname("Heinrich#ghinstance5")+"::OnTalk3";
  1438.     end;
  1439. OnTimer39000:
  1440.     donpcevent instance_npcname("Heinrich#ghinstance5")+"::OnTalk4";
  1441.     end;
  1442. OnTimer42000:
  1443.     donpcevent instance_npcname("Varmundt#ghinstance4")+"::OnTalk9";
  1444.     end;
  1445. OnTimer45000:
  1446.     donpcevent instance_npcname("Varmundt#ghinstance4")+"::OnTalk10";
  1447.     end;
  1448. OnTimer48000:
  1449.     donpcevent instance_npcname("Varmundt#ghinstance4")+"::OnTalk11";
  1450.     end;
  1451. OnTimer51000:
  1452.     donpcevent instance_npcname("Varmundt#ghinstance4")+"::OnTalk12";
  1453.     end;
  1454. OnTimer54000:
  1455.     donpcevent instance_npcname("Heinrich#ghinstance5")+"::OnTalk5";
  1456.     end;
  1457. OnTimer57000:
  1458.     donpcevent instance_npcname("Varmundt#ghinstance4")+"::OnTalk13";
  1459.     end;
  1460. OnTimer60000:
  1461.     donpcevent instance_npcname("Varmundt#ghinstance4")+"::OnTalk14";
  1462.     end;
  1463. OnTimer63000:
  1464.     donpcevent instance_npcname("Varmundt#ghinstance4")+"::OnTalk15";
  1465.     end;
  1466. OnTimer66000:
  1467.     donpcevent instance_npcname("Varmundt#ghinstance4")+"::OnTalk16";
  1468.     end;
  1469. OnTimer69000:
  1470.     mapannounce instance_mapname("2@gl_k"),"A portal to the west has opened in the central hallway.",bc_map,"0xFFFF00";
  1471.     donpcevent instance_npcname("#ghinstancewarp8")+"::OnEnable";
  1472.     donpcevent instance_npcname("#ghinstancewarp9")+"::OnEnable";
  1473.     donpcevent instance_npcname("#ghmemorialmob06")+"::OnEnable";
  1474.     donpcevent instance_npcname("Varmundt#ghinstance4")+"::OnDisable";
  1475.     donpcevent instance_npcname("Heinrich#ghinstance5")+"::OnDisable";
  1476.     end;
  1477. OnTimer70000:
  1478.     stopnpctimer;
  1479.     donpcevent instance_npcname("#controlGH4")+"::OnDisable";
  1480.     end;
  1481. }
  1482.  
  1483. 2@gl_k,0,0,0    script  #ghmemorialmob05    -1,{
  1484. OnInstanceInit:
  1485. OnDisable:
  1486.     disablenpc instance_npcname("#ghmemorialmob05");
  1487.     end;
  1488. OnEnable:
  1489.     enablenpc instance_npcname("#ghmemorialmob05");
  1490.     set .@map$,instance_mapname("2@gl_k");
  1491.     set .@label$,instance_npcname("#ghmemorialmob05")+"::OnMyMobDead";
  1492.     areamonster .@map$,124,20,31,162,"Corrupted Palace Guard",2468,8,.@label$;
  1493.     areamonster .@map$,124,20,31,162,"Archer of Death",2469,8,.@label$;
  1494.     areamonster .@map$,124,20,31,162,"Corrupted Abysmal Knight",2470,8,.@label$;
  1495.     areamonster .@map$,124,20,31,162,"Suffered Khalitzburg",2471,8,.@label$;
  1496.     areamonster .@map$,124,20,31,162,"Bloody Knight",2472,8,.@label$;
  1497.     set .MyMobs,80;
  1498.     end;
  1499. OnMyMobDead:
  1500.     set .@map$,instance_mapname("2@gl_k");
  1501.     set .MyMobs,.MyMobs-1;
  1502.     if (.MyMobs == 0) {
  1503.         mapannounce .@map$,"Evil Forces are appearing in this area.",bc_map,"0xFFFF00",FW_NORMAL,18;
  1504.         donpcevent instance_npcname("#ghmemorialmob06")+"::OnDisable2";
  1505.         donpcevent instance_npcname("#ghmemorialmob07")+"::OnEnable";
  1506.         donpcevent instance_npcname("#ghmemorialmob05")+"::OnDisable";
  1507.     } else {
  1508.         set .@label$,instance_npcname("#ghmemorialmob05")+"::OnMyMobDead";
  1509.         switch(rand(5)) {
  1510.         case 0:
  1511.             areamonster .@map$,124,20,31,162,"Corrupted Palace Guard",2468,1,.@label$;
  1512.             break;
  1513.         case 1:
  1514.             areamonster .@map$,124,20,31,162,"Archer of Death",2469,1,.@label$;
  1515.             break;
  1516.         case 2:
  1517.             areamonster .@map$,124,20,31,162,"Corrupted Abysmal Knight",2470,1,.@label$;
  1518.             break;
  1519.         case 3:
  1520.             areamonster .@map$,124,20,31,162,"Suffered Khalitzburg",2471,1,.@label$;
  1521.             break;
  1522.         case 4:
  1523.             areamonster .@map$,124,20,31,162,"Bloody Knight",2472,1,.@label$;
  1524.             break;
  1525.         }
  1526.     }
  1527.     end;
  1528. }
  1529.  
  1530. 2@gl_k,0,0,0    script  #ghmemorialmob06    -1,{
  1531. OnInstanceInit:
  1532. OnDisable:
  1533.     disablenpc instance_npcname("#ghmemorialmob06");
  1534.     end;
  1535. OnDisable2:
  1536.     stopnpctimer;
  1537.     disablenpc instance_npcname("#ghmemorialmob06");
  1538.     end;
  1539. OnEnable:
  1540.     enablenpc instance_npcname("#ghmemorialmob06");
  1541.     donpcevent instance_npcname("#ghmemorialmob06")+"::OnSpawn";
  1542.     end;
  1543. OnSpawn:
  1544.     initnpctimer;
  1545.     end;
  1546. OnTimer90000:
  1547.     set .@map$,instance_mapname("2@gl_k");
  1548.     set .@label$,instance_npcname("#ghmemorialmob05")+"::OnMyMobDead";
  1549.     setarray .@c[0],
  1550.         114,141,118,139,
  1551.         128,83,131,78,
  1552.         88,53,93,48,
  1553.         54,47,61,40,
  1554.         58,83,63,78,
  1555.         69,138,80,127,
  1556.         34,143,39,138;
  1557.     for (set .@i,0; .@i<getarraysize(.@c); set .@i,.@i+4) {
  1558.         areamonster .@map$,.@c[.@i],.@c[.@i+1],.@c[.@i+2],.@c[.@i+3],"Corrupted Palace Guard",2468,1,.@label$;
  1559.         areamonster .@map$,.@c[.@i],.@c[.@i+1],.@c[.@i+2],.@c[.@i+3],"Archer of Death",2469,1,.@label$;
  1560.         areamonster .@map$,.@c[.@i],.@c[.@i+1],.@c[.@i+2],.@c[.@i+3],"Corrupted Abysmal Knight",2470,1,.@label$;
  1561.         areamonster .@map$,.@c[.@i],.@c[.@i+1],.@c[.@i+2],.@c[.@i+3],"Suffered Khalitzburg",2471,1,.@label$;
  1562.         areamonster .@map$,.@c[.@i],.@c[.@i+1],.@c[.@i+2],.@c[.@i+3],"Bloody Knight",2472,1,.@label$;
  1563.     }
  1564.     end;
  1565. OnTimer92000:
  1566.     stopnpctimer;
  1567.     donpcevent instance_npcname("#ghmemorialmob06")+"::OnSpawn";
  1568.     end;
  1569. }
  1570.  
  1571. 2@gl_k,0,0,0    script  #ghmemorialmob07    -1,{
  1572. OnInstanceInit:
  1573. OnDisable:
  1574.     disablenpc instance_npcname("#ghmemorialmob07");
  1575.     end;
  1576. OnEnable:
  1577.     enablenpc instance_npcname("#ghmemorialmob07");
  1578.     areamonster instance_mapname("2@gl_k"),124,20,31,162,"1st Commander of Destruction",2473,1,instance_npcname("#ghmemorialmob07")+"::OnMyMobDead";
  1579.     end;
  1580. OnMyMobDead:
  1581.     set .@map$,instance_mapname("2@gl_k");
  1582.     if (mobcount(.@map$,instance_npcname("#ghmemorialmob07")+"::OnMyMobDead") < 1) {
  1583.         mapannounce .@map$,"A portal has opened to the east in the central hallway.",bc_map,"0xFFFF00";
  1584.         donpcevent instance_npcname("#ghinstancewarp10")+"::OnEnable";
  1585.         donpcevent instance_npcname("#ghinstancewarp11")+"::OnEnable";
  1586.         donpcevent instance_npcname("#ghmemorialmob08")+"::OnEnable";
  1587.         donpcevent instance_npcname("#ghmemorialmob07")+"::OnDisable";
  1588.     }
  1589.     end;
  1590. }
  1591.  
  1592. 2@gl_k,0,0,0    script  #ghmemorialmob08    -1,{
  1593. OnInstanceInit:
  1594. OnDisable:
  1595.     disablenpc instance_npcname("#ghmemorialmob08");
  1596.     end;
  1597. OnEnable:
  1598.     enablenpc instance_npcname("#ghmemorialmob08");
  1599.     set .@map$,instance_mapname("2@gl_k");
  1600.     set .@label$,instance_npcname("#ghmemorialmob08")+"::OnMyMobDead";
  1601.     areamonster .@map$,175,163,265,18,"Corrupted Palace Guard",2468,7,.@label$;
  1602.     areamonster .@map$,175,163,265,18,"Wandering Archer",2469,7,.@label$;
  1603.     areamonster .@map$,175,163,265,18,"Corrupted Abysmal Knight",2470,7,.@label$;
  1604.     areamonster .@map$,175,163,265,18,"Suffered Khalitzburg",2471,7,.@label$;
  1605.     areamonster .@map$,175,163,265,18,"Bloody Knight",2472,7,.@label$;
  1606.     set .MyMobs,35;
  1607.     end;
  1608. OnMyMobDead:
  1609.     set .@map$,instance_mapname("2@gl_k");
  1610.     set .MyMobs,.MyMobs-1;
  1611.     if (.MyMobs == 0) {
  1612.         mapannounce .@map$,"An evil presence has teleported into this area.",bc_map,"0xFFFF00",FW_NORMAL,18;
  1613.         donpcevent instance_npcname("#ghmemorialmob09")+"::OnEnable";
  1614.         donpcevent instance_npcname("#ghmemorialmob08")+"::OnDisable";
  1615.     } else {
  1616.         set .@label$,instance_npcname("#ghmemorialmob08")+"::OnMyMobDead";
  1617.         switch (rand(5)) {
  1618.         case 0:
  1619.             areamonster .@map$,175,163,265,18,"Corrupted Palace Guard",2468,1,.@label$;
  1620.             break;
  1621.         case 1:
  1622.             areamonster .@map$,175,163,265,18,"Wandering Archer",2469,1,.@label$;
  1623.             break;
  1624.         case 2:
  1625.             areamonster .@map$,175,163,265,18,"Corrupted Abysmal Knight",2470,1,.@label$;
  1626.             break;
  1627.         case 3:
  1628.             areamonster .@map$,175,163,265,18,"Suffered Khalitzburg",2471,1,.@label$;
  1629.             break;
  1630.         case 4:
  1631.             areamonster .@map$,175,163,265,18,"Bloody Knight",2472,1,.@label$;
  1632.             break;
  1633.         }
  1634.     }
  1635.     end;
  1636. }
  1637.  
  1638. 2@gl_k,0,0,0    script  #ghmemorialmob09    -1,{
  1639. OnInstanceInit:
  1640. OnDisable:
  1641.     disablenpc instance_npcname("#ghmemorialmob09");
  1642.     end;
  1643. OnEnable:
  1644.     enablenpc instance_npcname("#ghmemorialmob09");
  1645.     areamonster instance_mapname("2@gl_k"),175,163,265,18,"2nd Commander of Destruction",2474,1,instance_npcname("#ghmemorialmob09")+"::OnMyMobDead";
  1646.     end;
  1647. OnMyMobDead:
  1648.     set .@map$,instance_mapname("2@gl_k");
  1649.     if (mobcount(.@map$,instance_npcname("#ghmemorialmob09")+"::OnMyMobDead") < 1) {
  1650.         mapannounce .@map$,"A new portal has appeared at the end of the central corridor.",bc_map,"0xFFFF00";
  1651.         donpcevent instance_npcname("#ghinstancewarp12")+"::OnEnable";
  1652.         donpcevent instance_npcname("#ghinstancewarp13")+"::OnEnable";
  1653.         donpcevent instance_npcname("#controlGH6")+"::OnEnable";
  1654.         donpcevent instance_npcname("#ghmemorialmob08")+"::OnDisable";
  1655.         donpcevent instance_npcname("#ghmemorialmob09")+"::OnDisable";
  1656.     }
  1657.     end;
  1658. }
  1659.  
  1660. 2@gl_k,0,0,0    script  #ghmemorialmob10    -1,{
  1661. OnInstanceInit:
  1662. OnDisable:
  1663.     disablenpc instance_npcname("#ghmemorialmob10");
  1664.     end;
  1665. OnEnable:
  1666.     enablenpc instance_npcname("#ghmemorialmob10");
  1667.     donpcevent instance_npcname("Gerhalt#ghinstance1")+"::OnDisable";
  1668.     monster instance_mapname("2@gl_k"),158,255,"Amdarais",2476,1,instance_npcname("#ghmemorialmob10")+"::OnMyMobDead";
  1669.     unittalk $@mobid[0],"Run away... run away from me...",1;
  1670.     initnpctimer;
  1671.     end;
  1672. OnTimer6000:
  1673.     unittalk $@mobid[0],"I don't want... I don't want to kill anyone. Uhuuuuuh",1;
  1674.     end;
  1675. OnTimer12000:
  1676.     unittalk $@mobid[0],"Please kill me! Please!",1;
  1677.     end;
  1678. OnTimer18000:
  1679.     unittalk $@mobid[0],"Eeeeee...eee...die... die...",1;
  1680.     end;
  1681. OnTimer24000:
  1682.     unittalk $@mobid[0],"Demolition... Death!...",1;
  1683.     stopnpctimer;
  1684.     end;
  1685. OnMyMobDead:
  1686.     if (mobcount(instance_mapname("2@gl_k"),instance_npcname("#ghmemorialmob10")+"::OnMyMobDead") < 1) {
  1687.         donpcevent instance_npcname("Hugin#ghinstance1")+"::OnEnable";
  1688.         donpcevent instance_npcname("#ghinstancewarp15")+"::OnEnable";
  1689.  
  1690.         for (set .@i,1; .@i<=8; set .@i,.@i+1)
  1691.             enablenpc instance_npcname("Strange crack#"+.@i);
  1692.  
  1693.         stopnpctimer;
  1694.         donpcevent instance_npcname("#ghmemorialmob10")+"::OnDisable";
  1695.     }
  1696.     end;
  1697. }
  1698.  
  1699. 2@gl_k,155,250,7    script  Heinrich#ghinstance6    652,{
  1700.     cutin "gl_heinrich1",2;
  1701.     mes "[Heinrich]";
  1702.     mes "What are you decorating Himelmez!";
  1703.     close2;
  1704.     cutin "gl_heinrich1",255;
  1705.     end;
  1706. OnInstanceInit:
  1707. OnDisable:
  1708.     hideonnpc instance_npcname("Heinrich#ghinstance6");
  1709.     end;
  1710. OnEnable:
  1711.     hideoffnpc instance_npcname("Heinrich#ghinstance6");
  1712.     end;
  1713. OnTalk1:
  1714.     npctalk "Gerhalt!";
  1715.     end;
  1716. OnTalk2:
  1717.     npctalk "What are you doing to my soldier Himelmez!";
  1718.     end;
  1719. OnTalk3:
  1720.     npctalk "Himelmez! You already made what you want so there is no more need for a sacrifice!";
  1721.     end;
  1722. OnTalk4:
  1723.     npctalk "Let him go! I don't need to see anyone else suffer!";
  1724.     end;
  1725. OnTalk5:
  1726.     npctalk "I'll never forgive you.";
  1727.     end;
  1728. OnTalk6:
  1729.     npctalk "I'll never let you get away Himelmez!!";
  1730.     end;
  1731. }
  1732.  
  1733. 2@gl_k,162,250,1    script  Varmundt#ghinstance5    654,{
  1734.     cutin "gl_barmund2",2;
  1735.     mes "[Varmundt]";
  1736.     mes "Can't take off this bridle...";
  1737.     close2;
  1738.     cutin "gl_barmund2",255;
  1739.     end;
  1740. OnInstanceInit:
  1741. OnDisable:
  1742.     hideonnpc instance_npcname("Varmundt#ghinstance5");
  1743.     end;
  1744. OnEnable:
  1745.     hideoffnpc instance_npcname("Varmundt#ghinstance5");
  1746.     end;
  1747. OnTalk1:
  1748.     npctalk "We have no choice. We have to fight against Amdarais!";
  1749.     end;
  1750. }
  1751.  
  1752. 2@gl_k,158,252,3    script  Himelmez#ghinstance4    650,{
  1753.     cutin "gl_himel2",2;
  1754.     mes "[Himelmez]";
  1755.     mes "That is amazing ~ you made it all the way here. May I say thank you?";
  1756.     close2;
  1757.     cutin "gl_himel2",255;
  1758.     end;
  1759. OnInstanceInit:
  1760. OnDisable:
  1761.     hideonnpc instance_npcname("Himelmez#ghinstance4");
  1762.     end;
  1763. OnEnable:
  1764.     hideoffnpc instance_npcname("Himelmez#ghinstance4");
  1765.     end;
  1766. OnTalk1:
  1767.     npctalk "Amazing~ I thought that you were not even close to getting here...";
  1768.     end;
  1769. OnTalk2:
  1770.     npctalk "Hoo hoo, I already found a piece of Ymir's heart Heinrich.";
  1771.     end;
  1772. OnTalk3:
  1773.     npctalk "If he did not bother me, it would have been faster.";
  1774.     end;
  1775. OnTalk4:
  1776.     npctalk "Really? What makes you think so?";
  1777.     end;
  1778. OnTalk5:
  1779.     npctalk "Let him go? I think... No...";
  1780.     end;
  1781. OnTalk6:
  1782.     npctalk "Besides, this is your last surviving soldier Heinrich.";
  1783.     end;
  1784. OnTalk7:
  1785.     npctalk "He made life difficult for me.";
  1786.     end;
  1787. OnTalk8:
  1788.     npctalk "He is perfectly fit for my new creation Amdarais.";
  1789.     end;
  1790. OnTalk9:
  1791.     npctalk "Uh uh~ I'm so scared.";
  1792.     end;
  1793. OnTalk10:
  1794.     npctalk "Anyway, we will have a chance to see because we need to talk more.";
  1795.     end;
  1796. OnTalk11:
  1797.     npctalk "So long boys.";
  1798.     end;
  1799. }
  1800.  
  1801. 2@gl_k,150,179,0    script  #controlGH6 111,2,2,{
  1802.     end;
  1803. OnTouch:
  1804.     mapannounce instance_mapname("2@gl_k"),"???: Do not come here! It's a trap... Kkkkah!!!",bc_map,"0xFF0000",FW_NORMAL,18;
  1805.     specialeffect EF_BASH;
  1806.     donpcevent instance_npcname("Himelmez#ghinstance3")+"::OnEnable";
  1807.     donpcevent instance_npcname("Heinrich#ghinstance6")+"::OnEnable";
  1808.     donpcevent instance_npcname("Varmundt#ghinstance5")+"::OnEnable";
  1809.     donpcevent instance_npcname("Gerhalt#ghinstance1")+"::OnEnable";
  1810.     donpcevent instance_npcname("#controlGH6")+"::OnDisable";
  1811.     end;
  1812. OnInstanceInit:
  1813. OnDisable:
  1814.     disablenpc instance_npcname("#controlGH6");
  1815.     end;
  1816. OnEnable:
  1817.     enablenpc instance_npcname("#controlGH6");
  1818.     end;
  1819. }
  1820.  
  1821. 2@gl_k,158,252,1    script  Himelmez#ghinstance3    650,7,7,{
  1822.     end;
  1823. OnTouch:
  1824.     specialeffect EF_BASH;
  1825.     donpcevent instance_npcname("#controlGH5")+"::OnEnable";
  1826.     donpcevent instance_npcname("Himelmez#ghinstance4")+"::OnEnable";
  1827.     donpcevent instance_npcname("Himelmez#ghinstance3")+"::OnDisable";
  1828.     end;
  1829. OnInstanceInit:
  1830. OnDisable:
  1831.     disablenpc instance_npcname("Himelmez#ghinstance3");
  1832.     end;
  1833. OnEnable:
  1834.     enablenpc instance_npcname("Himelmez#ghinstance3");
  1835.     end;
  1836. }
  1837.  
  1838. 2@gl_k,158,255,3    script  Gerhalt#ghinstance1 651,{
  1839.     mes "[Gerhalt]";
  1840.     mes "Uuuuu... Khhhah! Just run away with the commander.";
  1841.     close;
  1842. OnInstanceInit:
  1843. OnDisable:
  1844.     hideonnpc instance_npcname("Gerhalt#ghinstance1");
  1845.     end;
  1846. OnEnable:
  1847.     hideoffnpc instance_npcname("Gerhalt#ghinstance1");
  1848.     end;
  1849. OnTalk1:
  1850.     npctalk "Kkkkah! Run away! I can't endure anymore!";
  1851.     end;
  1852. OnTalk2:
  1853.     npctalk "Commandant... Come on, you need to run away from here... Ugh.";
  1854.     end;
  1855. OnTalk3:
  1856.     npctalk "You can make my body but you can't take my soul Himelmez!";
  1857.     end;
  1858. OnEffect1:
  1859.     specialeffect EF_BARRIER;
  1860.     end;
  1861. OnEffect2:
  1862.     specialeffect EF_CHAINCOMBO;
  1863.     end;
  1864. OnEffect3:
  1865.     specialeffect EF_MAPPILLAR2;
  1866.     end;
  1867. OnEffect4:
  1868.     specialeffect EF_MAPPILLAR;
  1869.     end;
  1870. OnEffect5:
  1871.     specialeffect EF_LORD;
  1872.     end;
  1873. }
  1874.  
  1875. 2@gl_k,0,0,0    script  #controlGH5 -1,{
  1876. OnInstanceInit:
  1877. OnDisable:
  1878.     disablenpc instance_npcname("#controlGH5");
  1879.     end;
  1880. OnEnable:
  1881.     enablenpc instance_npcname("#controlGH5");
  1882.     initnpctimer;
  1883.     end;
  1884. OnTimer3000:
  1885.     donpcevent instance_npcname("Himelmez#ghinstance4")+"::OnTalk1";
  1886.     end;
  1887. OnTimer6000:
  1888.     donpcevent instance_npcname("Gerhalt#ghinstance1")+"::OnTalk1";
  1889.     end;
  1890. OnTimer9000:
  1891.     donpcevent instance_npcname("Heinrich#ghinstance6")+"::OnTalk1";
  1892.     end;
  1893. OnTimer15000:
  1894.     donpcevent instance_npcname("Heinrich#ghinstance6")+"::OnTalk2";
  1895.     end;
  1896. OnTimer18000:
  1897.     donpcevent instance_npcname("Himelmez#ghinstance4")+"::OnTalk2";
  1898.     end;
  1899. OnTimer21000:
  1900.     donpcevent instance_npcname("Himelmez#ghinstance4")+"::OnTalk3";
  1901.     end;
  1902. OnTimer24000:
  1903.     donpcevent instance_npcname("Gerhalt#ghinstance1")+"::OnTalk2";
  1904.     end;
  1905. OnTimer27000:
  1906.     donpcevent instance_npcname("Himelmez#ghinstance4")+"::OnTalk4";
  1907.     end;
  1908. OnTimer30000:
  1909.     donpcevent instance_npcname("Heinrich#ghinstance6")+"::OnTalk3";
  1910.     end;
  1911. OnTimer33000:
  1912.     donpcevent instance_npcname("Heinrich#ghinstance6")+"::OnTalk4";
  1913.     end;
  1914. OnTimer36000:
  1915.     donpcevent instance_npcname("Himelmez#ghinstance4")+"::OnTalk5";
  1916.     end;
  1917. OnTimer39000:
  1918.     donpcevent instance_npcname("Himelmez#ghinstance4")+"::OnTalk6";
  1919.     end;
  1920. OnTimer42000:
  1921.     donpcevent instance_npcname("Himelmez#ghinstance4")+"::OnTalk7";
  1922.     end;
  1923. OnTimer45000:
  1924.     donpcevent instance_npcname("Himelmez#ghinstance4")+"::OnTalk8";
  1925.     end;
  1926. OnTimer48000:
  1927.     donpcevent instance_npcname("Heinrich#ghinstance6")+"::OnTalk5";
  1928.     end;
  1929. OnTimer51000:
  1930.     donpcevent instance_npcname("Himelmez#ghinstance4")+"::OnTalk9";
  1931.     end;
  1932. OnTimer54000:
  1933.     donpcevent instance_npcname("Himelmez#ghinstance4")+"::OnTalk10";
  1934.     end;
  1935. OnTimer57000:
  1936.     donpcevent instance_npcname("Himelmez#ghinstance4")+"::OnTalk11";
  1937.     end;
  1938. OnTimer60000:
  1939.     donpcevent instance_npcname("Gerhalt#ghinstance1")+"::OnEffect1";
  1940.     end;
  1941. OnTimer63000:
  1942.     donpcevent instance_npcname("Himelmez#ghinstance4")+"::OnDisable";
  1943.     end;
  1944. OnTimer65000:
  1945.     donpcevent instance_npcname("Gerhalt#ghinstance1")+"::OnEffect3";
  1946.     end;
  1947. OnTimer66000:
  1948.     donpcevent instance_npcname("Gerhalt#ghinstance1")+"::OnEffect2";
  1949.     end;
  1950. OnTimer67000:
  1951.     donpcevent instance_npcname("Heinrich#ghinstance6")+"::OnTalk6";
  1952.     donpcevent instance_npcname("Gerhalt#ghinstance1")+"::OnEffect4";
  1953.     end;
  1954. OnTimer70000:
  1955.     donpcevent instance_npcname("Gerhalt#ghinstance1")+"::OnEffect3";
  1956.     donpcevent instance_npcname("Gerhalt#ghinstance1")+"::OnEffect4";
  1957.     donpcevent instance_npcname("Heinrich#ghinstance6")+"::OnDisable";
  1958.     donpcevent instance_npcname("Varmundt#ghinstance5")+"::OnTalk1";
  1959.     donpcevent instance_npcname("Varmundt#ghinstance5")+"::OnDisable";
  1960.     end;
  1961. OnTimer73000:
  1962.     mapannounce instance_mapname("2@gl_k"),"Gerhalt's body changing.",bc_map,"0xFFFFFF";
  1963.     end;
  1964. OnTimer76000:
  1965.     donpcevent instance_npcname("Gerhalt#ghinstance1")+"::OnEffect5";
  1966.     end;
  1967. OnTimer80000:
  1968.     donpcevent instance_npcname("#ghmemorialmob10")+"::OnEnable";
  1969.     stopnpctimer;
  1970.     donpcevent instance_npcname("#controlGH5")+"::OnDisable";
  1971.     end;
  1972. }
  1973.  
  1974. 2@gl_k,158,241,1    script  Hugin#ghinstance1   755,{
  1975.     if (checkquest(12319,HUNTING) == 2) {
  1976.         mes "[Hugin]";
  1977.         mes "Hm, you are very well. First of all, let me give you some loot from Amdarais.";
  1978.         erasequest 12319;
  1979.         setquest 12321;
  1980.         setquest 12322;
  1981.         erasequest 12321;
  1982.         if (gh_instance == 1) {
  1983.             getitem 6607,1; //Temporal_Crystal
  1984.             getitem 6608,1; //Coagulated_Spell
  1985.         } else {
  1986.             getitem 6607,5; //Temporal_Crystal
  1987.             getitem 6608,5; //Coagulated_Spell
  1988.             set gh_instance,1;
  1989.         }
  1990.         getexp 350000,350000;
  1991.         next;
  1992.         mes "[Hugin]";
  1993.         mes "Varmundt's time is stopped by me.";
  1994.         mes "And your time will be distorted soon.";
  1995.         specialeffect2 EF_BLIND,AREA;
  1996.         soundeffect "_blind.wav",0;
  1997.         next;
  1998.         mes "[Hugin]";
  1999.         mes "Maybe this poor time traveler will try to stop Glast Heim's tragedy from happening.";
  2000.         next;
  2001.         mes "[Hugin]";
  2002.         mes "However, we will never overlook his behavior now and forever...";
  2003.         next;
  2004.         mes "[Hugin]";
  2005.         mes "Now, let me remove your memory. If you see me again, that will be brand new.";
  2006.         specialeffect2 EF_FREEZE;
  2007.         close2;
  2008.         getmapxy(.@map$,.@x,.@y,0);
  2009.         warp .@map$,.@x,.@y;
  2010.         end;
  2011.     } else {
  2012.         mes "[Hugin]";
  2013.         mes "Oops I almost distorted the time gap. Come over here. We need to go out!";
  2014.         next;
  2015.         select("You were just with me...");
  2016.         mes "[Hugin]";
  2017.         mes "What did you say just before?";
  2018.         mes "Anyway that is not important, The gap of time will be closed so, we need to get out of here.";
  2019.         next;
  2020.         switch(select("Let me look around more:Please let me out")) {
  2021.         case 1:
  2022.             mes "[Hugin]";
  2023.             mes "Really? This place will be broke down so, please look around quickly.";
  2024.             close;
  2025.         case 2:
  2026.             close2;
  2027.             warp "glast_01",204,270;
  2028.             end;
  2029.         }
  2030.     }
  2031. OnInstanceInit:
  2032. OnDisable:
  2033.     disablenpc instance_npcname("Hugin#ghinstance1");
  2034.     end;
  2035. OnEnable:
  2036.     enablenpc instance_npcname("Hugin#ghinstance1");
  2037.     end;
  2038. }
  2039.  
  2040. // Treasure Room
  2041. //============================================================
  2042. 1@gl_k,269,267,0    script  Strange crack#entrace   111,{
  2043.     if (checkquest(12322) == -1) {
  2044.         mes "The crack looks suspicious, but nothing more to check.";
  2045.         close;
  2046.     }
  2047.     set .@map$,instance_mapname("1@gl_k");
  2048.     warp .@map$,149,198;
  2049.     end;
  2050. }
  2051.  
  2052. 1@gl_k,129,136,0    script  Strange crack#1 111,{
  2053.     specialeffect EF_SPELLBREAKER;
  2054.     specialeffect EF_BASH;
  2055.     set .@random,rand(1,4);
  2056.     set .@random_,rand(1,4);
  2057.     for (set .@i,1; .@i<=.@random; set .@i,.@i+1)
  2058.         makeitem 727,1,"this",129,138;
  2059.     makeitem 6608,1,"this",129,138;
  2060.     if (.@random_ == 4)
  2061.         makeitem2 21007,1,"this",129,138,0,0,0,0,0,0,0;
  2062. OnInstanceInit:
  2063. OnDisable:
  2064.     disablenpc instance_npcname("Strange crack#1");
  2065.     end;
  2066. OnEnable:
  2067.     enablenpc instance_npcname("Strange crack#1");
  2068.     end;
  2069. }
  2070.  
  2071. 1@gl_k,135,136,0    script  Strange crack#2 111,{
  2072.     specialeffect EF_SPELLBREAKER;
  2073.     specialeffect EF_BASH;
  2074.     set .@random,rand(1,4);
  2075.     set .@random_,rand(1,4);
  2076.     for (set .@i,1; .@i<=.@random; set .@i,.@i+1)
  2077.         makeitem 726,1,"this",135,138;
  2078.     if (.@random_ == 4)
  2079.         makeitem2 2022,1,"this",135,138,0,0,0,0,0,0,0;
  2080.     makeitem 6608,1,"this",135,138;
  2081. OnInstanceInit:
  2082. OnDisable:
  2083.     disablenpc instance_npcname("Strange crack#2");
  2084.     end;
  2085. OnEnable:
  2086.     enablenpc instance_npcname("Strange crack#2");
  2087.     end;
  2088. }
  2089.  
  2090. 1@gl_k,141,136,0    script  Strange crack#3 111,{
  2091.     specialeffect EF_SPELLBREAKER;
  2092.     specialeffect EF_BASH;
  2093.     set .@random,rand(1,4);
  2094.     set .@random_,rand(1,4);
  2095.     for (set .@i,1; .@i<=.@random; set .@i,.@i+1)
  2096.         makeitem 725,1,"this",141,138;
  2097.     makeitem 6608,1,"this",141,138;
  2098.     makeitem 7228,1,"this",141,138;
  2099.     if (.@random_ == 4)
  2100.         makeitem2 13440,1,"this",141,138,0,0,0,0,0,0,0;
  2101. OnInstanceInit:
  2102. OnDisable:
  2103.     disablenpc instance_npcname("Strange crack#3");
  2104.     end;
  2105. OnEnable:
  2106.     enablenpc instance_npcname("Strange crack#3");
  2107.     end;
  2108. }
  2109.  
  2110. 1@gl_k,147,136,0    script  Strange crack#4 111,{
  2111.     specialeffect EF_SPELLBREAKER;
  2112.     specialeffect EF_BASH;
  2113.     set .@random,rand(1,4);
  2114.     set .@random_,rand(1,4);
  2115.     for (set .@i,1; .@i<=.@random; set .@i,.@i+1)
  2116.         makeitem 722,1,"this",147,138;
  2117.     if (.@random_ == 4)
  2118.         makeitem2 2949,1,"this",147,138,0,0,0,0,0,0,0;
  2119.     makeitem 6608,1,"this",147,138;
  2120.     makeitem 6612,1,"this",147,138;
  2121.     makeitem 6613,1,"this",147,138;
  2122. OnInstanceInit:
  2123. OnDisable:
  2124.     disablenpc instance_npcname("Strange crack#4");
  2125.     end;
  2126. OnEnable:
  2127.     enablenpc instance_npcname("Strange crack#4");
  2128.     end;
  2129. }
  2130.  
  2131. 1@gl_k,153,136,0    script  Strange crack#5 111,{
  2132.     specialeffect EF_SPELLBREAKER;
  2133.     specialeffect EF_BASH;
  2134.     set .@random,rand(1,4);
  2135.     set .@random_,rand(1,4);
  2136.     for (set .@i,1; .@i<=.@random; set .@i,.@i+1)
  2137.         makeitem 721,1,"this",153,138;
  2138.     makeitem 6608,1,"this",153,138;
  2139.     makeitem 7230,1,"this",153,138;
  2140.     if (.@random_ == 4)
  2141.         makeitem2 13086,1,"this",153,138,0,0,0,0,0,0,0;
  2142. OnInstanceInit:
  2143. OnDisable:
  2144.     disablenpc instance_npcname("Strange crack#5");
  2145.     end;
  2146. OnEnable:
  2147.     enablenpc instance_npcname("Strange crack#5");
  2148.     end;
  2149. }
  2150.  
  2151. 1@gl_k,159,136,0    script  Strange crack#6 111,{
  2152.     specialeffect EF_SPELLBREAKER;
  2153.     specialeffect EF_BASH;
  2154.     set .@random,rand(1,4);
  2155.     set .@random_,rand(1,4);
  2156.     for (set .@i,1; .@i<=.@random; set .@i,.@i+1)
  2157.         makeitem 720,1,"this",159,138;
  2158.     makeitem 6608,1,"this",159,138;
  2159.     makeitem 7229,1,"this",159,138;
  2160.     if (.@random_ == 4)
  2161.         makeitem2 15066,1,"this",159,138,0,0,0,0,0,0,0;
  2162. OnInstanceInit:
  2163. OnDisable:
  2164.     disablenpc instance_npcname("Strange crack#6");
  2165.     end;
  2166. OnEnable:
  2167.     enablenpc instance_npcname("Strange crack#6");
  2168.     end;
  2169. }
  2170.  
  2171. 1@gl_k,165,136,0    script  Strange crack#7 111,{
  2172.     specialeffect EF_SPELLBREAKER;
  2173.     specialeffect EF_BASH;
  2174.     set .@random,rand(1,4);
  2175.     for (set .@i,1; .@i<=.@random; set .@i,.@i+1)
  2176.         makeitem 719,1,"this",165,138;
  2177.     makeitem 6608,1,"this",165,138;
  2178. OnInstanceInit:
  2179. OnDisable:
  2180.     disablenpc instance_npcname("Strange crack#7");
  2181.     end;
  2182. OnEnable:
  2183.     enablenpc instance_npcname("Strange crack#7");
  2184.     end;
  2185. }
  2186.  
  2187. 1@gl_k,171,136,0    script  Strange crack#8 111,{
  2188.     specialeffect EF_SPELLBREAKER;
  2189.     specialeffect EF_BASH;
  2190.     set .@random,rand(1,4);
  2191.     for (set .@i,1; .@i<=.@random; set .@i,.@i+1)
  2192.         makeitem 718,1,"this",171,138;
  2193.     makeitem 6608,1,"this",171,138;
  2194. OnInstanceInit:
  2195. OnDisable:
  2196.     disablenpc instance_npcname("Strange crack#8");
  2197.     end;
  2198. OnEnable:
  2199.     enablenpc instance_npcname("Strange crack#8");
  2200.     end;
  2201. }
  2202.  
  2203. // Merchant
  2204. //============================================================
  2205. glast_01,210,273,5  script  Hugin's Buttler 69,{
  2206.     disable_items;
  2207.     if (MaxWeight - Weight < 1000) {
  2208.         mes "Your bag is too heavy. Reduce some weight and come back.";
  2209.         close;
  2210.     }
  2211.     mes "[Hugin's Buttler]";
  2212.     mes "Bring Temporal Crystal items for various Temporal boots items. Pick something you want.";
  2213.     next;
  2214.     switch (select("Cancel","Buy Temporal Boots (Need 1 Temporal Crystal)","Upgrade Temporal Boots (Need 5 Temporal Crystals)")) {
  2215.     case 1:
  2216.         mes "[Hugin's Buttler]";
  2217.         mes "Come back whenever you want.";
  2218.         close;
  2219.     case 2:
  2220.         if (countitem(6607) > 0) {
  2221.             mes "[Hugin's Buttler]";
  2222.             mes "Take these Temporal Boots. We can upgrade your Temporal Boots with 5 Temporal Crystals.";
  2223.             delitem 6607,1; //Temporal_Crystal
  2224.             getitem 2499,1; //Temporal_Boots
  2225.             close;
  2226.         }
  2227.         mes "[Hugin's Buttler]";
  2228.         mes "You need more Temporal Crystals. Come back when you get some more Temporal Crystals during your travel through Old Glast Heim.";
  2229.         close;
  2230.     case 3:
  2231.         set .@part,EQI_SHOES;
  2232.         if (!getequipisequiped(.@part)) {
  2233.             mes "[Hugin's Buttler]";
  2234.             mes "Only the item you are wearing can be upgraded.";
  2235.             mes "Wear the ^0000FFTemporal Boots^000000 you want to upgrade, and then talk to me once again.";
  2236.             close;
  2237.         }
  2238.         if (isequipped(2499)) {
  2239.             if (countitem(6607) > 4) {
  2240.                 mes "[Hugin's Buttler]";
  2241.                 mes "You can trade ^0000FF1 Temporal Boots and 5 Temporal Crystals^000000 for 1 of the following items. ^FF0000Previous refine rate will not be retained with these new ones^000000.";
  2242.                 next;
  2243.                 setarray .@type$[0],"Strength","Intelligence","Agility","Vitality","Dexterity","Lucky";
  2244.                 setarray .@equip_type[0],22000,22001,22002,22003,22004,22005;
  2245.                 set .@select,select("Cancel","Str Boots","Int Boots","Agi Boots","Vit Boots","Dex Boots","Luk Boots");
  2246.                 switch (.@select) {
  2247.                 case 1:
  2248.                     mes "[Hugin's Buttler]";
  2249.                     mes "Come back anytime you want.";
  2250.                     close;
  2251.                 case 2:
  2252.                 case 3:
  2253.                 case 4:
  2254.                 case 5:
  2255.                 case 6:
  2256.                 case 7:
  2257.                     mes "[Hugin's Buttler]";
  2258.                     mes "Are you sure about buying Temporal ^FF0000"+.@type$[.@select-2]+"^000000 Boots? There's no refunds.";
  2259.                     next;
  2260.                     if (select("Think again","Yes, I am sure.") == 2) {
  2261.                         mes "[Hugin's Buttler]";
  2262.                         mes "The boots have been upgraded as you want.";
  2263.                         delequip .@part;
  2264.                         delitem 6607,5; //Temporal_Crystal
  2265.                         getitem .@equip_type[.@select-2],1; //Temporal_Str_Boots,Temporal_Int_Boots,Temporal_Agi_Boots,Temporal_Vit_Boots,Temporal_Dex_Boots,Temporal_Luk_Boots
  2266.                         close;
  2267.                     }
  2268.                     mes "[Hugin's Buttler]";
  2269.                     mes "Ok, come back again when you are sure.";
  2270.                     close;
  2271.                 }
  2272.             }
  2273.             mes "[Hugin's Buttler]";
  2274.             mes "Not enough Temporal Crystals. You need 5 Temporal Crystals to upgrade your item.";
  2275.             close;
  2276.         }
  2277.         mes "[Hugin's Buttler]";
  2278.         mes "You are not wearing the Temporal Boots. Talk to me once you're wearing them.";
  2279.         close;
  2280.     }
  2281. }
  2282.  
  2283. // Enchant and Socket NPC
  2284. //============================================================
  2285. glast_01,212,273,4  script  Hugin's Magic Master    66,{
  2286.     disable_items;
  2287.     if (MaxWeight - Weight < 1000) {
  2288.         mes "Your bag is too heavy. Reduce some weight and come back.";
  2289.         close;
  2290.     }
  2291.     mes "[Hugin's Magic Master]";
  2292.     mes "So you came to enchant the Temporal Boots. Be aware that Boots with sockets cannot be enchanted, and this upgrade is only possible for the boots you are wearing.";
  2293.     next;
  2294.     if (select("How does the enchanting work?","Give effect to my Temporal Boots") == 1) {
  2295.         mes "[Hugin's Magic Master]";
  2296.         mes "You can keep obtain ^0000FFCoagulated Spell^000000 through your travel times.";
  2297.         next;
  2298.         mes "[Hugin's Magic Master]";
  2299.         mes "I can enchant your Temporal Boots items depands on the amount of that item. ^0000FFNot normal type boots^000000. Only possible for those 6 expanded version boots.";
  2300.         next;
  2301.         mes "[Hugin's Magic Master]";
  2302.         mes "But, once you put a socket into the item, you cannot enchant it. Make sure to remember that.";
  2303.         next;
  2304.         mes "[Hugin's Magic Master]";
  2305.         mes "I don't give out effect randomly. You can pick which effect you want for the item.";
  2306.         next;
  2307.         mes "[Hugin's Magic Master]";
  2308.         mes "Of course it is for 4th slot only. You can have small effect at the start, and then the effect gets stronger.";
  2309.         next;
  2310.         mes "[Hugin's Magic Master]";
  2311.         mes "To get to the final option upgrade, it will require way more Coagulated Spell items. Don't forget that.";
  2312.         next;
  2313.         mes "[Hugin's Magic Master]";
  2314.         mes "Once the 4th slot completes the best option, you get to have a random bonus effect to the 3rd slot. With.. certain payment~";
  2315.         next;
  2316.         mes "[Hugin's Magic Master]";
  2317.         mes "Also, you don't lose the item even if the enchant fails, we also guarantee keeping card and refine rate. But we can't initialize enchanting.";
  2318.         next;
  2319.         mes "[Hugin's Magic Master]";
  2320.         mes "Phew...";
  2321.         mes "Anyways, that's all for basic enchant information. Now you should see for yourself.";
  2322.         close;
  2323.     }
  2324.     set .@part,EQI_SHOES;
  2325.     if (!getequipisequiped(.@part)) {
  2326.         mes "[Hugin's Magic Master]";
  2327.         mes "Are you wearing the item?";
  2328.         close;
  2329.     }
  2330.     set .@equip_id,getequipid(.@part);
  2331.     set .@equip_name$,getequipname(.@part);
  2332.     set .@card3,getequipcardid(.@part,3);
  2333.     setarray .@enchant1st[0],4808,4832,4814,4741,4869,4752; //Fighting_Spirit4,Expert_Archer1,Spell2,Vitality2,DelayafterAttack1Lv,Luck3
  2334.     setarray .@enchant2nd[0],4820,4833,4813,4742,4872,4753; //Fighting_Spirit5,Expert_Archer2,Spell3,Vitality3,DelayafterAttack2Lv,Luck4
  2335.     setarray .@enchant3rd[0],4821,4834,4812,4861,4873,4754; //Fighting_Spirit6,Expert_Archer3,Spell4,MHP1,DelayafterAttack3Lv,Luck5
  2336.     setarray .@enchant4th[0],4822,4835,4826,4862,4881,4755; //Fighting_Spirit7,Expert_Archer4,Spell5,MHP2,DelayafterAttack4Lv,Luck6
  2337.     setarray .@enchant_cost[0],1,4,15,30,10;
  2338.     switch (.@equip_id) {
  2339.     case 22000: //Temporal_Str_Boots
  2340.     case 22001: //Temporal_Int_Boots
  2341.     case 22002: //Temporal_Agi_Boots
  2342.     case 22003: //Temporal_Vit_Boots
  2343.     case 22004: //Temporal_Dex_Boots
  2344.     case 22005: //Temporal_Luk_Boots
  2345.         if (!.@card3) { //4th slot 1st try enchanting
  2346.             set .@cost,.@enchant_cost[0];
  2347.             set .@number,1;
  2348.             mes "[Hugin's Magic Master]";
  2349.             mes "Want to enchant ^0000FF"+.@equip_name$+"^000000?";
  2350.             mes "For the "+.@number+"st enchanting, you need ^0000FF"+.@cost+"^000000 Coagulated Spell items.";
  2351.             next;
  2352.             set .@select,select("Quit","Fighting Spirit","Archery","Spell","Vitality","Attack Speed","Lucky");
  2353.             switch (.@select) {
  2354.             case 1:
  2355.                 mes "[Hugin's Magic Master]";
  2356.                 mes "Ok, come back when you are ready.";
  2357.                 close;
  2358.             case 2:
  2359.                 set .@enchant,.@enchant1st[.@select-2];
  2360.                 break;
  2361.             case 3:
  2362.                 set .@enchant,.@enchant1st[.@select-2];
  2363.                 break;
  2364.             case 4:
  2365.                 set .@enchant,.@enchant1st[.@select-2];
  2366.                 break;
  2367.             case 5:
  2368.                 set .@enchant,.@enchant1st[.@select-2];
  2369.                 break;
  2370.             case 6:
  2371.                 set .@enchant,.@enchant1st[.@select-2];
  2372.                 break;
  2373.             case 7:
  2374.                 set .@enchant,.@enchant1st[.@select-2];
  2375.                 break;
  2376.             }
  2377.         } else {
  2378.             if (.@card3 == .@enchant1st[0] || .@card3 == .@enchant1st[1] || .@card3 == .@enchant1st[2] ||
  2379.                 .@card3 == .@enchant1st[3] || .@card3 == .@enchant1st[4] || .@card3 == .@enchant1st[5]) {
  2380.                 set .@cost,.@enchant_cost[1];
  2381.                 set .@number,2;
  2382.             } else if (.@card3 == .@enchant2nd[0] || .@card3 == .@enchant2nd[1] || .@card3 == .@enchant2nd[2] ||
  2383.                 .@card3 == .@enchant2nd[3] || .@card3 == .@enchant2nd[4] || .@card3 == .@enchant2nd[5]) {
  2384.                 set .@cost,.@enchant_cost[2];
  2385.                 set .@number,3;
  2386.             } else if (.@card3 == .@enchant3rd[0] || .@card3 == .@enchant3rd[1] || .@card3 == .@enchant3rd[2] ||
  2387.                 .@card3 == .@enchant3rd[3] || .@card3 == .@enchant3rd[4] || .@card3 == .@enchant3rd[5]) {
  2388.                 set .@cost,.@enchant_cost[3];
  2389.                 set .@number,4;
  2390.             } else if (.@card3 == .@enchant4th[0] || .@card3 == .@enchant4th[1] || .@card3 == .@enchant4th[2] ||
  2391.                 .@card3 == .@enchant4th[3] || .@card3 == .@enchant4th[4] || .@card3 == .@enchant4th[5]) {
  2392.                 set .@card2,getequipcardid(.@part,2);
  2393.                 set .@cost,.@enchant_cost[4];
  2394.                 if (.@card2) {
  2395.                     mes "[Hugin's Magic Master]"; //Custom text
  2396.                     mes "Your shoes have reached the maximum option to enchant.";
  2397.                     mes "Please bring me a new one if you want me to enchant again.";
  2398.                     close;
  2399.                 }
  2400.                 //3rd slot random enchanting
  2401.                 switch (.@card3) {
  2402.                     case 4822: //Fighting_Spirit7
  2403.                     case 4835: //Expert_Archer4
  2404.                     case 4826: //Spell5
  2405.                     case 4862: //MHP2
  2406.                     case 4881: //DelayafterAttack4Lv
  2407.                     case 4755: //Luck6
  2408.                         set .@enchant,callfunc("F_Rand",4875,4876,4877,4878,4879,4880); //Bear's_Power,Runaway_Magic,Speed_Of_Light,Muscle_Fool,Hawkeye,Lucky_Day
  2409.                         mes "[Hugin's Magic Master]"; //Custom text
  2410.                         mes "Seems you already completed the best upgrade option in your 4th slot.";
  2411.                         mes "For that I can give a random bonus effect to your 3rd slot. And of course, with certain payment...";
  2412.                         next;
  2413.                         mes "[Hugin's Magic Master]";
  2414.                         mes "Enchanting ^0000FF"+.@equip_name$+"^000000's 3rd slot for obtaining a random bonus effect. Requires ^0000FF"+.@cost+"^000000 Coagulated Spell items.";
  2415.                         next;
  2416.                         if (select("Quit","Effect Upgrade!") == 1) {
  2417.                             mes "[Hugin's Magic Master]";
  2418.                             mes "Ok, come back when you are ready.";
  2419.                             close;
  2420.                         }
  2421.                         if (countitem(6608) < .@cost) {
  2422.                             mes "[Hugin's Magic Master]";
  2423.                             mes "Hmm, you are missing "+(.@cost - countitem(6608))+" Coagulated Spell items. Go get more, and then we can talk about more enchants.";
  2424.                             close;
  2425.                         }
  2426.                         specialeffect2 EF_REPAIRWEAPON;
  2427.                         set .@equip_refine,getequiprefinerycnt(.@part);
  2428.                         delitem 6608,.@cost; //Coagulated_Spell
  2429.                         delequip .@part;
  2430.                         mes "[Hugin's Magic Master]";
  2431.                         mes "This is it! This special stone is now yours.";
  2432.                         mes "Hahaha... I am really the only master of these things.";
  2433.                         mes "Thank you for believing in me.";
  2434.                         getitem2 .@equip_id,1,1,.@equip_refine,0,0,0,.@enchant,.@card3;
  2435.                         close;
  2436.                 }
  2437.             }
  2438.             //4th slot 2nd try enchanting
  2439.             if (.@card3 == .@enchant1st[0])
  2440.                 set .@enchant,.@enchant2nd[0];
  2441.             else if (.@card3 == .@enchant1st[1])
  2442.                 set .@enchant,.@enchant2nd[1];
  2443.             else if (.@card3 == .@enchant1st[2])
  2444.                 set .@enchant,.@enchant2nd[2];
  2445.             else if (.@card3 == .@enchant1st[3])
  2446.                 set .@enchant,.@enchant2nd[3];
  2447.             else if (.@card3 == .@enchant1st[4])
  2448.                 set .@enchant,.@enchant2nd[4];
  2449.             else if (.@card3 == .@enchant1st[5])
  2450.                 set .@enchant,.@enchant2nd[5];
  2451.             //4th slot 3rd try enchanting
  2452.             if (.@card3 == .@enchant2nd[0])
  2453.                 set .@enchant,.@enchant3rd[0];
  2454.             else if (.@card3 == .@enchant2nd[1])
  2455.                 set .@enchant,.@enchant3rd[1];
  2456.             else if (.@card3 == .@enchant2nd[2])
  2457.                 set .@enchant,.@enchant3rd[2];
  2458.             else if (.@card3 == .@enchant2nd[3])
  2459.                 set .@enchant,.@enchant3rd[3];
  2460.             else if (.@card3 == .@enchant2nd[4])
  2461.                 set .@enchant,.@enchant3rd[4];
  2462.             else if (.@card3 == .@enchant2nd[5])
  2463.                 set .@enchant,.@enchant3rd[5];
  2464.             //4th slot 4th try enchanting
  2465.             if (.@card3 == .@enchant3rd[0])
  2466.                 set .@enchant,.@enchant4th[0];
  2467.             else if (.@card3 == .@enchant3rd[1])
  2468.                 set .@enchant,.@enchant4th[1];
  2469.             else if (.@card3 == .@enchant3rd[2])
  2470.                 set .@enchant,.@enchant4th[2];
  2471.             else if (.@card3 == .@enchant3rd[3])
  2472.                 set .@enchant,.@enchant4th[3];
  2473.             else if (.@card3 == .@enchant3rd[4])
  2474.                 set .@enchant,.@enchant4th[4];
  2475.             else if (.@card3 == .@enchant3rd[5])
  2476.                 set .@enchant,.@enchant4th[5];
  2477.             mes "[Hugin's Magic Master]";
  2478.             mes "Enchanting ^0000FF"+.@equip_name$+"^000000's 4th slot as ^0000FF"+.@number+"^000000 level effect. Requires ^0000FF"+.@cost+"^000000 Coagulated Spell items.";
  2479.             next;
  2480.             if (select("Quit","Effect Upgrade!") == 1) {
  2481.                 mes "[Hugin's Magic Master]";
  2482.                 mes "Ok, come back when you are ready.";
  2483.                 close;
  2484.             }
  2485.             if (countitem(6608) < .@cost) {
  2486.                 mes "[Hugin's Magic Master]";
  2487.                 mes "Hmm, you are missing "+(.@cost - countitem(6608))+" Coagulated Spell items. Go get more, and then we can talk about more enchants.";
  2488.                 close;
  2489.             }
  2490.         }
  2491.         break;
  2492.     default:
  2493.         mes "[Hugin's Magic Master]";
  2494.         mes "This is not the right item for this enchant.";
  2495.         mes "Remember, only those 6 types of Temporal Boots are available for enchanting.";
  2496.         close;
  2497.     }
  2498.     specialeffect2 EF_REPAIRWEAPON;
  2499.     set .@equip_refine,getequiprefinerycnt(.@part);
  2500.     delitem 6608,.@cost; //Coagulated_Spell
  2501.     delequip .@part;
  2502.     mes "[Hugin's Magic Master]";
  2503.     mes "Trying for enchant number ^630000"+.@number+"^000000.";
  2504.     getitem2 .@equip_id,1,1,.@equip_refine,0,0,0,0,.@enchant;
  2505.     close;
  2506. }
  2507.  
  2508. glast_01,210,270,8  script  Hugin's Craftsman   726,{
  2509.     disable_items;
  2510.     if (MaxWeight - Weight < 1000) {
  2511.         mes "Your bag is too heavy. Reduce some weight and come back.";
  2512.         close;
  2513.     }
  2514.     mes "[Hugin's Craftsman]";
  2515.     mes "That Magic Master always says that enchanting Temporal Boots is the best. But, I think quite different.";
  2516.     next;
  2517.     mes "[Hugin's Craftsman]";
  2518.     mes "I think putting a slot into the item would be the best. Even with some risk of failing.";
  2519.     next;
  2520.     mes "[Hugin's Craftsman]";
  2521.     mes "Bring me ^0000FF5 Temporal Crystals^000000, and I will try to put a slot into your advanced Temporal Boots. But, it's possible to ^FF0000fail and break the item^000000. Is that ok?";
  2522.     next;
  2523.     if (select("Cancel","Take the risk and try to add a slot") == 1) {
  2524.         mes "[Hugin's Craftsman]";
  2525.         mes "Ok, come back anytime you want.";
  2526.         close;
  2527.     }
  2528.     set .@part,EQI_SHOES;
  2529.     if (!getequipisequiped(.@part)) {
  2530.         mes "[Hugin's Craftsman]";
  2531.         mes "Are you sure you are wearing the item?";
  2532.         close;
  2533.     }
  2534.     set .@equip_id,getequipid(.@part);
  2535.     switch (.@equip_id) {
  2536.     case 22000: //Temporal_Str_Boots
  2537.     case 22001: //Temporal_Int_Boots
  2538.     case 22002: //Temporal_Agi_Boots
  2539.     case 22003: //Temporal_Vit_Boots
  2540.     case 22004: //Temporal_Dex_Boots
  2541.     case 22005: //Temporal_Luk_Boots
  2542.         mes "[Hugin's Craftsman]";
  2543.         mes "And ^FF0000all enchant or refine rates will be lost if you fail this.^000000";
  2544.         mes "Still want to risk it?";
  2545.         next;
  2546.         if (select("Cancel","I am ok with it!") == 1) {
  2547.             mes "[Hugin's Craftsman]";
  2548.             mes "Ok, come back anytime you want.";
  2549.             close;
  2550.         }
  2551.         mes "[Hugin's Craftsman]";
  2552.         mes "Once again, ^FF0000That Magic Master won't enchant any item with a slot.^000000";
  2553.         mes "Still want to proceed?";
  2554.         next;
  2555.         if (select("Cancel","I understand. Try to slot it.") == 1) {
  2556.             mes "[Hugin's Craftsman]";
  2557.             mes "Ok, come back anytime you want.";
  2558.             close;
  2559.         }
  2560.         if (countitem(6607) < 5) {
  2561.             mes "[Hugin's Craftsman]";
  2562.             mes "You must bring ^0000FF5 Temporal Crystal items^000000. Nothing is free you know...";
  2563.             close;
  2564.         }
  2565.         set .@random,rand(1,100);
  2566.         if (.@random <= 80) { //Custom rates
  2567.             mes "[Hugin's Craftsman]";
  2568.             mes "Arrggg, we failed. Better luck next time.";
  2569.             specialeffect2 EF_PHARMACY_FAIL;
  2570.             delitem 6607,5; //Temporal_Crystal
  2571.             delequip .@part;
  2572.             close;
  2573.         }
  2574.         mes "[Hugin's Craftsman]"; //Custom text
  2575.         mes "Yuhuu~ we succeed. Here you are...";
  2576.         mes "A slot has been added to your advanced Temporal Boots.";
  2577.         mes "Thank you for believing in me.";
  2578.         specialeffect2 EF_PHARMACY_OK;
  2579.         delitem 6607,5; //Temporal_Crystal
  2580.         delequip .@part;
  2581.         if (.@equip_id == 22000) {
  2582.             getitem 22006,1; //Temporal_Str_Boots_
  2583.         } else if (.@equip_id == 22001) {
  2584.             getitem 22009,1; //Temporal_Int_Boots_
  2585.         } else if (.@equip_id == 22002) {
  2586.             getitem 22010,1; //Temporal_Agi_Boots_
  2587.         } else if (.@equip_id == 22003) {
  2588.             getitem 22007,1; //Temporal_Vit_Boots_
  2589.         } else if (.@equip_id == 22004) {
  2590.             getitem 22008,1; //Temporal_Dex_Boots_
  2591.         } else if (.@equip_id == 22005) {
  2592.             getitem 22011,1; //Temporal_Luk_Boots_
  2593.         }
  2594.         close;
  2595.     default:
  2596.         mes "[Hugin's Craftsman]";
  2597.         mes "This is not it! We need ^0000FFAdvanced Temporal Boots^000000 items! The item ^0000FFwith a stat effect and without a slot^000000!";
  2598.         close;
  2599.     }
  2600. }
  2601.  
  2602. // Glast Heim Nightmare Mode :: nightmare_gh
  2603. //============================================================
  2604. glast_01,195,273,4  script  Hugin's Follower#n_gh   123,{
  2605.     mes "[Hugin's Follower]";
  2606.     mes "I can't move between time and dimension like a master Hugin but I can pretend to move.";
  2607.     next;
  2608.     mes "[Hugin's Follower]";
  2609.     mes "What about this Glast Heim is born with powerful dark force?";
  2610.     next;
  2611.     if (select("I don't care","That is interesting, please tell me more") == 1) {
  2612.         mes "[Hugin's Follower]";
  2613.         mes "Well~ If you are not interested in it, never mind.";
  2614.         close;
  2615.     }
  2616.     mes "[Hugin's Follower]";
  2617.     mes "As learning ability from Hugin, I just find out the path to Old Glast Heim of more powerful dark force.";
  2618.     next;
  2619.     mes "[Hugin's Follower]";
  2620.     mes "How is it? Do you want to explore there?";
  2621.     next;
  2622.     if (select("No, I want to stop it","I really want to do that!") == 1) {
  2623.         mes "[Hugin's Follower]";
  2624.         mes "Well~ If you are not interested in it, never mind.";
  2625.         close;
  2626.     }
  2627.     mes "[Hugin's Follower]";
  2628.     mes "Sure that is not free~ I have to get something little bit. Hoho...";
  2629.     next;
  2630.     mes "[Hugin's Follower]";
  2631.     mes "I can send you just two place. How is it? Do you want to try?";
  2632.     next;
  2633.     switch (select("Cancel","Monastery Cemetery (Lv100~130) - 5000z","Corridor of 2nd floor (Over Lv140) - 10000z")) {
  2634.     case 1:
  2635.         mes "[Hugin's Follower]";
  2636.         mes "Alright, please come back whenever you change mind. I think you will have lots of thing to talk with me...";
  2637.         close;
  2638.     case 2:
  2639.         if (Zeny < 5000) {
  2640.             mes "[Hugin's Follower]";
  2641.             mes "Please make sure you already have all of the money.";
  2642.             close;
  2643.         }
  2644.         set Zeny,Zeny-5000;
  2645.         warp "gl_chyard_",148,144;
  2646.         end;
  2647.     case 3:
  2648.         if (Zeny < 10000) {
  2649.             mes "[Hugin's Follower]";
  2650.             mes "Please make sure you already have all of the money.";
  2651.             close;
  2652.         }
  2653.         set Zeny,Zeny-10000;
  2654.         warp "gl_cas02_",104,31;
  2655.         end;
  2656.     }
  2657. }
  2658.  
  2659. gl_chyard_,148,149,4    script  Hugin's Follower#n_gh1  123,{
  2660.     mes "[Hugin's Follower]";
  2661.     mes "You want to break?";
  2662.     mes "Ok, let's get out of here.?";
  2663.     next;
  2664.     if (select("Ah, wrong click... I mean I was not talk to you","Please let me out from here") == 1) {
  2665.         mes "[Hugin's Follower]";
  2666.         mes "Alright just tell me whenever you want to leave.";
  2667.         close;
  2668.     }
  2669.     warp "glast_01",210,269;
  2670.     end;
  2671. }
  2672.  
  2673. gl_cas02_,104,36,4  script  Hugin's Follower#n_gh2  123,{
  2674.     mes "[Hugin's Follower]";
  2675.     mes "You want to break?";
  2676.     mes "Ok, let's get out of here.?";
  2677.     next;
  2678.     if (select("Ah, wrong click... I mean I was not talk to you","Please let me out from here") == 1) {
  2679.         mes "[Hugin's Follower]";
  2680.         mes "Alright just tell me whenever you want to leave.";
  2681.         close;
  2682.     }
  2683.     warp "glast_01",210,269;
  2684.     end;
  2685. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!