RobS

Hej, Przygotowałem skrypt NumerujArkusze, robi to czego potrzebujesz Zacznij od wgrania pliku Lisp poleceniem AP. Na arkuszach wstaw blok Numer Arkusza który znajduje się w dołączonym rysunku. Numerowanie strony wykonaj wywołując skrypt poleceniem NumerujArkusze. Blok może mieć inna formę, możesz go edytować. Ważne żeby nazywał się "Numer Arkusza" i posiadał atrybuty AktualnyArkusz oraz WszystkieArkusze w których będzie się wyświetlała numeracja. NumerujArkusze.lsp Blok Numer Arkusza.dwg

Możesz spróbować w wersji 2026 naprawić rysunki poleceniem TEST

Hej, Ad 1. Ustaw zmienną LINESMOOTHING na 0. Ponadto porównaj czy w obu programach masz włączone wyświetlanie Szerokości linii. Ad 2. Ciężko się do tego odnieść bez sprawdzenia na konkretnym rysunku. Jeśli możesz to wyślij przykładowy rysunek z którym jest problem. Czy przenosiłeś ustawienia pomiędzy wersjami? Sprawdź wersję programu poleceniem VERNUM i odpowiedź napisz tutaj.

Hej, Problem zaznaczania występuje tylko w AutoCADzie czy w innych programach też szwankuje?

Hej, Sprawdziłem twoje makro w ZWCADzie i AutoCADzie, faktycznie programy zachowują się inaczej. Próbowałem różnych opcji, niestety bez efektów. Zgłosiłem sprawę do ZWSoft'u.

Miałem na myśli ujednolicenie i spolszczenie Start, Both, End 🙂

Uprościłem skrypty, finalnie jest jeden plik LSP i DCL. W przypadku ZWCADa plik DCL trzeba wkleić do lokalizacji C:\Program Files\ZWSOFT\ZWCAD 2026\Render\appl\comm\DCL (analogicznie dla starszych wersji rocznikowych). Po wyczytaniu skryptu wyświetlają się teraz dostępne polecenia: EWAK - rysowanie polilinii EWSET - konfiguracja rozmiaru grotów i polilinii Ponadto ujednoliciłem język, przy wyborze końców jest polski. Użyłeś darmowej wersji Chata GPT czy masz dostęp do płatnych modeli? EWAK.lsp EWAK.dcl

Jeśli możesz to podeślij skrypt w finalnej wersji, bardzo fajnie to działa. Kolejne funkcje również dodałeś z użyciem ChataGPT?

Zmodyfikowałem skrypt który wysłałeś. Teraz po wgraniu skryptu do CADa musisz określić długość i szerokość grotu oraz szerokość polilinii. Wartości zostają zapisane i będą użyte przy kolejnym wywołaniu funkcji PArrow. Jak będziesz chciał zmienić wygląd grotów i polilinii to wpisz polecenie PArrowSettings i wprowadź nowe dane. PArrow + Settings.lsp

Rozmiary grotów są zdefiniowane pod koniec kodu. Grot na początku linijka 63 - 2.5 to długość grotu linijka 65 - 0.833 to szerokość grotu Grot na końcu linijka 70 - 2.5 to długość grotu linijka 72 - 0.833 to szerokość grotu Wartości musisz dobrać metodą prób i błędów odpowiednio do skali rysunku i własnych preferencji.

Hej, Znalazłem w sieci skrypt PARROW który robi dokładnie to czego szukasz. Po wskazaniu punktów musisz wybrać czy grot ma zostać wstawiony na końcu, początku czy na obu krańcach polilinii. PARROW.lsp

To jest dość stare wydanie wersji 2024. Najnowsza dostępna wersja SP1.5 jest z końcówki 2024 roku. Zainstaluj wersję z poniższych linków. Polska wersja językowa - https://jakicad.pl/pobierz/1269/ZWCAD_2024_SP1.5_PL_64bit.exe Angielska wersja językowa - https://jakicad.pl/pobierz/1271/ZWCAD_2024_SP1.5_EN_64bit.exe

Sprawdź dokładną kompilację programu polecenie VERNUM i prześlij odpowiedź programu.

U mnie w przesłanym przez Ciebie rysunku nie ma problemów z wyznaczeniem pozornego przecięcia. Upewnij się, że pozorne przecięcie jest zaznaczone w Lokalizacji względem punktu. Później najedź na punkty od których to przecięcie będzie się wyznaczało i poczekaj na każdym z punktów ułamek sekundy tak, żeby jak na nagraniu pojawiły się żółte krzyżyki w punktach.

