//===== rAthena Script ======================================= 
//= Cool Event Corp. Staff
//===== By: ================================================== 
//= Gepard
//===== Current Version: ===================================== 
//= 1.5
//===== Compatible With: ===================================== 
//= rAthena SVN
//===== Description: ========================================= 
//= Cool Event Corp. Staff (Save, Storage & Pushcart Service)
//= in Arunafeltz Region.
//===== Additional Comments: ================================= 
//= 1.0 First version, iRO Sakray X.4 [Gepard]
//= 1.1 Optimized, fixed a conditional bug [Lupus]
//= 1.1a Redo back. It wasn't a bug [Lupus]
//= 1.2 Added Rachel Cool Event Corp. Staff [Playtester]
//= 1.3 Added cutins, closed Kafra Password exploit
//=     until we got a client/packet based password support [Lupus]
//= 1.4 Added Veins Cool Event Corp. Staff. [L0ne_W0lf]
//= 1.5 Cool Event Corp staff is now more iRO like. [L0ne_W0lf]
//============================================================ 

hugel,88,168,4	script	׼Ա::CoolEventCorpStaffHugel	874,{
	cutin "zonda_01",2;
	mes "[׼Ա]";
	mes "ӭ׼磡";
	mes "ǵԱṩ24Сʱʷ";
	mes "ĸ";
	mes "";
	mes "ʲôΪ";
	next;
	switch(select("λ:ʹòֿ:Ƴ:ֿ:ȡ")){
	case 1:
		mes "[׼Ա]";
		mes "Ĵ";
		mes "ѱ";
		mes "ٸ";
		mes "ллʹ";
		mes "׼ķ.";
		savepoint "hugel",96,155;
		close2;
		break;
	case 2:
		mes "[׼Ա]";
		if(basicskillcheck() && getskilllv("NV_BASIC") < 6){
			mes "Բ";
			mes "Ļܵȼ";
			mes "6";
			mes "޷ʹòֿ.";
			close2;
			break;
		}
		if(Zeny < 40){
			mes "Բ";
			mes "ϵĽҲ";
			mes "޷ʹòֿ";
			mes "ֿҪ40Zeny";
			close2;
			break;
		}
		set Zeny, Zeny - 40;
		mes "Ұ";
		mes "ĸ˲ֿ";
		mes "ллʹ׼";
		mes "Ϊṩķ";
		mes "ףȹһ";
		callfunc("F_CheckKafCode");	//check your storage password, if set
		close2;
		openstorage;
		break;
	case 3:
		mes "[׼Ա]";
		if(BaseClass != Job_Merchant){
			mes "Բ";
			mes "Ƴ÷";
			mes "ֻṩ, ";
			mes ", , ";
			mes "ʦԼ.";
			close2;
			break;
		}
		if(getskilllv("MC_PUSHCART") == 0){
			mes "ҪѧϰƳ";
			mes "ſƳ.";
			close2;
			break;
		}
		if(checkcart() == 1){
			mes "Ѿӵ";
			mes "һƳ.";
			mes "ҵ, ޷";
			mes "Ƴ";
			mes "Ѿӵеû.";
			close2;
			break;
		}
		if(countitem(7061)){
			delitem 7061,1;
			setcart;
			close2;
			break;
		}
		mes "Ƴ";
		mes "۸Ϊ800Zeny";
		mes "Ƴ";
		next;
		if(select("һƳ:ȡ") == 1){
			if(Zeny < 800){
				mes "[׼Ա]";
				mes "Բ.";
				mes "û㹻Zeny";
				mes "֧";
				mes "Ƴķ.";
			} else {
				set Zeny, Zeny - 800;
				setcart;
			}
		}
		close2;
		break;
	case 4:
		callfunc("F_SetKafCode","[׼Ա]","׼.");
		//the function closes msg and remoes cutins
	case 5:
	default:
		mes "[׼Ա]";
		mes "׼һֱ";
		mes "ڽ߳ṩ˿";
		mes "Ϊʵķ.";
		mes "õİ취";
		mes "ṩ";
		mes "Լʵķ.лл.";
		close2;
	}
	cutin "", 255;
	end;
}

