From b6e717af84976d2e61a2084e63f8da2729d6d315 Mon Sep 17 00:00:00 2001 From: Lupus Date: Wed, 8 Nov 2006 19:47:47 +0000 Subject: added "work in progress" scripts git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@9177 54d463be-8e91-2dee-dedb-b68131a5f0ec --- npc/Changelog.txt | 1 + npc/quests/WIP/4.txt | 112 +++++ npc/quests/WIP/6.txt | 127 +++++ npc/quests/WIP/airships.txt | 1138 +++++++++++++++++++++++++++++++++++++++++++ npc/quests/WIP/schwalz.txt | 1043 +++++++++++++++++++++++++++++++++++++++ 5 files changed, 2421 insertions(+) create mode 100644 npc/quests/WIP/4.txt create mode 100644 npc/quests/WIP/6.txt create mode 100644 npc/quests/WIP/airships.txt create mode 100644 npc/quests/WIP/schwalz.txt (limited to 'npc') diff --git a/npc/Changelog.txt b/npc/Changelog.txt index 39001ce89..7122d4fde 100644 --- a/npc/Changelog.txt +++ b/npc/Changelog.txt @@ -34,6 +34,7 @@ KarLaeda Date Added ====== 11/08 + * Added quest\WIP (work in progress folder) with scripts by Dunkle and CallNIX [Lupus] * Small fix in Hunter Job Quest [KarLaeda] 11/07 * Another one set of fixes for the scripts syntax. [KarLaeda] diff --git a/npc/quests/WIP/4.txt b/npc/quests/WIP/4.txt new file mode 100644 index 000000000..718cde3e3 --- /dev/null +++ b/npc/quests/WIP/4.txt @@ -0,0 +1,112 @@ +// by CallNix v.0.0 + +airplane.gat,236,63,4 script Hallen 55,{ + if (fragmentauest==2) { + 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...."; + if (airshipquest != 0) { + 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; + 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]"; + disablenpc "Ferlok"; + 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"; + 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,35,4 script reader 111,3,3,{ + 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; +} \ No newline at end of file diff --git a/npc/quests/WIP/6.txt b/npc/quests/WIP/6.txt new file mode 100644 index 000000000..46a856da2 --- /dev/null +++ b/npc/quests/WIP/6.txt @@ -0,0 +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; +} \ No newline at end of file diff --git a/npc/quests/WIP/airships.txt b/npc/quests/WIP/airships.txt new file mode 100644 index 000000000..b6284bcbd --- /dev/null +++ b/npc/quests/WIP/airships.txt @@ -0,0 +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; + } +} diff --git a/npc/quests/WIP/schwalz.txt b/npc/quests/WIP/schwalz.txt new file mode 100644 index 000000000..c844854fa --- /dev/null +++ b/npc/quests/WIP/schwalz.txt @@ -0,0 +1,1043 @@ +//===== 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] +//===== 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_swaltzwaltp1==1 goto l_alreadydone; +if quest_swaltzwaltp1==1 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 quest_swaltzwaltp1,1; +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 quest_swaltzwaltp1!=1 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; +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"; +set quest_swaltzwaltp1,0; +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 -- cgit v1.2.3-60-g2f50