Hej, Czy elementy znajdują się na jednej płaszczyźnie? Jeśli możesz to prześlij fragment rysunku w której nie możesz wyznaczyć punktu przecięcia.

Hej, Wiązania parametryczne o których piszesz zostały wprowadzone w wersji 2026. Ponadto nowa wersja oferuje pełna kompatybilność z blokami parametrycznymi stworzonymi w AC. Premiera nowej wersji jest planowana na początek przyszłego miesiąca, teraz możesz zainstalować wersję Beta która oferuje pełną funkcjonalność przez 60 dni. Bezpośrednie linki do wersji 2026 Polska wersja językowa - https://jakicad.pl/pobierz/1285/ZWCAD_2026_Beta_PL.exe Angielska wersja językowa - https://jakicad.pl/pobierz/1286/ZWCAD_2026_Beta_EN.exe

Hej, Nie trzeba do tego skryptu LISP. Wystarczy w trakcie wybierania punktów wpisać polecenie M2P i wybrać dwa punkty pomiędzy którymi ma się znaleźć oś jak na poniższym nagraniu.

Rozumiem, dlatego pytam o funkcję według której ma być przeliczana odległość w podstawie trójkąta. To już brzmi jak dość złożone równanie od którego należy wyjść przy próbie rozwiązania tego zagadnienia.

Współczynnik 0,077 który określiłeś jest liniowy. Nie ma możliwości wpisania równania w pole Liniowa skala wymiaru (Dim scale linear). Wiesz już jakie będzie równanie do przeliczania wartości wymiaru?

Hej, Chodzi o to, żeby wartość czasu i odległości była pobierana z bloku w zależności od jego rozciągnięcia? Dobrze rozumiem twój pomysł?

Zmieniłem nazwę skryptu na WyrówajBlokiDoPoli. Uważam, że to lepiej opisuje jego funkcjonalność. W poprawionej wersji bloki które wykraczają poza zakres polilinii są pomijane. Ponadto po wykonaniu polecenia w pasku poleceń wyświetla się krótkie podsumowanie ile bloków zostało wyrównanych i czy zostały pominięte. Co do punktu styku to bazuje na punkcie bazowym bloku i taka będzie natura jego wyrównania do polilinii. WyrownajBlokiDoPoli.lsp

Hej, Napisałem skrypt który działa zgodnie z pomysłem @dmatusz3 LISPa wczytaj poleceniem AP. Żeby użyć funkcję wpisz polecenie DOPASUJBLOKIDOPOLI. Najpierw wybierz polilinię, później oknem bloki które chcesz dopasować do polilinii i kliknij Enter. Obiekty inne niż bloki i polilinia zostaną odfiltrowane. DopasujBlokiDoPoli.lsp

W takim razie szybki skrypt Lisp który ułatwi Ci pracę. Wczytaj go poleceniem AP i jeśli chcesz, żeby styl modyfikował się już po otwarciu rysunku to Dodaj do listy startowej. W poniższym kodzie musisz zmienić nazwę stylu NazwaStyluWym1 na swoją, stylów możesz określić więcej niż jeden. Dokładność wyświetlania wymiaru kątowego jest określona przez cyfrę "3" po "DIMADEC". W tym przykładzie będą 3 miejsca po przecinku, domyślnie jest 0. (setq dimlst '("NazwaStyluWym1" "NazwaStyluWym2")) ; Zmień nazwę Stylu wymiarowania na swoją (vlax-for dim (vla-get-Dimstyles (setq doc (vla-get-ActiveDocument (vlax-get-acad-object)))) (if (vl-position (vla-get-Name dim) dimlst) (progn (vla-put-activeDimstyle doc dim) (setvar "DIMADEC" 3) ; Określ dokładność wymiaru kątowego (vla-copyfrom dim doc)))) Plik Lisp do modyfikacji załączony jest do posta. ModKątWymStyl.lsp

@olgierd Odtworzyłem u siebie sytuację w najnowszym ZWCADzie 2025 (system Windows 11) i problem nie występuje. Link do pobrania w poście @pawmal 🙂

Najprawdopodobniej Corel nie obsługuje najnowszych formatów DXF w których zapisuje ZWCAD. Przy zapisie pliku możesz wybrać starsze formaty. Zapisz w kilku i sprawdź które obsługuje twój program.