Player-Creation-Log (#19)(an instance of Generic Large-Capacity Mail Recipient made by Hacker)Log of player creations. Go to location of this object, Mail Distribution Center. VERB SOURCE CODE: display_seq_headers:
":display_seq_headers(msg_seq[,cur])";
if (!this:ok(caller, caller_perms()))
return E_PERM;
endif
player:tell(" WHEN BY WHO EMAIL-ADDRESS");
pass(@args);
.
msg_summary_line:
when = ctime(args[1])[5..10];
from = args[2];
by = $string_utils:left(from[1..index(from, " (") - 1], -9);
subject = args[4];
who = subject[1..(open = index(subject, " (")) - 1];
if ((close = rindex(subject, ")")) > open)
who = who[1..min(9, length(who))] + subject[open..close];
endif
who = $string_utils:left(who, 18);
line = args[("" in args) + 1];
email = line[1..index(line + " ", " ") - 1];
if (!index(email, "@"))
email = "??";
endif
return tostr(when, " ", by, " ", who, " ", email);
.
init_for_core:
if (caller_perms().wizard)
pass();
"this:rm_message_seq({1, 1 + this:length_all_msgs()})";
"this:expunge_rmm()";
for p in (properties(this))
$command_utils:suspend_if_needed(0);
if (p && (p[1] == " "))
delete_property(this, p);
endif
endfor
this.messages = this.messages_going = {};
this._genprop = "";
this.mail_forward = {player, this};
this.mail_notify = {player};
for p in ({"moderator_forward", "writers", "readers", "expire_period", "last_used_time"})
this.(p) = $mail_recipient.(p);
endfor
this.moderated = 1;
else
return E_PERM;
endif
.
is_usable_by: "Copied from Generic Mail Recipient (#6419):is_usable_by by Rog (#4292) Tue Mar 2 10:02:32 1993 PST"; return (!this.moderated) || ((this:is_writable_by(who = args[1]) || (who in this.moderated)) || who.wizard); . PROPERTY DATA: a b c d e f g h i j k l m n o s t u v w x y z aa ba ca da ea fa ga ha ia ja ka la ma na oa pa qa ra sa ta ua va wa xa ya za ab bb cb db eb fb gb hb ib jb kb lb mb nb ob pb qb rb sb tb ub vb wb xb yb zb ac bc cc dc ec fc gc hc ic jc kc lc mc nc oc pc qc rc sc tc uc vc wc xc yc zc ad bd cd dd ed fd gd hd id jd kd ld md nd od pd qd rd sd td ud vd wd xd yd zd ae be ce de ee fe ge he ie je ke le me ne oe pe qe re se te ue ve we xe ye ze af bf cf df ef ff gf hf if jf kf lf mf nf of pf qf rf sf tf uf vf wf xf yf zf ag bg cg dg eg fg gg hg ig jg kg lg mg ng og pg qg rg sg tg ug vg wg xg yg zg ah bh ch dh eh fh gh hh ih jh kh lh mh nh oh ph qh rh sh th uh vh wh xh yh zh ai bi ci di ei fi gi hi ii ji ki li mi ni oi pi qi ri si ti ui vi wi xi yi zi aj bj cj dj ej fj gj hj ij jj kj lj mj nj oj pj qj rj sj tj uj vj wj xj yj zj ak bk ck dk ek fk gk hk ik jk kk lk mk nk ok pk qk rk sk tk uk vk wk xk yk zk al bl cl dl el fl gl hl il jl kl ll ml nl ol pl ql rl sl tl ul vl wl xl yl zl am bm cm dm em fm gm hm im jm km lm mm nm om pm qm rm sm tm um vm wm xm ym zm an bn cn dn en fn gn hn in jn kn ln mn nn on pn qn rn sn tn un vn wn xn yn zn ao bo co do eo fo go ho io jo ko lo mo no oo po qo ro so to uo vo wo xo yo zo ap bp cp dp ep fp gp hp ip jp kp lp mp np op pp qp rp sp tp up vp wp xp yp zp aq bq cq dq eq fq gq hq iq jq kq lq mq nq oq pq rq sq tq uq vq wq xq yq MAIL MESSAGES: |