<?xml version="1.0" encoding="utf-8"?>
<feed xmlns="http://www.w3.org/2005/Atom">
    <title>وبلاگی برای برنامه نویسان اتولیسپ و کاربران اتوکد</title>
    <subtitle>آموزش اتولیسپ و ویژوال لیسپ
شماره تماس جهت سفارش یا تهیه برنامه های مورد نیاز اتولیسپ
09354286076</subtitle>
    <link rel="alternate" type="text/html" href="http://autolisp.mihanblog.com"/>
    <id>tag:http://autolisp.mihanblog.com</id>
    <updated>2012-05-20T21:59:55+01:00</updated>
    <generator>mihanblog.com</generator>
<link rel="self" type="application/atom+xml" href="http://autolisp.mihanblog.com/post/atom" />
    <entry>
        <title> ابزار كمكی Quick Profile Ver.4</title>
        <link rel="alternate" type="text/html" href="http://autolisp.mihanblog.com/post/28"/>
        <published>2010-09-15T03:32:05+01:00</published>
        <updated>2010-09-15T03:32:05+01:00</updated>
        <id>tag:http://autolisp.mihanblog.com/post/28</id>
        <author>
            <name>علیرضا عدالتی پور</name>
        </author>
        <summary>یکی ازمسائلی که معمولاً کاربران اتوکد با آن مواجه اند برداشت مقطع عرضی با کمک ترسیم یک مسیر از روی منحنی های میزان میباشد.برنامه تقدیمی به آسانی به کاربر اجازه میدهد فقط با انتخاب مسیر و معرفی لایه های محتوی منحنی های میزان مقطع مورد نظر را ترسیم و مشخصات آنرا در یک فایل ذخیره نماید.مزیت این برنامه نسبت به موارد مشابه کاربرپسند بودن و عدم محدودیت پلی لاین انتخابی حتی دارای قوسهای متعدد میباشد. 
دانلود برنامه
نحوه سفارش وخرید نرم افزار در ادامه مطلب</summary>
        <content type="html" xml:base="http://autolisp.mihanblog.com/post/28"><![CDATA[<STRONG>یکی ازمسائلی که معمولاً کاربران اتوکد با آن مواجه اند برداشت مقطع عرضی با کمک ترسیم یک مسیر از روی منحنی های میزان میباشد.برنامه تقدیمی به آسانی به کاربر اجازه میدهد فقط با انتخاب مسیر و معرفی لایه های محتوی منحنی های میزان مقطع مورد نظر را ترسیم و مشخصات آنرا در یک فایل ذخیره نماید.مزیت این برنامه نسبت به موارد مشابه کاربرپسند بودن و عدم محدودیت پلی لاین انتخابی حتی دارای قوسهای متعدد میباشد.</STRONG> <IMG border=0 hspace=0 alt="" align=baseline src="http://picturehosting.org/u/501/g28sqkxs.jq.jpg"><BR><BR>
<DIV style="TEXT-ALIGN: center"><A title="" href="http://www.opendrive.com/files/7161921_OQFjw_2f00/Setup-QuickProfile.zip" target=_blank><SPAN style="FONT-WEIGHT: bold">دانلود برنامه</SPAN></A><BR><BR></DIV>
<DIV style="TEXT-ALIGN: center"><STRONG><STRONG>نحوه سفارش وخرید نرم افزار</STRONG> در ادامه مطلب</STRONG><BR><STRONG></STRONG></DIV><STRONG><BR></STRONG>]]></content>
    </entry>
    <entry>
        <title>مشکل در فارسی نویسی با لیسپ</title>
        <link rel="alternate" type="text/html" href="http://autolisp.mihanblog.com/post/25"/>
        <published>2010-07-19T04:03:16+01:00</published>
        <updated>2010-07-19T04:03:16+01:00</updated>
        <id>tag:http://autolisp.mihanblog.com/post/25</id>
        <author>
            <name>علیرضا عدالتی پور</name>
        </author>
        <summary>
این مطلب را قبلاً در سایتی دیگر نوشته بودم ولی چون یکی از دوستان سوال کردند اینجا دوباره پست میکنم.گاهی استفاده از دستورات 
visual style در نقشه&amp;nbsp; باعث تغییر متغیر cshadow از 0 
به 2 شده که برای تمام موضوعات نقشه کد dxf  284  را به موضوع می افزاید.با
 توجه به اینکه لیسپ هائی همچون کاتب و فارسی6... پس از کرک شدن دیگر بروز رسانی 
نشده است این کد برایش ناشناخته بوده و نمیتواند آنرا تعویض نماید.این مسئله باعث میشود هنگام فارسی نویسی با دستورات لیسپ فونتها جدا از هم قرار گیرند وبه هم نچسبند</summary>
        <content type="html" xml:base="http://autolisp.mihanblog.com/post/25"><![CDATA[<div style="text-align: justify;">
این مطلب را قبلاً در سایتی دیگر نوشته بودم ولی چون یکی از دوستان سوال کردند اینجا دوباره پست میکنم.<br>گاهی استفاده از دستورات 
visual style در نقشه&nbsp; باعث تغییر متغیر <span style="font-weight: bold;">cshadow</span> از 0 
به 2 شده که برای تمام موضوعات نقشه کد <span style="font-weight: bold;">dxf  284</span>  را به موضوع می افزاید.با
 توجه به اینکه لیسپ هائی همچون کاتب و فارسی6... پس از کرک شدن دیگر بروز رسانی 
نشده است این کد برایش ناشناخته بوده و نمیتواند آنرا تعویض نماید.<br>این مسئله باعث میشود هنگام فارسی نویسی با دستورات لیسپ فونتها جدا از هم قرار گیرند وبه هم نچسبند.<br>
برای حل مشکل <span style="font-weight: bold;">cshadow</span> را در خط فرمان تایپ نموده و مقدار آنرا 0 نمائید.<br><br>عبارت<span style="font-weight: bold;"> cshadow</span>  نه یک دستور بلکه یکی از متغیرهای اتوکد است. اتوکد علاوه 
بر دستورات تعریف شده اولیه یا ثانویه (بر پایه مجموعه برنامه نویسی شده از
 دستورات پایه) برای کنترل نقشه از متغیرهای داخلی و خارجی سود میجوید.متغیرهای داخلی به همراه نقشه ذخیره میشود (مانند <span style="font-weight: bold;">textsize</span> که <span style="font-weight: bold;">کنترل ارتفاع
 اولیه text </span>را بعهده دارد) و متغیرهای خارجی که بر اثر برنامه های جنبی 
وثانویه تولید شده اند حذف میگردند. متغیرهای داخلی را میتوان همچون یک 
دستور به کار گرفت.<br><br>
جهت اطلاع کاملی از متغیرهای داخلی نقشه فعلی خود میتوانید از قسمت express
  اتوکد در صورت نصب کامل آن از منوی tools برنامه جانبی system variable 
editor را اجرا نموده و مقادیر فعلی و اولیه وتوضیح کامل متغیرها را 
ببینید.<br>
</div>]]></content>
    </entry>
    <entry>
        <title>ویروس acaddoc.lsp</title>
        <link rel="alternate" type="text/html" href="http://autolisp.mihanblog.com/post/24"/>
        <published>2010-07-15T11:13:38+01:00</published>
        <updated>2010-07-15T11:13:38+01:00</updated>
        <id>tag:http://autolisp.mihanblog.com/post/24</id>
        <author>
            <name>علیرضا عدالتی پور</name>
        </author>
        <summary>


