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

3 Boyutlu Yazı Ya...

3D Solid Objeleri...

3dpolyline olan n...

ALS/Pasdoc.A virü...

Ara Lisp

AutoCAD'den Excel...

Blok değiştirme k...

Cephe kot'u veren...

Çizgi Çizip Ucuna...

Çizgi uzunluğunu...

Eğik dikdörtgen a...

Ekrana Tarih Bilg...

Enkesit Lisp

Excel Tablosunu Ç...

Harita Programı

İki nokta arasınd...

...
Menüler
Fontlar
FreeMUST
Eğitim Dökümanları
Genel Kategori
Çizim Programları
IES Dökümanları
AutoCAD
AutoLISP

Konu Anlatımları

Örnek Lispler
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- 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
Çizgi uzunluğunu çizginin üstüne yazan lisp
admin - 21.09.2005 14:50
Dosyayı download edebilir veya aşağıdaki linkten ilgili forum sayfasına giderek kodları kopyalayabilirsiniz.
İleti #671
Yazar: ehya
İçerik:
Tag:
Benzer Sayfalar- Seçilen Arc ve Line Objelerinin Toplam Uzunluğunu Veren Lisp (77.518)
- Çizgi Çizip Ucuna Donut Koyan Lisp (48.995)
- Çizgileri toplayıp toplam çizgi boyunu veren lisp (87.443)
- Sıralı aks harfi yazan lisp (73.784)
- Sırasıyla numara yazan lisp (91.507)
- Noktanın koordinatlarını yazan lisp (82.026)
- Çizime Tarih Yazan Lisp (7.341)
- Ekrana Tarih Bilgilerini Yazan Lisp (59.294)
- Nokta koordinatlarını sayfaya yazan lisp (46.112)
- Mouse ile Açıyı Belirleyerek Yazı Yazan Lisp (59.305)
merhabalar, emeğinize sağlık. bunun nasıl yüklenip nasıl kullanacağımızı anlatabilir ya da bu konuda yardımcı olabilecek bir lin video paylaşabilir misiniz?
küsüratları gidermek için komut satırına "luprec" yazarak virgülden sonra görmek istediğiniz basamak sayısını yazmanız yeterli. umarım birilerinin işine yarar
lispin içinde bir yerden rakamlarla oynayarak virgülden sonraki basamak sayısını ayarlıyorduk ama neresiydi hatırlamıyorum . Bilen varmı aceba
nasıl kurabilirim bunu autocad LT de işe yararmı ? linki indirdim ama kuramıyorum
YARDIM LÜTFEN
nasıl kurabilirim bunu autocat LT de işe yararmı ? linki indirdim ama kuramıyorum
YARDIM LÜTFEN
ed komutu sadece yazıldıktan sonra değişiklik yapmaya yarıyor o da tek başına, küsüratlar gerçekten çok fazla bunu yuvarlamanın bir yolu yokmu
ed komutu sadece yazıldıktan sonra değişiklik yapmaya yarıyor o da tek başına, küsüratlar gerçekten çok fazla bunu yuvarlamanın bir yolu yokmu
ARKADAŞLAR BU LISP İ POLYLINE OLARAK DEĞİŞTİRDİM LİSP AŞAĞIDA FAKAT HATA VERİYOR HATA SÖYLE (; error: bad argument type: 2D/3D point: nil) NOLUR YARDIM EDİN
(defun c:uy ()
(setq uy_os (getvar "osmode"))
(setq uy_sec nil)
(setq uy_sec (ssget (list (cons 0 "LWPOLYLINE"))))
(if (= uy_sec nil)
(progn
(princ "
Nesne seçimi yok. Komut bitirildi..."))
(progn
(if (= uy_yaz_yuk nil)(setq uy_yaz_yuk 12))
(initget 2)
(setq uy_yaz_y (getdist (strcat "
Yazılacak yazının Yüksekliği:<" (rtos uy_yaz_yuk) ">:")))
(if (= uy_yaz_y nil)(setq uy_yaz_y uy_yaz_yuk))
(setq uy_yaz_yuk uy_yaz_y)
(setq uy_c 0)
(setq uy_say (sslength uy_sec))
(while (< uy_c uy_say)
(setq uy_sec_tek (ssname uy_sec uy_c))
(setq uy_sec_tek_10 (cdr (assoc 10 (entget uy_sec_tek)))
uy_sec_tek_11 (cdr (assoc 11 (entget uy_sec_tek))))
(setq uy_sec_tek_mes (distance uy_sec_tek_10 uy_sec_tek_11))
(setq uy_sec_tek_10_x (car uy_sec_tek_10)
uy_sec_tek_10_y (cadr uy_sec_tek_10)
uy_sec_tek_11_x (car uy_sec_tek_11)
uy_sec_tek_11_y (cadr uy_sec_tek_11))
(setq uy_yaz_x (/ (+ uy_sec_tek_10_x uy_sec_tek_11_x) 2.00)
uy_yaz_y (/ (+ uy_sec_tek_10_y uy_sec_tek_11_y) 2.00)
uy_yaz (list uy_yaz_x uy_yaz_y))
(if (< uy_sec_tek_10_x uy_sec_tek_11_x)
(progn
(setq uy_sec_aci_bas uy_sec_tek_10)
(setq uy_sec_aci_son uy_sec_tek_11)
)
Paylaşanlara çok teşekkür ediyorum. Çizgi uzunluğundaki küsuratları nasıl yuvarlayabiliirm
merhabalar autocad'de çizgi uzunluğunu yazıyorum , ne yazarsam yazayım 100ile çarpıyor , nasıl düzeltebilirim? şimdiden teşekkürler .
line'da işe yarıyor, çok teşekkürler.. polyline ve 3d polyline için kullanılabilir versiyonu var mıdır?
istediğin fontu yazı karateri bölümünün üzerindeki fonts kısmından, rengini ise by layer bölümüne tıklayark yapabilirsin
Elinize sağlık,çok yararlı oldu.
Küsurat kısmını nasıl ayarlayabiliriz ?
İstediğimiz fontu ve rengini nasıl ayarlarız ?
Teşekkürler.
çok teşekkürler... Ehya hocamınızın sayesinde, patronun gözüne girdim. Ama gizli özne o :) yalnız bu lispte polyline ile çizilmiş çizgilere yazmadı. bir edit yapabilirmiyiz şimdiden cok tesekkur ederim
ölçümlerinde küsürat çıkıyor mesela 10.256 ben bu küsuratları nasıl atabilir yada yuvarlatabilirim..
Adiq3
autocad'de uzunlukların herhangi bir birimi yoktur. Siz metre dersiniz ben cm.. Buna siz karar vermelisiniz.
Yazılan uzunluklar çizgilerin iki nokta arasındaki uzaklığını belirler...
Eline Sağlık Ancak Bir Maruzatım Olacak Tam Olarak Lips'in Verdiği Ölçünün Esası Nedir?
Derken;
125.458 Diye Bir Rakam Dizini Cıktı,Bu Ölçünün Esası Nedir
12 Mete 54 CM midir ?
veya Bunun düzelmesi İçin Auto Cad'e Bir Değişiklik Yapmam Gerekiyormu ?
ya hocam bir şey soracam.çizginin uzunlu mesela 100.56 ben .56 lık kısmın yazmasını istemiyorum.yani küsüratları yazmamasını sağlayabilirmiyiz
lips dosyasını c diskindeki autocad içersinde source içersine yapıştırın
lisp dosyasını nereye yapıştıracaz acaba biras acemiyim yeni ögreniyorum da
Allah bin defa razı olsun..İnanılmaz işime yaradı..List edip tek tek metraj yapıyordum ..Paylaşmak ne güzel şey..Tekrar sağolsun emeği geçen dostlar..
bu lisp için yazıyı çizim ayarların göre metre cinsinden çizilmiş bir çizginin üzerine yazısını cm cinsinden yazırabilir miyiz ? birde yazıyı çizginin üstüne değil de altına yazdırabilir miyiz ?
gerçekten de çok güzel
bunu yazanın elleri dert görmesin eyvallah kardeş






