Chat Limitation

by Blafblabla
A simple chat limitation system.
ID:200676
 
Here it is:

mob/var/alert
mob/verb/say(T as text)
if(length(T) > 100)
alert("Too big message! If you do this again you will booted for spam!","Warning")
usr.alert = 1
else
oview(20) << "[usr.name] says: [T]"
if(length(T) > 100 && usr.alert == 1)
alert("Too big message! You have been booted for spam!","Boot.")
world << "[usr] has been booted for spam!"
del(usr)