//   ______________________________________________________________
//  /                                                              \
// | -------------------------------------------------------------- |
// | Nome: Assistente VIP                                           |
// | -------------------------------------------------------------- |
// | Descrição: Assistente VIP que contém: - Reparador              |
// |                                       - Buffador               |
// |                                       - Armazém                |
// |                                       - Ver dias VIP           |
// |                                       - Loja VIP               |
// | -------------------------------------------------------------- |
// | Autor: Cody                                                    |
// | -------------------------------------------------------------- |
// | Versão: 1.0                                                    |
// | -------------------------------------------------------------- |
// | ChangeLog:                                                     |
// | 1.0 - Criado o NPC [Cody]                                      |
// | -------------------------------------------------------------- |
// | -------------------------------------------------------------- |
// | ALTER TABLE `login` ADD `diasvip` SMALLINT NOT NULL DEFAULT 0; |
// | ALTER TABLE `login` ADD `cash` SMALLINT NOT NULL DEFAULT 0;    |
//  \______________________________________________________________/
	//   ____________________________________
	//  /                                     \
	// |        Loja VIP                      |
	//  \____________________________________ /
	-	shop	LojaVIP	-1,607:50000,678:50000 //Shop VIP - Em zeny.
	// ----------------------------------------------------------------------
prontera,150,150,5	script	Assistente VIP	72,{

	//   ____________________________________
	//  /                                     \
	// |          Configurações NPC           |
	//  \____________________________________ /
	set .n$, "^336699[Max]^000000"; //Nome do NPC
	set .vip, 1; //Level VIP do Servidor
	//   ____________________________________
	//  /                                     \
	// |        Configurações Reparador       |
	//  \____________________________________ /
	set .rep_price, 5000; //Preço para reparar [0 não cobra nada]
	//   ____________________________________
	//  /                                     \
	// |        Configurações Buffs           |
	//  \____________________________________ /
	set .buff_price, 5000; //Preço para buffar [0 não cobra nada]
	//   ____________________________________
	//  /                                     \
	// |        Configurações Armazém         |
	//  \____________________________________ /
	set .arm_price, 5000; //Preço para abrir o armazém [0 não cobra nada]
	//   ____________________________________
	//  /                                     \
	// |             Ver Dias VIP             |
	//  \____________________________________ /
	set .vip_table, "diasvip"; //Tabela aonde está os dias (padrão diasvip)
	set .vip_color, "^336699"; //Cor que irá mostrar os dias VIP
	//   ____________________________________
	//  /                                     \
	// |        Configurações Torpedo         |
	//  \____________________________________ /
	set .torp_price, 5000; //Preço para enviar torpedo [0 não cobra nada]
	set .delay, 3; //Delay em minutos para enviar outro torpedo
	setarray .badwords$,
						"porra",
						"caralho",
						"buceta",
						"puta",
						"vadia",
						"porra",
						"fdp",
						"filho da puta";
	// ----------------------------------------------------------------------
	if(getgmlevel() < .vip)
	{
		mes .n$;
		mes "Hmm.. Você não é VIP!";
		mes "Volte quando for um.";
		close;
	}
	mes .n$;
	mes "Olá ^336699"+strcharinfo(0)+"^000000.";
	mes "Como posso lhe ser útil ?";
	next;
	switch(select("Reparar Equipamentos:Buffar:Abrir Armazém:Ver Dias VIP:Mandar Torpedo"))
	{
		case 1:
		mes .n$;
		mes "Irei reparar todos os seus equipamentos.";
		if(.rep_price) mes "Por uma taxa de "+.rep_price+"z.";
		mes "Tudo ok ?";
		next;
		if(select("Sim, repare.:Não.") == 2)
		{
			mes .n$;
			mes "Volte quando quiser reparar!";
			close;
		}
		if(.rep_price) if(zeny < .rep_price)
		{
			mes .n$;
			mes "Você não tem zeny sufisciente.";
			mes "Volte quando tiver.";
			close;
		}
		repairall;
		mes .n$;
		mes "Pronto!";
		close;

		case 2:
		mes .n$;
		mes "Irei te buffar.";
		if(.buff_price) mes "Por uma taxa de "+.buff_price+"z.";
		mes "Tudo ok ?";
		if(select("Sim, buffe.:Não.") == 2)
		{
			mes .n$;
			mes "Volte quando quiser se buffar!";
			close;
		}
		if(.buff_price) if(zeny < .buff_price)
		{
			mes .n$;
			mes "Você não tem zeny sufisciente.";
			mes "Volte quando tiver.";
			close;
		}
		mes .n$;
		mes "Pronto!";
		sc_start 115,600000,10;
		sc_start 110,600000, 10;
		sc_start 42,600000, 10;
		sc_start 41,600000, 10;
		sc_start 41,600000, 10;
		close;

		case 3:
		mes "Vou abrir o armazém.":
		if(.arm_price) mes "Por uma taxa de "+.arm_price+"z.";
		mes "Tudo ok ?";
		next;
		if(select("Sim, abra.:Não.") == 2)
		{
			mes .n$:
			mes "Volte quando quiser!";
			close;
		}
		if(.arm_price) if(zeny < .arm_price)
		{
			mes .n$;
			mes "Você não possui zeny sufisciente.";
			mes "Volte quando tiver.";
			close;
		}
		mes .n$;
		mes "Pronto!";
		openstorage;
		close;

		case 4:
		mes .n$;
		mes "Irei checar o banco de dados.";
		sleep2 5000;
		mes "Achei!";
		query_sql "SELECT `diasvip` FROM `login` WHERE `account_id`='"+getcharid(3)+"'",.diasvip;
		mes "Você possui: ^336699"+.diasvip+"^000000 dia(s) VIP.";
		close;

		case 5
		if(#time >= gettimetick(2))
		{
			mes .n$;
			mes "Você precisa esperar ^336699"+.delay+"^000000 minutos";
			mes "Antes de enviar outro torpedo!";
			close;
		}
		mes .n$;
		mes "Posso enviar um torpedo seu.";
		if(.torp_price) mes "Por uma taxa de "+.torp_price+"z.";
		next;
		if(select("Quero enviar.:Não, esquece.") == 2)
		{
			mes .n$:
			mes "OK, volte quando quiser!";
			close;
		}
		if(.torp_price) if(zeny < .torp_price)
		{
			mes .n$;
			mes "Você não possui zeny sufisciente!";
			close;
		}
		mes .n$;
		mes "Certo, digite a mensagem.";
		next;
		input .msg$;
		for(set .@i, 0; .@i < getarraysize(.badwords$); set .@i,.@i+1)	if(compare(.msg$, .badwords$[.@i]))
		{
			mes .n$;
			mes "Sua mensagem tem palavrão!";
			mes "Retire-os.";
			close;
		}
		mes .n$;
		mes "Deseja anunciar globalmente:";
		mes "^FF0000"+.msg$+"^000000 ?";
		next;
		if(select("Sim, desejo.:Não.") == 2)
		{
			mes .n$;
			mes "Volte quando quiser.";
			close;
		}
		mes .n$;
		mes "Pronto!";
		announce .msg$,6;
		set #time, gettimetick(2) + .delay;
		close;
	}
}