در واقع این یک ویروس نیست بلکه یک کرم نرم افزاری است که خود را به فایلهای لیسپ راه انداز اتوکد&amp;nbsp;اضافه میکند. برای رفع این مشكل ابتدا كلیه فایلهای Acaddoc.lsp موجود بر روی كامپیوتر را پاك كنید .الباقی راه حل را عیناً از سایت&amp;nbsp; http://metinsaylan.com برایتان میگذارم :1- فایل مقابل را دانلود نمائید : acaddocfix_1.6.lsp (8,7 KB)2-&amp;nbsp; فایل لیسپ دانلود شده را با دستور appload&amp;nbsp; در داخل اتوکد بار گذاری&amp;nbsp; (Load)&amp;nbsp; کنید .3- برنامه بصورت اتوماتیک اجرا شده و تمامی فایلهای راه ا</summary>
        <content type="html" xml:base="http://autolisp.mihanblog.com/post/24"><![CDATA[


در واقع این یک ویروس نیست بلکه یک کرم نرم افزاری است که خود را به فایلهای لیسپ راه انداز اتوکد&nbsp;اضافه میکند. برای رفع این مشكل ابتدا كلیه فایلهای Acaddoc.lsp موجود بر روی كامپیوتر را پاك كنید .<br><br>الباقی راه حل را عیناً از سایت&nbsp; http://metinsaylan.com برایتان میگذارم :<br><br><div style="text-align: right; direction: rtl;">1- فایل مقابل را دانلود نمائید :<a href="http://metinsaylan.com/?dl_name=acaddocfix_1.6.lsp" target="_blank" title=""> acaddocfix_1.6.lsp (8,7 KB)</a><br>2-&nbsp; فایل لیسپ دانلود شده را با دستور appload&nbsp; در داخل اتوکد بار گذاری&nbsp; (Load)&nbsp; کنید .<br>3- برنامه بصورت اتوماتیک اجرا شده و تمامی فایلهای راه اندازی ویروسی شده را جستجو و ضمن اعلام ویروس کشی میکند.<br>4- در صورتیکه فایلهای مربوطه Read Only&nbsp; باشد عملیات مربوطه ناموفق خواهد بود پس قبلاً&nbsp; این مسئله را رفع نمائید.<br></div>


]]></content>
    </entry>
    <entry>
        <title>برنامه های اتولیسپ کاربردی</title>
        <link rel="alternate" type="text/html" href="http://autolisp.mihanblog.com/post/21"/>
        <published>2010-05-22T02:58:34+01:00</published>
        <updated>2010-05-22T02:58:34+01:00</updated>
        <id>tag:http://autolisp.mihanblog.com/post/21</id>
        <author>
            <name>علیرضا عدالتی پور</name>
        </author>
        <summary>








از امروز قصد دارم برنامه های کاربردی و آموزشی اتولیسپ را به صورت روزانه (اگر بد قولی نشود) برایتان در وبلاگ قرار دهم. دوستان عزیز علاقمند میتوانند برنامه های اتولیسپ که در وبلاگ نیامده باشد را نیز از طریق email&amp;nbsp; یا فرم ارسال یا قسمت نظرات ارسال تا بنام خودشان در وبلاگ درج شود. اگر برنامه را از جائی تهیه کرده اید نام نویسنده آنرا از فایل حذف نکنید شرح فارسی کارکرد برنامه و دستور اجرائی از اتوکد را حتماً مرقوم فرمائید.(مقدماتی ) : برای اجرای برنامه های اتولیسپ از فرمان applo</summary>
        <content type="html" xml:base="http://autolisp.mihanblog.com/post/21"><![CDATA[








از امروز قصد دارم برنامه های کاربردی و آموزشی اتولیسپ را به صورت روزانه (اگر بد قولی نشود) برایتان در وبلاگ قرار دهم. دوستان عزیز علاقمند میتوانند برنامه های اتولیسپ که در وبلاگ نیامده باشد را نیز از طریق email&nbsp; یا فرم ارسال یا قسمت نظرات ارسال تا بنام خودشان در وبلاگ درج شود. اگر برنامه را از جائی تهیه کرده اید نام نویسنده آنرا از فایل حذف نکنید <span style="font-weight: bold;">شرح فارسی کارکرد برنامه</span> و <span style="font-weight: bold;">دستور اجرائی</span> از اتوکد را حتماً مرقوم فرمائید.<br><br>(مقدماتی ) : برای اجرای برنامه های اتولیسپ از فرمان appload&nbsp; استفاده و بعد از Load فرمان اجرائی را از پای Command&nbsp; اتوکد صادر نمائید.<br><br><span style="font-weight: bold;">. </span><a href="http://www.opendrive.com/files/6438763_eZkZA/blkscl.lsp" target="_blank" title=""><span style="font-weight: bold;">دانلود برنامه BLKSCL</span></a><br><span style="font-weight: bold;">فرمان اجرائی : Blkscl</span><br>ضریب و نام یک بلوک را از شما سوال کرده که پس از انتخاب محدوده مورد نظر بلوکهائی با همان نام را با ضریب ورودی واز محل درج کوچک یا بزرگ میکند.(مشابه دستور Scale)<br><br><a href="http://www.jtbworld.com/download/backgroundchanger.lsp" target="_blank" title=""><span style="font-weight: bold;">. دانلود برنامه backgroundchanger.lsp</span></a><br>فرمانهای اجرائی: <span style="font-weight: bold;">BGblack&nbsp; -&nbsp; BGwhite&nbsp; -&nbsp; BGgrey -&nbsp; BGt</span><br>BGblack&nbsp; : تغییر رنگ پس زمینه اتوکد به مشکی<br>BGwhite : تغییر رنگ پس زمینه اتوکد به سفید<br>BGgrey&nbsp; : تغییر رنگ پس زمینه اتوکد به خاکستری<br>BGt&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; : تغییر رنگ پس زمینه از مشکی به سفید یا برعکس<br><br><a href="http://www.jtbworld.com/download/BOMLengths.lsp" target="_blank" title=""><span style="font-weight: bold;">. دانلود برنامه BOMLengths.lsp</span></a><br>فرمان اجرائی: <span style="font-weight: bold;">BOMLengths</span><br>محاسبه طول موضوعات بصورت تکی و کل&nbsp; (Arc - Line - Polyline - Spline) با امکان فیلتر موضوع<br><br><a href="http://www.jtbworld.com/download/txtRot.lsp" target="_blank" title=""><span style="font-weight: bold;">. دانلود برنامه Txtrot.lsp</span></a><br>فرمان اجرائی : <span style="font-weight: bold;">Txtrot</span><br>دادن زاویه دلخواه به تمامی text ها و mtext های انتخابی<br><br>--&gt; در صورت کار نکردن لینک دانلود برنامه مورد نظر را در ادامه مطلب انتخاب و در یک فایل TXT از طریق NotePad&nbsp; کپی و با پسوند lsp ذخیره نمائید.<br>










]]></content>
    </entry>
    <entry>
        <title>ابزار کمکی Id-From-Polyline ver 2.0</title>
        <link rel="alternate" type="text/html" href="http://autolisp.mihanblog.com/post/22"/>
        <published>2010-05-18T06:42:36+01:00</published>
        <updated>2010-05-18T06:42:36+01:00</updated>
        <id>tag:http://autolisp.mihanblog.com/post/22</id>
        <author>
            <name>علیرضا عدالتی پور</name>
        </author>
        <summary>

