|
|
@@ -23,7 +23,7 @@ pay_d03_i,160,45,3 script Gemcutter#ilp20 4_TOWER_17,3,3,{
|
|
|
mes "[ Gemcutter ]";
|
|
|
mes "Do you have business with me?";
|
|
|
next;
|
|
|
- switch (select("What are you doing here?:Upgrade Weapon.:Upgrade Armor.")) {
|
|
|
+ switch( select( "What are you doing here?", "Upgrade equipments" ) ) {
|
|
|
case 1:
|
|
|
mes "[ Gemcutter ]";
|
|
|
mes "I came to the ruined village,";
|
|
|
@@ -40,30 +40,8 @@ pay_d03_i,160,45,3 script Gemcutter#ilp20 4_TOWER_17,3,3,{
|
|
|
mes "If you're interested, we can discuss the details of our bargain.";
|
|
|
close;
|
|
|
case 2:
|
|
|
- disable_items;
|
|
|
- if (checkweight(25271,1) == 0 || (MaxWeight - Weight) < 1000) {
|
|
|
- mes "- You're carrying too many items to proceed. -";
|
|
|
- close;
|
|
|
- }
|
|
|
- setarray .@reward_id[0],
|
|
|
- 26109, // Illusion Staff of Bordeaux
|
|
|
- 28725, // Illusion Moonlight Dagger
|
|
|
- 16063, // Illusion Long Mace
|
|
|
- 26007; // Illusion Spectral Spear
|
|
|
- .@size = getarraysize(.@reward_id);
|
|
|
-
|
|
|
- .@refine_req = 9;
|
|
|
-
|
|
|
- for ( .@i = 0; .@i < .@size; ++.@i )
|
|
|
- .@reward_name$[.@i] = replacestr( getitemname(.@reward_id[.@i]), ":", "" );
|
|
|
-
|
|
|
mes "[ Gemcutter ]";
|
|
|
- mes "The following is the list of equipment I can handle.";
|
|
|
- for ( .@i = 0; .@i < .@size; ++.@i )
|
|
|
- mes mesitemlink( .@reward_id[.@i], false );
|
|
|
- next;
|
|
|
- mes "[ Gemcutter ]";
|
|
|
- mes "Make sure ^0000FFyour equipment is refined to at least +" + .@refine_req + "^000000 before bringing it to me.";
|
|
|
+ mes "Make sure ^0000FFyour equipment is refined to at least +9^000000 before bringing it to me.";
|
|
|
mes "That's the minimum requirement for my upgrade service to have any visible effects on your equipment.";
|
|
|
next;
|
|
|
mes "[ Gemcutter ]";
|
|
|
@@ -77,178 +55,11 @@ pay_d03_i,160,45,3 script Gemcutter#ilp20 4_TOWER_17,3,3,{
|
|
|
mes "[ Gemcutter ]";
|
|
|
mes "And I need ^0000FFIllusion Stones and some other materials^000000 to upgrade your equipment.";
|
|
|
mes "Pick an item you want and I'll tell you what I need.";
|
|
|
- next;
|
|
|
- switch( select( .@reward_name$[0], .@reward_name$[1], .@reward_name$[2], .@reward_name$[3] ) ) {
|
|
|
- case 1:
|
|
|
- .@reward = .@reward_id[0]; // Illusion Staff of Bordeaux
|
|
|
- .@eq_req = 1648; // Staff of Bordeaux
|
|
|
- .@part = EQI_HAND_R;
|
|
|
-
|
|
|
- setarray .@items_req[0],
|
|
|
- 25271,30, // Illusion Stones
|
|
|
- 25256,100; // Hazy Dreams
|
|
|
- break;
|
|
|
- case 2:
|
|
|
- .@reward = .@reward_id[1]; // Illusion Moonlight Dagger
|
|
|
- .@eq_req = 1234; // Moonlight Dagger
|
|
|
- .@part = EQI_HAND_R;
|
|
|
-
|
|
|
- setarray .@items_req[0],
|
|
|
- 25271,60, // Illusion Stones
|
|
|
- 25256,100; // Hazy Dreams
|
|
|
- break;
|
|
|
- case 3:
|
|
|
- .@reward = .@reward_id[2]; // Illusion Long Mace
|
|
|
- .@eq_req = 1525; // Long Mace
|
|
|
- .@part = EQI_HAND_R;
|
|
|
-
|
|
|
- setarray .@items_req[0],
|
|
|
- 25271,10, // Illusion Stones
|
|
|
- 25256,20; // Hazy Dreams
|
|
|
- break;
|
|
|
- case 4:
|
|
|
- .@reward = .@reward_id[3]; // Illusion Spectral Spear
|
|
|
- .@eq_req = 1477; // Spectral Spear
|
|
|
- .@part = EQI_HAND_R;
|
|
|
-
|
|
|
- setarray .@items_req[0],
|
|
|
- 25271,20, // Illusion Stones
|
|
|
- 25256,100; // Hazy Dreams
|
|
|
- break;
|
|
|
- }
|
|
|
- break;
|
|
|
- case 3:
|
|
|
- disable_items;
|
|
|
- if (checkweight(25271,1) == 0 || (MaxWeight - Weight) < 1000) {
|
|
|
- mes "- You're carrying too many items to proceed. -";
|
|
|
- close;
|
|
|
- }
|
|
|
- setarray .@reward_id[0],
|
|
|
- 19209, // Illusion Nurse Cap
|
|
|
- 19210, // Illusion Apple of Archer
|
|
|
- 15195, // Illusion Puente Robe
|
|
|
- 20838, // Illusion Muffler [1]
|
|
|
- 22133; // Illusion Shoes [1]
|
|
|
- .@size = getarraysize(.@reward_id);
|
|
|
-
|
|
|
- .@refine_req = 9;
|
|
|
-
|
|
|
- for ( .@i = 0; .@i < .@size; ++.@i )
|
|
|
- .@reward_name$[.@i] = replacestr( getitemname(.@reward_id[.@i]), ":", "" );
|
|
|
-
|
|
|
- mes "[ Gemcutter ]";
|
|
|
- mes "The following is the list of equipment I can handle.";
|
|
|
- for ( .@i = 0; .@i < .@size; ++.@i )
|
|
|
- mes mesitemlink( .@reward_id[.@i], false );
|
|
|
- next;
|
|
|
- mes "[ Gemcutter ]";
|
|
|
- mes "Make sure ^0000FFyour equipment is refined to at least +" + .@refine_req + "^000000 before bringing it to me.";
|
|
|
- mes "That's the minimum requirement for my upgrade service to have any visible effects on your equipment.";
|
|
|
- next;
|
|
|
- mes "[ Gemcutter ]";
|
|
|
- mes "Make sure you're ^0000FFequipped with the item that you want to improve.^000000";
|
|
|
- mes "Otherwise, I can't evaluate its condition.";
|
|
|
- next;
|
|
|
- mes "[ Gemcutter ]";
|
|
|
- mes "As you may have guessed, your equipment will transform into something new after this.";
|
|
|
- mes "In other words, ^0000FFIt'll lose its current refining levels, cards and enchantments.^000000";
|
|
|
- next;
|
|
|
- mes "[ Gemcutter ]";
|
|
|
- mes "And I need ^0000FFIllusion Stones and some other materials^000000 to upgrade your equipment.";
|
|
|
- mes "Pick an item you want and I'll tell you what I need.";
|
|
|
- next;
|
|
|
- switch( select( .@reward_name$[0], .@reward_name$[1], .@reward_name$[2], .@reward_name$[3], .@reward_name$[4] ) ) {
|
|
|
- case 1:
|
|
|
- .@reward = .@reward_id[0]; // Illusion Nurse Cap
|
|
|
- .@eq_req = 2277; // Nurse Cap
|
|
|
- .@part = EQI_HEAD_TOP;
|
|
|
-
|
|
|
- setarray .@items_req[0],
|
|
|
- 25271,10, // Illusion Stones
|
|
|
- 25257,100; // Bloody_Love_Letter
|
|
|
- break;
|
|
|
- case 2:
|
|
|
- .@reward = .@reward_id[1]; // Illusion Apple of Archer
|
|
|
- .@eq_req = 2285; // Apple of Archer
|
|
|
- .@part = EQI_HEAD_TOP;
|
|
|
-
|
|
|
- setarray .@items_req[0],
|
|
|
- 25271,10, // Illusion Stones
|
|
|
- 25258,100; // Broken_Arrow
|
|
|
- break;
|
|
|
- case 3:
|
|
|
- .@reward = .@reward_id[2]; // Illusion Puente Robe
|
|
|
- .@eq_req = 15012; // Puente Robe
|
|
|
- .@part = EQI_ARMOR;
|
|
|
-
|
|
|
- setarray .@items_req[0],
|
|
|
- 25271,10, // Illusion Stones
|
|
|
- 25256,100; // Hazy Dreams
|
|
|
- break;
|
|
|
- case 4:
|
|
|
- .@reward = .@reward_id[3]; // Illusion Muffler [1]
|
|
|
- .@eq_req = 2504; // Muffler
|
|
|
- .@part = EQI_GARMENT;
|
|
|
-
|
|
|
- setarray .@items_req[0],
|
|
|
- 25271,10, // Illusion Stones
|
|
|
- 23228,100; // Hazy_Mooncake
|
|
|
- break;
|
|
|
- case 5:
|
|
|
- .@reward = .@reward_id[4]; // Illusion Shoes [1]
|
|
|
- .@eq_req = 2404; // Shoes
|
|
|
- .@part = EQI_SHOES;
|
|
|
-
|
|
|
- setarray .@items_req[0],
|
|
|
- 25271,10, // Illusion Stones
|
|
|
- 23228,100; // Hazy_Mooncake
|
|
|
- break;
|
|
|
- }
|
|
|
- break;
|
|
|
- }
|
|
|
- mes "[Gemcutter]";
|
|
|
- mes "For that equipment, I need the following materials.";
|
|
|
- mes "^4d4fff +" + .@refine_req + " " + getitemname(.@eq_req) + "";
|
|
|
- mes "" + .@items_req[1] + " " + getitemname(.@items_req[0]) + "";
|
|
|
- mes "" + .@items_req[3] + " " + getitemname(.@items_req[2]) + "^000000";
|
|
|
- mes "Do you want to continue?";
|
|
|
- next;
|
|
|
- if (select( "Continue.", "I'll bring those materials." ) == 2) {
|
|
|
- mes "[Gemcutter]";
|
|
|
- mes "Come back when you're ready.";
|
|
|
- close;
|
|
|
- }
|
|
|
- if (countitem(.@items_req[0]) < .@items_req[1] || countitem(.@items_req[2]) < .@items_req[3]) {
|
|
|
- mes "[Gemcutter]";
|
|
|
- mes "You don't have all the materials.";
|
|
|
- close;
|
|
|
- }
|
|
|
- .@equip_id = getequipid(.@part);
|
|
|
- if (.@equip_id == -1) {
|
|
|
- mes "[Gemcutter]";
|
|
|
- if (.@part == EQI_HAND_R)
|
|
|
- mes "Where's your weapon?";
|
|
|
- else
|
|
|
- mes "Why don't you go wear that equipment first?";
|
|
|
- close;
|
|
|
- }
|
|
|
- if (.@equip_id != .@eq_req) {
|
|
|
- mes "[Gemcutter]";
|
|
|
- mes "Please equip a ^4d4fff+9 " + getitemname(.@eq_req) + ".^000000";
|
|
|
- close;
|
|
|
- }
|
|
|
- if (getequiprefinerycnt(.@part) < .@refine_req) {
|
|
|
- mes "[Gemcutter]";
|
|
|
- mes "I can only upgrade equipment that is ^4d4fffrefined to at least +" + .@refine_req + ".^000000";
|
|
|
- close;
|
|
|
+ close2;
|
|
|
+ callshop( "barter_ill_moonlight" );
|
|
|
+ end;
|
|
|
}
|
|
|
- mes "[Gemcutter]";
|
|
|
- mes "There you go.";
|
|
|
- delequip .@part;
|
|
|
- delitem .@items_req[0], .@items_req[1];
|
|
|
- delitem .@items_req[2], .@items_req[3];
|
|
|
- getitem .@reward,1;
|
|
|
- close;
|
|
|
+ end;
|
|
|
|
|
|
OnTouch:
|
|
|
if (illusion_moonlight > 7)
|
|
|
@@ -261,222 +72,23 @@ OnTouch:
|
|
|
//= Illusion of Vampire
|
|
|
//============================================================
|
|
|
gef_dun01,139,228,3 script Great Merchant#illgef 4_M_HUMERCHANT,{
|
|
|
- if (checkweight(501,1) == 0 || (MaxWeight - Weight) < 1000) {
|
|
|
- mes "[Great Merchant]";
|
|
|
- mes "You don't seem to be able to carry any more stuff. Why don't you lighten your bag?";
|
|
|
- close;
|
|
|
- }
|
|
|
- disable_items;
|
|
|
mes "[Great Merchant]";
|
|
|
mes "Adventurer, do you have ^0000cdIllusion Stones^000000? If you have a ^0000cdweapon, a piece armor^000000, or ^0000cdan accessory at Refining Level 9 or higher^000000, ";
|
|
|
mes "then I can exchange it for something better at the cost of some Illusion Stones and other materials.";
|
|
|
next;
|
|
|
mes "[Great Merchant]";
|
|
|
- mes "Check the ^0000cdcatalog^000000 for the available equipment and necessary materials.";
|
|
|
- next;
|
|
|
- mes "[Great Merchant]";
|
|
|
mes "So, what do you want?";
|
|
|
next;
|
|
|
- switch( select( "Weapon exchange (5 kinds)", "Armor exchange (1 kind)", "Accessory exchange (2 kinds)", "Check the catalog.", "What are Illusion Stones?", "Can I refine the equipment I get in exchange for my Illusion Stones?" ) ) {
|
|
|
+ switch( select( "Exchange illusion equipment", "What are Illusion Stones?", "Can I strengthen the exchanged item?", "Cancel" ) ) {
|
|
|
case 1:
|
|
|
- setarray .@item_req[0], // item equipped aren't required to build the menu color
|
|
|
- 28022, 25271,80, 25261,20, // Illusion_Infiltrator
|
|
|
- 28023, 25271,10, 25264,100, // Illusion_Sharpened_Legbone_of_Ghoul
|
|
|
- 2039, 25271,40, 25261,100, // Illusion_Wizardry_Staff
|
|
|
- 18149, 25271,50, 25265,100, // Illusion_Ballista
|
|
|
- 28612, 25271,50, 25262,10; // Illusion_Apocalypse
|
|
|
- .@size = getarraysize(.@item_req);
|
|
|
- for ( .@i = 0; .@i < .@size; .@i += 5 ) {
|
|
|
- if (countitem(.@item_req[.@i+1]) < .@item_req[.@i+2] || countitem(.@item_req[.@i+3]) < .@item_req[.@i+4])
|
|
|
- .@menu$ += "^aaaaaa" + getitemname(.@item_req[.@i]) + ".^000000:";
|
|
|
- else
|
|
|
- .@menu$ += getitemname(.@item_req[.@i]) + ".:";
|
|
|
- }
|
|
|
- switch( select(.@menu$) ) {
|
|
|
- case 1:
|
|
|
- mes "[Great Merchant]";
|
|
|
- mes "Illusion Infiltrator, huh? That's a good weapon. Dreadful name, though. Let's see what you've got.";
|
|
|
- callsub( S_WeaponArmor, 28022, // Illusion_Infiltrator
|
|
|
- EQI_HAND_R,
|
|
|
- 1266, // Infiltrator_
|
|
|
- 25271,80, // Illusion Stones
|
|
|
- 25261,20 // Torn_Diary
|
|
|
- );
|
|
|
- case 2:
|
|
|
- mes "[Great Merchant]";
|
|
|
- mes "Illusion Sharpened Legbone of Ghoul. It perfectly fits in this place. Let's see what you've got.";
|
|
|
- callsub( S_WeaponArmor, 28023, // Illusion_Sharpened_Legbone_of_Ghoul
|
|
|
- EQI_HAND_R,
|
|
|
- 1260, // Ghoul_Leg
|
|
|
- 25271,10, // Illusion Stones
|
|
|
- 25264,100 // NightmareOfLump
|
|
|
- );
|
|
|
- case 3:
|
|
|
- mes "[Great Merchant]";
|
|
|
- mes "Illusion Wizardry Staff, huh? *Chuckle* Having that is every mage's dream. Let's see what you've got.";
|
|
|
- callsub( S_WeaponArmor, 2039, // Illusion_Wizardry_Staff
|
|
|
- EQI_HAND_R,
|
|
|
- 1473, // Wizardy_Staff
|
|
|
- 25271,40, // Illusion Stones
|
|
|
- 25261,100 // SuspiciousMagicCircle
|
|
|
- );
|
|
|
- case 4:
|
|
|
- mes "[Great Merchant]";
|
|
|
- mes "Illusion Ballista... I would've loved to have this when, sigh, never mind. Let's see what you've got.";
|
|
|
- callsub( S_WeaponArmor, 18149, // Illusion_Ballista
|
|
|
- EQI_HAND_R,
|
|
|
- 1727, // Balistar_
|
|
|
- 25271,50, // Illusion Stones
|
|
|
- 25265,100 // Shining_Spore
|
|
|
- );
|
|
|
- case 5:
|
|
|
- mes "[Great Merchant]";
|
|
|
- mes "Illusion Book of the Apocalypse, huh? It's been a long time since I heard the story behind this book. Anyway, let's see what you've got.";
|
|
|
- callsub( S_WeaponArmor, 28612, // Illusion_Apocalypse
|
|
|
- EQI_HAND_R,
|
|
|
- 1557, // Book_Of_The_Apocalypse
|
|
|
- 25271,50, // Illusion Stones
|
|
|
- 25262,10 // Dried_Clover
|
|
|
- );
|
|
|
- }
|
|
|
- case 2:
|
|
|
- if (countitem(25271) < 30 || countitem(25263) < 200)
|
|
|
- .@menu$ = "^aaaaaa" + getitemname(20840) + ".^000000";
|
|
|
- else
|
|
|
- .@menu$ = getitemname(20840);
|
|
|
- select(.@menu$);
|
|
|
+ specialeffect EF_HFLIMOON3;
|
|
|
+ emotion ET_BEST;
|
|
|
mes "[Great Merchant]";
|
|
|
- mes "Illusion Ancient Cape. Someone in this place? *Ahem* Let's see what you've got.";
|
|
|
- callsub( S_WeaponArmor, 20840, // Illusion_Ancient_Cape
|
|
|
- EQI_GARMENT,
|
|
|
- 2525, // Cape_Of_Ancient_Lord_
|
|
|
- 25271,30, // Illusion Stones
|
|
|
- 25263,200 // Short_Bat_Fur
|
|
|
- );
|
|
|
- case 3:
|
|
|
- setarray .@item_req[0], // item equipped aren't required to build the menu color
|
|
|
- 28508, 25271,50, 25266,400, // Illusion_Skull_Ring
|
|
|
- 28509, 25271,50, 25267,400; // Illusion_Ring
|
|
|
- .@size = getarraysize(.@item_req);
|
|
|
- for ( .@i = 0; .@i < .@size; .@i += 5 ) {
|
|
|
- if (countitem(.@item_req[.@i+1]) < .@item_req[.@i+2] || countitem(.@item_req[.@i+3]) < .@item_req[.@i+4])
|
|
|
- .@menu$ += "^aaaaaa" + getitemname(.@item_req[.@i]) + ".^000000:";
|
|
|
- else
|
|
|
- .@menu$ += getitemname(.@item_req[.@i]) + ".:";
|
|
|
- }
|
|
|
- switch( select(.@menu$) ) {
|
|
|
- case 1:
|
|
|
- mes "[Great Merchant]";
|
|
|
- mes "Illusion Skull Ring. *Chuckle* I remember when I was young, my friends and I wore this ring and played pranks, hah hah, never mind. That was a long time ago. Anyway, let's see what you've got.";
|
|
|
- callsub( S_Accessory, 28508, // Illusion_Skull_Ring
|
|
|
- 2715, // Skul_Ring_
|
|
|
- 25271,50, // Illusion Stones
|
|
|
- 25266,400 // Dried_Yggdrasil_Leaf
|
|
|
- );
|
|
|
- case 2:
|
|
|
- mes "[Great Merchant]";
|
|
|
- mes "Illusion Ring... It may not look much, but it has an important meaning to me. Anyway, let's see what you've got.";
|
|
|
- callsub( S_Accessory, 28509, // Illusion_Ring
|
|
|
- 2621, // Ring_
|
|
|
- 25271,50, // Illusion Stones
|
|
|
- 25267,400 // SuspiciousMagicCircle
|
|
|
- );
|
|
|
- }
|
|
|
- case 4:
|
|
|
- while( true ) {
|
|
|
- mes "[Great Merchant]";
|
|
|
- mes "Do you want to see my catalog? Sure thing.";
|
|
|
- next;
|
|
|
- switch( select( "Weapons (5 kinds)", "Armor (1 kind)", "Accessory (2 kinds)", "Cancel." ) ) {
|
|
|
- case 1:
|
|
|
- switch( select( "Illusion Infiltrator", "Illusion Sharpened Legbone of Ghoul", "Illusion Wizardry Staff", "Illusion Ballista", "Illusion Book of the Apocalypse" ) ) {
|
|
|
- case 1:
|
|
|
- mes mesitemlink( 28022, false );
|
|
|
- mes "***********************************";
|
|
|
- mes "Necessary Items";
|
|
|
- mes "^0000cd+9 or higher^000000 Infiltrator ^C71585[1]^000000 x1";
|
|
|
- mes "Socket Artisan";
|
|
|
- mes "<NAVI>: Seiyablem in Prontera<INFO>prt_in,33,70,000,0,</INFO></NAVI>";
|
|
|
- mes "80 Illusion Stones";
|
|
|
- mes "20 Torn Papers";
|
|
|
- break;
|
|
|
- case 2:
|
|
|
- mes mesitemlink( 28023, false );
|
|
|
- mes "********************************";
|
|
|
- mes "Necessary Items";
|
|
|
- mes "^0000cd+9 or higher^000000 Sharpened Legbone of Ghoul x1";
|
|
|
- mes "10 Illusion Stones";
|
|
|
- mes "100 Clusters of Nightmares";
|
|
|
- break;
|
|
|
- case 3:
|
|
|
- mes mesitemlink( 2039, false );
|
|
|
- mes "********************************";
|
|
|
- mes "Necessary Items";
|
|
|
- mes "^0000cd+9 or higher^000000 Wizardry Staff x1";
|
|
|
- mes "40 Illusion Stones";
|
|
|
- mes "100 Suspicious Pentacles";
|
|
|
- break;
|
|
|
- case 4:
|
|
|
- mes mesitemlink( 18149, false );
|
|
|
- mes "*************************";
|
|
|
- mes "Necessary Items";
|
|
|
- mes "^0000cd+9 or higher^000000 Ballista ^C71585[1]^000000 x1";
|
|
|
- mes "Socket Artisan";
|
|
|
- mes "<NAVI>: Seiyablem in Prontera<INFO>prt_in,33,70,000,0,</INFO></NAVI>";
|
|
|
- mes "50 Illusion Stones";
|
|
|
- mes "100 Shining Spores";
|
|
|
- break;
|
|
|
- case 5:
|
|
|
- mes mesitemlink( 28612, false );
|
|
|
- mes "***********************";
|
|
|
- mes "Necessary Items";
|
|
|
- mes "^0000cd+9 or higher^000000 Book of the Apocalypse x1";
|
|
|
- mes "50 Illusion Stones";
|
|
|
- mes "10 Well-dried Clovers";
|
|
|
- break;
|
|
|
- }
|
|
|
- break;
|
|
|
- case 2:
|
|
|
- select("Illusion Ancient Cape");
|
|
|
- mes mesitemlink( 20840, false );
|
|
|
- mes "*******************************";
|
|
|
- mes "Necessary Items";
|
|
|
- mes "^0000cd+9 or higher^000000 Ancient Cape ^C71585[1]^000000 x1";
|
|
|
- mes "Socket Artisan";
|
|
|
- mes "<NAVI>: Leablem in Prontera<INFO>prontera,244,169,000,0,</INFO></NAVI>";
|
|
|
- mes "30 Illusion Stones";
|
|
|
- mes "200 Short Bat Hairs";
|
|
|
- break;
|
|
|
- case 3:
|
|
|
- switch( select( "Illusion Skull Ring", "Illusion Ring" ) ) {
|
|
|
- case 1:
|
|
|
- mes mesitemlink( 28508, false );
|
|
|
- mes "*************************";
|
|
|
- mes "Necessary Items";
|
|
|
- mes "Skull Ring ^C71585[1]^000000 x1";
|
|
|
- mes "Socket Artisan";
|
|
|
- mes "<NAVI>: Leablem in Prontera<INFO>prontera,244,169,000,0,</INFO></NAVI>";
|
|
|
- mes "50 Illusion Stones";
|
|
|
- mes "400 Dried Yggdrasil Leaves";
|
|
|
- break;
|
|
|
- case 2:
|
|
|
- mes mesitemlink( 28509, false );
|
|
|
- mes "********************";
|
|
|
- mes "Necessary Items";
|
|
|
- mes "Ring ^C71585[1]^000000 x1";
|
|
|
- mes "50 Illusion Stones";
|
|
|
- mes "400 Suspicious Pentacles";
|
|
|
- break;
|
|
|
- }
|
|
|
- break;
|
|
|
- case 4:
|
|
|
- mes "[Great Merchant]";
|
|
|
- mes "Did you find something you like? Let me know if I can help you.";
|
|
|
- close;
|
|
|
- }
|
|
|
- next;
|
|
|
- }
|
|
|
- case 5:
|
|
|
+ mes "Use it well and come see me later if you find more Illusion Stones! *Chuckle*";
|
|
|
+ close2;
|
|
|
+ callshop( "barter_ill_vampire" );
|
|
|
+ end;
|
|
|
+ case 2:
|
|
|
mes "[Great Merchant]";
|
|
|
mes "What are ^0000cdIllusion Stones^000000, you ask? Well... I don't think anyone knows exactly what they are.";
|
|
|
next;
|
|
|
@@ -495,7 +107,7 @@ gef_dun01,139,228,3 script Great Merchant#illgef 4_M_HUMERCHANT,{
|
|
|
mes "[Great Merchant]";
|
|
|
mes "This benefits both of us. Let me know if you're interested in my proposition.";
|
|
|
close;
|
|
|
- case 6:
|
|
|
+ case 3:
|
|
|
mes "[Great Merchant]";
|
|
|
mes "So, you want to reinforce the equipment you get. You're thorough. I like that!";
|
|
|
next;
|
|
|
@@ -508,116 +120,11 @@ gef_dun01,139,228,3 script Great Merchant#illgef 4_M_HUMERCHANT,{
|
|
|
mes "[Great Merchant]";
|
|
|
mes "If you want to refine your equipment, then go to the <NAVI>Illusion Enchanter<INFO>prontera,90,115,000,0,</INFO></NAVI> near the Town Office.";
|
|
|
close;
|
|
|
- }
|
|
|
-
|
|
|
-S_WeaponArmor:
|
|
|
- .@reward = getarg(0);
|
|
|
- .@part = getarg(1);
|
|
|
- .@eq_req = getarg(2);
|
|
|
-
|
|
|
- setarray .@items_req[0],
|
|
|
- getarg(3),getarg(4),
|
|
|
- getarg(5),getarg(6);
|
|
|
-
|
|
|
- next;
|
|
|
- donpcevent "Great Merchant#illgef::OnProgress";
|
|
|
- sleep2 1000;
|
|
|
- .@slots = getitemslots(.@eq_req);
|
|
|
- .@eq_req_name$ = getitemname(.@eq_req) + ( .@slots ? "[" + .@slots + "]" : "" );
|
|
|
- .@equip_id = getequipid(.@part);
|
|
|
- if (.@equip_id == -1) {
|
|
|
- mes "[Great Merchant]";
|
|
|
- if (.@part == EQI_HAND_R)
|
|
|
- mes "Oh, you must have been in a hurry: you forgot to bring a weapon.";
|
|
|
- else
|
|
|
- mes "Oh, you must have been in a hurry: you forgot to bring an armor.";
|
|
|
- mes "Please come back equipped with a ^0000cd+9 " + .@eq_req_name$ + "^000000. I'll wait here.";
|
|
|
- close;
|
|
|
- }
|
|
|
- if (.@equip_id != .@eq_req) {
|
|
|
- mes "[Great Merchant]";
|
|
|
- mes "Let's see... Mm? What did you bring? Come back equipped with a ^0000cd+9 " + .@eq_req_name$ + "^000000.";
|
|
|
- close;
|
|
|
- }
|
|
|
- if (getequiprefinerycnt(.@part) < 9) {
|
|
|
- mes "[Great Merchant]";
|
|
|
- if (.@part == EQI_HAND_R)
|
|
|
- mes "Um, this one isn't refined enough. I told you the armor has to be ^0000cdrefined to as least +9^000000.";
|
|
|
- else
|
|
|
- mes "Um, this one isn't refined enough. I told you the weapon has to be ^0000cdrefined to as least +9^000000.";
|
|
|
- close;
|
|
|
- }
|
|
|
- mes "[Great Merchant]";
|
|
|
- mes "Ah, you're equipped with the correct item. Now, let me check the other materials.";
|
|
|
- next;
|
|
|
- if (countitem(.@items_req[0]) < .@items_req[1] || countitem(.@items_req[2]) < .@items_req[3]) {
|
|
|
- mes "[Great Merchant]";
|
|
|
- mes "Mm, you're so impatient. I told you, I need ^4d4fff" + .@items_req[1] + " " + getitemname(.@items_req[0]) + " and " + .@items_req[3] + " " + getitemname(.@items_req[2]) + "^000000. Check your inventory and bring all of them.";
|
|
|
- close;
|
|
|
- }
|
|
|
- mes "[Great Merchant]";
|
|
|
- mes "Alright, you've got everything.";
|
|
|
- next;
|
|
|
- mes "[Great Merchant]";
|
|
|
- mes "Are you ready to make the exchange?";
|
|
|
- next;
|
|
|
- if (select( "Wait! Let me think.", "Yes, I am." ) == 1) {
|
|
|
- mes "[Great Merchant]";
|
|
|
- mes "Sure, no problem. Come back when you're ready.";
|
|
|
- close;
|
|
|
- }
|
|
|
- mes "[Great Merchant]";
|
|
|
- mes "Alright! Let's see...";
|
|
|
- next;
|
|
|
- mes "[Great Merchant]";
|
|
|
- mes "Here, take this. I hope you'll enjoy. If you find more Illusion Stones, feel free to bring them to me! *Chuckle*";
|
|
|
- delequip .@part;
|
|
|
- delitem .@items_req[0], .@items_req[1];
|
|
|
- delitem .@items_req[2], .@items_req[3];
|
|
|
- getitem .@reward,1;
|
|
|
- close;
|
|
|
-
|
|
|
-S_Accessory: // the structure is slightly different from above
|
|
|
- .@reward = getarg(0);
|
|
|
- .@eq_req = getarg(1);
|
|
|
-
|
|
|
- setarray .@items_req[0],
|
|
|
- getarg(2),getarg(3),
|
|
|
- getarg(4),getarg(5);
|
|
|
-
|
|
|
- next;
|
|
|
- donpcevent "Great Merchant#illgef::OnProgress";
|
|
|
- sleep2 1000;
|
|
|
- .@count = countitem(.@eq_req) - (getequipid(EQI_ACC_L) == .@eq_req) - (getequipid(EQI_ACC_R) == .@eq_req);
|
|
|
- if (.@count < 1 || countitem(.@items_req[0]) < .@items_req[1] || countitem(.@items_req[2]) < .@items_req[3]) {
|
|
|
- mes "[Great Merchant]";
|
|
|
- mes "Mm, you're so impatient. I told you, I need ^4d4fff1 socketed " + getitemname(.@eq_req) + ", " + .@items_req[1] + " " + getitemname(.@items_req[0]) + " and " + .@items_req[3] + " " + getitemname(.@items_req[2]) + "^000000. Check your inventory and bring all of them.";
|
|
|
- close;
|
|
|
- }
|
|
|
- mes "[Great Merchant]";
|
|
|
- mes "Alright, you've got everything.";
|
|
|
- next;
|
|
|
- mes "[Great Merchant]";
|
|
|
- mes "Are you ready to make the exchange?";
|
|
|
- next;
|
|
|
- if (select( "Wait! Let me think.", "Yes, I am." ) == 1) {
|
|
|
+ case 4:
|
|
|
mes "[Great Merchant]";
|
|
|
- mes "Sure, no problem. Come back when you're ready.";
|
|
|
+ mes "Did you find anything you liked? If you need anything, please let me know at any time.";
|
|
|
close;
|
|
|
}
|
|
|
- mes "[Great Merchant]";
|
|
|
- mes "Alright! Let's see...";
|
|
|
- next;
|
|
|
- mes "[Great Merchant]";
|
|
|
- mes "Here, take this. I hope you'll enjoy. If you find more Illusion Stones, feel free to bring them to me! *Chuckle*";
|
|
|
- delitem .@eq_req,1;
|
|
|
- delitem .@items_req[0], .@items_req[1];
|
|
|
- delitem .@items_req[2], .@items_req[3];
|
|
|
- getitem .@reward,1;
|
|
|
- close;
|
|
|
-
|
|
|
-OnProgress:
|
|
|
- progressbar_npc "000000",1;
|
|
|
end;
|
|
|
}
|
|
|
|
|
|
@@ -631,7 +138,7 @@ ice_dun02,153,18,3 script Illusion Stone Research 4_M_ALCHE_B,{
|
|
|
mes "[Illusion Stone Researcher]";
|
|
|
mes "Ah, Illusion Stones are truly mysterious...";
|
|
|
next;
|
|
|
- switch( select( "What are you doing here?", "Upgrade weapon.", "Upgrade armor." ) ) {
|
|
|
+ switch( select( "What are you doing here?", "Upgrade equipments", "Cancel" ) ) {
|
|
|
case 1:
|
|
|
mes "[Illusion Stone Researcher]";
|
|
|
mes "I'm here to find some Illusion Stones that I need for my research.";
|
|
|
@@ -645,17 +152,6 @@ ice_dun02,153,18,3 script Illusion Stone Research 4_M_ALCHE_B,{
|
|
|
mes "What do you say?";
|
|
|
close;
|
|
|
case 2:
|
|
|
- setarray .@reward_id[0],
|
|
|
- 13337, // Huuma_Flutter_Snow_IL
|
|
|
- 1846; // Combo_Battle_Glove_IL
|
|
|
- setarray .@reward_name$[0],
|
|
|
- getitemname(.@reward_id[0]),
|
|
|
- getitemname(.@reward_id[1]);
|
|
|
- mes "[Illusion Stone Researcher]";
|
|
|
- mes "The following is the list of equipment I can handle.";
|
|
|
- mes mesitemlink( .@reward_id[0], false );
|
|
|
- mes mesitemlink( .@reward_id[1], false );
|
|
|
- next;
|
|
|
mes "[Illusion Stone Researcher]";
|
|
|
mes "Make sure ^4d4dffyour equipment is refined to at least +9^000000 before bringing it to me.";
|
|
|
mes "Make sure you're ^4d4dffequipped with the item that you want to improve^000000.";
|
|
|
@@ -667,127 +163,15 @@ ice_dun02,153,18,3 script Illusion Stone Research 4_M_ALCHE_B,{
|
|
|
mes "[Illusion Stone Researcher]";
|
|
|
mes "And I need ^4d4dffIllusion Stones and some other materials^000000 to upgrade your equipment.";
|
|
|
mes "Pick an item you want. I'll tell you what I need.";
|
|
|
- next;
|
|
|
- .@s = select( .@reward_name$[0], .@reward_name$[1], "Cancel." ) - 1;
|
|
|
- switch(.@s) {
|
|
|
- case 0: // Huuma_Flutter_Snow_IL
|
|
|
- .@eq_req = 13314; // Huuma_Fluttering_Snow
|
|
|
- .@part = EQI_HAND_R;
|
|
|
-
|
|
|
- setarray .@items_req[0],
|
|
|
- 25271,100, // IllusionStone
|
|
|
- 25300,20; // KTULLANUXsEye
|
|
|
- break;
|
|
|
- case 1: // Combo_Battle_Glove_IL
|
|
|
- .@eq_req = 1822; // Combo_Battle_Glove
|
|
|
- .@part = EQI_HAND_R;
|
|
|
-
|
|
|
- setarray .@items_req[0],
|
|
|
- 25271,100, // IllusionStone
|
|
|
- 25299,100; // Snowball
|
|
|
- break;
|
|
|
- case 2:
|
|
|
- end;
|
|
|
- }
|
|
|
- break;
|
|
|
+ close2;
|
|
|
+ callshop( "barter_ill_frozen" );
|
|
|
+ end;
|
|
|
case 3:
|
|
|
- setarray .@reward_id[0],
|
|
|
- 28922, // Herald_Of_GOD_IL
|
|
|
- 20847, // Clack_Of_Servival_IL
|
|
|
- 19223; // Cap_IL
|
|
|
- setarray .@reward_name$[0],
|
|
|
- getitemname(.@reward_id[0]),
|
|
|
- getitemname(.@reward_id[1]),
|
|
|
- getitemname(.@reward_id[2]);
|
|
|
- mes "[Illusion Stone Researcher]";
|
|
|
- mes "The following is the list of equipment I can handle.";
|
|
|
- mes mesitemlink( .@reward_id[0], false );
|
|
|
- mes mesitemlink( .@reward_id[1], false );
|
|
|
- mes mesitemlink( .@reward_id[2], false );
|
|
|
- next;
|
|
|
- mes "[Illusion Stone Researcher]";
|
|
|
- mes "Make sure ^4d4dffyour equipment is refined to at least +9^000000 before bringing it to me.";
|
|
|
- mes "Make sure you're ^4d4dffequipped with the item that you want to improve^000000.";
|
|
|
- next;
|
|
|
mes "[Illusion Stone Researcher]";
|
|
|
- mes "As you may have guessed, your equipment will transform into something new after this.";
|
|
|
- mes "In other words, ^4d4dffit'll lose its current Refining and Upgrade levels.^000000";
|
|
|
- mes "Are you ready?";
|
|
|
- next;
|
|
|
- .@s = select( .@reward_name$[0], .@reward_name$[1], .@reward_name$[2], "Cancel." ) - 1;
|
|
|
- switch(.@s) {
|
|
|
- case 0: // Herald_Of_GOD_IL
|
|
|
- .@eq_req = 2128; // Herald_Of_GOD_
|
|
|
- .@part = EQI_HAND_L;
|
|
|
-
|
|
|
- setarray .@items_req[0],
|
|
|
- 25271,100, // IllusionStone
|
|
|
- 25298,300; // SpritJewel
|
|
|
- break;
|
|
|
- case 1: // Clack_Of_Servival_IL
|
|
|
- .@eq_req = 2509; // Clack_Of_Servival
|
|
|
- .@part = EQI_GARMENT;
|
|
|
-
|
|
|
- setarray .@items_req[0],
|
|
|
- 25271,100, // IllusionStone
|
|
|
- 25297,200; // Frozen_PieceOfRock
|
|
|
- break;
|
|
|
- case 2: // Cap_IL
|
|
|
- .@eq_req = 2227; // Cap_
|
|
|
- .@part = EQI_HEAD_TOP;
|
|
|
-
|
|
|
- setarray .@items_req[0],
|
|
|
- 25271,50, // IllusionStone
|
|
|
- 25297,100; // Frozen_PieceOfRock
|
|
|
- break;
|
|
|
- case 3:
|
|
|
- end;
|
|
|
- }
|
|
|
- break;
|
|
|
- }
|
|
|
- mes "[Illusion Stone Researcher]";
|
|
|
- mes "For that equipment, I need the following materials.";
|
|
|
- mes "^4d4fff +9 " + getitemname(.@eq_req) + "";
|
|
|
- mes "" + .@items_req[1] + " " + getitemname(.@items_req[0]) + "";
|
|
|
- mes "" + .@items_req[3] + " " + getitemname(.@items_req[2]) + "^000000";
|
|
|
- mes "Do you want to continue?";
|
|
|
- next;
|
|
|
- if (select( "Continue.", "I'll bring those materials." ) == 2) {
|
|
|
- mes "[Illusion Stone Researcher]";
|
|
|
- mes "Come back when you're ready.";
|
|
|
- close;
|
|
|
- }
|
|
|
- if (countitem(.@items_req[0]) < .@items_req[1] || countitem(.@items_req[2]) < .@items_req[3]) {
|
|
|
- mes "[Illusion Stone Researcher]";
|
|
|
- mes "You don't have all the materials.";
|
|
|
- close;
|
|
|
- }
|
|
|
- .@equip_id = getequipid(.@part);
|
|
|
- if (.@equip_id == -1) {
|
|
|
- mes "[Illusion Stone Researcher]";
|
|
|
- if (.@part == EQI_HAND_R)
|
|
|
- mes "Where's your weapon?";
|
|
|
- else
|
|
|
- mes "Why don't you go wear that equipment first?";
|
|
|
- close;
|
|
|
- }
|
|
|
- if (.@equip_id != .@eq_req) {
|
|
|
- mes "[Illusion Stone Researcher]";
|
|
|
- mes "Please equip a ^4d4fff+9 " + getitemname(.@eq_req) + ".^000000";
|
|
|
+ mes "It's just hard to get..";
|
|
|
close;
|
|
|
}
|
|
|
- if (getequiprefinerycnt(.@part) < 9) {
|
|
|
- mes "[Illusion Stone Researcher]";
|
|
|
- mes "I can only upgrade equipment that is ^4d4fffrefined to at least +9.^000000";
|
|
|
- close;
|
|
|
- }
|
|
|
- mes "[Illusion Stone Researcher]";
|
|
|
- mes "There you go.";
|
|
|
- delequip .@part;
|
|
|
- delitem .@items_req[0], .@items_req[1];
|
|
|
- delitem .@items_req[2], .@items_req[3];
|
|
|
- getitem .@reward_id[.@s],1;
|
|
|
- close;
|
|
|
+ end;
|
|
|
}
|
|
|
|
|
|
|
|
|
@@ -1349,8 +733,6 @@ OnTouch:
|
|
|
|
|
|
// Exchange npc
|
|
|
alberta,226,28,3 script Equipment Researcher 4_TOWER_15,{
|
|
|
- disable_items;
|
|
|
-
|
|
|
.@illusion_stone_name$ = getitemname(25271);
|
|
|
|
|
|
mes "[Equipment Researcher]";
|
|
|
@@ -1358,7 +740,7 @@ alberta,226,28,3 script Equipment Researcher 4_TOWER_15,{
|
|
|
mes "If you have the materials I need for my research, wouldn't you hand them over?";
|
|
|
mes "If you give me some equipment and some materials, I'll exchange them for my reinforced equipment.";
|
|
|
next;
|
|
|
- switch( select( "What are you doing here?", "Exchange Weapon", "Exchange Armor" ) ) {
|
|
|
+ switch( select( "What are you doing here?", "Exchange equipment" ) ) {
|
|
|
case 1:
|
|
|
mes "[Equipment Researcher]";
|
|
|
mes "I'm working on how to use an " + .@illusion_stone_name$ + " to strengthen equipment.";
|
|
|
@@ -1371,137 +753,19 @@ alberta,226,28,3 script Equipment Researcher 4_TOWER_15,{
|
|
|
close;
|
|
|
case 2:
|
|
|
mes "[Equipment Researcher]";
|
|
|
- mes "What are the weapons I can exchange? Wait a minute. I'll name them.";
|
|
|
- next;
|
|
|
- mes "[Equipment Researcher]";
|
|
|
- mes "" + mesitemlink(13469, false) + ",";
|
|
|
- mes "" + mesitemlink(1326, false) + ",";
|
|
|
- mes "" + mesitemlink(32005, false) + ",";
|
|
|
- mes "" + mesitemlink(13338, false) + ",";
|
|
|
- mes "" + mesitemlink(16065, false) + ".";
|
|
|
- mes "Each has two slots.";
|
|
|
+ mes "What are the equipment I can exchange? Wait a minute. I'll let you know.";
|
|
|
next;
|
|
|
mes "[Equipment Researcher]";
|
|
|
- mes "As a material, you can bring ^0000CDexisting weapons that have been refined over +9.^000000";
|
|
|
+ mes "As a material, you can bring ^0000CDexisting equipment that have been refined to +9 or higher.^000000";
|
|
|
mes "And I need some ^0000CD" + .@illusion_stone_name$ + " and other materials.^000000";
|
|
|
- mes "If you pick the weapon you want, I'll tell you in detail.";
|
|
|
next;
|
|
|
mes "[Equipment Researcher]";
|
|
|
- mes "Of course, we're giving you new weapons, so don't forget that all the existing ^0000CDsmelting and enchantments^000000 will disappear.";
|
|
|
- mes "I need to see the performance of the weapons to be exchanged, so you must ^0000CDwear them^000000.";
|
|
|
+ mes "Of course, we're giving you new equipment, so don't forget that all the existing ^0000CDsmelting and enchantments^000000 will disappear.";
|
|
|
mes "So, what kind of weapon do you want?";
|
|
|
- next;
|
|
|
- switch( select( "Illusion Immaterial Sword", "Illusion War Axe", "Illusion Pole Axe", "Illusion Wing Shuriken", "Illusion Iron Driver" ) ) {
|
|
|
- case 1:
|
|
|
- .@reward = 13469; // Illusion Immaterial Sword
|
|
|
- .@eq_req = 1141; // Immaterial Sword
|
|
|
- .@part = EQI_HAND_R;
|
|
|
-
|
|
|
- setarray .@items_req[0],
|
|
|
- 25271,100, // Illusion Stones
|
|
|
- 25314,50; // Ships Log
|
|
|
- break;
|
|
|
- case 2:
|
|
|
- .@reward = 1326; // Illusion War Axe
|
|
|
- .@eq_req = 1306; // War Axe
|
|
|
- .@part = EQI_HAND_R;
|
|
|
-
|
|
|
- setarray .@items_req[0],
|
|
|
- 25271,100, // Illusion Stones
|
|
|
- 25311,200; // Black Piece of Soul
|
|
|
- break;
|
|
|
- case 3:
|
|
|
- .@reward = 32005; // Illusion Pole Axe
|
|
|
- .@eq_req = 1417; // Pole Axe
|
|
|
- .@part = EQI_HAND_R;
|
|
|
-
|
|
|
- setarray .@items_req[0],
|
|
|
- 25271,100, // Illusion Stones
|
|
|
- 25311,200; // Black Piece of Soul
|
|
|
- break;
|
|
|
- case 4:
|
|
|
- .@reward = 13338; // Illusion Wing Shuriken
|
|
|
- .@eq_req = 13300; // Huuma Wing Shuriken
|
|
|
- .@part = EQI_HAND_R;
|
|
|
-
|
|
|
- setarray .@items_req[0],
|
|
|
- 25271,100, // Illusion Stones
|
|
|
- 25313,200; // Old Turtle Shells
|
|
|
- break;
|
|
|
- case 5:
|
|
|
- .@reward = 16065; // Illusion Iron Driver
|
|
|
- .@eq_req = 1529; // Iron Driver
|
|
|
- .@part = EQI_HAND_R;
|
|
|
-
|
|
|
- setarray .@items_req[0],
|
|
|
- 25271,100, // Illusion Stones
|
|
|
- 25313,200; // Old Turtle Shells
|
|
|
- break;
|
|
|
- }
|
|
|
- mes "[Equipment Researcher]";
|
|
|
- mes "" + mesitemlink(.@reward, false) + "?";
|
|
|
- mes "I need " + callfunc("F_GetArticle",getitemname(.@eq_req)) + " ^0000CD+9 " + getitemname(.@eq_req) + " ^000000,";
|
|
|
- mes "^0000CD" + getitemname(.@items_req[0]) + " " + .@items_req[1] + "ea^000000 and ^0000CD" + getitemname(.@items_req[2]) + " " + .@items_req[3] + "ea^000000 as materials.";
|
|
|
- break;
|
|
|
- case 3:
|
|
|
- .@reward = 19247; // Illusion Fancy Flower
|
|
|
- .@eq_req = 2207; // Fancy Flower
|
|
|
- .@part = EQI_HEAD_TOP;
|
|
|
-
|
|
|
- setarray .@items_req[0],
|
|
|
- 25271,50, // Illusion Stones
|
|
|
- 25312,50; // Pretty Old Doll
|
|
|
-
|
|
|
- mes "[Equipment Researcher]";
|
|
|
- mes "You can only exchange one type of armor, " + mesitemlink(.@reward, false) + ". It has 1 slot.";
|
|
|
- mes "I need " + callfunc("F_GetArticle",getitemname(.@eq_req)) + " ^0000CD" + getitemname(.@eq_req) + "^000000,";
|
|
|
- mes "^0000CD" + getitemname(.@items_req[0]) + " " + .@items_req[1] + " ea^000000 and ^0000CD" + getitemname(.@items_req[2]) + " " + .@items_req[3] + " ea^000000 as materials.";
|
|
|
- next;
|
|
|
- mes "[Equipment Researcher]";
|
|
|
- mes "Of course, we're giving you new weapons, so don't forget that all the existing ^0000CDsmelting and enchantments^000000 will disappear.";
|
|
|
- mes "I need to see the performance of the weapons to be exchanged, so you must ^0000CDwear them^000000.";
|
|
|
- break;
|
|
|
- }
|
|
|
- mes "Would you like to exchange it right now?";
|
|
|
- next;
|
|
|
- if (select( "Exchange " + getitemname(.@reward), "Cancel" ) == 2) {
|
|
|
- mes "[Equipment Researcher]";
|
|
|
- mes "Yeah, come back if you change your mind.";
|
|
|
- close;
|
|
|
- }
|
|
|
- if (countitem(.@items_req[0]) < .@items_req[1] || countitem(.@items_req[2]) < .@items_req[3]) {
|
|
|
- mes "[Equipment Researcher]";
|
|
|
- mes "Well... you're running out of ingredients.";
|
|
|
- mes "Bring me ^0000CD" + getitemname(.@items_req[0]) + " " + .@items_req[1] + "ea^000000 and ^0000CD" + getitemname(.@items_req[2]) + " " + .@items_req[3] + " ea^000000. Then I'll exchange it for you..";
|
|
|
- close;
|
|
|
- }
|
|
|
- // custom texts and checks
|
|
|
- .@equip_id = getequipid(.@part);
|
|
|
- if (.@equip_id == -1) {
|
|
|
- mes "[Equipment Researcher]";
|
|
|
- if (.@part == EQI_HAND_R)
|
|
|
- mes "Where's your weapon?";
|
|
|
- else
|
|
|
- mes "Why don't you go wear that equipment first?";
|
|
|
- close;
|
|
|
- }
|
|
|
- if (.@equip_id != .@eq_req) {
|
|
|
- mes "[Equipment Researcher]";
|
|
|
- mes "Please equip " + callfunc("F_GetArticle",getitemname(.@eq_req)) + " ^4d4fff+9 " + getitemname(.@eq_req) + ".^000000";
|
|
|
- close;
|
|
|
- }
|
|
|
- if (getequiprefinerycnt(.@part) < 9) {
|
|
|
- mes "[Equipment Researcher]";
|
|
|
- mes "I can only upgrade equipment that is ^4d4fffrefined to at least +9.^000000";
|
|
|
- close;
|
|
|
+ close2;
|
|
|
+ callshop( "barter_ill_turtle" );
|
|
|
+ end;
|
|
|
}
|
|
|
- mes "[Equipment Researcher]";
|
|
|
- mes "There you go.";
|
|
|
- delequip .@part;
|
|
|
- delitem .@items_req[0], .@items_req[1];
|
|
|
- delitem .@items_req[2], .@items_req[3];
|
|
|
- getitem .@reward,1;
|
|
|
- close;
|
|
|
}
|
|
|
|
|
|
|
|
|
@@ -1511,141 +775,19 @@ alberta,226,28,3 script Equipment Researcher 4_TOWER_15,{
|
|
|
|
|
|
// Exchange npc
|
|
|
com_d02_i,234,266,6 script Village Soap#Lu 4_M_ORIENT01,{
|
|
|
- if (checkweight(1201,3) == 0) {
|
|
|
- mes "- You cannot proceed because you have too many items. -";
|
|
|
- close;
|
|
|
- }
|
|
|
- disable_items;
|
|
|
- setarray .@equipment_id[0],
|
|
|
- 18174,
|
|
|
- 28626,
|
|
|
- 19366,
|
|
|
- 15348,
|
|
|
- 22192,
|
|
|
- 20923;
|
|
|
- setarray .@equipment_name$[0],
|
|
|
- getitemname(.@equipment_id[0]),
|
|
|
- getitemname(.@equipment_id[1]),
|
|
|
- getitemname(.@equipment_id[2]),
|
|
|
- getitemname(.@equipment_id[3]),
|
|
|
- getitemname(.@equipment_id[4]),
|
|
|
- getitemname(.@equipment_id[5]);
|
|
|
-
|
|
|
mes "[Village Soap]";
|
|
|
mes "I've also rolled up my sleeves for the adventurers who work hard for the village. Can I make your equipment stronger? Is there anything on the list you want?";
|
|
|
next;
|
|
|
- .@s = select( "[Material Check] View catalog.", "[Production Request] " + .@equipment_name$[0], "[Production Request] " + .@equipment_name$[1], "[Production Request] " + .@equipment_name$[2],
|
|
|
- "[Production Request] " + .@equipment_name$[3], "[Production Request] " + .@equipment_name$[4], "[Production Request] " + .@equipment_name$[5] ) - 2;
|
|
|
- if (.@s == -1) {
|
|
|
+ if (select( "Look at the illusion equipment", "Cancel" ) == 2) {
|
|
|
mes "[Village Soap]";
|
|
|
- mes "Are you curious about the ingredients? Take a look.";
|
|
|
- while(1) {
|
|
|
- next;
|
|
|
- .@s = select( "Stop watching", "[Material Check] " + .@equipment_name$[0], "[Material Check] " + .@equipment_name$[1], "[Material Check] " + .@equipment_name$[2],
|
|
|
- "[Material Check] " + .@equipment_name$[3], "[Material Check] " + .@equipment_name$[4], "[Material Check] " + .@equipment_name$[5] ) - 2;
|
|
|
- if (.@s == -1) {
|
|
|
- mes "[Village Soap]";
|
|
|
- mes "If you equip the required equipment and bring the ingredients, I'll make it for you in no time.";
|
|
|
- close;
|
|
|
- }
|
|
|
- .@size = callsub( S_Data, .@equipment_id[.@s], .@equip_id_refined, .@req_id, .@req_amount, .@part );
|
|
|
-
|
|
|
- mes "" + mesitemlink(.@equipment_id[.@s]) + "";
|
|
|
- mes "**********************************";
|
|
|
- if (.@equipment_id[.@s] == 18174)
|
|
|
- mes "1 " + mesitemlink(.@equip_id_refined) + "";
|
|
|
- else
|
|
|
- mes "1 " + mesitemlink(.@equip_id_refined) + "";
|
|
|
- for ( .@i = 0; .@i < .@size; ++.@i )
|
|
|
- mes "" + .@req_amount[.@i] + " " + mesitemlink(.@req_id[.@i]) + "";
|
|
|
- }
|
|
|
- end;
|
|
|
- }
|
|
|
- .@size = callsub( S_Data, .@equipment_id[.@s], .@equip_id_refined, .@req_id, .@req_amount, .@part );
|
|
|
-
|
|
|
- if (getequiprefinerycnt(.@part) < 9) {
|
|
|
- mes "[Village Soap]";
|
|
|
- mes "I don't care what this equipment is, but it needs to be refined to at least +9.";
|
|
|
+ mes "Please come later. Just bring the ingredients and I'll make it for you.";
|
|
|
close;
|
|
|
}
|
|
|
- if (getequipid(.@part) != .@equip_id_refined) {
|
|
|
- mes "[Village Soap]";
|
|
|
- mes "Eheh- This dude misunderstood me. Do you have to equip the equipment that becomes the material?";
|
|
|
- close;
|
|
|
- }
|
|
|
- // todo text (currently custom)
|
|
|
-
|
|
|
- for ( .@i = 0; .@i < .@size; ++.@i ) {
|
|
|
- if (countitem(.@req_id[.@i]) < .@req_amount[.@i]) {
|
|
|
- mes "[Village Soap]";
|
|
|
- mes "You don't have enough items.";
|
|
|
- close;
|
|
|
- }
|
|
|
- }
|
|
|
- delequip .@part;
|
|
|
- for ( .@i = 0; .@i < .@size; ++.@i )
|
|
|
- delitem .@req_id[.@i], .@req_amount[.@i];
|
|
|
- getitem .@equipment_id[.@s],1;
|
|
|
+ mes "[Village Soap]";
|
|
|
+ mes "Who made it? It might be useful for you to take it with you.";
|
|
|
+ close2;
|
|
|
+ callshop( "barter_ill_luanda" );
|
|
|
end;
|
|
|
-
|
|
|
-S_Data:
|
|
|
- switch( getarg(0) ) {
|
|
|
- case 18174:
|
|
|
- set getarg(1), 1726; // .@equip_id_refined,
|
|
|
- setarray .@req[0],
|
|
|
- 25636,50,
|
|
|
- 25640,50,
|
|
|
- 25637,50,
|
|
|
- 25271,80;
|
|
|
- set getarg(4), EQI_HAND_R;
|
|
|
- break;
|
|
|
- case 28626:
|
|
|
- set getarg(1), 1552;
|
|
|
- setarray .@req[0],
|
|
|
- 25642,100,
|
|
|
- 25271,50;
|
|
|
- set getarg(4), EQI_HAND_R;
|
|
|
- break;
|
|
|
- case 19366:
|
|
|
- set getarg(1), 5128;
|
|
|
- setarray .@req[0],
|
|
|
- 25634,30,
|
|
|
- 25633,150,
|
|
|
- 25271,120;
|
|
|
- set getarg(4), EQI_HEAD_TOP;
|
|
|
- break;
|
|
|
- case 15348:
|
|
|
- set getarg(1), 2354;
|
|
|
- setarray .@req[0],
|
|
|
- 25641,100,
|
|
|
- 25638,150,
|
|
|
- 25271,80;
|
|
|
- set getarg(4), EQI_ARMOR;
|
|
|
- break;
|
|
|
- case 22192:
|
|
|
- set getarg(1), 2419;
|
|
|
- setarray .@req[0],
|
|
|
- 25635,100,
|
|
|
- 25633,150,
|
|
|
- 25271,80;
|
|
|
- set getarg(4), EQI_SHOES;
|
|
|
- break;
|
|
|
- case 20923:
|
|
|
- set getarg(1), 2520;
|
|
|
- setarray .@req[0],
|
|
|
- 25639,30,
|
|
|
- 25638,150,
|
|
|
- 25271,120;
|
|
|
- set getarg(4), EQI_GARMENT;
|
|
|
- break;
|
|
|
- }
|
|
|
- .@size = getarraysize(.@req);
|
|
|
-
|
|
|
- for ( .@i = 0; .@i < .@size; .@i += 2 ) {
|
|
|
- set getelementofarray(getarg(2), .@i/2), .@req[.@i];
|
|
|
- set getelementofarray(getarg(3), .@i/2), .@req[.@i+1];
|
|
|
- }
|
|
|
- return (.@size/2);
|
|
|
}
|
|
|
|
|
|
|
Atemo