summaryrefslogtreecommitdiff
path: root/npc/airports
diff options
context:
space:
mode:
authorL0ne_W0lf <L0ne_W0lf@54d463be-8e91-2dee-dedb-b68131a5f0ec>2010-08-22 02:31:17 +0000
committerL0ne_W0lf <L0ne_W0lf@54d463be-8e91-2dee-dedb-b68131a5f0ec>2010-08-22 02:31:17 +0000
commit5843032c1974caac3fc3f03b436a36fb3c1ae361 (patch)
tree199fec42d8d893b339feec3ca7cd38a5918a42a1 /npc/airports
parenta1761224ba058570943bed7f38d0ecfee22aa621 (diff)
downloadhercules-5843032c1974caac3fc3f03b436a36fb3c1ae361.tar.gz
hercules-5843032c1974caac3fc3f03b436a36fb3c1ae361.tar.bz2
hercules-5843032c1974caac3fc3f03b436a36fb3c1ae361.tar.xz
hercules-5843032c1974caac3fc3f03b436a36fb3c1ae361.zip
Mob chat now strips "#unique" names off monsters, curtosy of Daegaladh.
Touched up the Airship scripts. Fixed up some content based on official files. git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@14392 54d463be-8e91-2dee-dedb-b68131a5f0ec
Diffstat (limited to 'npc/airports')
-rw-r--r--npc/airports/airships.txt908
1 files changed, 564 insertions, 344 deletions
diff --git a/npc/airports/airships.txt b/npc/airports/airships.txt
index 7b0bad0bf..59f48d615 100644
--- a/npc/airports/airships.txt
+++ b/npc/airports/airships.txt
@@ -3,7 +3,7 @@
//===== By: ==================================================
//= eAthena Dev Team
//===== Current Version: =====================================
-//= 1.1b
+//= 1.2
//===== Compatible With: =====================================
//= eAthena SVN 3422+(Requires jA Script System)
//===== Description: =========================================
@@ -31,6 +31,7 @@
//= 1.1 Touch-ups, and changed references of "Yuno" to "Juno", [L0ne_W0lf]
//= 1.1a Small fix to comparison check. [Paradox924X]
//= 1.1b Small fix to zeny check. [Kisuka]
+//= 1.2 Updated some NPCs based on official files. [L0ne_W0lf]
//============================================================
//============================================================
@@ -80,13 +81,13 @@ while(1)
donpcevent "#AirshipWarp-2::OnHide";
disablenpc "#AirshipWarp-1";
disablenpc "#AirshipWarp-2";
- mapannounce "airplane","The Airship is leaving the ground. Our next destination is Hugel.",1,0xBA55D3;
+ mapannounce "airplane","The Airship is leaving the ground. Our next destination is Hugel.",bc_map,0xBA55D3;
end;
OnTimer15000:
- mapannounce "airplane","We are heading to Hugel.",1,0xBA55D3;
+ mapannounce "airplane","We are heading to Hugel.",bc_map,0xBA55D3;
end;
OnTimer30000:
- mapannounce "airplane","We will arrive in Hugel shortly.",1,0xBA55D3;
+ mapannounce "airplane","We will arrive in Hugel shortly.",bc_map,0xBA55D3;
end;
OnTimer45000:
set $@airplanelocation,4;
@@ -94,10 +95,10 @@ OnTimer45000:
enablenpc "#AirshipWarp-2";
donpcevent "#AirshipWarp-1::OnUnhide";
donpcevent "#AirshipWarp-2::OnUnhide";
- mapannounce "airplane","Welcome to Hugel. Have a safe trip.",1,0xBA55D3;
+ mapannounce "airplane","Welcome to Hugel. Have a safe trip.",bc_map,0xBA55D3;
end;
OnTimer55000:
- mapannounce "airplane","Currently, we are in Hugel. The Airship will leave shortly.",1,0xBA55D3;
+ mapannounce "airplane","Currently, we are in Hugel. The Airship will leave shortly.",bc_map,0xBA55D3;
end;
OnTimer65000:
set $@airplanelocation,0;
@@ -105,13 +106,13 @@ OnTimer65000:
donpcevent "#AirshipWarp-2::OnHide";
disablenpc "#AirshipWarp-1";
disablenpc "#AirshipWarp-2";
- mapannounce "airplane","The Airship is leaving the ground. Our next destination is Einbroch.",1,0x00FF00;
+ mapannounce "airplane","The Airship is leaving the ground. Our next destination is Einbroch.",bc_map,0x00FF00;
end;
OnTimer80000:
- mapannounce "airplane","We are heading to Einbroch.",1,0x00FF00;
+ mapannounce "airplane","We are heading to Einbroch.",bc_map,0x00FF00;
end;
OnTimer95000:
- mapannounce "airplane","We will arrive in Einbroch shortly.",1,0x00FF00;
+ mapannounce "airplane","We will arrive in Einbroch shortly.",bc_map,0x00FF00;
end;
OnTimer110000:
set $@airplanelocation,1;
@@ -119,10 +120,10 @@ OnTimer110000:
enablenpc "#AirshipWarp-2";
donpcevent "#AirshipWarp-1::OnUnhide";
donpcevent "#AirshipWarp-2::OnUnhide";
- mapannounce "airplane","Welcome to Einbroch. Have a safe trip.",1,0x00FF00;
+ mapannounce "airplane","Welcome to Einbroch. Have a safe trip.",bc_map,0x00FF00;
end;
OnTimer120000:
- mapannounce "airplane","Currently, we are in Einbroch. The Airship will take off shortly.",1,0x00FF00;
+ mapannounce "airplane","Currently, we are in Einbroch. The Airship will take off shortly.",bc_map,0x00FF00;
end;
OnTimer130000:
set $@airplanelocation,0;
@@ -130,13 +131,13 @@ OnTimer130000:
donpcevent "#AirshipWarp-2::OnHide";
disablenpc "#AirshipWarp-1";
disablenpc "#AirshipWarp-2";
- mapannounce "airplane","The Airship is leaving the ground. Our next destination is Lighthalzen.",1,0xFF8600;
+ mapannounce "airplane","The Airship is leaving the ground. Our next destination is Lighthalzen.",bc_map,0xFF8600;
end;
OnTimer145000:
- mapannounce "airplane","We are heading to Lighthalzen.",1,0xFF8600;
+ mapannounce "airplane","We are heading to Lighthalzen.",bc_map,0xFF8600;
end;
OnTimer160000:
- mapannounce "airplane","We will arrive in Lighthalzen shortly.",1,0xFF8600;
+ mapannounce "airplane","We will arrive in Lighthalzen shortly.",bc_map,0xFF8600;
end;
OnTimer175000:
set $@airplanelocation,3;
@@ -144,10 +145,10 @@ OnTimer175000:
enablenpc "#AirshipWarp-2";
donpcevent "#AirshipWarp-1::OnUnhide";
donpcevent "#AirshipWarp-2::OnUnhide";
- mapannounce "airplane","Welcome to Lighthalzen. Have a safe trip.",1,0xFF8600;
+ mapannounce "airplane","Welcome to Lighthalzen. Have a safe trip.",bc_map,0xFF8600;
end;
OnTimer185000:
- mapannounce "airplane","Currently, we are in Lighthalzen. The Airship will leave shortly.",1,0xFF8600;
+ mapannounce "airplane","Currently, we are in Lighthalzen. The Airship will leave shortly.",bc_map,0xFF8600;
end;
OnTimer195000:
set $@airplanelocation,0;
@@ -155,13 +156,13 @@ OnTimer195000:
donpcevent "#AirshipWarp-2::OnHide";
disablenpc "#AirshipWarp-1";
disablenpc "#AirshipWarp-2";
- mapannounce "airplane","The Airship is now taking off. Our next destination is Juno.",1,0x70DBDB;
+ mapannounce "airplane","The Airship is now taking off. Our next destination is Juno.",bc_map,0x70DBDB;
end;
OnTimer210000:
- mapannounce "airplane","We are heading to Juno.",1,0x70DBDB;
+ mapannounce "airplane","We are heading to Juno.",bc_map,0x70DBDB;
end;
OnTimer225000:
- mapannounce "airplane","We will arrive in Juno shortly.",1,0x70DBDB;
+ mapannounce "airplane","We will arrive in Juno shortly.",bc_map,0x70DBDB;
end;
OnTimer240000:
set $@airplanelocation,2;
@@ -169,10 +170,10 @@ OnTimer240000:
enablenpc "#AirshipWarp-2";
donpcevent "#AirshipWarp-1::OnUnhide";
donpcevent "#AirshipWarp-2::OnUnhide";
- mapannounce "airplane","Welcome to Juno. Have a safe trip.",1,0x70DBDB;
+ mapannounce "airplane","Welcome to Juno. Have a safe trip.",bc_map,0x70DBDB;
end;
OnTimer250000:
- mapannounce "airplane","Currently, we are in Juno. The Airship will leave shortly.",1,0x70DBDB;
+ mapannounce "airplane","Currently, we are in Juno. The Airship will leave shortly.",bc_map,0x70DBDB;
end;
OnTimer260000:
stopnpctimer;
@@ -206,168 +207,73 @@ airplane,100,69,2 script Airship Crew#01::Airship Crew 852,{
close;
}
-airplane,250,59,3 script Airship Staff::AirshipInfo 67,{
+airplane,250,58,2 script Airship Staff#airplane 67,{
+ if (hg_ma1 == 3) {
+ mes "[Airship Staff]";
+ mes "Welcome";
+ mes "to the Airship.";
+ mes "How may I help you?";
+ next;
+ switch(select("Do you have a passenger named Thierry?")) {
+ case 1:
+ break;
+ }
+ mes "[Airship Staff]";
+ mes "I am sorry, but I do not think that we have a passenger by that name.";
+ close;
+ }
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,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.";
+ switch(select("Using the Airship:Captain's Cabin:Facilities:Cancel")) {
+ case 1:
+ 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 "en route and you'll get";
+ mes "another chance to arrive";
+ mes "to your intended destination.";
+ break;
+ case 2:
+ 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.";
+ break;
+ case 3:
+ 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~";
+ break;
+ case 4:
+ mes "[Airship Staff]";
+ mes "Well, I hope you";
+ mes "your flight aboard";
+ mes "our Airships. Thank";
+ mes "you and have a good day.";
+ break;
+ }
close;
-
}
-airplane,80,71,4 script Zerta 834,{
+airplane,80,71,2 script Zerta#01airplane 834,{
mes "[Zerta]";
mes "Oh, hello adventurer.";
mes "I am currently on a";
@@ -377,17 +283,17 @@ airplane,80,71,4 script Zerta 834,{
close;
}
-airplane,65,63,4 script Maelin 714,{
+airplane,65,63,4 script Maelin#01airplane 714,{
mes "[Maelin]";
mes "Um, this Airship is";
mes "to Lutie, isn't it? I've";
- mes "been waiting so long,";
+ mes "waiting so long,";
mes "but I haven't heard any";
mes "broadcast about Lutie.";
close;
}
-airplane,72,34,2 script Aanos 702,{
+airplane,72,34,6 script Aanos#01airplane 702,{
mes "[Aanos]";
mes "Oh wooow~";
mes "The sky looks";
@@ -396,7 +302,456 @@ airplane,72,34,2 script Aanos 702,{
close;
}
-airplane,32,61,4 script Nils::TypingContest 49,{
+airplane,221,158,2 script Pilot#airplane 852,{
+ if (hg_ma1 == 3) {
+ mes "[Pilot]";
+ mes "I wish that I could go drink a cold fresh beer.";
+ mes "Drinking is the goal of my life! Drinking gives me energy!";
+ mes "I am nothing without drinks!";
+ next;
+ mes "[Pilot]";
+ mes "But! Driving under the influence is not good.";
+ mes "But! That makes me want to drink more and more!";
+ emotion e_sob;
+ next;
+ switch(select("Do you know a passenger named Thierry?")) {
+ case 1:
+ break;
+ }
+ mes "[Pilot]";
+ mes "This uniform is";
+ mes "really dapper, but";
+ mes "it's way too thick to";
+ mes "wear around the Airship.";
+ next;
+ mes "[Pilot]";
+ mes "...";
+ mes "......";
+ mes "No one ever really";
+ mes "comes into this room.";
+ mes "And the captain IS a reindeer.^FFFFFF ^000000 I could just strip to my boxers.";
+ next;
+ emotion e_omg;
+ mes "[Pilot]";
+ mes "Wah!? Who is it!";
+ next;
+ mes "- ...He is not listening to you, at all. -";
+ close;
+ }
+ set .@pilot,rand(1,4);
+ if (.@pilot == 1) {
+ mes "[Pilot]";
+ mes "It's been sooo";
+ mes "long since I've";
+ mes "enjoyed a nice, cold";
+ mes "alcoholic brew. But the";
+ mes "job requires me to be as";
+ mes "clear headed as I can!";
+ next;
+ mes "[Pilot]";
+ mes "Always drink responsibly!";
+ mes "Still, I can't remember the";
+ mes "last time I had a real vacation";
+ mes "or even a day off. Yeap, some";
+ mes "booze, some chips, some TV";
+ mes "and serius R&R is in order.";
+ emotion e_sob;
+ }
+ else if (.@pilot == 2) {
+ mes "[Pilot]";
+ mes "Man, the weather";
+ mes "is really nice today.";
+ mes "Bright, open skies make";
+ mes "for some good visibility";
+ mes "and safe, carefree flying.";
+ }
+ else if (.@pilot == 3) {
+ mes "[Pilot]";
+ mes "You know, our captain's a";
+ mes "respectable guy. Him and";
+ mes "his brother are actually well";
+ mes "known in the aircraft industry.";
+ mes "Who knew reindeer made";
+ mes "such good captains?";
+ next;
+ mes "[Pilot]";
+ mes "Just between you";
+ mes "and me, I gotta tell";
+ mes "you, that Santa was onto";
+ mes "something, getting reindeers";
+ mes "and elves to work for him.";
+ mes "The man must be a genius!";
+ }
+ else {
+ mes "[Pilot]";
+ mes "You know, this whole";
+ mes "piloting thing in the air,";
+ mes "it's rather new, you know?";
+ mes "Yeah, they got this Airship";
+ mes "operation in a hurry.";
+ next;
+ emotion e_omg;
+ mes "[Pilot]";
+ mes "Still, they where real";
+ mes "serius, really thought";
+ mes "ahead. I mean, they had us";
+ mes "training while the Airships";
+ mes "were still being invented.";
+ mes "Isn't that freakin' crazy?!";
+ }
+ close;
+}
+
+//============================================================
+//= The Airship System (Izlude -> Juno -> Rachel -> Repeat)
+//============================================================
+
+airplane_01,243,74,4 script #AirshipWarp-3 45,2,2,{
+OnTouch:
+ if($@airplanelocation2 == 1)warp "izlude",202,56;
+ if($@airplanelocation2 == 2)warp "yuno",20,265;
+ if($@airplanelocation2 == 3)warp "ra_fild12",292,204;
+ end;
+
+OnHide:
+ misceffect 16;
+ end;
+OnUnhide:
+ misceffect 215;
+ end;
+}
+
+airplane_01,243,29,4 script #AirshipWarp-4 45,2,2,{
+OnTouch:
+ if($@airplanelocation2 == 1)warp "izlude",202,56;
+ if($@airplanelocation2 == 2)warp "yuno",20,265;
+ if($@airplanelocation2 == 3)warp "ra_fild12",292,204;
+ end;
+
+OnHide:
+ misceffect 16;
+ end;
+OnUnhide:
+ misceffect 215;
+ end;
+}
+
+airplane_01,1,1,0 script YunoIzl_Airship -1,{
+OnInit:
+while(1)
+{
+ disablenpc "Airship#airplane02";
+ initnpctimer;
+ setnpctimer 0;
+ set $@airplanelocation2,0;
+ donpcevent "#AirshipWarp-3::OnHide";
+ donpcevent "#AirshipWarp-4::OnHide";
+ disablenpc "#AirshipWarp-3";
+ disablenpc "#AirshipWarp-4";
+ mapannounce "airplane_01","The Airship is leaving the ground. Our next destination is Izlude.",bc_map,0x00FF00;
+ end;
+OnTimer15000:
+ set $@mobinv, $@mobinv+1;
+ set $@mobrand, rand(1,3);
+ if($@mobinv >= 9 && $@mobrand == 3) {
+ stopnpctimer;
+ enablenpc "Airship#airplane02";
+ donpcevent "Airship#airplane02::OnInvasion";
+ }
+ mapannounce "airplane_01","We are heading to Izlude.",bc_map,0x00FF00;
+ end;
+OnTimer30000:
+ mapannounce "airplane_01","We will arrive in Izlude shortly.",bc_map,0x00FF00;
+ end;
+OnTimer45000:
+ set $@airplanelocation2,1;
+ enablenpc "#AirshipWarp-3";
+ enablenpc "#AirshipWarp-4";
+ donpcevent "#AirshipWarp-3::OnUnhide";
+ donpcevent "#AirshipWarp-4::OnUnhide";
+ mapannounce "airplane_01","Welcome to Izlude. Have a safe trip.",bc_map,0x00FF00;
+ end;
+OnTimer55000:
+ mapannounce "airplane_01","Currently, we are in Izlude. The Airship will leave shortly.",bc_map,0x00FF00;
+ end;
+OnTimer65000:
+ set $@airplanelocation2,0;
+ donpcevent "#AirshipWarp-3::OnHide";
+ donpcevent "#AirshipWarp-4::OnHide";
+ disablenpc "#AirshipWarp-3";
+ disablenpc "#AirshipWarp-4";
+ mapannounce "airplane_01","The Airship is leaving the ground. Our next destination is Juno.",bc_map,0x70DBDB;
+ end;
+OnTimer80000:
+ mapannounce "airplane_01","We are heading to Juno.",bc_map,0x70DBDB;
+ end;
+OnTimer95000:
+ mapannounce "airplane_01","We will arrive in Juno shortly.",bc_map,0x70DBDB;
+ end;
+OnTimer110000:
+ set $@airplanelocation2,2;
+ enablenpc "#AirshipWarp-3";
+ enablenpc "#AirshipWarp-4";
+ donpcevent "#AirshipWarp-3::OnUnhide";
+ donpcevent "#AirshipWarp-4::OnUnhide";
+ mapannounce "airplane_01","Welcome to Juno. Have a safe trip.",bc_map,0x70DBDB;
+ end;
+OnTimer120000:
+ mapannounce "airplane_01","Currently, we are in Juno. The Airship will take off shortly.",bc_map,0x70DBDB;
+ end;
+OnTimer130000:
+ set $@airplanelocation2,0;
+ donpcevent "#AirshipWarp-3::OnHide";
+ donpcevent "#AirshipWarp-4::OnHide";
+ disablenpc "#AirshipWarp-3";
+ disablenpc "#AirshipWarp-4";
+ mapannounce "airplane_01","The Airship is leaving the ground. Our next destination is Rachel.",bc_map,0xFF8600;
+ end;
+OnTimer145000:
+ mapannounce "airplane_01","We are heading to Rachel.",bc_map,0xFF8600;
+ end;
+OnTimer160000:
+ mapannounce "airplane_01","We will arrive in Rachel shortly.",bc_map,0xFF8600;
+ end;
+OnTimer175000:
+ set $@airplanelocation2,3;
+ enablenpc "#AirshipWarp-3";
+ enablenpc "#AirshipWarp-4";
+ donpcevent "#AirshipWarp-3::OnUnhide";
+ donpcevent "#AirshipWarp-4::OnUnhide";
+ mapannounce "airplane_01","Welcome to Rachel. Have a safe trip.",bc_map,0xFF8600;
+ end;
+OnTimer185000:
+ mapannounce "airplane_01","Currently, we are in Rachel. The Airship will leave shortly.",bc_map,0xFF8600;
+ end;
+OnTimer195000:
+ stopnpctimer;
+}
+OnReturn:
+ killmonsterall "airplane_01";
+ set $@mobinv, 0;
+ mapannounce "airplane_01","Monster threat nullfied. The Airship is now returning to normal operation.",bc_map,0x00FF00;
+ startnpctimer;
+ end;
+}
+
+//============================================================
+//= Some normal NPCS (airplane_01)
+//============================================================
+
+airplane_01,240,64,5 duplicate(Exit2) Exit#05 857
+
+airplane_01,247,64,5 duplicate(Exit2) Exit#06 857
+
+airplane_01,240,39,1 duplicate(Exit2) Exit#07 857
+
+airplane_01,247,39,1 duplicate(Exit2) Exit#08 857
+
+airplane_01,100,69,2 duplicate(Airship Crew) Airship Crew#02 852
+
+airplane_01,250,58,2 script Airship Staff#airplane01 67,{
+ mes "[Airship Staff]";
+ mes "Welcome";
+ mes "to the Airship.";
+ mes "How may I help you?";
+ next;
+ switch(select("Using the Airship:Captain's Cabin:Facilities:Cancel")) {
+ case 1:
+ 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 "en route and you'll get";
+ mes "another chance to arrive";
+ mes "to your intended destination.";
+ break;
+ case 2:
+ 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.";
+ break;
+ case 3:
+ 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~";
+ break;
+ case 4:
+ mes "[Airship Staff]";
+ mes "Well, I hope you";
+ mes "your flight aboard";
+ mes "our Airships. Thank";
+ mes "you and have a good day.";
+ break;
+ }
+ close;
+}
+
+
+airplane_01,50,66,5 script Apple Merchant#airplane 86,{
+ if (checkweight(1201,1) == 0) {
+ mes "- Wait a minute !! -";
+ mes "- Currently you're carrying -";
+ mes "- too many items with you. -";
+ mes "- Please try again -";
+ mes "- after you loose some weight. -";
+ close;
+ }
+ mes "[Meltz]";
+ mes "Welcome to Meltz's";
+ mes "Shop where you can";
+ mes "purchase Apples or grind";
+ mes "them to make Apple Juice.";
+ next;
+ switch(select("Buy Apples.:Make Apple Juice.:Cancel.")) {
+ case 1:
+ 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;
+ while(1) {
+ input .@input,0,501;
+ set .@pay,.@input*15;
+ if (.@input == 0) {
+ mes "[Meltz]";
+ mes "Thanks for stopping";
+ mes "by my shop. Farewell!";
+ mes "Come by anytime when";
+ mes "you feel like having an";
+ mes "Apple to snack on~";
+ close;
+ }
+ else if (.@input < 0 && .@input > 500) {
+ mes "[Meltz]";
+ mes "You've entered a number";
+ mes "higher than the maximum";
+ mes "value of 500. Please enter";
+ mes "the number of Apples you";
+ mes "wish to purchase again.";
+ next;
+ }
+ else {
+ mes "[Meltz]";
+ mes "A total of ^FF0000" + .@input + "^000000 Apples";
+ mes "will cost you ^FF0000" + .@pay + "^000000 zeny.";
+ mes "Would you like to continue?";
+ next;
+ if (select("Yes:No") == 1)
+ break;
+ else {
+ mes "[Meltz]";
+ mes "Thanks for stopping";
+ mes "by my shop. Farewell!";
+ mes "Come by anytime when";
+ mes "you feel like having an";
+ mes "Apple to snack on~";
+ close;
+ }
+ }
+ }
+ if (Zeny < .@pay) {
+ mes "[Meltz]";
+ mes "I'm sorry, you don't have";
+ mes "enough money with you.";
+ mes "Please check your funds or";
+ mes "purchase less Apples.";
+ close;
+ }
+ else if (checkweight(512,.@input) == 0) {
+ mes "[Meltz]";
+ mes "Hmm, I don't think you've";
+ mes "got enough room to carry";
+ mes "this many Apples. You might";
+ mes "want to free up your inventory";
+ mes "space.";
+ close;
+ }
+ else {
+ set zeny,zeny-.@pay;
+ getitem 512,.@input; //Apple
+ mes "[Meltz]";
+ mes "Thanks for stopping by";
+ mes "my shop. I hope you enjoy";
+ mes "the flavor of these Apples~!";
+ close;
+ }
+ break;
+ case 2:
+ 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;
+ switch(select("Yes:No")) {
+ case 1:
+ if ((countitem(512) < 3) || (countitem(713) < 1)) {
+ 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;
+ }
+ else {
+ mes "[Meltz]";
+ mes "Thank you, please wait.";
+ next;
+ mes "^3355FF*Grind* *Grind*";
+ mes "*Grind* *Grind*";
+ mes "*Clang...!*^000000";
+ next;
+ delitem 512,3; //Apple
+ delitem 713,1; //Empty_Bottle
+ getitem 531,1; //Apple_Juice
+ mes "[Meltz]";
+ mes "There you go~";
+ mes "Please come again.";
+ close;
+ }
+ break;
+ case 2:
+ mes "[Meltz]";
+ mes "Thanks for stopping";
+ mes "by my shop. Farewell!";
+ mes "Come by anytime when";
+ mes "you feel like having an";
+ mes "Apple to snack on~";
+ close;
+ }
+ break;
+ case 3:
+ mes "[Meltz]";
+ mes "Thanks for stopping";
+ mes "by my shop. Farewell!";
+ mes "Come by anytime when";
+ mes "you feel like having an";
+ mes "Apple to snack on~";
+ break;
+ }
+ close;
+}
+
+airplane_01,32,61,4 script Nils#ein 49,{
callfunc "F_ClearGarbage"; //Clear outdated, unused variables
loopback:
mes "[Nils]";
@@ -574,7 +929,7 @@ s_Record:
}
-airplane_01,221,158,6 script Pilot#air-0::Pilot 852,{
+airplane_01,221,158,2 script Pilot#airplane_01 852,{
set .@pilot, rand(1,4);
if (.@pilot == 1) {
mes "[Pilot]";
@@ -619,7 +974,7 @@ airplane_01,221,158,6 script Pilot#air-0::Pilot 852,{
mes "And the captain IS a reindeer.";
mes "I could just strip to my boxers.";
next;
- //Emotion "Pilot#airplane_01" ET_HUK
+ emotion e_omg;
mes "[Pilot]";
mes "Oh...! Hello there!";
mes "E-e-enjoying your flight?!";
@@ -627,163 +982,9 @@ airplane_01,221,158,6 script Pilot#air-0::Pilot 852,{
close;
}
-//============================================================
-//= The Airship System (Izlude -> Juno -> Rachel -> Repeat)
-//============================================================
-
-airplane_01,243,74,4 script #AirshipWarp-3 45,2,2,{
-OnTouch:
- if($@airplanelocation2 == 1)warp "izlude",202,56;
- if($@airplanelocation2 == 2)warp "yuno",20,265;
- if($@airplanelocation2 == 3)warp "ra_fild12",292,204;
- end;
-
-OnHide:
- misceffect 16;
- end;
-OnUnhide:
- misceffect 215;
- end;
-}
-
-airplane_01,243,29,4 script #AirshipWarp-4 45,2,2,{
-OnTouch:
- if($@airplanelocation2 == 1)warp "izlude",202,56;
- if($@airplanelocation2 == 2)warp "yuno",20,265;
- if($@airplanelocation2 == 3)warp "ra_fild12",292,204;
- end;
-OnHide:
- misceffect 16;
- end;
-OnUnhide:
- misceffect 215;
- end;
-}
-airplane_01,1,1,0 script YunoIzl_Airship -1,{
-OnInit:
-while(1)
-{
- disablenpc "Quest_Izl";
- initnpctimer;
- setnpctimer 0;
- set $@airplanelocation2,0;
- donpcevent "#AirshipWarp-3::OnHide";
- donpcevent "#AirshipWarp-4::OnHide";
- disablenpc "#AirshipWarp-3";
- disablenpc "#AirshipWarp-4";
- mapannounce "airplane_01","The Airship is leaving the ground. Our next destination is Izlude.",1,0x00FF00;
- end;
-OnTimer15000:
- set $@mobinv, $@mobinv+1;
- set $@mobrand, rand(1,3);
- if($@mobinv >= 9 && $@mobrand == 3) {
- stopnpctimer;
- enablenpc "Quest_Izl";
- donpcevent "Quest_Izl::OnInvasion";
- }
- mapannounce "airplane_01","We are heading to Izlude.",1,0x00FF00;
- end;
-OnTimer30000:
- mapannounce "airplane_01","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","Welcome to Izlude. Have a safe trip.",1,0x00FF00;
- end;
-OnTimer55000:
- mapannounce "airplane_01","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","The Airship is leaving the ground. Our next destination is Juno.",1,0x70DBDB;
- end;
-OnTimer80000:
- mapannounce "airplane_01","We are heading to Juno.",1,0x70DBDB;
- end;
-OnTimer95000:
- mapannounce "airplane_01","We will arrive in Juno 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","Welcome to Juno. Have a safe trip.",1,0x70DBDB;
- end;
-OnTimer120000:
- mapannounce "airplane_01","Currently, we are in Juno. The Airship will take off shortly.",1,0x70DBDB;
- end;
-OnTimer130000:
- set $@airplanelocation2,0;
- donpcevent "#AirshipWarp-3::OnHide";
- donpcevent "#AirshipWarp-4::OnHide";
- disablenpc "#AirshipWarp-3";
- disablenpc "#AirshipWarp-4";
- mapannounce "airplane_01","The Airship is leaving the ground. Our next destination is Rachel.",1,0xFF8600;
- end;
-OnTimer145000:
- mapannounce "airplane_01","We are heading to Rachel.",1,0xFF8600;
- end;
-OnTimer160000:
- mapannounce "airplane_01","We will arrive in Rachel shortly.",1,0xFF8600;
- end;
-OnTimer175000:
- set $@airplanelocation2,3;
- enablenpc "#AirshipWarp-3";
- enablenpc "#AirshipWarp-4";
- donpcevent "#AirshipWarp-3::OnUnhide";
- donpcevent "#AirshipWarp-4::OnUnhide";
- mapannounce "airplane_01","Welcome to Rachel. Have a safe trip.",1,0xFF8600;
- end;
-OnTimer185000:
- mapannounce "airplane_01","Currently, we are in Rachel. The Airship will leave shortly.",1,0xFF8600;
- end;
-OnTimer195000:
- stopnpctimer;
-}
-OnReturn:
- killmonsterall "airplane_01";
- set $@mobinv, 0;
- mapannounce "airplane_01","Monster threat nullfied. The Airship is now returning to normal operation.",1,0x00FF00;
- startnpctimer;
- end;
-}
-
-//============================================================
-//= Some normal NPCS (airplane_01)
-//============================================================
-
-airplane_01,240,64,5 duplicate(Exit2) Exit#05 857
-
-airplane_01,247,64,5 duplicate(Exit2) Exit#06 857
-
-airplane_01,240,39,1 duplicate(Exit2) Exit#07 857
-
-airplane_01,247,39,1 duplicate(Exit2) Exit#08 857
-
-airplane_01,100,69,2 duplicate(Airship Crew) Airship Crew#02 852
-
-airplane_01,250,59,3 duplicate(AirshipInfo) Airship Staff#info 67
-
-airplane_01,50,66,4 duplicate(AirshipApples) Meltz 86
-
-airplane_01,32,61,4 duplicate(TypingContest) Nils 49
-
-airplane_01,221,158,6 duplicate(Pilot) Pilot#air-1 852
-
-
-airplane_01,83,61,2 script Dianne 72,{
+airplane_01,83,61,2 script Dianne#01airplane_01 72,2,2,{
mes "[Dianne]";
mes "It's so weird!";
mes "I went to visit the";
@@ -792,17 +993,18 @@ airplane_01,83,61,2 script Dianne 72,{
mes "weird reindeer. Oh!";
mes "Do you think that...";
close;
+
OnTouch:
- Emotion 28, "Dianne";
+ emotion e_sob;
end;
}
-airplane_01,69,63,2 script Old Man#06 55,{
+airplane_01,69,63,2 script Mendel#01airplane_01 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 "*Harrrumph* I really should";
mes "have brought my chef so that";
mes "I could enjoy a real meal.";
close;
@@ -819,7 +1021,7 @@ airplane_01,33,68,4 script Clarice 74,{
end;
}
-airplane_01,71,31,6 script Swordman Shimizu 106,{
+airplane_01,71,31,2 script Swordsman Shimizu#01 106,{
mes "[Swordsman Shimizu]";
mes "Finally, after five";
mes "years of waiting...";
@@ -964,7 +1166,7 @@ y_airport,144,63,4 script Airport Staff#Ein 91,{
mes "have a nice day.";
close;
}
-
+
y_airport,141,63,4 script Airport Staff#Izl 91,{
mes "[Airship Staff]";
mes "Good day!";
@@ -985,13 +1187,15 @@ y_airport,141,63,4 script Airport Staff#Izl 91,{
close;
}
-yuno,14,262,3 script Airship Staff#yuno01::Airship Staff 91,{
+yuno,14,262,5 script Airship Staff#yuno01 91,{
mes "[Airship Staff]";
mes "Welcome to Juno Airport.";
mes "Please use this door to";
mes "board the Airship that will";
mes "be flying all the way to Izlude";
- mes "in the Rune-Midgarts Kingdom.";
+ mes "in the Rune-Midgarts Kingdom,";
+ mes "and to Rachel in the Arunafeltz";
+ mes "Republic.";
next;
mes "[Airship Staff]";
mes "Otherwise, if Juno is";
@@ -1003,7 +1207,23 @@ yuno,14,262,3 script Airship Staff#yuno01::Airship Staff 91,{
close;
}
-yuno,88,263,5 duplicate(Airship Staff) Airship Staff#yuno02 91
+yuno,88,263,3 script Airship Staff#yuno02 91,{
+ mes "[Airship Staff]";
+ mes "Welcome to Juno Airport.";
+ mes "Please use this door to";
+ mes "board the Airship which stops";
+ mes "over Einbroch, Lighthalzen and";
+ mes "Hugel in the Schwaltzvalt Republic.";
+ next;
+ mes "[Airship Staff]";
+ mes "Otherwise, if Juno is";
+ mes "your intended destination,";
+ mes "please head down the stairs";
+ mes "and ask the Arrival Staff to lead";
+ mes "you to the main terminal. Thank";
+ mes "you, and enjoy your travels.";
+ close;
+}
//============================================================
//= Apple Gambling Function