امکانات جدید:

1- انتخاب چند پلی لاین
بصورت همزمان

2- قابلیت اضافه کردن
پیشوند و پسوند به شماره های اتوماتیک

3- قابلیت تعریف تقسیم
قوسها به مقدار دلخواه

4- ابزار RPL جهت تعویض
جهت پلی لاین

5- درج فاصله از مبدا هر
نقطه در جدول

6- نصب بسیار اسان و
افزودن تولبارز IFP2&amp;nbsp; به اتوکد

+ امکانات قدیم :

7- درج مختصات کلیه رئوس و
قسمت بندی قوسها در جدول

8- امکان ذخیره مختصات در
فایل

9- شماره زنی اتوماتیک با
امکان تعریف شماره شروع

10- انتخاب سایز جدول و
مقدار</summary>
        <content type="html" xml:base="http://autolisp.mihanblog.com/post/22"><![CDATA[

<p dir="RTL" style="text-align: center; direction: rtl; unicode-bidi: embed; font-weight: bold;"><img style="width: 416px; height: 230px;" src="http://imageup.ir/images/45yl17u5kqz24tuqxtj.jpg" alt="" vspace="0" align="baseline" border="0" hspace="0"></p><p dir="RTL" style="text-align: right; direction: rtl; unicode-bidi: embed; font-weight: bold;"><span style="font-size: 9pt; font-family: Tahoma;" lang="AR-SA">امکانات جدید:</span></p>

<p dir="RTL" style="text-align: right; direction: rtl; unicode-bidi: embed;"><span style="font-size: 9pt; font-family: Tahoma;" lang="AR-SA">1- انتخاب چند پلی لاین
بصورت همزمان</span></p>

<p dir="RTL" style="text-align: right; direction: rtl; unicode-bidi: embed;"><span style="font-size: 9pt; font-family: Tahoma;" lang="AR-SA">2- قابلیت اضافه کردن
پیشوند و پسوند به شماره های اتوماتیک</span></p>

<p dir="RTL" style="text-align: right; direction: rtl; unicode-bidi: embed;"><span style="font-size: 9pt; font-family: Tahoma;" lang="AR-SA">3- قابلیت تعریف تقسیم
قوسها به مقدار دلخواه</span></p>

<p dir="RTL" style="text-align: right; direction: rtl; unicode-bidi: embed;"><span style="font-size: 9pt; font-family: Tahoma;" lang="AR-SA">4- ابزار RPL جهت تعویض
جهت پلی لاین</span></p>

<p dir="RTL" style="text-align: right; direction: rtl; unicode-bidi: embed;"><span style="font-size: 9pt; font-family: Tahoma;" lang="AR-SA">5- درج فاصله از مبدا هر
نقطه در جدول</span></p>

<p dir="RTL" style="text-align: right; direction: rtl; unicode-bidi: embed;"><span style="font-size: 9pt; font-family: Tahoma;" lang="AR-SA">6- نصب بسیار اسان و
افزودن تولبارز IFP2&nbsp; به اتوکد</span></p>

<p dir="RTL" style="text-align: right; direction: rtl; unicode-bidi: embed; font-weight: bold;"><span style="font-size: 9pt; font-family: Tahoma;" lang="AR-SA">+ امکانات قدیم :</span></p>

<p dir="RTL" style="text-align: right; direction: rtl; unicode-bidi: embed;"><span style="font-size: 9pt; font-family: Tahoma;" lang="AR-SA">7- درج مختصات کلیه رئوس و
قسمت بندی قوسها در جدول</span></p>

<p dir="RTL" style="text-align: right; direction: rtl; unicode-bidi: embed;"><span style="font-size: 9pt; font-family: Tahoma;" lang="AR-SA">8- امکان ذخیره مختصات در
فایل</span></p>

<p dir="RTL" style="text-align: right; direction: rtl; unicode-bidi: embed;"><span style="font-size: 9pt; font-family: Tahoma;" lang="AR-SA">9- شماره زنی اتوماتیک با
امکان تعریف شماره شروع</span></p>

<p dir="RTL" style="text-align: right; direction: rtl; unicode-bidi: embed;"><span style="font-size: 9pt; font-family: Tahoma;" lang="AR-SA">10- انتخاب سایز جدول و
مقدار اعشار به دلخواه کاربر</span></p>

<p dir="RTL" style="text-align: right; direction: rtl; unicode-bidi: embed;"><span style="font-size: 9pt; font-family: Tahoma;" lang="AR-SA">11- مشخص کردن محل درج
مختصات بوسیله Point خصوصاً در محل قوس <span style="font-weight: bold;">(جدید: مرکز قوس)</span></span></p>

<p dir="RTL" style="text-align: center; direction: rtl; unicode-bidi: embed; font-weight: bold;" align="center"><a href="http://www.opendrive.com/files/6414559_YiV3K_e2a8/Ifp2-Setup.exe" target="_blank" title="">دانلود برنامه IFP2-Setup</a></p>

<p dir="RTL" style="text-align: center; direction: rtl; unicode-bidi: embed;" align="center"><strong><span style="font-size: 9pt; font-family: Tahoma;" lang="AR-SA">قیمت
: 100000 ریال</span></strong><span style="font-size: 9pt; font-family: Tahoma;" lang="AR-SA"></span></p>

<p dir="RTL" style="text-align: center; direction: rtl; unicode-bidi: embed;" align="center"><span style="font-size: 9pt; font-family: Tahoma;" lang="AR-SA">نحوه خرید
ورجیستر برنامه مشابه نسخه قدیم میباشد</span></p>





]]></content>
    </entry>
    <entry>
        <title>خلاصه فرمانهای EDPTOOLS</title>
        <link rel="alternate" type="text/html" href="http://autolisp.mihanblog.com/post/4"/>
        <published>2010-03-08T05:55:18+01:00</published>
        <updated>2010-03-08T05:55:18+01:00</updated>
        <id>tag:http://autolisp.mihanblog.com/post/4</id>
        <author>
            <name>علیرضا عدالتی پور</name>
        </author>
        <summary>


