diff options
Diffstat (limited to 'world/map/npc/commands/automod.txt')
-rw-r--r-- | world/map/npc/commands/automod.txt | 90 |
1 files changed, 0 insertions, 90 deletions
diff --git a/world/map/npc/commands/automod.txt b/world/map/npc/commands/automod.txt deleted file mode 100644 index 09544852..00000000 --- a/world/map/npc/commands/automod.txt +++ /dev/null @@ -1,90 +0,0 @@ --|script|@automod|32767 -{ - end; - -OnCall: - if (GM < CMD_AUTOMOD && GM < G_SYSOP) goto L_GM; - set @PREV_AUTOMOD, AUTOMOD; - if (@args$ == "") goto L_Info; - elif (@args$ == "off") goto L_Off; - elif (@args$ == "kill") goto L_Kill; - elif (@args$ == "move") goto L_Move; - elif (@args$ == "block") goto L_Block; - elif (@args$ == "kick") goto L_Kick; - - message strcharinfo(0), "automod : invalid mode."; - goto L_Info; - -L_Off: - set AUTOMOD, 0; - set ##AUTOMOD, AUTOMOD; - message strcharinfo(0), "automod : mode changed to ##Boff##b"; - // send a fixpos to remove the current collision, if any - if (@PREV_AUTOMOD == 3) set Sex, Sex; - end; - -L_Kill: - set AUTOMOD, 1; - set ##AUTOMOD, AUTOMOD; - message strcharinfo(0), "automod : mode changed to ##Bkill##b"; - message strcharinfo(0), "automod : players sitting on you will automatically be killed and then moved."; - // send a fixpos to remove the current collision, if any - if (@PREV_AUTOMOD == 3) set Sex, Sex; - end; - -L_Move: - set AUTOMOD, 2; - set ##AUTOMOD, AUTOMOD; - message strcharinfo(0), "automod : mode changed to ##Bmove##b"; - message strcharinfo(0), "automod : players sitting on you will automatically be moved."; - // send a fixpos to remove the current collision, if any - if (@PREV_AUTOMOD == 3) set Sex, Sex; - end; - -L_Block: - set AUTOMOD, 3; - set ##AUTOMOD, AUTOMOD; - message strcharinfo(0), "automod : mode changed to ##Bblock##b"; - message strcharinfo(0), "automod : players will be unable to sit or walk over you while you are sitting. (experimental)"; - set Sex, Sex; - end; - -L_Kick: - set AUTOMOD, 4; - set ##AUTOMOD, AUTOMOD; - message strcharinfo(0), "automod : mode changed to ##Bkick##b"; - message strcharinfo(0), "automod : players sitting on you will automatically be kicked from the server."; - // send a fixpos to remove the current collision, if any - if (@PREV_AUTOMOD == 3) set Sex, Sex; - end; - -L_GM: - message strcharinfo(0), "automod : GM command is level "+ CMD_AUTOMOD +", but you are level " + GM; - end; - -L_Info: - if (AUTOMOD == 0) - message strcharinfo(0), "automod : current mode: ##Boff##b kill move block kick"; - elif (AUTOMOD == 1) - message strcharinfo(0), "automod : current mode: off ##Bkill##b move block kick"; - elif (AUTOMOD == 2) - message strcharinfo(0), "automod : current mode: off kill ##Bmove##b block kick"; - elif (AUTOMOD == 3) - message strcharinfo(0), "automod : current mode: off kill move ##Bblock##b kick"; - elif (AUTOMOD == 4) - message strcharinfo(0), "automod : current mode: off kill move block ##Bkick##b"; - message strcharinfo(0), "automod : you can change mode by doing @automod (mode)"; - end; - -OnPCLoginEvent: - if (GM >= CMD_AUTOMOD && ##AUTOMOD) - set AUTOMOD, ##AUTOMOD; - elif (##AUTOMOD) - set ##AUTOMOD, 0; - end; - -OnInit: - registercmd chr(ATCMD_SYMBOL) + "automod", strnpcinfo(0) + "::OnCall"; - registercmd chr(ATCMD_SYMBOL) + "automode", strnpcinfo(0) + "::OnCall"; - end; -} |