Pack Iniciante com Verificador de IP 2.0 ~ Wenden

/*
      ___           ___           ___                         ___           ___
     /\  \         /\__\         /\  \         _____         /\__\         /\  \
    _\:\  \       /:/ _/_        \:\  \       /::\  \       /:/ _/_        \:\  \
   /\ \:\  \     /:/ /\__\        \:\  \     /:/\:\  \     /:/ /\__\        \:\  \
  _\:\ \:\  \   /:/ /:/ _/_   _____\:\  \   /:/  \:\__\   /:/ /:/ _/_   _____\:\  \
 /\ \:\ \:\__\ /:/_/:/ /\__\ /::::::::\__\ /:/__/ \:|__| /:/_/:/ /\__\ /::::::::\__\
 \:\ \:\/:/  / \:\/:/ /:/  / \:\~~\~~\/__/ \:\  \ /:/  / \:\/:/ /:/  / \:\~~\~~\/__/
  \:\ \::/  /   \::/_/:/  /   \:\  \        \:\  /:/  /   \::/_/:/  /   \:\  \
   \:\/:/  /     \:\/:/  /     \:\  \        \:\/:/  /     \:\/:/  /     \:\  \
    \::/  /       \::/  /       \:\__\        \::/  /       \::/  /       \:\__\
     \/__/         \/__/         \/__/         \/__/         \/__/         \/__/

*/

/*
CREATE TABLE IF NOT EXISTS `packiniciante` (
  `id_acc` int(11) NOT NULL,
  `ip` varchar(100) NOT NULL,
  PRIMARY KEY  (`id_acc`)
) ENGINE=MyISAM;
*/

prontera,164,171,3	script	Pack Iniciante	81,{

set .n$,"[^008000Pack Iniciante xRO^000000]";
setarray .itens[0],5172,5170,5601,5468; // Ids dos Itens (Não colocar itens consumivéis)
set .t,7; // Tempo que os itens da array acima ficarão com o jogador
set .y,607; // Id do Box de Ygg
set .y2,1; // Qnt de box de Ygg



	mes .n$;
	mes "Olá ^FF0000"+strcharinfo(0)+"^000000, veio pegar o Pack Iniciante?";
	next;
		if(select("Sim:Não") == 2) close;
		query_sql "SELECT `last_ip` FROM `login` WHERE `account_id`='"+getcharid(3)+"'",.@ip$; // Selecionando IP do jogador
		query_sql "SELECT `ip` FROM `packiniciante` WHERE `ip`='"+.@ip$+"'",.@ip2$; // Selecionado o IP na tabela packiniciante para checar com o IP do jogador
		if(#packiniciante == 1 || .@ip$ == .@ip2$){ // Fazendo as checagens
		mes .n$;
		mes "Não posso mais te ajudar.";
		close;
		}
		mes .n$;
		mes "Lembrando que você só pode receber esse Pack uma vez, caso crie outra conta para pegar novamente você será banido.";
		next;
		mes .n$;
		mes "Aguarde...";
		mes " ";
		sleep2 3000;
		mes "Aqui está seu Pack, seus dados foram salvos, qualquer dúvida entre contato com a Staff do xRO.";
		mes "Tenha um bom jogo!";
		getitem .y,.y2;
		set .@j,86400*.t;
		for (set .@i,0; .@i < getarraysize(.itens); set .@i,.@i+1)
		rentitem .itens[.@i],.@j;
		close2;
		set #packiniciante,1;
		query_sql "SELECT `last_ip` FROM `login` WHERE `account_id`='"+getcharid(3)+"'",.@ip$;
		query_sql "INSERT INTO `packiniciante` (`id_acc`,`ip`) VALUES ('"+getcharid(3)+"','"+.@ip$+"')";
		end;

}