@verb #935:"t_*" this none this rxdo #8084
@program #935:"t_*" this none this
caller == this || raise(E_PERM)
data = `this.(verb) ! E_PROPNF'
if (typeof(data) != $LIST)
  return player:tell("It would appear that the Tutor has not yet been programmed to teach you about that. As an alternative, you could try to contact a helper to get some aid. Just type `@helpers', and ask one of the listed users for help by typing 'page <user> How do I ....'.")
endif
this:wakey()
set_task_perms(this)
target = player
for stack in (data)
  for cmd in ({@stack[2]})
    this:execute_cmd(cmd, target)
  endfor
  while (1)
    suspend(15)
    retval = eval(stack[1])
    if (!retval[1])
      "... doh."
    elseif (!retval[2])
      for cmd in ({@stack[3]})
        this:execute_cmd(cmd, target)
      endfor
    else
      break
    endif
  endwhile
  "User must have succeeded."
  for cmd in ({@stack[4]})
    this:execute_cmd(cmd, target)
  endfor
endfor
"Last modified by Dax (#789) on Wed May  4 06:46:01 2005 MDT."
.