· 4 years ago · Mar 22, 2021, 04:34 PM
1- script [NoBot]#JM FAKE_NPC,{
2
3 OnNPCKillEvent:
4 if(getgroupid()>=10) end;
5 disable_command;
6 if(getmapflag(strcharinfo(3),restricted,6)) end;
7 .@player$ = strcharinfo(0);
8 query_sql "SELECT k_mob, cap_b FROM anti_bot WHERE p_name='"+.@player$+"'",.@k_mob,.@cap_b;
9 // rand = fail to ban
10// .@rbp = rand(5,10);
11// if(.@cap_b>=.@rbp){ atcommand "@ban +7d "+.@player$; announce strnpcinfo(3)+": O jogador '"+.@player$+"' levou suspenção de 7 dias!",8; query_sql "UPDATE anti_bot SET cap_b=0, k_mob=0 WHERE p_name='"+.@player$+"'"; }
12 //
13 .@rand = rand(500,600);
14 query_sql "INSERT INTO `anti_bot` (`p_name`, `k_mob`) VALUES ('"+.@player$+"', '1') ON DUPLICATE KEY UPDATE `k_mob`=`k_mob`+1";
15 if(.@k_mob>=.@rand){
16 query_sql "UPDATE anti_bot SET k_mob=0 WHERE p_name='"+.@player$+"'";
17// setpcblock PCBLOCK_MOVE|PCBLOCK_SKILL|PCBLOCK_USEITEM|PCBLOCK_COMMANDS,true;
18 .@code_pg = rand(1000,9999);
19 set #PREVENTOUT,1; //
20 mes "[NoBot]";
21 mes "Fique atento ao digitar a senha a seguir:";
22 next;
23 mes "[NoBot]";
24 mes "Digite o seguinte valor:";
25 mes ">>> ^FF0000"+.@code_pg+"^000000 <<<";
26 input .@code_p;
27 if(.@code_p != .@code_pg) {
28 message strcharinfo(0),"Tome cuidado! Você errou!";
29 set #PREVENTOUT,0; //
30 query_sql "UPDATE anti_bot SET cap_b=cap_b+1 WHERE p_name='"+.@player$+"'";
31// setpcblock PCBLOCK_MOVE|PCBLOCK_SKILL|PCBLOCK_USEITEM|PCBLOCK_COMMANDS,false;
32 enable_command;
33 atcommand "@kick "+strcharinfo(0);
34 end;
35 }
36 query_sql "UPDATE anti_bot SET k_mob=0 WHERE p_name='"+.@player$+"'";
37 set #PREVENTOUT,0; //
38// setpcblock PCBLOCK_MOVE|PCBLOCK_SKILL|PCBLOCK_USEITEM|PCBLOCK_COMMANDS,false;
39 enable_command;
40 }
41 end;
42
43// OnPCLogoutEvent:
44// .@player$ = strcharinfo(0);
45// if(#PREVENTOUT) {
46// query_sql "UPDATE anti_bot SET cap_b=cap_b+1 WHERE p_name='"+.@player$+"'"; set #PREVENTOUT,0; }
47// end;
48
49 OnInit:
50 query_sql "CREATE TABLE IF NOT EXISTS `anti_bot` (`p_name` varchar(23) NOT NULL DEFAULT '',`k_mob` int(10) unsigned NOT NULL DEFAULT '0',`cap_b` smallint(5) NOT NULL DEFAULT '0',PRIMARY KEY(`p_name`)) ENGINE=MyISAM DEFAULT CHARSET=latin1;";
51 //= Mapflags Remove
52 removemapflag "prt_maze03",restricted,6;
53 //
54 end;
55}