برنامه های زیر در Edptools&amp;nbsp; به صورت رایگان در اختیار کاربران عزیز قرار میگیرد :&amp;nbsp; فرمان&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; برنامه کمکی &amp;nbsp;&amp;nbsp; &amp;nbsp; &amp;nbsp; &amp;nbsp; &amp;nbsp; &amp;nbsp; &amp;nbsp; &amp;nbsp; &amp;nbsp; &amp;nbsp; &amp;nbsp;&amp;nbsp;&amp;nbsp;
 &amp;nbsp; &amp;nbsp; &amp;nbsp; &amp;nbsp; &amp;nbsp; &amp;nbsp;&amp;nbsp; شرح
&amp;nbsp;ADD-TO-TEXT &amp;nbsp; &amp;nbsp; &amp;nbsp; &amp;nbsp; &amp;nbsp; &amp;nbsp; &amp;nbsp;
 &amp;nbsp; 
ADDTEXT &amp;nbsp; &amp;nbsp;&amp;nbsp; اضافه کرد</summary>
        <content type="html" xml:base="http://autolisp.mihanblog.com/post/4"><![CDATA[


برنامه های زیر در <span style="font-weight: bold;">Edptools</span>&nbsp; به صورت رایگان در اختیار کاربران عزیز قرار میگیرد :<br><br><strong>&nbsp; فرمان&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; برنامه کمکی &nbsp;&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;&nbsp;&nbsp;
 &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;&nbsp; شرح</strong>
<p style="direction: rtl;">&nbsp;ADD-TO-TEXT &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
 &nbsp; 
ADDTEXT &nbsp; &nbsp;&nbsp; اضافه کردن رشته به ابتدا یا انتهای TEXT های انتخابی</p><p style="direction: rtl;">&nbsp;ADD-VERTEX

 &nbsp; &nbsp; &nbsp; &nbsp;&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;&nbsp; &nbsp;&nbsp; ADV &nbsp;&nbsp; &nbsp;&nbsp; افزودن یک راس به 
پلی لاین</p><p style="direction: rtl;"> ADD-NUMBER-TEXT &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;&nbsp; &nbsp;&nbsp; ANT &nbsp;&nbsp; &nbsp;افزودن یک 
عدد به TEXT های انتخابی</p><p style="direction: rtl;">CURVE-BOX
 &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;&nbsp; &nbsp;&nbsp;&nbsp; CUB &nbsp;&nbsp; &nbsp; گزارش از مشخصات یک قوس<br></p>PERSIAN &nbsp;&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;
 &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;&nbsp; FARSI &nbsp;&nbsp; &nbsp;انتخاب استیل برای فارسی نویسی<br><br>GET-HATCH-PATERN
 &nbsp;&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; GETPAT &nbsp;&nbsp; &nbsp;ساخت pattern&nbsp; از هاشورهای نقشه<br><br>OBJECT-POLYLINE-CLIP
 &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;&nbsp;&nbsp; IPC &nbsp;&nbsp; &nbsp;برش تصویر، بلوک 
،xref بوسیله محیط بسته&nbsp; <br><br>REMOVE-FROM-TEXT
 &nbsp;&nbsp; &nbsp; &nbsp;&nbsp; REMTEXT &nbsp;&nbsp; &nbsp;برش Text<br><br>ROUND-TEXT
 &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;&nbsp; &nbsp;&nbsp; RNT &nbsp;&nbsp; &nbsp;گرد کردن اعداد<br><br><br>کل دستورات تعبیه شده در این ابزار کمکی را میتوانید در ادامه مطلب ببینید :<br>
]]></content>
    </entry>
    <entry>
        <title>راهنمای EdpTools - ورود اطلاعات دوربین</title>
        <link rel="alternate" type="text/html" href="http://autolisp.mihanblog.com/post/5"/>
        <published>2010-03-08T05:50:11+01:00</published>
        <updated>2010-03-08T05:50:11+01:00</updated>
        <id>tag:http://autolisp.mihanblog.com/post/5</id>
        <author>
            <name>علیرضا عدالتی پور</name>
        </author>
        <summary>
&amp;nbsp; Point From Text Fileورود اطلاعات دوربین توتال به داخل اتوکد&amp;nbsp; با قالبهای دلخواه منجمله N,X,Y,Z,Dبا توجه به اینکه در برنامه از فانکشنهای بسیار قوی استفاده شده است این برنامه داده های بسیار زیاد را&amp;nbsp; نیز در عرض چند ثانیه بصورت بلوک در اتوکد مشخص مینماید. امکاناتی همچون پیش نمایش فایل ورودی ؛ انتخاب قالبهای متفاوت فایل ورودی ؛ اتصال نقاط پیوسته با کد مشترک ؛ تولید نقاط 3 بعدی ؛ تعریف بلوک های دلخواه حتی بدون attribute&amp;nbsp; از جمله امکانات این ابزار میباشدZoom&amp;nbsp; to Ptt1---&amp;gt; </summary>
        <content type="html" xml:base="http://autolisp.mihanblog.com/post/5"><![CDATA[
<p style="text-align: center;"><strong>&nbsp; Point From Text File</strong></p><p style="text-align: center;"><img src="http://picturehosting.org/u/1590/g6j1aala.60.jpg" style="width: 223px; height: 308px;"></p><p style="text-align: center;">ورود اطلاعات دوربین توتال به داخل اتوکد&nbsp; با قالبهای دلخواه منجمله N,X,Y,Z,D</p><p>با توجه به اینکه در برنامه از فانکشنهای بسیار قوی استفاده شده است این برنامه داده های بسیار زیاد را&nbsp; نیز در عرض چند ثانیه بصورت بلوک در اتوکد مشخص مینماید. امکاناتی همچون پیش نمایش فایل ورودی ؛ انتخاب قالبهای متفاوت فایل ورودی ؛ اتصال نقاط پیوسته با کد مشترک ؛ تولید نقاط 3 بعدی ؛ تعریف بلوک های دلخواه حتی بدون attribute&nbsp; از جمله امکانات این ابزار میباشد</p><p>Zoom&nbsp; to Ptt1---&gt; Ztp<br>جستجوی نقاط تخلیه شده با استفاده از شماره نقطه</p><p>Make Polyline (by) Ptt1---&gt; Mpp<br>ترسیم پلی لاین به کمک شماره نقطه بصورت تک به تک یا با تعریف امتداد نقاط<br></p>]]></content>
    </entry>
    <entry>
        <title>معرفی نرم افزار edptools</title>
        <link rel="alternate" type="text/html" href="http://autolisp.mihanblog.com/post/7"/>
        <published>2010-03-08T04:49:18+01:00</published>
        <updated>2010-03-08T04:49:18+01:00</updated>
        <id>tag:http://autolisp.mihanblog.com/post/7</id>
        <author>
            <name>علیرضا عدالتی پور</name>
        </author>
        <summary>
