rAthena NPC script limit same ip

//===== rAthena Script =======================================
//= Limit IP
//===== By: ==================================================
//= Sehrentos
//===== Current Version: =====================================
//= 1.0
//===== Compatible With: =====================================
//= rAthena Project
//===== Description: =========================================
//= Limit online IP addresses to X amount.
//===== Additional Comments: =================================
//= 1.0 Initial script.
//============================================================
-	script	#limit_same_ip	-1,{
OnPCLoginEvent:
	.@rows = query_sql("SELECT login.account_id FROM login INNER JOIN `char` ON char.account_id=login.account_id WHERE login.last_ip='"+getcharip()+"' AND char.online=1;", .@account_id);
	if (.@rows > 1) {
		mes "[IP notice]";
		mes "Too many online from same IP address.";
		// Block, Kick, etc.
		pcblockmove getcharid(3),1;
		pcblockskill getcharid(3),1;
		sleep2 5000;
		atcommand "@kick " + getcharid(0);
		close;
	}
	end;
}