rachel,109,138,5	script	׼Ա::CoolEventCorpStaffRachel	874,{
	cutin "zonda_01",2;
	mes "[׼Ա]";
	mes "ӭ׼磡";
	mes "ǵԱṩ24Сʱʷ";
	mes "ĸ";
	mes "";
	mes "ʲôΪ";
	next;
	switch(select("λ:ʹòֿ:Ƴ:ֿ:ȡ")){
	case 1:
		mes "[׼Ա]";
		mes "Ĵ";
		mes "ѱ";
		mes "";
		mes "ллʹ";
		mes "׼ķ.";
		savepoint "rachel",113,137;
		close2;
		break;
	case 2:
		mes "[׼Ա]";
		if(basicskillcheck() && getskilllv("NV_BASIC") < 6){
			mes "Բ";
			mes "Ļܵȼ";
			mes "6";
			mes "޷ʹòֿ.";
			close2;
			break;
		}
		if(Zeny < 40){
			mes "Բ";
			mes "ϵĽҲ";
			mes "޷ʹòֿ";
			mes "ֿҪ40Zeny";
			close2;
			break;
		}
		set Zeny, Zeny - 40;
		mes "Ұ";
		mes "ĸ˲ֿ";
		mes "ллʹ׼";
		mes "Ϊṩķ";
		mes "ףȹһ";
		callfunc("F_CheckKafCode");	//check your storage password, if set
		close2;
		openstorage;
		break;
	case 3:
		mes "ѡ";
		mes "Ŀĵ.";
		next;
		if (select("˹ -> 2200 z:ȡ") == 1) {
			if ((countitem(7060) != 0) || (Zeny >= 2200)) {
				if (countitem(7060) != 0) {
					delitem 7060,1;
				}
				else {
					set Zeny,Zeny-2200;
				}
				warp "veins",205,101;
				cutin "",255;
				end;
			}
			else {
				mes "[׼Ա]";
				mes "ǳǸ.";
				mes "ЯZeny.";
				mes "޷ʹôͷ.";
				mes "͵˹Ҫ 2200 zeny.";
			}
		}
		close2;
		break;
	case 4:
		mes "[׼Ա]";
		if(BaseClass != Job_Merchant){
			mes "Բ";
			mes "Ƴ÷";
			mes "ֻṩ, ";
			mes ", , ";
			mes "ʦԼ.";
			close2;
			break;
		}
		if(getskilllv("MC_PUSHCART") == 0){
			mes "ҪѧϰƳ";
			mes "ſƳ.";
			close2;
			break;
		}
		if(checkcart() == 1){
			mes "Ѿӵ";
			mes "һƳ.";
			mes "ҵ, ޷";
			mes "Ƴ";
			mes "Ѿӵеû.";
			close2;
			break;
		}
		if(countitem(7061)){
			delitem 7061,1;
			setcart;
			close2;
			break;
		}
		mes "Ƴ";
		mes "۸Ϊ800Zeny";
		mes "Ƴ";
		next;
		if(select("һƳ:ȡ") == 1){
			if(Zeny < 800){
				mes "[׼Ա]";
				mes "Բ.";
				mes "û㹻Zeny";
				mes "֧";
				mes "Ƴķ.";
			} else {
				set Zeny, Zeny - 800;
				setcart;
			}
		}
		close2;
		break;
	case 5:
		callfunc("F_SetKafCode","[׼Ա]","׼.");
		//the function closes msg and remoes cutins
	case 6:
	default:
		mes "[׼Ա]";
		mes "׼һֱ";
		mes "ڽ߳ṩ˿";
		mes "Ϊʵķ.";
		mes "õİ취";
		mes "ṩ";
		mes "Լʵķ.лл.";
		close2;
	}
	cutin "", 255;
	end;
}

