diff options
Diffstat (limited to 'npc/quests/quests_comodo.txt')
-rw-r--r-- | npc/quests/quests_comodo.txt | 554 |
1 files changed, 277 insertions, 277 deletions
diff --git a/npc/quests/quests_comodo.txt b/npc/quests/quests_comodo.txt index 79e8ebe97..37e8d8d01 100644 --- a/npc/quests/quests_comodo.txt +++ b/npc/quests/quests_comodo.txt @@ -1,277 +1,277 @@ -//===== eAthena Script =======================================
-//= Item Quest NPCs located in Comodo
-//===== By: ==================================================
-//= kobra_k88
-//===== Current Version: =====================================
-//= 1.0
-//===== Compatible With: =====================================
-//= eAthena 7.15 +
-//===== Description: =========================================
-//= 'Cross Hat', 'Bulb Hairband', 'Striped Hairband', 'Blue Hairband' Quests.
-//= 'Mine Helmet', 'Parcel Hat', 'Money Loser's Grief',
-//= 'Phantom of the Opera Mask' Quests.
-//===== Additional Comments: =================================
-//= Fully working
-//============================================================
-
-
-
-//============================================================================================//
-// Hair Ornament Girl
-//============================================================================================//
-// Cross Hat, Bulb Hairband, Striped Hairband, Blue Hairband
-//==================================================
-comodo.gat,227,158,4 script Hair Ornament Girl 700,
-{
- mes "[Hair Ornament Girl]";
- if(sex==1)mes "Oh, hi. Do you need to buy a present for a friend, your mother, or maybe your girl friend? Then get her a Hair Band! It's the best gift you can get her.";
- if(sex==0)mes "Oh, hi. Do you need to buy a present for a friend, your mother, or maybe yourself? Then get a Hair Band! It's the best gift you can give, or get.";
- next;
- mes "[Hair Ornament Girl]";
- mes "Just by bringing me a few simple items, I can make you a gorgeous Hair Band! Here, take a look at these....";
-M_Menu:
- next;
- menu "-Crosss Hat Hairband",M_Cross, "-Bulb Hairband",M_Bulb, "-Striped Hairband",M_Striped, "-Blue Hairband",M_Blue, "-End Conversation",M_End;
-
- M_Cross:
- set @BAND$, "Cross Hat Hairband";
- set @ITEMS$, " ^5555FF1 Rosary^000000 and ^5555FF500 Destroyed Armors^000000.";
- if (countitem(2608)>=1 && countitem(7069)>=500) set @GETBAND, 1;
- goto sL_0;
-
- M_Bulb:
- set @BAND$, "Bulb Hairband";
- set @ITEMS$, "^5555FF1 Slotted Circlet^000000 and ^5555FF20 Glass Beads^000000.";
- if (countitem(2233)>=1 && countitem(746)>=20) set @GETBAND, 2;
- goto sL_0;
-
- M_Striped:
- set @BAND$, "Striped Hairband";
- set @ITEMS$, "^5555FF1500 Worn-out Prison Uniforms^000000.";
- if (countitem(1099)>=1500) set @GETBAND, 3;
- goto sL_0;
-
- M_Blue:
- set @BAND$, "Blue Hairband";
- set @ITEMS$, "^5555FF1 Bandana^000000, ^5555FF1 Cobaltblue Dyestuffs^000000, and ^5555FF300 Anolian Skins^000000.";
- if (countitem(2211)>=1 && countitem(978)>=1 && countitem(7003)>=300) set @GETBAND, 4;
-
- sL_0:
- mes "[Hair Ornament Girl]";
- mes "So you're interested in the "+@BAND$+" huh? Here are the items you'll need for the "+@BAND$+":";
- mes @ITEMS$;
- next;
- if (@GETBAND > 0) goto sL_GetBand;
-
- mes "[Hair Ornament Girl]";
- mes "Bring me all of these items and I will be able to make you a "+@BAND$+".";
- goto M_Menu;
-
- sL_GetBand:
- mes "[Hair Ornament Girl]";
- mes "I see that you have enough items for a "+@BAND$+". Would you like me to make you one?";
- next;
- menu "Yes, I would.",sM_Yes, "No thank you.",M_End;
-
- sM_Yes:
- if (@GETBAND == 1) goto ssL_Cross;
- if (@GETBAND == 2) goto ssL_Bulb;
- if (@GETBAND == 3) goto ssL_Striped;
- if (@GETBAND == 4) goto ssL_Blue;
-
- ssL_Cross:
- delitem 2608,1;
- delitem 7069,500;
- getitem 5036,1;
- goto ssL_End;
- ssL_Bulb:
- delitem 2233,1;
- delitem 746,20;
- getitem 5034,1;
- goto ssL_End;
- ssL_Striped:
- delitem 1099,1500;
- getitem 5049,1;
- goto ssL_End;
- ssL_Blue:
- delitem 2211,1;
- delitem 978,1;
- delitem 7003,300;
- getitem 5052,1;
- ssL_End:
- mes "[Hair Ornament Girl]";
- mes "Here is your "+@BAND$+". Thank you.";
- set @GETBAND, 0;
- close;
-
- M_End:
- mes "[Hair Ornament Girl]";
- mes "Hope to see you again soon.";
- close;
-
-}
-
-
-//===================================================================================================//
-// Mari Isac
-//===================================================================================================//
-// 'Mine Helmet', 'Parcel Hat', 'Money Loser's Grief', 'Phantom of the Opera Mask'
-//===============================================================//
-comodo.gat,274,137,5 script Mari Isac 702,
-{
- mes "[Mari Isac]";
- mes "I travel all over the world and get to hear many interesting stories from the people I meet.";
- mes "Sometimes they even teach me how to make special items";
- next;
- mes "[Mari Isac]";
- mes "Would you be interested in some of the items I've learned to make?";
-M_Menu:
- next;
- menu "Tell me about them.",M_0, "Make me one.",M_1;
-
- M_0:
- menu "-Mine Helmet",sM_Mine, "-Parcel Hat",sM_Parcel, "-Money Loser's Grief",sM_Money, "-Phantom of the Opera Mask",sM_Phantom;
-
- sM_Mine:
- mes "[Mari Isac]";
- mes "I learned how to make the Mine Helmet when I traveled to the old coal mines near Geffen.";
- next;
- mes "[Mari Isac]";
- mes "The 2 most important things a miner needs are light, and head protection.";
- mes "A very inventive miner was able to create something that dealt with both issues.";
- next;
- mes "[Mari Isac]";
- mes "He attached a light to his safety helmet and called it a Mine Helmet.";
- mes "This meant that miners no longer had to worry about carrying around lamps and could work more efficiently.";
- next;
- mes "[Mari Isac]";
- mes "Anyways, if you want me to make you a Mine Helmet you'll need to bring me these items:";
- mes "^5555FF1 Safety Helmet^000000,";
- mes "^5555FF1 Candle^000000,";
- mes "^5555FF1 Crystal Mirror^000000,";
- mes "^5555FF25 Steel^000000.";
- next;
- goto M_0;
- sM_Parcel:
- mes "[Mari Isac]";
- mes "I learned how to make the Parcel Hat when I traveled to Alberta. There they have a unique way of distributing mail and goods.";
- next;
- mes "[Mari Isac]";
- mes "Instead of using a pouch or a sack to carry items for delivery, they use a special kind of hat, called a Parcel Hat.";
- mes "This hat allows the delivery personel to carry numerous items on their heads. Of course they have to have good balance to use it.";
- next;
- mes "[Mari Isac]";
- mes "Anyways, if you want me to make you a Parcel Hat, you'll need to bring me these items.";
- mes "^5555FF150 Fabric^000000,";
- mes "^5555FF100 Resin^000000,";
- mes "^5555FF1 Cobaltblue Dyestuffs^000000.";
- next;
- goto M_0;
- sM_Money:
- mes "[Mari Isac]";
- mes "I learned how to make the Money Loser's Grief when I traveled to Morroc.";
- next;
- mes "[Mari Isac]";
- mes "A long time ago an honest merchant got into a conflict with a crooked guild.";
- mes "Unlike the dirty guild, the merchant did not scam or cheat people.";
- next;
- mes "[Mari Isac]";
- mes "Because of this they attacked the merchants shop and took all of his goods.";
- next;
- mes "[Mari Isac]";
- mes "The merchant was devastated by the loss of his shop.";
- mes "In his sadness he used the bits and pieces that were left from his shop to create a new item.";
- next;
- mes "[Mari Isac]";
- mes "He created the Money Loser's Grief, a symbol of his great sadness. When people see it, they can't help but feel sympathetic to the wearer.";
- next;
- mes "[Mari Isac]";
- mes "Many merchants now wear it to help themselves get more business. Of course it is also a reminder of the honest merchants sad tale.";
- next;
- mes "[Mari Isac]";
- mes "Anyways, if you want me to make you a Money Losers Grief, you'll need to bring me these items.";
- mes "^5555FF1 Circlet with a single slott^000000,";
- mes "^5555FF1 Gold^000000,";
- mes "^5555FF20 Steel^000000,";
- mes "^5555FF80 Feathers^000000,";
- mes "^5555FF800 Sticky Mucus^000000.";
- next;
- goto M_0;
- sM_Phantom:
- mes "[Mari Isac]";
- mes "I learned how to make the Phantom of the Opera Mask when I traveled to Al De Baran.";
- mes "The story behind this item is that of a man's pure love........";
- next;
- mes "[Mari Isac]";
- mes "There once was a man who was in love with a beautiful opera singer.";
- mes "Unfortunately the man had a terribly disfigured face which forced to him to wear a mask.";
- next;
- mes "[Mari Isac]";
- mes "He was ashamed of his appearance and could never bring himself to face the singer.";
- mes "The man instead, watched her from a far, admiring every nuance of her beauty and grace.";
- next;
- mes "[Mari Isac]";
- mes "He lurked in the bowles of the opera house and from time to time he would sing his sad love song.";
- mes "Many people heard it and believed that there was a phantom haunting the opera house.";
- next;
- mes "[Mari Isac]";
- mes "The singer also heard his song, and through it she was able to feel his pain and his love for her.";
- mes "The two eventually met, and when they did she was able to look past his appereance and accept him for who he was.";
- next;
- mes "[Mari Isac]";
- mes "Too this day, the tale of the masked 'phantom' is still romantacised.";
- next;
- mes "[Mari Isac]";
- mes "Anyways, if you want me to make you a Phantom of the Opera Mask, you'll need to bring me these items.";
- mes "^5555FF1 Opera Masque^000000,";
- mes "^5555FF50 Horrendous Hairs^000000.";
- goto M_0;
-
- M_1:
- menu "-Mine Helmet",sM_MakeMine, "-Parcel Hat",sM_MakePar, "-Money Loser's Grief",sM_MakeMon, "-Phantom of the Opera Mask",sM_MakePhan;
-
- sM_MakeMine:
- if (countitem(5009)<1 || countitem(5028)<1 || countitem(747)<1 || countitem(999)<25) goto ssL_NoItems;
- mes "[Mari Isac]";
- mes "Here you go. Enjoy your Mine Helmet!";
- delitem 5009, 1;
- delitem 5028, 1;
- delitem 747, 1;
- delitem 999, 25;
- getitem 5031,1;
- close;
- sM_MakePar:
- if (countitem(1059)<150 || countitem(907)<100 || countitem(978)<1) goto ssL_NoItems;
- mes "[Mari Isac]";
- mes "Here you go. Enjoy your Parcel Hat!";
- delitem 1059, 150;
- delitem 907, 100;
- delitem 978, 1;
- getitem 5023,1;
- close;
- sM_MakeMon:
- if (countitem(2233)<1 || countitem(969)<1 || countitem(999)<20 || countitem(949)<80 || countitem(938)<800) goto ssL_NoItems;
- mes "[Mari Isac]";
- mes "Here you go. Enjoy your Money Loser's Grief!";
- delitem 2233, 1;
- delitem 969, 1;
- delitem 999, 20;
- delitem 949, 80;
- delitem 938, 800;
- getitem 5021,1;
- close;
- sM_MakePhan:
- if (countitem(2281)<1 || countitem(1048)<50) goto ssL_NoItems;
- mes "[Mari Isac]";
- mes "Here you go. Enjoy your Phantom of the Opera Mask!";
- delitem 2281,1;
- delitem 1048, 50;
- getitem 5043, 1;
- close;
-
- ssL_NoItems:
- mes "[Mari Isac]";
- mes "You don't seem to have enough items for me to make that hat. Please come back when you do.";
- close;
-
-}
+//===== eAthena Script ======================================= +//= Item Quest NPCs located in Comodo +//===== By: ================================================== +//= kobra_k88 +//===== Current Version: ===================================== +//= 1.0 +//===== Compatible With: ===================================== +//= eAthena 7.15 + +//===== Description: ========================================= +//= 'Cross Hat', 'Bulb Hairband', 'Striped Hairband', 'Blue Hairband' Quests. +//= 'Mine Helmet', 'Parcel Hat', 'Money Loser's Grief', +//= 'Phantom of the Opera Mask' Quests. +//===== Additional Comments: ================================= +//= Fully working +//============================================================ + + + +//============================================================================================// +// Hair Ornament Girl +//============================================================================================// +// Cross Hat, Bulb Hairband, Striped Hairband, Blue Hairband +//================================================== +comodo.gat,227,158,4 script Hair Ornament Girl 700, +{ + mes "[Hair Ornament Girl]"; + if(sex==1)mes "Oh, hi. Do you need to buy a present for a friend, your mother, or maybe your girl friend? Then get her a Hair Band! It's the best gift you can get her."; + if(sex==0)mes "Oh, hi. Do you need to buy a present for a friend, your mother, or maybe yourself? Then get a Hair Band! It's the best gift you can give, or get."; + next; + mes "[Hair Ornament Girl]"; + mes "Just by bringing me a few simple items, I can make you a gorgeous Hair Band! Here, take a look at these...."; +M_Menu: + next; + menu "-Crosss Hat Hairband",M_Cross, "-Bulb Hairband",M_Bulb, "-Striped Hairband",M_Striped, "-Blue Hairband",M_Blue, "-End Conversation",M_End; + + M_Cross: + set @BAND$, "Cross Hat Hairband"; + set @ITEMS$, " ^5555FF1 Rosary^000000 and ^5555FF500 Destroyed Armors^000000."; + if (countitem(2608)>=1 && countitem(7069)>=500) set @GETBAND, 1; + goto sL_0; + + M_Bulb: + set @BAND$, "Bulb Hairband"; + set @ITEMS$, "^5555FF1 Slotted Circlet^000000 and ^5555FF20 Glass Beads^000000."; + if (countitem(2233)>=1 && countitem(746)>=20) set @GETBAND, 2; + goto sL_0; + + M_Striped: + set @BAND$, "Striped Hairband"; + set @ITEMS$, "^5555FF1500 Worn-out Prison Uniforms^000000."; + if (countitem(1099)>=1500) set @GETBAND, 3; + goto sL_0; + + M_Blue: + set @BAND$, "Blue Hairband"; + set @ITEMS$, "^5555FF1 Bandana^000000, ^5555FF1 Cobaltblue Dyestuffs^000000, and ^5555FF300 Anolian Skins^000000."; + if (countitem(2211)>=1 && countitem(978)>=1 && countitem(7003)>=300) set @GETBAND, 4; + + sL_0: + mes "[Hair Ornament Girl]"; + mes "So you're interested in the "+@BAND$+" huh? Here are the items you'll need for the "+@BAND$+":"; + mes @ITEMS$; + next; + if (@GETBAND > 0) goto sL_GetBand; + + mes "[Hair Ornament Girl]"; + mes "Bring me all of these items and I will be able to make you a "+@BAND$+"."; + goto M_Menu; + + sL_GetBand: + mes "[Hair Ornament Girl]"; + mes "I see that you have enough items for a "+@BAND$+". Would you like me to make you one?"; + next; + menu "Yes, I would.",sM_Yes, "No thank you.",M_End; + + sM_Yes: + if (@GETBAND == 1) goto ssL_Cross; + if (@GETBAND == 2) goto ssL_Bulb; + if (@GETBAND == 3) goto ssL_Striped; + if (@GETBAND == 4) goto ssL_Blue; + + ssL_Cross: + delitem 2608,1; + delitem 7069,500; + getitem 5036,1; + goto ssL_End; + ssL_Bulb: + delitem 2233,1; + delitem 746,20; + getitem 5034,1; + goto ssL_End; + ssL_Striped: + delitem 1099,1500; + getitem 5049,1; + goto ssL_End; + ssL_Blue: + delitem 2211,1; + delitem 978,1; + delitem 7003,300; + getitem 5052,1; + ssL_End: + mes "[Hair Ornament Girl]"; + mes "Here is your "+@BAND$+". Thank you."; + set @GETBAND, 0; + close; + + M_End: + mes "[Hair Ornament Girl]"; + mes "Hope to see you again soon."; + close; + +} + + +//===================================================================================================// +// Mari Isac +//===================================================================================================// +// 'Mine Helmet', 'Parcel Hat', 'Money Loser's Grief', 'Phantom of the Opera Mask' +//===============================================================// +comodo.gat,274,137,5 script Mari Isac 702, +{ + mes "[Mari Isac]"; + mes "I travel all over the world and get to hear many interesting stories from the people I meet."; + mes "Sometimes they even teach me how to make special items"; + next; + mes "[Mari Isac]"; + mes "Would you be interested in some of the items I've learned to make?"; +M_Menu: + next; + menu "Tell me about them.",M_0, "Make me one.",M_1; + + M_0: + menu "-Mine Helmet",sM_Mine, "-Parcel Hat",sM_Parcel, "-Money Loser's Grief",sM_Money, "-Phantom of the Opera Mask",sM_Phantom; + + sM_Mine: + mes "[Mari Isac]"; + mes "I learned how to make the Mine Helmet when I traveled to the old coal mines near Geffen."; + next; + mes "[Mari Isac]"; + mes "The 2 most important things a miner needs are light, and head protection."; + mes "A very inventive miner was able to create something that dealt with both issues."; + next; + mes "[Mari Isac]"; + mes "He attached a light to his safety helmet and called it a Mine Helmet."; + mes "This meant that miners no longer had to worry about carrying around lamps and could work more efficiently."; + next; + mes "[Mari Isac]"; + mes "Anyways, if you want me to make you a Mine Helmet you'll need to bring me these items:"; + mes "^5555FF1 Safety Helmet^000000,"; + mes "^5555FF1 Candle^000000,"; + mes "^5555FF1 Crystal Mirror^000000,"; + mes "^5555FF25 Steel^000000."; + next; + goto M_0; + sM_Parcel: + mes "[Mari Isac]"; + mes "I learned how to make the Parcel Hat when I traveled to Alberta. There they have a unique way of distributing mail and goods."; + next; + mes "[Mari Isac]"; + mes "Instead of using a pouch or a sack to carry items for delivery, they use a special kind of hat, called a Parcel Hat."; + mes "This hat allows the delivery personel to carry numerous items on their heads. Of course they have to have good balance to use it."; + next; + mes "[Mari Isac]"; + mes "Anyways, if you want me to make you a Parcel Hat, you'll need to bring me these items."; + mes "^5555FF150 Fabric^000000,"; + mes "^5555FF100 Resin^000000,"; + mes "^5555FF1 Cobaltblue Dyestuffs^000000."; + next; + goto M_0; + sM_Money: + mes "[Mari Isac]"; + mes "I learned how to make the Money Loser's Grief when I traveled to Morroc."; + next; + mes "[Mari Isac]"; + mes "A long time ago an honest merchant got into a conflict with a crooked guild."; + mes "Unlike the dirty guild, the merchant did not scam or cheat people."; + next; + mes "[Mari Isac]"; + mes "Because of this they attacked the merchants shop and took all of his goods."; + next; + mes "[Mari Isac]"; + mes "The merchant was devastated by the loss of his shop."; + mes "In his sadness he used the bits and pieces that were left from his shop to create a new item."; + next; + mes "[Mari Isac]"; + mes "He created the Money Loser's Grief, a symbol of his great sadness. When people see it, they can't help but feel sympathetic to the wearer."; + next; + mes "[Mari Isac]"; + mes "Many merchants now wear it to help themselves get more business. Of course it is also a reminder of the honest merchants sad tale."; + next; + mes "[Mari Isac]"; + mes "Anyways, if you want me to make you a Money Losers Grief, you'll need to bring me these items."; + mes "^5555FF1 Circlet with a single slott^000000,"; + mes "^5555FF1 Gold^000000,"; + mes "^5555FF20 Steel^000000,"; + mes "^5555FF80 Feathers^000000,"; + mes "^5555FF800 Sticky Mucus^000000."; + next; + goto M_0; + sM_Phantom: + mes "[Mari Isac]"; + mes "I learned how to make the Phantom of the Opera Mask when I traveled to Al De Baran."; + mes "The story behind this item is that of a man's pure love........"; + next; + mes "[Mari Isac]"; + mes "There once was a man who was in love with a beautiful opera singer."; + mes "Unfortunately the man had a terribly disfigured face which forced to him to wear a mask."; + next; + mes "[Mari Isac]"; + mes "He was ashamed of his appearance and could never bring himself to face the singer."; + mes "The man instead, watched her from a far, admiring every nuance of her beauty and grace."; + next; + mes "[Mari Isac]"; + mes "He lurked in the bowles of the opera house and from time to time he would sing his sad love song."; + mes "Many people heard it and believed that there was a phantom haunting the opera house."; + next; + mes "[Mari Isac]"; + mes "The singer also heard his song, and through it she was able to feel his pain and his love for her."; + mes "The two eventually met, and when they did she was able to look past his appereance and accept him for who he was."; + next; + mes "[Mari Isac]"; + mes "Too this day, the tale of the masked 'phantom' is still romantacised."; + next; + mes "[Mari Isac]"; + mes "Anyways, if you want me to make you a Phantom of the Opera Mask, you'll need to bring me these items."; + mes "^5555FF1 Opera Masque^000000,"; + mes "^5555FF50 Horrendous Hairs^000000."; + goto M_0; + + M_1: + menu "-Mine Helmet",sM_MakeMine, "-Parcel Hat",sM_MakePar, "-Money Loser's Grief",sM_MakeMon, "-Phantom of the Opera Mask",sM_MakePhan; + + sM_MakeMine: + if (countitem(5009)<1 || countitem(5028)<1 || countitem(747)<1 || countitem(999)<25) goto ssL_NoItems; + mes "[Mari Isac]"; + mes "Here you go. Enjoy your Mine Helmet!"; + delitem 5009, 1; + delitem 5028, 1; + delitem 747, 1; + delitem 999, 25; + getitem 5031,1; + close; + sM_MakePar: + if (countitem(1059)<150 || countitem(907)<100 || countitem(978)<1) goto ssL_NoItems; + mes "[Mari Isac]"; + mes "Here you go. Enjoy your Parcel Hat!"; + delitem 1059, 150; + delitem 907, 100; + delitem 978, 1; + getitem 5023,1; + close; + sM_MakeMon: + if (countitem(2233)<1 || countitem(969)<1 || countitem(999)<20 || countitem(949)<80 || countitem(938)<800) goto ssL_NoItems; + mes "[Mari Isac]"; + mes "Here you go. Enjoy your Money Loser's Grief!"; + delitem 2233, 1; + delitem 969, 1; + delitem 999, 20; + delitem 949, 80; + delitem 938, 800; + getitem 5021,1; + close; + sM_MakePhan: + if (countitem(2281)<1 || countitem(1048)<50) goto ssL_NoItems; + mes "[Mari Isac]"; + mes "Here you go. Enjoy your Phantom of the Opera Mask!"; + delitem 2281,1; + delitem 1048, 50; + getitem 5043, 1; + close; + + ssL_NoItems: + mes "[Mari Isac]"; + mes "You don't seem to have enough items for me to make that hat. Please come back when you do."; + close; + +} |