#include <lib.h>
inherit LIB_DAEMON;
static void create() {
daemon::create();
}
string PirateFilter(string str){
if(!str || !sizeof(str) || !stringp(str)) return "";
if(grepp(str,"tp://")) return str;
if(lower_case(str) == "test") str = "ARRR!";
if(lower_case(str) == "testing") str = "ARRR, I says!";
if(lower_case(str) == "testing.") str = "ARRR!";
if(lower_case(str) == "test.") str = "ARRR!";
if(lower_case(str) == "hmm") str = "YARR!";
if(lower_case(str) == "hmmm") str = "YARRR!";
if(lower_case(str) == "?") str = "YARRR?";
if(lower_case(str) == "...") str = "Y...A...R...R?";
str = replace_string(str, "that's", "that be");
str = replace_string(str, "That's", "That be");
str = replace_string(str, "they're", "they be");
str = replace_string(str, "They're", "They be");
str = replace_string(str, "your ", "yer ");
str = replace_string(str, " gay ", " hamarseckshul ");
str = replace_string(str, "Your ", "Yer ");
str = replace_string(str, "you're", "ye be");
str = replace_string(str, "You're", "Ye be");
str = replace_string(str, "here's", "here be");
str = replace_string(str, "Here's", "Here be");
str = replace_string(str, "who's", "who be");
str = replace_string(str, "Who's", "Who be");
str = replace_string(str, "what's", "what be");
str = replace_string(str, "What's", "What be");
str = replace_string(str, " his ", " he ");
str = replace_string(str, "His ", "He ");
str = replace_string(str, " her ", " she ");
str = replace_string(str, "Her ", "She ");
str = replace_string(str, " is ", " be ");
str = replace_string(str, "Is ", "Be ");
str = replace_string(str, "thbe", "this");
str = replace_string(str, "Thbe", "This");
str = replace_string(str, "the ", "th' ");
str = replace_string(str, "The ", "Th' ");
str = replace_string(str, " am ", " be ");
str = replace_string(str, "I'm ", "I be ");
str = replace_string(str, "Im ", "I be ");
str = replace_string(str, "i'm ", "i be ");
str = replace_string(str, "ing ", "in' ");
str = replace_string(str, "ing ", "in' ");
str = replace_string(str, "ing ", "in' ");
str = replace_string(str, "ing.", "in'.");
str = replace_string(str, "in'.c", "ing.c");
str = replace_string(str, "in'.h", "ing.h");
str = replace_string(str, "ing!", "in'!");
str = replace_string(str, "there", "thar");
str = replace_string(str, "There", "Thar");
str = replace_string(str, "you ", "ye ");
str = replace_string(str, "You ", "Ye ");
str = replace_string(str, "it is not ", "'tain't ");
str = replace_string(str, "It is not ", "'tain't ");
str = replace_string(str, "it isn't ", "'tain't ");
str = replace_string(str, "It isn't ", "'tain't ");
str = replace_string(str, "it's not ", "'tain't ");
str = replace_string(str, "It's not ", "'tain't ");
str = replace_string(str, "it is ", "'tis ");
str = replace_string(str, "It is ", "'tis ");
str = replace_string(str, "It's ", "'tis ");
str = replace_string(str, "my ", "me ");
str = replace_string(str, "My ", "me ");
str = replace_string(str, "of ", "o' ");
str = replace_string(str, "Of ", "O' ");
str = replace_string(str, "huh? ", "ehhhhh? ");
str = replace_string(str, "Huh? ", "Ehhhhh? ");
str = replace_string(str, "yes", "aye");
str = replace_string(str, "Yes", "Aye");
str = replace_string(str, "ayeterday", "yesterday");
str = replace_string(str, "Ayeterday", "Yesterday");
str = replace_string(str, "yepper ", "aye ");
str = replace_string(str, "Yepper ", "Aye ");
str = replace_string(str, "yep", "aye");
str = replace_string(str, "Yep", "Aye");
str = replace_string(str, "yeah", "aye");
str = replace_string(str, "Yeah", "Aye");
str = replace_string(str, "yea", "aye");
str = replace_string(str, "Yea", "Aye");
str = replace_string(str, "no ", "nay ");
str = replace_string(str, "No ", "Nay ");
str = replace_string(str, "no, ", "nay, ");
str = replace_string(str, "No, ", "Nay, ");
str = replace_string(str, "nope", "nay");
str = replace_string(str, "Nope ", "Nay ");
str = replace_string(str, "oh ", "ARRRRR ");
str = replace_string(str, "oh, ", "ARRRRR, ");
str = replace_string(str, " and ", " 'n' ");
str = replace_string(str, " them ", " 'em ");
str = replace_string(str, " were ", " was ");
str = replace_string(str, " are ", " be ");
str = replace_string(str, " to ", " t' ");
str = replace_string(str, "who ", "'oo ");
str = replace_string(str, "Who ", "'oo ");
str = replace_string(str, " did ", " done ");
str = replace_string(str, " said", " says");
str = replace_string(str, " doesn't ", " don't ");
str = replace_string(str, " does ", " do ");
str = replace_string(str, "hehe", "har harr");
str = replace_string(str, "heh", "harr");
str = replace_string(str, "they ", "them ");
str = replace_string(str, "They ", "Them ");
str = replace_string(str, "hey ", "ahoy ");
str = replace_string(str, "Hey ", "Ahoy ");
str = replace_string(str, "hello", "ahoy");
str = replace_string(str, "Hello", "Ahoy");
str = replace_string(str, "hi ", "ahoy ");
str = replace_string(str, "hiya", "ahoy");
str = replace_string(str, "Hiya", "Ahoy");
str = replace_string(str, ", guys", ", mateys");
str = replace_string(str, "guys, ", "mateys, ");
str = replace_string(str, "Guys, ", "Mateys, ");
str = replace_string(str, "Hi ", "Ahoy ");
str = replace_string(str, "hi,", "ahoy,");
str = replace_string(str, "Hi,", "Ahoy,");
str = replace_string(str, "howdy,", "ahoy,");
str = replace_string(str, "Howdy,", "Ahoy,");
str = replace_string(str, "howdy ", "ahoy ");
str = replace_string(str, "wow", "shiver me timbers");
str = replace_string(str, "Wow", "Shiver me timbers");
str = replace_string(str, "WOW", "Shiver me timbers");
str = replace_string(str, "omg", "shiver me timbers");
str = replace_string(str, "OMG", "By Blackbeard's ghost!");
str = replace_string(str, "omfg", "shiver me fucken' timbers");
str = replace_string(str, "OMFG", "shiver me fucken' blasted timbers");
str = replace_string(str, "stfu", "belay that guff");
str = replace_string(str, "STFU", "Silence, animals!");
str = replace_string(str, "wtf", "arr?");
str = replace_string(str, "WTF", "ARR!?");
str = replace_string(str, "stop", "avast");
str = replace_string(str, "Stop", "Avast");
str = replace_string(str, " stuff ", " booty ");
str = replace_string(str, "there", "thar");
str = replace_string(str, "There", "Thar");
str = replace_string(str, "lol", "Yo Ho Ho");
str = replace_string(str, " for ", " fer ");
str = replace_string(str, "For ", "Fer ");
str = replace_string(str, "LOL", "YO HO HO");
str = replace_string(str, "rofl", "harr harr harr");
str = replace_string(str, "ROFL", "HARR HARR HARR");
//str = replace_string(str, "testing", "ARRR!");
//str = replace_string(str, "test", "ARRR");
//str = replace_string(str, "a ARRR", "a test");
//str = replace_string(str, "to ARRR", "to test");
if(random(100) < 1){
switch(random(5)){
case 0 : str = "Avast, me hearties! "+str;break;
case 1 : str += " ARRRR!!";break;
case 2 : str = "Well blow me down! "+str;break;
case 3 : str += " YO HO HO!";break;
case 4 : str += " Wench! Grog!";break;
}
}
return str;
}
string CurseFilter(string str){
string orig, lowered;
int i;
string *curses;
if(!sizeof(str)) return "";
curses = ({"bullshit", "motherfucking", "motherfuck",
"shitty", "fucking", "fucken", "mother fucking", "mother fuck",
"damned", "god damned", "goddamned", "christing", "cunting",
"assfuck", "buttfuck", "butt fuck", "shitlick", "shit lick",
"cocklick", "cock lick", "dicklick", "dick lick", "cuntlick",
"cunt lick", "shithead", "fuckhead", "shit head", "fuck head",
"shit", "fuck", "cunt", "slut", "bastard", "asshole",
"cocksuck", "cock suck", "dicksuck", "dick suck", "suck dick",
"suck cock", "pussy", "twat", "jizz", "piss", "blowjob",
"buttsex", "butt sex", "anal sex", "faggot", "nigger", "kike",
"jap", "rimjob", "nafe", "handjob", "god damn", "goddamn", "damn",
"goddam", "whore", "son of a bitch", "bitch", "felch", "feltch",
"bukkake", "rape", "incest", "sodomy", "dildo", "christ", "jesus",
"heterosexual intercourse in the missionary position" });
lowered = lower_case(str);
orig = str;
foreach(string curse in curses){
i = sizeof(curse);
lowered = replace_string(lowered, curse, repeat_string("*", i));
}
for(i = 0; i < sizeof(str); i++){
if(lowered[i..i] == "*") str[i..i] = "*";
}
return str;
}
varargs string eventFilter(string str, string type){
if(!str || !sizeof(str) || !stringp(str)) return "";
if(!type) return str;
if(type == "curse") str = CurseFilter(str);
if(type == "pirate") str = PirateFilter(str);
return str;
}
