Requesting Script That Count Highest Streak Player On Server

[Checkmate]

Hiii rAthena Community..  ^ ^
 

I do thinking that is it possible to make Script That Count Highest Streak Player On Server and be announced about 5 time repeatly to tell all player that we all now are already in highest streak player online ??????

Btw.. I do asking this cuz only on almost website RO only shown thier hight streak example on CP FLUX...
 

Now.. Anyone have this script or my some proffesional scripter can come in to sharing some idea's and suggestion... ??

[Lil Troll]

I didn't test it yet. Tell me if there's wrong alright?

/*
DROP TABLE IF EXISTS `player_count`;
CREATE TABLE IF NOT EXISTS `player_count` (
  `char_id` int(10) unsigned NOT NULL AUTO_INCREMENT,
  `count` int(10) unsigned NOT NULL DEFAULT '0',
  `date` DATETIME NOT NULL DEFAULT '0000-00-00 00:00:00',
  PRIMARY KEY (`id`)
) ENGINE = MYISAM;
*/
-	script	Online_Peak	-1,{
OnInit:
query_sql "CREATE TABLE IF NOT EXISTS `player_count` (`char_id` int(10) unsigned NOT NULL AUTO_INCREMENT,`count` int(10) unsigned NOT NULL DEFAULT '0',`date` DATETIME NOT NULL DEFAULT '0000-00-00 00:00:00',PRIMARY KEY (`char_id`)) ENGINE = MYISAM";
OnPCLoginEvent:
	set .CurrentOnline,getusers(1); 
	query_sql("SELECT `count` FROM `player_count` ORDER BY `count` LIMIT 1",.@CountUsers);
	set .OnlinePeak,.@CountUsers[0]; 
	if(getarraysize(.@CountUsers) == 0) {
		set .OnlinePeak,.CurrentOnline;
		query_sql("INSERT INTO `player_count`(count,date) VALUES("+.OnlinePeak+",NOW())");
	}
	else {
		if(.CurrentOnline>.OnlinePeak) {
			set .OnlinePeak,.CurrentOnline;		
			query_sql("UPDATE `player_count` SET count = '"+.OnlinePeak+"', date = NOW()");
			announce "[ Players Online :"+.CurrentOnline+" ] We already set a new highest streak of online players!",bc_all;
			sleep2 3000;
			announce "[ Players Online :"+.CurrentOnline+" ] We already set a new highest streak of online players!",bc_all;
			sleep2 3000;
			announce "[ Players Online :"+.CurrentOnline+" ] We already set a new highest streak of online players!",bc_all;
			sleep2 3000;
			announce "[ Players Online :"+.CurrentOnline+" ] We already set a new highest streak of online players!",bc_all;
			sleep2 3000;
			announce "[ Players Online :"+.CurrentOnline+" ] We already set a new highest streak of online players!",bc_all;
		}
	}
	
end;
}

[Checkmate]

/*
DROP TABLE IF EXISTS `player_count`;
CREATE TABLE IF NOT EXISTS `player_count` (
`char_id` int(10) unsigned NOT NULL AUTO_INCREMENT,
`count` int(10) unsigned NOT NULL DEFAULT '0',
`date` DATETIME NOT NULL DEFAULT '0000-00-00 00:00:00',
PRIMARY KEY (`id`)
) ENGINE = MYISAM;
*/
-    script    Online_Peak    -1,{
OnInit:
query_sql "CREATE TABLE IF NOT EXISTS `player_count` (`char_id` int(10) unsigned NOT NULL AUTO_INCREMENT,`count` int(10) unsigned NOT NULL DEFAULT '0',`date` DATETIME NOT NULL DEFAULT '0000-00-00 00:00:00',PRIMARY KEY (`char_id`)) ENGINE = MYISAM";
OnPCLoginEvent:
    set .CurrentOnline,getusers(1);
    query_sql("SELECT `count` FROM `player_count` ORDER BY `count` LIMIT 1",.@CountUsers);
    set .OnlinePeak,.@CountUsers[0];
    if(getarraysize(.@CountUsers) == 0) {
        set .OnlinePeak,.CurrentOnline;
        query_sql("INSERT INTO `player_count`(count,date) VALUES("+.OnlinePeak+",NOW())");
    }
    else {
        if(.CurrentOnline>.OnlinePeak) {
            set .OnlinePeak,.CurrentOnline;        
            query_sql("UPDATE `player_count` SET count = '"+.OnlinePeak+"', date = NOW()");
            announce "[ Players Online :"+.CurrentOnline+" ] We already set a new highest streak of online players!",bc_all;
            sleep2 3000;
            announce "[ Players Online :"+.CurrentOnline+" ] We already set a new highest streak of online players!",bc_all;
            sleep2 3000;
            announce "[ Players Online :"+.CurrentOnline+" ] We already set a new highest streak of online players!",bc_all;
            sleep2 3000;
            announce "[ Players Online :"+.CurrentOnline+" ] We already set a new highest streak of online players!",bc_all;
            sleep2 3000;
            announce "[ Players Online :"+.CurrentOnline+" ] We already set a new highest streak of online players!",bc_all;
        }
    }
    
end;
}

 

 

 

 

Lil Troll

Thanks Lil Troll  ^ ^

Im gonna test it.. but not now since i so lagging.. lol

Edited October 1, 2013 by CheckMate