viewing paste Unknown #1180 | Text

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55
-   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 points event stopped because you were vending / chatting. 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 10 Minutes
if(@afk == 10) {
    dispbottom "The hourly points event stopped because you were idle for 10 minutes. Please relog if you wish to start again.";
    stopnpctimer;
    end;
}
end;
 
OnTimer60000:
set @minute, @minute + 1;
//Check for 1 Minute
if(@minute == 60){
    set @minute,0;
    set @consecutive_hour, @consecutive_hour + 1;
// Every 2 Hours
if( @consecutive_hour % 2 == 0 ){
  getitem 7227,1;
  dispbottom "Gain 1 TCG for every 2 Hours online.";
}
if( @consecutive_hour % 24 == 0 ){
  announce "Holy Cow! "+strcharinfo(0)+" has been awarded with 12 "+getitemname( 7227 )+" + 500 Cash Points for staying ingame for 24 hours!",bc_all|bc_yellow;
  getitem 7227,12;
  set #CASHPOINTS,#CASHPOINTS + 500;
  dispbottom "Gained 500 Cash Points. Total : "+#CASHPOINTS;
}
}
stopnpctimer;
initnpctimer;
end;
}
Viewed 906 times, submitted by Guest.