endriu66

Tekst skryptu można edytować zwykłym notatnikiem.

Te wymiary odpowiadają tym

Trzecia oznaczona wartość (30) to 2*15, więc teraz wystarczy to zamienić na 2*46 więc 92.

Może coś takiego?
Polecenie "kreski"

 
;;https://forum.cad.info.pl/topic/3515-pytaniepomys%C5%82-wype%C5%82nienie-obiektu-polilini%C4%85/?tab=comments#comment-19899 (defun c:kreski () (setq p1 (getpoint "\nWskaz lewy dolny rog ")) (setq p2 (getcorner p1 "\nWskaz przeciwlegly naroznik prostokata ") ) (setq odleglosc 150) (setq h1 (+ (cadr p1) 10)) (setq h2 (- (cadr p2) 10)) (setq L (- (car p2) (car p1))) (setq ilosc (fix (/ (- L 30) odleglosc) )) (setq y (/ (- L (* ilosc odleglosc)) 2)) (setq i 0) (repeat (+ ilosc 1) (setq x (+ (* odleglosc i) (+ (car p1) y))) (command "_line" (list x h1) (list x h2) "") (setq i (+ 1 i)) ) (command "_rectangle" p1 p2 "") ) kreski.lsp

Zwracam się z prośbą o sugestie i wskazówki do nowej funkcji, jaką zamierzamy stworzyć.
Chcielibyśmy opracować skrypt, który automatycznie podzieliłby rysunek w modelu na kolejne arkusze.
Załóżmy, że mamy rysunek np. drogi, która wygląda jak na rysunku poniżej.

 
Chcielibyśmy go rozmieścić np. na 4 arkuszach. Przykładowe arkusze zaznaczyłem czerwonymi prostokątami.

 
Teraz uruchomilibyśmy nasz skrypt. Na podstawie prostokątów utworzone zostałyby 4 arkusze z dokładnie taką zawartością jak w czerwonej ramce. Dodatkowo utworzylibyśmy również legendę, na której byłby zaznaczony układ wszystkich arkuszy, jak na rysunku poniżej.

 
Czy ktoś ma jakieś sugestie odnośnie takiej funkcji?
Czy robicie "na piechotę" podobne rzeczy?
Może radzicie sobie jakoś inaczej?
 

Czyli tak:
Wskazujemy punkt w lewym dolnym rogu. Wskazujemy wysokość. Wskazujemy szerokość. Wprowadzamy x
Obliczamy y według wzorów (poniżej przykład).

Czy tak to ma wygląać?
 
 

Dobrze, postaramy się coś przygotować.
Jakie dane mają być wprowadzone? Zakładam, że będzie to:
odległości od krawędzi prostokąta (mają być równe?) ilość kresek, odległości pomiędzy kreskami. Czy może są jakieś zależności pomiędzy tymi wymiarami?

Myślę, że można zrobić coś takiego LISPem.
Ale być może w wersji 2021 wystarczy skorzystać z szyku dynamicznego.

Mozna to w 20221 zrobic szykiem j.w., przykład z wiezbą