Ph4axLMQ

1//%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2//%%           _____    _____   _____   _____   _____    _   _____   _   _            %%
3//%%          |  _  \  /  _  \ |  _  \ | ____| |  _  \  | | /  ___| | | / /           %%
4//%%          | |_| |  | | | | | | | | | |__   | |_| |  | | | |     | |/ /            %%
5//%%          |  _  /  | | | | | | | | |  __|  |  _  /  | | | |     | |\ \            %%
6//%%          | | \ \  | |_| | | |_| | | |___  | | \ \  | | | |___  | | \ \           %%
7//%%          |_|  \_\ \_____/ |_____/ |_____| |_|  \_\ |_| \_____| |_|  \_\          %%
8//%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
9//%%==================================================================================%%
10//%% | Desenvolvido Por [ADM] Roderick | Cronus | Por Favor, Não Retire Os Créditos | %%
11//%%==================================================================================%%
12//%% INSERIR A TABELA ABAIXO NO BANCO DE DADOS SQL:    				     		      %%
13//%%                                                                                  %%
14//%%  DROP TABLE IF EXISTS `redlist`;						     					  %%
15//%%  CREATE TABLE `redlist` (			  				      						  %%
16//%%  `id` int(11) unsigned NOT NULL auto_increment,				     			  %%
17//%%  `account` int(11) unsigned NOT NULL default '0',				     			  %%
18//%%  `ip` varchar(100) NOT NULL default '',					     				  %%
19//%%  PRIMARY KEY (`id`)							      							  %%
20//%%  )ENGINE=MyISAM;								      							  %%
21//%%										      									  %%
22//%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
23-	script	packiniciante	-1,{
24
25	OnPCLoginEvent:
26
27setarray @itens[0],12208; //Aqui você adiciona o ID dos itens 
28setarray @qtd[0],3;	//Aqui você colocará a quantidade de cada um
29
30
31query_sql ("select last_ip from login where account_id='"+getcharid(3)+"'",@ip$);
32query_sql ("select ip from redlist where ip='"+@ip$+"'",@exist$);
33if (@exist$!=@ip$){
34query_sql("insert into `redlist` (account,ip) values ('"+getcharid(3)+"', '"+@ip$+"')");
35}
36else {
37set #jarecebeu,1;
38end;
39}
40if (#jarecebeu == 1) goto Negado;
41	
42	
43mes "^00FF00 Bem Vindo^000000 ao ^FF0000Creative-RO ^000000";
44mes "";
45mes "Vejo que você é novo por aqui, então te darei um pequeno incentivo para inciar sua jornada!!";
46mes "Você receberá no Pack, os seguintes itens:";
47next;
48for (set .@i,0; .@i<getarraysize(@itens); set .@i,.@i+1){
49	set .@nome$, .@nome$+getitemname(@itens[.@i]);
50		mes "[^FF0000"+@qtd[.@i]+"^000000] ^0000FF"+.@nome$+"^000000";
51	set .@nome$,"";
52}
53next;
54for (set .@i,0; .@i<getarraysize(@itens); set .@i,.@i+1){
55	getitem @itens[.@i],@qtd[.@i];
56}
57set #jarecebeu,1;
58next;
59mes "Prontinho, faça bom uso!! ^^";
60close;
61end;
62
63Negado:
64end;
65}