Martin_S
-
Postów
1912 -
Dołączył
-
Ostatnia wizyta
-
Wygrane w rankingu
55
Odpowiedzi opublikowane przez Martin_S
-
-
jest ok już, zaraz wrzuce obrazek , ufff, szacun kojacek
Command: _appload
R:\pliki3D\CADPL-Pack-v1.lsp loaded successfully!
R:\pliki3D\EXTRINS.lsp loaded successfully!
Command:
------- CADPL-Pack-v1.lsp - http://forum.cad.pl-------
Command:
Command:
Command: EXTRINS
Pierwszy punkt linii definiującej ścieżkę:
Koniec ścieżki: Cancel!
; error: Function cancelled
Command:
Command: EXTRINS
Pierwszy punkt linii definiującej ścieżkę:
Koniec ścieżki:
Podaj nazwe bloku: IPE600
Command:
Command:
Command: _shademode Current mode: 2D wireframe
Enter option [2D wireframe/3D
wireframe/Hidden/Flat/Gouraud/fLat+edges/gOuraud+edges] <2D wireframe>: g
Jak tak dobrze idzie to czy ścieżka może być dowolną polilinią o dowolnym kształcie? Z tym blokiem mi sie podoba u kojacka, odpada problem punktu orientacji, bo jest nim punkt wstawiania bloku , to duzo prostsze jednak. Masz rację kojacek.
Po prostu Użytkowniku CAD , jak sobie zdefiniujesz punkt wstawiania bloku - przekrój zamkniety, tak ci sie taka "bela" utworzy na ściezce :)
-
W ZWCAD Architecture 2015 SP2 (silnik ZWCAD+ 2015 3.1)
po tej korekcie cos dalej nie tak u mnie, cytuje F2
Command: _appload
R:\pliki3D\EXTRINS.lsp loaded successfully!
Command:
Command:
Command: EXTRINS
Pierwszy punkt linii definiującej ścieżkę:
Koniec ścieżki:
Podaj nazwe bloku: IPE600
; error: no function definition: CD:SYS_COLLLIST -
OOps, w ZWCAD Classic wygląda tak
Command: _open
Command: EXTRINS
Pierwszy punkt linii definiującej ścieżkę:
Koniec ścieżki:
Podaj nazwe bloku: IPE600
error: null function
(CD:SYS_UNDOSTART)
(PROGN (CD:SYS_UNDOSTART) (SETQ CMD (GETVAR "CMDECHO")) (SETQ INSOBJ (CD:BLK_INSERTBLOCK STARTP INSNAME (QUOTE (1 1 1)) 0 T)) (SETINSERTZORIENT (NEWVECT STARTP ENDP) (SETQ INSOBJ (VLAX-VLA-OBJECT->ENAME INSOBJ))) (SETQ PATHENT (CD:ENT_MAKELINE (GETVAR "CTAB") STARTP ENDP T)) (VLA-EXPLODE (VLAX-ENAME->VLA-OBJECT INSOBJ)) (ENTDEL INSOBJ) (SETVAR "CMDECHO" 0) (COMMAND "_.EXTRUDE" (ENTLAST) "" "_path" PATHENT) (SETVAR "CMDECHO" 1) (ENTDEL PATHENT) (CD:SYS_UNDOEND))
(IF (AND (SETQ INSNAME (GETSTRING "\nPodaj nazwe bloku: ")) (MEMBER (STRCASE INSNAME) (MAPCAR (QUOTE STRCASE) (CD:SYS_COLLLIST "BLOCK" (+ 1 2 4 8))))) (PROGN (CD:SYS_UNDOSTART) (SETQ CMD (GETVAR "CMDECHO")) (SETQ INSOBJ (CD:BLK_INSERTBLOCK STARTP INSNAME (QUOTE (1 1 1)) 0 T)) (SETINSERTZORIENT (NEWVECT STARTP ENDP) (SETQ INSOBJ (VLAX-VLA-OBJECT->ENAME INSOBJ))) (SETQ PATHENT (CD:ENT_MAKELINE (GETVAR "CTAB") STARTP ENDP T)) (VLA-EXPLODE (VLAX-ENAME->VLA-OBJECT INSOBJ)) (ENTDEL INSOBJ) (SETVAR "CMDECHO" 0) (COMMAND "_.EXTRUDE" (ENTLAST) "" "_path" PATHENT) (SETVAR "CMDECHO" 1) (ENTDEL PATHENT) (CD:SYS_UNDOEND)))
(IF (SETQ ENDP (GETPOINT STARTP "\nKoniec ścieżki: ")) (IF (AND (SETQ INSNAME (GETSTRING "\nPodaj nazwe bloku: ")) (MEMBER (STRCASE INSNAME) (MAPCAR (QUOTE STRCASE) (CD:SYS_COLLLIST "BLOCK" (+ 1 2 4 8))))) (PROGN (CD:SYS_UNDOSTART) (SETQ CMD (GETVAR "CMDECHO")) (SETQ INSOBJ (CD:BLK_INSERTBLOCK STARTP INSNAME (QUOTE (1 1 1)) 0 T)) (SETINSERTZORIENT (NEWVECT STARTP ENDP) (SETQ INSOBJ (VLAX-VLA-OBJECT->ENAME INSOBJ))) (SETQ PATHENT (CD:ENT_MAKELINE (GETVAR "CTAB") STARTP ENDP T)) (VLA-EXPLODE (VLAX-ENAME->VLA-OBJECT INSOBJ)) (ENTDEL INSOBJ) (SETVAR "CMDECHO" 0) (COMMAND "_.EXTRUDE" (ENTLAST) "" "_path" PATHENT) (SETVAR "CMDECHO" 1) (ENTDEL PATHENT) (CD:SYS_UNDOEND))))
(IF (SETQ STARTP (GETPOINT "\nPierwszy punkt linii definiującej ścieżkę: ")) (IF (SETQ ENDP (GETPOINT STARTP "\nKoniec ścieżki: ")) (IF (AND (SETQ INSNAME (GETSTRING "\nPodaj nazwe bloku: ")) (MEMBER (STRCASE INSNAME) (MAPCAR (QUOTE STRCASE) (CD:SYS_COLLLIST "BLOCK" (+ 1 2 4 8))))) (PROGN (CD:SYS_UNDOSTART) (SETQ CMD (GETVAR "CMDECHO")) (SETQ INSOBJ (CD:BLK_INSERTBLOCK STARTP INSNAME (QUOTE (1 1 1)) 0 T)) (SETINSERTZORIENT (NEWVECT STARTP ENDP) (SETQ INSOBJ (VLAX-VLA-OBJECT->ENAME INSOBJ))) (SETQ PATHENT (CD:ENT_MAKELINE (GETVAR "CTAB") STARTP ENDP T)) (VLA-EXPLODE (VLAX-ENAME->VLA-OBJECT INSOBJ)) (ENTDEL INSOBJ) (SETVAR "CMDECHO" 0) (COMMAND "_.EXTRUDE" (ENTLAST) "" "_path" PATHENT) (SETVAR "CMDECHO" 1) (ENTDEL PATHENT) (CD:SYS_UNDOEND)))))
(C:EXTRINS)
Sorrki, może jutro mi coś się przejaśni, na razie sie poddaję :) Wracam do ZWCAD ARCHITECTURE z ZWCAD+
-
Nie wiem co zrobiłem nie tak
wklejam F2
Command: _appload
R:\pliki3D\CADPL-Pack-v1.lsp loaded successfully!
R:\pliki3D\B3D.lsp loaded successfully!
Command:
------- CADPL-Pack-v1.lsp - http://forum.cad.pl-------
Command:
Command:
Command: extrinsTestowałem w ZWCAD ARCHITECTURE 2015 SP2 na silniku ZWCAD+ 2015 SP3.1 , czy to mam testować na Classic? wolałbym na ZWCAD+ raczej
Pierwszy punkt linii definiującej ścieżkę:
Koniec ścieżki:
Podaj nazwe bloku: IPE600
; error: no function definition: CD:SYS_UNDOSTARTTestowałem na ZWCAD ARCHITECTURE 2015 SP2 na silniku ZWCAD+ 2015 SP 3.1
-
Jak z tego zrobic plik nazwa.lsp (B3D.lsp), czy w notatniku? Zaznaczam że jestem zielony, prosze sie nie denerwować z tego powodu
-
Blok wykorzystywuję jak "rzeźbię" na "piechotę" w 3D, on nie jest mi wcale do szczęścia potrzebny, ale pomaga osadzać przekrój w postaci bloku na ściezce ale ten blok rozbijam od razu.
Opis punktu 5 (tam osadzam blok i go rozbijam) ;)
-
Orientację polilinii zamkniętej okreslamy na płaszczyźnie głównej LUW XY, na płasko , względem osi X globalnej, narysuje przykład za chwilę
Dowolny przekrój jest bez wiedzy użytkownika wirtualnie opisany prostokatem o podstawie równoległej do osi głównej LUW X, stąd powstają
wirtualne 9 punkty orientacyjne profilu zamkniętego na scieżce. Te 9 punktów są podstawą dalszego postępowania , jak osadzić taki przekrój na ścieżce
domyślnie p. 8 środek prostokata opisujacego przekrój, to chyba powinno ułatwić programowanie lispu, jest wystarczajace dla przekrojów
np. symetrycznych w postaci profili stalowych.
-
Na początek przepraszam , ale lispów nie kumam, zostawiam to fachowcom - dla mnie to "magicy CAD", tak tak, niesamowite rzeczy robicie.
Przeciętny uzytkownik wskazuje zamkniętą polilinię jako przekrój (Polilinia musi być zamknięta), blok jest kłopotliwy
w nastepnym kroku punkt orientacyjny (9 szt., ale nr 8 standard domyślnie środek opisanej podstawy przekroju)
potem wskazanie ścieżki i następuje generowanie bryły solidowej 3D.
-
Tak dokładnie o to chodzi, by polecenie EXTRUDE prowadziło przekrój na ścieżce w sposób normalny po ścieżce. Bo inaczej wyjdzie bzdura konstrukcyjna
a fazowaniem może by to robił inny lisp, ale potrzebuje czasu by krok po kroku pokazać sens i idee działania.
W skrócie chodzi o 3 rodzaje końców dla poczatku lub konca:
normalny (jako standard), fazowanie prostopadłe do płaszczyzny globalnej XY, równoległe do płaszczyzny globalnej XY
opisywałem to w 2013r.
https://forum.cad.info.pl/topic/815-co-warto-udoskonalić-w-zwcad-architecture/?p=4323
cytuję:
"
Polecenie do definiowania sposobu zakończenia początku i końca obiektu 3D BIM
tj.
Typ 0 - zakończenie normalne do stycznej w punkcie P1 lub P2 obiektu 3D BIM
Typ 1 - zakończenie równoległe do płaszczyzny globalnej XY stycznej w punkcie P1 lub P2 obiektu 3D BIM
Typ 2 - zakończenie prostopadłe do płaszczyzny globalnej XY stycznej w punkcie P1 lub P2 obiektu 3D BIM
wyjątki:
Kiedy styczna obiektu 3D BIM w punkcie P1 lub P2 jest równoległa do płaszczyzny globalnej XY ,
zakończenie typu 1 nie jest aktywne (bo następuje efekt nieskończonego przekroju).
Kiedy styczna obiektu 3D BIM w punkcie P1 lub P2 jest równoległa do osi globalnej Z ,
zakończenie typu 2 nie jest aktywne (bo tu także następuje efekt nieskończonego przekroju)."
-
Programistycznie proponuje ścieżke jako odcinek prosty, bo ścieżka dowolna np. łuk to chyba masakra, chodzi o znalezienie stycznej na początku łuku by osadzić przekrój w sposób normalny na ściezce, tj prostopadle do ściezki, przekrój jest prostopadły do płaszczyzny utworzonej przez układ lokalny YZ, będący płaszczyzną prostopadłą do płaszczyzny globalnej XY, (kwestia modelowania zgodnego z grawitacją do płaszczyzny głównej XY) - punkt 3 jest kluczowy (osadzenie przekroju normalnie na ścieżce)
Docelowo marzy mi się coś takiego
Co udowodniłem robiąc to na tzw. piechotę bryłami 3DSolid, że się da
Dodam jeszcze, że jestem wstanie na ZWCAD ARCHITECTURE lub gołym ZWCAD zrobić / wycisnąć dużo więcej , ale fajnie by było gdyby inni mogli z tego korzystać, ja sobie radzę na "piechotę" w 3D
Drugie marzenie to implementacja AcDbSubDMesh, ale to inna bajka nie dotyczaca tego wątku
Lisp B3D działa w ten sposób że użytkownik nie zna "silnika" lispu, ja jestem zielony pod tym wzgledem, wskazuje przekrój i ścieżkę i sposób osadzenia (orientacja przekroju na ściezce) i to wszystko ) jest to "mega" ułatwienie przy modelowaniu konstrukcji stalowych i drewnianych głównie. Co będę pokazywał na przykładach w przyszłosci. :)
-
Lisp miałby za zadanie ułatwienie modelowania brył o konkretnym kształcie przekroju zamkniętego.
To jest narzędzie o które nie idzie sie doprosić w ZWSOFT (2,5roku) w ZWCAD ARCHITECTURE mające duży potencjał w modelowaniu trudnych konstrukcji
https://forum.cad.info.pl/topic/815-co-warto-udoskonalić-w-zwcad-architecture/?p=4321
https://forum.cad.info.pl/topic/815-co-warto-udoskonalić-w-zwcad-architecture/?p=4323
ja sobie radze co pokazałem ostatnio, ale to droga przez "mękę"
-
Mam pomysł na lisp (B3D) dla branży budowlanej (bardziej konstrukcyjnej ale i architektonicznej). W najbliższym czasie pokaże to na grafikach, by ułatwić idee.
W wersji podstawoewej będzie to podobne do Architecterowego "Wyciągania po ścieżce"/"Path Surface" , ale dużo bardziej użyteczne, bo efektem będzie bryła solidowa 3D,
Zasada działania, W przestrzeni XYZ wskazujemy punkt początkowy P1 i końcowy P2 (alternatywnie odcinek prosty linii lub polilinii lub polilinii3D), nastepnie kształt zamknięty (może to być
jakis np. przekrój profila stalowego HEB300 itp.), Profil jest ustawiany normalnie tj. prostopadle do odcinka P1-P2, przekrój 2D (płaski o podstawie równoległej do osi X), zawsze zorientowany jest swoją podstawą równolegle do płaszczyzny globalnej XY.
grafiki przykładowe w opracowaniu .... pokażą idee :) ... którą w kaleczący sposób stosuje w 3D z powodzeniem co nie raz pokazywałem w sekcji ARCHITECTURE ;)
1. definiowanie dowolnego przekroju 2D zorientowanego do osi X i 9 punktów orientacyjnych
2. Przykładowy odcinek dowolnie usytuowany w przestrzeni 3D względem globalnych osi XYZ.
3. Kluczem ułatwiającym to zadanie jest orientacja tymczasowego lokalnego układu współrzędnych w taki sposób, by oś Z była równoległa do odcinka P1-P2
oś X równoległa do płaszczyzny globalnej XY, co determinuje taki fakt że osie lokalne Z i Y tworzą płaszczyznę lokalną zawsze prostopadłą do płaszczyzny globalnej XY. (Patrz obrazek)
4. Wg tego przykładu zamkniety przekrój w postaci przykładowego IPE500 jest zapisywany jako blok z punktem wstawienia/orientacji np. wg punktu 8.
5. Następnie blok jest wstawiany automatycznie na poczatku odcinka P1, zgodnie z punktem wstawiania osadzany w układzie lokalnym XYZ w punkcie
(0,0,0) , na tym przykładzie punkt wstawiania jest zgodny z zdefiniowanym punktem orientacyjnym przekroju tu (8) - środek podstawy IPE500, na koncu
blok jest rozbijany (explode)
6. Na końcu przekrój poddawany jest komendzie extrude, gdzie wyciaganie odbędzie się po ścieżce będacej odcinkiem P1-P2
7. Na końcu powrót do układu globalnego XYZ, i mamy efekt finalny, bryła solidowa 3D w postaci IPE500 na odcinku P1-P2
osadzonego na środku podstawy (punkt orientacyjny nr 8)
KONIEC ZADANIA
p.s. Ja w ten sposób próbuję modelować skomplikowane bryły 3D, dowolnie usytuowane w przestrzeni, ale na "piechotę"
Pomyślę także nad fazowaniem końcówek i offsetowaniem takiego elementu 3D w przestrzeni globalnej XYZ :)
-
Ja do operacji na bryłach 3D:
- obsługa AcDbSubDMesh
- konwerter brył powierzchniowych zamkniętych na solidowe
-
Tak czy inaczej, problematykę powtórzyłem na forum ZWSOFT http://www.zwsoft.com/zwcad_forum/thread-4323-1-1.html
-
Tak działa, programy generujące rysunki konstrukcyjne belek współpracują tylko z wersją intellicadową. Kod działa, Wersja Classic jakby przejeła możliwość eksportu rysunku. Do kwietnia 2016 jest spokój :) za co dziekuję :)
-
Info od Jenny dla mnie Architecturowca:
"When you switch from dongle key to softkey, the dongle would be took back to ZWSOFT.
The architecture softkey can't activate ZWCAD+, so you can't use ZWCAD 2012, but this is a special situation, if you really need to activate ZWCAD 2012, please contact local reseller and we would try to find a solution for you." Dzieki kluczowi do kwietnia 2016 oprogramowanie generujące rysunki zbrojeniowe do zwcad2012 są generowane do Classic bez problemu (wreszcie mozna tworzyc baze w pliku >800kB bez problemu) :) -
Pytanie raczej do ZWSOFT, "Mała" niemiecka firma EasternGraphics od pCon.planner obsługuje pliki sketchupa *.skp i 3D studio *.3ds co wiąże się z obsługą obiektów "skomplikowanych" geometrycznie 3D w uproszczony sposób poprzez obsługę AcDbSubDMesh z mozliwoscią zapisu do DWG2013.
Czy jest możliwe rozwiązanie tej problematyki Chińczyków z Niemcami, dogadanie spraw prawno-patentowych by wreszcie można było korzystać z biblioteki 3D WAREHOUSE w ZWCAD 2017 ?.
-
Tu na forum konstrukcyjnym jest "lekkie zaniepokojenie" całą sytuacją z ZWCAD
http://www.konstruktorbudowlany.fora.pl/linki,11/co-sie-stalo-z-zw-cad,10079.html
Dobrze by było wyjaśnić, że wszystko idzie w dobrym kierunku.
-
Dzięki ZWCAD Classic na moim laptopie z Win7, będzie już łatwiej się korzystało z programów obliczeniowych , tych które eksportują rysunek do ZWCAD Classicbędacy na jądrze intellicada, pozostałe programy wspołpracują z ZWCAD ARCHITECTURE 2015. :drinks:
czy Artisan od Pictorex (Lightworks) przewiduje współpracę z ZWCAD Classic w najbliższym czasie, bo w tym CAD są narzędzia wspierające sztuczne oświetlenie oprócz słońca?
-
Wg Jenny na razie trzeba poczekać na oficjalną wiadomość w sprawie sporu AUTODESK-ZWSOFT
"Dear all,
we are confirming the litigation settlement details with Autodesk please wait for the final official news. -
Tu jest wypowiedź Jenny z ZWSOFT "Yes, ZWCAD 2012 is free for the customer who bought higher version. If you have activated the higher version in your computer, then ZWCAD 2012 in the same computer is activated automatically."
You could download ZWCAD 2012 from following link:
http://download1.zwsoft.com/en/ZWCAD/ZWCAD2012/ZWCAD2012EngWeb.msiUżytkownicy tzw. "golasów" mogą to zrobić, branżowcy już nie (mimo używania silnika 2012+,2014+,2015+)
-
Fajnie by było zeby użytkownicy ZWCAD Architecture 2015 mogli aktywowac wersje intellicadową 2012 tak samo jak uzytkownicy wersji ZWCAD+ wersji 2012+ i wyższych na tym samym komputerze.
Przechodziłem z wersji 2012+ na Architecture i ta mozliwosc jest nieaktywna.
Program SPECBUD eksportuje mi zbrojenie do wersji 2012. Ograniczeniem jest plik do 800kB, bo wersja demo. :)
-
Prosze pokać to na grafikach, bo mi działa ok (offset na prostokącie w układzie lokalnym wg 3 punktów). Chyba ze cos nie rozumiem.
-
Tu graficzny algorytm postępowania, podobne mechanizmy są w nakładce e-cad
Wyciągnięcie bryły pomiędzy dwoma punktami (po liniach prostych i łukach).
w Wsparcie programistyczne LISP i VisualLISP
Opublikowano · Edytowane przez Martin_S
Ambitniejszy cel: ścieżka jest polilinią składającą się albo z samych odcinków prostych, mieszana (odcinki proste i łuki), Polilinia z łuków. polilinia konwertowana ze spline na polilinie z łuków (dyskretyzacja, na elementy skończone, ciągłe)
Rozwiązanie na piechotę, więc da się ;)
Scieżka w postaci splajnu skonwertowana na polilinię (łuki to elementy skończone dł. 100mm wpisane w spline)
na poczatku ściezki znaleziono styczną w celu osadzenia lokalnego układu współrzędnych by osadzić blok w postaci obszaru zamknietego z polilinii (profil IPE600),
rozbito blok, polecenie EXTRUDE i gotowe.
PATH-01.dwg