Core Utility Help (#23)(an instance of Generic Help Database made by Hacker)     Help database for LambdaCore utility objects and generics. VERB SOURCE CODE: find_topics:
if (!args)
l = {};
for p in (properties(#0))
if ((p[max(1, length(p) - 5)..length(p)] == "_utils") && #0.(p).description)
l = {@l, "$" + p};
endif
endfor
return {@pass(@args), @l};
elseif (ts = pass(@args))
return ts;
elseif ((what = args[1])[1] != "$")
return {};
elseif (ts = pass("$generic_" + what[2..length(what)]))
return ts;
elseif ((r = rindex(w = strsub(what[2..length(what)], "-", "_"), "_utils")) && ((r
== (length(w) - 5)) && (valid(#0.(w)) && #0.(w).description)))
return {what};
else
return {};
endif
.
get_topic:
topic = args[1];
if ((topic == (("$" + topic[2..length(topic) - 5]) + "utils")) && (valid(#0.(w =
strsub(topic[2..length(topic)], "-", "_"))) && (uhelp = #0.(w):description())))
return {tostr("General information on $", w, ":"), "----", @uhelp};
else
return pass(@args);
endif
.
dump_topic:
if ((E_PROPNF != (text = pass(@args))) || ((args[1][1] != "$") || ((!((uprop = args[1][2..length(args[1])])
in properties(#0))) || (typeof(uobj = #0.(uprop)) != OBJ))))
return text;
else
udesc = uobj.description;
return {tostr(";;$", uprop, ".description = $command_utils:read_lines()"), @$command_utils:dump_lines((typeof(udesc)
== LIST) ? udesc | {udesc})};
endif
.
PROPERTY DATA:       $login       $container       $mail_agent       MR-subscribing       MR-naming       MR-access       $mail_recipient       receiving-mail       mail-format       mail-resolve       sending-mail       mail-system       $player_db       core-index       object-matching       $no_one       $exit       $room       $help       $generic_db       $generic_editor       $generic_help       $generic_options       MR-sequences       MR-reading       MR-writing       MR-searching       $housekeeper       $recycler       $error       $biglist |