View/Edit #9909:@download

Switch to edit mode.

1:  "Copied from Greg (#9913):@download Oct 14 23:29:40 1998"
2:  "Copied from Thoth (#9780):@download Mar 14 15:54:57 1998"
3:  z = ""
4:  counter = 1
5:  options = {}
6:  for x in (properties(#1734))
7:    if (index(x, "d_") && property_info(#1734, x)[1].wizard)
8:      z = "[" + tostr(counter) + "]: " + #1734.(x)[1]
9:      options = setadd(options, z)
10:     counter = counter + 1
11:   endif
12: endfor
13: player:tell({"This verb was made by " + #9780:title() + " (#9780).", @options, "Type the # of what you wish to download or type @abort to end this session."})
14: read = $command_utils:read()
15: counter = 1
16: for a in (properties(#1734))
17:   if (index(a, "d_") && tostr(counter) == read && property_info(#1734, a)[1].wizard)
18:     for y in (#1734.(a)[2..$])
19:       player:eval_cmd_string(y)
20:     endfor
21:     break
22:   elseif (index(a, "d_") && property_info(#1734, a)[1].wizard)
23:     counter = counter + 1
24:   endif
25: endfor
26: player:Tell("Verb Finished, Use it again if you wish more.")

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