دورات هندسية

 

 

ليسب مفيد لكتابة الاحداثيات في الاوتو كاد

صفحة 5 من 7 الأولىالأولى 1 2 3 4 56 7 الأخيرةالأخيرة
النتائج 41 إلى 50 من 69
  1. [41]
    gomaatawfik
    gomaatawfik غير متواجد حالياً
    جديد


    تاريخ التسجيل: Jul 2011
    المشاركات: 2
    Thumbs Up
    Received: 0
    Given: 0
    thank you

    0 Not allowed!



  2. [42]
    gomaatawfik
    gomaatawfik غير متواجد حالياً
    جديد


    تاريخ التسجيل: Jul 2011
    المشاركات: 2
    Thumbs Up
    Received: 0
    Given: 0
    اقتباس المشاركة الأصلية كتبت بواسطة medhat omar مشاهدة المشاركة
    ها هو اللسيب

    ;writing coordinates and description prepared by eng Motee Malazee 1/2003
    ;(syria-lattakia-tel 437033 b.o.box 2886 (e.mail:[email protected])
    ;load program then enter wrco at command line
    (defun c:wrco (/)
    (setq obm (getvar "blipmode"))
    (setq oom (getvar "osmode"))
    (setq andr(getvar"angdir"))
    (setvar "angdir"1)
    (setq andb(getvar"angbase"))
    (setvar "angbase"(/ pi 2))
    (setq aunt(getvar"aunits"))
    (setvar "aunits"2)
    (setvar "dimaunit"2)
    (setvar"dimadec"4)

    (while
    (setq osmd (getvar "osmode"))
    (initget 1)
    (setq px (getpoint "\n click the point "))
    (setq osmd (getvar "osmode"))
    (initget 1)
    (setq pt (getpoint px "\n click for place for writing"))
    (setq y (cadr px))
    (setq x (car px))
    (setq z(last px))
    (if(null z)
    (setq z z))
    (setq znew(getreal(strcat"\n enter level or fix reading level<"(rtos z 2 3)">:")))
    (if znew(setq z znew))
    (setvar "osmode"0)
    (setvar"textstyle" "standard")
    (setq dscrp (getstring 1"\n description of the point(press enter for nothing):"))
    (if(null dscrp)(progn
    (command "_qleader" px pt""""(strcat"x="(rtos x 2 3 ))
    (strcat"y="(rtos y 2 3 ))(strcat"z="(rtos z 2 2 )) "" "")));end of if
    (command "_qleader" px pt""""(strcat"x="(rtos x 2 3 ))
    (strcat"y="(rtos y 2 3 ))(strcat"z="(rtos z 2 2 )) dscrp"" "")
    (setq tds(entlast))
    (if (null sca)
    (setq sca 1)
    )
    (initget 6)
    (setq scan (getreal (strcat"\n enter scale factor<"(rtos sca 2 3)">:")))
    (if scan(setq sca scan))
    (command"scale"tds"" pt sca)
    (setvar"angbase"andb)
    (setvar "angdir"andr)
    (setvar"aunits"aunt)
    (setvar"osmode"osmd)

    )
    )
    thank you

    0 Not allowed!



  3. [43]
    en_yasser75
    en_yasser75 غير متواجد حالياً
    عضو
    الصورة الرمزية en_yasser75


    تاريخ التسجيل: Apr 2010
    المشاركات: 47
    Thumbs Up
    Received: 1
    Given: 0
    جهد طيب أخى الكريم

    0 Not allowed!



  4. [44]
    mnagy2003
    mnagy2003 غير متواجد حالياً
    جديد


    تاريخ التسجيل: Dec 2006
    المشاركات: 1
    Thumbs Up
    Received: 0
    Given: 0
    thanks

    0 Not allowed!



  5. [45]
    الحاج احمد امام
    الحاج احمد امام غير متواجد حالياً
    عضو


    تاريخ التسجيل: Jun 2011
    المشاركات: 10
    Thumbs Up
    Received: 1
    Given: 1
    شكرا

    0 Not allowed!



  6. [46]
    ايمن ممدوح
    ايمن ممدوح غير متواجد حالياً
    جديد


    تاريخ التسجيل: Jan 2008
    المشاركات: 2
    Thumbs Up
    Received: 0
    Given: 0

    رد: ليسب مفيد لكتابة الاحداثيات في الاوتو كاد

    شكرا لك

    0 Not allowed!



  7. [47]
    eng_esmaeel
    eng_esmaeel غير متواجد حالياً
    جديد


    تاريخ التسجيل: Dec 2012
    المشاركات: 7
    Thumbs Up
    Received: 0
    Given: 1

    رد: ليسب مفيد لكتابة الاحداثيات في الاوتو كاد

    جزاكم الله عنا كل الخير وجعلكم نفعا للمسلمين كيفية استخدام الليسب يتم نسخ السطور الموجوده اعلاه(محتوى الليسب )ووضعها فى اى ملف امتداده lsp

    0 Not allowed!



  8. [48]
    civilengo123
    civilengo123 غير متواجد حالياً
    عضو


    تاريخ التسجيل: May 2011
    المشاركات: 38
    Thumbs Up
    Received: 2
    Given: 1

    رد: ليسب مفيد لكتابة الاحداثيات في الاوتو كاد

    ما فى شرح كيف سويته ؟

    0 Not allowed!



  9. [49]
    tiganisur
    tiganisur غير متواجد حالياً
    جديد


    تاريخ التسجيل: Apr 2013
    المشاركات: 2
    Thumbs Up
    Received: 0
    Given: 0

    رد: ليسب مفيد لكتابة الاحداثيات في الاوتو كاد

    الليسب لا يعمل معي

    0 Not allowed!



  10. [50]
    elkady200028
    elkady200028 غير متواجد حالياً
    جديد


    تاريخ التسجيل: Apr 2013
    المشاركات: 6
    Thumbs Up
    Received: 0
    Given: 1

    رد: ليسب مفيد لكتابة الاحداثيات في الاوتو كاد

    مشكوررررررررررررررررررررررررر

    0 Not allowed!



  
صفحة 5 من 7 الأولىالأولى 1 2 3 4 56 7 الأخيرةالأخيرة
الكلمات الدلالية لهذا الموضوع

عرض سحابة الكلمة الدلالية

RSS RSS 2.0 XML MAP HTML