This is a very simple little proc that I think will work quite well for blocking out "harsh" language. I thought I'd share it and see what other people think.
This is the code:
var/list/LG_List = list("Tweet","Scrock","Chirp","Honk")
proc/LGuard(msg)
var/check = 0
for(var/X in LG_List)
if(findtext(ckey(msg),X)) check = 1
return check
usr << "You say, [msg]"
oview() << "[usr] says, [msg]"
usr << "You say, [msg]"
if(LGuard(msg)) return
oview() << "[usr] says, [msg]"
What do you think?
(PS, Yes, I used tricks from Vortezz's DBZ Name Blocker)
Alathon