//===== eAthena Script ======================================= 
//= Armor Enchanter
//===== By: ================================================== 
//= L0ne_W0lf
//===== Current Version: ===================================== 
//= 1.0
//===== Compatible With: ===================================== 
//= eAhena SVN
//===== Description: ========================================= 
//= [Aegis Conversion]
//= Add a +1, 2, or 3, of a random stat to specified armor.
//===== Additional Comments: ================================= 
//= 1.0 First version.
//= v1.0.20091212 溺 [5511]
//= v1.0.20120309 ԻڼֹκƷز [5511]
//============================================================ 

prontera,165,60,2	script	ʵϰħʦ	73,{
	disable_items;
	if (Zeny > 399999) {
		mes "[ʵϰħʦ]";
		mes "һֱо߷ߵ.";
		next;
		mes "[ʵϰħʦ]";
		mes "Ϊ߸ħһֺܸ߼ļ, Խصע뵽.";
		next;
		mes "[ʵϰħʦ]";
		mes "Ȼ, һҪסͬķ, ǽƷĴλõȺиħ.";
		next;
		mes "[ʵϰħʦ]";
		mes "Ļ, 㲻Ҫħķ߶ᱻħ. һֻ^5555ffһ^000000Ҫħķ, Ϊȫ..";
		next;
		mes "[ʵϰħʦ]";
		mes "ͬķ, ʲôĻ, ҿɲκ.";
		next;
		switch(select("޶.:ж.:߼ϵз.:´˵.")) {
		case 1:
			//switch(select("::Ӽ::˿:ʥְ֮: :ľ::֮:ħ:֮:::ˮ:::̷ Ѫӣ:ɫ:ٹ:ٹ:ٹռ")) {
			switch(select(getitemname(2307)+":"+getitemname(2309)+":"+getitemname(2314)+":"+getitemname(2316)+":"+getitemname(2321)+":"+getitemname(2325)+":"+getitemname(2327)+":"+getitemname(2328)+":"+getitemname(2330)+":"+getitemname(2332)+":"+getitemname(2334)+":"+getitemname(2335)+":"+getitemname(2341)+":"+getitemname(2344)+":"+getitemname(2346)+":"+getitemname(2348)+":"+getitemname(2350)+":"+getitemname(2337)+":"+getitemname(2386)+":"+getitemname(2394)+":"+getitemname(2395)+":"+getitemname(2396))) {
			case 1:
				callsub S_EnchantArmor,2307,50;
			case 2:
				callsub S_EnchantArmor,2309,50;
			case 3:
				callsub S_EnchantArmor,2314,50;
			case 4:
				callsub S_EnchantArmor,2316,50;
			case 5:
				callsub S_EnchantArmor,2321,50;
			case 6:
				callsub S_EnchantArmor,2325,50;
			case 7:
				callsub S_EnchantArmor,2327,50;
			case 8:
				callsub S_EnchantArmor,2328,50;
			case 9:
				callsub S_EnchantArmor,2330,50;
			case 10:
				callsub S_EnchantArmor,2332,50;
			case 11:
				callsub S_EnchantArmor,2334,50;
			case 12:
				callsub S_EnchantArmor,2335,50;
			case 13:
				callsub S_EnchantArmor,2341,50;
			case 14:
				callsub S_EnchantArmor,2344,50;
			case 15:
				callsub S_EnchantArmor,2346,50;
			case 16:
				callsub S_EnchantArmor,2348,50;
			case 17:
				callsub S_EnchantArmor,2350,50;
			case 18:
				callsub S_EnchantArmor,2337,50;
			case 19:
				callsub S_EnchantArmor,2386,50;
			case 20:
				callsub S_EnchantArmor,2394,50;
			case 21:
				callsub S_EnchantArmor,2395,50;
			case 22:
				callsub S_EnchantArmor,2396,50;
			}
		case 2:
			//switch(select("ëƤ: : :װ:(1):(1):Ӽ(1):(1):˿(1):ʥְ֮(1):ʥְ֮(1):(1):֮(1):֮(1):(1):(1):ˮ(1):(1):(1)")) {
			switch(select(getitemname(2311)+":"+getitemname(2318)+":"+getitemname(2319)+":"+getitemname(2320)+":"+getitemname(2308)+"(1):"+getitemname(2310)+"(1):"+getitemname(2315)+"(1):"+getitemname(2317)+"(1):"+getitemname(2322)+"(1):"+getitemname(2324)+"(1):"+getitemname(2326)+"(1):"+getitemname(2331)+"(1):"+getitemname(2333)+"(1):"+getitemname(2336)+"(1):"+getitemname(2342)+"(1):"+getitemname(2345)+"(1):"+getitemname(2347)+"(1):"+getitemname(2349)+"(1):"+getitemname(2351)+"(1)")) {
			case 1:
				callsub S_EnchantArmor,2311,55;
			case 2:
				callsub S_EnchantArmor,2318,55;
			case 3:
				callsub S_EnchantArmor,2319,55;
			case 4:
				callsub S_EnchantArmor,2320,55;
			case 5:
				callsub S_EnchantArmor,2308,55;
			case 6:
				callsub S_EnchantArmor,2310,55;
			case 7:
				callsub S_EnchantArmor,2315,55;
			case 8:
				callsub S_EnchantArmor,2317,55;
			case 9:
				callsub S_EnchantArmor,2322,55;
			case 10:
				callsub S_EnchantArmor,2324,55;
			case 11:
				callsub S_EnchantArmor,2326,55;
			case 12:
				callsub S_EnchantArmor,2331,55;
			case 13:
				callsub S_EnchantArmor,2333,55;
			case 14:
				callsub S_EnchantArmor,2336,55;
			case 15:
				callsub S_EnchantArmor,2342,55;
			case 16:
				callsub S_EnchantArmor,2345,55;
			case 17:
				callsub S_EnchantArmor,2347,55;
			case 18:
				callsub S_EnchantArmor,2349,55;
			case 19:
				callsub S_EnchantArmor,2351,55;
			}
		case 3:
			//switch(select("ʯ :¶ﰺ Ʒ:֮:־峤:־ս:ͻ:ǿϮ:Ӱ:ָӹٵս:ָӹٵҽ:ָӹٵƤ:ѻֵĴ::ж:ۼ:ͽ")) {
			switch(select(getitemname(2364)+":"+getitemname(2365)+":"+getitemname(2391)+":"+getitemname(2374)+":"+getitemname(2375)+":"+getitemname(2376)+":"+getitemname(2377)+":"+getitemname(2378)+":"+getitemname(2379)+":"+getitemname(2380)+":"+getitemname(2381)+":"+getitemname(2382)+":"+getitemname(2387)+":"+getitemname(2388)+":"+getitemname(2389)+":"+getitemname(2390))) {
			case 1:
				callsub S_EnchantArmor,2364,60;
			case 2:
				callsub S_EnchantArmor,2365,60;
			case 3:
				callsub S_EnchantArmor,2391,60;
			case 4:
				callsub S_EnchantArmor,2374,60;
			case 5:
				callsub S_EnchantArmor,2375,60;
			case 6:
				callsub S_EnchantArmor,2376,60;
			case 7:
				callsub S_EnchantArmor,2377,60;
			case 8:
				callsub S_EnchantArmor,2378,60;
			case 9:
				callsub S_EnchantArmor,2379,60;
			case 10:
				callsub S_EnchantArmor,2380,60;
			case 11:
				callsub S_EnchantArmor,2381,60;
			case 12:
				callsub S_EnchantArmor,2382,60;
			case 13:
				callsub S_EnchantArmor,2387,60;
			case 14:
				callsub S_EnchantArmor,2388,60;
			case 15:
				callsub S_EnchantArmor,2389,60;
			case 16:
				callsub S_EnchantArmor,2390,60;
			}
		case 4:
			mes "[ʵϰħʦ]";
			mes "Է߸ħȤĻ.";
			close2;
			enable_items;
			end;
		}
	}
	else {
		mes "[ʵϰħʦ]";
		mes "Ҹߵĸħ. ˵, һֱо߷ߵ.";
		next;
		mes "[ʵϰħʦ]";
		mes "ȤҪķ߸ħĻ, 400,000 Zeny Ҫħķ.";
		close2;
		enable_items;
		end;
	}

S_EnchantArmor:
	set .@itemid,getarg(0);
	set .@failrate,getarg(1);
	if ((countitem(.@itemid) > 0) && (countitem(.@itemid) < 2)) {
		mes "[ʵϰħʦ]";
		mes "ħҪ400,000 Zeny. ҸħĽ. Ȼ, ܿڸħʱ, ķ߻ٵ.";
		next;
		mes "[ʵϰħʦ]";
		mes "Ҫһ.";
		mes "^ff5555ħķߵǰľȺͿƬʧ.^000000";
		mes "ô㻹Ҫħ?";
		next;
		switch(select("... ٿǿǰ.:ħ.")) {
		case 1:
			mes "[ʵϰħʦ]";
			mes "õ, Ҳ. ȫһҪ, ԰?";
			mes "Ǿף.";
			close2;
			enable_items;
			end;
		case 2:
			mes "[ʵϰħʦ]";
			mes "Ҫһðհ? õ, ǿʼ?";
			close2;
			specialeffect2 EF_MAPPILLAR;
			if (Zeny < 400000) {
				mes "[ʵϰħʦ]";
				mes "Ǹ, û㹻ĽǮ.";
				close2;
				enable_items;
				end;
			}
			progressbar "ffff00",7;
			set .@enc_ran,rand(1,.@failrate);
			set zeny,zeny-400000;
			delitem .@itemid,1;
			if (.@enc_ran == 1) {
				set .@addpart,4702;
			}
			else if (.@enc_ran == 2) {
				set .@addpart,4712;
			}
			else if (.@enc_ran == 3) {
				set .@addpart,4722;
			}
			else if (.@enc_ran == 4) {
				set .@addpart,4732;
			}
			else if (.@enc_ran == 5) {
				set .@addpart,4742;
			}
			else if (.@enc_ran == 6) {
				set .@addpart,4752;
			}
			else if ((.@enc_ran > 6) && (.@enc_ran < 9)) {
				set .@addpart,4701;
			}
			else if ((.@enc_ran > 8) && (.@enc_ran < 11)) {
				set .@addpart,4711;
			}
			else if ((.@enc_ran > 10) && (.@enc_ran < 13)) {
				set .@addpart,4721;
			}
			else if ((.@enc_ran > 12) && (.@enc_ran < 15)) {
				set .@addpart,4731;
			}
			else if ((.@enc_ran > 14) && (.@enc_ran < 17)) {
				set .@addpart,4741;
			}
			else if ((.@enc_ran > 16) && (.@enc_ran < 19)) {
				set .@addpart,4751;
			}
			else if ((.@enc_ran > 18) && (.@enc_ran < 22)) {
				set .@addpart,4700;
			}
			else if ((.@enc_ran > 21) && (.@enc_ran < 25)) {
				set .@addpart,4710;
			}
			else if ((.@enc_ran > 24) && (.@enc_ran < 28)) {
				set .@addpart,4720;
			}
			else if ((.@enc_ran > 27) && (.@enc_ran < 31)) {
				set .@addpart,4730;
			}
			else if ((.@enc_ran > 30) && (.@enc_ran < 34)) {
				set .@addpart,4740;
			}
			else if ((.@enc_ran > 33) && (.@enc_ran < 37)) {
				set .@addpart,4750;
			}
			else {
				specialeffect2 EF_PHARMACY_FAIL;
				mes "[ʵϰħʦ]";
				mes ", ̫.";
				mes "ħȻʧ.";
				close2;
				enable_items;
				end;
			}
			getitem2 .@itemid, 1, 1, 0, 0, 0, 0, 0, .@addpart;
			enable_items;
			end;
		}
	}
	else {
		mes "[ʵϰħʦ]";
		mes "? ûжԱħѽ!";
		mes "ȷֻһҪħķ.";
		close2;
		enable_items;
		end;
	}
}