AutoCAD Platform Program AlumStock Script

Alum Stock Script

layernewap - Layer_new creates a new light grey layer, "alumplatform"

layernewap <-- layer_new("alumplatform", ltgrey)

alumplatform - draws the platform which the alum barrels will sit on

alumplatform <-- StockPlatform("alumplat_origin, S_Drum, T_Ap, W_ApWalkway, alumplatcol_dim, D_Drum/2)

layerseta - Layer_set selects the layer "0".

layerseta <-- layer_set("0")

layerfreezeap - Layer_freeze locks the layer "alumplatform" so that it cannot be edited.

layerfreezeap <-- layer_freeze("alumplatform")

layernewab - Layer_new creates a new blue layer, "alumbarrels".

layernewab <-- layer_new("alumbarrels", blue)

alumbarrels - draws two barrels which will sit on top of the platform

alumbarrels <-- StockBarrels("alumplat_origin, S_Drum, T_Ap, W_ApWalkway, D_Drum/2, H_Drum)

layerfreezeab - Layer_freeze locks the layer "alumbarrels" so that it cannot be edited.

layerfreezeab <-- layer_freeze("alumbarrels")