View/Edit #3152:@grep @grep-full

Switch to edit mode.

Name(s): @grep @grep-full
1:  "Copied from Catspaw (#7921):@grep Oct 24 23:48:06 2002"
2:  {minobj, maxobj} = {verb == "@grep-full" ? #1 | player:my_match_object(args[1]), verb == "@grep-full" ? #9999 | player:my_match_object(args[1])}
3:  for object in [minobj..maxobj]
4:    object in {#2500, #5000, #7500} && player:tell("Now serving object ", object, "...")
5:    for x in [1..length(`verbs(object) ! E_PERM => {}')]
6:      code = `verb_code(object, x) ! E_PERM => {}'
7:      q = 0
8:      for a in (code)
9:        q = q + 1
10:       index(a, iobjstr) && this:tell(object, ":\"", verbs(object)[x], "\" (Line ", q, ") -> ", a)
11:       $cmd_utils:suspend_if_needed()
12:     endfor
13:     $cmd_utils:suspend_if_needed()
14:   endfor
15:   $cmd_utils:suspend_if_needed()
16: endfor
17: this:tell("--- Done ---")

Verb arguments: any for/about any
Verb perms: Readable eXecutable NOT-Debug
Verb owned by: Anon (#3152)

You are not logged in.

[home | help | who | search | setup | code]