/* /verbs/common/yell.c * from the Dead Souls Object Library * yell * yell in WRD STR * yell STR * created by Descartes of Borg 951119 */ #pragma save_binary #include <lib.h> #include <talk_type.h> #include "include/yell.h" inherit LIB_DAEMON; static void create() { daemon::create(); SetNoClean(1); parse_init(); parse_add_rule("yell", ""); parse_add_rule("yell", "in WRD STR"); parse_add_rule("yell", "STR"); } mixed can_yell() { return "Yell what?"; } mixed can_yell_str(string str) { string lang; if( !str ) return 0; lang = (string)this_player()->GetNativeLanguage() || "english"; return can_yell_in_wrd_str(lang, str); } mixed can_yell_in_wrd_str(string lang, string str) { if( !lang || !str ) return 0; return (mixed)this_player()->CanSpeak(0, TALK_AREA, str, lang); } mixed do_yell() { return 1; } mixed do_yell_str(string str) { string lang; lang = (string)this_player()->GetNativeLanguage() || "english"; return do_yell_in_wrd_str(lang, str); } mixed do_yell_in_wrd_str(string lang, string str) { if( str[<1] != '!' && str[<1] != '?' && str[<1] != '.' ) str = capitalize(str) + "."; else str = capitalize(str); return (mixed)this_player()->eventSpeak(0, TALK_AREA, str, lang); } string GetHelp(string str) { return ("Syntax: <yell MESSAGE>\n" " <yell in LANGUAGE MESSAGE>\n\n" "Sends a message to the area around you. If you fail to " "specify a language, your native language is used.\n\n" "See also: reply, say, shout, speak, tell, whisper"); }