Code: Three Column Room Parent

Three Column Room Parent

A room parent that places objects, players and exits into three columns.

Author: BladedThoth@M*U*S*H, Time@M*U*S*H

Category: Building

Commands: @create, @exitformat, @lock, @set.

Functions: ansi(), extract(), if(), iter(), left(), ljust(), lnum(), lvcon(), lvexits(), lvplayers(), max(), name(), num(), room(), setdiff(), setr(), u(), words().

Compatibility: CobraMUSH, PennMUSH.

Instructions

Copy and paste the below code into a compatible MUSH or MUX.

MUSHCode for Three Column Room Parent

Select Code

@create Room Parent
@lock Room Parent==me
&CONFORMAT Room Parent=[ansi(h,[ljust(Players,24)][ljust(Objects,24)][ljust(Exits,24)])][iter(lnum(1,max(words(lvplayers(%!)),words(lvexits(%!)),words(setdiff(lvcon(%!),lvplayers(%!))))),%r[ljust(left(if(setr(0,u(fn_playerextract,##)),name(%q0)),23),24)][ljust(left(if(setr(0,u(fn_objectextract,##)),name(%q0)),23),24)][ljust(left(if(setr(0,u(fn_exitextract,##)),name(%q0)),23),24)]
@set Room Parent/CONFORMAT=no_command prefixmatch
&CREDITS Room Parent=Original conceptual design by BladedThoth@M*U*S*H
&DESCRIBE Room Parent=
@set Room Parent/DESCRIBE=no_command visual public nearby
&FN_EXITEXTRACT Room Parent=extract(lvexits(%!),%0,1)
&FN_OBJECTEXTRACT Room Parent=extract(setdiff(lvcon(%!),lvplayers(%!)),%0,1)
&FN_PLAYEREXTRACT Room Parent=extract(lvplayers(%!),%0,1)
@EXITFORMAT Room Parent=

think Parent your room(s) to [num(Room Parent)].