c50
{0, 946920273, {"Generic test victim", #4353, {#13, #12, #24, #4, #3, #2, #1}, {
}, #59, 1, 0, 0, 0, 0, 0, {}}, {{#1, {{#55, "r", "obj_disk_size", 0}}}, {#2, {{#
59, "rc", "www_desc", {"<H1>%T (#%T~#)</H1>", "*PASS*"}}, {#789, "r", "www_count
er", 245}, {#55, "r", "best_before", 945813900}, {#55, "r", "aliases", {"Generic
 test victim", "testee"}}}}, {#3, {{#59, "rc", "anchor", #-1}, {#59, "c", "key",
 0}}}, {#4, {{#55, "r", "students", {}}, {#55, "r", "quota_contribs", {}}, {#55,
 "r", "owned_objects", {}}}}, {#24, {}}, {#12, {{#789, "r", "message_hashes", {}
}, {#59, "rc", "locking_task", 0}, {#59, "rc", "msg_page_refused", "Sorry, %1 is
 taking the programmer's test.  Please don't interfere."}, {#59, "c", "messages"
, {}}, {#59, "c", "messages_going", {}}, {#59, "rc", "help_db", 0}, {#60, "r", "
features", {#3512, #4909, #1213, #2776}}}}, {#13, {}}, {#186, {{#55, "r", "__own
ed_by", #789}}}}, {{#789, "rxdo", "receive_page", "this", "none", "this", "\"Tes
t victims may not be paged.\";", "return 0;"}, {#789, "rdo", "@who @qui who qui 
where*is @where*is ou @ou @wehre", "any", "any", "any", "player:tell(\"You are t
aking the programmer's test.  You are not allowed to comunicate with anyone else
.  Burn the permit if you want to give up.\");"}, {#789, "rdo", "del*ete @set", 
"any", "any", "any", "player:tell(\"Sorry, while taking the programmers' test, y
ou may not use the \", verb, \" command.\");"}, {#789, "xdo", "say emote", "any"
, "any", "any", "\"Do not allow talking and emoting - unless one is in an editor
.\";", "if (this.location:isa(#51) || this.location == #2428)", "  player.locati
on:(verb)(@args);", "else", "  player:tell(\"You are taking the programmer's tes
t.  You are not allowed to comunicate with anyone else.  Burn the permit if you 
want to give up.\");", "endif"}, {#789, "xdo", "page @read @send @unplug-ears @r
eply @answer dit @nn @mail", "any", "any", "any", "player:tell(\"You are taking 
the programmer's test.  You are not allowed to comunicate with anyone else.  Bur
n the permit if you want to give up.\");"}, {#789, "xdo", "wh*isper chu*chotte",
 "any", "any", "any", "player:tell(\"Sorry, \", this:title(), \" is taking the p
rogrammer's test.  Please don't interfere.\");"}, {#789, "rxdo", "_disfunc", "th
is", "none", "this", "\"Fail the test and return the victim to builder status.\"
;", "if (valid(caller_perms()) && caller != this && caller != #0)", "  return E_
PERM;", "endif", "for object in (this.owned_objects)", "  if (object:isa(#6481) 
|| object:isa(#3067) || object:isa(#6782))", "    object:do_burn();", "  endif",
 "  $command_utils:suspend_if_needed();", "endfor", "return pass(@args);", "\"La
st modified by Dax (#789) on Sat May 16 14:19:30 1998 EDT.\";"}}, {{#53, "recycl
e", #55, #53, #6319}, {#59, "_irradiate_quick", #55, #59, #6319}, {#-1, "", #631
9, #-1, #6319}, {#-1, "eval", #-1, #-1, #6319}, {#6319, "eval_cmd_string", #6319
, #14, #6319}, {#6319, "eval", #6319, #14, #6319}, {#-1, "Tue Dec 21 19:13:15 19
99 MST", #59, #-1, #59}, {{#59, "funky_action", #6319, #59, #55, 51}, {#59, "_di
spatch", #6319, #56, #55, 9}}}}
.

0