//=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
// Npc criado by WorD
//=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
// Nome do Npc Administrador de CASH/VIP
//=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
// Versão atual 1.0
//=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
//Nao Retirem os Creditos Por Favor
//=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
prontera,151,188,4	script	Admin	717,{


set @npc$,"[^FF7F24Donations Admin^000000]";
set @lv,99;

if (getgmlevel() < @lv){ mes @npc$; mes "Você não Pode Falar Comigo."; close; }

mes @npc$;
mes "Olá Administrador "+strcharinfo(0)+" gostaria de Fazer oque hoje?";
switch(select("Administrar VIP","Administrar CASH","Somente Sair")){

	case 1:
		next;
		mes @npc$;
		mes "Oque o Sr. Gostaria?";
		if(select("- Adicionar VIP:- Somente Sair") == 2) close;
		next;
		mes @npc$;
		mes "Prosseguindo..";
		sleep2 2000;
		mes "Digite o Login da Conta que Deseja Adicionar VIP";
		input .@login$;
		query_sql "SELECT `account_id` FROM `login` WHERE `userid`='"+.@login$+"'",.@result;
		if(.@result == 0){
		next;
		mes @npc$;
		mes "Desculpe mais você não digitou o login da conta corretamente.";
		close;
		}
		next;
		mes @npc$;
		mes "Pois Bem,Digite a Quantidade de Dias VIP que Deseja adicionar:";
		input .@qnt;
		if(.@qnt == 0){
		next;
		mes @npc$;
		mes "Desculpe mas você digitou uma quantidade inválida.";
		close;
		}
		next;
		mes @npc$;
		mes "Confere? ^00BFFF"+.@qnt+"^000000 dias VIP na conta ^00BFFF"+.@login$+"^000000?";
		if (select("Sim:Não")==2) close;
		next;
		mes @npc$;
		mes "Os dias VIP da conta "+@login$+" foram adicionados com sucesso.";
		query_sql "UPDATE `login` SET `level`='1',`diasvip`=`diasvip`+"+.@qnt+" WHERE `userid`='"+.@login$+"'";
		close;
		end;

	case 2:
		next;
		mes @npc$;
		mes "Oque o Sr. Gostaria?";
		if(select("- Adicionar CASH:- Somente Sair") == 2) close;
		next;
		mes @npc$;
		mes "Prosseguindo..";
		sleep2 2000;
		mes "Digite o Login da Conta que Deseja Adicionar CASH";
		input .@login$;
		query_sql "SELECT `account_id` FROM `login` WHERE `userid`='"+.@login$+"'",.@result;
		if(.@result == 0){
		next;
		mes @npc$;
		mes "Desculpe mais você não digitou o login da conta corretamente.";
		close;
		}
		next;
		mes @npc$;
		mes "Pois Bem,Digite a Quantidade de Dias CASH que Deseja adicionar:";
		input .@qnt;
		if(.@qnt == 0){
		next;
		mes @npc$;
		mes "Desculpe mas você digitou uma quantidade inválida.";
		close;
		}
		next;
		mes @npc$;
		mes "Confere? ^00BFFF"+.@qnt+"^000000 CASH na conta ^00BFFF"+.@login$+"^000000?";
		if (select("Sim:Não")==2) close;
		next;
		mes @npc$;
		mes "Os CASH's da conta "+@login$+" foram adicionados com sucesso.";
		query_sql "UPDATE `global_reg_value` SET `value`=`value`+'"+.@qnt+"' WHERE `str`='#CASHPOINTS' AND `account_id`='"+.@login$+"'";
		close;
		end;
	}
}

	-	script	Vip001	-1,{

	OnClock0001: query_sql "UPDATE `login` SET `diasvip`=`diasvip`-1 WHERE `level`='1'"; end;
	OnClock0002: query_sql "UPDATE `login` SET `level`='0' WHERE `diasvip`<='0' AND `level`='1'"; end;
	end;
	}

	-	script	Vip002	-1,{

	OnPCLoginEvent:
	if (getgmlevel() >= 20){ end; }
	query_sql "SELECT `diasvip` FROM `login` WHERE `account_id` = '"+getcharid(3)+"'", .@diasvip;
	if(.@diasvip == 0){ end; }
	dispbottom "Olá "+strcharinfo(0)+" você possui "+.@diasvip+" dias VIP.";
	end;
}
-	script	cash counter	-1,{

OnPCLoginEvent:

if (getgmlevel() >= 20){ end; }
if(#CASHPOINTS == 0){ end; }
dispbottom "Olá "+strcharinfo(0)+" você possui "+#CASHPOINTS+" CashPoints.";
end;
}