| JaMOOka Home Downloads FAQs Tutorials Known Issues Forums Screenshots Contact Us! License Last Modified: November 25, 2005 |
#0:do_out_of_band_command
This version modified by jaime (#2) Wed Nov 27 15:30:31 1996 EST for use of the MacMOOSE utilities under LamdbaCore and further modified by members of the JHCore Group for use on AcadianaMOO Fri Feb 1 07:33:03 2002 CST.Both of these are modifications of the original #0:do_out_of_band_command from the original JHCore as extracted Jan 4, 2002 (under LambdaMOO 1.8.1), Mon Jun 4 13:24:28 2001 Central Daylight Time by Xplat (#4014) (on Waterpoint (for core))
MOO adminstrators: If you're attempting to install the MacMOOSE utilities on a JHCore MOO, you need to cut and paste all of the remaining text in this column into your moo while being logged on as a wizard. You must use this version in place of either the #0:do_out_of_band_command found in the original JHCore or that found on the MacMOOSE utilities site.
Note: make sure you include the final period following the "endif"; that is the sign to the MOO that your download is complete and that it should rewrite the original verb.
@program #0:do_out_of_band_command
if (callers())
return E_PERM;
elseif (!valid(player))
return;
endif
if (length(args) > 1 && args[1] == "#$#MacMOOSE")
set_task_perms(player);
oob_verb = args[2];
tokens = $macmoose_utils:simple_tokenize(argstr);
oob_args = (len = length(tokens)) > 2 ? tokens[3..len] | {};
$macmoose_utils:(oob_verb)(@oob_args);
return;
endif
command = args[1];
if (command == "#$#client-options" && valid(player))
player.client_options = {};
failed = {};
for option in (listdelete(args, 1))
if (typeof(presult = $client_options:parse({"+" + option})) == STR || length(presult) == 1)
failed = setadd(failed, option);
else
player:set_client_option(@presult);
endif
endfor
if (failed)
notify(player, tostr("Unknown client option(s): ", $string_utils:from_list(failed, " ")));
endif
else
"$out_of_band:parse_command(@args);";
return $mcp:(verb)(@args);
endif
.
