polygon editierbar

[dihes8010]

ist es möglich ein geschlossenes Polygon per gdl zu programmieren, sodass nachher per Mausklick zusätzlich Punkte eingefügt werden können?

Also etwa zu einem Dreieck per Mausclick eine vierte Ecke zufügen.
Im Grunde wie der anpassbare Raumstempel. Zuerst positionieren und dann die Ecken anpassen.


Danke für Anregungen.

[Anonymous]

Ja, das geht.
Ein Programmierer hat seinen Code kostenlos (mit Einschränkungen) zur Verfügung gestellt.
Siehe hier:
http://archicad-talk.graphisoft.com/vie ... 84eafbad53

[dihes8010]

Wie gut ist das denn

genau das habe ich gesucht

brauch das nur noch anzupassen

& so schnell

es lebe das Forum °°°

& Dank an Jochen ...

[Hmooslechner]

https://www.dropbox.com/s/q1dgc5iq47nzi7n/Kanal_J.pln

Ich habe das Teil mal als Grundlage für mein neues komplett neu gescriptes Kanalbauteil genommen.

Diesesmal habe ich keine 3D-Elemente außer den 3D-Linien eingebaut - Es dient also rein zum Kanal-Konzept und Plan. Dies ließe sich aber leicht hinzugeben..

Original from:
http://archicad-talk.graphisoft.com/vie ... hp?t=43721
Ursprünglicher Autor: Author: sinceV6

Geändert durch Heimo Mooslechner für Kanal - Zwecke
Version 1 - 3D - Höhenverstellungen von Sohlen, Gefällen und Abstürzen.
Bisher ist nur die Kanasohle KSZ an die Selbstvergrößerung angepasst, Die anderen neuen Parameter wurden einfach bis 50 erzeugt - der Faulheit halber.

Im Grundriss können alle Textblöcke (Schacht und Strang) eigens verschoben, gedreht und eingefärbt werden. Änderungen der Höhenlagen sowohl im 3D und im Optionalen Längenschnitt wirken sich sofort auf die Zahlen im Grundriss aus. Schächte sind im Grundriss Ein-Ausschaltbar

Beim Einsetzen wird der Kanal einfach parallel zur GOK gezeichnet. Dies kann aber durch Schalter in der Nähe des Einlaufes in den Anschlußschacht auf freie Tiefen gestellt werden.

Das Hilfesystem (Beschriftungen der grafischen Hotspotschalter) kan dort auch ein und ausgeschaltet werden.

Bitte um Rückmeldungen.

[Hmooslechner]

Habe gerade bemerkt, dass sich in der 32BitAC16 Fehlermeldungen zeigen, die in der 64Bit Version AC16, mit der ich das programmiert habe - nicht gezeigt haben - seltsam..

Hier die neueste Version auch bei der 32Bit lauffähig..:
https://www.dropbox.com/s/eme47bhjzfwj13d/Kanal_K.pln

[Hmooslechner]

Neue Neueste;-)

https://www.dropbox.com/s/titg05n8uamd3xc/Kanal_L.pln

[Hmooslechner]

In Abständen immer wieder neu downloaden - weil ich nicht ständig neue Filenamen vergebe, wenn ich Updates davon mache.

Mittlerweile Eingebaut - grafischer Schalter-ob Meereshöhe gilt - und nun funtioniert auch die Meereshöhen-Umrechnung beim Grundriss.

[Hmooslechner]

Ein anderes Projekt - die Wand mit unterschiedlichen Z - Fußpunkten - ebenfalls mit dem Hotspot - Polygon im Grundriss:





und der Download - Link:

https://www.dropbox.com/s/wcvwjz0owsbd4aj/Polygonzug_Wand.pln

[dihes8010]

Hallo Heimo

Danke für deine Beiträge - habe das Kanaltool in Verwendung - super danke
Rechteckige Schächte wären noch der HIT.

---

Das Script von "sinceV6" versuche ich für mein GDL zu verwenden.
Scheitere aber daran, dass das geschlossene Polygon mit LINE2 in einer Schleife gebaut wird.

Für mein GDL brauche ich ein geschlossenes Polygon mit transparent Schraffur.

