Hourly Points + Anti Bot help

[GM Takumirai]

Need Help
- I want the Anti Bot Checker to be add before giving the reward points.
- If player logout or exit during the Bot Checking he/she will not get any rewards.
- how to optimize the Hourly Points for the new script command check idle.
- thanks
 
- Anti Bot Script by Brian
http://pastebin.com/raw.php?i=YYu2Uxgv
 
 
Hourly Points Script
http://pastebin.com/dvvAzh30

 

 

 

OT: how to use codebox today?

Edited February 17, 2013 by GM Takumirai

[Fai T.Flowright]

yeah, i need the same thing

Edited February 17, 2013 by Fai T.Flowright

[GM Takumirai]

bump please..

Bump anyone can put a captcha or security check..

Edited February 18, 2013 by GM Takumirai

[GM Takumirai]

bump please.. help any captcha code or security before giving the items, if failed to answer or wrong answer he will be kick out.. also restrict the use of warp or any teleport to reset the security code ..

hope emistry can read this

[caspa]

i advise not to use this kind of script coz i already tried this one and it comes with a risk.........

its when a person talks to an npc and the anti bot pops out... the code is being combined to the box of the npc you're currently talking to and when that happens when you enter the code correctly or incorrectly the char gets stuck and

the map server gets an error and if you relog the char gets stuck for unknown reason...... 


well that's just what happened to me.. maybe becoz of my script. =3 but........ i'm not trying to discourage you =3

if you don't trust me i have a picture (refer to the attached thumbnail ) which you'll see i pm'ed a certain person which has a great knowledge on scripting =3 ....... but the bug still occurs =3

Edited February 28, 2013 by caspa

[Yahiko]

-	script	hourlypoints	-1,{

//--Start of the Script
OnPCLoginEvent:
attachnpctimer ""+strcharinfo(0)+"";
initnpctimer;
end;
    
OnTimer30000:
//Check if Vending (normal or @at)
if(checkvending() >= 1 || checkchatting() == 1) {
    dispbottom "The hourly potion box and coin event stopped because you were vending / chatting / auto attack. Please relog if you wish to start again.";
    stopnpctimer;
    end;
}
if (checkoption(0x10000000)) {
		dispbottom "The hourly potion box, event ticket and coin event stopped because you were vending / chatting / auto attack. Please relog if you wish to start again.";
   		stopnpctimer;
    		end;
}
//Check if Idle
getmapxy( .@map$, .@x, .@y, 0 );
if(@map$ == .@map$ && @x == .@x && @y == .@y) {
    set @afk, @afk + 1;
}
//If move timer resets
else {
    set @afk, 0;
}
    set @map$, .@map$; set @x, .@x; set @y, .@y;
//Idle Check for 5 Minutes
if(@afk == 5) {
    dispbottom "The hourly potion box, event ticket and coin event stopped because you were idle for 5 minutes. Please relog if you wish to start again.";
    stopnpctimer;
    end;
}
end;

OnTimer60000:
set @minute, @minute + 1;
//Check for 1 Minute
if(@minute == 30){
    set @minute,0;
    callfunc "getstring";
    next;
	getitem 14003, 1;
	getitem 673, 1;
	getitem 29003, 1;
	dispbottom "You got 1x "+getitemname( 14003 )+" 1x "+getitemname( 29003 )+" and 1x  "+getitemname( 673 )+" by staying ingame for 30min. Thanks for playing ~A.G.N.R.O.~";
    set @consecutive_hour, @consecutive_hour + 1;
    }
//Check for 12 hours consecutive
    if(@consecutive_hour == 12) {
    set @consecutive_hour,0;
    getitem 14003,50;
    getitem 673,50;
    getitem 29003, 1;
    dispbottom "You received 50 "+getitemname( 14003 )+" ,50 "+getitemname( 29003 )+"and 50x  "+getitemname( 673 )+" by staying ingame for consecutive of 12 hour";
    }
stopnpctimer;
initnpctimer;
end;

}

 

post if you got any error with quote

[Emistry]

something like this ?

http://pastebin.com/raw.php?i=RDn52JJ2

[GM Takumirai]

@ Emistry i tested your script 

but the problem is everytime i login it just pop-up on screen

You have been AFK XXX seconds,

 

 
 
-    script    Hourly Points    -1,{
function GetString;
 
OnPCLoginEvent:
if (checkoption(0x10000000)) {
        mes "You're using Auto Attack Card.";
}
if( checkidle() >= 300 ){
    mes "You have been AFK for "+checkidle()+" seconds.";
}else{
    set .@String$,GetString( 15,rand(5,10) );
    mes "Input the ^FF0000RED COLOUR^000000 part";
    mes "^0000FF"+GetString( 15,rand(5,10) )+"^FF0000"+.@String$+"^0000FF"+GetString( 15,rand(3,10) )+"^000000";
    input .@Input$;
    if( .@Input$ != .@String$ ){
        mes "Wrong..";
        sleep2 3000;
        atcommand "@kick "+strcharinfo(0);
    }else if( @online ){
        mes "You're Online for 30min. You gain prize.";
        getitem 14003, 1;
        getitem 673, 1;
        getitem 29003, 1;
        
    }else{
        @online = 1;
    }
}
addtimer ( 30 * 60000 ),strnpcinfo(0)+"::OnPCLoginEvent";
close;
 
function    GetString    {
    if( getarg(0) & 1 ) setarray .@List$[ getarraysize( .@List$ ) ],"1","2","3","4","5","6","7","8","9";
    if( getarg(0) & 2 ) setarray .@List$[ getarraysize( .@List$ ) ],"A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R","S","T","U","V","W","X","Y","Z";
    if( getarg(0) & 4 ) setarray .@List$[ getarraysize( .@List$ ) ],"a","b","c","d","e","f","g","h","i","j","k","l","m","n","o","p","q","r","s","t","u","v","w","x","y","z";
    if( getarg(0) & 8 ) setarray .@List$[ getarraysize( .@List$ ) ],"!","@","#","$","%","^","&","*","(",")","-","=","/","+";
 
    set .@Str$,"";
    while( getstrlen( .@Str$ ) < getarg(1) )
        set .@Str$,.@Str$ + .@List$[ rand( getarraysize( .@List$ ) ) ];
    return .@Str$;
}
 
 
}

Every time I login the msg will pop out.. any help pls.. Edited March 5, 2013 by GM Takumirai