PSC Code Manual

land/land_supp.lsp [src]

Functions related to landing support creation

Functions

Function signature Description
(add-x-bay ins nor qty wid hgt) Adds a single x-brace bay
(add-x-pan pts ext) Adds the pitched members to an x-bracing bay
(draw-land-support view) Add landing support objects to a block container
(draw-xbrace con 3dp lay def) Adds objects for x-bracing to container
(h-rod-con con ins rad lng cht tcn cfg) Adds hanger rod connection to container
(l-ang-con con ins rot emb ang rod cfg) Adds ledger angle connection to container
(land-support-def corner view) Returns a support definition based on corner and view
(land-support-ins corner) Returns the inertion point of a connection based on corner
(p-blw-con con ins wid rot lng bcn cfg) Adds post below connection to container
(p-out-con con ins wid lng bcn cfg) Adds post outside connection to container
(post-base bcn) Adds baseplate to post connections
(top-view-x-brace) Draw x-brace representation on top view
(x-brace-defs) Returns definition for x-bracing based on XDATA
(x-brace-out w h o) Calculates outline for x-bracing based on XDATA
(xbrace-hor) Adds the horizontal member to an x-bracing bay if required

(add-x-bay ins nor qty wid hgt)

Adds a single x-brace bay

(add-x-pan pts ext)

Adds the pitched members to an x-bracing bay

(draw-land-support view)

Add landing support objects to a block container

WITH-DATA

VARS:
(BLOCKOBJ VLA-OBJECT)
(VIEW SYM (MEMBER VIEW '(TV SV 3D)))

(draw-xbrace con 3dp lay def)

Adds objects for x-bracing to container

(h-rod-con con ins rad lng cht tcn cfg)

Adds hanger rod connection to container
con - container
ins - insertion point
rad - hanger radius
lng - hanger rod length
cht - channel height
tcn - top connection
cfg - desired support configuration currently supports 'tv 'sv or '3d

VARS:
(CON VLA-OBJECT)
(INS LIST (POINT-P INS))
(RAD nil (NUMBERP RAD))
(LNG nil (NUMBERP LNG))
(CHT nil (NUMBERP CHT))
(TCN nil (MEMBER TCN '(nil 41 42 43 44 45 47 48 49 51 52 53 54 55 57 58 59)))
(CFG SYM (MEMBER CFG '(TV SV 3D)))

(l-ang-con con ins rot emb ang rod cfg)

Adds ledger angle connection to container
con - container
ins - insertion point
rot - ledger ang rotation
emb - T @ Embed nil @ anchor
ang - catch angle applied to ledger T/nil
rod - bent rod applied to ledger T/nil
cfg - desired support configuration
      currently 'tv or '3d, others may be added in future

(land-support-def corner view)

Returns a support definition based on corner and view

(land-support-ins corner)

Returns the inertion point of a connection based on corner

(p-blw-con con ins wid rot lng bcn cfg)

Adds post below connection to container
con - container
ins - insertion point
wid - HSS post width
rot - HSS post rotation
lng - HSS post length
bcn - base connection
cfg - desired support configuration currently supports 'tv 'sv or '3d

VARS:
(CON VLA-OBJECT)
(INS LIST (POINT-P INS))
(WID nil (NUMBERP WID))
(ROT nil (NUMBERP ROT))
(LNG nil (NUMBERP LNG))
(BCN nil (MEMBER BCN '(nil 21 22 23 24 26 31 32 33 34 36)))
(CFG SYM (MEMBER CFG '(TV SV 3D)))

(p-out-con con ins wid lng bcn cfg)

Adds post outside connection to container
con - container
ins - insertion point
wid - HSS post width
lng - HSS post length
bcn - base connection
cfg - desired support configuration currently supports 'tv 'sv or '3d

VARS:
(CON VLA-OBJECT)
(INS LIST (POINT-P INS))
(WID nil (NUMBERP WID))
(LNG nil (NUMBERP LNG))
(BCN nil (MEMBER BCN '(nil 21 22 23 24 26 31 32 33 34 36)))
(CFG SYM (MEMBER CFG '(TV SV 3D)))

(post-base bcn)

Adds baseplate to post connections

(top-view-x-brace)

Draw x-brace representation on top view

(x-brace-defs)

Returns definition for x-bracing based on XDATA

WITH-DATA

(x-brace-out w h o)

Calculates outline for x-bracing based on XDATA

(xbrace-hor)

Adds the horizontal member to an x-bracing bay if required