معرفی ابزار کمک ترسیم EdpTool با توجه به ضرورت نقشه های پروفیل طولی در رسته های مختلف مهندسی همچون
 آب و فاضلاب ، سد سازی، راه ، نقشه برداری و ...&amp;nbsp; بر آن شدیم تا برنامه 
EdpTools&amp;nbsp; را جهت کاربران اتوکد 2000 به بالا تهیه و تقدیم کنیم.اینک 
نرم افزار فوق با کارائی بالا و سهولت استفاده&amp;nbsp; ، آماده و در نسخه های مختلف 
با توجه به نیاز مشاوران و پیمانکاران تقدیم میگردد.نصب آسان ، سرعت تحلیل داده های اولیه و در اختیار گذاشتن حدود 100 فرمان کاربردی از جمله مزیتهای این نرم افزار میباشد.</summary>
        <content type="html" xml:base="http://autolisp.mihanblog.com/post/7"><![CDATA[
<p style="text-align: center;"><span style="font-size: 14pt;">معرفی ابزار کمک ترسیم EdpTool </span></p><p style="text-align: center;"><span style="font-size: 14pt;"><img src="http://picturehosting.org/u/1590/g6izw2tp.1t.jpg" width="463" height="41"></span></p><p style="text-align: justify;">با توجه به ضرورت نقشه های پروفیل طولی در رسته های مختلف مهندسی همچون
 آب و فاضلاب ، سد سازی، راه ، نقشه برداری و ...&nbsp; بر آن شدیم تا برنامه<span style="font-weight: bold;"> 
EdpTools</span>&nbsp; را جهت کاربران اتوکد 2000 به بالا تهیه و تقدیم کنیم.</p><p style="text-align: justify;">اینک 
نرم افزار فوق با <span style="font-weight: bold;">کارائی بالا </span>و <span style="font-weight: bold;">سهولت استفاده&nbsp;</span> ، آماده و در نسخه های مختلف 
با توجه به نیاز مشاوران و پیمانکاران تقدیم میگردد.</p><p style="text-align: justify;"><span style="font-weight: bold;">نصب آسان</span> ، <span style="font-weight: bold;">سرعت تحلیل</span> داده های اولیه و در اختیار گذاشتن <span style="font-weight: bold;">حدود 100 فرمان کاربردی</span> از جمله مزیتهای این نرم افزار میباشد. به طوریکه پس از ارائه نسخ اولیه هم اکنون بیش از 50 نسخه در مشاوران مختلف نصب و مورد بهره برداری قرار گرفته است.</p><p style="text-align: justify;">این ابزار به قیمت <span style="font-weight: bold;">3,000,000 ریال</span> در اختیار علاقمندان گرامی بصورت تک نسخه&nbsp; هارد قرار میگیرد. شماره سریال تولید شده برای یک هارد مادام العمر بوده و قابل تعویض نمی باشد.</p><p style="text-align: justify;">کاربران عزیز جهت اطلاعات بیشتر میتوانند با شماره <span style="font-weight: bold;">7028 708 0915</span> تماس بگیرند.</p><p style="text-align: justify;">به تدریج در همین وبلاگ نسخه های جدیدتر جهت دانلود کاربران گرامی و راهنمای دستورات به تفصیل ارائه خواهد گردید.</p><p style="text-align: center;"><a target="_blank" href="http://www.opendrive.com/files/6412128_bxBbD/Setup-EdpTools.exe"><strong>دانلود EdpTools Ver 1.01 </strong></a></p><p style="text-align: justify;"></p>]]></content>
    </entry>
    <entry>
        <title>دلیل تاخیر در شروع برنامه اتوکد و طریقه رفع آن</title>
        <link rel="alternate" type="text/html" href="http://autolisp.mihanblog.com/post/8"/>
        <published>2010-01-31T02:52:43+01:00</published>
        <updated>2010-01-31T02:52:43+01:00</updated>
        <id>tag:http://autolisp.mihanblog.com/post/8</id>
        <author>
            <name>علیرضا عدالتی پور</name>
        </author>
        <summary>
این مطلب ربطی به اتولیسپ ندارد ولی به خاطر اینکه دوستان زیادی این سوال را پرسیده اند در اینجا پاسخ میدهم:در صورت عدم اتصال به شبکه معمولاً این تاخیر رخ میدهد و برای رفع آن میتوانید از روش زیر استفاده نمائید:Start Internet 
Explorer and go to Tools &amp;gt; Internet Options &amp;gt; Advanced tab &amp;gt; 
Settings &amp;gt; Security. In this section, clear the Publisher's 
Certificate Revocation check box. Exit by OK.</summary>
        <content type="html" xml:base="http://autolisp.mihanblog.com/post/8"><![CDATA[
این مطلب ربطی به اتولیسپ ندارد ولی به خاطر اینکه دوستان زیادی این سوال را پرسیده اند در اینجا پاسخ میدهم:<p>در صورت عدم اتصال به شبکه معمولاً این تاخیر رخ میدهد و برای رفع آن میتوانید از روش زیر استفاده نمائید:</p><p style="text-align: left;"><font class="msgAtxt" face="Arial, Helvetica" size="2">Start Internet 
Explorer and go to Tools &gt; Internet Options &gt; Advanced tab &gt; 
Settings &gt; Security. In this section, clear the <strong>Publisher's 
Certificate Revocation</strong> check box. Exit by OK.</font></p>]]></content>
    </entry>
    <entry>
        <title>ورود اطلاعات از فایل Xls,Csv,Txt به اتوکد و قابلیت اتصال نقاط با خط</title>
        <link rel="alternate" type="text/html" href="http://autolisp.mihanblog.com/post/9"/>
        <published>2010-01-12T20:12:18+01:00</published>
        <updated>2010-01-12T20:12:18+01:00</updated>
        <id>tag:http://autolisp.mihanblog.com/post/9</id>
        <author>
            <name>علیرضا عدالتی پور</name>
        </author>
        <summary>
