Switch to edit mode.
Name(s): @findcode1: player == this || raise(E_PERM)
2: player:tell("Starting search...")
3: for object in [#0..max_object()]
4: verbs = object:verbs()
5: for verb in [1..length(verbs)]
6: if (verbs[verb] != "E_PERM")
7: code = `verb_code(object, verb) ! E_PERM => {}'
8: for line in [1..length(code)]
9: if (index(code[line], argstr))
10: player:tell($su:nn(object), ":", verbs[verb], " (", verb, ") Line ", line)
11: endif
12: $cmd_utils:suspend_if_needed(0)
13: endfor
14: endif
15: $cmd_utils:suspend_if_needed(0)
16: endfor
17: $cmd_utils:suspend_if_needed(0)
18: endfor
19: player:tell("Ending search...")
20: "Last modified by Wulfgar (#6959) on Wed May 30 23:56:34 2001 MDT."