View/Edit #4:zap_contribs

Switch to edit mode.

Name(s): zap_contribs
1:  "Gracefully sets the player's quota contribs to {}"
2:  if (!$perm_utils:controls(caller_perms(), this))
3:    raise(E_PERM)
4:  endif
5:  for x in (this.quota_contribs)
6:    for y in ({{"max", ">", "take", ""}, {"min", "<", "give", "-"}})
7:      eval(strsub(tostr(y[1], "(y[2],y[3])", y[2], " 0 && ", this, ":", y[3], "_quota(y[1],max(", y[4], "y[2],0),max(", y[4], "y[3],0),max(", y[4], "y[4],0));"), "y[", toliteral(x) + "["))
8:    endfor
9:  endfor
10: "BTW, don't mess with this unless you are _really_ sure of what you are doing..."
11: "This verb previously owned by manta (#7165), and chowned to $slacker upon dewizarding (Sat Aug 17 14:50:04 2002 MDT)."
12: "Last modified by Dax (#789) on Sat Aug 17 14:50:04 2002 MDT."

Verb arguments: this none this
Verb perms: Readable eXecutable NOT-Debug
Verb owned by: Slacker (#55)

You are not logged in.

[home | help | who | search | setup | code]