برنامه importxyz.lsp را برایتان انتخاب کردم جهت ورود مختصات از فایلهای مختلف به داخل اتوکد بصورت بلوک ، نقطه یا خط. این برنامه با تغییرات لازم و بصورت vlx تقدیم میگردد. دوستان علاقمند source برنامه را در سایت مربوطه مطالعه نمایند.برای اجرا پس از appload کردن برنامه، فرمان IMP را اجرا نمائید.دانلود برنامه &amp;nbsp;&amp;nbsp; Importxyz.vlx&amp;nbsp;&amp;nbsp;&amp;nbsp; 21kb</summary>
        <content type="html" xml:base="http://autolisp.mihanblog.com/post/9"><![CDATA[
<p align="baseline">برنامه importxyz.lsp را برایتان انتخاب کردم جهت ورود مختصات از فایلهای مختلف به داخل اتوکد بصورت بلوک ، نقطه یا خط. این برنامه با تغییرات لازم و بصورت vlx تقدیم میگردد. دوستان علاقمند source برنامه را در سایت مربوطه مطالعه نمایند.برای اجرا پس از appload کردن برنامه، فرمان IMP را اجرا نمائید.</p><p style="text-align: center;"><img src="http://www.jefferypsanders.com/IMPORTXYZ03.JPG" style="width: 304px; height: 340px;"></p><p style="text-align: center;"><a href="http://www.opendrive.com/files/6412140_6LvIO/IMPORTXYZ.VLX" target="_blank"><strong>دانلود برنامه &nbsp;&nbsp; Importxyz.vlx&nbsp;&nbsp;&nbsp; 21kb</strong><strong><br></strong></a></p>]]></content>
    </entry>
    <entry>
        <title>Dynamic Align Text to Curve</title>
        <link rel="alternate" type="text/html" href="http://autolisp.mihanblog.com/post/10"/>
        <published>2010-01-10T23:53:18+01:00</published>
        <updated>2010-01-10T23:53:18+01:00</updated>
        <id>tag:http://autolisp.mihanblog.com/post/10</id>
        <author>
            <name>علیرضا عدالتی پور</name>
        </author>
        <summary>
برنامه ای را برایتان از&amp;nbsp; http://www.cadtutor.net&amp;nbsp; انتخاب کردم امیدوارم کاربردی باشد.  نحوه اجرا : درج فرمان DTCURVE ، انتخاب خط و نوشتن text دلخواه&amp;nbsp;Offset may be altered by pressing +/- during alignment.Text Perpendicularity can be toggled by pressing 'P'A Background Mask* can be toggled by pressing 'B'.Text can be Mirrored by pressing 'M'.Text Style/Height can be altered by pressing 'S'.دانلودDynamic Text Curve Align V2.7.ls 

</summary>
        <content type="html" xml:base="http://autolisp.mihanblog.com/post/10"><![CDATA[
<p align="baseline">برنامه ای را برایتان از&nbsp; http://www.cadtutor.net&nbsp; انتخاب کردم امیدوارم کاربردی باشد. </p><p style="text-align: right;"> نحوه اجرا : درج فرمان DTCURVE ، انتخاب خط و نوشتن text دلخواه&nbsp;</p><p style="text-align: center;"><img src="http://www.theswamp.org/screens/leemac/DTCurve2.gif" style="width: 515px; height: 161px;"></p><ul style="text-align: left;"><li><strong>Offset </strong>may be altered by pressing <strong>+/-</strong> during alignment.</li></ul><ul style="text-align: left;"><li>Text <strong>Perpendicularity</strong> can be toggled by pressing '<strong>P</strong>'</li></ul><ul style="text-align: left;"><li>A <strong>Background Mask</strong>* can be toggled by pressing '<strong>B</strong>'.</li></ul><ul style="text-align: left;"><li>Text can be <strong>Mirrored </strong>by pressing '<strong>M</strong>'.</li></ul><ul style="text-align: left;"><li>Text <strong>Style/Height</strong> can be altered by pressing '<strong>S</strong>'.</li></ul><div style="text-align: center;"><br><strong><a href="http://www.opendrive.com/files/6412148_2BrFr/Dynamic%20Text%20Curve%20Align%20V2.7.lsp" target="_blank">دانلودDynamic Text Curve Align V2.7.ls </a></strong>

</div>]]></content>
    </entry>
    <entry>
        <title>برنامه اتولیسپ - رفع به هم ریختگی هاشورها در اتوکد</title>
        <link rel="alternate" type="text/html" href="http://autolisp.mihanblog.com/post/14"/>
        <published>2010-01-07T01:55:18+01:00</published>
        <updated>2010-01-07T01:55:18+01:00</updated>
        <id>tag:http://autolisp.mihanblog.com/post/14</id>
        <author>
            <name>علیرضا عدالتی پور</name>
        </author>
        <summary>


در مواقعی که ترسیم در فاصله زیاد از مبدا انجام میگردد (مانند نقشه های utm شده) هاشورها دچار بهم ریختگی میشوند برنامه زیر با انتخاب و جدا کردن تمامی هاشورها از موضوعات انتخابی (فیلتر ssget ) مبدا آنها را تغییر داده (به کمک دستور hatchedit) و به هم ریختگی را رفع مینماید. دانلود Hatch-Origin.lsp
</summary>
        <content type="html" xml:base="http://autolisp.mihanblog.com/post/14"><![CDATA[


<p style="direction: rtl;" align="baseline">در مواقعی که ترسیم در فاصله زیاد از مبدا انجام میگردد (مانند نقشه های utm شده) هاشورها دچار بهم ریختگی میشوند برنامه زیر با انتخاب و جدا کردن تمامی هاشورها از موضوعات انتخابی (فیلتر ssget ) مبدا آنها را تغییر داده (به کمک دستور hatchedit) و به هم ریختگی را رفع مینماید. </p><p style="direction: rtl; text-align: center;"><img src="http://picturehosting.org/u/501/g4543psq.tr.jpg" width="326" height="164"></p><p style="text-align: center; direction: ltr;"><a href="http://autolisp.gigfa.com/attachment.php?aid=4" target="_blank" title="">دانلود Hatch-Origin.lsp</a></p>
]]></content>
    </entry>
    <entry>
        <title>زبان های برنامه نویسی در اتوکد (قسمت اول)</title>
        <link rel="alternate" type="text/html" href="http://autolisp.mihanblog.com/post/15"/>
        <published>2009-12-23T04:40:18+01:00</published>
        <updated>2009-12-23T04:40:18+01:00</updated>
        <id>tag:http://autolisp.mihanblog.com/post/15</id>
        <author>
            <name>علیرضا عدالتی پور</name>
        </author>
        <summary>
