Switch to edit mode.
Name(s): description1: c = 0
2: text = {}
3: for x in (this.world.lots)
4: if (x:isa(this.world.generic_claimed_lot))
5: c = c + 1
6: text = {@text, tostr($su:right(x in this.world.lots, 2), ": claimed by ", `$su:nn(x.builder) ! ANY => "err!"')}
7: else
8: text = {@text, tostr($string_utils:right(x in this.world.lots, 2), ": *** vacant ***")}
9: endif
10: endfor
11: return {@text, tostr(c, "/60 lots have been claimed.")}
12: "Last modified by Lao-Tzu (#8084) on Sat Dec 18 11:02:28 1999 MST."