santimetreyi metreye çevirme. | Forumlar

Forumdan

99 kategoride 17 binden fazla konu başlatıldı bu konulara yaklaşık 90 bin cevap verildi tüm bunlar yaklaşık 109 milyon kez görüntülendi

Forum Menüsü

AutoCAD Genel

AutoCAD Eğitimi

3ds Max

Özel Yazılımlar

Program Ekle

Ziyaretçi: 494, Üye: 2
admin, mateus

Detaylar »

Forumlar > AutoCAD Acil Yardım > santimetreyi metreye çevirme.

İnceleyenler : 1 ziyaretçi, 0 üye : ---

İleti	Yazar
07.08.2014 15:18 78294	kerem1453 Kıdemli Uzman 111 ileti teknik ressam ankara
1000 yada 2245 olan bi rakamı aynı birden fazlasını seçerek bu seçtigimiz rakamlar cm bunları metreye çeviren bir lsp arıyorum sitede arama yaptım bulamadım 1000 olanı 10 olarak değiştircek 2245 olanı 22.45 e cevircek bir lsp elinde olan varsa paylaşırsa sevinirim.

07.08.2014 15:33 78295	Travaci Editör 2416 ileti Teknik Ressam Konstantinopol
Komut satırına dimlfac yaz 0.01 değerini gir, daha sonra dimension menusunden dimension update i kullan.

08.08.2014 06:13 78297	kerem1453 Kıdemli Uzman 111 ileti teknik ressam ankara
bu şekilde dimensionla ölçü verdigimiz ölçü değişir.benim istedigim çarpma lsp ile çarptıgım bi rakamın sonucunu metreye çevirmesi taravacı.

08.08.2014 07:03 78298	Travaci Editör 2416 ileti Teknik Ressam Konstantinopol
Kod: (defun c:byz (/ gt ss tk c) (setq gt (getint "\nBölünecek sayi:") ss (ssget (list (cons 0 "text"))) c 0) (setvar "cmdecho" 0) (command "._undo" "be") (if ss (progn (while (< c (sslength ss)) (setq tk (ssname ss c) c (1+ c)) (entmod (subst (cons 1 (itoa (/ (atoi (cdr (assoc 1 (entget tk)))) gt))) (assoc 1 (entget tk)) (entget tk)))))) (command "._undo" "e") (setvar "cmdecho" 1) (princ))

08.08.2014 09:43 78303	kerem1453 Kıdemli Uzman 111 ileti teknik ressam ankara
taravacı ilgin için tşk ederim öncelikle ama bu lsp te 2245 olan rakama uyguladıgım zaman 100 böl diyorum 22 oluyo sonuç 22.45 olması gerekirken.

08.08.2014 11:20 78306	Travaci Editör 2416 ileti Teknik Ressam Konstantinopol
Kod: (defun c:byz (/ gt dz ss c) (vl-load-com) (setq gt (getint "\nBölünecek sayi:") dz (getvar "dimzin") ss (ssget (list (cons 0 "text"))) c -1) (setvar "cmdecho" 0) (vl-load-com) (command "._undo" "be") (if ss (progn (setvar "dimzin" 8) (while (< (setq c (1+ c)) (sslength ss)) (vla-put-TextString (vlax-ename->vla-object (ssname ss c)) (rtos (/ (atof (cdr (assoc 1 (entget (ssname ss c))))) gt) 2 2))) (setvar "dimzin" dz))) (command "._undo" "e") (setvar "cmdecho" 1) (princ))

08.08.2014 12:11 78308	kerem1453 Kıdemli Uzman 111 ileti teknik ressam ankara
tskler taravacı eline saglık..

> 1 <