برنامه نویسی شاید یکی از بهترین ویژگیهای اتوکد است که به همین دلیل بوسیله بسیاری از کاربران انتخاب شده است . تقریبا تمام رابط های کاربر از اتوکد ، از جمله منوها ، نوار وضعیت ، خط فرمان ... را می توان سفارشی نمود. در این مقاله ، ما تنها با زبان های برنامه نویسی میپردازیم&amp;nbsp; که برای ساخت نقشه های پارامتریک استفاده می شود .</summary>
        <content type="html" xml:base="http://autolisp.mihanblog.com/post/15"><![CDATA[
<p style="text-align: justify;">برنامه نویسی شاید یکی از بهترین ویژگیهای اتوکد است که به همین دلیل بوسیله بسیاری از کاربران انتخاب شده است . تقریبا تمام رابط های کاربر از اتوکد ، از جمله منوها ، نوار وضعیت ، خط فرمان ... را می توان سفارشی نمود. در این مقاله ، ما تنها با زبان های برنامه نویسی میپردازیم&nbsp; که برای ساخت نقشه های پارامتریک استفاده می شود .</p>]]></content>
    </entry>
    <entry>
        <title>Useful AutoLISP functions</title>
        <link rel="alternate" type="text/html" href="http://autolisp.mihanblog.com/post/16"/>
        <published>2009-12-14T20:46:18+01:00</published>
        <updated>2009-12-14T20:46:18+01:00</updated>
        <id>tag:http://autolisp.mihanblog.com/post/16</id>
        <author>
            <name>علیرضا عدالتی پور</name>
        </author>
        <summary>


علیرغم تمام توانائیهائی که ویژوال لیسپ را بعنوان یک نرم افزار عالی در محیط اتوکد معرفی میکند کمبود توابع سیستمی و کاربردی را بعنوان یکی از نقاط ضعف آن ذکر میکنند.به همین دلیل جهت استفاده برنامه نویسان اتوکد توابع مفید وکاربردی را که در برنامه های مختلف استفاده میشود فعلاً بصورت کلی و در اینده بصورت دسته بندی شده در اختیار دوستان قرار میدهم</summary>
        <content type="html" xml:base="http://autolisp.mihanblog.com/post/16"><![CDATA[
<div style="text-align: justify; direction: rtl;">

علیرغم تمام توانائیهائی که ویژوال لیسپ را بعنوان یک نرم افزار عالی در محیط اتوکد معرفی میکند کمبود توابع سیستمی و کاربردی را بعنوان یکی از نقاط ضعف آن ذکر میکنند.به همین دلیل جهت استفاده برنامه نویسان اتوکد توابع مفید وکاربردی را که در برنامه های مختلف استفاده میشود فعلاً بصورت کلی و در اینده بصورت دسته بندی شده در اختیار دوستان قرار میدهم</div>]]></content>
    </entry>
    <entry>
        <title>آشنائی با برنامه acadinstall</title>
        <link rel="alternate" type="text/html" href="http://autolisp.mihanblog.com/post/17"/>
        <published>2009-12-07T19:03:18+01:00</published>
        <updated>2009-12-07T19:03:18+01:00</updated>
        <id>tag:http://autolisp.mihanblog.com/post/17</id>
        <author>
            <name>علیرضا عدالتی پور</name>
        </author>
        <summary>

برنامه acadinstall یک برنامه مفید برای کمک به کاربران و برنامه نویسان اتوکد جهت ساخت فایل نصب برای برنامه های کاربردیشان است. این برنامه را میتوان همرا ه با برنامه هائی همچون InstallShield , InnoSetup ,&amp;nbsp; express یا برنامه های دیگر ساخت برنامه setup بکار برد.
</summary>
        <content type="html" xml:base="http://autolisp.mihanblog.com/post/17"><![CDATA[

برنامه acadinstall یک برنامه مفید برای کمک به کاربران و برنامه نویسان اتوکد جهت ساخت فایل نصب برای برنامه های کاربردیشان است. این برنامه را میتوان همرا ه با برنامه هائی همچون <font size="-1">InstallShield ,<a href="http://www.jordanr.dhs.org/isinfo.htm" target="_blank"> </a></font><font size="-1"><a href="http://www.jordanr.dhs.org/isinfo.htm">InnoSetup</a> ,&nbsp; express یا برنامه های دیگر ساخت برنامه setup بکار برد.</font><br>
]]></content>
    </entry>
    <entry>
        <title>نحوه استفاده از برنامه های لیسپ در اتوکد</title>
        <link rel="alternate" type="text/html" href="http://autolisp.mihanblog.com/post/18"/>
        <published>2009-12-05T04:31:18+01:00</published>
        <updated>2009-12-05T04:31:18+01:00</updated>
        <id>tag:http://autolisp.mihanblog.com/post/18</id>
        <author>
            <name>علیرضا عدالتی پور</name>
        </author>
        <summary>
با استفاده از دستور appload میتوانید برنامه های اتولیسپ را جهت اجرای اتوماتیک در نقشه ها انتخاب نمائید


1-  نمایش برنامه های قابل بارگذاری در شاخه جاری
2- قالبهای قابل بارگذاری در اتوکد همچون fas,lsp,vlx,dvb,arx
3- برنامه های بارگذاری شده در حافظه
4- پنجره contents یا startup suite :
در این قسمت میتوانید برنامه هائی که میخواهید در هربار بازکردن اتوکد بطور
 اتوماتیک بارگذاری شوند را add نمائید.
