• Çizim Okulu
    Forum İndir Galeri Youtube Turkish English Deutsch Français Japanese
    Forum Download Galeri AboneOl

    Üye Ol veya Giriş Yap

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
Dwg Paylaş Family Paylaş
Bölüm indeksi
Makaleler
Sık Sorulan Sorular
Download
İzle Öğren
Eğitim Videoları
3ds Max Videoları
AutoCAD Kursu Ders Videoları
AutoCAD Kursu 2 Boyut Dersleri
Proje Dökümanları
Çizimler
Mimari Çizimler
Elektrik
Doğalgaz
Harita Çizimleri
Tesisat
Ferforje
Makine
3 Boyut
3ds Max
ArchiCAD
Solidworks
Diğer Çizimler
Revit Family
Lispler
Menüler
Fontlar
FreeMUST
Eğitim Dökümanları
Genel Kategori
Çizim Programları
IES Dökümanları
AutoCAD
AutoLISP
Konu Anlatımları
Örnek Lispler
2D Polyline 'ı 3D...
3d polyline'ı 2d...
3D Yay çizen lisp...
Artan sırayla num...
Autocad içinden e...
Civata ve Somun Ç...
Çizgileri toplayı...
Çizime Tarih Yaza...
Daire ortasına ak...
Duvar çizen lisp
Harita ve pafta k...
İşaretlenen 2 nok...
Merdiven çizen lisp
Nokta koordinatla...
Noktanın koordina...
Parabol çizen lisp
...
Sürümler
Menüler
DWF Dosyaları
Programlama
AutoCAD Püfleri
Eğitim
AutoCAD Eğitimi
Karma 3 Boyut Dersleri
Adım Adım AutoCAD Eğitimi
01.Bölüm
02.Bölüm
03.Bölüm
04.Bölüm
05.Bölüm
06.Bölüm
07.Bölüm
08.Bölüm
09.Bölüm
10.Bölüm
11.Bölüm
12.Bölüm
Uygulamalar
Adım Adım 3 Boyut Eğitimi
Kariyer
3ds Max
Attribute lar
AutoCAD Genel
  • AutoCAD
  • AutoLISP
  • AutoCAD Programlama
  • AutoCAD Püfleri-1
  • AutoCAD Püfleri-2
  • AutoCAD Komutları
  • AutoCAD Terimler Sözl.
AutoCAD Eğitimi
  • AutoCAD Eğitim Videoları
  • AutoCAD Eğitimi
  • AutoCAD Dersleri
  • AutoCAD Eğitim Notları
  • AutoCAD 3 Boyut Dersleri
3ds Max
  • 3ds Max Nedir?
  • 3ds Max Model ve Çizim
Özel Yazılımlar
  • aLd Fonksiyonu
  • TCad Metraj
  • FacadeCAD
  • Cephe Kot
  • HQ Library
  • FreeMUST
  • ALS/Pasdoc.A
  • Excele Tablo Aktaran Lisp
  • Nokta Koordinat Tablosu
  • Plana İç Ölçü Verme
  • Toplam Alanı Yazan Lisp
  • Alan ve Çevre Yazan Lisp
  • Koordinat, Alan ve Çevre Tablo Halinde Yazma
  • AutoCAD'de Nokta Dökümü
  • Hava Kanalı Metraj Fonksiyonu
  • Boru Metrajı Fonksiyonu
  • OptiCAD
  • Özel Çizgi Tipi Oluşturmak
  • AutoCAD te Koni Açılımı Nasıl Yapılır?
  • PolyLine & Point Objelerinden Aplikasyon Çizelgesi
  • Z değerini sıfırlama
  • AutoCAD te Polyline üzerine uzunluk yazdırma
  • Sıralı numaralandırma
  • Yazı içindeki sayıları toplama
  • Karmaşık Path ile Loft Uygulaması
  • Çoklu Fillet Fonksiyonu
  • Ölçekli Türk Bayrağı çizen lisp
  • Duvar-Lento-Kapı-Pencere Metraj Programı
  • Demir (Donatı) Metraj LISP'i
Program Ekle
Ziyaretçi: 955, Üye: 0

Detaylar »
> AutoLISP > Örnek Lispler > 2D Polyline 'ı 3D Polyline yapan lisp

2D Polyline 'ı 3D Polyline yapan lisp


ehya - 23.08.2005 12:12
Lwpolyline olan nesneyi 3dpolyline yapan lisp

Buraya tıklayarak açılan pencereden AutoLISP kodlarını Ctrl + C ile kopyalayabilirsiniz

Kod:

(defun c:23p (/ data i pt)
  (setq
    data (entget (setq sil (car (entsel "
Lwpolyline'ı seçiniz:"))))
  )
  (setq data_tan (cdr (assoc 0 data)))
  (if (/= data_tan "LWPOLYLINE")
    (progn (princ "
Seçilen nesne Lwpolyline değil..."))
    (progn
      (command "3dpoly")
      (while (setq pt (assoc 10 data))
(setq data (cdr (member pt data)))
(setq pt_x (cadr pt)
      pt_y (caddr pt)
)
(setq ptt (list pt_x pt_y 0.00))
(command ptt)
      )

      (command "")
      (entdel sil)
    )
  )
  (princ)
)(PRINC "--> 'www.autocadokulu.com' Çizim yardımları yüklendi !")

Bu kodları nasıl kullanacağınızı bilmiyorsanız aşağıdaki linkten;
AutoLISP > Konu Anlatımları > Lisp Dosyalarının oluşturulması ve Yüklenmesi
konusunu inceleyiniz.

Yazar: ehya
İçerik:
Tag:

Benzer Sayfalar
  • 3d polyline'ı 2d polyline'a çeviren lisp (34.489)
  • Multi Polyline Lisp (MPL) (10.966)
  • Seçilen Polyline'ların köşe koordinatları, ara mesafeleri, alan ve çevrelerini tablo halinde yazan AutoLisp fonksiyonu (48.030)
  • Z yönünde taşıma yapan lisp (27.663)
  • Text arama yapan lisp (29.551)
  • Z yönünde kopyalama yapan lisp (25.990)
  • Konik sac açınımı yapan lisp programı (41.258)
  • Seçilen çizgileri POLYLINE yapan lisp (43.053)
  • Seçilen nesneleri freeze yapan lisp (2.722)
  • Peşpeşe çizilen çizgileri fillet yapan lisp (19.563)
Yorumlar :
Henüz yorum yapılmamış
Copyright © 2004-2026 | Tüm Hakları Saklıdır | 2532 | Site haritası | İstatistikler | Hakkımızda | Kadromuz | Gizlilik | Reklam | İletişim
SQL: 0.06 saniye - Sorgu: 34 - Ortalama: 0.00176 saniye | Insurance Quote Guide