@verb #8562:"has_access" this none this rxdo #3887
@program #8562:"has_access" this none this
{who, power, ?victim = #-1} = args
return `this:level(args[1]) >= listassoc(power, this.powers)[2] && this:level(args[1]) > this:level(victim) ! ANY => 0'
"Last modified by Daryl (#3887) on Thu Jul 29 13:33:41 1999 MDT."
.