viewing paste Unknown #1274 | Athena

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
-   script  hourlypoints    -1,{
 
//--Start of the Script
OnPCLoginEvent:
attachnpctimer ""+strcharinfo(0)+"";
initnpctimer;
end;
    
OnTimer60000:
if(checkvending() >= 1) {
    dispbottom "Kafra points event stopped because you were vending. Close your vending shop if you wish to get points again!";
    stopnpctimer;
    initnpctimer;
    end;
}
set @minute, @minute + 1;
//Check for 20 Minutes
if(@minute == 20){
    set @minute,0;
    set .@point_amt, 1; //Points to get every 20 mins
    set #KAFRAPOINTS, #KAFRAPOINTS + .@point_amt;
    dispbottom "You received "+.@point_amt+" Kafrapoints by staying ingame for 20 minutes!";
    dispbottom "Current Balance = "+#KAFRAPOINTS+" Kafrapoints";
    set @consecutive_hour, @consecutive_hour + 1;
    }
//Check for 6 hours consecutive online
    if(@consecutive_hour == 18) {
    set @consecutive_hour,0;
    set .@cpoint_amt, 10; //Points to get for 6 Consecutive hours
    set #KAFRAPOINTS, #KAFRAPOINTS + .@cpoint_amt;
    dispbottom "You receive "+.@cpoint_amt+" Kafrapoints in playing for 6 consecutive hours!";
    dispbottom "Current Balance = "+#KAFRAPOINTS+" Kafrapoints";
    }
stopnpctimer;
initnpctimer;
end;
 
}
Viewed 733 times, submitted by Guest.