1cb
@verb #101:"bf_set_player_flag" this none this rxdo #60
@program #101:"bf_set_player_flag" this none this
if (valid(caller_perms()) && !caller_perms().wizard)
  return raise(E_PERM)
endif
{OBJ, value} = args
server_log(tostr("PLAYER BIT ", value ? "SET" | "UNSET", ": ", $string_utils:nn(OBJ), "'s player bit changed by programmer ", $string_utils:nn(caller_perms())))
pass(@args)
"Last modified by Cecil (#7407) on Sun Sep  1 08:39:55 2002 MDT."
.

0