هر چند اینکار را میتوانیدبا درج برنامه ها در فایل acad.lsp نیز انجام 
دهید ولی این روش است</summary>
        <content type="html" xml:base="http://autolisp.mihanblog.com/post/18"><![CDATA[
با استفاده از دستور appload میتوانید برنامه های اتولیسپ را جهت اجرای اتوماتیک در نقشه ها انتخاب نمائید<br><br><div style="text-align: center;">
<img src="http://picturehosting.org/u/501/g2us2dkn.8g.jpg" border="0"></div><p>
<br>
1-  نمایش برنامه های قابل بارگذاری در شاخه جاری<br>
2- قالبهای قابل بارگذاری در اتوکد همچون fas,lsp,vlx,dvb,arx<br>
3- برنامه های بارگذاری شده در حافظه<br>
4- پنجره contents یا startup suite :<br>
در این قسمت میتوانید برنامه هائی که میخواهید در هربار بازکردن اتوکد بطور
 اتوماتیک بارگذاری شوند را add نمائید.<br>
هر چند اینکار را میتوانیدبا درج برنامه ها در فایل acad.lsp نیز انجام 
دهید ولی این روش استانداردتر و راحت تر است.<br>
دقت کنیدبرنامه هائی که خوب طراحی نشده باشند متغیرهای اضافی به اتوکد
تحمیل میکنند که گاهاً باعث تداخل در برنامه های لیسپ مختلف شده و با عدم
اجرا شما را سر درگم میسازند. اگر برنامه لیسپ شما درست اجرا نشد برنامه
های مختلف را ابتدا حذف وسپس برنامه خود را بارگذاری نمائید.<br></p>]]></content>
    </entry>
    <entry>
        <title>نحوه اجرای برنامه های اتولیسپ در اتوکد</title>
        <link rel="alternate" type="text/html" href="http://autolisp.mihanblog.com/post/19"/>
        <published>2009-11-28T02:26:18+01:00</published>
        <updated>2009-11-28T02:26:18+01:00</updated>
        <id>tag:http://autolisp.mihanblog.com/post/19</id>
        <author>
            <name>علیرضا عدالتی پور</name>
        </author>
        <summary>
در بسیاری از برنامه های اتولیسپ از تابع defun به منظور ایجاد تابع (برای مثال C:Test) استفاده میشود . اینها توابعی هستند که پس از appload شدن میتوان آنها را با وار کردن نامشان در خط فرمان اتوکد&amp;nbsp; (:Command) همانند دستورات معمولی اتوکد احضار کرد.به عنوان مثال برنامه زیر دستور Selst را به اتوکد اضافه میکند که با 
انتخاب یک نوشته style آنرا به style جاری تبدیل میکند.

(defun C:SELST (/ CE STY)
&amp;nbsp; (setq CE (getvar &quot;CMDECHO&quot;))
&amp;nbsp; (setvar &quot;CMDECHO&quot; 0)
&amp;nbsp; (setq&amp;nbsp;&amp;nbsp;&amp;nbsp; </summary>
        <content type="html" xml:base="http://autolisp.mihanblog.com/post/19"><![CDATA[
در بسیاری از برنامه های اتولیسپ از تابع <strong>defun </strong>به منظور ایجاد تابع (برای مثال <strong>C:Test</strong>) استفاده میشود . اینها توابعی هستند که پس از appload شدن میتوان آنها را با وار کردن نامشان در خط فرمان اتوکد&nbsp; (:Command) همانند دستورات معمولی اتوکد احضار کرد.<br><p>به عنوان مثال برنامه زیر دستور Selst را به اتوکد اضافه میکند که با 
انتخاب یک نوشته style آنرا به style جاری تبدیل میکند.</p>
<div style="text-align: right;">
<div style="text-align: left; direction: ltr;"><span style="font-weight: bold;">(defun C:SELST (/ CE STY)</span><br>
<span style="font-weight: bold;">&nbsp; (setq CE (getvar "CMDECHO"))</span><br>
<span style="font-weight: bold;">&nbsp; (setvar "CMDECHO" 0)</span><br>
<span style="font-weight: bold;">&nbsp; (setq&nbsp;&nbsp;&nbsp; STY&nbsp; (cdr (assoc&nbsp; 7 (entget 
(car(entsel</span><br>
<span style="font-weight: bold;">&nbsp;&nbsp;&nbsp; "Select text string with desired 
text style..."))))))</span><br>
<span style="font-weight: bold;">&nbsp; (setvar "Textstyle" sty)</span><br>
<span style="font-weight: bold;">&nbsp; (setvar "CMDECHO" CE)</span><br>
<span style="font-weight: bold;">&nbsp; (alert (strcat "\n" STY " is now the 
current text style."))</span><br>
<span style="font-weight: bold;">&nbsp; (princ)<br>
</span><span style="font-weight: bold;">)</span><br>
</div>
</div>
<br>
<p>در صورتیکه در تابع <strong>defun</strong> از&nbsp; <strong>:c</strong>
استفاده نشود به تابع تولید شده تابع مستقل یا routine میگوئیم. برای
احضار برنامه های مستقل در اتوکد باید نام آنها را در داخل پرانتز قرار
میدهیم. <br>
</p>
مثلاً اگر فرمان (((entget(car(entsel) را در پای command تایپ کنید با 
انتخاب یک موضوع مشخصات آنرا نمایش میدهد.<br>]]></content>
    </entry>
    <entry>
        <title>برنامه بزبان vb (ترسیم گلباد wind-rose)</title>
        <link rel="alternate" type="text/html" href="http://autolisp.mihanblog.com/post/20"/>
        <published>2009-11-23T05:37:18+01:00</published>
        <updated>2009-11-23T05:37:18+01:00</updated>
        <id>tag:http://autolisp.mihanblog.com/post/20</id>
        <author>
            <name>علیرضا عدالتی پور</name>
        </author>
        <summary>هر چند این برنامه بزبان vb است ولی هم برنامه خوبی برای کاربران اتوکد
وهم تمرین خوبی در زمینه vb (یاVba که این برنامه ابتدا با آن نوشته و در
vb6 بازنویسی شده است) میباشد. فکر نمی کنم توضیح زیادی لازم باشد. برای
آشنائی با برنامه یک نمونه بصورت sample در آن قرار داده ام.دانلود windrose.zip

		</summary>
        <content type="html" xml:base="http://autolisp.mihanblog.com/post/20"><![CDATA[هر چند این برنامه بزبان vb است ولی هم برنامه خوبی برای کاربران اتوکد
وهم تمرین خوبی در زمینه vb (یاVba که این برنامه ابتدا با آن نوشته و در
vb6 بازنویسی شده است) میباشد. فکر نمی کنم توضیح زیادی لازم باشد. برای
آشنائی با برنامه یک نمونه بصورت sample در آن قرار داده ام.<div class="cnt"><p style="text-align: center;"><img style="width: 326px; height: 194px;" src="http://picturehosting.org/u/501/g2cadsg7.2t.jpg"></p><div style="text-align: center;"><a href="http://www.opendrive.com/files/6412573_ZOmda_77b1/WIND-ROSE.zip" target="_blank"><strong>دانلود windrose.zip</strong></a></div>
</div>
		]]></content>
    </entry>
</feed>