Derzeit konstruiere ich ein Rechteck mit POLY2_B.
POLY2_B kann ich allerdings nicht in einer Schleife verwenden um ein Polygon zu konstruieren.


Danke für Hinweise

[Hmooslechner]

Du Mußt vermutlich den Umweg über put und get nehmen.

Wenn Du Deine Koordinaten mit Put in den Speicherstack "Steckst" - kannst Du es dann im "Poly-Irgendwas - Befehl" wieder umgekehrt rausholen und jeweils die Anzahl der Punkte ebenfalls. Somit wird sowas dynamisch.

Ich habe sowas bei meiner einläufigen Treppe gemacht - kannst Du Dir in Archicad im Stiegenwerkzeug vom Bim-Server saugen. "einlaeufige Treppe....." oder so suchen - immer das letzte in der Buchstabenreihenfolge istr das neueste..


Hier ein Ausschnitt - Allerdingsa vom 3D-Code - ist aber sonst gleich..

300: 	!!!Puts und Anfasserpunkte und Linien Unterkante

	
	!!!Vorgeplänkel im Stack...
	
	Put 0,0															!!! 1 Startpunkt
	hsid = hsid+1
		hotline 0,0,0, 0,0,b, hsid
		hotspot 0,0,0
		hotspot 0,0,b

	put -Bodenaufbauu, 0											!!!Bodenaufbau unten runter

	put -Bodenaufbauu, -AnpassO-Weiterraus							!!! 2 Antrittstufenkante
		hotspot  0, -AnpassO-Weiterraus,0
	put -Bodenaufbauu, -AnpassO - Weiterraus - PodVerlUnten			!!! Podestverlängerung unten OK
	Put -Aufbau_unten, -AnpassO - Weiterraus - PodVerlUnten	
	put -Aufbau_unten, -AnpassO- Weiterraus							!!! 3 Senkrecht Gesamtaufbaudicke
		hotspot   -Aufbau_unten,-AnpassO- Weiterraus, 0
		hsid = hsid+1
		hotline -Aufbau_unten,-AnpassO - Weiterraus, -Aufbau_unten,0,   -AnpassO- Weiterraus, b, hsid
		
	put (numriser)*riser-Aufbau_Oben, numriser*going-AnpassO   		!!! 5  - S c h n i t t p u n k t   U K s 
		hotspot  (numriser)*riser-Aufbau_Oben, numriser*going-AnpassO ,0
	put (numriser)*riser-Aufbau_Oben, numriser*going				!!! 6 Plattenunterkante - Eck
	
	if PodVerlOben >0 then  !!!!oberes Podest verlängern
	
		put (numriser)*riser-Aufbau_Oben, numriser*going+PodVerlOben	!!! 6.1 Plattenunterkante 
			Hotspot (numriser)*riser, numriser*going+PodVerlOben,0
		put (numriser)*riser-Bodenaufbauo, numriser*going+PodVerlOben	!!!Plattenoberkante  !!6.2 OK
			hotspot (numriser)*riser, numriser*going+PodVerlOben, 0	
		Put numriser*riser-Bodenaufbauo, numriser*going				!!!Austrittstufe Hinterkante oberer Bodenaufbau unten
		
	else
	endif  !!!! Ende oberes Podest verlängern


		hotspot  (numriser)*riser-Aufbau_Oben, numriser*going,0
	
return  	!!!Ende Puts und Anfasserpunkte und Linien Unterkante








310:  !!!Eigentliche Stufen in den Stack:... von oben runter
		
	for N = numriser to 1 step -1		!!Sooft Stufen mach:
	 Put n*riser, n*going					!!!Waagrechter Punkt Vorderkante
	 Put n*riser, (n-1)*going-rak			!!!Senkrechter Punkt darunter + nach hinten versetzt
	next n
	
	put 0,0 								!!!Wieder zurück zum Endpunkt des Polygons
	



	MATERIAL Matl
	Pen pcol
	model solid
	SECT_ATTRS Schraffur, SchrHingStift, FuellStift, Konturstift, LinienTypImSchnitt

	prism nsp/2, b,   !!!!!!!E i g e n t l i c h e r   3 D - B e f e h l 
	 get(nsp)

Habe ich aus dem GDL - Kochbuch.. = dort allerdings simpler dargestellt.