Chat Limitation

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)