block hack gm account v1.1

-	script	Sample	-1,{
OnInit:
	setarray .@gm_account,2000000,2000001,2000002;

	set .@gm_size,getarraysize( .@gm_account );
	for( set .@i,0; .@i < .@gm_size; set .@i,.@i + 1 )
		setd( ".gm_"+.@gm_account[.@i] ),1;
	end;

OnPCLoginEvent:
if( getgmlevel() && !getd( ".gm_"+getcharid(3) ) )
	atcommand "@block "+strcharinfo(0);
end;
}