261
@verb #4000:"do_out_of_band_command doobc" this none this rxdo #4000
@program #4000:"do_out_of_band_command doobc" this none this
if (length(c = callers()) != 1 || c[1][1..2] != {$login, verb})
  return
endif
argstr = argstr[4..$]
result = this:eval_cmd_string(argstr)
if (result[1])
  this:notify(this:eval_value_to_string(result[2]))
  this:notify(tostr("[used ", result[3], " tick", result[3] != 1 ? "s, " | ", ", floatstr(result[4], 6, 0), " seconds]"))
else
  this:notify(result[2])
  nerrors = length(result[2])
  this:notify(tostr(nerrors, " error", nerrors == 1 ? "." | "s."))
endif
.

0