KingFrm

KingFrm

Bilgi paylaşım adresi
 
AnasayfaAnasayfa  TakvimTakvim  GaleriGaleri  SSSSSS  AramaArama  Üye ListesiÜye Listesi  Kullanıcı GruplarıKullanıcı Grupları  Kayıt OlKayıt Ol  Giriş yapGiriş yap  

Paylaş | 
 

 Auto cad de nokta kordinatları

Aşağa gitmek 
YazarMesaj
BySamet
Forumcunet Hoşgeldiniz
Forumcunet Hoşgeldiniz
avatar

Mesaj Sayısı : 198
Reputation : 31
Kayıt tarihi : 13/03/11
Yaş : 28
Nerden : EskiÅŸehir

MesajKonu: Auto cad de nokta kordinatları   Cuma Mart 18, 2011 8:41 pm


[Resimleri görebilmek için
üye olun veya giriş yapın.]





Auto cad de nokta kordinatları







Auto [Linkleri görebilmek için üye olun veya giriş yapın.]kullananlar bilir özellikle[Linkleri görebilmek için üye olun veya giriş yapın.]ye
verilen resimlerde bir sıfır noktasına göre resimin xy koordinatlarını
vermek zahmetlidir.Bunun için ağağıdaki kodu kullanırsanız bu çok kolay
olacaktır...


------------------------------------------------------------------------------
;;EFKAN AY[Linkleri görebilmek için üye olun veya giriş yapın.]KOORDİNATLARINI VEREN PGM 10 AĞUSTOS 2003
(defun C:c1 ()
(setq olderr *error* *error* macerr)
(setq p1 (getpoint "
NOKTA SEC :")
p2(getpoint p1 "
YAZILACAK YERI SEC:")
yaz(strcat "X=" (rtos (car p1)) " Y=" (rtos (cadr p1)))
)
(command "_dim1" "LEADER" p1 p2 ""(command yaz))
(setq *error* olderr) (princ)
)

--------------------------------------------------------------------------
Bu kodları text editöre kopyalayıp uzantısını .lsp olacak şekilde kaydedin ve proğram files deki auto[Linkleri görebilmek için üye olun veya giriş yapın.]dizinine atın
Auto[Linkleri görebilmek için üye olun veya giriş yapın.]i çalıştırın
Tools dan load apilication u seçin load dan attığınız lsp uzantılı
dosyayı seçin aynı yerden contents de aynı işlemi yapın işlem tamam
komut satırna c1 yazmanız yeterli c1 değilde başka bir ad vermek
istersiniz

(defun C:c1 ()

buradaki c1 i kafanıza göre değiştirin
Sayfa başına dön Aşağa gitmek
Kullanıcı profilini gör http://kingfrm.yetkinforum.net
 
Auto cad de nokta kordinatları
Sayfa başına dön 
1 sayfadaki 1 sayfası

Bu forumun müsaadesi var:Bu forumdaki mesajlara cevap veremezsiniz
KingFrm :: Mekanik - Makina-
Buraya geçin: