From e99cbac3f1d0354566da5887ab4f01c6737dd0de Mon Sep 17 00:00:00 2001 From: dastgirpojee Date: Sun, 11 Jan 2015 10:13:06 +0530 Subject: Added Complete Eclage NPCs,Quests and Instances --- npc/re/merchants/coin_exchange.txt | 549 ++++++++++++++++++++----------------- 1 file changed, 296 insertions(+), 253 deletions(-) (limited to 'npc/re/merchants') diff --git a/npc/re/merchants/coin_exchange.txt b/npc/re/merchants/coin_exchange.txt index 4d69e2a61..5c3c69005 100644 --- a/npc/re/merchants/coin_exchange.txt +++ b/npc/re/merchants/coin_exchange.txt @@ -3,7 +3,7 @@ //===== By: ================================================== //= Hercules Dev Team //===== Current Version: ===================================== -//= 1.2 +//= 1.2a //===== Description: ========================================= //= [Official Conversion] //= Renewal coin redemption NPCs. @@ -11,6 +11,7 @@ //= 1.0 First version. [Euphy/Lemongrass] //= 1.1 Added remaining Malangdo traders. [Euphy/Lemongrass] //= 1.2 Added Eclage traders (not fully complete). [Euphy] +//= 1.2a Completed Eclage Traders. [Dastgir] //============================================================ // Malangdo @@ -827,209 +828,270 @@ malangdo,150,135,5 script Roving Merchant 4_M_MERCAT1,{ // Eclage //============================================================ -ecl_in01,66,95,2 script Armor Merchant Naphara 4_F_FAIRYKID,{ +ecl_in01,66,95,3 script Armor Merchant Naphara#e 4_F_FAIRYKID,{ + if (!checkweight(Axe,3)) { + mes "- Stop Here!! -"; + mes "- You have too many items. -"; + mes "- You cannot carry any more items. -"; + mes "- Lighten your load and -"; + mes "- try again. -"; + close; + } mes "[Armor Merchant]"; mes "Hello, this is Naphara's store, a place of high class goods."; mes "What would you need?"; next; - .@i = select("Str Glove:Int Glove:Agi Glove:Vit Glove:Dex Glove:Luk Glove"); + .@choice = select("Str Glove:Int Glove:Agi Glove:Vit Glove:Dex Glove:Luk Glove"); + .@choice -= 1; mes "[Armor Merchant]"; - switch(.@i) { - case 1: // Str Glove - mes "^3131FFStr Glove^000000"; - mes "^3131FFMHP + 100, MSP + 20^000000"; - mes "^3131FFATK+1 increases for every STR+10^000000"; - mes "^3131FFATK +1% added above STR 110^000000"; - .@item = 2917; //Str_Glove - break; - case 2: - mes "^3131FFInt Glove^000000"; - mes "^3131FFMHP + 100, MSP + 20^000000"; - mes "^3131FFMATK+1 increases for every INT+10^000000"; - mes "^3131FFMATK +1% added above INT 110^000000"; - .@item = 2918; //Int_Glove - break; - case 3: - mes "^3131FFAgi Glove^000000"; - mes "^3131FFMHP + 100, MSP + 20^000000"; - mes "^3131FFFLEE+1 increases for every AGI+10^000000"; - mes "^3131FFComplete Flee +1 added above AGI 110^000000"; - .@item = 2919; //Agi_Glove - break; - case 4: - mes "^3131FFVit Glove^000000"; - mes "^3131FFMHP + 100, MSP + 20^000000"; - mes "^3131FFMHP+50 for every VIT+10^000000"; - mes "^3131FFMHP+1% added above VIT 110^000000"; - .@item = 2920; //Vit_Glove - break; - case 5: - mes "^3131FFDex Glove^000000"; - mes "^3131FFMHP + 100, MSP + 20^000000"; - mes "^3131FFHIT+1 increases for every DEX+10^000000"; - mes "^3131FFRanged attack power +1% added above DEX 110^000000"; - .@item = 2921; //Dex_Glove - break; - case 6: - mes "^3131FFLuk Glove^000000"; - mes "^3131FFMHP + 100, MSP + 20^000000"; - mes "^3131FFCRI+1 increases for every LUK+10^000000"; - mes "^3131FFCritical damage +1% added above LUK 110^000000"; - .@item = 2922; //Luk_Glove - break; - } + mes "^3131FF" + .name$[.@choice] + " For ^000000,"; + mes "^3131FFMHP + 100, MSP + 20^000000"; + mes "^3131FF" + .descript$[.@choice] + "^000000"; + mes "^3131FF" + .descript2$[.@choice] + "^000000"; mes "^3131FFRequired Level: 100^000000"; - mes "^3131FFSlot: 0^000000"; - mes "^3131FFWeight: 10^000000"; + mes "^3131FFSlot:0^000000"; + mes "^3131FFWeight:10^000000"; mes "are the characteristic options."; next; mes "[Armor Merchant]"; mes "It costs 10 Splendide Coins."; mes "Would you like to buy it?"; next; - if(select("Buy it.:Don't buy it.") == 2) - close; - if (countitem(6081) < 10) { + if (select("Buy it.:Don't buy it.")==1) { + if (countitem(Splendide_Coin) < 10) { + mes "[Armor Merchant]"; + mes "It seems like you don't have enough coins."; + close; + } + delitem Splendide_Coin,10; //Splendide_Coin + getitem (.@choice+2917),1; mes "[Armor Merchant]"; - mes "It seems like you don't have enough coins."; - close; + mes "Great, it's yours. Thank you."; } - mes "[Armor Merchant]"; - mes "Here you go!"; //custom - delitem 6081,10; //Splendide_Coin - getitem .@item,1; close; + +OnInit: + setarray .name$[0],"Str Glove","Int Glove","Agi Glove","Vit Glove","Dex Glove","Luk Glove"; + setarray .descript$[0],"ATK+1 increases for every STR+10", + "MATK+1 increases for every INT+10", + "FLEE+1 increases for every AGI+10", + "MHP+50 for every VIT+10", + "HIT+1 increases for every DEX+10", + "CRI+1 increases for every LUK+10"; + setarray .descript2$[0],"ATK +1% added above STR 110", + "MATK +1% added above INT 110", + "Complete Flee +1 added above AGI 110", + "MHP+1 added above VIT 110", + "Ranged attack power +1% added above DEX 110", + "Critical damage +1% added above LUK 110"; + end; } -ecl_in01,64,97,4 script Slot Expert Nattuer#ecl 4_F_FAIRYKID,{ +ecl_in01,64,97,5 script Slot Expert Nattuer#ecl 4_F_FAIRYKID,{ + disable_items; mes "[Slot Expert]"; mes "I am Slot Expert Nattuer."; mes "If you bring me an item from my little brother Naphara along with 5 Splendide Coins, I will open up one Slot for you."; next; - if(select("Activate a Slot.:Forget it.") == 2) + if (select("Activate a Slot.:Forget it.")==2){ close; + } mes "[Slot Expert]"; mes "Slot activation is an extremely difficult procedure that can fail even with heightened care and the use of a magnifying lens."; next; mes "[Slot Expert]"; mes "Of course, if your heart were as big as that flower-filled land, you wouldn't mind. Right? Should I go for it?"; next; - if(select("Continue.:Forget it.") == 2) + if (select("Continue.:Forget it.")==2) { close; + } mes "[Slot Expert]"; mes "Which item would you like to activate with a Slot?"; next; - setarray .@noslots[0],2917,2918,2919,2920,2921,2922; - setarray .@slotted[0],2923,2924,2925,2926,2927,2928; - .@i = select("Str Glove:Int Glove:Ag Glove:Vit Glove:Dex Glove:Luk Glove")-1; - .@item = .@noslots[.@i]; - .@new_item = .@slotted[.@i]; + .@choice = select("Str Glove:Int Glove:Ag Glove:Vit Glove:Dex Glove:Luk Glove"); + .@choice += 2916; mes "[Slot Expert]"; - mes "Let's confirm for the last time. Is the one you want "+getitemname(.@item)+"?"; + mes "Let's confirm for the last time. Is the one you want " + getitemname(.@choice) + "?"; next; - if(select("Yes:No") == 2) { + if (select("Yes:No")==2) { mes "[Slot Expert]"; mes "Why don't you talk to me when you know for sure."; close; } - if (countitem(.@item) == 0) { + if (countitem(.@choice) < 1) { mes "[Slot Expert]"; mes "You don't have that item. Why don't you talk to me when you know for sure."; close; } - if (countitem(6081) < 5) { + if (countitem(Splendide_Coin) < 5) { mes "[Slot Expert]"; - mes "You don't have enough coins. Why don't you talk to me when you know for sure."; //custom + mes "You don't have enough coins. Why don't you talk to me when you know for sure."; close; } - delitem 6081,5; //Splendide_Coin - delitem .@item,1; - //custom to the end - if (rand(100) < 5) { - mes "[Slot Expert]"; - mes "Oh no, it failed! I'm sorry, but I warned you this could happen. Better luck next time."; + progressbar "0xFFFF00",3; + mes "[Slot Expert]"; + delitem Splendide_Coin,5; //Splendide_Coin + .@luckyday = rand(1,99); + if ( .@luckyday%20 ){ + emotion e_dots; + delitem .@choice,1; + mes "Shoot, I'm sorry. It failed."; + mes "But I'm sure it will work next time. I have a feeling."; close; } - mes "[Slot Expert]"; - mes "Success! I've activated the slot."; - getitem .@new_item,1; + emotion e_no1; + delitem .@choice,1; + getitem (.@choice+6),1; + mes "My eyes feel like they're gonna pop out."; + mes "Nonetheless, congratulations. Slot activation was successful."; close; } -ecl_in01,67,39,4 script Replication Expert Palt 4_M_FAIRYKID4,{ +ecl_in01,33,98,5 script Armor Merchant Naphara#ec 4_M_FAIRYKID2,{ + if (checkweight(Axe,1)==0) { + mes "- Stop Here!! -"; + mes "- You have too many items. -"; + mes "- You cannot carry any more items. -"; + mes "- Lighten your load and -"; + mes "- try again. -"; + close; + } + mes "[Herb Merchant]"; + mes "Welcome, this is Plafina's Herb Store where only the freshest herbs are provided~!"; + next; + .@item = select("Snow Flip:Peony Mommy:Slapping Herb:Yggdrasil Dust:End conversation")-1; + if (.@item==4){ + mes "[Herb Merchant]"; + mes "Come back anytime."; + close; + } + mes "[Herb Merchant]"; + switch (.@item){ + case 0: + mes "Snow Flip has special effects on ^3131FFBurning, Bleeding, Deep Sleep, Sleep^000000."; + break; + case 1: + mes "Peony Mamy has special effects on ^3131FFFrost, Frozen, Freezing^000000"; + break; + case 2: + mes "Slapping Herb has special effects on ^3131FFStun, Fear, Chaos, Hallucination^000000"; + break; + case 3: + mes "Yggdrasil Dust has special effects on ^3131FFBlind, Curse, Decrease Agility, Reverse Orcish^000000."; + break; + } + mes "Requires 5 seconds between uses."; + mes "It costs "+ .cost[.@item] +" Splendide Coins for each."; + next; + .@buy = select("Buy 1.:Buy 10.:Don't buy."); + if (.@buy==3){ + close; + } + if (.@buy==2){ + .@buy = 10; + } + mes "[Herb Merchant]"; + mes "Would you like to buy "+ .@buy +" "+ getitemname(.items[.@item]) +"?"; + next; + if (select("Buy.:Don't buy.")==2){ + close; + } + if (countitem(Splendide_Coin) < (.cost[.@item]*.@buy) ) { + mes "[Herb Merchant]"; + mes "You don't have enough coins."; + close; + } + mes "[Herb Merchant]"; + mes "Thank you for your business."; + delitem Splendide_Coin,.cost[.@item]*.@buy; //Splendide_Coin + getitem Snow_Flip,.@buy; + close; + +OnInit: + setarray .items[0],Snow_Flip,Peony_Mommy,Slapping_Herb,Yggdrasil_Dust; + setarray .cost[0],5,5,1,1; //Splendide Coins + end; +} + +ecl_in01,67,39,4 script Replication Expert Paltu 4_M_FAIRYKID4,{ + if (checkweight(Axe,3)==0) { + mes "You have too many items to continue."; + close; + } emotion e_lv; mes "[Paltu]"; mes "Woohoo- Greetings. What are you looking for? Lots of goods here."; next; - switch(select("No thanks.:Replication?:I know you got lots up your sleeve!")) { - case 1: - emotion e_an; - mes "[Paltu]"; - mes "Really? Hmm?"; - close; - case 2: - mes "[Paltu]"; - mes "One can say that there's no one better in Eclage than I at utilizing magic resistance."; - next; - mes "[Paltu]"; - mes "I'll give you a good price whatever it is. Just trust me."; - next; - select("Could you do something for me?"); - emotion e_no1; - mes "[Paltu]"; - mes "Hey, I like your attitude."; - next; - mes "[Paltu]"; - mes "Ah- you know the hat you're wearing?"; - next; - emotion e_what; - mes "[Paltu]"; - mes "Don't you have any of those hats lying around in storage that are solid but too ugly to wear? You do, right?"; - next; - select("........."); - emotion e_dots,1; - emotion e_heh; - mes "[Paltu]"; - mes "See! I knew it. I knew it from the first minute."; - next; - mes "[Paltu]"; - mes "If you bring me ^ff0000 50 Splendide Coins and the ingredients^000000, I'll make you a new hat in the same shape but worn as a ^ff0000Costume^000000."; - next; - mes "[Paltu]"; - mes "Hmm, what was it...?"; - mes "I think you adventurers call them ^0571B0Costumes^000000? right?"; - next; - select("Yes~ What do you need?"); - mes "[Paltu]"; - mes "I need 1 ^0571B0hat to replicate^000000 and"; - mes "I need ^E1281E 4 Crystal Mirrors^000000 for magic resistance, ^E1281E 1 Fairy Magic Powder^000000 as the catalyst, and ^E1281E Emerald, Ruby, Sapphire, Topaz, and Zircon, 10 of each^000000, to be used for amplifying the magic power."; - next; - emotion e_no; - mes "[Paltu]"; - mes "There's quite a lot of ingredients, right? Well, I can't do anything about that. Dealing with magic power is not a joke."; - next; - select("Which hats can be replicated?"); - mes "[Paltu]"; - mes "Oh! You're pretty sharp!"; - mes "Almost forgot the most important thing."; - next; - mes "[Paltu]"; - mes "Hats that I can replicate are:"; - mes "^0571B0Frog Hat, Romantic Flower, Magestic Goat, Blush, Valkyrie Helm, Deviruchi Hat, Assassin Mask, Elven Ears, Hahoe Mask, and Boys Cap^000000 a total of 10 types."; - next; - mes "[Paltu]"; - mes "What do you think? I'll make it happen as long as I have the ingredients and the compensation."; - next; - if(select("I'll do it later.:Show me what you got!") == 1) { - emotion e_dots; + switch (select("No thanks.:Replication?:I know you got lots up your sleeve!")) { + case 1: + emotion e_an; mes "[Paltu]"; - mes "What? Are you kidding me? Please tell me you are!"; + mes "Really? Hmm?"; close; - } - break; - case 3: - break; + + case 2: + mes "[Paltu]"; + mes "One can say that there's no one better in Eclage than I at utilizing magic resistance."; + next; + mes "[Paltu]"; + mes "I'll give you a good price whatever it is. Just trust me."; + next; + select("Could you do something for me?"); + emotion e_no1; + mes "[Paltu]"; + mes "Hey, I like your attitude."; + next; + mes "[Paltu]"; + mes "Ah- you know the hat you're wearing?"; + next; + emotion e_what; + mes "[Paltu]"; + mes "Don't you have any of those hats lying around in storage that are solid but too ugly to wear? You do, right?"; + next; + select("........."); + emotion e_dots,1; + emotion e_heh; + mes "[Paltu]"; + mes "See! I knew it. I knew it from the first minute."; + next; + mes "[Paltu]"; + mes "If you bring me ^ff0000 50 Splendide Coins and the ingredients^000000, I'll make you a new hat in the same shape but worn as a ^ff0000Costume^000000."; + next; + mes "[Paltu]"; + mes "Hmm, what was it...?"; + mes "I think you adventurers call them ^0571B0Costumes^000000? right?"; + next; + select("Yes~ What do you need?"); + mes "[Paltu]"; + mes "I need 1 ^0571B0hat to replicate^000000 and"; + mes "I need ^E1281E 4 Crystal Mirrors^000000 for magic resistance, ^E1281E 1 Fairy Magic Powder^000000 as the catalyst, and ^E1281E Emerald, Ruby, Sapphire, Topaz, and Zircon, 10 of each^000000, to be used for amplifying the magic power."; + next; + emotion e_no; + mes "[Paltu]"; + mes "There's quite a lot of ingredients, right? Well, I can't do anything about that. Dealing with magic power is not a joke."; + next; + select("Which hats can be replicated?"); + mes "[Paltu]"; + mes "Oh! You're pretty sharp!"; + mes "Almost forgot the most important thing."; + next; + mes "[Paltu]"; + mes "Hats that I can replicate are:"; + mes "^0571B0Frog Hat, Romantic Flower, Magestic Goat, Blush, Valkyrie Helm, Deviruchi Hat, Assassin Mask, Elven Ears, Hahoe Mask, and Boys Cap^000000 a total of 10 types."; + next; + mes "[Paltu]"; + mes "What do you think? I'll make it happen as long as I have the ingredients and the compensation."; + next; + if (select("I'll do it later.:Show me what you got!") == 1) { + emotion e_dots; + mes "[Paltu]"; + mes "What? Are you kidding me? Please tell me you are!"; + close; + } + break; } + disable_items; + emotion e_lv2; mes "[Paltu]"; mes "Oh wow."; mes "You made the right call. I thought I was going to starve to death because the Laphines have no interest in pretty hats."; @@ -1040,134 +1102,115 @@ ecl_in01,67,39,4 script Replication Expert Palt 4_M_FAIRYKID4,{ mes "[Paltu]"; mes "Is there something you had in mind? Why don't you take a look?"; next; - setarray .@items[0], - 5447, //Frog_Cap - 2269, //Centimental_Flower - 2256, //Magestic_Goat - 5040, //Blush - 5171, //Valkyrie_Helm - 5038, //Deviruchi_Cap - 5096, //Assassin_Mask_ - 2286, //Elven_Ears - 5176, //Hahoe_Mask - 5016; //Boy's_Cap - setarray .@costumes[0], - 19548, //C_Frog_Cap - 19552, //C_Centimental_Flower - 19549, //C_Magestic_Goat - 19550, //C_Blush - 19546, //C_Valkyrie_Helm - 19547, //C_Deviruchi_Cap - 19553, //C_Assassin_Mask_ - 19551, //C_Elven_Ears - 0, //-- not implemented? -- - 19545; //C_Boys_Cap - if (countitem(6081) >= 50 && countitem(747) >= 4 && countitem(6395) >= 1 && countitem(721) >= 10 && countitem(723) >= 10 && countitem(726) >= 10 && countitem(728) >= 10 && countitem(729) >= 10) - .@item_check = 1; - for(.@i = 0; .@i= 50) && (countitem(Crystal_Mirror) >= 4) && countitem(Angel_Magic_Power) && (countitem(Azure_Jewel) >= 10) && (countitem(Cardinal_Jewel) >= 10) && (countitem(Blue_Jewel) >= 10) && (countitem(Golden_Jewel) >= 10) && (countitem(Bluish_Green_Jewel) >= 10)) + .@item_check =1; + + for(.@i = 0; .@i