
Pawcyk
Użytkownik forum-
Postów
54 -
Dołączył
-
Ostatnia wizyta
Ostatnie wizyty
Blok z ostatnimi odwiedzającymi dany profil jest wyłączony i nie jest wyświetlany użytkownikom.
Osiągnięcia Pawcyk

Początkujący (1/6)
0
Reputacja
-
Przecięcie linii z powierzchnią 3D
Pawcyk odpowiedział(a) na Pawcyk temat w Wsparcie programistyczne LISP i VisualLISP
W AutoCADzie nie sprawdzałem przecinania linii z krawędzią powierzchni, ale w sumie krawędź mi wystarczy. Dziękuję. -
Przecięcie linii z powierzchnią 3D
Pawcyk opublikował(a) temat w Wsparcie programistyczne LISP i VisualLISP
Dzień dobry. Chciałbym odgrzać starego kotleta i podzielić się tym co się dowiedziałem. Dla jednych będzie to wiedza już znana, a reszcie może pomóc. Chodzi o znalezienie punktu przecięcia linii z powierzchnią 3D. Funkcja: (vlax-invoke-method powierzchnia 'IntersectWith oś acExtendNone ) nie działa (przynajmniej mi). Większość lispów tego typu korzysta z funkcji kalkulatora graficznego wbudowanego w cada. (Dla zainteresowanych: CAL [enter] ->F1) Jedną z funkcji tego kalkulatora jest: ilp (p1,p2,t1,t2,t3), gdzie p1 i p2 to punkty tworzące linię, a t1, t2, t3 to punkty płaszczyzny. Pozdrawiam -
Pawcyk zareagował(a) na odpowiedź w temacie: Dokumentacja fotograficzna
-
Pawcyk zareagował(a) na odpowiedź w temacie: Dokumentacja fotograficzna
-
[LISP] "Odklejenie" hatch'u od polilinii
Pawcyk odpowiedział(a) na swazy temat w Wsparcie programistyczne LISP i VisualLISP
Kreskowanie ma możliwość zespolenia z polilinią tworzącą obwiednie. Jeżeli przesunę jeden wierzchołek takiej polilini to kreskowanie automatycznie dostosuje się do nowej obwiedni. Skojarzyło mi się to z opisywanym problemem. -
Dokumentacja fotograficzna
Pawcyk odpowiedział(a) na Pawcyk temat w Wsparcie programistyczne LISP i VisualLISP
...jak nie nawias to cudzysłów. Dziękuję. PS z układu WGS 84 na 2000 przechodzę za pomocą: kalkulator zadorskiego 1_1.xls -
[LISP] "Odklejenie" hatch'u od polilinii
Pawcyk odpowiedział(a) na swazy temat w Wsparcie programistyczne LISP i VisualLISP
A czy te kreskowania, które się nie odklejają, nie są zespolone z poliliniami? -
Dokumentacja fotograficzna
Pawcyk odpowiedział(a) na Pawcyk temat w Wsparcie programistyczne LISP i VisualLISP
Dziękuję za tą podpowiedź kojacek. Analizując lisp Lee-Mac'a doszedłem do wniosku, że nie muszę tworzyć list. W każdym razie zrobiłem takiego lispa jak załączony. Pozostał mi jeden problem z dodaniem do ostatniego utworzonego bloku hiperłącza. Tak wygląda fragment mojego kodu: (setq last_ent (entlast)) (command "_-hyperlink" _i _o last_ent "" path "" "" "" ) ..można powiedzieć., że mam problem ze skryptem ;) Exif - v7.lsp -
Dokumentacja fotograficzna
Pawcyk odpowiedział(a) na Pawcyk temat w Wsparcie programistyczne LISP i VisualLISP
...może na przykładzie: Plik csv wygląda tak: aa;ab;ac;ad ba;bb;bc;bd ca;cb;cc;cd ..... a potrzebuje zrobić z niego listy: Lista_1 (aa ba ca ....) Lista_2 (ab bb cb ....) Lista_3 (ac bc cc ...) Lista_4 (ad bd bc ...) W exelu to się nazywa transpozycja (nie wiem czy to pomoże) -
Pawcyk obserwuje zawartość Zapamiętywanie ostatniej wprowadzonej wartości i Dokumentacja fotograficzna
-
Dzień dobry. Chciałbym wykorzystać exif'y z jpg'ów, a dokładnie współrzędne zrobienia zdjęcia. Przy pomocy programu BR's EXIFextracter tworzę plik csv z takimi danymi: ścieżka ; GPS x; GPS y; kąt Tworzę blok i wstawiam go we współrzędnych z GPS'a wraz z określonym kątem obrotu. Do ostatniego utworzonego elementu dodaję hiperłącze o określonej ścieżce. Mój tok myślenia idzie w tym kierunku: 1) z pliku csv tworzę listy: lst_path, lst_x, lst_y, lst_angle 2) z każdej listy biorę pierwszy element i wykorzystuję go do stworzenia bloku i przypisania do niego hiperłącza 3) usuwam pierwszy element z każdej listy 4) powtarzam krok 2 i 3 aż listy będą puste Ból sprawia mi już pierwszy krok. Niby znalazłem coś takiego: http://www.lee-mac.com/readcsv.html ale jak zrobić z tego poszczególne listy. PS w załączeniu przykładowy CSV GPS.csv
-
Pawcyk zareagował(a) na odpowiedź w temacie: Zapamiętywanie ostatniej wprowadzonej wartości
-
Pawcyk zareagował(a) na odpowiedź w temacie: Zapamiętywanie ostatniej wprowadzonej wartości
-
Zapamiętywanie ostatniej wprowadzonej wartości
Pawcyk odpowiedział(a) na Pawcyk temat w Wsparcie programistyczne LISP i VisualLISP
No i wszystko się wyjaśniło. A co do (something) to chodzi o taki efekt: podaj poziom odniesienia: <domyślna wartość> ; jak nic nie wpiszę i kliknę enter to wstawia wartość domyślną Słowo "something" to moja własna inwencja - nic lepszego mi nie przyszło do głowy ;) Może właściwsze powinno być war1. Tak czy siak dziękuję za wszystkie odpowiedzi. -
Zapamiętywanie ostatniej wprowadzonej wartości
Pawcyk odpowiedział(a) na Pawcyk temat w Wsparcie programistyczne LISP i VisualLISP
Z tymi wieloma plikami to prawda -nie brałem tego pod uwagę. Postaram się zgłębić temat USERRn. Chociaż mam obawy przed grzebaniem się przy zmiennych. Może rozwiązaniem byłoby tworzenie pliku txt o nazwie takiej jak dwg. -
Zapamiętywanie ostatniej wprowadzonej wartości
Pawcyk odpowiedział(a) na Pawcyk temat w Wsparcie programistyczne LISP i VisualLISP
Etapy programu: 1) Najpierw program sprawdza czy istnieje plik OstWprRzedna.txt. Jeżeli nie, to ustawia domyślną wartość 190, jeżeli tak, to pobiera wartość z pliku. 2) Program prosi o podanie wartości (w nawiasie podając wartość domyślną/ostatnią wprowadzoną). 3) Jeżeli wprowadziłem wartość ręcznie, to zapisuje ją do pliku OstWprRzedna.txt Na obecnym etapie program tworzy plik OstWprRzedna.txt z wprowadzoną wartością, ale przy ponownym uruchomieniu wyświetla błąd: ; błąd: zły typ argumentu: FILE "D:\.......\OstWprRzedna.txt" Podejrzewam, że błąd jest w formule odczytu z pliku, który już istnieje. PS program tworzy plik txt o ścieżce takiej jak plik dwg, więc plik dwg musi być zapisany. -
Zapamiętywanie ostatniej wprowadzonej wartości
Pawcyk opublikował(a) temat w Wsparcie programistyczne LISP i VisualLISP
Dzień dobry. Wymyśliłem rozwiązanie tytułowego problemu przy użyciu funkcji write-line i tworzeniu pliku txt. (defun c:test () ;odczyt rzednej z pliku (setq f (findfile (strcat (getvar 'dwgprefix) "OstWprRzedna.txt"))) (if (not f) (setq something 190) (progn (open (strcat (getvar 'dwgprefix) "OstWprRzedna.txt") "r") (setq something (atof(read-line f))) (close f) ) ) ; koniec odczytu rzednej z pliku (setq PozOdn (cond ((getreal (strcat "\nPodaj poziom odniesienia <"(rtos something 2 2)"> \n"))) (something) );koniec cond ); koniec steq ; zapis wprowadzonej rzendej do pliku txt (setq file (open (strcat (getvar 'dwgprefix) "OstWprRzedna.txt") "w")) (write-line (rtos PozOdn) file) (close file) ;koniec zapisu wprowadzonej rzednej do pliku );end Oczywiście coś mi nie działa i proszę o pomoc. PS żeby sprawdzić czy działa trzeba uruchomić dwa razy. Paweł -
Przechowywanie informacji w pliku rysunku AutoCAD/ZWCAD C#
Pawcyk odpowiedział(a) na kaminki temat w Wsparcie programistyczne LISP i VisualLISP
A mi jeszcze jeden pomysł wpadł do głowy. Wg mnie to co nam potrzeba to: średnica, długość i nr pręta. średnica - szerokość globalna polilini długość - długość polilini nr pręta - przypisany do odpowiedniego koloru (nr1 - czerwony, nr2 - zielony itd) -
Znalazłem to: ale niestety musimy poczekać na uzupełnienie paru funkcji...
-
Już go kiedyś testowałem i jest problem z nowszymi windowsami. Montek, a u Ciebie działa na jakim windowsie??