Hallo,
wie kann ich erreichen, das der Treppenmodellierer die Auftrittsbreite und Steigung zwischen zwei Fixpunkten aufteilt?
Kann ich den unten und oberen Punkt nicht in der Isometrie eingeben? Das wäre das einfachste, ich schaffe es nicht....
Wenn nicht 3D wie fixiere ich den oberen Austrittspunkt?
Mit besten Grüßen!
Jürgen
Allplan Ingenieurbau V10 bis V2025
Hallo Jürgen,
...so einfach ist das nicht!
Der neue Treppenmodellierer braucht eine fixe Autrittslänge zu automatischen Berechnung der Stufen
zwischen den Podesten. Die Auftrittslänge lässt sich also nicht aus der Lauflänge berechnen, sobald
Podeste im Spiel sind.
Bei einer gerade Treppe könnte man das natürlich machen, aber dann kommen noch andere Probleme
Deiner Leitertreppe hinzu: Die Stufentiefe ist konstant, und nicht gleich der Auftrittslänge!
Auch das "Picken" des Fix-Punktes oben ist eigentlich bereits drin, allerdings nur im Grudriss als Endpunkt der Achse! Die zugehörige Höhe kann man sich vorher abgreifen, und dann in den Eingabefeldern die Höhe und Auftrittsbreite ausrechnen! Es geht also, wenn auch nicht besonders komfortabel!
Deine "Industrie-Leiter" war leider nicht im Fokus des Treppenmodellierers, da es keine (notwendige) Treppe ist!
Ich denke, mit dem neuen Treppenmodellierer kann man mehr als 80% der gängigen Treppen leichter und detaillierter erzeugen. Falls doch etwas nicht geht, gibt es ja noch die "alte" Treppe!
Und damit auch Du zufrieden bist, habe ich mal ein SmartPart gebaut, mit dem Du einfach Start- und Endpunkt
zeigen brauchst, und alles wird automatisch berechnet.
Diese Leitertreppe kann als Stufen detaillierte Gitterroststufen mit fixer Tiefe haben, und die Wangen können aus U-Profilen sein.
Grüße Jörg
Look at my staircase, there it works perfectly.
I can not help you!
id=0
ROTX 90
SECT_FACESTYLE fcs_crr
GOSUB "carrier"
GOSUB "ext_end"
SECT_FACESTYLE fcs_stp
GOSUB "steps"
GOSUB "step_end"
END
"carrier":
IF unn THEN
GROUP "carrier"
ENDIF
PRISM 5 , wdt ,
0 , -thk ,
0 , 0 ,
stp*stps , rsr*stps ,
stp*stps , rsr*stps - thk ,
0 , -thk
IF unn THEN
GROUP_END
!GROUP_PLACE "carrier"
ENDIF
IF unn THEN
GROUP "carrier_steps"
ENDIF
FOR n = 1 TO stps
GOSUB "step_carrier"
TRANS stp , rsr , 0
NEXT
RESTORE stps
IF unn THEN
GROUP_END
!GROUP_PLACE "carrier_steps"
ENDIF
IF unn THEN
res=""
res=GROUP_UNION("carrier_steps","carrier")
GROUP_PLACE res
ENDIF
RETURN
"ext_end":
ang = ATAN ( rsr / stp )
dx = ( thk - end_thk ) / TAN ( ang )
dy = ( thk - end_thk )
TRANS stps * stp,stps * rsr,0
HANDLE 0,0,0,id,"ext_end",1
HANDLE ext_end,0,0,id,"ext_end",2
HANDLE -1,0,0,id,"ext_end",3
id=id+1
PRISM 4 , wdt ,
0 , 0 ,
ext_end , 0 ,
ext_end , -end_thk ,
dx , -end_thk,
0 , -end_thk - dy,
0 , 0
RESTORE 1
RETURN
"steps":
IF unn THEN
GROUP "steps"
ENDIF
FOR n = 1 TO stps
GOSUB "step"
TRANS stp , rsr , 0
NEXT
RESTORE stps
IF unn THEN
GROUP_END
!GROUP_PLACE "steps"
ENDIF
IF unn THEN
GROUP "risers"
ENDIF
FOR n = 1 TO stps
GOSUB "riser"
TRANS stp , rsr , 0
NEXT
RESTORE stps
IF unn THEN
GROUP_END
!GROUP_PLACE "risers"
ENDIF
IF unn THEN
res=""
res=GROUP_UNION("steps","risers")
GROUP_PLACE res
ENDIF
RETURN
"step_carrier":
PRISM 4 , wdt ,
0 , 0 ,
0 , rsr ,
stp , rsr ,
0 , 0
RETURN
"step":
PRISM 5 , wdt ,
-rst-nos,rsr ,
-rst-nos,rsr+stt ,
stp,rsr+stt ,
stp,rsr ,
-rst-nos,rsr
RETURN
"riser":
PRISM 5 , wdt ,
-rst , stt ,
-rst , rsr ,
0 , rsr ,
0 , stt,
-rst , stt
RETURN
"step_end":
TRANS stps * stp,stps * rsr,0
PRISM 5 , wdt ,
0,0,
ext_end,0,
ext_end,stt,
0,stt,
0,0
RESTORE 1
RETURN
Insert
IF unn THEN
GROUP "ext_end"
ENDIF
and
IF unn THEN
GROUP_END
!GROUP_PLACE "ext_end"
res = GROUP_UNION ( res , "ext_end" )
GROUP_PLACE res
ENDIF
at top and end of subroutine "ext_end".
Comment out
!GROUP_PLACE res
at End of subroutine "carrier"
GROUP res holds now the carrier, and can unified with extend_end
at end of subroutine "ext_end".
!GROUP_PLACE res
at End of subroutine "carrier"
GROUP res holds now the carrier, and can unified with extend_end
at end of subroutine "ext_end".
!GROUP_PLACE res
at End of subroutine "carrier"
GROUP res holds now the carrier, and can unified with extend_end
at end of subroutine "ext_end".
Hi Nemo, another question ....is it possible to merge 2 groups (1+2) each created with separate x,y,z systems as you see in the sketch? For example, in the case of the stair, it would be like adding a run at 90 degrees from the one already created.
It's possible. Why not?
I would suggest you, to do the transformations (of the coordinate-system) between GROUP and GROUP_END.
Hi Nemo, I have problem to merge....it's possible merge groups with this metod? I place group 1 pink color ( union of triangle+sub triangle) then place group 2 blue color (union of trangle+sub triangle) and then merge 1+2 ? Thank you for help.
Well, I think you have a problem with using the same code to generate the staircase twice, and getting 2 different GROUPS. This is how it works:
grp="run01"
GOUSB "CreateRun
TRANS x,y,z
ROTZ 90
grp="Run02"
GOUSB "CreateRun
res=GROUP_UNION("Lauf01","Lauf02")
GROUP_PLACE res
END
"CreateRun":
Create run with PRISM and GROUP_UNION here
....
res=GROUP_UNION(stairs,carrier)
GROUP grp
GROUP_PLACE res
GROUP_END
RETURN
Regards.
Jörg
GOUSB "CreateRun
TRANS x,y,z
ROTZ 90
grp="Run02"
GOUSB "CreateRun
res=GROUP_UNION("Lauf01","Lauf02")
GROUP_PLACE res
END
"CreateRun":
Create run with PRISM and GROUP_UNION here
....
res=GROUP_UNION(stairs,carrier)
GROUP grp
GROUP_PLACE res
GROUP_END
RETURN
Regards.
Jörg
Thank you for specification! I try to do but, for me, it's not very clear.
