summaryrefslogtreecommitdiff
path: root/npc/quests/WIP
diff options
context:
space:
mode:
authorFlavioJS <FlavioJS@54d463be-8e91-2dee-dedb-b68131a5f0ec>2006-12-05 13:23:07 +0000
committerFlavioJS <FlavioJS@54d463be-8e91-2dee-dedb-b68131a5f0ec>2006-12-05 13:23:07 +0000
commit288490094a7fe9167747dc78d416940759a31197 (patch)
tree53dc4f5c2375f4b688b53ca8841630ddec5e1f88 /npc/quests/WIP
parent8ec1c47aed09c90343949d57c92760ba84738a46 (diff)
downloadhercules-288490094a7fe9167747dc78d416940759a31197.tar.gz
hercules-288490094a7fe9167747dc78d416940759a31197.tar.bz2
hercules-288490094a7fe9167747dc78d416940759a31197.tar.xz
hercules-288490094a7fe9167747dc78d416940759a31197.zip
- Massive EOL normalization & 'svn:eol-style native' flag setting for all txt/conf/h/c files.
git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@9410 54d463be-8e91-2dee-dedb-b68131a5f0ec
Diffstat (limited to 'npc/quests/WIP')
-rw-r--r--npc/quests/WIP/4.txt244
-rw-r--r--npc/quests/WIP/6.txt248
-rw-r--r--npc/quests/WIP/airships.txt2276
-rw-r--r--npc/quests/WIP/schwalz.txt2090
-rw-r--r--npc/quests/WIP/shadow_quest.txt830
5 files changed, 2844 insertions, 2844 deletions
diff --git a/npc/quests/WIP/4.txt b/npc/quests/WIP/4.txt
index bfe241c31..0f3a31f29 100644
--- a/npc/quests/WIP/4.txt
+++ b/npc/quests/WIP/4.txt
@@ -1,123 +1,123 @@
-airplane.gat,236,63,4 script Hallen 55,{
- if (fragmentauest>3) {
- mes "[Hallen]";
- mes "Nice weather, isnt it?";
- close;
- }
- if (fragmentauest==2) {
- if (girls==1) {
- mes "[Hallen]";
- mes "Have you finished that trip??";
- close;
- }
- mes "[Hallen]";
- mes "Oh, thx hero!Do you like my girls? She's reallybeatiful. Maybe you";
- mes "shall become her boyfriend?";
- next;
- mes "[Hallen]";
- mes " Its a joke ^_- Never mind.";
- mes "And you know, there is one thing im really ineterested in....";
- next;
- if (airshipquest != 5) {
- mes "[Hallen]";
- mes "You should better ask captain about the airship";
- mes "You cant understand me if you dont do that...";
- close;
- };
- mes "You see its about the airship works. Heart of Ymir...";
- mes "Very interesting thing i think...";
- getitem 501,1;
- set girls,1;
- next;
- mes "[Hallen]";
- mes "I really want to know something about it.. if somebody could help me...";
- mes "pity I cant go to einbroch Laboratory...";
- mes "never mind it just my feelings. Thanks for help..";
- next;
- if (select("I can do it for you:Sup, guy..") == 1) {
- mes "[Hallen]";
- mes "Really??? Thx. I will wait for you";
- } else {
- mes "Hallen";
- mes "Well, Thanks afterall.";
- }
- close;
- }
- if (fragmentauest==3) {
- mes "[Hallen]";
- mes "Thanks to you now i got it.. What is that Heart of Ymir..";
- close2;
- getexp 700,400;
- set fragmentauest,4;
- end;
- }
- mes "[Hallen]";
- mes "Hello, "+strcharinfo(0)+". Nice to see you on ship.";
- mes "Hows your trips? I suppose you have lots of to tell";
- mes "your children about";
- disablenpc "Ferlok";
- next;
- menu "Ye.. I have lots of tales..",-,"Nothing really interesting",l_inter,"Have any work for me?",l_work;
- mes "[Hallen]";
- mes "Ye.. I would like to listen to them too...";
- mes "But not now. I have some work to do";
- close;
- l_inter:
- mes "[Hallen]";
- mes "You are really shy to tell us. ^_- It doesnt matter";
- mes "we all know about your doings.";
- mes "Glad to see such a hero i can say";
- close;
- l_work:
- mes "[Hallen]";
- mes "Hm.. let me see... Ye. Its not so important, but if you have some";
- mes "free time, can you deliver the letter to my cousin Kaci?";
- next;
- if (select("yes, of course:no, sory") == 1) {
- mes "[Hallen]";
- mes "She can be found near gaming tables under deck. Thank you";
- getitem 7148,1;
- set fragmentauest,1;
- } else {
- mes "[Hallen]";
- mes "Its a pity. Good luck in training";
- }
- close;
-}
-//=====================================================================
-ein_in01,261,37,4 script #reader 111,4,4,{
-OnTouch:
-mes "[Code reader]";
- mes "Enter a valid 3 dig code to get information";
- mes "You can do it 3 times only. Be careful";
- next;
- set @number, rand(100,999);
- set @count, 0;
-l_input:
- input @input;
- if (@input != @number) {
- mes "[Code reader]";
- mes "you enter not valid digital";
- set @count,@count+1;
- next;
- if (@count < 3) goto l_input;
- mes "[Code reader]";
- mes "You have not enter code correct";
- close;
- }
- mes "[Card reader]";
- mes "It seems to you that you find the information. You try to learn it";
- next;
- enablenpc "Ferlok";
- mes "[Hallen]";
- mes "Please leave this plce. I will meet you on airplane";
- set fragmentauset,3;
- close;
- }
-}
-//===========================================================================
-ein_in01,255,33,4 script Ferlok 55,{
- mes "[Hallen]";
- mes "I have already told you to go to plane. Hurry!";
- close;
+airplane.gat,236,63,4 script Hallen 55,{
+ if (fragmentauest>3) {
+ mes "[Hallen]";
+ mes "Nice weather, isnt it?";
+ close;
+ }
+ if (fragmentauest==2) {
+ if (girls==1) {
+ mes "[Hallen]";
+ mes "Have you finished that trip??";
+ close;
+ }
+ mes "[Hallen]";
+ mes "Oh, thx hero!Do you like my girls? She's reallybeatiful. Maybe you";
+ mes "shall become her boyfriend?";
+ next;
+ mes "[Hallen]";
+ mes " Its a joke ^_- Never mind.";
+ mes "And you know, there is one thing im really ineterested in....";
+ next;
+ if (airshipquest != 5) {
+ mes "[Hallen]";
+ mes "You should better ask captain about the airship";
+ mes "You cant understand me if you dont do that...";
+ close;
+ };
+ mes "You see its about the airship works. Heart of Ymir...";
+ mes "Very interesting thing i think...";
+ getitem 501,1;
+ set girls,1;
+ next;
+ mes "[Hallen]";
+ mes "I really want to know something about it.. if somebody could help me...";
+ mes "pity I cant go to einbroch Laboratory...";
+ mes "never mind it just my feelings. Thanks for help..";
+ next;
+ if (select("I can do it for you:Sup, guy..") == 1) {
+ mes "[Hallen]";
+ mes "Really??? Thx. I will wait for you";
+ } else {
+ mes "Hallen";
+ mes "Well, Thanks afterall.";
+ }
+ close;
+ }
+ if (fragmentauest==3) {
+ mes "[Hallen]";
+ mes "Thanks to you now i got it.. What is that Heart of Ymir..";
+ close2;
+ getexp 700,400;
+ set fragmentauest,4;
+ end;
+ }
+ mes "[Hallen]";
+ mes "Hello, "+strcharinfo(0)+". Nice to see you on ship.";
+ mes "Hows your trips? I suppose you have lots of to tell";
+ mes "your children about";
+ disablenpc "Ferlok";
+ next;
+ menu "Ye.. I have lots of tales..",-,"Nothing really interesting",l_inter,"Have any work for me?",l_work;
+ mes "[Hallen]";
+ mes "Ye.. I would like to listen to them too...";
+ mes "But not now. I have some work to do";
+ close;
+ l_inter:
+ mes "[Hallen]";
+ mes "You are really shy to tell us. ^_- It doesnt matter";
+ mes "we all know about your doings.";
+ mes "Glad to see such a hero i can say";
+ close;
+ l_work:
+ mes "[Hallen]";
+ mes "Hm.. let me see... Ye. Its not so important, but if you have some";
+ mes "free time, can you deliver the letter to my cousin Kaci?";
+ next;
+ if (select("yes, of course:no, sory") == 1) {
+ mes "[Hallen]";
+ mes "She can be found near gaming tables under deck. Thank you";
+ getitem 7148,1;
+ set fragmentauest,1;
+ } else {
+ mes "[Hallen]";
+ mes "Its a pity. Good luck in training";
+ }
+ close;
+}
+//=====================================================================
+ein_in01,261,37,4 script #reader 111,4,4,{
+OnTouch:
+mes "[Code reader]";
+ mes "Enter a valid 3 dig code to get information";
+ mes "You can do it 3 times only. Be careful";
+ next;
+ set @number, rand(100,999);
+ set @count, 0;
+l_input:
+ input @input;
+ if (@input != @number) {
+ mes "[Code reader]";
+ mes "you enter not valid digital";
+ set @count,@count+1;
+ next;
+ if (@count < 3) goto l_input;
+ mes "[Code reader]";
+ mes "You have not enter code correct";
+ close;
+ }
+ mes "[Card reader]";
+ mes "It seems to you that you find the information. You try to learn it";
+ next;
+ enablenpc "Ferlok";
+ mes "[Hallen]";
+ mes "Please leave this plce. I will meet you on airplane";
+ set fragmentauset,3;
+ close;
+ }
+}
+//===========================================================================
+ein_in01,255,33,4 script Ferlok 55,{
+ mes "[Hallen]";
+ mes "I have already told you to go to plane. Hurry!";
+ close;
s} \ No newline at end of file
diff --git a/npc/quests/WIP/6.txt b/npc/quests/WIP/6.txt
index 46a856da2..c4954b6dc 100644
--- a/npc/quests/WIP/6.txt
+++ b/npc/quests/WIP/6.txt
@@ -1,127 +1,127 @@
// by CallNix v.0.0
-//======================================Juno to Izlude airship=====================================================================
-airplane_01.gat,238,154,4 script Captain 854,{
-if (airshipquest==0) {
-mes "[Fayroll]";
-mes "I have nothing to say to you anymore";
-close;
-}
-
-if (airshipquest==3) {
-mes "[Fayroll]";
-mes "Oh, you have finished that work. Great. Now i shall read this letter.";
-mes "Dont interrupt me please";
-delitem 7276,1;
-set airshipquest,4;
-//addtimer 30000,"Captain::OnFinish"; Возможно сделать так. Но тут по таймеру, а не по кликам на НПЦ
-close;
-}
-
-if (airshipquest==4) {
-set @k,rand(4);
-if (@k == 2) goto OnFinish;
-mes "[Fayroll]";
-mes "I had not finished the letter yet";
-close;
-}
-
-mes "[Fayroll]";
-mes "Hello, "+strcharinfo(0)+". Nice to see you";
-mes "Anything want from me?";
-next;
-if (select("yes,about airships:no, nothing") == 1) {
- mes "[Fayroll]";
- mes "So i think you want to know how airship works";
- mes "This is the top secret that only a captain will know. Anyway, if you're willing ti help me, I will let you know.";
- next;
- menu "I will help you. But what must I do?",-,"No, sorry, I have no time for this.",L_SORRY;
- mes "[Fayroll]";
- mes " You see, I have a brother. He is also a captain of airplane in Juno to Lighthalzen airship.";
- mes "As we are on different ships, i cant communicate with him. Yor is to deliver this letter to him.";
- mes "If you will do this, I shall tell you the secret.";
- getitem 7276,1; //Tarloks letter. Не нашел в базе
- set airshipquest,1;
-} else {
- mes "[Fayroll]";
- mes "Then dont interrupt me. I have alot of work to do.";
- mes "Go to the Casino on ship. And spen some time there";
-}
-close;
-
-L_SORRY:
-mes "[Fayroll]";
-mes "Ye this is bad, but i cant insist on it. Follow your way";
-mes "See you the other day.";
-close;
-
-OnFinish:
-mes "[Fayroll]";
-mes "Whoo... I finally got it.Now i shall tell you the secret.";
-next;
-mes "[Fayroll]";
-mes "The cocept of the flight of airship";
-mes "is the energy produced from the boiler wich push the propeller";
-mes "that moves the giant beauty. Do you understand now?";
-next;
-menu "Is That all???",-;
-mes "[Fayroll]";
-mes "You cant lift this thing up only with steam.";
-mes "thats why the machien ^5566FF'Enchancer'^000000 is used";
-mes "It is working on Heart of Ymir. Thats all the secret. Now go.";
-set airshipquest,0;
-getexp 200000,10000;
-close;
-}
-//=======================================Juno to Lighthalzen airship====================================================================
-airplane.gat,236,163,4 script Aiplane Captain 855,{
-if (airshipquest == 1) goto L_QUEST;
-if (airshipquest == 2) goto L_FINISH;
-mes "[Dulu]";
-mes "Welcome on the board of ourship. Guess you will have lots of time here";
-close;
-
-L_QUEST:
-mes "[Dulu]";
-mes "Hello, stranger. I am the Airplane Captain of this ship.";
-mes "If you have any problems with our stuff you can simply tell me about this.";
-next;
-if (select("I have letter for you:hmm.. sorry") == 1) {
- mes "[Dulu]";
- mes "You have letter for me?? Really??";
- delitem 7276,1;
- mes "WOHHOOO! Its from my brother. Thx alot, stranger..";
- mes "You see, he has borrowed something from me long ago. But unfortunatly he had lost it";
- mes "and this reallly bed for you...";
- next;
- mes "*Dulu shows you a letter*";
- mes "^5566FF'The one who send you the letter will find it for me. Don't reply to me if he refuses to do so'^000000";
- next;
- mes "[Dulu]";
- mes "So when you accept that work you accept doing this me. Now i shall tell you your work";
- next;
- mes "[Dulu]";
- mes "My brother had lost 2 Will of Darkness and 2 Prickly Fruits";
- mes "They can simply be dropped on the deck of the ship. Monsters often atack ships. Get this items for me from them.";
- mes "Now monster are going to atack Juno to Izlude airship. Go there and get what i need";
- set airshipquest,2;
- } else {
- mes "[Dulu]";
- mes "Well, you know where to find me. See you later";
-}
-close;
-
-L_FINISH:
-if (countitem(7340)<2 && countitem(576)<2) {
-mes "[Dulu]";
-mes "You havent geather items yet";
-close;
-}
-mes "[Dulu]";
-mes "Great work i can say";
-delitem 7340,2;
-delitem 576,2;
-getitem 7276,1;
-set airshipquest,3;
-close;
+//======================================Juno to Izlude airship=====================================================================
+airplane_01.gat,238,154,4 script Captain 854,{
+if (airshipquest==0) {
+mes "[Fayroll]";
+mes "I have nothing to say to you anymore";
+close;
+}
+
+if (airshipquest==3) {
+mes "[Fayroll]";
+mes "Oh, you have finished that work. Great. Now i shall read this letter.";
+mes "Dont interrupt me please";
+delitem 7276,1;
+set airshipquest,4;
+//addtimer 30000,"Captain::OnFinish"; Возможно сделать так. Но тут по таймеру, а не по кликам на НПЦ
+close;
+}
+
+if (airshipquest==4) {
+set @k,rand(4);
+if (@k == 2) goto OnFinish;
+mes "[Fayroll]";
+mes "I had not finished the letter yet";
+close;
+}
+
+mes "[Fayroll]";
+mes "Hello, "+strcharinfo(0)+". Nice to see you";
+mes "Anything want from me?";
+next;
+if (select("yes,about airships:no, nothing") == 1) {
+ mes "[Fayroll]";
+ mes "So i think you want to know how airship works";
+ mes "This is the top secret that only a captain will know. Anyway, if you're willing ti help me, I will let you know.";
+ next;
+ menu "I will help you. But what must I do?",-,"No, sorry, I have no time for this.",L_SORRY;
+ mes "[Fayroll]";
+ mes " You see, I have a brother. He is also a captain of airplane in Juno to Lighthalzen airship.";
+ mes "As we are on different ships, i cant communicate with him. Yor is to deliver this letter to him.";
+ mes "If you will do this, I shall tell you the secret.";
+ getitem 7276,1; //Tarloks letter. Не нашел в базе
+ set airshipquest,1;
+} else {
+ mes "[Fayroll]";
+ mes "Then dont interrupt me. I have alot of work to do.";
+ mes "Go to the Casino on ship. And spen some time there";
+}
+close;
+
+L_SORRY:
+mes "[Fayroll]";
+mes "Ye this is bad, but i cant insist on it. Follow your way";
+mes "See you the other day.";
+close;
+
+OnFinish:
+mes "[Fayroll]";
+mes "Whoo... I finally got it.Now i shall tell you the secret.";
+next;
+mes "[Fayroll]";
+mes "The cocept of the flight of airship";
+mes "is the energy produced from the boiler wich push the propeller";
+mes "that moves the giant beauty. Do you understand now?";
+next;
+menu "Is That all???",-;
+mes "[Fayroll]";
+mes "You cant lift this thing up only with steam.";
+mes "thats why the machien ^5566FF'Enchancer'^000000 is used";
+mes "It is working on Heart of Ymir. Thats all the secret. Now go.";
+set airshipquest,0;
+getexp 200000,10000;
+close;
+}
+//=======================================Juno to Lighthalzen airship====================================================================
+airplane.gat,236,163,4 script Aiplane Captain 855,{
+if (airshipquest == 1) goto L_QUEST;
+if (airshipquest == 2) goto L_FINISH;
+mes "[Dulu]";
+mes "Welcome on the board of ourship. Guess you will have lots of time here";
+close;
+
+L_QUEST:
+mes "[Dulu]";
+mes "Hello, stranger. I am the Airplane Captain of this ship.";
+mes "If you have any problems with our stuff you can simply tell me about this.";
+next;
+if (select("I have letter for you:hmm.. sorry") == 1) {
+ mes "[Dulu]";
+ mes "You have letter for me?? Really??";
+ delitem 7276,1;
+ mes "WOHHOOO! Its from my brother. Thx alot, stranger..";
+ mes "You see, he has borrowed something from me long ago. But unfortunatly he had lost it";
+ mes "and this reallly bed for you...";
+ next;
+ mes "*Dulu shows you a letter*";
+ mes "^5566FF'The one who send you the letter will find it for me. Don't reply to me if he refuses to do so'^000000";
+ next;
+ mes "[Dulu]";
+ mes "So when you accept that work you accept doing this me. Now i shall tell you your work";
+ next;
+ mes "[Dulu]";
+ mes "My brother had lost 2 Will of Darkness and 2 Prickly Fruits";
+ mes "They can simply be dropped on the deck of the ship. Monsters often atack ships. Get this items for me from them.";
+ mes "Now monster are going to atack Juno to Izlude airship. Go there and get what i need";
+ set airshipquest,2;
+ } else {
+ mes "[Dulu]";
+ mes "Well, you know where to find me. See you later";
+}
+close;
+
+L_FINISH:
+if (countitem(7340)<2 && countitem(576)<2) {
+mes "[Dulu]";
+mes "You havent geather items yet";
+close;
+}
+mes "[Dulu]";
+mes "Great work i can say";
+delitem 7340,2;
+delitem 576,2;
+getitem 7276,1;
+set airshipquest,3;
+close;
} \ No newline at end of file
diff --git a/npc/quests/WIP/airships.txt b/npc/quests/WIP/airships.txt
index b6284bcbd..60930f7d2 100644
--- a/npc/quests/WIP/airships.txt
+++ b/npc/quests/WIP/airships.txt
@@ -1,1138 +1,1138 @@
-//===== eAthena Script =======================================
-//= The Airship System Script
-//===== By: ==================================================
-//= MasterOfMuppets
-//===== Current Version: =====================================
-//= 0.5c
-//===== Compatible With: =====================================
-//= eAthena SVN 3422+(Requires jA Script System)
-//===== Description: =========================================
-//= The Airship System used in the official servers, however this
-//= one is still about 25% custom and is missing some npcs.
-//===== Additional Comments: =================================
-//= 0.1 Added first version, it might be a little buggy [MasterOfMuppets]
-//= 0.1a Fixed the Airport Staff#Iz which was [MasterOfMuppets]
-//= warping you to the same location as Airport Staff#Ein
-//= 0.2 Implemented some more airship NPCs, more are to come.
-//= 0.3 Implemented some more NPCs [MasterOfMuppets]
-//= 0.4 Implemented two mini games scripted by Dj-Yhn [MasterOfMuppets]
-//= 0.5 Removed Duplicates [Silent]
-//= 0.5aFixed a typo [Evera] 0.5b Fixed appledice bugs [Lupus]
-//============================================================
-
-//============================================================
-//= The Airship System (Yuno -> Hugel -> Einbroch -> Lighthalzen -> repeat)
-//============================================================
-
-airplane.gat,243,74,4 script #AirshipWarp-1 45,2,2{
-OnTouch:
- if($@airplanelocation == 1)warp "einbroch.gat",90,275;
- if($@airplanelocation == 2)warp "yuno.gat",85,265;
- if($@airplanelocation == 3)warp "lighthalzen.gat",302,75;
- if($@airplanelocation == 4)warp "hugel.gat",182,150;
- end;
-
-OnHide:
- misceffect 16;
- end;
-OnUnhide:
- misceffect 215;
- end;
-}
-
-airplane.gat,243,29,4 script #AirshipWarp-2 45,2,2{
-OnTouch:
- if($@airplanelocation == 1)warp "einbroch.gat",90,275;
- if($@airplanelocation == 2)warp "yuno.gat",85,265;
- if($@airplanelocation == 3)warp "lighthalzen.gat",302,75;
- if($@airplanelocation == 4)warp "hugel.gat",182,150;
- end;
-
-OnHide:
- misceffect 16;
- end;
-OnUnhide:
- misceffect 215;
- end;
-}
-
-airplane.gat,1,1,0 script EinYuno_Airship -1,{
-OnInit:
-while(1)
-{
- initnpctimer;
- setnpctimer 0;
- set $@airplanelocation,0;
- donpcevent "#AirshipWarp-1::OnHide";
- donpcevent "#AirshipWarp-2::OnHide";
- disablenpc "#AirshipWarp-1";
- disablenpc "#AirshipWarp-2";
- mapannounce "airplane.gat","The Airship is leaving the ground. Our next destination is Hugel.",1,0xBA55D3;
- end;
-OnTimer15000:
- mapannounce "airplane.gat","We are heading to Hugel.",1,0xBA55D3;
- end;
-OnTimer30000:
- mapannounce "airplane.gat","We will arrive in Hugel shortly.",1,0xBA55D3;
- end;
-OnTimer45000:
- set $@airplanelocation,4;
- enablenpc "#AirshipWarp-1";
- enablenpc "#AirshipWarp-2";
- donpcevent "#AirshipWarp-1::OnUnhide";
- donpcevent "#AirshipWarp-2::OnUnhide";
- mapannounce "airplane.gat","Welcome to Hugel. Have a safe trip.",1,0xBA55D3;
- end;
-OnTimer55000:
- mapannounce "airplane.gat","Currently, we are in Hugel. The Airship will leave shortly.",1,0xBA55D3;
- end;
-OnTimer65000:
- set $@airplanelocation,0;
- donpcevent "#AirshipWarp-1::OnHide";
- donpcevent "#AirshipWarp-2::OnHide";
- disablenpc "#AirshipWarp-1";
- disablenpc "#AirshipWarp-2";
- mapannounce "airplane.gat","The Airship is leaving the ground. Our next destination is Einbroch.",1,0x00FF00;
- end;
-OnTimer80000:
- mapannounce "airplane.gat","We are heading to Einbroch.",1,0x00FF00;
- end;
-OnTimer95000:
- mapannounce "airplane.gat","We will arrive in Einbroch shortly.",1,0x00FF00;
- end;
-OnTimer110000:
- set $@airplanelocation,1;
- enablenpc "#AirshipWarp-1";
- enablenpc "#AirshipWarp-2";
- donpcevent "#AirshipWarp-1::OnUnhide";
- donpcevent "#AirshipWarp-2::OnUnhide";
- mapannounce "airplane.gat","Welcome to Einbroch. Have a safe trip.",1,0x00FF00;
- end;
-OnTimer120000:
- mapannounce "airplane.gat","Currently, we are in Einbroch. The Airship will take off shortly.",1,0x00FF00;
- end;
-OnTimer130000:
- set $@airplanelocation,0;
- donpcevent "#AirshipWarp-1::OnHide";
- donpcevent "#AirshipWarp-2::OnHide";
- disablenpc "#AirshipWarp-1";
- disablenpc "#AirshipWarp-2";
- mapannounce "airplane.gat","The Airship is leaving the ground. Our next destination is Lighthalzen.",1,0xFF8600;
- end;
-OnTimer145000:
- mapannounce "airplane.gat","We are heading to Lighthalzen.",1,0xFF8600;
- end;
-OnTimer160000:
- mapannounce "airplane.gat","We will arrive in Lighthalzen shortly.",1,0xFF8600;
- end;
-OnTimer175000:
- set $@airplanelocation,3;
- enablenpc "#AirshipWarp-1";
- enablenpc "#AirshipWarp-2";
- donpcevent "#AirshipWarp-1::OnUnhide";
- donpcevent "#AirshipWarp-2::OnUnhide";
- mapannounce "airplane.gat","Welcome to Lighthalzen. Have a safe trip.",1,0xFF8600;
- end;
-OnTimer185000:
- mapannounce "airplane.gat","Currently, we are in Lighthalzen. The Airship will leave shortly.",1,0xFF8600;
- end;
-OnTimer195000:
- set $@airplanelocation,0;
- donpcevent "#AirshipWarp-1::OnHide";
- donpcevent "#AirshipWarp-2::OnHide";
- disablenpc "#AirshipWarp-1";
- disablenpc "#AirshipWarp-2";
- mapannounce "airplane.gat","The Airship is now taking off. Our next destination is Yuno.",1,0x70DBDB;
- end;
-OnTimer210000:
- mapannounce "airplane.gat","We are heading to Yuno.",1,0x70DBDB;
- end;
-OnTimer225000:
- mapannounce "airplane.gat","We will arrive in Yuno shortly.",1,0x70DBDB;
- end;
-OnTimer240000:
- set $@airplanelocation,2;
- enablenpc "#AirshipWarp-1";
- enablenpc "#AirshipWarp-2";
- donpcevent "#AirshipWarp-1::OnUnhide";
- donpcevent "#AirshipWarp-2::OnUnhide";
- mapannounce "airplane.gat","Welcome to Yuno. Have a safe trip.",1,0x70DBDB;
- end;
-OnTimer250000:
- mapannounce "airplane.gat","Currently, we are in Yuno. The Airship will leave shortly.",1,0x70DBDB;
- end;
-OnTimer260000:
- stoptimer;
-}
-}
-
-//C4644E
-
-//============================================================
-//= Some normal NPCS (airplane.gat)
-//============================================================
-
-airplane.gat,240,64,5 script Exit#01::Exit2 857,{
-
-end;
-
-}
-
-airplane.gat,247,64,5 duplicate(Exit2) Exit#02 857
-
-airplane.gat,240,39,1 duplicate(Exit2) Exit#03 857
-
-airplane.gat,247,39,1 duplicate(Exit2) Exit#04 857
-
-airplane.gat,100,69,2 script Airship Crew#01::Airship Crew 852,{
-
- mes "[Airship Crew]";
- mes "If we've landed at";
- mes "your destination and";
- mes "you'd like to leave the";
- mes "Airship, please use the";
- mes "stairs up ahead. Thank";
- mes "you for you patronage.";
- close;
-
-}
-
-airplane.gat,250,59,3 script Airship Staff::AirshipInfo 67,{
-
- mes "[Airship Staff]";
- mes "Welcome";
- mes "to the Airship.";
- mes "How may I help you?";
- next;
- menu "Using the Airship",s_Use,"Captain's Cabin",s_Capt,"Facilities",s_Faci,"Cancel",-;
-
- mes "[Airship Staff]";
- mes "Well, I hope you like";
- mes "your flight aboard";
- mes "our Airships. Thank";
- mes "you and have a good day.";
- close;
-
-s_Use:
- mes "[Airship Staff]";
- mes "When you see a broadcast";
- mes "announcing that we have";
- mes "arrived at your destination,";
- mes "please use one of the exits";
- mes "located at the north and";
- mes "south ends of the Airship";
- next;
- mes "[Airship Staff]";
- mes "If you happen to miss";
- mes "your stop, don't worry.";
- mes "The airship is constantly";
- mes "on route and you'll get";
- mes "another chance to arrive";
- mes "to your intended destination.";
- close;
-
-s_Capt:
- mes "[Airship Staff]";
- mes "The Captain's Cabin";
- mes "is located at the front";
- mes "of the Airship. There, you";
- mes "can meet the captain and";
- mes "the pilot of the Airship.";
- close;
-
-s_Faci:
- mes "[Airship Staff]";
- mes "The Airship provides";
- mes "various Mini Games for";
- mes "the entertainment of all";
- mes "our passengers. We invite";
- mes "you to try your luck and skills";
- mes "in the Airship's Mini Games~";
- close;
-
-}
-
-airplane.gat,50,66,4 script Meltz::AirshipApples 86,{
-
- mes "[Meltz]";
- mes "Welcome to Meltz's";
- mes "Shop where you can";
- mes "purchase Apples or grind";
- mes "them to make Apple Juice.";
- next;
- menu "Buy Apples",s_Buy,"Make Apple Juice",s_Juice,"Cancel.",-;
-
-s_Cancel:
- mes "[Meltz]";
- mes "Thanks for stopping";
- mes "by my shop. Farewell!";
- mes "Come back anytime when";
- mes "you feel like having an";
- mes "Apple to snack on~";
- close;
-
-s_Buy:
- mes "[Meltz]";
- mes "Please enter the amount";
- mes "of Apples that you wish to";
- mes "buy. Each Apple is 15 zeny";
- mes "and you can buy a maximum";
- mes "of 500 at a time. Please enter";
- mes "\"0\" to cancel your order.";
- next;
- input @tempapple;
- if(!@tempapple)goto s_Cancel;
- if(@tempapple > 0 && @tempapple < 501)goto s_AppleBuy;
- if(@tempapple < 0)close;
- mes "[Meltz]";
- mes "The maximum amount of apples";
- mes "you can buy at the same time";
- mes "is 500. " + @tempapple + " is clearly";
- mes "over 500.";
- close;
-
-s_AppleBuy:
- mes "[Meltz]";
- mes "A total of ^FF0000" + @tempapple + "^000000 Apples.";
- mes "will cost you ^FF0000" + @tempapple * 15 + "^000000 zeny.";
- mes "Would you like to continue?";
- next;
- menu "Yes",-,"No",s_Cancel;
-
- if(zeny < (@tempapple * 15))goto s_NEnoughZeny;
- mes "[Meltz]";
- mes "Thanks for stopping by";
- mes "my shop. I hope you enjoy";
- mes "the flavor of these Apples~!";
- getitem 512,@tempapple;
- set zeny,zeny - (@tempapple * 15);
- close;
-
-s_NEnoughZeny:
- mes "[Meltz]";
- mes "I'm sorry buy you don't";
- mes "seem to have enough zeny.";
- mes "Come back anytime when";
- mes "you feel like having an";
- mes "Apple to snack on~";
- close;
-
-s_Juice:
- mes "[Meltz]";
- mes "Okay, I'll need";
- mes "^FF00003 Apples and 1 Empty Bottle^000000";
- mes "to make 1 Apple Juice for you.";
- mes "Would you like to proceed?";
- next;
- menu "Yes",-,"No",s_Cancel;
-
- if(countitem(512) < 3 || !countitem(713))goto s_Material;
- mes "[Meltz]";
- mes "Thank you,";
- mes "please wait";
- mes "just a moment.";
- next;
- mes "*Grind grind*";
- mes "*Grind grind*";
- mes "*Clang...!*";
- next;
- mes "[Meltz]";
- mes "There you go~";
- mes "I hope you enjoy!";
- mes "Please feel free to";
- mes "stop by for your Apple";
- mes "and Apple Juice needs";
- mes "at anytime, adventurer~";
- delitem 512,3;
- delitem 713,1;
- getitem 531,1;
- close;
-
-s_Material:
- mes "[Meltz]";
- mes "I'm sorry, but you don't";
- mes "have enough materials to";
- mes "create a bottle of Apple Juice.";
- mes "Remember, I need 3 Apples";
- mes "and 1 Empty Bottle to do it.";
- close;
-
-}
-
-
-airplane.gat,33,69,4 script Kaci 73,{
-if fragmentauest==1 {
-mes "[Kaci]";
-mes "Oh.. Thx my dear";
-close2;
-emotion e_kis;
-delitem 7148,1;
-set fragmentauest,2;
-end;
-}
- callfunc "applegamble","Kaci";
- end;
-
- OnLose:
- emotion e_wah;
- end;
-
- OnWin:
- emotion e_no1;
- end;
-}
-
-airplane.gat,80,71,4 script Zerta 834,{
- mes "[Zerta]";
- mes "Oh, hello adventurer.";
- mes "I am currently on a";
- mes "sacred journey, offering";
- mes "prayer for the sake of the";
- mes "Rune-Midgard continent.";
- close;
-}
-
-airplane.gat,65,63,4 script Maelin 714,{
- mes "[Maelin]";
- mes "Um, this Airship is";
- mes "to Lutie, isn't it? I've";
- mes "been waiting so long,";
- mes "but I haven't heard any";
- mes "broadcast about Lutie.";
- close;
-}
-
-airplane.gat,32,61,4 script Nils::TypingContest 49,{
-
-loopback:
- mes "[Nils]";
- mes "Welcome to the";
- mes "^FF0000RO Typing Challenge^000000.";
- mes "Would you like to play";
- mes "a quick typing game?";
- next;
- menu "Play ^FF0000RO Typing Challenge^000000",s_Play,"Information",s_Info,"View Top Records",s_Record,"Cancel",-;
-
- mes "[Nils]";
- mes "Feel free to take on the";
- mes "Ro Typing Challenge";
- mes "anytime. I'll be here~";
- close;
-
-s_Play:
- mes "[Nils]";
- mes "Okay, we have";
- mes "a new challenger!";
- mes "Enter the following";
- mes "text as quickly as you";
- mes "can without making any";
- mes "mistakes! Let's start~!";
- next;
- //below arrays are for simplified entering of new lines ;P
- //first lines array
- setarray $textstringsa$[0],"^00FFFFthkelfkskeldmsiejdlsle^0000FFhfndkelsheidl",
- "^993366hfjdkeldjsieldjs^663366hfjdjeiskdlefvbd",
- "^00FFFFCoboman no chikara-yumei na",
- "^993366belief love luck grimace sweat rush",
- "^00FFFFcallipygian salacious lascivious",
- "^663366uNflAPPaBLe LoVaBLe SeCreTs AnD",
- "^00CCFFburrdingdingdilidingdingphoohudaamb",
- "^FF33CCbarapaphurarlandreamduranbatuhi^990066wooi",
- "^FF33CCLiGhTsPeEd RiGhT SPEed leFT TURn",
- "^00CCFFI'm the King of all Weirdos! Now",
- "^00CCFFBy the power of^000000",
- "^00CCFF...silence. quiet benevolence...";
- //second lines array
- setarray $textstringsb$[0],"skemd",
- "",
- "chikara-dalookii na chikara da ze!",
- "folktale rodimus optimus bumblebee",
- "licentious prurient concupiscent",
- "BoWLiNg aGaINST tHe KarMA of YoUtH",
- "andoora^0000FFbambarambambamburanbamding",
- "kabamturubamdingding",
- "RiGhT BuRn OrIGInAL GaNgSteR SmACk",
- "you know of my true power. Obey~!",
- "p-po-poi-po-poi-poin-poing",
- "soul mate... wonder. enigma...";
- //for the few 3-liners... =X
- setarray $textstringsc$[0],"",
- "",
- "COBO ON!",
- "",
- "",
- "",
- "",
- "",
- "",
- "",
- "GOD-POING. I NEVER LOSE!",
- "cloud.";
- //comparisation strings
- setarray $compstring$[0],"thkelfkskeldmsiejdlslehfndkelsheidlskemd",
- "hfjdkeldjsieldjshfjdjeiskdlefvbd",
- "Coboman no chikara-yumei na chikara-dalookii na chikara da ze! COBO ON",
- "belief love luck grimace sweat rush folktale rodimus optimus bumblebee",
- "callipygian salacious lascivious licentious prurient concupiscent",
- "uNflAPPaBLe LoVaBLe SeCreTs AnD BoWLiNg aGaINST tHe KarMA of YoUtH",
- "burrdindingdilidingdingphoohudaambandoorabambarambambamburanbamding",
- "barapaphurarlandreamduranbatuhiwooikabamturubamdingding",
- "LiGhTsPeEd RiGhT SPEed leFT TURn RiGhT BuRn OrIGInAL GaNgSteR SmACk",
- "I'm the King of all Weirdos! Now you know of my true power. Obey~!",
- "By the power of p-po-poi-po-poi-poin-poing GOD-POING. I NEVER LOSE!",
- "...silence. quiet benevolence... soul mate... wonder. enigma... cloud";
- //lengths
- setarray $lengths[0],20,32,73,73,65,66,67,55,67,66,67,69;
- // initnpctimer;
- mes "[Nils]";
- set @index,rand(1,getarraysize($textstringsa$))-1;
- set @string1a$,$textstringsa$[@index];
- set @string1b$,$textstringsb$[@index];
- set @string1c$,$textstringsc$[@index];
- set @typingstring1$,$compstring$[@index];
- set @typingkeys,$lengths[@index];
- set @index2,rand(1,getarraysize($textstringsa$))-1;
- while (@index2 == @index) {
- set @index2,rand(1,getarraysize($textstringsa$))-1;
- }
- set @string2a$,$textstringsa$[@index2];
- set @string2b$,$textstringsb$[@index2];
- set @string2c$,$textstringsc$[@index2];
- set @typingstring2$,$compstring$[@index2];
- set @typingkeys,@typingkeys+$lengths[@index2];
- set @start,gettime(3)*60*60+gettime(2)*60+gettime(1);
- mes @string1a$;
- if(@string1b$ != "")mes @string1b$;
- if(@string1c$ != "")mes @string1c$;
- input @comparisonvar$[1];
- next;
- mes "^000000[Nils]";
- mes @string2a$;
- if(@string2b$ != "")mes @string2b$;
- if(@string2c$ != "")mes @string2c$;
- input @comparisonvar$[2];
- if(@comparisonvar$[1] == @typingstring1$ && @comparisonvar$[2] == @typingstring2$)set @typingcorrect,1;
- next;
- if(!@typingcorrect)goto s_Fail;
- set @time,(gettime(3)*60*60+gettime(2)*60+gettime(1))-@start; //seconds taken
- set @mypoints,(@typingkeys * 100) / @time;
- mes "[Nils]";
- mes "Your typing time";
- mes "was ^FF0000" + @time + " seconds^000000";
- mes "and your score is";
- mes "^0000FF" + @mypoints + "^000000 points";
- next;
- if(@mypoints <= $TypingRecord)goto loopback;
- mes "[Nils]";
- mes "Congratulations!";
- mes "It's a new record.";
- mes "I'll put you on the high-";
- mes "score list immediately.";
- set $TypingRecord,@mypoints;
- set $TypingRecord$,strcharinfo(0);
- close;
-
-s_Fail:
- mes "^000000[Nils]";
- mes "I'm sorry you didn't type";
- mes "all characters correctly.";
- mes "But remember, practice makes";
- mes "perfect!";
- close;
-
-s_Info:
- mes "[Nils]";
- mes "The RO Typing Challenge";
- mes "is a game where you enter";
- mes "the given text as quickly as you";
- mes "can. The name of the top player";
- mes "is recorded for posterity. If you";
- mes "want fame, here's your chance!";
- next;
- mes "[Nils]";
- mes "I'd just like to let";
- mes "you know that you type";
- mes "all the text that you see";
- mes "in the single input line that";
- mes "you're given. So don't press";
- mes "the enter key, just click 'OK'.";
- close;
-
-s_Record:
- mes "[Nils]";
- mes "^0000FF" + $TypingRecord$ + "^000000";
- mes "is the current";
- mes "record holder with";
- mes "a record of ^0000FF" + $TypingRecord + "^000000";
- mes "points. Try to beat";
- mes "that record next time~";
- close;
-
-}
-
-//============================================================
-//= The Airship System (Yuno -> Izlude -> Repeat)
-//============================================================
-
-airplane_01.gat,243,74,4 script #AirshipWarp-3 45,2,2{
-OnTouch:
- if($@airplanelocation2 == 1)warp "izlude.gat",202,56;
- if($@airplanelocation2 == 2)warp "yuno.gat",20,265;
- end;
-
-OnHide:
- misceffect 16;
- end;
-OnUnhide:
- misceffect 215;
- end;
-}
-
-airplane_01.gat,243,29,4 script #AirshipWarp-4 45,2,2{
-OnTouch:
- if($@airplanelocation2 == 1)warp "izlude.gat",202,56;
- if($@airplanelocation2 == 2)warp "yuno.gat",20,265;
-
-OnHide:
- misceffect 16;
- end;
-OnUnhide:
- misceffect 215;
- end;
-}
-
-airplane_01.gat,1,1,0 script YunoIzl_Airship -1,{
-OnInit:
-while(1)
-{
- initnpctimer;
- setnpctimer 0;
- set $@airplanelocation2,0;
- donpcevent "#AirshipWarp-3::OnHide";
- donpcevent "#AirshipWarp-4::OnHide";
- disablenpc "#AirshipWarp-3";
- disablenpc "#AirshipWarp-4";
- mapannounce "airplane_01.gat","The Airship is leaving the ground. Our next destination is Izlude.",1,0x00FF00;
- end;
-OnTimer15000:
- mapannounce "airplane_01.gat","We are heading to Izlude.",1,0x00FF00;
- end;
-OnTimer30000:
- mapannounce "airplane_01.gat","We will arrive in Izlude shortly.",1,0x00FF00;
- end;
-OnTimer45000:
- set $@airplanelocation2,1;
- enablenpc "#AirshipWarp-3";
- enablenpc "#AirshipWarp-4";
- donpcevent "#AirshipWarp-3::OnUnhide";
- donpcevent "#AirshipWarp-4::OnUnhide";
- mapannounce "airplane_01.gat","Welcome to Izlude. Have a safe trip.",1,0x00FF00;
- end;
-OnTimer55000:
- mapannounce "airplane_01.gat","Currently, we are in Izlude. The Airship will leave shortly.",1,0x00FF00;
- end;
-OnTimer65000:
- set $@airplanelocation2,0;
- donpcevent "#AirshipWarp-3::OnHide";
- donpcevent "#AirshipWarp-4::OnHide";
- disablenpc "#AirshipWarp-3";
- disablenpc "#AirshipWarp-4";
- mapannounce "airplane_01.gat","The Airship is leaving the ground. Our next destination is Yuno.",1,0x70DBDB;
- end;
-OnTimer80000:
- mapannounce "airplane_01.gat","We are heading to Yuno.",1,0x70DBDB;
- end;
-OnTimer95000:
- mapannounce "airplane_01.gat","We will arrive in Yuno shortly.",1,0x70DBDB;
- end;
-OnTimer110000:
- set $@airplanelocation2,2;
- enablenpc "#AirshipWarp-3";
- enablenpc "#AirshipWarp-4";
- donpcevent "#AirshipWarp-3::OnUnhide";
- donpcevent "#AirshipWarp-4::OnUnhide";
- mapannounce "airplane_01.gat","Welcome to Yuno. Have a safe trip.",1,0x70DBDB;
- end;
-OnTimer120000:
- mapannounce "airplane_01.gat","Currently, we are in Yuno. The Airship will take off shortly.",1,0x70DBDB;
- end;
-OnTimer130000:
- stoptimer;
-}
-}
-
-//============================================================
-//= Some normal NPCS (airplane_01.gat)
-//============================================================
-
-airplane_01.gat,240,64,5 duplicate(Exit2) Exit#05 857
-
-airplane_01.gat,247,64,5 duplicate(Exit2) Exit#06 857
-
-airplane_01.gat,240,39,1 duplicate(Exit2) Exit#07 857
-
-airplane_01.gat,247,39,1 duplicate(Exit2) Exit#08 857
-
-airplane_01.gat,100,69,2 duplicate(Airship Crew) Airship Crew#02 852
-
-airplane_01.gat,250,59,3 duplicate(AirshipInfo) Airship Staff#info 67
-
-airplane_01.gat,50,66,4 duplicate(AirshipApples) Meltz 86
-
-airplane_01.gat,32,61,4 duplicate(TypingContest) Nils 49
-
-airplane_01.gat,83,61,2 script Girl#10 72,{
-
- mes "[Dianne]";
- mes "It's so weird!";
- mes "I went to visit the";
- mes "Airship Captain and";
- mes "all I saw was this";
- mes "weird reindeer. Oh!";
- mes "Do you think that...";
- close;
-
-}
-
-airplane_01.gat,69,63,2 script Old Man#06 55,{
-
- mes "[Mendel]";
- mes "As I expected, the";
- mes "in-flight meals are";
- mes "three star quality at best.";
- mes "^111111*Harrrumph*^000000 I really should";
- mes "have brought my chef so that";
- mes "I could enjoy a real meal.";
- close;
-
-}
-
-airplane_01.gat,33,68,4 script Clarice 74,{
- callfunc "applegamble","Clarice";
- end;
-}
-
-//============================================================
-//= The Izlude Airship Staff
-//============================================================
-
-izlude.gat,201,54,3 script Airship Staff#izl 91,{
-
- mes "[Airship Staff]";
- mes "Welcome to the Izlude Airship.";
- mes "How may I help you?";
- next;
- menu "Board the Airship",-,"Cancel",L_Cancel;
-
- mes "[Airship Staff]";
- mes "The Airship boarding fee";
- mes "is 1,200 zeny, but if you've";
- mes "got a Free Ticket for Airship,";
- mes "the fee will be waived. Will";
- mes "you board the Airship?";
- next;
- menu "Yes",-,"No",L_Cancel;
-
- if(countitem(7311) > 0) goto L_GotTicket;
- if(Zeny < 1200) goto L_NoZeny;
- set Zeny, Zeny - 1200;
- warp "airplane_01.gat",224,64;
- close;
-
- L_GotTicket:
- delitem 7311,1;
- warp "airplane_01.gat",224,64;
- close;
-
- L_NoZeny:
- mes "[Airship Staff]";
- mes "You don't have enough zeny.";
- close;
-
- L_Cancel:
- mes "[Airship Staff]";
- mes "Thank you and";
- mes "have a nice day.";
- close;
-}
-
-//============================================================
-//= The Hugel Airship Staff
-//============================================================
-
-hugel.gat,182,150,3 script Airship Staff#hu 91,{
-
- mes "[Airship Staff]";
- mes "Welcome to the Schwartzwald Republic's Airship.";
- mes "How may I help you?";
- next;
- menu "Board the Airship",-,"Cancel",L_Cancel;
-
- mes "[Airship Staff]";
- mes "The Airship boarding fee";
- mes "is 1,200 zeny, but if you've";
- mes "got a Free Ticket for Airship,";
- mes "the fee will be waived. Will";
- mes "you board the Airship?";
- next;
- menu "Yes",-,"No",L_Cancel;
-
- if(countitem(7311) > 0) goto L_GotTicket;
- if(Zeny < 1200) goto L_NoZeny;
- set Zeny, Zeny - 1200;
- warp "airplane.gat",224,64;
- close;
-
- L_GotTicket:
- delitem 7311,1;
- warp "airplane.gat",224,64;
- close;
-
- L_NoZeny:
- mes "[Airship Staff]";
- mes "You don't have enough zeny.";
- close;
-
- L_Cancel:
- mes "[Airship Staff]";
- mes "Thank you and";
- mes "have a nice day.";
- close;
-}
-
-//============================================================
-//= Yuno Airport NPCs
-//============================================================
-
-y_airport.gat,144,63,4 script Airport Staff#Ein 91,{
-
- mes "[Airship Staff]";
- mes "Good day!";
- mes "Would you like to go";
- mes "to ^FF0000Einbroch^000000,^FF0000Hugel^000000 or";
- mes "^FF0000Lighthalzen^000000?";
- next;
- menu "Yes.",s_Warp,"No.",-;
-
- mes "[Airship Staff]";
- mes "Thank you and";
- mes "have a nice day.";
- close;
-
-s_Warp:
- mes "[Airship Staff]";
- mes "Thank you and";
- mes "have a nice day.";
- close2;
- warp "yuno.gat",57,240;
- end;
-
-}
-
-y_airport.gat,141,63,4 script Airport Staff#Izl 91,{
-
- mes "[Airship Staff]";
- mes "Good day!";
- mes "Would you like to go";
- mes "to ^FF0000Izlude^000000?";
- next;
- menu "Yes.",s_Warp,"No.",-;
-
- mes "[Airship Staff]";
- mes "Thank you and";
- mes "have a nice day.";
- close;
-
-s_Warp:
- mes "[Airship Staff]";
- mes "Thank you and";
- mes "have a nice day.";
- close2;
- warp "yuno.gat",50,240;
- end;
-
-}
-
-//============================================================
-//= Apple Gambling Function
-//============================================================
-
-function script applegamble {
- mes "["+getarg(0)+"]";
- mes "Hi, I'm "+getarg(0)+"~";
- mes "How would you like";
- mes "to wager some Apples";
- mes "in a friendly game of Dice?";
- next;
- switch(select("Play Dice Game:Learn Dice Game Rules:Cancel")){
- case 3:
- mes "["+getarg(0)+"]";
- mes "I'm up for a game of";
- mes "dice whenever you feel";
- mes "like it. Just talk to me if";
- mes "you ever get hit with the";
- mes "sudden urge to gamle, kay?";
- close;
- case 2:
- mes "["+getarg(0)+"]";
- mes "The rules for the Dice game";
- mes "are pretty simple. First, you";
- mes "place a bet by wagering Apples.";
- mes "You can bet a maximum of 50";
- mes "Apples at a time. To keep things";
- mes "legal, I can only accept Apples.";
- next;
- mes "["+getarg(0)+"]";
- mes "But hey, if all that zeny";
- mes "is burning a hole in your";
- mes "pocket, head over to Fruitz";
- mes "and you can buy as many";
- mes "Apples as you want, playah~";
- next;
- mes "["+getarg(0)+"]";
- mes "Now, we begin with me";
- mes "rolling wto 6-sided dice.";
- mes "When it's your turn, you'll";
- mes "roll two 6-sided dice. After";
- mes "that, both of us will have the";
- mes "option of rolling a third die.";
- next;
- mes "["+getarg(0)+"]";
- mes "Now here's the important";
- mes "thing. If your total is higher";
- mes "than 12, you'll bust, meaning";
- mes "that you lose. Otherwise, the";
- mes "person with the higher total";
- mes "is the winner. Got it?";
- next;
- mes "["+getarg(0)+"]";
- mes "Now, you'll be the first";
- mes "to decide whether or not";
- mes "you'll roll the third die. Then,";
- mes "depending on your result, I'll";
- mes "roll my third die... Or maybe not.";
- next;
- mes "["+getarg(0)+"]";
- mes "When you win, you'll";
- mes "receive twice as many";
- mes "Apples as you wagered.";
- mes "But if we happen to tie, you";
- mes "get the Apples that you bet";
- mes "returned to you. Fair, right?";
- close;
- case 1:
- break;
- }
- mes "["+getarg(0)+"]";
- mes "Ooh, so you'll play with";
- mes "me? Great! How many";
- mes "Apples would you like to bet?";
- mes "Remember, you can wager";
- mes "up to 50 Apples. If you'd like";
- mes "to cancel, please enter '0'.";
- next;
-L_Input:
- input @amount;
- if(@amount == 0) {
- mes "["+getarg(0)+"]";
- mes "Changed your mind?";
- mes "I understand. Well then,";
- mes "I hope we can play sometime.";
- close;
- }
- if(@amount > 50) set @amount,50;
- mes "["+getarg(0)+"]";
- mes "So you'll be";
- mes "betting ^FF0000"+@amount+"^000000 Apples.";
- mes "Is that right?";
- next;
- if(select("Yes:No")==2){
- mes "["+getarg(0)+"]";
- mes "Mm, made a mistake?";
- mes "Alright, please enter the";
- mes "number of Apples you";
- mes "wish to place in this bet";
- next;
- goto L_Input;
- }
- if(countitem(512)<@amount){
- //more apples then in inventory
- //-Improvised-
- mes "["+getarg(0)+"]";
- mes "Ooh...";
- mes "You don't have that";
- mes "much Apples with you,";
- mes "now do you?";
- close;
- }
- delitem 512,@amount;
- mes "["+getarg(0)+"]";
- mes "Good!";
- mes "Now we can start";
- mes "this game! I'll roll first~";
- next;
- mes "^0000FF*Rolling and rumbling*";
- set @table1,rand(1,6);
- set @table2,rand(1,6);
- set @tablesub,@table1+@table2;
- next;
- mes "I rolled a "+@table1+" and a "+@table2+",";
- mes "giving me a total of "+@tablesub+".";
- mes "Now it's your turn,";
- mes strcharinfo(0)+".";
- next;
- menu "Roll Dice.",-;
-
- mes "^0000FF*Rolling and rumbling*";
- set @player1,rand(1,6);
- set @player2,rand(1,6);
- set @playersub,@player1+@player2;
- next;
- mes "["+getarg(0)+"]";
- mes strcharinfo(0)+",";
- mes "you rolled a "+@player1+" and a "+@player2+",";
- mes "giving you a total of ^FF0000"+@playersub+"^000000.";
- next;
- mes "["+getarg(0)+"]";
- if(@playersub == @tablesub) {
- mes "Well, well, well.";
- mes "Both of us have a total";
- mes "of "+@playersub+". Well, the ball's in";
- mes "your court. Are you going";
- mes "to roll your third die,";
- mes strcharinfo(0)+"?";
- } else if(@playersub > @tablesub) {
- mes "Since my total is only ^0000FF"+@tablesub+"^000000,";
- mes "you have the advantage for";
- mes "now with your total of ^FF0000"+@playersub+"^000000. Do";
- mes "you wanna roll one more die?";
- mes "Remember, you'll bust if all three";
- mes "of your dice total more than 12.";
- } else if(@tablesub > @playersub) {
- mes "Since my total is ^0000FF"+@tablesub+"^000000,";
- mes "I have the advantage for";
- mes "now with your total of ^FF0000"+@playersub+"^000000. Do";
- mes "you wanna roll one more die?";
- mes "Remember, you'll bust if all three";
- mes "of your dice total more than 12.";
- }
- next;
- if(select("Roll another dice.:Don't Roll.")==2){
- mes "["+getarg(0)+"]";
- mes "Not gonna roll, huh?";
- if(@tablesub == @playersub) {
- mes "You better hope I roll";
- mes "too high and bust, or";
- mes "I'll beat you for sure!";
- mes "Okay, here goes nothing...";
- next;
- goto L_Table3;
- } else if(@tablesub < @playersub) {
- next;
- mes "["+getarg(0)+"]";
- mes "Alright, I see that you";
- mes "don't want to risk rolling";
- mes "higher than 12 and busting.";
- mes "I'll go ahead and roll then.";
- next;
- goto L_Table3;
- } else if(@tablesub > @playersub) {
- //you have a lower sub total then table, and do not roll 3th -Improvised-
- mes "["+getarg(0)+"]";
- mes "Not gonna roll, huh?";
- mes "Well, then I'm not";
- mes "gonna roll either.";
- next;
- mes "["+getarg(0)+"]";
- mes "That means that I";
- mes "have a total of ^0000FF"+@tablesub+"^000000";
- mes "wich beats your ^FF0000"+@playersub+"^000000.";
- mes "I'm sorry, but you lose";
- mes "this game, "+strcharinfo(0)+". Better";
- mes "luck next time.";
- }
- close;
- }
- mes "^0000FF*Rolling and rumbling*";
- set @player3,rand(1,6);
- set @playersub,@playersub+@player3;
- if(@playersub > 12) {
- //player bust --Improvised--
- next;
- mes "["+getarg(0)+"]";
- mes "Oh my... You rolled a ^FF000"+@player3+"^000000,";
- mes "making your total ^FF0000"+@playersub+"^000000.";
- mes "That's more then 12, meaning you bust.";
- mes "Sorry, but you lose this";
- mes "game, "+strcharinfo(0)+".";
- close;
- }
- next;
- mes "["+getarg(0)+"]";
- mes "Oh hey! You rolled";
- if(@playersub >= @tablesub) {
- mes "a ^FF0000"+@player3+"^000000, giving you a total";
- mes "of ^FF0000"+@playersub+"^000000. Now, if I don't";
- mes "roll, I'll lose for sure!";
- mes "I'm gonna go for it...";
- next;
- goto L_Table3;
- } else if(@playersub < @tablesub) {
- //player's sub together with 3th die is still too low
- //--Improvised--
- mes "a ^FF0000"+@player3+"^000000, giving";
- mes "you a total of ^FF0000"+@playersub+"^000000.";
- mes "Wich still isn't enough";
- mes "to beat my ^0000FF"+@tablesub+"^000000.";
- mes "Sorry, but you lose this";
- mes "game, "+strcharinfo(0)+". Them's";
- mes "the breaks, I suppose...";
- close;
- }
-L_Table3:
- mes "^0000FF*Rolling and rumbling*";
- set @table3,rand(1,6);
- set @tablesub,@tablesub+@table3;
- next;
- if(@tablesub > 12) {
- mes "["+getarg(0)+"]";
- mes "Eh? I rolled a ^0000FF"+@table3+"^000000, making";
- mes "my total ^0000FF"+@tablesub+"^000000. I hate to say";
- mes "it, but I gambled and lost.";
- mes "Take your winnings before";
- mes "I cry, "+strcharinfo(0)+"~!";
- close2;
- getitem 512,@amount*2;
- end;
- }
- mes "["+getarg(0)+"]";
- if(@tablesub < @playersub) {
- mes "I rolled a "+@table3+", which";
- mes "gives me a total of ^0000FF"+@tablesub+"^000000.";
- mes "But... It's still not enough";
- mes "to beat your ^FF0000"+@playersub+"^000000. It looks";
- mes "like I can't compete with";
- mes "you, "+strcharinfo(0)+"...";
- close2;
- getitem 512,@amount*2;
- end;
- } else if(@tablesub > @playersub) {
- mes "I rolled a ^0000FF"+@table3+"^000000, giving";
- mes "me a total of ^0000FF"+@tablesub+"^000000 which";
- mes "beats your total of ^FF0000"+@playersub+"^000000.";
- mes "Sorry, but you lose this";
- mes "game, "+strcharinfo(0)+". Them's";
- mes "the breaks, I suppose...";
- close;
- } else if(@tablesub == @playersub) {
- //Result = tie, --Improvised--
- mes "I rolled a ^0000FF"+@table3+"^000000, giving";
- mes "me a total of ^0000FF"+@tablesub+"^000000, which";
- mes "is the same as your total.";
- mes "Well, this game didn't have a";
- mes "winner or loser, "+strcharinfo(0)+".";
- close2;
- getitem 512,@amount;
- end;
- }
-}
+//===== eAthena Script =======================================
+//= The Airship System Script
+//===== By: ==================================================
+//= MasterOfMuppets
+//===== Current Version: =====================================
+//= 0.5c
+//===== Compatible With: =====================================
+//= eAthena SVN 3422+(Requires jA Script System)
+//===== Description: =========================================
+//= The Airship System used in the official servers, however this
+//= one is still about 25% custom and is missing some npcs.
+//===== Additional Comments: =================================
+//= 0.1 Added first version, it might be a little buggy [MasterOfMuppets]
+//= 0.1a Fixed the Airport Staff#Iz which was [MasterOfMuppets]
+//= warping you to the same location as Airport Staff#Ein
+//= 0.2 Implemented some more airship NPCs, more are to come.
+//= 0.3 Implemented some more NPCs [MasterOfMuppets]
+//= 0.4 Implemented two mini games scripted by Dj-Yhn [MasterOfMuppets]
+//= 0.5 Removed Duplicates [Silent]
+//= 0.5aFixed a typo [Evera] 0.5b Fixed appledice bugs [Lupus]
+//============================================================
+
+//============================================================
+//= The Airship System (Yuno -> Hugel -> Einbroch -> Lighthalzen -> repeat)
+//============================================================
+
+airplane.gat,243,74,4 script #AirshipWarp-1 45,2,2{
+OnTouch:
+ if($@airplanelocation == 1)warp "einbroch.gat",90,275;
+ if($@airplanelocation == 2)warp "yuno.gat",85,265;
+ if($@airplanelocation == 3)warp "lighthalzen.gat",302,75;
+ if($@airplanelocation == 4)warp "hugel.gat",182,150;
+ end;
+
+OnHide:
+ misceffect 16;
+ end;
+OnUnhide:
+ misceffect 215;
+ end;
+}
+
+airplane.gat,243,29,4 script #AirshipWarp-2 45,2,2{
+OnTouch:
+ if($@airplanelocation == 1)warp "einbroch.gat",90,275;
+ if($@airplanelocation == 2)warp "yuno.gat",85,265;
+ if($@airplanelocation == 3)warp "lighthalzen.gat",302,75;
+ if($@airplanelocation == 4)warp "hugel.gat",182,150;
+ end;
+
+OnHide:
+ misceffect 16;
+ end;
+OnUnhide:
+ misceffect 215;
+ end;
+}
+
+airplane.gat,1,1,0 script EinYuno_Airship -1,{
+OnInit:
+while(1)
+{
+ initnpctimer;
+ setnpctimer 0;
+ set $@airplanelocation,0;
+ donpcevent "#AirshipWarp-1::OnHide";
+ donpcevent "#AirshipWarp-2::OnHide";
+ disablenpc "#AirshipWarp-1";
+ disablenpc "#AirshipWarp-2";
+ mapannounce "airplane.gat","The Airship is leaving the ground. Our next destination is Hugel.",1,0xBA55D3;
+ end;
+OnTimer15000:
+ mapannounce "airplane.gat","We are heading to Hugel.",1,0xBA55D3;
+ end;
+OnTimer30000:
+ mapannounce "airplane.gat","We will arrive in Hugel shortly.",1,0xBA55D3;
+ end;
+OnTimer45000:
+ set $@airplanelocation,4;
+ enablenpc "#AirshipWarp-1";
+ enablenpc "#AirshipWarp-2";
+ donpcevent "#AirshipWarp-1::OnUnhide";
+ donpcevent "#AirshipWarp-2::OnUnhide";
+ mapannounce "airplane.gat","Welcome to Hugel. Have a safe trip.",1,0xBA55D3;
+ end;
+OnTimer55000:
+ mapannounce "airplane.gat","Currently, we are in Hugel. The Airship will leave shortly.",1,0xBA55D3;
+ end;
+OnTimer65000:
+ set $@airplanelocation,0;
+ donpcevent "#AirshipWarp-1::OnHide";
+ donpcevent "#AirshipWarp-2::OnHide";
+ disablenpc "#AirshipWarp-1";
+ disablenpc "#AirshipWarp-2";
+ mapannounce "airplane.gat","The Airship is leaving the ground. Our next destination is Einbroch.",1,0x00FF00;
+ end;
+OnTimer80000:
+ mapannounce "airplane.gat","We are heading to Einbroch.",1,0x00FF00;
+ end;
+OnTimer95000:
+ mapannounce "airplane.gat","We will arrive in Einbroch shortly.",1,0x00FF00;
+ end;
+OnTimer110000:
+ set $@airplanelocation,1;
+ enablenpc "#AirshipWarp-1";
+ enablenpc "#AirshipWarp-2";
+ donpcevent "#AirshipWarp-1::OnUnhide";
+ donpcevent "#AirshipWarp-2::OnUnhide";
+ mapannounce "airplane.gat","Welcome to Einbroch. Have a safe trip.",1,0x00FF00;
+ end;
+OnTimer120000:
+ mapannounce "airplane.gat","Currently, we are in Einbroch. The Airship will take off shortly.",1,0x00FF00;
+ end;
+OnTimer130000:
+ set $@airplanelocation,0;
+ donpcevent "#AirshipWarp-1::OnHide";
+ donpcevent "#AirshipWarp-2::OnHide";
+ disablenpc "#AirshipWarp-1";
+ disablenpc "#AirshipWarp-2";
+ mapannounce "airplane.gat","The Airship is leaving the ground. Our next destination is Lighthalzen.",1,0xFF8600;
+ end;
+OnTimer145000:
+ mapannounce "airplane.gat","We are heading to Lighthalzen.",1,0xFF8600;
+ end;
+OnTimer160000:
+ mapannounce "airplane.gat","We will arrive in Lighthalzen shortly.",1,0xFF8600;
+ end;
+OnTimer175000:
+ set $@airplanelocation,3;
+ enablenpc "#AirshipWarp-1";
+ enablenpc "#AirshipWarp-2";
+ donpcevent "#AirshipWarp-1::OnUnhide";
+ donpcevent "#AirshipWarp-2::OnUnhide";
+ mapannounce "airplane.gat","Welcome to Lighthalzen. Have a safe trip.",1,0xFF8600;
+ end;
+OnTimer185000:
+ mapannounce "airplane.gat","Currently, we are in Lighthalzen. The Airship will leave shortly.",1,0xFF8600;
+ end;
+OnTimer195000:
+ set $@airplanelocation,0;
+ donpcevent "#AirshipWarp-1::OnHide";
+ donpcevent "#AirshipWarp-2::OnHide";
+ disablenpc "#AirshipWarp-1";
+ disablenpc "#AirshipWarp-2";
+ mapannounce "airplane.gat","The Airship is now taking off. Our next destination is Yuno.",1,0x70DBDB;
+ end;
+OnTimer210000:
+ mapannounce "airplane.gat","We are heading to Yuno.",1,0x70DBDB;
+ end;
+OnTimer225000:
+ mapannounce "airplane.gat","We will arrive in Yuno shortly.",1,0x70DBDB;
+ end;
+OnTimer240000:
+ set $@airplanelocation,2;
+ enablenpc "#AirshipWarp-1";
+ enablenpc "#AirshipWarp-2";
+ donpcevent "#AirshipWarp-1::OnUnhide";
+ donpcevent "#AirshipWarp-2::OnUnhide";
+ mapannounce "airplane.gat","Welcome to Yuno. Have a safe trip.",1,0x70DBDB;
+ end;
+OnTimer250000:
+ mapannounce "airplane.gat","Currently, we are in Yuno. The Airship will leave shortly.",1,0x70DBDB;
+ end;
+OnTimer260000:
+ stoptimer;
+}
+}
+
+//C4644E
+
+//============================================================
+//= Some normal NPCS (airplane.gat)
+//============================================================
+
+airplane.gat,240,64,5 script Exit#01::Exit2 857,{
+
+end;
+
+}
+
+airplane.gat,247,64,5 duplicate(Exit2) Exit#02 857
+
+airplane.gat,240,39,1 duplicate(Exit2) Exit#03 857
+
+airplane.gat,247,39,1 duplicate(Exit2) Exit#04 857
+
+airplane.gat,100,69,2 script Airship Crew#01::Airship Crew 852,{
+
+ mes "[Airship Crew]";
+ mes "If we've landed at";
+ mes "your destination and";
+ mes "you'd like to leave the";
+ mes "Airship, please use the";
+ mes "stairs up ahead. Thank";
+ mes "you for you patronage.";
+ close;
+
+}
+
+airplane.gat,250,59,3 script Airship Staff::AirshipInfo 67,{
+
+ mes "[Airship Staff]";
+ mes "Welcome";
+ mes "to the Airship.";
+ mes "How may I help you?";
+ next;
+ menu "Using the Airship",s_Use,"Captain's Cabin",s_Capt,"Facilities",s_Faci,"Cancel",-;
+
+ mes "[Airship Staff]";
+ mes "Well, I hope you like";
+ mes "your flight aboard";
+ mes "our Airships. Thank";
+ mes "you and have a good day.";
+ close;
+
+s_Use:
+ mes "[Airship Staff]";
+ mes "When you see a broadcast";
+ mes "announcing that we have";
+ mes "arrived at your destination,";
+ mes "please use one of the exits";
+ mes "located at the north and";
+ mes "south ends of the Airship";
+ next;
+ mes "[Airship Staff]";
+ mes "If you happen to miss";
+ mes "your stop, don't worry.";
+ mes "The airship is constantly";
+ mes "on route and you'll get";
+ mes "another chance to arrive";
+ mes "to your intended destination.";
+ close;
+
+s_Capt:
+ mes "[Airship Staff]";
+ mes "The Captain's Cabin";
+ mes "is located at the front";
+ mes "of the Airship. There, you";
+ mes "can meet the captain and";
+ mes "the pilot of the Airship.";
+ close;
+
+s_Faci:
+ mes "[Airship Staff]";
+ mes "The Airship provides";
+ mes "various Mini Games for";
+ mes "the entertainment of all";
+ mes "our passengers. We invite";
+ mes "you to try your luck and skills";
+ mes "in the Airship's Mini Games~";
+ close;
+
+}
+
+airplane.gat,50,66,4 script Meltz::AirshipApples 86,{
+
+ mes "[Meltz]";
+ mes "Welcome to Meltz's";
+ mes "Shop where you can";
+ mes "purchase Apples or grind";
+ mes "them to make Apple Juice.";
+ next;
+ menu "Buy Apples",s_Buy,"Make Apple Juice",s_Juice,"Cancel.",-;
+
+s_Cancel:
+ mes "[Meltz]";
+ mes "Thanks for stopping";
+ mes "by my shop. Farewell!";
+ mes "Come back anytime when";
+ mes "you feel like having an";
+ mes "Apple to snack on~";
+ close;
+
+s_Buy:
+ mes "[Meltz]";
+ mes "Please enter the amount";
+ mes "of Apples that you wish to";
+ mes "buy. Each Apple is 15 zeny";
+ mes "and you can buy a maximum";
+ mes "of 500 at a time. Please enter";
+ mes "\"0\" to cancel your order.";
+ next;
+ input @tempapple;
+ if(!@tempapple)goto s_Cancel;
+ if(@tempapple > 0 && @tempapple < 501)goto s_AppleBuy;
+ if(@tempapple < 0)close;
+ mes "[Meltz]";
+ mes "The maximum amount of apples";
+ mes "you can buy at the same time";
+ mes "is 500. " + @tempapple + " is clearly";
+ mes "over 500.";
+ close;
+
+s_AppleBuy:
+ mes "[Meltz]";
+ mes "A total of ^FF0000" + @tempapple + "^000000 Apples.";
+ mes "will cost you ^FF0000" + @tempapple * 15 + "^000000 zeny.";
+ mes "Would you like to continue?";
+ next;
+ menu "Yes",-,"No",s_Cancel;
+
+ if(zeny < (@tempapple * 15))goto s_NEnoughZeny;
+ mes "[Meltz]";
+ mes "Thanks for stopping by";
+ mes "my shop. I hope you enjoy";
+ mes "the flavor of these Apples~!";
+ getitem 512,@tempapple;
+ set zeny,zeny - (@tempapple * 15);
+ close;
+
+s_NEnoughZeny:
+ mes "[Meltz]";
+ mes "I'm sorry buy you don't";
+ mes "seem to have enough zeny.";
+ mes "Come back anytime when";
+ mes "you feel like having an";
+ mes "Apple to snack on~";
+ close;
+
+s_Juice:
+ mes "[Meltz]";
+ mes "Okay, I'll need";
+ mes "^FF00003 Apples and 1 Empty Bottle^000000";
+ mes "to make 1 Apple Juice for you.";
+ mes "Would you like to proceed?";
+ next;
+ menu "Yes",-,"No",s_Cancel;
+
+ if(countitem(512) < 3 || !countitem(713))goto s_Material;
+ mes "[Meltz]";
+ mes "Thank you,";
+ mes "please wait";
+ mes "just a moment.";
+ next;
+ mes "*Grind grind*";
+ mes "*Grind grind*";
+ mes "*Clang...!*";
+ next;
+ mes "[Meltz]";
+ mes "There you go~";
+ mes "I hope you enjoy!";
+ mes "Please feel free to";
+ mes "stop by for your Apple";
+ mes "and Apple Juice needs";
+ mes "at anytime, adventurer~";
+ delitem 512,3;
+ delitem 713,1;
+ getitem 531,1;
+ close;
+
+s_Material:
+ mes "[Meltz]";
+ mes "I'm sorry, but you don't";
+ mes "have enough materials to";
+ mes "create a bottle of Apple Juice.";
+ mes "Remember, I need 3 Apples";
+ mes "and 1 Empty Bottle to do it.";
+ close;
+
+}
+
+
+airplane.gat,33,69,4 script Kaci 73,{
+if fragmentauest==1 {
+mes "[Kaci]";
+mes "Oh.. Thx my dear";
+close2;
+emotion e_kis;
+delitem 7148,1;
+set fragmentauest,2;
+end;
+}
+ callfunc "applegamble","Kaci";
+ end;
+
+ OnLose:
+ emotion e_wah;
+ end;
+
+ OnWin:
+ emotion e_no1;
+ end;
+}
+
+airplane.gat,80,71,4 script Zerta 834,{
+ mes "[Zerta]";
+ mes "Oh, hello adventurer.";
+ mes "I am currently on a";
+ mes "sacred journey, offering";
+ mes "prayer for the sake of the";
+ mes "Rune-Midgard continent.";
+ close;
+}
+
+airplane.gat,65,63,4 script Maelin 714,{
+ mes "[Maelin]";
+ mes "Um, this Airship is";
+ mes "to Lutie, isn't it? I've";
+ mes "been waiting so long,";
+ mes "but I haven't heard any";
+ mes "broadcast about Lutie.";
+ close;
+}
+
+airplane.gat,32,61,4 script Nils::TypingContest 49,{
+
+loopback:
+ mes "[Nils]";
+ mes "Welcome to the";
+ mes "^FF0000RO Typing Challenge^000000.";
+ mes "Would you like to play";
+ mes "a quick typing game?";
+ next;
+ menu "Play ^FF0000RO Typing Challenge^000000",s_Play,"Information",s_Info,"View Top Records",s_Record,"Cancel",-;
+
+ mes "[Nils]";
+ mes "Feel free to take on the";
+ mes "Ro Typing Challenge";
+ mes "anytime. I'll be here~";
+ close;
+
+s_Play:
+ mes "[Nils]";
+ mes "Okay, we have";
+ mes "a new challenger!";
+ mes "Enter the following";
+ mes "text as quickly as you";
+ mes "can without making any";
+ mes "mistakes! Let's start~!";
+ next;
+ //below arrays are for simplified entering of new lines ;P
+ //first lines array
+ setarray $textstringsa$[0],"^00FFFFthkelfkskeldmsiejdlsle^0000FFhfndkelsheidl",
+ "^993366hfjdkeldjsieldjs^663366hfjdjeiskdlefvbd",
+ "^00FFFFCoboman no chikara-yumei na",
+ "^993366belief love luck grimace sweat rush",
+ "^00FFFFcallipygian salacious lascivious",
+ "^663366uNflAPPaBLe LoVaBLe SeCreTs AnD",
+ "^00CCFFburrdingdingdilidingdingphoohudaamb",
+ "^FF33CCbarapaphurarlandreamduranbatuhi^990066wooi",
+ "^FF33CCLiGhTsPeEd RiGhT SPEed leFT TURn",
+ "^00CCFFI'm the King of all Weirdos! Now",
+ "^00CCFFBy the power of^000000",
+ "^00CCFF...silence. quiet benevolence...";
+ //second lines array
+ setarray $textstringsb$[0],"skemd",
+ "",
+ "chikara-dalookii na chikara da ze!",
+ "folktale rodimus optimus bumblebee",
+ "licentious prurient concupiscent",
+ "BoWLiNg aGaINST tHe KarMA of YoUtH",
+ "andoora^0000FFbambarambambamburanbamding",
+ "kabamturubamdingding",
+ "RiGhT BuRn OrIGInAL GaNgSteR SmACk",
+ "you know of my true power. Obey~!",
+ "p-po-poi-po-poi-poin-poing",
+ "soul mate... wonder. enigma...";
+ //for the few 3-liners... =X
+ setarray $textstringsc$[0],"",
+ "",
+ "COBO ON!",
+ "",
+ "",
+ "",
+ "",
+ "",
+ "",
+ "",
+ "GOD-POING. I NEVER LOSE!",
+ "cloud.";
+ //comparisation strings
+ setarray $compstring$[0],"thkelfkskeldmsiejdlslehfndkelsheidlskemd",
+ "hfjdkeldjsieldjshfjdjeiskdlefvbd",
+ "Coboman no chikara-yumei na chikara-dalookii na chikara da ze! COBO ON",
+ "belief love luck grimace sweat rush folktale rodimus optimus bumblebee",
+ "callipygian salacious lascivious licentious prurient concupiscent",
+ "uNflAPPaBLe LoVaBLe SeCreTs AnD BoWLiNg aGaINST tHe KarMA of YoUtH",
+ "burrdindingdilidingdingphoohudaambandoorabambarambambamburanbamding",
+ "barapaphurarlandreamduranbatuhiwooikabamturubamdingding",
+ "LiGhTsPeEd RiGhT SPEed leFT TURn RiGhT BuRn OrIGInAL GaNgSteR SmACk",
+ "I'm the King of all Weirdos! Now you know of my true power. Obey~!",
+ "By the power of p-po-poi-po-poi-poin-poing GOD-POING. I NEVER LOSE!",
+ "...silence. quiet benevolence... soul mate... wonder. enigma... cloud";
+ //lengths
+ setarray $lengths[0],20,32,73,73,65,66,67,55,67,66,67,69;
+ // initnpctimer;
+ mes "[Nils]";
+ set @index,rand(1,getarraysize($textstringsa$))-1;
+ set @string1a$,$textstringsa$[@index];
+ set @string1b$,$textstringsb$[@index];
+ set @string1c$,$textstringsc$[@index];
+ set @typingstring1$,$compstring$[@index];
+ set @typingkeys,$lengths[@index];
+ set @index2,rand(1,getarraysize($textstringsa$))-1;
+ while (@index2 == @index) {
+ set @index2,rand(1,getarraysize($textstringsa$))-1;
+ }
+ set @string2a$,$textstringsa$[@index2];
+ set @string2b$,$textstringsb$[@index2];
+ set @string2c$,$textstringsc$[@index2];
+ set @typingstring2$,$compstring$[@index2];
+ set @typingkeys,@typingkeys+$lengths[@index2];
+ set @start,gettime(3)*60*60+gettime(2)*60+gettime(1);
+ mes @string1a$;
+ if(@string1b$ != "")mes @string1b$;
+ if(@string1c$ != "")mes @string1c$;
+ input @comparisonvar$[1];
+ next;
+ mes "^000000[Nils]";
+ mes @string2a$;
+ if(@string2b$ != "")mes @string2b$;
+ if(@string2c$ != "")mes @string2c$;
+ input @comparisonvar$[2];
+ if(@comparisonvar$[1] == @typingstring1$ && @comparisonvar$[2] == @typingstring2$)set @typingcorrect,1;
+ next;
+ if(!@typingcorrect)goto s_Fail;
+ set @time,(gettime(3)*60*60+gettime(2)*60+gettime(1))-@start; //seconds taken
+ set @mypoints,(@typingkeys * 100) / @time;
+ mes "[Nils]";
+ mes "Your typing time";
+ mes "was ^FF0000" + @time + " seconds^000000";
+ mes "and your score is";
+ mes "^0000FF" + @mypoints + "^000000 points";
+ next;
+ if(@mypoints <= $TypingRecord)goto loopback;
+ mes "[Nils]";
+ mes "Congratulations!";
+ mes "It's a new record.";
+ mes "I'll put you on the high-";
+ mes "score list immediately.";
+ set $TypingRecord,@mypoints;
+ set $TypingRecord$,strcharinfo(0);
+ close;
+
+s_Fail:
+ mes "^000000[Nils]";
+ mes "I'm sorry you didn't type";
+ mes "all characters correctly.";
+ mes "But remember, practice makes";
+ mes "perfect!";
+ close;
+
+s_Info:
+ mes "[Nils]";
+ mes "The RO Typing Challenge";
+ mes "is a game where you enter";
+ mes "the given text as quickly as you";
+ mes "can. The name of the top player";
+ mes "is recorded for posterity. If you";
+ mes "want fame, here's your chance!";
+ next;
+ mes "[Nils]";
+ mes "I'd just like to let";
+ mes "you know that you type";
+ mes "all the text that you see";
+ mes "in the single input line that";
+ mes "you're given. So don't press";
+ mes "the enter key, just click 'OK'.";
+ close;
+
+s_Record:
+ mes "[Nils]";
+ mes "^0000FF" + $TypingRecord$ + "^000000";
+ mes "is the current";
+ mes "record holder with";
+ mes "a record of ^0000FF" + $TypingRecord + "^000000";
+ mes "points. Try to beat";
+ mes "that record next time~";
+ close;
+
+}
+
+//============================================================
+//= The Airship System (Yuno -> Izlude -> Repeat)
+//============================================================
+
+airplane_01.gat,243,74,4 script #AirshipWarp-3 45,2,2{
+OnTouch:
+ if($@airplanelocation2 == 1)warp "izlude.gat",202,56;
+ if($@airplanelocation2 == 2)warp "yuno.gat",20,265;
+ end;
+
+OnHide:
+ misceffect 16;
+ end;
+OnUnhide:
+ misceffect 215;
+ end;
+}
+
+airplane_01.gat,243,29,4 script #AirshipWarp-4 45,2,2{
+OnTouch:
+ if($@airplanelocation2 == 1)warp "izlude.gat",202,56;
+ if($@airplanelocation2 == 2)warp "yuno.gat",20,265;
+
+OnHide:
+ misceffect 16;
+ end;
+OnUnhide:
+ misceffect 215;
+ end;
+}
+
+airplane_01.gat,1,1,0 script YunoIzl_Airship -1,{
+OnInit:
+while(1)
+{
+ initnpctimer;
+ setnpctimer 0;
+ set $@airplanelocation2,0;
+ donpcevent "#AirshipWarp-3::OnHide";
+ donpcevent "#AirshipWarp-4::OnHide";
+ disablenpc "#AirshipWarp-3";
+ disablenpc "#AirshipWarp-4";
+ mapannounce "airplane_01.gat","The Airship is leaving the ground. Our next destination is Izlude.",1,0x00FF00;
+ end;
+OnTimer15000:
+ mapannounce "airplane_01.gat","We are heading to Izlude.",1,0x00FF00;
+ end;
+OnTimer30000:
+ mapannounce "airplane_01.gat","We will arrive in Izlude shortly.",1,0x00FF00;
+ end;
+OnTimer45000:
+ set $@airplanelocation2,1;
+ enablenpc "#AirshipWarp-3";
+ enablenpc "#AirshipWarp-4";
+ donpcevent "#AirshipWarp-3::OnUnhide";
+ donpcevent "#AirshipWarp-4::OnUnhide";
+ mapannounce "airplane_01.gat","Welcome to Izlude. Have a safe trip.",1,0x00FF00;
+ end;
+OnTimer55000:
+ mapannounce "airplane_01.gat","Currently, we are in Izlude. The Airship will leave shortly.",1,0x00FF00;
+ end;
+OnTimer65000:
+ set $@airplanelocation2,0;
+ donpcevent "#AirshipWarp-3::OnHide";
+ donpcevent "#AirshipWarp-4::OnHide";
+ disablenpc "#AirshipWarp-3";
+ disablenpc "#AirshipWarp-4";
+ mapannounce "airplane_01.gat","The Airship is leaving the ground. Our next destination is Yuno.",1,0x70DBDB;
+ end;
+OnTimer80000:
+ mapannounce "airplane_01.gat","We are heading to Yuno.",1,0x70DBDB;
+ end;
+OnTimer95000:
+ mapannounce "airplane_01.gat","We will arrive in Yuno shortly.",1,0x70DBDB;
+ end;
+OnTimer110000:
+ set $@airplanelocation2,2;
+ enablenpc "#AirshipWarp-3";
+ enablenpc "#AirshipWarp-4";
+ donpcevent "#AirshipWarp-3::OnUnhide";
+ donpcevent "#AirshipWarp-4::OnUnhide";
+ mapannounce "airplane_01.gat","Welcome to Yuno. Have a safe trip.",1,0x70DBDB;
+ end;
+OnTimer120000:
+ mapannounce "airplane_01.gat","Currently, we are in Yuno. The Airship will take off shortly.",1,0x70DBDB;
+ end;
+OnTimer130000:
+ stoptimer;
+}
+}
+
+//============================================================
+//= Some normal NPCS (airplane_01.gat)
+//============================================================
+
+airplane_01.gat,240,64,5 duplicate(Exit2) Exit#05 857
+
+airplane_01.gat,247,64,5 duplicate(Exit2) Exit#06 857
+
+airplane_01.gat,240,39,1 duplicate(Exit2) Exit#07 857
+
+airplane_01.gat,247,39,1 duplicate(Exit2) Exit#08 857
+
+airplane_01.gat,100,69,2 duplicate(Airship Crew) Airship Crew#02 852
+
+airplane_01.gat,250,59,3 duplicate(AirshipInfo) Airship Staff#info 67
+
+airplane_01.gat,50,66,4 duplicate(AirshipApples) Meltz 86
+
+airplane_01.gat,32,61,4 duplicate(TypingContest) Nils 49
+
+airplane_01.gat,83,61,2 script Girl#10 72,{
+
+ mes "[Dianne]";
+ mes "It's so weird!";
+ mes "I went to visit the";
+ mes "Airship Captain and";
+ mes "all I saw was this";
+ mes "weird reindeer. Oh!";
+ mes "Do you think that...";
+ close;
+
+}
+
+airplane_01.gat,69,63,2 script Old Man#06 55,{
+
+ mes "[Mendel]";
+ mes "As I expected, the";
+ mes "in-flight meals are";
+ mes "three star quality at best.";
+ mes "^111111*Harrrumph*^000000 I really should";
+ mes "have brought my chef so that";
+ mes "I could enjoy a real meal.";
+ close;
+
+}
+
+airplane_01.gat,33,68,4 script Clarice 74,{
+ callfunc "applegamble","Clarice";
+ end;
+}
+
+//============================================================
+//= The Izlude Airship Staff
+//============================================================
+
+izlude.gat,201,54,3 script Airship Staff#izl 91,{
+
+ mes "[Airship Staff]";
+ mes "Welcome to the Izlude Airship.";
+ mes "How may I help you?";
+ next;
+ menu "Board the Airship",-,"Cancel",L_Cancel;
+
+ mes "[Airship Staff]";
+ mes "The Airship boarding fee";
+ mes "is 1,200 zeny, but if you've";
+ mes "got a Free Ticket for Airship,";
+ mes "the fee will be waived. Will";
+ mes "you board the Airship?";
+ next;
+ menu "Yes",-,"No",L_Cancel;
+
+ if(countitem(7311) > 0) goto L_GotTicket;
+ if(Zeny < 1200) goto L_NoZeny;
+ set Zeny, Zeny - 1200;
+ warp "airplane_01.gat",224,64;
+ close;
+
+ L_GotTicket:
+ delitem 7311,1;
+ warp "airplane_01.gat",224,64;
+ close;
+
+ L_NoZeny:
+ mes "[Airship Staff]";
+ mes "You don't have enough zeny.";
+ close;
+
+ L_Cancel:
+ mes "[Airship Staff]";
+ mes "Thank you and";
+ mes "have a nice day.";
+ close;
+}
+
+//============================================================
+//= The Hugel Airship Staff
+//============================================================
+
+hugel.gat,182,150,3 script Airship Staff#hu 91,{
+
+ mes "[Airship Staff]";
+ mes "Welcome to the Schwartzwald Republic's Airship.";
+ mes "How may I help you?";
+ next;
+ menu "Board the Airship",-,"Cancel",L_Cancel;
+
+ mes "[Airship Staff]";
+ mes "The Airship boarding fee";
+ mes "is 1,200 zeny, but if you've";
+ mes "got a Free Ticket for Airship,";
+ mes "the fee will be waived. Will";
+ mes "you board the Airship?";
+ next;
+ menu "Yes",-,"No",L_Cancel;
+
+ if(countitem(7311) > 0) goto L_GotTicket;
+ if(Zeny < 1200) goto L_NoZeny;
+ set Zeny, Zeny - 1200;
+ warp "airplane.gat",224,64;
+ close;
+
+ L_GotTicket:
+ delitem 7311,1;
+ warp "airplane.gat",224,64;
+ close;
+
+ L_NoZeny:
+ mes "[Airship Staff]";
+ mes "You don't have enough zeny.";
+ close;
+
+ L_Cancel:
+ mes "[Airship Staff]";
+ mes "Thank you and";
+ mes "have a nice day.";
+ close;
+}
+
+//============================================================
+//= Yuno Airport NPCs
+//============================================================
+
+y_airport.gat,144,63,4 script Airport Staff#Ein 91,{
+
+ mes "[Airship Staff]";
+ mes "Good day!";
+ mes "Would you like to go";
+ mes "to ^FF0000Einbroch^000000,^FF0000Hugel^000000 or";
+ mes "^FF0000Lighthalzen^000000?";
+ next;
+ menu "Yes.",s_Warp,"No.",-;
+
+ mes "[Airship Staff]";
+ mes "Thank you and";
+ mes "have a nice day.";
+ close;
+
+s_Warp:
+ mes "[Airship Staff]";
+ mes "Thank you and";
+ mes "have a nice day.";
+ close2;
+ warp "yuno.gat",57,240;
+ end;
+
+}
+
+y_airport.gat,141,63,4 script Airport Staff#Izl 91,{
+
+ mes "[Airship Staff]";
+ mes "Good day!";
+ mes "Would you like to go";
+ mes "to ^FF0000Izlude^000000?";
+ next;
+ menu "Yes.",s_Warp,"No.",-;
+
+ mes "[Airship Staff]";
+ mes "Thank you and";
+ mes "have a nice day.";
+ close;
+
+s_Warp:
+ mes "[Airship Staff]";
+ mes "Thank you and";
+ mes "have a nice day.";
+ close2;
+ warp "yuno.gat",50,240;
+ end;
+
+}
+
+//============================================================
+//= Apple Gambling Function
+//============================================================
+
+function script applegamble {
+ mes "["+getarg(0)+"]";
+ mes "Hi, I'm "+getarg(0)+"~";
+ mes "How would you like";
+ mes "to wager some Apples";
+ mes "in a friendly game of Dice?";
+ next;
+ switch(select("Play Dice Game:Learn Dice Game Rules:Cancel")){
+ case 3:
+ mes "["+getarg(0)+"]";
+ mes "I'm up for a game of";
+ mes "dice whenever you feel";
+ mes "like it. Just talk to me if";
+ mes "you ever get hit with the";
+ mes "sudden urge to gamle, kay?";
+ close;
+ case 2:
+ mes "["+getarg(0)+"]";
+ mes "The rules for the Dice game";
+ mes "are pretty simple. First, you";
+ mes "place a bet by wagering Apples.";
+ mes "You can bet a maximum of 50";
+ mes "Apples at a time. To keep things";
+ mes "legal, I can only accept Apples.";
+ next;
+ mes "["+getarg(0)+"]";
+ mes "But hey, if all that zeny";
+ mes "is burning a hole in your";
+ mes "pocket, head over to Fruitz";
+ mes "and you can buy as many";
+ mes "Apples as you want, playah~";
+ next;
+ mes "["+getarg(0)+"]";
+ mes "Now, we begin with me";
+ mes "rolling wto 6-sided dice.";
+ mes "When it's your turn, you'll";
+ mes "roll two 6-sided dice. After";
+ mes "that, both of us will have the";
+ mes "option of rolling a third die.";
+ next;
+ mes "["+getarg(0)+"]";
+ mes "Now here's the important";
+ mes "thing. If your total is higher";
+ mes "than 12, you'll bust, meaning";
+ mes "that you lose. Otherwise, the";
+ mes "person with the higher total";
+ mes "is the winner. Got it?";
+ next;
+ mes "["+getarg(0)+"]";
+ mes "Now, you'll be the first";
+ mes "to decide whether or not";
+ mes "you'll roll the third die. Then,";
+ mes "depending on your result, I'll";
+ mes "roll my third die... Or maybe not.";
+ next;
+ mes "["+getarg(0)+"]";
+ mes "When you win, you'll";
+ mes "receive twice as many";
+ mes "Apples as you wagered.";
+ mes "But if we happen to tie, you";
+ mes "get the Apples that you bet";
+ mes "returned to you. Fair, right?";
+ close;
+ case 1:
+ break;
+ }
+ mes "["+getarg(0)+"]";
+ mes "Ooh, so you'll play with";
+ mes "me? Great! How many";
+ mes "Apples would you like to bet?";
+ mes "Remember, you can wager";
+ mes "up to 50 Apples. If you'd like";
+ mes "to cancel, please enter '0'.";
+ next;
+L_Input:
+ input @amount;
+ if(@amount == 0) {
+ mes "["+getarg(0)+"]";
+ mes "Changed your mind?";
+ mes "I understand. Well then,";
+ mes "I hope we can play sometime.";
+ close;
+ }
+ if(@amount > 50) set @amount,50;
+ mes "["+getarg(0)+"]";
+ mes "So you'll be";
+ mes "betting ^FF0000"+@amount+"^000000 Apples.";
+ mes "Is that right?";
+ next;
+ if(select("Yes:No")==2){
+ mes "["+getarg(0)+"]";
+ mes "Mm, made a mistake?";
+ mes "Alright, please enter the";
+ mes "number of Apples you";
+ mes "wish to place in this bet";
+ next;
+ goto L_Input;
+ }
+ if(countitem(512)<@amount){
+ //more apples then in inventory
+ //-Improvised-
+ mes "["+getarg(0)+"]";
+ mes "Ooh...";
+ mes "You don't have that";
+ mes "much Apples with you,";
+ mes "now do you?";
+ close;
+ }
+ delitem 512,@amount;
+ mes "["+getarg(0)+"]";
+ mes "Good!";
+ mes "Now we can start";
+ mes "this game! I'll roll first~";
+ next;
+ mes "^0000FF*Rolling and rumbling*";
+ set @table1,rand(1,6);
+ set @table2,rand(1,6);
+ set @tablesub,@table1+@table2;
+ next;
+ mes "I rolled a "+@table1+" and a "+@table2+",";
+ mes "giving me a total of "+@tablesub+".";
+ mes "Now it's your turn,";
+ mes strcharinfo(0)+".";
+ next;
+ menu "Roll Dice.",-;
+
+ mes "^0000FF*Rolling and rumbling*";
+ set @player1,rand(1,6);
+ set @player2,rand(1,6);
+ set @playersub,@player1+@player2;
+ next;
+ mes "["+getarg(0)+"]";
+ mes strcharinfo(0)+",";
+ mes "you rolled a "+@player1+" and a "+@player2+",";
+ mes "giving you a total of ^FF0000"+@playersub+"^000000.";
+ next;
+ mes "["+getarg(0)+"]";
+ if(@playersub == @tablesub) {
+ mes "Well, well, well.";
+ mes "Both of us have a total";
+ mes "of "+@playersub+". Well, the ball's in";
+ mes "your court. Are you going";
+ mes "to roll your third die,";
+ mes strcharinfo(0)+"?";
+ } else if(@playersub > @tablesub) {
+ mes "Since my total is only ^0000FF"+@tablesub+"^000000,";
+ mes "you have the advantage for";
+ mes "now with your total of ^FF0000"+@playersub+"^000000. Do";
+ mes "you wanna roll one more die?";
+ mes "Remember, you'll bust if all three";
+ mes "of your dice total more than 12.";
+ } else if(@tablesub > @playersub) {
+ mes "Since my total is ^0000FF"+@tablesub+"^000000,";
+ mes "I have the advantage for";
+ mes "now with your total of ^FF0000"+@playersub+"^000000. Do";
+ mes "you wanna roll one more die?";
+ mes "Remember, you'll bust if all three";
+ mes "of your dice total more than 12.";
+ }
+ next;
+ if(select("Roll another dice.:Don't Roll.")==2){
+ mes "["+getarg(0)+"]";
+ mes "Not gonna roll, huh?";
+ if(@tablesub == @playersub) {
+ mes "You better hope I roll";
+ mes "too high and bust, or";
+ mes "I'll beat you for sure!";
+ mes "Okay, here goes nothing...";
+ next;
+ goto L_Table3;
+ } else if(@tablesub < @playersub) {
+ next;
+ mes "["+getarg(0)+"]";
+ mes "Alright, I see that you";
+ mes "don't want to risk rolling";
+ mes "higher than 12 and busting.";
+ mes "I'll go ahead and roll then.";
+ next;
+ goto L_Table3;
+ } else if(@tablesub > @playersub) {
+ //you have a lower sub total then table, and do not roll 3th -Improvised-
+ mes "["+getarg(0)+"]";
+ mes "Not gonna roll, huh?";
+ mes "Well, then I'm not";
+ mes "gonna roll either.";
+ next;
+ mes "["+getarg(0)+"]";
+ mes "That means that I";
+ mes "have a total of ^0000FF"+@tablesub+"^000000";
+ mes "wich beats your ^FF0000"+@playersub+"^000000.";
+ mes "I'm sorry, but you lose";
+ mes "this game, "+strcharinfo(0)+". Better";
+ mes "luck next time.";
+ }
+ close;
+ }
+ mes "^0000FF*Rolling and rumbling*";
+ set @player3,rand(1,6);
+ set @playersub,@playersub+@player3;
+ if(@playersub > 12) {
+ //player bust --Improvised--
+ next;
+ mes "["+getarg(0)+"]";
+ mes "Oh my... You rolled a ^FF000"+@player3+"^000000,";
+ mes "making your total ^FF0000"+@playersub+"^000000.";
+ mes "That's more then 12, meaning you bust.";
+ mes "Sorry, but you lose this";
+ mes "game, "+strcharinfo(0)+".";
+ close;
+ }
+ next;
+ mes "["+getarg(0)+"]";
+ mes "Oh hey! You rolled";
+ if(@playersub >= @tablesub) {
+ mes "a ^FF0000"+@player3+"^000000, giving you a total";
+ mes "of ^FF0000"+@playersub+"^000000. Now, if I don't";
+ mes "roll, I'll lose for sure!";
+ mes "I'm gonna go for it...";
+ next;
+ goto L_Table3;
+ } else if(@playersub < @tablesub) {
+ //player's sub together with 3th die is still too low
+ //--Improvised--
+ mes "a ^FF0000"+@player3+"^000000, giving";
+ mes "you a total of ^FF0000"+@playersub+"^000000.";
+ mes "Wich still isn't enough";
+ mes "to beat my ^0000FF"+@tablesub+"^000000.";
+ mes "Sorry, but you lose this";
+ mes "game, "+strcharinfo(0)+". Them's";
+ mes "the breaks, I suppose...";
+ close;
+ }
+L_Table3:
+ mes "^0000FF*Rolling and rumbling*";
+ set @table3,rand(1,6);
+ set @tablesub,@tablesub+@table3;
+ next;
+ if(@tablesub > 12) {
+ mes "["+getarg(0)+"]";
+ mes "Eh? I rolled a ^0000FF"+@table3+"^000000, making";
+ mes "my total ^0000FF"+@tablesub+"^000000. I hate to say";
+ mes "it, but I gambled and lost.";
+ mes "Take your winnings before";
+ mes "I cry, "+strcharinfo(0)+"~!";
+ close2;
+ getitem 512,@amount*2;
+ end;
+ }
+ mes "["+getarg(0)+"]";
+ if(@tablesub < @playersub) {
+ mes "I rolled a "+@table3+", which";
+ mes "gives me a total of ^0000FF"+@tablesub+"^000000.";
+ mes "But... It's still not enough";
+ mes "to beat your ^FF0000"+@playersub+"^000000. It looks";
+ mes "like I can't compete with";
+ mes "you, "+strcharinfo(0)+"...";
+ close2;
+ getitem 512,@amount*2;
+ end;
+ } else if(@tablesub > @playersub) {
+ mes "I rolled a ^0000FF"+@table3+"^000000, giving";
+ mes "me a total of ^0000FF"+@tablesub+"^000000 which";
+ mes "beats your total of ^FF0000"+@playersub+"^000000.";
+ mes "Sorry, but you lose this";
+ mes "game, "+strcharinfo(0)+". Them's";
+ mes "the breaks, I suppose...";
+ close;
+ } else if(@tablesub == @playersub) {
+ //Result = tie, --Improvised--
+ mes "I rolled a ^0000FF"+@table3+"^000000, giving";
+ mes "me a total of ^0000FF"+@tablesub+"^000000, which";
+ mes "is the same as your total.";
+ mes "Well, this game didn't have a";
+ mes "winner or loser, "+strcharinfo(0)+".";
+ close2;
+ getitem 512,@amount;
+ end;
+ }
+}
diff --git a/npc/quests/WIP/schwalz.txt b/npc/quests/WIP/schwalz.txt
index 3ad7116c3..4d229a07f 100644
--- a/npc/quests/WIP/schwalz.txt
+++ b/npc/quests/WIP/schwalz.txt
@@ -1,1046 +1,1046 @@
-//===== eAthena Script =======================================
-//= Lighthalzen, Swaltzwalt Quest Part 1
-//= Lighthalzen, Swaltzwalt Quest Part 2
-//= Lighthalzen, Swaltzwalt Quest Part 3
-//===== By: ==================================================
-//= Gravity official script
-//= CallNix (Part 1)
-//= dunkle (Part 2 & 3)
-//===== Current Version: =====================================
-//= 1.0 working version
-//= 1.1 fixed bug with wrong valuable [dunkle]
-//= added and deleted some checks [dunkle]
-//= fixed warps (but they are wrong) [dunkle]
-//= fixed enabling of A Fine Gentleman [dunkle]
-//= fixed bug with reward [dunkle]
-//= 1.2 fixed bug in part with overflow timer (now you must wait untill next day, not 12 hours) [dunkle]
-// changed some valuables [dunkle]
-// fixed bugs in The broken Manufactoring [dunkle]
-//= 1.2b fixed timer Ordinary Man [dunkle]
-//= 1.3 fixed part1 bugs [dunkle]
-//===== Compatible With: =====================================
-//= eAthena SVN
-//===== Description: =========================================
-//=
-//=
-//===== Additional Comments: =================================
-//In alchemist_skills.txt comment because I use this NPC in the script:
-//lhz_in01.gat,285,169,7 script Researcher#2 865,{
-//Unknown Text
-// mes "[Researcher]";
-// mes "Hmm... I wonder...";
-// close;
-//}
-//
-//============================================================
-
-
-yuno_pre.gat,79,69,0 warp inside_pre01 1,1,yuno_pre.gat,97,68
-yuno_pre.gat,113,50,0 warp inside_pre02 1,1,yuno_pre.gat,58,22
-yuno_pre.gat,54,22,0 warp inside_pre03 1,1,yuno_pre.gat,113,55
-lhz_in01.gat,275,234,0 warp inside_pre04 1,1,lhz_in01.gat,277,161 //Здесь порталы поставил наобум, в месте около двери,
-lhz_in01.gat,277,157,0 warp inside_pre04 1,1,lhz_in01.gat,275,231 //где не было другого портала :
-
-//OnInit!
-prontera.gat,0,0,0 script swarzwalt_trilogy -1,1,1{
-OnInit:
-disablenpc "kurelle";
-disablenpc "President's Secretary#2";
-disablenpc "Security#2";
-disablenpc "area 1-5";
-disablenpc "Kurelle#1";
-set $SCHWALTZVALT_DOOR_FLAG,0;
-stopnpctimer "schwalt2timer";
-end;
-}
-
-
-//////////////////////////////////////////////////////////////////////////////////////////////////////////
-//Beginning. Lighthalzen, Swaltzwalt Quest Part 1/////////////////////////////////////////////////////////
-//////////////////////////////////////////////////////////////////////////////////////////////////////////
-lighthalzen.gat,179,170,4 script Ordinary man 48,{
-if (SCHWALTZVALT_PART2==23) {
- mes "[Ghalstein]";
- mes "arrr...";
- mes "is you....";
- mes ".....";
- mes "Now? verything finish...";
- mes "dream...vision";
- next;
- mes "[Ghalstein]";
- mes "arr..most forgot...";
- mes "This is your...";
- mes "...cure...";
- mes "Take this pill,";
- mes "You'll never have to take it";
- mes "anymore...";
- next;
- mes "[Ghalstein]";
- mes ".......";
- mes "We'll never meet each other anymore..";
- getitem 617,1; //Old Violet Box
- getexp 1800000,0; //Exp 1800000
- set dtseligible , 1; //Here is Voting Right (dts warper)
- set SCHWALTZVALT_PART2, 24;
- close;
- }
-
-
-if (questpass_swaltwaltp1==1) goto l_alreadydone;
-if ( (SCHWALTZVALT_PART1==2) || (SCHWALTZVALT_PART1==3) ) goto Quest_enable;
-if ( (SCHWALTZVALT_PART1==1) && (gettime(5)!=schwalzday) ) goto L_NEXTDAY;
-if (SCHWALTZVALT_PART1==1) goto l_hadspoken;
-mes "[Ghalstein]";
-mes "Hello,";
-mes "is this a great city?";
-menu "Hello",-,"This is a great city indeed",L_GREAT,"is still ok",L_OK;
-next;
-mes "[Ghalstein]";
-mes " Yes, It a nice day. I wish you have good time in our city. See you later";
-close;
-
-L_OK:
-next;
-mes "[Ghalstein]";
-mes "I like such sunny days... In such beautiful town...";
-close;
-
-L_GREAT:
-next;
-mes "[Ghalstein]";
-mes "Well. This great city is only for really great people.";
-mes "I wish you have good time here. Enjoy.";
-close2;
-mes "[??????]";
-mes "is here";
-mes "......";
-mes "[??????]";
-mes "hurry before we let people discover";
-mes "us...";
-mes "heard a familiar sound";
-menu "Continue listen",l_listen,"do not listen",l_nolisten;
-
-l_listen:
-next;
-mes "[??????]";
-mes "Its all as we suposed to... Everything is similar to our plan";
-mes "[??????]";
-mes "Yes, thats really cool.";
-next;
-mes "[??????]";
-mes "PSSS. Be silent";
-mes "I think somebody else is here listening us. We will meet the other day.";
-mes "[??????]";
-mes "I agree";
-set SCHWALTZVALT_PART1,1;
-set schwalzday, gettime(5);
-close;
-end;
-
-l_nolisten:
-next;
-mes "["+strcharinfo(0)+"]";
-mes "I dont think this is interesting for me.";
-close;
-end;
-
-L_NEXTDAY:
-mes "[Ghalstein]";
-mes "hi, how are you,";
-mes "today weather is good?";
-menu "Yes",l_da,"but last night",-;
-next;
-mes "[Ghalstein]";
-mes "What was last night? I've heard nothing about it. Anything strange had happened?";
-menu "I've heard you speaking to somebody about strange things.",-,"Nothing, sorry",L_NOTHING;
-next;
-mes "[Ghalstein]";
-mes "I think you are mistaken guy. I dont know what are you talking about";
-menu "Dont make a fool from me.",-,"Ok, sory",L_NOTHING;
-next;
-mes "[Ghalstein]";
-mes "I say you, that i hadn't speak to anybody yesterday.Hey, Protector come here plese";
-next;
-mes "["+strcharinfo(0)+"]";
-mes "..........";
-mes "if really not him, he shouldn't";
-mes "denied it so strongly";
-mes "..........";
-next;
-mes "[Protector]";
-mes "I have no intention to";
-mes "interrogation you?";
-mes "just because...";
-menu "The matter that Mr.Ghalstein dealing with..",-,"i feel curious about it?",l_curious;
-next;
-mes "["+strcharinfo(0)+"]";
-mes "I clearly remember him talking to somebody about some strange plans. I think he is planning something restrickted...";
-next;
-mes "[Protector]";
-mes "Hm... Is that so mr. Ghalstein? Do you remember the constitution? Tell us the truth, or i shall arrest you";
-next;
-mes "[Ghalstein]";
-mes "oh.. Ok. I was speaking about our community. Nothing interesting...";
-next;
-mes "[Protector]";
-mes "Ok. Its about your Fishing clan? If so, i leave you. See you later";
-next;
-mes "[Ghalstein]";
-mes "Well, I will tell you the truth. Please give me sometime to consider....";
-mes "I belong to a secret group that antagonistic with another group and so we need some items";
-mes "to be protected. So we were going to organize a trip to Reagent Shaw Research Center.";
-next;
-mes "[Ghalstein]";
-mes "You can get there if you have passed BioLab quest. Its the second and third lvl.";
-mes "But we have no brave to go there. What about helping us?";
-menu "Ok, i shall help",-,"No,thanks",L_NOTHX;
-next;
-mes "[Ghalstein]";
-mes "well then.But you must take this pill to go this quest. This pill will add some status to you.";
-mes "when you shall finish quest - i will delete this status from your char.Is it OK with you?. I think It is.";
-if ( checkweight(7226,1) == 0 ) goto l_overweight;
-getitem (7226),1;
-next;
-mes "[Ghalstein]";
-mes "I want you to collect all related biological exhibit and no need big quantity plus the most important thing.";
-mes "You will simply recognize that things";
-mes "There are some strange mobs there. So be careful. And last...People who go there dissapear. Nobody was back from there...";
-next;
-mes "[Ghalstein]";
-mes "So you had to go to 2 and 3 lvl of BioLab. Be sure you have finish this quest. And bring me 10 Lab staff records, 10 Armlet of prisoner and 1 Pile of Imir heat";
-set SCHWALTZVALT_PART1,2;
-
-set schwalzday,0;
-close;
-
-l_curious:
-mes "[Ghalstein]";
-mes "even so i dont want to speak to smb who say such fool things. Cya.";
-close;
-
-L_NOTHX:
-mes "[Ghalstein]";
-mes "ye, its a pity i think. Have a nice day";
-close;
-
-L_NOTHING:
-mes "[Ghalstein]";
-mes "I've never think guy like you can think this way about me. I dont want to speak to you anymore";
-close;
-
-l_overweight:
-mes "["+strcharinfo(0)+"]";
-mes "sorry you can't take this item";
-close;
-
-
-Quest_enable:
-if (countitem (7345) >= 10) && (countitem(7347) >=10) && (countitem(7346) >=1) goto Quest_end;
-mes "[Ghalstein]";
-mes "You havent geather items yet. Come back when you should.";
-close;
-
-Quest_end:
-mes "[Ghalstein]";
-mes "Well done. You have finished my part of quest.";
-mes "Now, Visit Gushaar. He can be found sowhere around Yuno.";
-next;
-mes "[Ghalstein]";
-mes "Yes, i have forgotten....";
-mes "Now you are member of society Wind of Secret!";
-mes "congratulations!";
-delitem (7345),10;
-delitem (7347),10;
-delitem (7346),1;
-getitem (7226),1;
-getitem (7348),1;
-set questpass_swaltwaltp1,1;
-close;
-
-l_hadspoken:
-mes "[Ghalstein]";
-mes "Sorry, but i have nothing to say to you anymore. Buy.";
-close;
-
-l_da:
-mes "[Ghalstein]";
-mes "Im happy you have time to think so too. See you";
-close;
-
-l_alreadydone:
-mes "["+strcharinfo(0)+"]";
-mes "I have already done this quest. I dont want to go there once more time!";
-close;
-}
-//=======================================================================
-lhz_dun02.gat,268,287,4 script The broken Manufactoring 111,{
-if SCHWALTZVALT_PART1!=2 goto l_end;
-mes "[The broken Manufactoring]";
-mes "You see something shining inside the spoiling machines.Open up the machinr and check it,detected a round shape";
-mes "object wich circulate with a mysterious shines.";
-menu "Its seems like an important object",-,"But it looks nothing musch",l_nottake;
-getitem(7346),1;
-set SCHWALTZVALT_PART1,3;
-mes "["+strcharinfo(0)+"]";
-mes "Well, Now i suppose everything will be ok.";
-close2;
-npctalk "Creeep... Creeeep-Creep...*pfu*.";
-mes "["+strcharinfo(0)+"]";
-mes "Oooops....I dont think this machien will work anymore... I'll go better from here";
-close;
-end;
-l_nottake:
-close;
-
-l_end:
-mes "You see nothing there...";
-close;
-}
-//////////////////////////////////////////////////////////////////////////////////////////////////////////
-//Ending. Lighthalzen, Swaltzwalt Quest Part 1/////////////////////////////////////////////////////////
-//////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-//NPC01 - Dismal Guy
-yuno_fild04.gat,165,245,5 script Dismal Guy 89,{
-if (SCHWALTZVALT_PART2>0) {
- mes "[Dismal Guy]";
- mes "Make your mission..we need you..";
- close;
- }
-mes "[Dismal Guy]";
-mes "Maybe you have some thing to show me?";
-menu "Yeah, I have it",-,"I don't know what do you mean",DG_end01;
-if ((countitem(7348)==0) || (questpass_swaltwaltp1!=1)) { //Membership Card, Здесь проверка, пройдена ли первая часть квеста
- next;
- mes "[Dismal Guy]";
- mes "You are trying to cheat me?";
- mes "You don't have item which I am interesting in..";
- mes "Bye! Come back, when you will have what I want.";
- close;
- }
-//next;
-//mes "[Dismal Guy]";
-//mes "emm....";
-//mes "got red and blue pill,";
-//mes "which one you choose?";
-//menu "Red pill",-,"Blue pill",-; //Надо узнать, что будет если выбрать синию пилюлю (по идеи в первой части НПЦ может дать лмбо синюю, либо красную, но т.к. он дает просто пилюлю, то здесь естесно это ненужно)
-//mes "Nowadays isn't the best time to live..";
-next;
-mes "[Dismal Guy]";
-mes "Schwaltzvalt is control by evil ^0000FFRekenber Enterprise^000000";
-mes "But we have organized a resistance called ^FF0000Wing Of Secret^000000 with the help of the President ^0000FFKarl Weierstrass^000000 to reform Schwaltzvalt Republic from the control of ^0000FFRekenber Enterprise^000000!";
-next;
-mes "[Dismal Guy]";
-mes "I have a task for you.";
-mes "You need to meet the candidate which won the president election ^0000FFKarl Weierstrass^000000";
-mes "He wants to reform Schwaltzvalt Republic from the control of ^0000FFRekenber Enterprise^000000";
-next;
-mes "[Dismal Guy]";
-mes "If you will unable to see ^0000FFKarl Weierstrass^000000, coordinate with his secrtary in Yuno at appointed time.";
-mes "The best time will be betwen 8pm to 11pm or betwen 11am to 2pm";
-set SCHWALTZVALT_PART2, 1; //Первый НПЦ пройден, теперь можно к секретарю.
-next;
-mes "[Dismal Guy]";
-mes "The fate of the whole Republic in your brave hands! Bye!";
-close;
-
-DG_end01:
-next;
-mes "[Dismal Guy]";
-mes "It'a a pity, I am finding you a good person..";
-close;
-}
-
-//NPC02 - President's Secretary
-yuno_pre.gat,69,20,5 script President's Secretary::pre 862,{
-if (SCHWALTZVALT_PART2==4) {
- mes "[Hes O'Neil]";
- if(countitem(7342)==0) {mes "Where is documemt?";close;} //Здесь ИД документа, надо узнать у Лупуса.
- delitem 7342,1; //Здесь ИД документа, надо узнать у Лупуса.
- mes "Thanks a lot!";
- set SCHWALTZVALT_PART2, 5; //Теперь с секретаршей во второй раз все, идем к Venice
- close;
- }
-if (SCHWALTZVALT_PART2>=2) {
- mes "[Hes O'Neil]";
- mes "I glad to see you again!";
- close;
- }
-
-if ( (gettime(3)>23) && (gettime(3)<11) ) || ( (gettime(3)>14) && (gettime(3)<20) ) {
- mes "[Hes O'Neil]";
- mes "It isn't reception time.";
- mes "Come back betwen 8pm to 11pm or betwen 11am to 2pm.";
- close;
- }
-
-
-mes "[Hes O'Neil]";
-mes "Who are you?";
-mes "How can I help?";
-menu "emm..",-,"Meet up with Mr.President",PS_meet,"Nothing",PS_end01;
-
-if (SCHWALTZVALT_PART2==1) {
- next;
- mes "[Hes O'Neil]";
- mes "Heh, you don't know how to explain youself:)";
- mes "But I know that Mr.President is waiting for you. Good Luck!";
- set SCHWALTZVALT_PART2, 2; //Второй НПЦ пройден, далее к стражнику.
- close;
- }
-
-next;
-mes "[Hes O'Neil]";
-mes "What do you want?";
-mes "Don't waste my time please!";
-close;
-
-PS_meet:
-next;
-mes "[Hes O'Neil]";
-mes "Sorry, but Mr.President is very busy.";
-//emotion 14; //sry
-close;
-
-PS_end01:
-next;
-mes "[Hes O'Neil]";
-mes "Sorry, I did't help you:(";
-//emotion 14; //sry
-close;
-}
-
-yuno_pre.gat,75,71,3 duplicate(pre) President's Secretary#2 862,0,0
-
-//NPC03 - Security
-yuno_pre.gat,95,71,5 script Security::sec 899,5,5 {
-if (SCHWALTZVALT_PART2==4) {
- mes "[Security]";
- mes "Mr.President still meeting with other person.";
- close;
- }
-if (SCHWALTZVALT_PART2>=3) {
- mes "[Security]";
- mes "Mr.Presideny is free now. You can come in.";
- close2;
- warp "yuno_pre.gat",75,70;
- end;
- }
-if (SCHWALTZVALT_PART2!=2) {
- mes "[Security]";
- mes "Nobody has disposed to pass you!";
- close;
- }
-if (rand(9)!=0) {
- mes "[Security]";
- mes "Please hold on for a moment.";
- mes "Mr.President still meeting with other person.";
- close;
- }
-enablenpc "kurelle";
-mes "[Keshnaar]";
-mes "Mr.President denied my petition about medical marihuana...";
-//emotion 25; //sob
-next;
-mes "[Keshnaar]";
-mes "I have collected 1000 signatures of the townspeople and nothing...";
-//emotion 25; //sob
-next;
-mes "[Keshnaar]";
-mes "Ok I must go and collect more signatures!";
-next;
-disablenpc "A Fine Gentleman";
-
-mes "[Security]";
-mes "Now Mr.President is free, you can pass.";
-G_menu:
-menu "Ok",S_warp,"Who is he?",-;
-next;
-mes "[Security]";
-mes "Are you talking about Mr.Keshnaar?";
-mes "Mr.Keshnaar works for Rekenber. He consulted with Mr.President.";
-next;
-goto G_menu;
-
-S_warp:
-set SCHWALTZVALT_PART2, 3; //У охранника все, теперь к президенту.
-close2;
-warp "yuno_pre.gat",75,70;
-
-OnTouch:
-if (SCHWALTZVALT_PART2==4) {
- mes "...Suddenly your heard voices behind the door...";
- mes "...but is too slighty, can't heard clearly...";
- next;
- mes "[?????]";
- mes "...is true..";
- mes "so........";
- mes "......president...";
- mes "[?????]";
- mes "..their Investigation...";
- mes ".........";
- mes "....trap....";
- mes "[?????]";
- mes "...stop them....how?";
- mes ".....,surely...";
- mes "[?????]";
- mes "next?...election...";
- mes "....elected...";
- next;
- mes "...the sound became more slighty...";
- mes "...can't heard anymore...";
- close;
- }
-}
-
-//NPC04 - A Fine Gentleman
-yuno_pre.gat,96,69,3 script A Fine Gentleman::kurelle 82,{
-close;
-}
-//NPC - KURELLE
-yuno_pre.gat,69,74,0 duplicate(kurelle) Kurelle#1 109,0,0
-
-//NPC - Security in presidents room
-yuno_pre.gat,76,72,8 duplicate(sec) Security#2 899,0,0
-
-//NPC05 - President Karl
-yuno_pre.gat,69,79,5 script President Karl 872,{
-cutin "lhz_karl",2;
-if (SCHWALTZVALT_PART2==22) {
- mes "...after the story about traitor ^FF0000Kurelle^000000 president looks stunned...";
- next;
- mes "[President Karl]";
- mes "CALL MY SECRETARY NOOOOOOW!!!";
- next;
- mes ".....";
- next;
- enablenpc "President's Secretary#2";
- mes "...Secretary looks too afraid...";
- next;
- cutin "",255;
- mes "[Hes O'Neil]";
- mes "Yes sir! What is your oders?";
- next;
- cutin "lhz_karl",2;
- mes "[President Karl]";
- mes "INVITE THIS TRAITOR ^FF0000KURELLE^000000 NOOOOW!!!";
- next;
- disablenpc "President's Secretary#2";
- mes ".....";
- next;
- enablenpc "Kurelle#1";
- mes "[President Karl]";
- mes "What happened? Why did you betray us?";
- next;
- cutin "",255;
- mes "[Kurelle]";
- mes "You are right. I did it. I report all of your actions to the enterprise...";
- mes "I did it by myself.";
- next;
- mes "[Kurelle]";
- mes "When I carry on my plan, I meet with Rekenber people who are monitoring you...ha-ha!";
- next;
- mes "[Kurelle]";
- mes "Therefore I take those opportunity to propose them my plan,";
- mes "I provide information t0 them, to force you step down, I WILL BE THE NEXT PRESIDENT!!! HA-HA-HA";
- next;
- mes "[Kurelle]";
- mes "Although you'll not step down sp soon...but your team will lost seriously!";
- next;
- mes "[Kurelle]";
- mes "Yeap, your era is gone...";
- mes "Now you can't do anything, just waiting to step down then is enough...";
- mes "Ha ha...";
- next;
- cutin "lhz_karl",2;
- mes "[President Karl]";
- mes "SECURITY!!!";
- enablenpc "Security#2";
- next;
- next;
- mes "[President Karl]";
- mes "He is crazy!! Jail him now!";
- next;
- cutin "",255;
- mes "[Security]";
- mes "Yes sir!";
- disablenpc "Security#2";
- disablenpc "Kurelle#1";
- next;
- cutin "lhz_karl",2;
- mes "[President Karl]";
- mes "It is the end of our Rebublic..";
- mes "Soon it will fall..";
- next;
- mes "[President Karl]";
- mes "Thank you brave man ..";
- mes "...go away. Now I must stay here and wait the END..";
- set SCHWALTZVALT_PART2, 23;
- cutin "",255;
- close;
- }
-if (SCHWALTZVALT_PART2==20) {
- mes "[President Karl]";
- mes "Very interesting...";
- mes "With this information can give enterprise a big hit.";
- if(countitem(7343)==0) {mes "Where is documemt?";cutin "",255; close;} //Sealed documemt
- delitem 7343,1; //Sealed documemt
- next;
- mes "[President Karl]";
- mes "But I can't understand why should we withdraw our members?...";
- mes "...can you go to Esuna and ask her for reasons?";
- set SCHWALTZVALT_PART2, 21; //Обратно к Есуне! (издевательство для игроков:))))
- cutin "",255;
- close;
- }
-if (SCHWALTZVALT_PART2==18) {
- mes "[President Karl]";
- mes "It can't be true! You broght me a file containing all details of the Shinokas case!! ";
- if(countitem(7344)==0) {mes "Where is Shinokas documemt?";cutin "",255; close;} //Shinokas documemt
- delitem 7344,1; //Shinokas documemt
- set SCHWALTZVALT_PART2, 19; //Обратно к Есуне!
- next;
- mes "...President Karl attentivly looking thought the papers...";
- next;
- mes "[President Karl]";
- mes "The death of ^FF0000Shinokas^000000...";
- mes "It is not important for us..";
- mes "The most important thing is what they are going to do with ^0000FFYmir Heart Piece^000000 what is their main purpose.";
- next;
- mes "[President Karl]";
- mes "I heard that when you are on the way to me. ^FF0000Esuna^000000 gained new information.";
- mes "Bye! I will be waiting for new information. ";
- cutin "",255;
- close;
- }
-if (SCHWALTZVALT_PART2==9) {
- mes "[President Karl]";
- mes "Ohh! You brought me this secret document!? You are awesome!";
- if(countitem(7343)==0) {mes "Where is documemt?";cutin "",255; close;} //Sealed Document
- delitem 7343,1; //Sealed Document
- mes "Let's see...";
- next;
- mes "[President Karl]";
- mes "...";
- next;
- mes "[President Karl]";
- mes "It is very-very interesting! One of ^0000FFRekenber Enterprise^000000 researcher is hiding in a secret place!";
- mes "He knows some secret!!!!! His name is ^FF0000Shinokas^000000";
- mes "...and the secret place is...";
- next;
- mes "[President Karl]";
- mes "...^FF0000Einbroch^000000";
- mes "So..your second mission is to find ^FF0000Shinokas^FF0000 in ^FF0000Einbroch^000000 and to know his secret!";
- next;
- mes "[President Karl]";
- mes "Do you have any questions?";
- next;
- mes "["+strcharinfo(0)+"]";
- mes "Yes...I hane one..";
- mes "Shinikas is...";
- next;
- cutin "",255;
- enablenpc "Security#2";
- enablenpc "President's Secretary#2";
- next;
- mes "[Secutity]";
- mes "Mr.President, Mrs.Hes O'Neil has urgent matter to see you. ";
- next;
- mes "...Mrs.Hes O'Neil brooght to the President a pack of documents...";
- next;
- cutin "lhz_karl",2;
- mes "[President Karl]";
- mes "Thanks to Mrs.Hes O'Neil we found a secret file! It is in the store room of ^0000FFReagent Belfa Headquater^000000";
- next;
- mes "[President Karl]";
- mes "Ok. Go somewhere around ^FF0000Lighthalzen^000000, waiting for ^FF0000kafra service^000000 to contact with you.";
- set SCHWALTZVALT_PART2, 10; //Взяли вторую миссию у Президента,
- next;
- disablenpc "Security#2";
- disablenpc "President's Secretary#2";
- cutin "",255;
- close;
- }
-if (SCHWALTZVALT_PART2>=4) {
- mes "[President Karl]";
- mes "See ya!";
- cutin "",255;
- close;
-}
-if (SCHWALTZVALT_PART2<3) {
- mes "[President Karl]";
- mes "Who are you doing here?!";
- next;
- mes "[President Karl]";
- mes "Secutity!!!!";
- cutin "",255;
- close2;
- warp "yuno.gat",153,313;
- }
-mes "[President Karl]";
-mes "I believe, you have many questions but.. ";
-mes "...I am very busy, so the time I have is limited.";
-
-PK_menu01:
-menu "Objective of the ^FF0000Wing Of Secret^000000f",PK_obj01,"Objective of the ^0000FFRekenber Enterprise^000000",PK_obj02,"What is my Mission?",-;
-
-next;
-mes "[President Karl]";
-mes "The first mission is to go ^0000FF'Aldebaran Kafra Headquater'^000000 to meet a guy called ^FF0000 Venice^000000. Then he will let you know what to do." ;
-next;
-mes "[President Karl]";
-mes "One more thing...";
-mes "Please, bring this document to ^FF0000Hes O'Neil^000000. Then you can continue your mission.";
-getitem 7342,1; //File Folder
-set SCHWALTZVALT_PART2, 4; //С Президентом пока все, идем к секретарше опять.
-cutin "",255;
-close;
-
-PK_obj01:
-next;
-mes "[President Karl]";
-mes "It is resistance organization which try to reform Schwaltzvalt Republic with my help.";
-mes "Before I was elected I was the member of this organization.";
-mes "We should not admit the control of authority by ^0000FFRekenber Enterprise^000000!!!";
-goto PK_menu01;
-
-PK_obj02:
-next;
-mes "[President Karl]";
-mes "^0000FFRekenber Enterprise^000000 - the worst organization in Rune Midgard!!";
-mes "They try to get power.";
-mes "To make the prices in shops is more expensive, to receive greater taxes from the townspeople, to start up development Rune Midgard on a way of fear and terror.";
-goto PK_menu01;
-}
-
-//NPC06 - Venice
-aldeba_in.gat,155,240,3 script Kafra Employee 859,{
-if (SCHWALTZVALT_PART2==7) {
- if(countitem(7343)==0) {mes "Where is documemt?";close;} //Здесь ИД документа
- delitem 7343,1; //Sealed Document
- mes "[Venice]";
- mes "That is great!! You got this document!";
- next;
- mes "[Venice]";
- mes "And how is Jargeah? Where is he?";
- next;
- mes "["+strcharinfo(0)+"]";
- mes "He is....";
- next;
- mes "[Venice]";
- mes "I see...";
- mes "Here is document, give it to the President!";
- getitem 7343,1; //Sealed Document
- set SCHWALTZVALT_PART2, 9; //C Venice во второй раз покончено, идем отдавать документ к Президенту.
- close;
- }
-if (SCHWALTZVALT_PART2==6) {
- mes "[Venice]";
- mes "Find Jargeah please!";
- close;
- }
-mes "["+strcharinfo(0)+"]";
-mes "Can I know... are you Venice?";
-next;
-if (SCHWALTZVALT_PART2!=5) {
- mes "[Kafra Employee]";
- mes "May be yes and may be no!";
- mes "I am thinking, go away!";
- close;
- }
-mes "[Venice]";
-mes "Yes, I am Venice.";
-mes "What can I do for you?";
-
-menu "Let her see the logo",-,"Nothing",V_end01;
-
-next;
-mes "[Venice]";
-mes "Now I think that I can trust you..";
-next;
-mes "[Venice]";
-mes "I am the member of ^FF0000Wing Of Secret^000000 organization.";
-mes "I got terrible news...";
-next;
-mes "[Venice]";
-mes "With our agent something happened on the half way between ^FF0000Lighthalzen^000000 and ^FF0000Einbroch^000000 in ^FF0000Grim Reaper's Valley^000000.";
-mes "He needs help, his name is ^FF0000Jargeah^000000. Hurry up please!";
-set SCHWALTZVALT_PART2, 6; //С Venice в первый покончено идем искать Jargeah
-close;
-
-
-V_end01:
-next;
-mes "[Venice]";
-mes "Ok, come back when you will ready.";
-close;
-
-}
-
-//NPC07 - Jargeah
-lhz_fild02.gat,228,214,1 script A Wounded Man 887,{
-mes "["+strcharinfo(0)+"]";
-mes "It looks like a dead man...";
-if (SCHWALTZVALT_PART2!=6) {
- mes "["+strcharinfo(0)+"]";
- mes "He is dead!!! I must go away from here...";
- close;
- }
-mes "Maybe I can try to find something in his clothes..";
-mes "...It isn't good, but I need to make it..";
-next;
-mes "...";
-next;
-mes "You found the Sealed Document!";
-next;
-getitem 7343,1; //Sealed Document
-set SCHWALTZVALT_PART2, 7;
-close;
-}
-
-//NPC08 - Esuna
-lhz_fild01.gat,66,219,3 script A Mystery Woman 859,20,20{
-if (SCHWALTZVALT_PART2==21) {
- mes "[Esuna]";
- mes "..........";
- mes "The traitor in the internal is the problem!";
- mes "..........";
- next;
- mes "[Esuna]";
- mes "Those who able to seal the secret information, and drain it to opponents, only the President ";
- mes "or his trusted aide with his ability ^FF0000Kurelle^000000";
- next;
- mes "[Esuna]";
- mes "According to this information, he often meets with the organaizer of enterprize, ";
- mes "from here we can said that he is the most suspicious target.";
- next;
- mes "[Esuna]";
- mes "After infiltrated his residence, we found a lot of information and evidences that related with him!";
- next;
- mes "[Esuna]";
- mes "The headquater odered us to hold any actions correlated with the President, ";
- mes "and we determined that there is only disadvantage and it won't bring benefits anymore...";
- next;
- mes "[Esuna]";
- mes "I think this is the last, good bye...";
- set SCHWALTZVALT_PART2, 22; //Опять к президенту! (убейся об стену еще раз, и помни, ты это делаешь ради 1.8кк опыта)
- close;
- }
-if (SCHWALTZVALT_PART2==19) {
- mes "[Esuna]";
- mes "I am too nervous..I lost many people of my group!";
- mes "So we should use plan B. We must withdraw our members from Schwaltsvalt!";
- next;
- mes "[Esuna]";
- mes "I think that it will be the best thing which we can do for our people.";
- mes "Here is documents, containing the plan of operation and some negative information about ^0000FFRekenber Enterprise^000000, go to the President he must look throught this documents.";
- getitem 7343,1; //Sealed Document
- set SCHWALTZVALT_PART2, 20; //Опять к президенту!
- close;
- }
-if (SCHWALTZVALT_PART2==17) {
- mes "[Esuna]";
- if(countitem(7344)==0) {mes "Where is Case of Xinucarse";close;} //Здесь ИД документа,
- mes "Haha!! You got these secret documents!! You are great!";
- delitem 7344,1; //Case of Xinucarse
- set SCHWALTZVALT_PART2, 18; //Миссия выполнена! part 2 finished
- mes "[Esuna]";
- mes "I addded some new docements to the file! ";
- getitem 7344,1; //Case of Xinucarse
- next;
- mes "[Esuna]";
- mes "Now go to the President with this documents! ";
- close;
- }
-if (SCHWALTZVALT_PART2==10) {
-mes "[Esuna]";
-mes "Due to emergency I'll give you a short brief, firstly the target of the mission is to infiltrate into the internal of enterpeise and steal the secret information.";
-next;
-mes "[Esuna]";
-mes "It's too difficult to ifiltrate into the iternal, but we have secret agent from our side.";
-mes "Go to ^0000FFpass^000000 and disarm the security system, and then bring out the information.";
-next;
-mes "[Esuna]";
-mes "To cheat the security system fo first to the ^FF0000L.T.G. Store^000000 and buy some stuff.";
-mes "After you entered, find a person called ^FF0000Lestin^000000";
-set SCHWALTZVALT_PART2, 11; //C кафро сервисом все, идем искать Лестина
-close;
-}
-mes "[Esuna]";
-mes "I try to find some mushrooms...bye!";
-close;
-OnTouch:
-if (SCHWALTZVALT_PART2==10) {
-mes "?????";
-mes "..here..plz...come over..";
-close;
- }
-}
-
-//Тут вопрос с варпом, до Лестина не нашел как дойти, надо варп к нему поставить...вот тут lhz_in01 277 157
-//NPC09 - Lestin
-lhz_in01.gat,285,169,3 script Researcher#2 865,{
-if (SCHWALTZVALT_PART2==16) {
- mes "[Lestin]";
- mes "My entry pass! Thank you.";
- if(countitem(7349)==0) {mes "Where is my enty pass?";close;} //Card To Enter Document Room.
- delitem 7349,1; //Card To Enter Document Room.
- set SCHWALTZVALT_PART2, 17; //Теперь можно отдать документы Есуне и закончить вторую часть квеста.
- next;
- mes "[Lestin]";
- mes "Now, go to Esuna with these documents. Bye!";
- close;
- }
-if (SCHWALTZVALT_PART2==11) {
- mes "["+strcharinfo(0)+"]";
- mes "Are you Lestin?";
- next;
- mes "[Lestin]";
- mes "Yes, I am!";
- mes "And you are a member of ^FF0000Wing Of Secret^000000 organization!";
- mes "I can help you to steal secret documents!";
- next;
- mes "[Lestin]";
- mes "Here is my ^0000FFpass^000000, but whis this ^0000FFpass^000000 you only can stay for ^FF00003 minutes^000000";
- getitem 7349,1; //Card To Enter Document Room.
- next;
- mes "[Lestin]";
- mes "The secret information is located at the right hand-side of the research room where I stayed just now. And this...!";
- next;
- mes "[Lestin]";
- mes "...return me my ^0000FFpass^000000 when you will finish! Good Luck!";
- set SCHWALTZVALT_PART2, 12; //Теперь идем похищать документ!
- }
-mes "[Researcher]";
-mes "Hmm... I wonder...";
-close;
-}
-
-//Распишу систему дверей:
-//У Лестина получаем переменную 12...
-//1. если 12, 13 ,14 и флаг двери 0(т.е. есть стражники) идем активировать гвардов
-//2. запускается таймер, стражники пропадают, флаг двери = 1
-//3. у нас есть 3 минуты, чтобы сделать все, подходим к двери, если правильно вводим код, карточка остается в двери, нам присваивают переменную 13, варпает внутрь
-//4. нажимаем на систему поиска, вводим Shinokas, тогда присваивают 14, активируется ареа1-5
-//5. тыркаем на ареа1-5, получаем документы, нам присваивается 15, можно идти к двери
-//6. если у нас 15 и флаг двери 1 (т.е. еше швардов нет), то благополучно получаем карточку назад и выходим, получаем 16
-//Если не успели и мы внутри, значит у нас переменная 13, 14 или 15, флаг двери 0, пропуск исчезает и нас выкидывает из локации, придется снова идти к Лестину за пропуском
-//Допустим у нас 15 очков мы внутри, время истекло. Два варианта - нажать на дверь, тогда придется идти к лестину снова, переменная 11 становится. Либо умереть и топать к активации гвардов.
-//NPC10 - Door
-lhz_in01.gat,177,30,1 script Door 111,{
-if ( (SCHWALTZVALT_PART2==15) && ($SCHWALTZVALT_DOOR_FLAG==1) ) {
- mes "You take out enty key.";
- next;
- mes "["+strcharinfo(0)+"]";
- mes "Hm....I need to bring this key to Lestin!";
- getitem 7349,1; //Card To Enter Document Room.
- set SCHWALTZVALT_PART2, 16; //К Лестину
- menu "Go out!",-;
- close2;
- warp "lhz_in01.gat",177,27;
- end;
- }
-
-
-if ( (SCHWALTZVALT_PART2<15) && (SCHWALTZVALT_PART2>=13) && ($SCHWALTZVALT_DOOR_FLAG==0) ) {
- menu "Go out!",-;
- set SCHWALTZVALT_PART2,11; //неудача, опять к лестину
- mes "[Guards]";
- mes "Intruder!!!";
- close2;
- warp "lighthalzen.gat",104,238;
- end;
- }
-if (SCHWALTZVALT_PART2>15) { mes "I got all the documents I needed!";
- close;
- }
-if ((SCHWALTZVALT_PART2<13) && $SCHWALTZVALT_DOOR_FLAG==0) {
- mes "Here is Guards, they can't let you infiltrate!";
- mes "You need to wait a little.";
- close;
- }
-if ( (countitem(7349)>0) && (SCHWALTZVALT_PART2==12) && ($SCHWALTZVALT_DOOR_FLAG==1)) {//Card To Enter Document Room. ИД пропуска, спросить у Лупуса
- mes "You have the entry pass. You can infiltrate now.";
- menu "Infiltrate",-;
- mes "Please, input code number!";
- input @tmp_code;
- if (@tmp_code != 738495) {next; mes "Incorrect code!"; close;} //Это число в описании пропуска должно быть
- next;
- delitem 7349,1; //Card To Enter Document Room
- mes "Accepted.";
- mes "You can stay in the documents room only for 3 minutes!.";
- set SCHWALTZVALT_PART2, 13; //пустили внутрь
- close2;
- warp "lhz_in01",178,33;
- end;
- }
-mes "....";
-close;
-
-}
-
-//NPC11 - Activate Guards
-lhz_in01.gat,187,30,4 script Point of the review 111,1,0{
-close;
-OnTouch:
-if ( (SCHWALTZVALT_PART2<=15) && (SCHWALTZVALT_PART2>=12) && ($SCHWALTZVALT_DOOR_FLAG==0) ){
- mes "...It seemed that guards gonna smoke...";
- stopnpctimer;
- initnpctimer "schwalt2timer";
- set $SCHWALTZVALT_DOOR_FLAG,1;
- close;
- }
-mes "Nothing happened..";
-close;
-}
-
-//NPC12 - File Search Engine
-lhz_in01.gat,180,35,4 script File Search Engine 111,1,0{
-close;
-OnTouch:
-if (SCHWALTZVALT_PART2==13) {
- mes "-Activating the document seaching program-";
- mes "-Please key in the information of the document...-";
- mes "-..that you would like to search-";
- input @tmp_phrase$;
- if (@tmp_phrase$!="Shinokas") {next; mes "Nothing interesting was found!"; close;}
- next;
- mes "-relevant information of Shinokas-";
- mes "-is being kept in area 1-5-";
- enablenpc "area 1-5";
- set SCHWALTZVALT_PART2, 14; //активировали ареа1-5
- close;
- }
-mes "Nothing happened..";
-close;
-}
-
-//NPC13 - area 1-5
-lhz_in01.gat,184,49,4 script area 1-5 111,1,0{
-close;
-OnTouch:
-if (SCHWALTZVALT_PART2==14) {
- mes "It is interesting. Here is the secret indormation about the heart of Ymir. I must bring this case to Esuna.";
- getitem 7344,1; //Case of Xinucarse Ид спросить у Лупуса
- set SCHWALTZVALT_PART2, 15; //Забрали документ, теперь к двери наружу
- close;
- }
-
-mes "["+strcharinfo(0)+"]";
-mes "I don't know what to find!";
-close;
-}
-//Timer
-lhz_in01.gat,1,1,0 script schwalt2timer -1,{
- OnTimer2000:
- disablenpc "LhzRekGuard";
- disablenpc "Guard#03";
- end;
- OnTimer182000:
- enablenpc "LhzRekGuard";
- enablenpc "Guard#03";
- disablenpc "area 1-5";
- set $SCHWALTZVALT_DOOR_FLAG,0;
- stopnpctimer "schwalt2timer";
- end;
+//===== eAthena Script =======================================
+//= Lighthalzen, Swaltzwalt Quest Part 1
+//= Lighthalzen, Swaltzwalt Quest Part 2
+//= Lighthalzen, Swaltzwalt Quest Part 3
+//===== By: ==================================================
+//= Gravity official script
+//= CallNix (Part 1)
+//= dunkle (Part 2 & 3)
+//===== Current Version: =====================================
+//= 1.0 working version
+//= 1.1 fixed bug with wrong valuable [dunkle]
+//= added and deleted some checks [dunkle]
+//= fixed warps (but they are wrong) [dunkle]
+//= fixed enabling of A Fine Gentleman [dunkle]
+//= fixed bug with reward [dunkle]
+//= 1.2 fixed bug in part with overflow timer (now you must wait untill next day, not 12 hours) [dunkle]
+// changed some valuables [dunkle]
+// fixed bugs in The broken Manufactoring [dunkle]
+//= 1.2b fixed timer Ordinary Man [dunkle]
+//= 1.3 fixed part1 bugs [dunkle]
+//===== Compatible With: =====================================
+//= eAthena SVN
+//===== Description: =========================================
+//=
+//=
+//===== Additional Comments: =================================
+//In alchemist_skills.txt comment because I use this NPC in the script:
+//lhz_in01.gat,285,169,7 script Researcher#2 865,{
+//Unknown Text
+// mes "[Researcher]";
+// mes "Hmm... I wonder...";
+// close;
+//}
+//
+//============================================================
+
+
+yuno_pre.gat,79,69,0 warp inside_pre01 1,1,yuno_pre.gat,97,68
+yuno_pre.gat,113,50,0 warp inside_pre02 1,1,yuno_pre.gat,58,22
+yuno_pre.gat,54,22,0 warp inside_pre03 1,1,yuno_pre.gat,113,55
+lhz_in01.gat,275,234,0 warp inside_pre04 1,1,lhz_in01.gat,277,161 //Здесь порталы поставил наобум, в месте около двери,
+lhz_in01.gat,277,157,0 warp inside_pre04 1,1,lhz_in01.gat,275,231 //где не было другого портала :
+
+//OnInit!
+prontera.gat,0,0,0 script swarzwalt_trilogy -1,1,1{
+OnInit:
+disablenpc "kurelle";
+disablenpc "President's Secretary#2";
+disablenpc "Security#2";
+disablenpc "area 1-5";
+disablenpc "Kurelle#1";
+set $SCHWALTZVALT_DOOR_FLAG,0;
+stopnpctimer "schwalt2timer";
+end;
+}
+
+
+//////////////////////////////////////////////////////////////////////////////////////////////////////////
+//Beginning. Lighthalzen, Swaltzwalt Quest Part 1/////////////////////////////////////////////////////////
+//////////////////////////////////////////////////////////////////////////////////////////////////////////
+lighthalzen.gat,179,170,4 script Ordinary man 48,{
+if (SCHWALTZVALT_PART2==23) {
+ mes "[Ghalstein]";
+ mes "arrr...";
+ mes "is you....";
+ mes ".....";
+ mes "Now? verything finish...";
+ mes "dream...vision";
+ next;
+ mes "[Ghalstein]";
+ mes "arr..most forgot...";
+ mes "This is your...";
+ mes "...cure...";
+ mes "Take this pill,";
+ mes "You'll never have to take it";
+ mes "anymore...";
+ next;
+ mes "[Ghalstein]";
+ mes ".......";
+ mes "We'll never meet each other anymore..";
+ getitem 617,1; //Old Violet Box
+ getexp 1800000,0; //Exp 1800000
+ set dtseligible , 1; //Here is Voting Right (dts warper)
+ set SCHWALTZVALT_PART2, 24;
+ close;
+ }
+
+
+if (questpass_swaltwaltp1==1) goto l_alreadydone;
+if ( (SCHWALTZVALT_PART1==2) || (SCHWALTZVALT_PART1==3) ) goto Quest_enable;
+if ( (SCHWALTZVALT_PART1==1) && (gettime(5)!=schwalzday) ) goto L_NEXTDAY;
+if (SCHWALTZVALT_PART1==1) goto l_hadspoken;
+mes "[Ghalstein]";
+mes "Hello,";
+mes "is this a great city?";
+menu "Hello",-,"This is a great city indeed",L_GREAT,"is still ok",L_OK;
+next;
+mes "[Ghalstein]";
+mes " Yes, It a nice day. I wish you have good time in our city. See you later";
+close;
+
+L_OK:
+next;
+mes "[Ghalstein]";
+mes "I like such sunny days... In such beautiful town...";
+close;
+
+L_GREAT:
+next;
+mes "[Ghalstein]";
+mes "Well. This great city is only for really great people.";
+mes "I wish you have good time here. Enjoy.";
+close2;
+mes "[??????]";
+mes "is here";
+mes "......";
+mes "[??????]";
+mes "hurry before we let people discover";
+mes "us...";
+mes "heard a familiar sound";
+menu "Continue listen",l_listen,"do not listen",l_nolisten;
+
+l_listen:
+next;
+mes "[??????]";
+mes "Its all as we suposed to... Everything is similar to our plan";
+mes "[??????]";
+mes "Yes, thats really cool.";
+next;
+mes "[??????]";
+mes "PSSS. Be silent";
+mes "I think somebody else is here listening us. We will meet the other day.";
+mes "[??????]";
+mes "I agree";
+set SCHWALTZVALT_PART1,1;
+set schwalzday, gettime(5);
+close;
+end;
+
+l_nolisten:
+next;
+mes "["+strcharinfo(0)+"]";
+mes "I dont think this is interesting for me.";
+close;
+end;
+
+L_NEXTDAY:
+mes "[Ghalstein]";
+mes "hi, how are you,";
+mes "today weather is good?";
+menu "Yes",l_da,"but last night",-;
+next;
+mes "[Ghalstein]";
+mes "What was last night? I've heard nothing about it. Anything strange had happened?";
+menu "I've heard you speaking to somebody about strange things.",-,"Nothing, sorry",L_NOTHING;
+next;
+mes "[Ghalstein]";
+mes "I think you are mistaken guy. I dont know what are you talking about";
+menu "Dont make a fool from me.",-,"Ok, sory",L_NOTHING;
+next;
+mes "[Ghalstein]";
+mes "I say you, that i hadn't speak to anybody yesterday.Hey, Protector come here plese";
+next;
+mes "["+strcharinfo(0)+"]";
+mes "..........";
+mes "if really not him, he shouldn't";
+mes "denied it so strongly";
+mes "..........";
+next;
+mes "[Protector]";
+mes "I have no intention to";
+mes "interrogation you?";
+mes "just because...";
+menu "The matter that Mr.Ghalstein dealing with..",-,"i feel curious about it?",l_curious;
+next;
+mes "["+strcharinfo(0)+"]";
+mes "I clearly remember him talking to somebody about some strange plans. I think he is planning something restrickted...";
+next;
+mes "[Protector]";
+mes "Hm... Is that so mr. Ghalstein? Do you remember the constitution? Tell us the truth, or i shall arrest you";
+next;
+mes "[Ghalstein]";
+mes "oh.. Ok. I was speaking about our community. Nothing interesting...";
+next;
+mes "[Protector]";
+mes "Ok. Its about your Fishing clan? If so, i leave you. See you later";
+next;
+mes "[Ghalstein]";
+mes "Well, I will tell you the truth. Please give me sometime to consider....";
+mes "I belong to a secret group that antagonistic with another group and so we need some items";
+mes "to be protected. So we were going to organize a trip to Reagent Shaw Research Center.";
+next;
+mes "[Ghalstein]";
+mes "You can get there if you have passed BioLab quest. Its the second and third lvl.";
+mes "But we have no brave to go there. What about helping us?";
+menu "Ok, i shall help",-,"No,thanks",L_NOTHX;
+next;
+mes "[Ghalstein]";
+mes "well then.But you must take this pill to go this quest. This pill will add some status to you.";
+mes "when you shall finish quest - i will delete this status from your char.Is it OK with you?. I think It is.";
+if ( checkweight(7226,1) == 0 ) goto l_overweight;
+getitem (7226),1;
+next;
+mes "[Ghalstein]";
+mes "I want you to collect all related biological exhibit and no need big quantity plus the most important thing.";
+mes "You will simply recognize that things";
+mes "There are some strange mobs there. So be careful. And last...People who go there dissapear. Nobody was back from there...";
+next;
+mes "[Ghalstein]";
+mes "So you had to go to 2 and 3 lvl of BioLab. Be sure you have finish this quest. And bring me 10 Lab staff records, 10 Armlet of prisoner and 1 Pile of Imir heat";
+set SCHWALTZVALT_PART1,2;
+
+set schwalzday,0;
+close;
+
+l_curious:
+mes "[Ghalstein]";
+mes "even so i dont want to speak to smb who say such fool things. Cya.";
+close;
+
+L_NOTHX:
+mes "[Ghalstein]";
+mes "ye, its a pity i think. Have a nice day";
+close;
+
+L_NOTHING:
+mes "[Ghalstein]";
+mes "I've never think guy like you can think this way about me. I dont want to speak to you anymore";
+close;
+
+l_overweight:
+mes "["+strcharinfo(0)+"]";
+mes "sorry you can't take this item";
+close;
+
+
+Quest_enable:
+if (countitem (7345) >= 10) && (countitem(7347) >=10) && (countitem(7346) >=1) goto Quest_end;
+mes "[Ghalstein]";
+mes "You havent geather items yet. Come back when you should.";
+close;
+
+Quest_end:
+mes "[Ghalstein]";
+mes "Well done. You have finished my part of quest.";
+mes "Now, Visit Gushaar. He can be found sowhere around Yuno.";
+next;
+mes "[Ghalstein]";
+mes "Yes, i have forgotten....";
+mes "Now you are member of society Wind of Secret!";
+mes "congratulations!";
+delitem (7345),10;
+delitem (7347),10;
+delitem (7346),1;
+getitem (7226),1;
+getitem (7348),1;
+set questpass_swaltwaltp1,1;
+close;
+
+l_hadspoken:
+mes "[Ghalstein]";
+mes "Sorry, but i have nothing to say to you anymore. Buy.";
+close;
+
+l_da:
+mes "[Ghalstein]";
+mes "Im happy you have time to think so too. See you";
+close;
+
+l_alreadydone:
+mes "["+strcharinfo(0)+"]";
+mes "I have already done this quest. I dont want to go there once more time!";
+close;
+}
+//=======================================================================
+lhz_dun02.gat,268,287,4 script The broken Manufactoring 111,{
+if SCHWALTZVALT_PART1!=2 goto l_end;
+mes "[The broken Manufactoring]";
+mes "You see something shining inside the spoiling machines.Open up the machinr and check it,detected a round shape";
+mes "object wich circulate with a mysterious shines.";
+menu "Its seems like an important object",-,"But it looks nothing musch",l_nottake;
+getitem(7346),1;
+set SCHWALTZVALT_PART1,3;
+mes "["+strcharinfo(0)+"]";
+mes "Well, Now i suppose everything will be ok.";
+close2;
+npctalk "Creeep... Creeeep-Creep...*pfu*.";
+mes "["+strcharinfo(0)+"]";
+mes "Oooops....I dont think this machien will work anymore... I'll go better from here";
+close;
+end;
+l_nottake:
+close;
+
+l_end:
+mes "You see nothing there...";
+close;
+}
+//////////////////////////////////////////////////////////////////////////////////////////////////////////
+//Ending. Lighthalzen, Swaltzwalt Quest Part 1/////////////////////////////////////////////////////////
+//////////////////////////////////////////////////////////////////////////////////////////////////////////
+
+//NPC01 - Dismal Guy
+yuno_fild04.gat,165,245,5 script Dismal Guy 89,{
+if (SCHWALTZVALT_PART2>0) {
+ mes "[Dismal Guy]";
+ mes "Make your mission..we need you..";
+ close;
+ }
+mes "[Dismal Guy]";
+mes "Maybe you have some thing to show me?";
+menu "Yeah, I have it",-,"I don't know what do you mean",DG_end01;
+if ((countitem(7348)==0) || (questpass_swaltwaltp1!=1)) { //Membership Card, Здесь проверка, пройдена ли первая часть квеста
+ next;
+ mes "[Dismal Guy]";
+ mes "You are trying to cheat me?";
+ mes "You don't have item which I am interesting in..";
+ mes "Bye! Come back, when you will have what I want.";
+ close;
+ }
+//next;
+//mes "[Dismal Guy]";
+//mes "emm....";
+//mes "got red and blue pill,";
+//mes "which one you choose?";
+//menu "Red pill",-,"Blue pill",-; //Надо узнать, что будет если выбрать синию пилюлю (по идеи в первой части НПЦ может дать лмбо синюю, либо красную, но т.к. он дает просто пилюлю, то здесь естесно это ненужно)
+//mes "Nowadays isn't the best time to live..";
+next;
+mes "[Dismal Guy]";
+mes "Schwaltzvalt is control by evil ^0000FFRekenber Enterprise^000000";
+mes "But we have organized a resistance called ^FF0000Wing Of Secret^000000 with the help of the President ^0000FFKarl Weierstrass^000000 to reform Schwaltzvalt Republic from the control of ^0000FFRekenber Enterprise^000000!";
+next;
+mes "[Dismal Guy]";
+mes "I have a task for you.";
+mes "You need to meet the candidate which won the president election ^0000FFKarl Weierstrass^000000";
+mes "He wants to reform Schwaltzvalt Republic from the control of ^0000FFRekenber Enterprise^000000";
+next;
+mes "[Dismal Guy]";
+mes "If you will unable to see ^0000FFKarl Weierstrass^000000, coordinate with his secrtary in Yuno at appointed time.";
+mes "The best time will be betwen 8pm to 11pm or betwen 11am to 2pm";
+set SCHWALTZVALT_PART2, 1; //Первый НПЦ пройден, теперь можно к секретарю.
+next;
+mes "[Dismal Guy]";
+mes "The fate of the whole Republic in your brave hands! Bye!";
+close;
+
+DG_end01:
+next;
+mes "[Dismal Guy]";
+mes "It'a a pity, I am finding you a good person..";
+close;
+}
+
+//NPC02 - President's Secretary
+yuno_pre.gat,69,20,5 script President's Secretary::pre 862,{
+if (SCHWALTZVALT_PART2==4) {
+ mes "[Hes O'Neil]";
+ if(countitem(7342)==0) {mes "Where is documemt?";close;} //Здесь ИД документа, надо узнать у Лупуса.
+ delitem 7342,1; //Здесь ИД документа, надо узнать у Лупуса.
+ mes "Thanks a lot!";
+ set SCHWALTZVALT_PART2, 5; //Теперь с секретаршей во второй раз все, идем к Venice
+ close;
+ }
+if (SCHWALTZVALT_PART2>=2) {
+ mes "[Hes O'Neil]";
+ mes "I glad to see you again!";
+ close;
+ }
+
+if ( (gettime(3)>23) && (gettime(3)<11) ) || ( (gettime(3)>14) && (gettime(3)<20) ) {
+ mes "[Hes O'Neil]";
+ mes "It isn't reception time.";
+ mes "Come back betwen 8pm to 11pm or betwen 11am to 2pm.";
+ close;
+ }
+
+
+mes "[Hes O'Neil]";
+mes "Who are you?";
+mes "How can I help?";
+menu "emm..",-,"Meet up with Mr.President",PS_meet,"Nothing",PS_end01;
+
+if (SCHWALTZVALT_PART2==1) {
+ next;
+ mes "[Hes O'Neil]";
+ mes "Heh, you don't know how to explain youself:)";
+ mes "But I know that Mr.President is waiting for you. Good Luck!";
+ set SCHWALTZVALT_PART2, 2; //Второй НПЦ пройден, далее к стражнику.
+ close;
+ }
+
+next;
+mes "[Hes O'Neil]";
+mes "What do you want?";
+mes "Don't waste my time please!";
+close;
+
+PS_meet:
+next;
+mes "[Hes O'Neil]";
+mes "Sorry, but Mr.President is very busy.";
+//emotion 14; //sry
+close;
+
+PS_end01:
+next;
+mes "[Hes O'Neil]";
+mes "Sorry, I did't help you:(";
+//emotion 14; //sry
+close;
+}
+
+yuno_pre.gat,75,71,3 duplicate(pre) President's Secretary#2 862,0,0
+
+//NPC03 - Security
+yuno_pre.gat,95,71,5 script Security::sec 899,5,5 {
+if (SCHWALTZVALT_PART2==4) {
+ mes "[Security]";
+ mes "Mr.President still meeting with other person.";
+ close;
+ }
+if (SCHWALTZVALT_PART2>=3) {
+ mes "[Security]";
+ mes "Mr.Presideny is free now. You can come in.";
+ close2;
+ warp "yuno_pre.gat",75,70;
+ end;
+ }
+if (SCHWALTZVALT_PART2!=2) {
+ mes "[Security]";
+ mes "Nobody has disposed to pass you!";
+ close;
+ }
+if (rand(9)!=0) {
+ mes "[Security]";
+ mes "Please hold on for a moment.";
+ mes "Mr.President still meeting with other person.";
+ close;
+ }
+enablenpc "kurelle";
+mes "[Keshnaar]";
+mes "Mr.President denied my petition about medical marihuana...";
+//emotion 25; //sob
+next;
+mes "[Keshnaar]";
+mes "I have collected 1000 signatures of the townspeople and nothing...";
+//emotion 25; //sob
+next;
+mes "[Keshnaar]";
+mes "Ok I must go and collect more signatures!";
+next;
+disablenpc "A Fine Gentleman";
+
+mes "[Security]";
+mes "Now Mr.President is free, you can pass.";
+G_menu:
+menu "Ok",S_warp,"Who is he?",-;
+next;
+mes "[Security]";
+mes "Are you talking about Mr.Keshnaar?";
+mes "Mr.Keshnaar works for Rekenber. He consulted with Mr.President.";
+next;
+goto G_menu;
+
+S_warp:
+set SCHWALTZVALT_PART2, 3; //У охранника все, теперь к президенту.
+close2;
+warp "yuno_pre.gat",75,70;
+
+OnTouch:
+if (SCHWALTZVALT_PART2==4) {
+ mes "...Suddenly your heard voices behind the door...";
+ mes "...but is too slighty, can't heard clearly...";
+ next;
+ mes "[?????]";
+ mes "...is true..";
+ mes "so........";
+ mes "......president...";
+ mes "[?????]";
+ mes "..their Investigation...";
+ mes ".........";
+ mes "....trap....";
+ mes "[?????]";
+ mes "...stop them....how?";
+ mes ".....,surely...";
+ mes "[?????]";
+ mes "next?...election...";
+ mes "....elected...";
+ next;
+ mes "...the sound became more slighty...";
+ mes "...can't heard anymore...";
+ close;
+ }
+}
+
+//NPC04 - A Fine Gentleman
+yuno_pre.gat,96,69,3 script A Fine Gentleman::kurelle 82,{
+close;
+}
+//NPC - KURELLE
+yuno_pre.gat,69,74,0 duplicate(kurelle) Kurelle#1 109,0,0
+
+//NPC - Security in presidents room
+yuno_pre.gat,76,72,8 duplicate(sec) Security#2 899,0,0
+
+//NPC05 - President Karl
+yuno_pre.gat,69,79,5 script President Karl 872,{
+cutin "lhz_karl",2;
+if (SCHWALTZVALT_PART2==22) {
+ mes "...after the story about traitor ^FF0000Kurelle^000000 president looks stunned...";
+ next;
+ mes "[President Karl]";
+ mes "CALL MY SECRETARY NOOOOOOW!!!";
+ next;
+ mes ".....";
+ next;
+ enablenpc "President's Secretary#2";
+ mes "...Secretary looks too afraid...";
+ next;
+ cutin "",255;
+ mes "[Hes O'Neil]";
+ mes "Yes sir! What is your oders?";
+ next;
+ cutin "lhz_karl",2;
+ mes "[President Karl]";
+ mes "INVITE THIS TRAITOR ^FF0000KURELLE^000000 NOOOOW!!!";
+ next;
+ disablenpc "President's Secretary#2";
+ mes ".....";
+ next;
+ enablenpc "Kurelle#1";
+ mes "[President Karl]";
+ mes "What happened? Why did you betray us?";
+ next;
+ cutin "",255;
+ mes "[Kurelle]";
+ mes "You are right. I did it. I report all of your actions to the enterprise...";
+ mes "I did it by myself.";
+ next;
+ mes "[Kurelle]";
+ mes "When I carry on my plan, I meet with Rekenber people who are monitoring you...ha-ha!";
+ next;
+ mes "[Kurelle]";
+ mes "Therefore I take those opportunity to propose them my plan,";
+ mes "I provide information t0 them, to force you step down, I WILL BE THE NEXT PRESIDENT!!! HA-HA-HA";
+ next;
+ mes "[Kurelle]";
+ mes "Although you'll not step down sp soon...but your team will lost seriously!";
+ next;
+ mes "[Kurelle]";
+ mes "Yeap, your era is gone...";
+ mes "Now you can't do anything, just waiting to step down then is enough...";
+ mes "Ha ha...";
+ next;
+ cutin "lhz_karl",2;
+ mes "[President Karl]";
+ mes "SECURITY!!!";
+ enablenpc "Security#2";
+ next;
+ next;
+ mes "[President Karl]";
+ mes "He is crazy!! Jail him now!";
+ next;
+ cutin "",255;
+ mes "[Security]";
+ mes "Yes sir!";
+ disablenpc "Security#2";
+ disablenpc "Kurelle#1";
+ next;
+ cutin "lhz_karl",2;
+ mes "[President Karl]";
+ mes "It is the end of our Rebublic..";
+ mes "Soon it will fall..";
+ next;
+ mes "[President Karl]";
+ mes "Thank you brave man ..";
+ mes "...go away. Now I must stay here and wait the END..";
+ set SCHWALTZVALT_PART2, 23;
+ cutin "",255;
+ close;
+ }
+if (SCHWALTZVALT_PART2==20) {
+ mes "[President Karl]";
+ mes "Very interesting...";
+ mes "With this information can give enterprise a big hit.";
+ if(countitem(7343)==0) {mes "Where is documemt?";cutin "",255; close;} //Sealed documemt
+ delitem 7343,1; //Sealed documemt
+ next;
+ mes "[President Karl]";
+ mes "But I can't understand why should we withdraw our members?...";
+ mes "...can you go to Esuna and ask her for reasons?";
+ set SCHWALTZVALT_PART2, 21; //Обратно к Есуне! (издевательство для игроков:))))
+ cutin "",255;
+ close;
+ }
+if (SCHWALTZVALT_PART2==18) {
+ mes "[President Karl]";
+ mes "It can't be true! You broght me a file containing all details of the Shinokas case!! ";
+ if(countitem(7344)==0) {mes "Where is Shinokas documemt?";cutin "",255; close;} //Shinokas documemt
+ delitem 7344,1; //Shinokas documemt
+ set SCHWALTZVALT_PART2, 19; //Обратно к Есуне!
+ next;
+ mes "...President Karl attentivly looking thought the papers...";
+ next;
+ mes "[President Karl]";
+ mes "The death of ^FF0000Shinokas^000000...";
+ mes "It is not important for us..";
+ mes "The most important thing is what they are going to do with ^0000FFYmir Heart Piece^000000 what is their main purpose.";
+ next;
+ mes "[President Karl]";
+ mes "I heard that when you are on the way to me. ^FF0000Esuna^000000 gained new information.";
+ mes "Bye! I will be waiting for new information. ";
+ cutin "",255;
+ close;
+ }
+if (SCHWALTZVALT_PART2==9) {
+ mes "[President Karl]";
+ mes "Ohh! You brought me this secret document!? You are awesome!";
+ if(countitem(7343)==0) {mes "Where is documemt?";cutin "",255; close;} //Sealed Document
+ delitem 7343,1; //Sealed Document
+ mes "Let's see...";
+ next;
+ mes "[President Karl]";
+ mes "...";
+ next;
+ mes "[President Karl]";
+ mes "It is very-very interesting! One of ^0000FFRekenber Enterprise^000000 researcher is hiding in a secret place!";
+ mes "He knows some secret!!!!! His name is ^FF0000Shinokas^000000";
+ mes "...and the secret place is...";
+ next;
+ mes "[President Karl]";
+ mes "...^FF0000Einbroch^000000";
+ mes "So..your second mission is to find ^FF0000Shinokas^FF0000 in ^FF0000Einbroch^000000 and to know his secret!";
+ next;
+ mes "[President Karl]";
+ mes "Do you have any questions?";
+ next;
+ mes "["+strcharinfo(0)+"]";
+ mes "Yes...I hane one..";
+ mes "Shinikas is...";
+ next;
+ cutin "",255;
+ enablenpc "Security#2";
+ enablenpc "President's Secretary#2";
+ next;
+ mes "[Secutity]";
+ mes "Mr.President, Mrs.Hes O'Neil has urgent matter to see you. ";
+ next;
+ mes "...Mrs.Hes O'Neil brooght to the President a pack of documents...";
+ next;
+ cutin "lhz_karl",2;
+ mes "[President Karl]";
+ mes "Thanks to Mrs.Hes O'Neil we found a secret file! It is in the store room of ^0000FFReagent Belfa Headquater^000000";
+ next;
+ mes "[President Karl]";
+ mes "Ok. Go somewhere around ^FF0000Lighthalzen^000000, waiting for ^FF0000kafra service^000000 to contact with you.";
+ set SCHWALTZVALT_PART2, 10; //Взяли вторую миссию у Президента,
+ next;
+ disablenpc "Security#2";
+ disablenpc "President's Secretary#2";
+ cutin "",255;
+ close;
+ }
+if (SCHWALTZVALT_PART2>=4) {
+ mes "[President Karl]";
+ mes "See ya!";
+ cutin "",255;
+ close;
+}
+if (SCHWALTZVALT_PART2<3) {
+ mes "[President Karl]";
+ mes "Who are you doing here?!";
+ next;
+ mes "[President Karl]";
+ mes "Secutity!!!!";
+ cutin "",255;
+ close2;
+ warp "yuno.gat",153,313;
+ }
+mes "[President Karl]";
+mes "I believe, you have many questions but.. ";
+mes "...I am very busy, so the time I have is limited.";
+
+PK_menu01:
+menu "Objective of the ^FF0000Wing Of Secret^000000f",PK_obj01,"Objective of the ^0000FFRekenber Enterprise^000000",PK_obj02,"What is my Mission?",-;
+
+next;
+mes "[President Karl]";
+mes "The first mission is to go ^0000FF'Aldebaran Kafra Headquater'^000000 to meet a guy called ^FF0000 Venice^000000. Then he will let you know what to do." ;
+next;
+mes "[President Karl]";
+mes "One more thing...";
+mes "Please, bring this document to ^FF0000Hes O'Neil^000000. Then you can continue your mission.";
+getitem 7342,1; //File Folder
+set SCHWALTZVALT_PART2, 4; //С Президентом пока все, идем к секретарше опять.
+cutin "",255;
+close;
+
+PK_obj01:
+next;
+mes "[President Karl]";
+mes "It is resistance organization which try to reform Schwaltzvalt Republic with my help.";
+mes "Before I was elected I was the member of this organization.";
+mes "We should not admit the control of authority by ^0000FFRekenber Enterprise^000000!!!";
+goto PK_menu01;
+
+PK_obj02:
+next;
+mes "[President Karl]";
+mes "^0000FFRekenber Enterprise^000000 - the worst organization in Rune Midgard!!";
+mes "They try to get power.";
+mes "To make the prices in shops is more expensive, to receive greater taxes from the townspeople, to start up development Rune Midgard on a way of fear and terror.";
+goto PK_menu01;
+}
+
+//NPC06 - Venice
+aldeba_in.gat,155,240,3 script Kafra Employee 859,{
+if (SCHWALTZVALT_PART2==7) {
+ if(countitem(7343)==0) {mes "Where is documemt?";close;} //Здесь ИД документа
+ delitem 7343,1; //Sealed Document
+ mes "[Venice]";
+ mes "That is great!! You got this document!";
+ next;
+ mes "[Venice]";
+ mes "And how is Jargeah? Where is he?";
+ next;
+ mes "["+strcharinfo(0)+"]";
+ mes "He is....";
+ next;
+ mes "[Venice]";
+ mes "I see...";
+ mes "Here is document, give it to the President!";
+ getitem 7343,1; //Sealed Document
+ set SCHWALTZVALT_PART2, 9; //C Venice во второй раз покончено, идем отдавать документ к Президенту.
+ close;
+ }
+if (SCHWALTZVALT_PART2==6) {
+ mes "[Venice]";
+ mes "Find Jargeah please!";
+ close;
+ }
+mes "["+strcharinfo(0)+"]";
+mes "Can I know... are you Venice?";
+next;
+if (SCHWALTZVALT_PART2!=5) {
+ mes "[Kafra Employee]";
+ mes "May be yes and may be no!";
+ mes "I am thinking, go away!";
+ close;
+ }
+mes "[Venice]";
+mes "Yes, I am Venice.";
+mes "What can I do for you?";
+
+menu "Let her see the logo",-,"Nothing",V_end01;
+
+next;
+mes "[Venice]";
+mes "Now I think that I can trust you..";
+next;
+mes "[Venice]";
+mes "I am the member of ^FF0000Wing Of Secret^000000 organization.";
+mes "I got terrible news...";
+next;
+mes "[Venice]";
+mes "With our agent something happened on the half way between ^FF0000Lighthalzen^000000 and ^FF0000Einbroch^000000 in ^FF0000Grim Reaper's Valley^000000.";
+mes "He needs help, his name is ^FF0000Jargeah^000000. Hurry up please!";
+set SCHWALTZVALT_PART2, 6; //С Venice в первый покончено идем искать Jargeah
+close;
+
+
+V_end01:
+next;
+mes "[Venice]";
+mes "Ok, come back when you will ready.";
+close;
+
+}
+
+//NPC07 - Jargeah
+lhz_fild02.gat,228,214,1 script A Wounded Man 887,{
+mes "["+strcharinfo(0)+"]";
+mes "It looks like a dead man...";
+if (SCHWALTZVALT_PART2!=6) {
+ mes "["+strcharinfo(0)+"]";
+ mes "He is dead!!! I must go away from here...";
+ close;
+ }
+mes "Maybe I can try to find something in his clothes..";
+mes "...It isn't good, but I need to make it..";
+next;
+mes "...";
+next;
+mes "You found the Sealed Document!";
+next;
+getitem 7343,1; //Sealed Document
+set SCHWALTZVALT_PART2, 7;
+close;
+}
+
+//NPC08 - Esuna
+lhz_fild01.gat,66,219,3 script A Mystery Woman 859,20,20{
+if (SCHWALTZVALT_PART2==21) {
+ mes "[Esuna]";
+ mes "..........";
+ mes "The traitor in the internal is the problem!";
+ mes "..........";
+ next;
+ mes "[Esuna]";
+ mes "Those who able to seal the secret information, and drain it to opponents, only the President ";
+ mes "or his trusted aide with his ability ^FF0000Kurelle^000000";
+ next;
+ mes "[Esuna]";
+ mes "According to this information, he often meets with the organaizer of enterprize, ";
+ mes "from here we can said that he is the most suspicious target.";
+ next;
+ mes "[Esuna]";
+ mes "After infiltrated his residence, we found a lot of information and evidences that related with him!";
+ next;
+ mes "[Esuna]";
+ mes "The headquater odered us to hold any actions correlated with the President, ";
+ mes "and we determined that there is only disadvantage and it won't bring benefits anymore...";
+ next;
+ mes "[Esuna]";
+ mes "I think this is the last, good bye...";
+ set SCHWALTZVALT_PART2, 22; //Опять к президенту! (убейся об стену еще раз, и помни, ты это делаешь ради 1.8кк опыта)
+ close;
+ }
+if (SCHWALTZVALT_PART2==19) {
+ mes "[Esuna]";
+ mes "I am too nervous..I lost many people of my group!";
+ mes "So we should use plan B. We must withdraw our members from Schwaltsvalt!";
+ next;
+ mes "[Esuna]";
+ mes "I think that it will be the best thing which we can do for our people.";
+ mes "Here is documents, containing the plan of operation and some negative information about ^0000FFRekenber Enterprise^000000, go to the President he must look throught this documents.";
+ getitem 7343,1; //Sealed Document
+ set SCHWALTZVALT_PART2, 20; //Опять к президенту!
+ close;
+ }
+if (SCHWALTZVALT_PART2==17) {
+ mes "[Esuna]";
+ if(countitem(7344)==0) {mes "Where is Case of Xinucarse";close;} //Здесь ИД документа,
+ mes "Haha!! You got these secret documents!! You are great!";
+ delitem 7344,1; //Case of Xinucarse
+ set SCHWALTZVALT_PART2, 18; //Миссия выполнена! part 2 finished
+ mes "[Esuna]";
+ mes "I addded some new docements to the file! ";
+ getitem 7344,1; //Case of Xinucarse
+ next;
+ mes "[Esuna]";
+ mes "Now go to the President with this documents! ";
+ close;
+ }
+if (SCHWALTZVALT_PART2==10) {
+mes "[Esuna]";
+mes "Due to emergency I'll give you a short brief, firstly the target of the mission is to infiltrate into the internal of enterpeise and steal the secret information.";
+next;
+mes "[Esuna]";
+mes "It's too difficult to ifiltrate into the iternal, but we have secret agent from our side.";
+mes "Go to ^0000FFpass^000000 and disarm the security system, and then bring out the information.";
+next;
+mes "[Esuna]";
+mes "To cheat the security system fo first to the ^FF0000L.T.G. Store^000000 and buy some stuff.";
+mes "After you entered, find a person called ^FF0000Lestin^000000";
+set SCHWALTZVALT_PART2, 11; //C кафро сервисом все, идем искать Лестина
+close;
+}
+mes "[Esuna]";
+mes "I try to find some mushrooms...bye!";
+close;
+OnTouch:
+if (SCHWALTZVALT_PART2==10) {
+mes "?????";
+mes "..here..plz...come over..";
+close;
+ }
+}
+
+//Тут вопрос с варпом, до Лестина не нашел как дойти, надо варп к нему поставить...вот тут lhz_in01 277 157
+//NPC09 - Lestin
+lhz_in01.gat,285,169,3 script Researcher#2 865,{
+if (SCHWALTZVALT_PART2==16) {
+ mes "[Lestin]";
+ mes "My entry pass! Thank you.";
+ if(countitem(7349)==0) {mes "Where is my enty pass?";close;} //Card To Enter Document Room.
+ delitem 7349,1; //Card To Enter Document Room.
+ set SCHWALTZVALT_PART2, 17; //Теперь можно отдать документы Есуне и закончить вторую часть квеста.
+ next;
+ mes "[Lestin]";
+ mes "Now, go to Esuna with these documents. Bye!";
+ close;
+ }
+if (SCHWALTZVALT_PART2==11) {
+ mes "["+strcharinfo(0)+"]";
+ mes "Are you Lestin?";
+ next;
+ mes "[Lestin]";
+ mes "Yes, I am!";
+ mes "And you are a member of ^FF0000Wing Of Secret^000000 organization!";
+ mes "I can help you to steal secret documents!";
+ next;
+ mes "[Lestin]";
+ mes "Here is my ^0000FFpass^000000, but whis this ^0000FFpass^000000 you only can stay for ^FF00003 minutes^000000";
+ getitem 7349,1; //Card To Enter Document Room.
+ next;
+ mes "[Lestin]";
+ mes "The secret information is located at the right hand-side of the research room where I stayed just now. And this...!";
+ next;
+ mes "[Lestin]";
+ mes "...return me my ^0000FFpass^000000 when you will finish! Good Luck!";
+ set SCHWALTZVALT_PART2, 12; //Теперь идем похищать документ!
+ }
+mes "[Researcher]";
+mes "Hmm... I wonder...";
+close;
+}
+
+//Распишу систему дверей:
+//У Лестина получаем переменную 12...
+//1. если 12, 13 ,14 и флаг двери 0(т.е. есть стражники) идем активировать гвардов
+//2. запускается таймер, стражники пропадают, флаг двери = 1
+//3. у нас есть 3 минуты, чтобы сделать все, подходим к двери, если правильно вводим код, карточка остается в двери, нам присваивают переменную 13, варпает внутрь
+//4. нажимаем на систему поиска, вводим Shinokas, тогда присваивают 14, активируется ареа1-5
+//5. тыркаем на ареа1-5, получаем документы, нам присваивается 15, можно идти к двери
+//6. если у нас 15 и флаг двери 1 (т.е. еше швардов нет), то благополучно получаем карточку назад и выходим, получаем 16
+//Если не успели и мы внутри, значит у нас переменная 13, 14 или 15, флаг двери 0, пропуск исчезает и нас выкидывает из локации, придется снова идти к Лестину за пропуском
+//Допустим у нас 15 очков мы внутри, время истекло. Два варианта - нажать на дверь, тогда придется идти к лестину снова, переменная 11 становится. Либо умереть и топать к активации гвардов.
+//NPC10 - Door
+lhz_in01.gat,177,30,1 script Door 111,{
+if ( (SCHWALTZVALT_PART2==15) && ($SCHWALTZVALT_DOOR_FLAG==1) ) {
+ mes "You take out enty key.";
+ next;
+ mes "["+strcharinfo(0)+"]";
+ mes "Hm....I need to bring this key to Lestin!";
+ getitem 7349,1; //Card To Enter Document Room.
+ set SCHWALTZVALT_PART2, 16; //К Лестину
+ menu "Go out!",-;
+ close2;
+ warp "lhz_in01.gat",177,27;
+ end;
+ }
+
+
+if ( (SCHWALTZVALT_PART2<15) && (SCHWALTZVALT_PART2>=13) && ($SCHWALTZVALT_DOOR_FLAG==0) ) {
+ menu "Go out!",-;
+ set SCHWALTZVALT_PART2,11; //неудача, опять к лестину
+ mes "[Guards]";
+ mes "Intruder!!!";
+ close2;
+ warp "lighthalzen.gat",104,238;
+ end;
+ }
+if (SCHWALTZVALT_PART2>15) { mes "I got all the documents I needed!";
+ close;
+ }
+if ((SCHWALTZVALT_PART2<13) && $SCHWALTZVALT_DOOR_FLAG==0) {
+ mes "Here is Guards, they can't let you infiltrate!";
+ mes "You need to wait a little.";
+ close;
+ }
+if ( (countitem(7349)>0) && (SCHWALTZVALT_PART2==12) && ($SCHWALTZVALT_DOOR_FLAG==1)) {//Card To Enter Document Room. ИД пропуска, спросить у Лупуса
+ mes "You have the entry pass. You can infiltrate now.";
+ menu "Infiltrate",-;
+ mes "Please, input code number!";
+ input @tmp_code;
+ if (@tmp_code != 738495) {next; mes "Incorrect code!"; close;} //Это число в описании пропуска должно быть
+ next;
+ delitem 7349,1; //Card To Enter Document Room
+ mes "Accepted.";
+ mes "You can stay in the documents room only for 3 minutes!.";
+ set SCHWALTZVALT_PART2, 13; //пустили внутрь
+ close2;
+ warp "lhz_in01",178,33;
+ end;
+ }
+mes "....";
+close;
+
+}
+
+//NPC11 - Activate Guards
+lhz_in01.gat,187,30,4 script Point of the review 111,1,0{
+close;
+OnTouch:
+if ( (SCHWALTZVALT_PART2<=15) && (SCHWALTZVALT_PART2>=12) && ($SCHWALTZVALT_DOOR_FLAG==0) ){
+ mes "...It seemed that guards gonna smoke...";
+ stopnpctimer;
+ initnpctimer "schwalt2timer";
+ set $SCHWALTZVALT_DOOR_FLAG,1;
+ close;
+ }
+mes "Nothing happened..";
+close;
+}
+
+//NPC12 - File Search Engine
+lhz_in01.gat,180,35,4 script File Search Engine 111,1,0{
+close;
+OnTouch:
+if (SCHWALTZVALT_PART2==13) {
+ mes "-Activating the document seaching program-";
+ mes "-Please key in the information of the document...-";
+ mes "-..that you would like to search-";
+ input @tmp_phrase$;
+ if (@tmp_phrase$!="Shinokas") {next; mes "Nothing interesting was found!"; close;}
+ next;
+ mes "-relevant information of Shinokas-";
+ mes "-is being kept in area 1-5-";
+ enablenpc "area 1-5";
+ set SCHWALTZVALT_PART2, 14; //активировали ареа1-5
+ close;
+ }
+mes "Nothing happened..";
+close;
+}
+
+//NPC13 - area 1-5
+lhz_in01.gat,184,49,4 script area 1-5 111,1,0{
+close;
+OnTouch:
+if (SCHWALTZVALT_PART2==14) {
+ mes "It is interesting. Here is the secret indormation about the heart of Ymir. I must bring this case to Esuna.";
+ getitem 7344,1; //Case of Xinucarse Ид спросить у Лупуса
+ set SCHWALTZVALT_PART2, 15; //Забрали документ, теперь к двери наружу
+ close;
+ }
+
+mes "["+strcharinfo(0)+"]";
+mes "I don't know what to find!";
+close;
+}
+//Timer
+lhz_in01.gat,1,1,0 script schwalt2timer -1,{
+ OnTimer2000:
+ disablenpc "LhzRekGuard";
+ disablenpc "Guard#03";
+ end;
+ OnTimer182000:
+ enablenpc "LhzRekGuard";
+ enablenpc "Guard#03";
+ disablenpc "area 1-5";
+ set $SCHWALTZVALT_DOOR_FLAG,0;
+ stopnpctimer "schwalt2timer";
+ end;
} \ No newline at end of file
diff --git a/npc/quests/WIP/shadow_quest.txt b/npc/quests/WIP/shadow_quest.txt
index 726df6fd9..34ae2e0a3 100644
--- a/npc/quests/WIP/shadow_quest.txt
+++ b/npc/quests/WIP/shadow_quest.txt
@@ -1,416 +1,416 @@
-//===== eAthena Script =======================================
-//= Lighthalzen, Shadow quest
-//===== By: ==================================================
-//= Gravity official script
-//= ColNix
-//===== Current Version: =====================================
-//= Fixed
-//===== Compatible With: =====================================
-//= eAthena SVN
-//===== Description: =========================================
-//= Lighthalzen
-//===== Additional Comments: =================================
-//=
-//============================================================
-
-lighthalzen.gat,141,162,4 script Old man 61,{
-readparam(baselevel);
-
-if (baselevel <= 70) {
-mes "["+strcharinfo(0)+"]";
-mes "It seems that i'm not as strong as i thought. Better i go to lvl.";
-close;
-}
- if (quest_shadow==1) {
- mes "[Kamenasai]";
- mes "Have you already spoken to Kazien? ooh...";
- mes "Hurry up and find him. He must be in Lighthalzen Castle.";
- close;
- }
- if (quest_shadow>1) {
- mes "[Kamenasai]";
- mes "I have nothing to say to you now.";
- mes "Leave me alone";
- close;
- }
-
-mes "[Kamenasai]";
-mes "Hello, "+strcharinfo(0)+". Nice to see you.";
-mes "I've heard alot about you doings. And want to know, if you could help us.";
-next;
-menu "Hm.. Interesting. Wat's the problem?",-,"No, I'm not interested",l_not;
-mes "[Kamenasai]";
-mes "I knew that you should help. So. My friend Kazien is busy due to a lack of workers,";
-mes "he has some work for you. Find him in Lighthalzen castle. Good luck";
-set quest_shadow,1;
-close;
-
-l_not:
-mes "[Kamenasai]";
-mes "It's a pity. But i cant make you change your mind. GL&HF guy. Cya";
-close;
-}
-
-//====================================================================================
-
-lhz_in01,174,258,4 script Young man 59,{
-if (quest_shadow==1) goto l_accept;
-if (quest_shadow==3) goto l_nochance;
-if (quest_shadow==4) goto l_part1;
-if (quest_shadow==5) goto l_wtfisthat;
-if (quest_shadow==8) goto l_zadolbal;
-if (quest_shadow==10) goto l_nu;
-
-mes "[Kazien]";
-mes "What do you want? Don't you see that i'm busy now!. Leave me alone!";
-close;
-
-l_accept:
-mes "[Kazien]";
-mes "What do you want from me. Don't you see that i am busy?";
-next;
-menu "Well, i'm, from Kamenasai",-,"hm... Can i borow some money? ^_-",l_nothing;
-mes "[Kazien]";
-mes "Oh, sorry my friend. You come to help me, don't you.";
-mes "Thanks alot. I'm too busy here and cant go myself, so i let my frind to help me";
-mes "His choice is you... So. Can you keep a secret?";
-next;
-menu "Of course i can",-,"i'm not sure.",l_goaway;
-mes "[Kazien]";
-mes "Well then. Lets see. Go to Einbroch Research Facility and find Garins there.";
-set quest_shadow,2;
-close;
-
-l_nothing:
-mes "[Kazien]";
-mes "Then, please leave me alone. I dont have any wish to speak to you.";
-close;
-
-l_goaway:
-mes "[Kazien]";
-mes "Its a pity... I think my friend was wrong sending you to me. Buy.";
-close;
-
-l_part1:
-mes "[Kazien]";
-mes "I see. You dont tell That guard about your quest, so i can rely on you. It was your first task.";
-mes "Now i shall tell you all. I am trying to make some buisness. But i can't deliver goods by myself.";
-mes "So i need somebody. And this somebody is you, "+strcharinfo(0)+".";
-next;
-mes "[Kazien]";
-mes "Go and Find Lyozien near Airship. He will tell you more.";
-close;
-
-l_forget:
-mes "[Kazien]";
-mes "Oh my head. Who are you at last? Im very dull. Somebody tell the police about me";
-mes "I am so bored...So...";
-next;
-goto l_accept;
-close;
-
-l_nochance:
-if (rand(10)==9) goto l_forget;
-mes "[Kazien]";
-mes "You cant keep any secret! What do you want from me?";
-mes "I dont want to see you anymore! Go somewhere else and never come here!";
-close;
-
-l_wtfisthat:
-if (quest_shadow_misc==1) goto l_leftthis;
-mes "[Kazien]";
-mes "Hm... He is saying something interesting. I will give delivery scroll. Go to";
-mes "Lyozien and speak to him...He is at the top of all this.";
-getitem 1072,1;
-getexp 110000,0;
-set quest_shadow_mobs,1;
-set quest_shadow_misc,1;
-set quest_shadow,6;
-close;
-
-l_zadolbal:
-if (quest_shadow_misc==2) goto l_leftthis;
-mes "[Kazien]";
-mes "Hm... He dont answer...You know thats strange. Something is wrong..";
-mes "And this something can destroy our plans....";
-next;
-menu "Also bandits.. and goods",-,"In every way i'm leaving this",l_leftthis;
-mes "[Kazien]";
-mes "Hm.. So you dont still receive goods.. And you say that bandits atack you...";
-mes "Now i understand. Go to Lyozien and be careful!";
-monster "airplane_01.gat",96,48,"Rogue",1268,1,"Man::OnMyMobDeath";
-getexp 150000,0;
-set quest_shadow_misc,2;
-set quest_shadow,9;
-close;
-
-l_leftthis:
-mes "[Kazien]";
-mes "Ye.. Its a pity i think. But its your choice. Remember,if you tell somebody";
-mes "About this you shall be dead...See you later";
-close;
-
-l_nu:
-if (quest_shadow_finish==1) goto l_leftthis;
-mes "[Kazien]";
-mes "How is our work? What about goods?";
-next;
-menu "Everything was really cool. I have lots of fun",-,"It was the wersest thing.",-;
-mes "[Kazien]";
-mes "Well... in everycase.^_^ I think you were really a good comrad";
-mes "["+strcharinfo(0)+"]";
-mes "I dont think so about you. Because i work for you and i must know what ware the goods";
-next;
-mes "[Kazien]";
-mes "Don't you think that it was me who give you work, let me dicide what you must know";
-mes "Afterall thx. Without you, this work wasn't done. You help me alot. I waiting forward hearing about your greatest doings.";
-mes "See you,my hero";
-getexp 150000,0;
-set quest_shadow_finish,1;
-close;
-}
-//===================================================================================
-lhz_in01,156,248,4 script #Kazien -1,6,3{
-OnTouch:
-if (quest_shadow_finish==1) {
-mes "[Remindes]";
-mes "[Kazien]";
-mes "How is our work? What about goods?";
-mes "...................................";
-mes "[Kazien]";
-mes "Well... in everycase. I think you were really a good comrade";
-mes "["+strcharinfo(0)+"]";
-mes "I dont think so. Because i work for you and i must know what was there";
-next;
-mes "[Kazien]";
-mes "Don't you think that it was me who give you work, let me dicide what you must know";
-mes "Afterall thx. Without you, this work wasn't done. You help me alot. I waiting forward hearing about your greatest doings.";
-mes "See you,my hero";
-next;
-mes "["+strcharinfo(0)+"]";
-mes "Strange people are they... but i suppose that was really interesting journey...";
-set quest_shadow_finish,0;
-set quest_shadow,11;
-close;
-}
-close;
-}
-//===================================================================================
-airplane_01.gat,96,53,4 script #maner -1,6,3{
-OnTouch:
-if ((quest_shadow==6) && (quest_shadow_mobs==1)) {
-monster "airplane_01.gat",96,53,"Rogue",1268,5;
-set quest_shadow_mobs,0;
-}
-close;
-}
-//=======================================================================================
-airplane_01.gat,85,47,4 script #maner01 -1,6,3{
-OnTouch:
-if ((quest_shadow==6) && (quest_shadow_mobs==1)) {
-monster "airplane_01.gat",85,47,"Rogue",1268,5;
-set quest_shadow_mobs,0;
-}
-close;
-}
-//=======================================================================================
-lhz_in01,175,234,4 script #Kazien01 -1,6,3{
-OnTouch:
-if (quest_shadow_finish==1) {
-mes "[Remindes]";
-mes "[Kazien]";
-mes "How is our work? What about goods?";
-mes "...................................";
-mes "[Kazien]";
-mes "Well... in everycase. I think you were really a good comrade";
-mes "["+strcharinfo(0)+"]";
-mes "I dont think so. Because i work for you and i must know what was there";
-next;
-mes "[Kazien]";
-mes "Don't you think that it was me who give you work, let me dicide what you must know";
-mes "Afterall thx. Without you, this work wasn't done. You help me alot. I waiting forward hearing about your greatest doings.";
-mes "See you,my hero";
-next;
-mes "["+strcharinfo(0)+"]";
-mes "Strange people are they... but i suppose that was really interesting journey...";
-set quest_shadow_finish,0;
-set quest_shadow,11;
-close;
-}
-close;
-}
-//=======================================================================================
-
-einbroch.gat,54,52,4 script Guard 734,{
-if (quest_shadow==2) goto l_done;
-
-mes "[Guard]";
-mes "This is restricted zone. Please leave this place.";
-close;
-
-l_done:
-mes "[Guard]";
-mes "Hey. Stop. What do you want here? Dont you know that this is restrickted zone?";
-mes "Tell me why are you here?";
-next;
-menu "Well...I'm leaving now. I dont know that",-,"Hm... Kazien asked me to find Garins.",l_garins;
-close2;
-set quest_shadow,4;
-end;
-
-l_garins:
-mes "[Guard]";
-mes "You say Kazien.. From Lighthalzen....";
-next;
-npctalk "*writing something to the notepad*";
-mes "[Guard]";
-mes "Find Garins.... Ok. Thanks. Now you are free. Go home.";
-set quest_shadow,3;
-close;
-}
-
-//========================================================================================
-
-airplane_01.gat,96,48,4 script Man 810,{
-if (quest_shadow==4) goto l_allok;
-if (quest_shadow==5) goto l_strange;
-if (quest_shadow==6) goto l_next;
-if (quest_shadow==7) goto l_talked;
-if (quest_shadow==9) goto l_nuinah;
-if (quest_shadow==10) goto l_wazaputaus;
-
-mes "[Lyozien]";
-mes "Greeting to you. Nice weather,isn't it?";
-close;
-
-l_strange:
-mes "[Lyozien]";
-mes "Hm.. strange. Kazien tell me nothing about it. I suppose you will better go to him";
-mes "and ask about this";
-close;
-
-l_allok:
-mes "[Lyozien]";
-mes "Oki doki guy. You see, that this is restricted doing. But we must do it";
-mes "For future of our country. So. That goods are really needed to our goverment, but";
-mes "Some rogues want to robe it. We can't protect them ourselves because we are on kings work";
-next;
-mes "[Lyozien]";
-mes "So its you, who will make it";
-mes "Go to Izlude and found Ahman there. He will give you nececcery items";
-mes "Good luck";
-close;
-
-l_next:
-mes "[Lyozien]";
-mes "So. What he says??";
-next;
-mes "["+strcharinfo(0)+"]";
-mes "He say to come to you. Here is the Scroll of deliver that i must show you.";
-next;
-mes "[Lyozien]";
-mes "I suppose you should better go to Ahman and show this... In cas, i have no goods to give you.";
-close;
-
-l_talked:
-mes "[Lyozien]";
-mes "Well... You say He dont answer... I suppose You better go to Kazien and tell him this.";
-mes "It seemes to that it wasnt our plan.. i fear... Noway. Hurry up to Kazien";
-set quest_shadow,8;
-close;
-
-l_nuinah:
-if mobcount("airplane_01.gat","Man::OnMyMobDeath")==0 goto ondeath;
-mes "[Lyozien]";
-mes "Well.. I really dont know. But i will never tell you wat are the goods";
-mes "hey, Bandit is there! LOOK!!!";
-close;
-
-
-OnDeath:
-if looked==1 {
-mes "[Lyozien]";
-mes "I have already given you medicine. Hurry. Somebody";
-mes "wants to stop us!";
-close;
-}
-
-mes "[Lyozien]";
-mes "Whooo... I was so frightened... Here is potion for you. Hurry up. Go to Ahman";
-getitem 504,1;
-next;
-mes "Suddenly you see that some goods are broken...";
-mes "You decided to examine them";
-set looked,1;
-close;
-end;
-
-l_wazaputaus:
-Mes "[Lyozien]";
-mes "Well Ahmer was right. You are ill. Better have a rest.";
-mes "Go to Kazien. He will help you.";
-close;
-}
-
-//========================================================================================
-
-izlude.gat,186,57,4 script Scamp 85,{
-if quest_shadow==4 goto l_gocheck;
-if quest_shadow==6 goto l_done;
-if quest_shadow==9 goto l_nah;
-
-mes "[Ahman]";
-mes "Ahmaaa... Ahnaaa... Ahmaaan....";
-next;
-mes "["+strcharinfo(0)+"]";
-mes "????????";
-next;
-mes "[Ahman]";
-mes "Ahmaaa... Ahnaaa... Ahmaaan....";
-close;
-
-l_gocheck:
-mes "[Ahman]";
-mes "Hello there. What do you want?";
-menu "i want to deliver goods.",-,"nothing",l_close;
-next;
-mes "[Ahman]";
-mes "what goods. What are you talking about? I know nothing about this.";
-next;
-mes "["+strcharinfo(0)+"]";
-mes "Im here from Kazien, who send me to Lyozien who send me to you....";
-next;
-mes "[Ahman]";
-mes "Even so. Goods are already delivered. Go back to Lyozien";
-set quest_shadow,5;
-close;
-
-l_close:
-mes "[Ahman]";
-mes "You are very strange guy..";
-close;
-
-l_done:
-mes "["+strcharinfo(0)+"]";
-mes "hey!...";
-next;
-mes "You stay about 1 hour trying to speak to him. No answer";
-next;
-mes ".........";
-mes "["+strcharinfo(0)+"]";
-mes "Go i better to Lyozien. he is dead i think...";
-set quest_shadow,7;
-close;
-
-l_nah:
-mes "[Ahmar]";
-mes "You look very ill. You know?";
-next;
-mes "["+strcharinfo(0)+"]";
-mes "I dunno. Dont you know about atack on your goods? Some of them were broken. And i examine them..";
-next;
-mes "[Ahmer]";
-mes "What?? You look at them?? Its bad. go to Lyozine. Hurry!";
-set quest_shadow,10;
-close;
+//===== eAthena Script =======================================
+//= Lighthalzen, Shadow quest
+//===== By: ==================================================
+//= Gravity official script
+//= ColNix
+//===== Current Version: =====================================
+//= Fixed
+//===== Compatible With: =====================================
+//= eAthena SVN
+//===== Description: =========================================
+//= Lighthalzen
+//===== Additional Comments: =================================
+//=
+//============================================================
+
+lighthalzen.gat,141,162,4 script Old man 61,{
+readparam(baselevel);
+
+if (baselevel <= 70) {
+mes "["+strcharinfo(0)+"]";
+mes "It seems that i'm not as strong as i thought. Better i go to lvl.";
+close;
+}
+ if (quest_shadow==1) {
+ mes "[Kamenasai]";
+ mes "Have you already spoken to Kazien? ooh...";
+ mes "Hurry up and find him. He must be in Lighthalzen Castle.";
+ close;
+ }
+ if (quest_shadow>1) {
+ mes "[Kamenasai]";
+ mes "I have nothing to say to you now.";
+ mes "Leave me alone";
+ close;
+ }
+
+mes "[Kamenasai]";
+mes "Hello, "+strcharinfo(0)+". Nice to see you.";
+mes "I've heard alot about you doings. And want to know, if you could help us.";
+next;
+menu "Hm.. Interesting. Wat's the problem?",-,"No, I'm not interested",l_not;
+mes "[Kamenasai]";
+mes "I knew that you should help. So. My friend Kazien is busy due to a lack of workers,";
+mes "he has some work for you. Find him in Lighthalzen castle. Good luck";
+set quest_shadow,1;
+close;
+
+l_not:
+mes "[Kamenasai]";
+mes "It's a pity. But i cant make you change your mind. GL&HF guy. Cya";
+close;
+}
+
+//====================================================================================
+
+lhz_in01,174,258,4 script Young man 59,{
+if (quest_shadow==1) goto l_accept;
+if (quest_shadow==3) goto l_nochance;
+if (quest_shadow==4) goto l_part1;
+if (quest_shadow==5) goto l_wtfisthat;
+if (quest_shadow==8) goto l_zadolbal;
+if (quest_shadow==10) goto l_nu;
+
+mes "[Kazien]";
+mes "What do you want? Don't you see that i'm busy now!. Leave me alone!";
+close;
+
+l_accept:
+mes "[Kazien]";
+mes "What do you want from me. Don't you see that i am busy?";
+next;
+menu "Well, i'm, from Kamenasai",-,"hm... Can i borow some money? ^_-",l_nothing;
+mes "[Kazien]";
+mes "Oh, sorry my friend. You come to help me, don't you.";
+mes "Thanks alot. I'm too busy here and cant go myself, so i let my frind to help me";
+mes "His choice is you... So. Can you keep a secret?";
+next;
+menu "Of course i can",-,"i'm not sure.",l_goaway;
+mes "[Kazien]";
+mes "Well then. Lets see. Go to Einbroch Research Facility and find Garins there.";
+set quest_shadow,2;
+close;
+
+l_nothing:
+mes "[Kazien]";
+mes "Then, please leave me alone. I dont have any wish to speak to you.";
+close;
+
+l_goaway:
+mes "[Kazien]";
+mes "Its a pity... I think my friend was wrong sending you to me. Buy.";
+close;
+
+l_part1:
+mes "[Kazien]";
+mes "I see. You dont tell That guard about your quest, so i can rely on you. It was your first task.";
+mes "Now i shall tell you all. I am trying to make some buisness. But i can't deliver goods by myself.";
+mes "So i need somebody. And this somebody is you, "+strcharinfo(0)+".";
+next;
+mes "[Kazien]";
+mes "Go and Find Lyozien near Airship. He will tell you more.";
+close;
+
+l_forget:
+mes "[Kazien]";
+mes "Oh my head. Who are you at last? Im very dull. Somebody tell the police about me";
+mes "I am so bored...So...";
+next;
+goto l_accept;
+close;
+
+l_nochance:
+if (rand(10)==9) goto l_forget;
+mes "[Kazien]";
+mes "You cant keep any secret! What do you want from me?";
+mes "I dont want to see you anymore! Go somewhere else and never come here!";
+close;
+
+l_wtfisthat:
+if (quest_shadow_misc==1) goto l_leftthis;
+mes "[Kazien]";
+mes "Hm... He is saying something interesting. I will give delivery scroll. Go to";
+mes "Lyozien and speak to him...He is at the top of all this.";
+getitem 1072,1;
+getexp 110000,0;
+set quest_shadow_mobs,1;
+set quest_shadow_misc,1;
+set quest_shadow,6;
+close;
+
+l_zadolbal:
+if (quest_shadow_misc==2) goto l_leftthis;
+mes "[Kazien]";
+mes "Hm... He dont answer...You know thats strange. Something is wrong..";
+mes "And this something can destroy our plans....";
+next;
+menu "Also bandits.. and goods",-,"In every way i'm leaving this",l_leftthis;
+mes "[Kazien]";
+mes "Hm.. So you dont still receive goods.. And you say that bandits atack you...";
+mes "Now i understand. Go to Lyozien and be careful!";
+monster "airplane_01.gat",96,48,"Rogue",1268,1,"Man::OnMyMobDeath";
+getexp 150000,0;
+set quest_shadow_misc,2;
+set quest_shadow,9;
+close;
+
+l_leftthis:
+mes "[Kazien]";
+mes "Ye.. Its a pity i think. But its your choice. Remember,if you tell somebody";
+mes "About this you shall be dead...See you later";
+close;
+
+l_nu:
+if (quest_shadow_finish==1) goto l_leftthis;
+mes "[Kazien]";
+mes "How is our work? What about goods?";
+next;
+menu "Everything was really cool. I have lots of fun",-,"It was the wersest thing.",-;
+mes "[Kazien]";
+mes "Well... in everycase.^_^ I think you were really a good comrad";
+mes "["+strcharinfo(0)+"]";
+mes "I dont think so about you. Because i work for you and i must know what ware the goods";
+next;
+mes "[Kazien]";
+mes "Don't you think that it was me who give you work, let me dicide what you must know";
+mes "Afterall thx. Without you, this work wasn't done. You help me alot. I waiting forward hearing about your greatest doings.";
+mes "See you,my hero";
+getexp 150000,0;
+set quest_shadow_finish,1;
+close;
+}
+//===================================================================================
+lhz_in01,156,248,4 script #Kazien -1,6,3{
+OnTouch:
+if (quest_shadow_finish==1) {
+mes "[Remindes]";
+mes "[Kazien]";
+mes "How is our work? What about goods?";
+mes "...................................";
+mes "[Kazien]";
+mes "Well... in everycase. I think you were really a good comrade";
+mes "["+strcharinfo(0)+"]";
+mes "I dont think so. Because i work for you and i must know what was there";
+next;
+mes "[Kazien]";
+mes "Don't you think that it was me who give you work, let me dicide what you must know";
+mes "Afterall thx. Without you, this work wasn't done. You help me alot. I waiting forward hearing about your greatest doings.";
+mes "See you,my hero";
+next;
+mes "["+strcharinfo(0)+"]";
+mes "Strange people are they... but i suppose that was really interesting journey...";
+set quest_shadow_finish,0;
+set quest_shadow,11;
+close;
+}
+close;
+}
+//===================================================================================
+airplane_01.gat,96,53,4 script #maner -1,6,3{
+OnTouch:
+if ((quest_shadow==6) && (quest_shadow_mobs==1)) {
+monster "airplane_01.gat",96,53,"Rogue",1268,5;
+set quest_shadow_mobs,0;
+}
+close;
+}
+//=======================================================================================
+airplane_01.gat,85,47,4 script #maner01 -1,6,3{
+OnTouch:
+if ((quest_shadow==6) && (quest_shadow_mobs==1)) {
+monster "airplane_01.gat",85,47,"Rogue",1268,5;
+set quest_shadow_mobs,0;
+}
+close;
+}
+//=======================================================================================
+lhz_in01,175,234,4 script #Kazien01 -1,6,3{
+OnTouch:
+if (quest_shadow_finish==1) {
+mes "[Remindes]";
+mes "[Kazien]";
+mes "How is our work? What about goods?";
+mes "...................................";
+mes "[Kazien]";
+mes "Well... in everycase. I think you were really a good comrade";
+mes "["+strcharinfo(0)+"]";
+mes "I dont think so. Because i work for you and i must know what was there";
+next;
+mes "[Kazien]";
+mes "Don't you think that it was me who give you work, let me dicide what you must know";
+mes "Afterall thx. Without you, this work wasn't done. You help me alot. I waiting forward hearing about your greatest doings.";
+mes "See you,my hero";
+next;
+mes "["+strcharinfo(0)+"]";
+mes "Strange people are they... but i suppose that was really interesting journey...";
+set quest_shadow_finish,0;
+set quest_shadow,11;
+close;
+}
+close;
+}
+//=======================================================================================
+
+einbroch.gat,54,52,4 script Guard 734,{
+if (quest_shadow==2) goto l_done;
+
+mes "[Guard]";
+mes "This is restricted zone. Please leave this place.";
+close;
+
+l_done:
+mes "[Guard]";
+mes "Hey. Stop. What do you want here? Dont you know that this is restrickted zone?";
+mes "Tell me why are you here?";
+next;
+menu "Well...I'm leaving now. I dont know that",-,"Hm... Kazien asked me to find Garins.",l_garins;
+close2;
+set quest_shadow,4;
+end;
+
+l_garins:
+mes "[Guard]";
+mes "You say Kazien.. From Lighthalzen....";
+next;
+npctalk "*writing something to the notepad*";
+mes "[Guard]";
+mes "Find Garins.... Ok. Thanks. Now you are free. Go home.";
+set quest_shadow,3;
+close;
+}
+
+//========================================================================================
+
+airplane_01.gat,96,48,4 script Man 810,{
+if (quest_shadow==4) goto l_allok;
+if (quest_shadow==5) goto l_strange;
+if (quest_shadow==6) goto l_next;
+if (quest_shadow==7) goto l_talked;
+if (quest_shadow==9) goto l_nuinah;
+if (quest_shadow==10) goto l_wazaputaus;
+
+mes "[Lyozien]";
+mes "Greeting to you. Nice weather,isn't it?";
+close;
+
+l_strange:
+mes "[Lyozien]";
+mes "Hm.. strange. Kazien tell me nothing about it. I suppose you will better go to him";
+mes "and ask about this";
+close;
+
+l_allok:
+mes "[Lyozien]";
+mes "Oki doki guy. You see, that this is restricted doing. But we must do it";
+mes "For future of our country. So. That goods are really needed to our goverment, but";
+mes "Some rogues want to robe it. We can't protect them ourselves because we are on kings work";
+next;
+mes "[Lyozien]";
+mes "So its you, who will make it";
+mes "Go to Izlude and found Ahman there. He will give you nececcery items";
+mes "Good luck";
+close;
+
+l_next:
+mes "[Lyozien]";
+mes "So. What he says??";
+next;
+mes "["+strcharinfo(0)+"]";
+mes "He say to come to you. Here is the Scroll of deliver that i must show you.";
+next;
+mes "[Lyozien]";
+mes "I suppose you should better go to Ahman and show this... In cas, i have no goods to give you.";
+close;
+
+l_talked:
+mes "[Lyozien]";
+mes "Well... You say He dont answer... I suppose You better go to Kazien and tell him this.";
+mes "It seemes to that it wasnt our plan.. i fear... Noway. Hurry up to Kazien";
+set quest_shadow,8;
+close;
+
+l_nuinah:
+if mobcount("airplane_01.gat","Man::OnMyMobDeath")==0 goto ondeath;
+mes "[Lyozien]";
+mes "Well.. I really dont know. But i will never tell you wat are the goods";
+mes "hey, Bandit is there! LOOK!!!";
+close;
+
+
+OnDeath:
+if looked==1 {
+mes "[Lyozien]";
+mes "I have already given you medicine. Hurry. Somebody";
+mes "wants to stop us!";
+close;
+}
+
+mes "[Lyozien]";
+mes "Whooo... I was so frightened... Here is potion for you. Hurry up. Go to Ahman";
+getitem 504,1;
+next;
+mes "Suddenly you see that some goods are broken...";
+mes "You decided to examine them";
+set looked,1;
+close;
+end;
+
+l_wazaputaus:
+Mes "[Lyozien]";
+mes "Well Ahmer was right. You are ill. Better have a rest.";
+mes "Go to Kazien. He will help you.";
+close;
+}
+
+//========================================================================================
+
+izlude.gat,186,57,4 script Scamp 85,{
+if quest_shadow==4 goto l_gocheck;
+if quest_shadow==6 goto l_done;
+if quest_shadow==9 goto l_nah;
+
+mes "[Ahman]";
+mes "Ahmaaa... Ahnaaa... Ahmaaan....";
+next;
+mes "["+strcharinfo(0)+"]";
+mes "????????";
+next;
+mes "[Ahman]";
+mes "Ahmaaa... Ahnaaa... Ahmaaan....";
+close;
+
+l_gocheck:
+mes "[Ahman]";
+mes "Hello there. What do you want?";
+menu "i want to deliver goods.",-,"nothing",l_close;
+next;
+mes "[Ahman]";
+mes "what goods. What are you talking about? I know nothing about this.";
+next;
+mes "["+strcharinfo(0)+"]";
+mes "Im here from Kazien, who send me to Lyozien who send me to you....";
+next;
+mes "[Ahman]";
+mes "Even so. Goods are already delivered. Go back to Lyozien";
+set quest_shadow,5;
+close;
+
+l_close:
+mes "[Ahman]";
+mes "You are very strange guy..";
+close;
+
+l_done:
+mes "["+strcharinfo(0)+"]";
+mes "hey!...";
+next;
+mes "You stay about 1 hour trying to speak to him. No answer";
+next;
+mes ".........";
+mes "["+strcharinfo(0)+"]";
+mes "Go i better to Lyozien. he is dead i think...";
+set quest_shadow,7;
+close;
+
+l_nah:
+mes "[Ahmar]";
+mes "You look very ill. You know?";
+next;
+mes "["+strcharinfo(0)+"]";
+mes "I dunno. Dont you know about atack on your goods? Some of them were broken. And i examine them..";
+next;
+mes "[Ahmer]";
+mes "What?? You look at them?? Its bad. go to Lyozine. Hurry!";
+set quest_shadow,10;
+close;
} \ No newline at end of file