View/Edit #6161:mod*ify_info

Name(s): mod*ify_info

1:  ".info {{player#,won,lost,tied,blackjacks,dblackjacks,streak,maxstreak,#ofsplits,#ofdoubles,doubleswon,busts,dealerbusts,21's"
2:  "1:player#,2:won,3:lost,4:tied,5:bj's,6:dbj's,7:streak,8:maxstreak,9:splits,10:doub's,11:doubswon,12:busts,13:dbusts,14:21's,15:d21's"
3:  "if (!(caller in #7575.trusted))"
4:  "  raise(E_PERM)"
5:  "elseif (!is_player(args[1]))"
6:  "  raise(E_PERM)"
7:  "endif"
8:  {x, y, z} = {args[1], toint(args[2]), toint(args[3])}
9:  if (y < 2 || y > this.infolength)
10:   return 0
11: elseif (!z)
12:   return 0
13: endif
14: "{x=player,y=stat,z=modifier}"
15: pos = x in $list_utils:slice(this.info)
16: if (!pos)
17:   this.info = {@this.info, {x, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}}
18:   pos = length(this.info)
19: endif
20: try
21:   this.info[pos][y] = this.info[pos][y] + z
22:   return 1
23: except (ANY)
24:   return 0
25: endtry
26: "Last modified by James (#6397) on Wed Mar 14 23:53:38 2007 EDT."

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

You are not logged in.