veins,208,128,5	script	Cool Event Corp. Staff::CoolEventCorpStaffVeins	874,{
	cutin "zonda_01",2;
	mes "[׼Ա]";
	mes "ӭ׼磡";
	mes "ǵԱṩ24Сʱʷ";
	mes "ĸ";
	mes "";
	mes "ʲôΪ";
	next;
	switch(select("λ:ʹòֿ:Ƴ:ֿ:ȡ")){
	case 1:
		mes "[׼Ա]";
		mes "Ĵ";
		mes "ѱ";
		mes "˹";
		mes "ллʹ";
		mes "׼ķ.";
		savepoint "veins",204,103;
		close2;
		break;
	case 2:
		mes "[׼Ա]";
		if(basicskillcheck() && getskilllv("NV_BASIC") < 6){
			mes "Բ";
			mes "Ļܵȼ";
			mes "6";
			mes "޷ʹòֿ.";
			close2;
			break;
		}
		if(Zeny < 40){
			mes "Բ";
			mes "ϵĽҲ";
			mes "޷ʹòֿ";
			mes "ֿҪ40Zeny";
			close2;
			break;
		}
		set Zeny, Zeny - 40;
		mes "Ұ";
		mes "ĸ˲ֿ";
		mes "ллʹ׼";
		mes "Ϊṩķ";
		mes "ףȹһ";
		callfunc("F_CheckKafCode");	//check your storage password, if set
		close2;
		openstorage;
		break;
	case 3:
		mes "ѡ";
		mes "Ŀĵ.";
		next;
		if (select(" -> 2200 z:ȡ") == 1) {
			if ((countitem(7060) != 0) || (Zeny >= 2200)) {
				if (countitem(7060) != 0) {
					delitem 7060,1;
				}
				else {
					set Zeny,Zeny-2200;
				}
				warp "rachel",115,125;
				cutin "",255;
				end;
			}
			else {
				mes "[׼Ա]";
				mes "ǳǸ.";
				mes "ЯZeny.";
				mes "޷ʹôͷ.";
				mes "͵Ҫ 2200 zeny.";
			}
		}
		close2;
		break;
	case 4:
		mes "[׼Ա]";
		if(BaseClass != Job_Merchant){
			mes "Բ";
			mes "Ƴ÷";
			mes "ֻṩ, ";
			mes ", , ";
			mes "ʦԼ.";
			close2;
			break;
		}
		if(getskilllv("MC_PUSHCART") == 0){
			mes "ҪѧϰƳ";
			mes "ſƳ.";
			close2;
			break;
		}
		if(checkcart() == 1){
			mes "Ѿӵ";
			mes "һƳ.";
			mes "ҵ, ޷";
			mes "Ƴ";
			mes "Ѿӵеû.";
			close2;
			break;
		}
		if(countitem(7061)){
			delitem 7061,1;
			setcart;
			close2;
			break;
		}
		mes "Ƴ";
		mes "۸Ϊ800Zeny";
		mes "Ƴ";
		next;
		if(select("һƳ:ȡ") == 1){
			if(Zeny < 800){
				mes "[׼Ա]";
				mes "Բ.";
				mes "û㹻Zeny";
				mes "֧";
				mes "Ƴķ.";
				close2;
			} else {
				set Zeny, Zeny - 800;
				setcart;
			}
		}
		close2;
		break;
	case 5:
		callfunc("F_SetKafCode","[׼Ա]","׼.");
		//the function closes msg and remoes cutins
	case 6:
	default:
		mes "[׼Ա]";
		mes "׼һֱ";
		mes "ڽ߳ṩ˿";
		mes "Ϊʵķ.";
		mes "õİ취";
		mes "ṩ";
		mes "Լʵķ.лл.";
		close2;
	}
	cutin "", 255;
	end;
}
