License delivery maintenance is planned for Saturday, July 26, between 12:00 and 20:00 CEST. During this time, you may experience outages or limited availability across our services, including BIMcloud SaaS, License Delivery, Graphisoft ID (for customer and company management), Graphisoft Store, and BIMx Web Viewer. More details…
2020-02-14 12:12 PM
xb = 0.25 yb = 0.12 cb = 0.065 sb = 0.01 movex = xb+sb lenA = (A/xb+sb) - fra(A/xb+sb)+1 if fra(B/xb+sb)<=0.5 then lenH = (B/xb+sb) - fra(B/xb+sb) else lenH = (B/xb+sb) - fra(B/xb+sb)+1 endif gosub "brick" del 1 addx movex gosub "brick" end "brick": movez = cb+sb i= movez ii=0 do if fra(ii/2)>0 then addz i brick xb,yb,cb del top else add xb/2,0,i brick xb,yb,cb del top endif i = i+movez ii=ii+1 while i<=lenH return
Solved! Go to Solution.
2020-02-14 10:31 PM
2020-02-14 07:09 PM
_rWallLength = 0.00 !<-- to initialise your variables _rWallHeight = 0.00 do addz _rWallHeight do add _rWallLength brick rBrickLength, rBrickWidth, rBrickHeight _rWallLength = _rWallLength + _rBrickStepLength while (_rWallLength + _rBrickStepLength ) < rWallLength _rWallLength = 0.00 _rWallHeight = _rWallHeight + _rBrickStepHeight while (_rWallHeight + _rBrickStepHeight ) < rWallHeightYour bricks will be stacked on over another in a perfect stacked bond
2020-02-14 07:27 PM
_iXRowIndex = 1 _iZRowIndex = 1 do if ((_iXRowIndex mod (2)) > 0) then addz _rWallHeight if ((_iXRowIndex mod (2)) < 1) then addz _rHalfBrickLength, 0.00, _rWallHeight do add _rWallLength brick rBrickLength, rBrickWidth, rBrickHeight _rWallLength = _rWallLength + _rBrickStepLength while (_rWallLength + _rBrickStepLength ) < rWallLength _rWallLength = 0.00 _iRowIndex = _iRowIndex + 1 _rWallHeight = _rWallHeight + _rBrickStepHeight if ((_iXRowIndex mod (2)) < 1) then addx -_rHalfBrickLength while (_rWallHeight + _rBrickStepHeight ) < rWallHeight
2020-02-14 08:47 PM
2020-02-14 10:31 PM