From b6e717af84976d2e61a2084e63f8da2729d6d315 Mon Sep 17 00:00:00 2001
From: Lupus <Lupus@54d463be-8e91-2dee-dedb-b68131a5f0ec>
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/quests/WIP/6.txt | 127 +++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 127 insertions(+)
 create mode 100644 npc/quests/WIP/6.txt

(limited to 'npc/quests/WIP/6.txt')

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
-- 
cgit v1.2.3-70-g09d2