View/Edit #12:_get_esteem _get__esteem

Switch to edit mode.

Name(s): _get_esteem _get__esteem
1:  "FLOAT esteem = :_get_esteem()"
2:  ""
3:  "Returns the esteem in which other players hold this player."
4:  "caller_perms():isa($guardian) || raise(E_PERM, \"Nuh-uh.\");"
5:  {now, last_esteem, last_time, decay_rate} = {time(), @this._esteem}
6:  {now, last_esteem, last_time} = {tofloat(now), tofloat(last_esteem), tofloat(last_time)}
7:  "But for loops are so much fun.... <G>"
8:  loss = $math_utils:compound(last_esteem, decay_rate, (now - last_time) / 86400.0)
9:  "No, Lao, this one can't use :_get_esteem."
10: this._esteem = {loss, time(), decay_rate}
11: return loss
12: "Last modified by JS (#7214) on Sat Aug 12 20:26:43 2000 MDT."
13: "This verb previously owned by manta (#7165), and chowned to $slacker upon dewizarding (Sat Aug 17 14:50:04 2002 MDT)."
14: "Last modified by Lao-Tzu (#8084) on Fri Sep 26 13:43:57 2003 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]