_

rodzaj linii

Archiwum grupy newsowej pl.comp.cad. Na razie tylko do czytania i przeszukiwania.

Re: rodzaj linii

Postprzez Amig0 » maja 10, 2010 00:03

W dniu 2010-05-07 20:09, Wojtek pisze:

>
> Witam
> Jeżeli projektujesz kanalizację mając do dyspozycji tylko "czystego"
> Autocada to szczerze współczuje.

>
> I po sprawie.
> Pozdrawiam
> Wojtek

Nie, a tak źle to nie jest, do profili mam program, któremu wczytuję
wierzchołki polilinii wyciągnięte poleceniem "lista" i dalej już łatwo
tworzę profil w nim.
Tylko najpierw muszę wrysować trasę, powstawiać studnie i strzałki,
potem dopiero pociągnąć to polilinią żeby dostać współrzęne, szukałem
sposobu żeby od razu rysować polilinią, zadać jej styl linii który by za
mnie załatwił studnie i oznaczenia kierunku spływu.
--
Pozdrawiam, A.C.
Amig0
 

Re: rodzaj linii

Postprzez Piotr Knyś » maja 12, 2010 22:30

Witam!
Podrzucam mały lispik, który być może rozwiąże problem.

;;;*****************
(defun c:lstud (/ pt1 pt10 pt121 pt122 pt121p pt121l pt2 pt20 r a oldmode)
(setq r 1 ;;;promien
a (* 2 r) ;;;bok trojkata
pt2 (list 0 0)
oldmode (getvar "osmode")
)
(setq pt1 (getpoint "\nWskaż punkt początkowy: "))
(command "_circle" pt1 r)
(while pt2
(progn
(if (setq pt2 (getpoint pt1 "\nWskaż następny punkt: "))
(progn
(setq
pt10 (polar pt1 (angle pt1 pt2) r)
pt121 (polar pt1 (angle pt1 pt2) (- (/ (distance pt1 pt2) 2.0) (/ (* a (sqrt
3.0)) 4) ))
pt122 (polar pt1 (angle pt1 pt2) (+ (/ (distance pt1 pt2) 2.0) (/ (* a
(sqrt 3.0)) 4) ))
pt121p (polar pt121 (- (angle pt1 pt2) (/ pi 2.0)) (/ a 2.0))
pt121l (polar pt121 (+ (angle pt1 pt2) (/ pi 2.0)) (/ a 2.0))
pt20 (polar pt1 (angle pt1 pt2) (- (distance pt1 pt2) r))
pt1 pt2
)
(setvar "osmode" 0)
(command
"_circle" pt2 r
"_line" pt10 pt121 pt121p pt122 pt121l pt121 ""
"_line" pt122 pt20 ""
)
(setvar "osmode" oldmode)
)
)
)
);while
(princ "\nKoniec lstud")
(princ)
)
;;PK
;;***************************
Właściwie to już niewiele brakuje, aby programik rysował polylinię lub
zapisywał współrzędne studzienek.




Pozdrowienia
Piotr Knyś





Amig0 <amigo2me@interia.pl> napisał(a):

> W dniu 2010-05-07 20:09, Wojtek pisze:
>
> >
> > Witam
> > Jeżeli projektujesz kanalizację mając do dyspozycji tylko "czystego"
> > Autocada to szczerze współczuje.
>
> >
> > I po sprawie.
> > Pozdrawiam
> > Wojtek
>
> Nie, a tak źle to nie jest, do profili mam program, któremu wczytuję
> wierzchołki polilinii wyciągnięte poleceniem "lista" i dalej już łatwo
> tworzę profil w nim.
> Tylko najpierw muszę wrysować trasę, powstawiać studnie i strzałki,
> potem dopiero pociągnąć to polilinią żeby dostać współrzęne, szukałem
> sposobu żeby od razu rysować polilinią, zadać jej styl linii który by za
> mnie załatwił studnie i oznaczenia kierunku spływu.


--
Wysłano z serwisu Usenet w portalu Gazeta.pl -> http://www.gazeta.pl/usenet/
Piotr Knyś
 

Poprzednia strona

Powrót do pl.comp.cad

Kto przegląda forum

Użytkownicy przeglądający ten dział: Brak zidentyfikowanych użytkowników