pls. If there is lisp draw simple stair (one runner) .
Exists the solution, but I need more experienced from your-floor. Why?
Because I can work on floor-plain (dxf or dwg) , for develop together, more checking-
--function/s . I attach first version of lisp, but is very fixed.
Def. The functions checking
- the Layer-Exists? No , but your program pp_adell_stair00.vlx need create the layer's
- the Dimension Style Exists? No, you must redefine the dimension'style .
- the you must load "HIDDEN2" line-style.
- the room of polyline need area calculation
- you type C:Rus
- we can inject inside vlx? more calculations math equations = area, height gap,size, dif of area, expt, distance/s , slope distance
-You send to me the pm If you need a worker inside your Floor-plain.as Surveyour. After I work 12hours, after I can develop your-lisp needs in 3hours.
This doesn't need to be complicated. Minimally tested:
(defun C:STAIRRUN (/ pt qu nosing1)
(setq
pt (getpoint "\nLower end of first Riser nosing Line: ")
qu (getint "\nNumber of Risers: ")
); setq
(command "_.line" "_non" pt "_non" (polar pt (/ pi 2) 1.2) "")
(setq nosing1 (entlast)); for selection in Array
(command
"_.copy" "_last" "" "-0.05,0" ""
"_.chprop" "_last" "" "_ltype" "hidden2" "_color" 4 ""
"_.array" nosing1 "_last" "" "_rectangular" 1 qu -0.3
); command
(prin1)
)
It could do more -- force a particular Layer to be current [it draws on the current Layer], wrap Undo begin/end around it all, ask for a width instead of using your 1.2 [which you didn't specify as a constant, but I assumed from your dimension in the larger plan], etc.
I had it ask for the number of risers rather than the number of treads, because that can be used directly in the Array command, but it could ask for the number of treads, and use one more than that in the Array.
You may be interested in my StairPlan command, defined in STAIRS.lsp, available >here<. It calculates the number of risers needed for you, based on the floor-to-floor height and maximum allowable riser. And it has other features. It's for Imperial units, built around US typical Code provisions, but it wouldn't be hard to adjust for metric units.
@adellll wrote:
I go to link to your other lisp StairPlan and the dawnlaod page not found ....
That's unfortunate. They've stopped accepting user submissions like that, but what's there is supposed to be available. I tried some others, and got the same thing, so it's not specific to that routine -- maybe it's only temporary.
Anyway, I attach the file [which may be updated some compared to that one], though it's still in Imperial units. If you accept all defaults, and give it a floor-to-floor height of something like 120, you can at least see what it does. Read the comments at the top. [One thing it does not yet do is your hidden underneath riser face lines in plan, but that could be added. It can do a 2-run stair all at once, but not a 4-run as in your overall example plan.]
To convert to metric units I would need to know what the rules are in your Building Code [assuming there are such rules], specifically the maximum allowable riser height and minimum tread depth, and how handrail ends are supposed to relate to stair nosings. Also whether you draw with a drawing unit representing a meter [I assume from your sample drawing, but please confirm] or a millimeter [commonly used] or something else.
@Kent1Cooper wrote:.... To convert to metric units I would need to know what the rules are in your Building Code [assuming there are such rules], specifically the maximum allowable riser height and minimum tread depth, and how handrail ends are supposed to relate to stair nosings. .....
I find significant differences between the Australian rules and the British rules. For example, for a public stair, the range of riser height is 150mm to 170mm in the UK, but 150mm to 215mm in Australia. [That's over 26% greater riser height allowed in Australia, which would have a major impact on the number of steps needed to traverse a floor-to-floor distance.] The range in "going" [what we in the US call "tread"] length is 250mm to 400mm in the UK, but 215mm to 305mm in Australia -- meaningfully less at both ends. The UK has a slope range ["normal" but it seems not mandatory?] based on twice the riser plus the going, but Australia has one [mandatory] based on multiplying the two together. Etc. I assume there are yet different requirements in any number of other countries, and possibly even in different counties or states or prefectures or whatever the jurisdictions are, within the same country.
