//===== eAthena Script =======================================
//= AntiBot Login
//===== By: ==================================================
// Create By - Mr.CoolZ
// Modify By  pizan
//===== Current Version: =====================================
//= 1.0
//===== Compatible With: =====================================
//= eAthena
//===== Description: =========================================
//= AntiBotLogin Script
//  You can Change The GM lv
// if (getgmlevel()>=85) goto gm_admin;  ' GM lv i Set on This Script 85 You May Change it '
//============================================================
// http://rocrew.5.forumer.com/index.php?showtopic=934&hl=
// @loadnpc npc/custom-kacuk/antibot/antibot.txt

-	script	AntiBot	-1,{
OnPCLoginEvent:
if (getgmlevel()>=60) goto gm_admin;
setoption 0x40;
pcblockmove getcharid(3),1;
atcommand "@me Talk to [Anti Bot Checking]";
atcommand "@option 2 0 3";
sc_start sc_berserk, 1000000000,1;
percentheal 100,100;
//atcommand "@aw Are You Bot ?? if not.. follow The Correct Number Please Read Below";
atcommand "@noask";
mes "[^FF0000Anti Bot Checking^000000]";
mes "Are you a bot? If not,";
mes "Please enter the ##### correctly.";
mes "^006699You must enter the input number same as the ##### color^000000";


next;
set number1, rand (1000000,9999999);
set number2, rand (1000000,9999999);
set number3, rand (1000000,9999999);
set number4, rand (1000000,9999999);
set number5, rand (1000000,9999999);
set number6, rand (1000000,9999999);
set number00, rand (1000000,9999999);
set number01, rand (1000000,9999999);
set number02, rand (1000000,9999999);
set number03, rand (1000000,9999999);
set number04, rand (1000000,9999999);
set number05, rand (1000000,9999999);
set number06, rand (1000000,9999999);
set number07, rand (1000000,9999999);
set number08, rand (1000000,9999999);
set number09, rand (1000000,9999999);
set number10, rand (1000000,9999999);
set number66, rand (1000,9999);
set number99, rand (100,999);

set @Col, rand (0,6);
if(@Col == 0) goto colred;
if(@Col == 1) goto colorg;
if(@Col == 2) goto colblu;
if(@Col == 3) goto colvio;
if(@Col == 4) goto colgre;
mes "Password Color >>^F7F7FF#^F5F9FD#^FFF9FA#^A52A2A##########^FFF9EE##^F8F8FF#";
mes "^F5F9FD"+ number99 +"^000000^FFF9EE"+ number66 +"^000000^FF8C00"+ number2 +"^000000^F5F9FD"+ number05 +"^000000";
mes "^F8F8FF"+ number66 +"^000000^F7F7FF"+ number99 +"^000000^A52A2A"+ number6 +"^000000^F5F9FD"+ number05 +"^000000";
mes "^F5F9FD"+ number99 +"^000000^FFF9EE"+ number66 +"^000000^9400D3"+ number4 +"^000000^F8F8FF"+ number06 +"^000000";
mes "^F5F9FD"+ number66 +"^000000^F7F7FF"+ number99 +"^000000^FF0000"+ number1 +"^000000^F5F9FD"+ number02 +"^000000";
mes "^F8F8FF"+ number99 +"^000000^FFF9EE"+ number66 +"^000000^0000FF"+ number3 +"^000000^F8F8FF"+ number01 +"^000000";
mes "^F5F9FD"+ number99 +"^000000^F7F7FF"+ number66 +"^000000^008000"+ number5 +"^000000^F5F9FD"+ number03 +"^000000";
next;
input number;
next;
goto brochk;
close;

colgre:
mes "Password Color >>^F7F7FF#^FFF9FA#^F5F9FD#^008000#########^F5F9FD#^F8F8FF#^FFF9EE##";
mes "^FFF9EE"+ number66 +"^000000^FFF9EE"+ number99 +"^000000^008000"+ number5 +"^000000^F5F9FD"+ number04 +"^000000";
mes "^FFF9FA"+ number99 +"^000000^F7F7FF"+ number66 +"^000000^FFA500"+ number2 +"^000000^F5F9FD"+ number03 +"^000000";
mes "^F5F9FD"+ number66 +"^000000^FFF9EE"+ number99 +"^000000^FF0000"+ number1 +"^000000^F5F9FD"+ number00 +"^000000";
mes "^FFF9EE"+ number99 +"^000000^FFF9EE"+ number66 +"^000000^9400D3"+ number4 +"^000000^F5F9FD"+ number01 +"^000000";
mes "^F7F7FF"+ number66 +"^000000^FFF9FA"+ number99 +"^000000^0000FF"+ number3 +"^000000^F5F9FD"+ number06 +"^000000";
mes "^FFF9EE"+ number99 +"^000000^F5F9FD"+ number66 +"^000000^A52A2A"+ number6 +"^000000^F5F9FD"+ number05 +"^000000";
next;
input number;
next;
goto grechk;
close;

colvio:
mes "Password Color >>^F5F9FD#^FFF9EE#^FFF9FA#^9400D3 #########^F8F8FF#^F5F9FD##^F7F7FF##";
mes "^F7F7FF"+ number66 +"^000000^FFF9EE"+ number99 +"^000000^9400D3"+ number4 +"^000000^F5F9FD"+ number09 +"^000000";
mes "^F7F7FF"+ number66 +"^000000^FFF9EE"+ number99 +"^000000^FFA500"+ number2 +"^000000^F5F9FD"+ number04 +"^000000";
mes "^F7F7FF"+ number66 +"^000000^FFF9EE"+ number99 +"^000000^A52A2A"+ number6 +"^000000^F5F9FD"+ number05 +"^000000";
mes "^FFF9EE"+ number99 +"^000000^F7F7FF"+ number66 +"^000000^FF0000"+ number1 +"^000000^F5F9FD"+ number06 +"^000000";
mes "^FFF9EE"+ number99 +"^000000^F7F7FF"+ number66 +"^000000^0000FF"+ number3 +"^000000^F5F9FD"+ number08 +"^000000";
mes "^FFF9EE"+ number99 +"^000000^F7F7FF"+ number66 +"^000000^008000"+ number5 +"^000000^F5F9FD"+ number01 +"^000000";
next;
input number;
next;
goto viochk;
close;

colblu:
mes "Password Color >>#^FFF9EE###^0000FF #####^F8F8FF######^F5F9FD#^FFF9FA#^F7F7FF##";
mes "^F8F8FF"+ number01 +"^000000^FFA500"+ number2 +"^000000^F7F7FF"+ number66 +"^000000^F5F9FD"+ number99 +"^000000";
mes "^FFF9EE"+ number09 +"^000000^A52A2A"+ number6 +"^000000^F5F9FD"+ number66 +"^000000^FFF9EE"+ number99 +"^000000";
mes "^F5F9FD"+ number08 +"^000000^FF0000"+ number1 +"^000000^F7F7FF"+ number66 +"^000000^FFF9EE"+ number99 +"^000000";
mes "^F8F8FF"+ number07 +"^000000^0000FF"+ number3 +"^000000^F5F9FD"+ number66 +"^000000^F5F9FD"+ number99 +"^000000";
mes "^FFF9EE"+ number06 +"^000000^008000"+ number5 +"^000000^F5F9FD"+ number66 +"^000000^FFF9EE"+ number99 +"^000000";
mes "^F5F9FD"+ number05 +"^000000^9400D3"+ number4 +"^000000^F7F7FF"+ number66 +"^000000^F5F9FD"+ number99 +"^000000";
next;
input number;
next;
goto bluchk;
close;

colorg:
mes "Password Color >>^F5F9FD#^FFF9EE####^FFA500 ######^F5F9FD#^F5F9FD####^F7F7FF##^FFF9FA##";
mes "^FFF9EE"+ number4 +"^000000^A52A2A"+ number6 +"^000000^F5F9FD"+ number07 +"^000000";
mes "^F8F8FF"+ number3 +"^000000^9400D3"+ number4 +"^000000^F5F9FD"+ number00 +"^000000";
mes "^F5F9FD"+ number1 +"^000000^FF0000"+ number1 +"^000000^F5F9FD"+ number06 +"^000000";
mes "^F8F8FF"+ number2 +"^000000^0000FF"+ number3 +"^000000^F5F9FD"+ number04 +"^000000";
mes "^F5F9FD"+ number5 +"^000000^FF8C00"+ number2 +"^000000^F5F9FD"+ number08 +"^000000";
mes "^F5F9FD"+ number6 +"^000000^008000"+ number5 +"^000000^F8F8FF"+ number10 +"^000000";
next;
input number;
next;
goto orgchk;
close;

colred:
mes "Password Color >>^F5F9FD##^FF0000 ####^F8F8FF#######^FFF9FA#^FFF9EE#^F7F7FF#";
mes "^F5F9FD"+ number6 +"^000000^A52A2A"+ number6 +"^000000^F8F8FF"+ number10 +"^000000";
mes "^F8F8FF"+ number5 +"^000000^008000"+ number5 +"^000000^F5F9FD"+ number09 +"^000000";
mes "^F5F9FD"+ number3 +"^000000^9400D3"+ number4 +"^000000^F8F8FF"+ number08 +"^000000";
mes "^F8F8FF"+ number1 +"^000000^0000FF"+ number3 +"^000000^F5F9FD"+ number07 +"^000000";
mes "^F5F9FD"+ number2 +"^000000^FFA500"+ number2 +"^000000^F5F9FD"+ number05 +"^000000";
mes "^F8F8FF"+ number5 +"^000000^FF0000"+ number1 +"^000000^F5F9FD"+ number02 +"^000000";
next;
input number;
next;
goto redchk;
close;

redchk:
if(number < number1 || number > number1) goto LOG_FAIL;
  goto OK; close;
orgchk:
if(number < number2 || number > number2) goto LOG_FAIL;
    goto OK; close;
bluchk:
if(number < number3 || number > number3) goto LOG_FAIL;
  goto OK; close;
viochk:
if(number < number4 || number > number4) goto LOG_FAIL;
      goto OK; close;
grechk:
if(number < number5 || number > number5) goto LOG_FAIL;
  goto OK; close;
brochk:
if(number < number6 || number > number6) goto LOG_FAIL;
  goto OK; close;

LOG_FAIL:
mes "Failed to enter the correct number..";
mes "Visit forum for more info about this.";
next;
mes "I will now kick you from this server!";
mes "Visit forum for more info about this.";
mes "^FF0000NewRO Facebook group^000000";
next;
atcommand "@kick " + strcharinfo(0);
end;

OK:
mes "Welldone~~, ^4233F4"+strcharinfo(0)+"^000000!";
mes "Thanks for entering the number correctly!";
mes "Invite more players!";
setoption 0x40,0;
pcblockmove getcharid(3),0;
sc_end SC_BERSERK;
atcommand "@option 0";
percentheal 100,100;
atcommand "@noask";
close;

gm_admin:
mes "GM High Level! No need to be checked ^4233F4"+strcharinfo(0)+"^000000!";
atcommand "@hide";
atcommand "@monsterignore";
close;

end;
}