/*************************************************************************** * ANATOLIA 2.0 is copyright 1996-1997 Serdar BULUT, Ibrahim CANPUNAR * * ANATOLIA has been brought to you by ANATOLIA consortium * * Murat BICER {KIO} mbicer@rorqual.cc.metu.edu.tr * * Serdar BULUT {Chronos} bulut@rorqual.cc.metu.edu.tr * * D.Baris ACAR {Powerman} dbacar@rorqual.cc.metu.edu.tr * * Ibrahim Canpunar {Asena} canpunar@rorqual.cc.metu.edu.tr * * By using this code, you have agreed to follow the terms of the * * ANATOLIA license, in the file Anatolia/anatolia.licence * ***************************************************************************/ /*************************************************************************** * Original Diku Mud copyright (C) 1990, 1991 by Sebastian Hammer, * * Michael Seifert, Hans Henrik St{rfeldt, Tom Madsen, and Katja Nyboe. * * * * Merc Diku Mud improvments copyright (C) 1992, 1993 by Michael * * Chastain, Michael Quan, and Mitchell Tse. * * * * In order to use any part of this Merc Diku Mud, you must comply with * * both the original Diku license in 'license.doc' as well the Merc * * license in 'license.txt'. In particular, you may not remove either of * * these copyright notices. * * * * Much time and thought has gone into this software and you are * * benefitting. We hope that you share your changes too. What goes * * around, comes around. * ***************************************************************************/ /*************************************************************************** * ROM 2.4 is copyright 1993-1995 Russ Taylor * * ROM has been brought to you by the ROM consortium * * Russ Taylor (rtaylor@pacinfo.com) * * Gabrielle Taylor (gtaylor@pacinfo.com) * * Brian Moore (rom@rom.efn.org) * * By using this code, you have agreed to follow the terms of the * * ROM license, in the file Rom24/doc/rom.license * ***************************************************************************/ #if defined(macintosh) #include <types.h> #else #include <sys/types.h> #endif #include <ctype.h> #include <stdio.h> #include <stdlib.h> #include <string.h> #include <time.h> #include "merc.h" #include "interp.h" #undef IMMORTALS_LOGS bool check_social args( ( CHAR_DATA *ch, char *command,char *argument ) ); /* * Command logging types. */ #define LOG_NORMAL 0 #define LOG_ALWAYS 1 #define LOG_NEVER 2 /* * Log-all switch. */ bool fLogAll = FALSE; #ifdef IMMORTALS_LOGS /* * immortals log file */ FILE *imm_log; #endif /* * Command table. */ const struct cmd_type cmd_table [] = { /* * Common movement commands. */ { "north", do_north, POS_STANDING, 0, LOG_NEVER, 0, CMD_KEEP_HIDE|CMD_GHOST }, { "east", do_east, POS_STANDING, 0, LOG_NEVER, 0, CMD_KEEP_HIDE|CMD_GHOST }, { "south", do_south, POS_STANDING, 0, LOG_NEVER, 0, CMD_KEEP_HIDE|CMD_GHOST }, { "west", do_west, POS_STANDING, 0, LOG_NEVER, 0, CMD_KEEP_HIDE|CMD_GHOST }, { "up", do_up, POS_STANDING, 0, LOG_NEVER, 0, CMD_KEEP_HIDE|CMD_GHOST }, { "down", do_down, POS_STANDING, 0, LOG_NEVER, 0, CMD_KEEP_HIDE|CMD_GHOST }, /* * Common other commands. * Placed here so one and two letter abbreviations work. */ { "at", do_at, POS_DEAD, L6, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "cast", do_cast, POS_FIGHTING, 0, LOG_NORMAL, 1,0}, { "crecall", do_crecall, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "auction", do_auction, POS_SLEEPING, 0, LOG_NORMAL, 1, CMD_GHOST }, { "buy", do_buy, POS_RESTING, 0, LOG_NORMAL, 1,0}, { "channels", do_channels, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST}, { "dual", do_second_wield,POS_RESTING, 0, LOG_NORMAL, 1,0}, { "exits", do_exits, POS_RESTING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "estimate", do_estimate, POS_RESTING, 0, LOG_NORMAL, 1, CMD_GHOST }, { "get", do_get, POS_RESTING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE }, { "goto", do_goto, POS_DEAD, L8, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "glist", do_glist, POS_DEAD, 0, LOG_NEVER, 1, 0}, { "group", do_group, POS_SLEEPING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE }, { "hit", do_kill, POS_FIGHTING, 0, LOG_NORMAL, 0,0}, { "inventory", do_inventory, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "kill", do_kill, POS_FIGHTING, 0, LOG_NORMAL, 1,0}, { "look", do_look, POS_RESTING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "order", do_order, POS_RESTING, 0, LOG_NORMAL, 1,0}, { "practice", do_pracnew, POS_SLEEPING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE }, { "pracnew", do_practice, POS_SLEEPING, ML, LOG_NORMAL, 1, CMD_KEEP_HIDE }, { "rest", do_rest, POS_SLEEPING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE }, { "repair", do_repair, POS_SLEEPING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE }, { "second", do_second_wield,POS_RESTING, 0, LOG_NORMAL, 1,0}, { "sit", do_sit, POS_SLEEPING, 0, LOG_NORMAL, 1,0}, { "smithing", do_smithing, POS_RESTING, 0, LOG_NORMAL, 1,0}, { "sockets", do_sockets, POS_DEAD, L4, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST}, { "stand", do_stand, POS_SLEEPING, 0, LOG_NORMAL, 1,0}, { "tell", do_tell, POS_RESTING, 0, LOG_NORMAL, 1, CMD_GHOST }, { "unlock", do_unlock, POS_RESTING, 0, LOG_NORMAL, 1,0}, { "wield", do_wear, POS_RESTING, 0, LOG_NORMAL, 1,0}, { "wizhelp", do_wizhelp, POS_DEAD, IM, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, /* * Informational commands. */ { "affects", do_affects, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "areas", do_areas, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "balance", do_balance, POS_STANDING, 0, LOG_NORMAL, 1,0 }, { "bug", do_bug, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "changes", do_changes, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "commands", do_commands, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "compare", do_compare, POS_RESTING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE }, { "consider", do_consider, POS_RESTING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE }, { "concentrate", do_concentrate, POS_STANDING, 0, LOG_NORMAL, 1, 0 }, { "count", do_count, POS_SLEEPING, HE, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "credits", do_credits, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "deposit", do_deposit, POS_STANDING, 0, LOG_NORMAL, 1,0}, { "equipment", do_equipment, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "escape", do_escape, POS_FIGHTING, 0, LOG_NORMAL,1,0 }, { "examine", do_examine, POS_RESTING, 0, LOG_NORMAL, 1, CMD_GHOST }, { "help", do_help, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "idea", do_idea, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "motd", do_motd, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "news", do_news, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "raffects", do_raffects, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "read", do_read, POS_RESTING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "report", do_report, POS_RESTING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "rules", do_rules, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "scan", do_scan, POS_RESTING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "score", do_nscore, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "skills", do_skills, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "socials", do_socials, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "show", do_show, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "spells", do_spells, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "time", do_time, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "typo", do_typo, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "weather", do_weather, POS_RESTING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "who", do_who, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "whois", do_whois, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "withdraw", do_withdraw, POS_STANDING, 0, LOG_NORMAL, 1,0}, { "wizlist", do_wizlist, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "worth", do_worth, POS_SLEEPING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, /* * Configuration commands. */ { "alia", do_alia, POS_DEAD, 0, LOG_NORMAL, 0, CMD_KEEP_HIDE|CMD_GHOST }, { "alias", do_alias, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "clear", do_clear, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "cls", do_clear, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "autolist", do_autolist, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "color", do_color, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "autoassist", do_autoassist, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "autoexit", do_autoexit, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "autogold", do_autogold, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "autoloot", do_autoloot, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "autosac", do_autosac, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "autosplit", do_autosplit, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "brief", do_brief, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "combine", do_combine, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "compact", do_compact, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "description", do_description, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "delet", do_delet, POS_DEAD, 0, LOG_ALWAYS, 0, CMD_KEEP_HIDE|CMD_GHOST }, { "delete", do_delete, POS_STANDING, 0, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "identify", do_identify, POS_STANDING, 0, LOG_NORMAL, 1, CMD_GHOST }, { "nofollow", do_nofollow, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "noloot", do_noloot, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "nosummon", do_nosummon, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "outfit", do_outfit, POS_RESTING, 0, LOG_NORMAL, 1,0}, { "tick", do_tick, POS_DEAD, ML, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "password", do_password, POS_DEAD, 0, LOG_NEVER, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "prompt", do_prompt, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "quest", do_quest, POS_RESTING, 0, LOG_NORMAL, 1 , CMD_GHOST}, { "scroll", do_scroll, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "title", do_title, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "unalias", do_unalias, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "wimpy", do_wimpy, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, /* * Communication commands. */ { "answer", do_answer, POS_SLEEPING, 0, LOG_NORMAL, 1, CMD_GHOST }, { "bearcall", do_bear_call, POS_FIGHTING, 0, LOG_NORMAL, 1,0}, { "cb", do_cb, POS_SLEEPING, 0, LOG_NORMAL, 1, CMD_GHOST }, { "deaf", do_deaf, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "emote", do_emote, POS_RESTING, 0, LOG_NORMAL, 1, CMD_GHOST }, { "pmote", do_pmote, POS_RESTING, 0, LOG_NORMAL, 1, CMD_GHOST }, { ",", do_emote, POS_RESTING, 0, LOG_NORMAL, 0, CMD_GHOST }, { "gtell", do_gtell, POS_DEAD, 0, LOG_NORMAL, 1, CMD_GHOST }, { ";", do_gtell, POS_DEAD, 0, LOG_NORMAL, 0, CMD_GHOST }, { "note", do_note, POS_SLEEPING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "pose", do_pose, POS_RESTING, 0, LOG_NORMAL, 1, CMD_GHOST }, { "pray", do_pray, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "question", do_question, POS_SLEEPING, 0, LOG_NORMAL, 1, CMD_GHOST }, { "quiet", do_quiet, POS_SLEEPING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "reply", do_reply, POS_SLEEPING, 0, LOG_NORMAL, 1, CMD_GHOST }, { "replay", do_replay, POS_SLEEPING, 0, LOG_NORMAL, 1, CMD_GHOST }, { "say", do_say, POS_RESTING, 0, LOG_NORMAL, 1, CMD_GHOST }, { "'", do_say, POS_RESTING, 0, LOG_NORMAL, 0, CMD_GHOST }, { "shout", do_shout, POS_RESTING, 3, LOG_NORMAL, 1, CMD_GHOST }, { "warcry", do_warcry, POS_FIGHTING, 0, LOG_NORMAL, 1,0}, { "unread", do_unread, POS_SLEEPING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "yell", do_yell, POS_RESTING, 0, LOG_NORMAL, 1, CMD_GHOST }, /* * Object manipulation commands. */ { "brandish", do_brandish, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "butcher", do_butcher, POS_STANDING, 0, LOG_NORMAL, 1,0 }, { "close", do_close, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "detect", do_detect_hidden,POS_RESTING, 0, LOG_NORMAL, 1,0}, { "drink", do_drink, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "drop", do_drop, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "eat", do_eat, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "enchant", do_enchant, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "envenom", do_envenom, POS_RESTING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE }, { "fill", do_fill, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "fly", do_fly, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "give", do_give, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "heal", do_heal, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "hold", do_wear, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "layhands", do_layhands, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "list", do_list, POS_RESTING, 0, LOG_NORMAL, 1,CMD_KEEP_HIDE }, { "lock", do_lock, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "lore", do_lore, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "open", do_open, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "pick", do_pick, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "pour", do_pour, POS_RESTING, 0, LOG_NORMAL, 1,CMD_KEEP_HIDE }, { "put", do_put, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "quaff", do_quaff, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "recite", do_recite, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "remove", do_remove, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "request", do_request, POS_STANDING, 0, LOG_NORMAL, 1,0 }, { "sell", do_sell, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "take", do_get, POS_RESTING, 0, LOG_NORMAL, 1,CMD_KEEP_HIDE }, { "sacrifice", do_sacrifice, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "junk", do_sacrifice, POS_RESTING, 0, LOG_NORMAL, 0,0 }, { "trophy", do_trophy, POS_STANDING, 0, LOG_NORMAL, 1,0 }, { "value", do_value, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "wear", do_wear, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "zap", do_zap, POS_RESTING, 0, LOG_NORMAL, 1,0 }, /* * Combat commands. */ { "ambush", do_ambush, POS_STANDING, 0, LOG_NORMAL, 1,0 }, { "assassinate", do_assassinate, POS_STANDING, 0, LOG_NORMAL, 1,0 }, { "backstab", do_backstab, POS_STANDING, 0, LOG_NORMAL, 1,0 }, { "bash", do_bash, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "bashdoor", do_bash_door, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "bs", do_backstab, POS_STANDING, 0, LOG_NORMAL, 0,0 }, { "bite", do_vbite, POS_STANDING, 0, LOG_NORMAL, 0,0 }, { "touch", do_vtouch, POS_STANDING, 0, LOG_NORMAL, 0,0 }, { "berserk", do_berserk, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "bloodthirst", do_bloodthirst, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "blackjack", do_blackjack, POS_STANDING, 0, LOG_NORMAL, 1,0 }, { "caltraps", do_caltraps, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "explode", do_explode, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "camouflage", do_camouflage, POS_STANDING, 0, LOG_NORMAL, 1,0 }, { "circle", do_circle, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "cleave", do_cleave, POS_STANDING, 0, LOG_NORMAL, 1,0 }, { "dirt", do_dirt, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "disarm", do_disarm, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "dismount", do_dismount, POS_STANDING, ML, LOG_NORMAL, 1,0 }, { "flee", do_flee, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "guard", do_guard, POS_STANDING, 0, LOG_NORMAL, 1,0 }, { "kick", do_kick, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "lioncall", do_lion_call, POS_FIGHTING, 0, LOG_NORMAL, 1,0}, { "mount", do_mount, POS_STANDING, ML, LOG_NORMAL, 1,0 }, { "murde", do_murde, POS_FIGHTING, 0, LOG_NORMAL, 0,0 }, { "murder", do_murder, POS_FIGHTING, 0, LOG_ALWAYS, 1,0 }, { "nerve", do_nerve, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "rescue", do_rescue, POS_FIGHTING, 0, LOG_NORMAL, 0,0 }, { "resistance", do_resistance, POS_FIGHTING, 0, LOG_NORMAL, 0,0 }, { "truesight", do_truesight, POS_FIGHTING, 0, LOG_NORMAL, 0,0 }, { "shield", do_shield, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "spellbane", do_spellbane, POS_FIGHTING, 0, LOG_NORMAL, 0,0 }, { "strangle", do_strangle, POS_STANDING, 0, LOG_NORMAL, 1,0 }, { "tame", do_tame, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "throw", do_throw, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "tiger", do_tiger, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "trip", do_trip, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "target", do_target, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "vampire", do_vampire, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "vanish", do_vanish, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "weapon", do_weapon, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "blink", do_blink, POS_FIGHTING, 0, LOG_NORMAL, 1,CMD_KEEP_HIDE }, /* * Miscellaneous commands. */ { "endure", do_endure, POS_STANDING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE }, { "enter", do_enter, POS_STANDING, 0, LOG_NORMAL, 1, CMD_GHOST }, { "follow", do_follow, POS_RESTING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE }, { "gain", do_gain, POS_STANDING, 0, LOG_NORMAL, 1,0 }, { "go", do_enter, POS_STANDING, 0, LOG_NORMAL, 0, CMD_GHOST }, { "fade", do_fade, POS_RESTING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE }, { "herbs", do_herbs, POS_STANDING, 0, LOG_NORMAL, 1,0 }, { "hara", do_hara, POS_STANDING, 0, LOG_NORMAL,1,0 }, { "hide", do_hide, POS_RESTING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE }, { "human", do_human, POS_STANDING, 0, LOG_NORMAL,1,0 }, { "hunt", do_hunt, POS_STANDING, 0, LOG_NORMAL,1,0 }, { "leave", do_enter, POS_STANDING, 0, LOG_NORMAL,1, CMD_GHOST }, { "qui", do_qui, POS_DEAD, 0, LOG_NORMAL, 0, CMD_KEEP_HIDE|CMD_GHOST }, { "quit", do_quit, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "recall", do_recall, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "/", do_recall, POS_FIGHTING, 0, LOG_NORMAL, 0,0 }, { "rent", do_rent, POS_DEAD, 0, LOG_NORMAL, 0,0 }, { "save", do_save, POS_DEAD, 0, LOG_NORMAL, 1, CMD_GHOST }, { "sleep", do_sleep, POS_SLEEPING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE }, { "slist", do_slist, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "sneak", do_sneak, POS_STANDING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE }, { "split", do_split, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "steal", do_steal, POS_STANDING, 0, LOG_NORMAL, 1,0 }, { "train", do_train, POS_RESTING, 0, LOG_NORMAL, 1,0 }, { "visible", do_visible, POS_SLEEPING, 0, LOG_NORMAL, 1,0 }, { "wake", do_wake, POS_SLEEPING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE }, { "wanted", do_wanted, POS_STANDING, 0, LOG_ALWAYS, 1,0 }, { "where", do_where, POS_RESTING, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, /* * Immortal commands. */ { "advance", do_advance, POS_DEAD, ML, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "set", do_set, POS_DEAD, ML, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "dump", do_dump, POS_DEAD, ML, LOG_ALWAYS, 0, CMD_KEEP_HIDE|CMD_GHOST }, { "rename", do_rename, POS_DEAD, ML, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "violate", do_violate, POS_DEAD, ML, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "track", do_track, POS_STANDING, 0, LOG_NORMAL, 0,0 }, { "trust", do_trust, POS_DEAD, ML, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "allow", do_allow, POS_DEAD, L2, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "ban", do_ban, POS_DEAD, L2, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "deny", do_deny, POS_DEAD, L1, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "disconnect", do_disconnect, POS_DEAD, L3, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "flag", do_flag, POS_DEAD, L4, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "freeze", do_freeze, POS_DEAD, L4, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "permban", do_permban, POS_DEAD, L1, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "protect", do_protect, POS_DEAD, L1, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "reboo", do_reboo, POS_DEAD, L1, LOG_NORMAL, 0, CMD_KEEP_HIDE|CMD_GHOST }, { "reboot", do_reboot, POS_DEAD, L1, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "induct", do_induct, POS_DEAD, 0, LOG_ALWAYS, 1,0 }, { "grant", do_grant, POS_DEAD, L2, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "smite", do_smite, POS_DEAD, L2, LOG_ALWAYS, 1,0 }, { "limited", do_limited, POS_DEAD, L2, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "lookup", do_slookup, POS_DEAD, L2, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "popularity", do_popularity, POS_DEAD, L2, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "shutdow", do_shutdow, POS_DEAD, L1, LOG_NORMAL, 0, CMD_KEEP_HIDE|CMD_GHOST }, { "shutdown", do_shutdown, POS_DEAD, L1, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST}, { "sockets", do_sockets, POS_DEAD, L4, LOG_NORMAL, 1 }, { "wizlock", do_wizlock, POS_DEAD, L2, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "affrooms", do_affrooms, POS_DEAD, L5, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "force", do_force, POS_DEAD, L5, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "load", do_load, POS_DEAD, L4, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "newlock", do_newlock, POS_DEAD, L4, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "noaffect", do_noaffect, POS_DEAD, L5, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "nochannels", do_nochannels, POS_DEAD, L5, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "notitle", do_notitle, POS_DEAD, L5, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "noemote", do_noemote, POS_DEAD, L5, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "noshout", do_noshout, POS_DEAD, L5, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "notell", do_notell, POS_DEAD, L5, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "pecho", do_pecho, POS_DEAD, L4, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "purge", do_purge, POS_DEAD, L4, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "restore", do_restore, POS_DEAD, L4, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "sla", do_sla, POS_DEAD, L3, LOG_NORMAL, 0, CMD_KEEP_HIDE|CMD_GHOST }, { "slay", do_slay, POS_DEAD, L3, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "teleport", do_transfer, POS_DEAD, L5, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "transfer", do_transfer, POS_DEAD, L5, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, /* { "remort", do_remort, POS_DEAD, L5, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, */ { "poofin", do_bamfin, POS_DEAD, L8, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "poofout", do_bamfout, POS_DEAD, L8, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "gecho", do_echo, POS_DEAD, L4, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "holylight", do_holylight, POS_DEAD, IM, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "incognito", do_incognito, POS_DEAD, IM, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "invis", do_invis, POS_DEAD, IM, LOG_NORMAL, 0, CMD_KEEP_HIDE|CMD_GHOST }, { "log", do_log, POS_DEAD, L1, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "memory", do_memory, POS_DEAD, IM, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "mwhere", do_mwhere, POS_DEAD, IM, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "owhere", do_owhere, POS_DEAD, IM, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "peace", do_peace, POS_DEAD, L5, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "penalty", do_penalty, POS_DEAD, L7, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "echo", do_recho, POS_DEAD, L6, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "return", do_return, POS_DEAD, L6, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "snoop", do_snoop, POS_DEAD, L5, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST}, { "stat", do_stat, POS_DEAD, IM, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "string", do_string, POS_DEAD, L5, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "switch", do_switch, POS_DEAD, L6, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "wizinvis", do_invis, POS_DEAD, IM, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "vnum", do_vnum, POS_DEAD, L4, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "zecho", do_zecho, POS_DEAD, L4, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "cabal_scan", do_cabal_scan, POS_STANDING, 60, LOG_NEVER, 0, CMD_KEEP_HIDE|CMD_GHOST }, { "clone", do_clone, POS_DEAD, L5, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "wiznet", do_wiznet, POS_DEAD, IM, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "immtalk", do_immtalk, POS_DEAD, IM, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "imotd", do_imotd, POS_DEAD, IM, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { ":", do_immtalk, POS_DEAD, IM, LOG_NORMAL, 0, CMD_KEEP_HIDE|CMD_GHOST }, { "smote", do_smote, POS_DEAD, IM, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "prefi", do_prefi, POS_DEAD, IM, LOG_NORMAL, 0, CMD_KEEP_HIDE|CMD_GHOST }, { "prefix", do_prefix, POS_DEAD, IM, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "objlist", do_objlist, POS_DEAD, ML, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "settraps", do_settraps, POS_STANDING, 0, LOG_NORMAL, 1,0}, { "slook", do_slook, POS_SLEEPING, 0, LOG_NORMAL, 1,CMD_KEEP_HIDE|CMD_GHOST}, { "learn", do_learn, POS_STANDING, 0, LOG_NORMAL, 1,0}, { "teach", do_teach, POS_STANDING, 0, LOG_NORMAL, 1,0}, { "camp", do_camp, POS_STANDING, 0, LOG_NORMAL, 1,0 }, { "tail", do_tail, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "push", do_push, POS_STANDING, 0, LOG_NORMAL, 1,0 }, { "demand", do_demand, POS_STANDING, 0, LOG_NORMAL, 1,0 }, { "bandage", do_bandage, POS_FIGHTING, 0, LOG_NORMAL, 1,0 }, { "shoot", do_shoot, POS_STANDING, 0, LOG_NORMAL,1,0 }, { "find", do_find, POS_DEAD, ML, LOG_ALWAYS, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "nscore", do_score, POS_DEAD, 0, LOG_NORMAL, 1, CMD_KEEP_HIDE|CMD_GHOST }, { "katana", do_katana, POS_STANDING, 0, LOG_NORMAL, 1,0 }, { "charm", do_charm, POS_STANDING, 0, LOG_NORMAL, 1,0 }, { "ititle", do_ititle, POS_DEAD, IM, LOG_NORMAL, 1,CMD_KEEP_HIDE|CMD_GHOST }, { "sense", do_sense, POS_RESTING, 0, LOG_NORMAL,1,0}, /* * End of list. */ { "", 0, POS_DEAD, 0, LOG_NORMAL, 0, CMD_KEEP_HIDE|CMD_GHOST } }; /* * The main entry point for executing commands. * Can be recursively called from 'at', 'order', 'force'. */ void interpret( CHAR_DATA *ch, char *argument ) { char command[MAX_INPUT_LENGTH]; char logline[MAX_INPUT_LENGTH]; char buf[MAX_INPUT_LENGTH]; char *strtime; int cmd; int trust; bool found; /* * Strip leading spaces. */ smash_tilde(argument); while ( isspace(*argument) ) argument++; if ( argument[0] == '\0' ) return; /* * Implement freeze command. */ if ( !IS_NPC(ch) && IS_SET(ch->act, PLR_FREEZE) ) { send_to_char( "You're totally frozen!\n\r", ch ); return; } /* * Grab the command word. * Special parsing so ' can be a command, * also no spaces needed after punctuation. */ strcpy( logline, argument ); #ifdef IMMORTALS_LOGS if (IS_IMMORTAL(ch)) { if ( (imm_log = fopen(IMM_LOG_FILE,"a+")) == NULL ) { bug("cannot open imm_log_file",0); } else { strtime = (char *) malloc(100); strtime = ctime( ¤t_time); strtime[strlen(strtime) -1] = '\0'; sprintf(buf,"%s :[%s]:%s\n", strtime,ch->name,logline); fprintf(imm_log,buf); fclose(imm_log); } } #endif if ( !isalpha(argument[0]) && !isdigit(argument[0]) ) { command[0] = argument[0]; command[1] = '\0'; argument++; while ( isspace(*argument) ) argument++; } else { argument = one_argument( argument, command ); } /* * Look for command in command table. */ found = FALSE; trust = get_trust( ch ); for ( cmd = 0; cmd_table[cmd].name[0] != '\0'; cmd++ ) { if ( command[0] == cmd_table[cmd].name[0] && !str_prefix( command, cmd_table[cmd].name ) && cmd_table[cmd].level <= trust ) { if ( IS_AFFECTED(ch,AFF_STUN) && !(cmd_table[cmd].extra & CMD_KEEP_HIDE) ) { send_to_char("You are STUNNED to do that.\n\r",ch); return; } /* Come out of hiding for most commands */ if ( IS_AFFECTED(ch, AFF_HIDE) && !IS_NPC(ch) && !(cmd_table[cmd].extra & CMD_KEEP_HIDE) ) { REMOVE_BIT(ch->affected_by, AFF_HIDE); send_to_char("You step out of the shadows.\n\r", ch); act("$n steps out of the shadows.", ch, NULL, NULL, TO_ROOM); } if ( IS_AFFECTED(ch, AFF_FADE) && !IS_NPC(ch) && !(cmd_table[cmd].extra & CMD_KEEP_HIDE) ) { REMOVE_BIT(ch->affected_by, AFF_FADE); send_to_char("You step out of the shadows.\n\r", ch); act("$n steps out of the shadows.", ch, NULL, NULL, TO_ROOM); } if ( IS_AFFECTED(ch, AFF_IMP_INVIS) && !IS_NPC(ch) && (cmd_table[cmd].position == POS_FIGHTING) ) { affect_strip(ch,gsn_imp_invis); REMOVE_BIT(ch->affected_by, AFF_IMP_INVIS); send_to_char("You fade into existence.\n\r", ch); act("$n fades into existence.", ch, NULL, NULL, TO_ROOM); } /* prevent ghosts from doing a bunch of commands */ if (IS_SET(ch->act, PLR_GHOST) && !IS_NPC(ch) && !(cmd_table[cmd].extra & CMD_GHOST) ) continue; found = TRUE; break; } } /* * Log and snoop. */ if ( cmd_table[cmd].log == LOG_NEVER ) strcpy( logline, "" ); if ( ( ( !IS_NPC(ch) && IS_SET(ch->act, PLR_LOG) ) || fLogAll || cmd_table[cmd].log == LOG_ALWAYS ) && logline[0] != '\0' && logline[0] != '\n' ) { sprintf( log_buf, "Log %s: %s", ch->name, logline ); wiznet(log_buf,ch,NULL,WIZ_SECURE,0,get_trust(ch)); log_string( log_buf ); } if ( ch->desc != NULL && ch->desc->snoop_by != NULL ) { write_to_buffer( ch->desc->snoop_by, "% ", 2 ); write_to_buffer( ch->desc->snoop_by, logline, 0 ); write_to_buffer( ch->desc->snoop_by, "\n\r", 2 ); } if ( !found ) { /* * Look for command in socials table. */ if ( !check_social( ch, command, argument ) ) { send_to_char( "Huh?\n\r", ch ); return; } else return; } /* * Character not in position for command? */ if ( ch->position < cmd_table[cmd].position ) { switch( ch->position ) { case POS_DEAD: send_to_char( "Lie still; you are DEAD.\n\r", ch ); break; case POS_MORTAL: case POS_INCAP: send_to_char( "You are hurt far too bad for that.\n\r", ch ); break; case POS_STUNNED: send_to_char( "You are too stunned to do that.\n\r", ch ); break; case POS_SLEEPING: send_to_char( "In your dreams, or what?\n\r", ch ); break; case POS_RESTING: send_to_char( "Nah... You feel too relaxed...\n\r", ch); break; case POS_SITTING: send_to_char( "Better stand up first.\n\r",ch); break; case POS_FIGHTING: send_to_char( "No way! You are still fighting!\n\r", ch); break; } return; } /* * Dispatch the command. */ (*cmd_table[cmd].do_fun) ( ch, argument ); tail_chain( ); return; } bool check_social( CHAR_DATA *ch, char *command, char *argument ) { char arg[MAX_INPUT_LENGTH]; CHAR_DATA *victim; int cmd; bool found; found = FALSE; for ( cmd = 0; social_table[cmd].name[0] != '\0'; cmd++ ) { if ( command[0] == social_table[cmd].name[0] && !str_prefix( command, social_table[cmd].name ) ) { found = TRUE; break; } } if ( !found ) return FALSE; if ( !IS_NPC(ch) && IS_SET(ch->comm, COMM_NOEMOTE) ) { send_to_char( "You are anti-social!\n\r", ch ); return TRUE; } switch ( ch->position ) { case POS_DEAD: send_to_char( "Lie still; you are DEAD.\n\r", ch ); return TRUE; case POS_INCAP: case POS_MORTAL: send_to_char( "You are hurt far too bad for that.\n\r", ch ); return TRUE; case POS_STUNNED: send_to_char( "You are too stunned to do that.\n\r", ch ); return TRUE; case POS_SLEEPING: /* * I just know this is the path to a 12" 'if' statement. :( * But two players asked for it already! -- Furey */ if ( !str_cmp( social_table[cmd].name, "snore" ) ) break; send_to_char( "In your dreams, or what?\n\r", ch ); return TRUE; } if ( IS_AFFECTED( ch, AFF_HIDE ) ) { REMOVE_BIT( ch->affected_by, AFF_HIDE ); send_to_char( "You step out of shadows.\n\r", ch); act( "$n steps out of shadows.", ch, NULL, NULL, TO_ROOM); } if ( IS_AFFECTED( ch, AFF_FADE ) ) { REMOVE_BIT( ch->affected_by, AFF_FADE ); send_to_char( "You step out of shadows.\n\r", ch); act( "$n steps out of shadows.", ch, NULL, NULL, TO_ROOM); } if ( IS_AFFECTED(ch, AFF_IMP_INVIS) && !IS_NPC(ch) && (cmd_table[cmd].position == POS_FIGHTING) ) { affect_strip(ch,gsn_imp_invis); REMOVE_BIT(ch->affected_by, AFF_IMP_INVIS); send_to_char("You fade into existence.\n\r", ch); act("$n fades into existence.", ch, NULL, NULL, TO_ROOM); } one_argument( argument, arg ); victim = NULL; if ( arg[0] == '\0' ) { act( social_table[cmd].others_no_arg, ch, NULL, victim, TO_ROOM ); act( social_table[cmd].char_no_arg, ch, NULL, victim, TO_CHAR ); } else if ( ( victim = get_char_room( ch, arg ) ) == NULL ) { send_to_char( "They aren't here.\n\r", ch ); } else if ( victim == ch ) { act( social_table[cmd].others_auto, ch, NULL, victim, TO_ROOM ); act( social_table[cmd].char_auto, ch, NULL, victim, TO_CHAR ); } else { act( social_table[cmd].others_found, ch, NULL, victim, TO_NOTVICT ); act( social_table[cmd].char_found, ch, NULL, victim, TO_CHAR ); act( social_table[cmd].vict_found, ch, NULL, victim, TO_VICT ); if ( !IS_NPC(ch) && IS_NPC(victim) && !IS_AFFECTED(victim, AFF_CHARM) && IS_AWAKE(victim) && victim->desc == NULL) { switch ( number_bits( 4 ) ) { case 0: case 1: case 2: case 3: case 4: case 5: case 6: case 7: case 8: act( social_table[cmd].others_found, victim, NULL, ch, TO_NOTVICT ); act( social_table[cmd].char_found, victim, NULL, ch, TO_CHAR ); act( social_table[cmd].vict_found, victim, NULL, ch, TO_VICT ); break; case 9: case 10: case 11: case 12: act( "$n slaps $N.", victim, NULL, ch, TO_NOTVICT ); act( "You slap $N.", victim, NULL, ch, TO_CHAR ); act( "$n slaps you.", victim, NULL, ch, TO_VICT ); break; } } } return TRUE; } /* * Return true if an argument is completely numeric. */ bool is_number ( char *arg ) { if ( *arg == '\0' ) return FALSE; if ( *arg == '+' || *arg == '-' ) arg++; for ( ; *arg != '\0'; arg++ ) { if ( !isdigit( *arg ) ) return FALSE; } return TRUE; } /* * Given a string like 14.foo, return 14 and 'foo' */ int number_argument( char *argument, char *arg ) { char *pdot; int number; for ( pdot = argument; *pdot != '\0'; pdot++ ) { if ( *pdot == '.' ) { *pdot = '\0'; number = atoi( argument ); *pdot = '.'; strcpy( arg, pdot+1 ); return number; } } strcpy( arg, argument ); return 1; } /* * Given a string like 14*foo, return 14 and 'foo' */ int mult_argument(char *argument, char *arg) { char *pdot; int number; for ( pdot = argument; *pdot != '\0'; pdot++ ) { if ( *pdot == '*' ) { *pdot = '\0'; number = atoi( argument ); *pdot = '*'; strcpy( arg, pdot+1 ); return number; } } strcpy( arg, argument ); return 1; } /* * Pick off one argument from a string and return the rest. * Understands quotes. */ char *one_argument( char *argument, char *arg_first ) { char cEnd; while ( isspace(*argument) ) argument++; cEnd = ' '; if ( *argument == '\'' || *argument == '"' ) cEnd = *argument++; while ( *argument != '\0' ) { if ( *argument == cEnd ) { argument++; break; } *arg_first = LOWER(*argument); arg_first++; argument++; } *arg_first = '\0'; while ( isspace(*argument) ) argument++; return argument; } /* * Contributed by Alander. */ void do_commands( CHAR_DATA *ch, char *argument ) { char buf[MAX_STRING_LENGTH]; int cmd; int col; col = 0; for ( cmd = 0; cmd_table[cmd].name[0] != '\0'; cmd++ ) { if ( cmd_table[cmd].level < LEVEL_HERO && cmd_table[cmd].level <= get_trust( ch ) && cmd_table[cmd].show) { sprintf( buf, "%-12s", cmd_table[cmd].name ); send_to_char( buf, ch ); if ( ++col % 6 == 0 ) send_to_char( "\n\r", ch ); } } if ( col % 6 != 0 ) send_to_char( "\n\r", ch ); return; } void do_wizhelp( CHAR_DATA *ch, char *argument ) { char buf[MAX_STRING_LENGTH]; int cmd; int col; col = 0; for ( cmd = 0; cmd_table[cmd].name[0] != '\0'; cmd++ ) { if ( cmd_table[cmd].level >= LEVEL_HERO && cmd_table[cmd].level <= get_trust( ch ) && cmd_table[cmd].show) { sprintf( buf, "%-12s", cmd_table[cmd].name ); send_to_char( buf, ch ); if ( ++col % 6 == 0 ) send_to_char( "\n\r", ch ); } } if ( col % 6 != 0 ) send_to_char( "\n\r", ch ); return; } void do_reture( CHAR_DATA *ch, char *argument) { send_to_char("Ok.\n\r",ch); return; } /*********** alias.c **************/ /* does aliasing and other fun stuff */ void substitute_alias(DESCRIPTOR_DATA *d, char *argument) { CHAR_DATA *ch; char buf[MAX_STRING_LENGTH],prefix[MAX_INPUT_LENGTH],name[MAX_INPUT_LENGTH]; char *point; int alias; ch = d->original ? d->original : d->character; /* check for prefix */ if (ch->prefix[0] != '\0' && str_prefix("prefix",argument)) { if (strlen(ch->prefix) + strlen(argument) > MAX_INPUT_LENGTH) send_to_char("Line to long, prefix not processed.\r\n",ch); else { sprintf(prefix,"%s %s",ch->prefix,argument); argument = prefix; } } if (IS_NPC(ch) || ch->pcdata->alias[0] == NULL || !str_prefix("alias",argument) || !str_prefix("una",argument) || !str_prefix("prefix",argument)) { interpret(d->character,argument); return; } strcpy(buf,argument); for (alias = 0; alias < MAX_ALIAS; alias++) /* go through the aliases */ { if (ch->pcdata->alias[alias] == NULL) break; if (!str_prefix(ch->pcdata->alias[alias],argument)) { point = one_argument(argument,name); if (!strcmp(ch->pcdata->alias[alias],name)) { buf[0] = '\0'; strcat(buf,ch->pcdata->alias_sub[alias]); strcat(buf," "); strcat(buf,point); break; } if (strlen(buf) > MAX_INPUT_LENGTH) { send_to_char("Alias substitution too long. Truncated.\r\n",ch); buf[MAX_INPUT_LENGTH -1] = '\0'; } } } interpret(d->character,buf); } void do_alia(CHAR_DATA *ch, char *argument) { send_to_char("I'm sorry, alias must be entered in full.\n\r",ch); return; } void do_alias(CHAR_DATA *ch, char *argument) { CHAR_DATA *rch; char arg[MAX_INPUT_LENGTH],buf[MAX_STRING_LENGTH]; int pos; smash_tilde( argument ); if (ch->desc == NULL) rch = ch; else rch = ch->desc->original ? ch->desc->original : ch; if (IS_NPC(rch)) return; argument = one_argument(argument,arg); if (arg[0] == '\0') { if (rch->pcdata->alias[0] == NULL) { send_to_char("You have no aliases defined.\n\r",ch); return; } send_to_char("Your current aliases are:\n\r",ch); for (pos = 0; pos < MAX_ALIAS; pos++) { if (rch->pcdata->alias[pos] == NULL || rch->pcdata->alias_sub[pos] == NULL) break; sprintf(buf," %s: %s\n\r",rch->pcdata->alias[pos], rch->pcdata->alias_sub[pos]); send_to_char(buf,ch); } return; } if (!str_prefix("una",arg) || !str_cmp("alias",arg)) { send_to_char("Sorry, that word is reserved.\n\r",ch); return; } if (argument[0] == '\0') { for (pos = 0; pos < MAX_ALIAS; pos++) { if (rch->pcdata->alias[pos] == NULL || rch->pcdata->alias_sub[pos] == NULL) break; if (!str_cmp(arg,rch->pcdata->alias[pos])) { sprintf(buf,"%s aliases to '%s'.\n\r",rch->pcdata->alias[pos], rch->pcdata->alias_sub[pos]); send_to_char(buf,ch); return; } } send_to_char("That alias is not defined.\n\r",ch); return; } if (!str_prefix(argument,"delete") || !str_prefix(argument,"prefix")) { send_to_char("That shall not be done!\n\r",ch); return; } for (pos = 0; pos < MAX_ALIAS; pos++) { if (rch->pcdata->alias[pos] == NULL) break; if (!str_cmp(arg,rch->pcdata->alias[pos])) /* redefine an alias */ { free_string(rch->pcdata->alias_sub[pos]); rch->pcdata->alias_sub[pos] = str_dup(argument); sprintf(buf,"%s is now realiased to '%s'.\n\r",arg,argument); send_to_char(buf,ch); return; } } if (pos >= MAX_ALIAS) { send_to_char("Sorry, you have reached the alias limit.\n\r",ch); return; } /* make a new alias */ rch->pcdata->alias[pos] = str_dup(arg); rch->pcdata->alias_sub[pos] = str_dup(argument); sprintf(buf,"%s is now aliased to '%s'.\n\r",arg,argument); send_to_char(buf,ch); } void do_unalias(CHAR_DATA *ch, char *argument) { CHAR_DATA *rch; char arg[MAX_INPUT_LENGTH]; int pos; bool found = FALSE; if (ch->desc == NULL) rch = ch; else rch = ch->desc->original ? ch->desc->original : ch; if (IS_NPC(rch)) return; argument = one_argument(argument,arg); if (arg == '\0') { send_to_char("Unalias what?\n\r",ch); return; } for (pos = 0; pos < MAX_ALIAS; pos++) { if (rch->pcdata->alias[pos] == NULL) break; if (found) { rch->pcdata->alias[pos-1] = rch->pcdata->alias[pos]; rch->pcdata->alias_sub[pos-1] = rch->pcdata->alias_sub[pos]; rch->pcdata->alias[pos] = NULL; rch->pcdata->alias_sub[pos] = NULL; continue; } if(!strcmp(arg,rch->pcdata->alias[pos])) { send_to_char("Alias removed.\n\r",ch); free_string(rch->pcdata->alias[pos]); free_string(rch->pcdata->alias_sub[pos]); rch->pcdata->alias[pos] = NULL; rch->pcdata->alias_sub[pos] = NULL; found = TRUE; } } if (!found) send_to_char("No alias of that name to remove.\n\r",ch); }