how to prevent spamming @command

[mirabell]

I took this from another post but i want to add to it.

-	script	refresh_pvp	-1,{
OnInit:
	bindatcmd "refresh",strnpcinfo(0) +"::OnRefresh";
	end;
OnRefresh:
	if( getmapflag( strcharinfo(3),mf_pvp ) )
		message strcharinfo(0),"@refresh is not allowed in pvp map.";
	end;
}

i would like to be able to limit the ability to use this @command once every 4 sec in any map. In addition to disabling it in pvp. Who would i be able to do that. Thanks

 

[_Terra]

-	script	refresh_pvp	-1,{
OnInit:
	bindatcmd "refresh",strnpcinfo(0) +"::OnRefresh";
	end;
OnRefresh:
	if( getmapflag( strcharinfo(3),mf_pvp ) ) {
		message strcharinfo(0),"@refresh is not allowed in pvp map.";
	end;
	} else {
		message strcharinfo(0),"You must wait 4 seconds for re-use this command.";
		if (@refdelay) end;
		set @refdelay, 1;
		atcommand "@refresh";
		sleep2 4000; // 4sec Delay
		set @refdelay, 0;
		end;
	}
}

Tested and works fine

[mirabell]

thank you