Header Ads

AUTOLISP مدخل الى عالم أوتوليسب


تعريف: ما هي لغة AUTOLISP: 
هي إحدى لغات البرمجة التي طورها جون ماكارثي ما بين 1959- 1960 والتي تستخدم بشكل أساسي في معالجة لوائح البيانات. ويبرز استخدامها بشكل كبير في أبحاث الذكاء الاصطناعي. وهي لغة البرمجة الخاصة بشركة Autodesk ضمن بيئة أوتوكاد.
تأتي كلمة اوتوليسب AUTO LISP  كجزئين مكونين لها هما أوتو AUTO LISP من شركة أوتودسك العريقة وليسب AUTO LISP ككلمة مشتقة من اختصارات بداية الحروف للجملة التالية   LISt Programming or LISt Processing كما يقال لهذه اللغة أنها اختصار لجملة قائمة المعالج LISt Processor
وأجمل ما في هذا السياق تعريفها تهكمياً لكثرة أقواسها بأنها لغة لن تفقد معناها مع الأقواس الغبية not Lost IStupid Parentheses!.
مزايا أوتوليسب:
1.  تنفيذ الحِسابات المتقدمة.
2. التعامل مع قاعدة بيانات الرسم من ملفات أوتوكاد لإنشاء وقراءة الملفات.
3. لغة سهلة التعلم.
4.  يمكن اختبار وظائف أوتوليسب في نافذة الأوامر في أوتوكاد.
5. تتوفر مجموعة كبيرة من برامج أوتوليسب مجاناً من عدة مصادر.
6. تتوفر العديد من المصادر لتعليم أوتوليسب.

كيف تستفيد من أوتوليسب؟
يمكنك تطويع أوامر أوتوكاد كيفما تريد.
يمكنك تعديل أوامر أوتوكاد كيفما تريد.
يمكنك عمل قائمة خاصة بك وتضع بها أوامر محددة.
يمكنك عمل اختصارات لبعض أو كل أوامر أوتوكاد كيفما تريد.
استعملت شركة اوتوديسك هذه اللغة في كتابة جميع أوامر أوتوكاد.
 للتوضيح اذهب الي المجلد التالي 
C:Program FilesAutodeskAcadm 2006Support
 حيث ستجد هناك أكثر من ملف ذو لاحقة *.lsp. هذه الملفات مكتوبة بلغة أوتوليسب. يمكنك بسهولة إيجاد الملف acad.lsp والذي به جميع أوامر أوتوكاد وقوائمه .يمكنك بسهولة تعديل بعض الأوامر أو شطبها وحتى إضافة أوامر جديدة. هذا الملف acad.lsp  هو الذي يلقمه أوتوكاد عند فتحه، وضمنه تنفذ جميع أوامر أوتوكاد.

قواعد أوتوليسب
1.      لا تفرق لغة أوتوليسب بين الحروف الكبيرة والصغيرة.
2.      تكتب لغة أوتوليسب ضمن أقواس. ويكون عدد الاقواس على اليمين مساوياً  لعدد الاقواس على اليسار.
3.      يتم كتابة القوس أولاً ثم الداله الوظيفية ثانياً.
4.      المتغير يمكن ان يكون اي حرف او رقم ما عدا الرموز التالية- () '  ;  "  .
5.      يجب ان تكون هناك مسافة بين كل عناصر الدالة والمتغير.
6.      عند إضافة تعليق نكتب قبله علامة; . 

كيف ينفذ أمر أوتوكاد في لغة أوتوليسب
نأخذ مثلاً كيف نرسم خطاً مستقيماً بين النقطتين (0,0) و (200,100). لتنفيذ هذا الأمر بشكل عادي في أوتوكاد نكتب الأمر رسم خط line ضمن سطر الأوامر وفقاً للتسلسل التالي:
¿ Command:Line
¿ LINE Specify first point: 0,0
¿ Specify next point or [Undo]: 200,10
لإنهاء الأمر    ¿ :[Specify next point or [Undo

ينفذ الأمر السابق أي رسم الخط ضمن بيئة لغة أوتوليسب كما يلي:
نفتح ضمن سطر الأوامر قوساً، نكتب مباشرة التعبير command ونلحقه بعلامة الاقتباس " كبداية لتنفيذ أمر أوتوكادي
"command)
نضيف كتابة خط line ثم علامة الاقتباس
"command"line) 
نضيف كتابة علامة اقتباس جديدة ونحدد احداثيات نقطة البداية 0,0  ثم علامة اقتباس أخرى 
"command"line""0,0) 
نضيف علامة اقتباس جديدة ونحدد احداثيات نقطة النهاية 200,100 ثم علامة اقتباس أخرى
"command"line""0,0""200,100)
نضيف علامة اقتباس كنهاية الاحداثيات

""command"line""0,0""200,100)
نضيف علامة اقتباس أخيرة كنهاية الأمر command
"""command"line""0,0""200,100)
 نغلق علاقة الأوتوليسب بقوسٍ، ليعني انتهاء تنفيذ رسم الخط

خلاصة:  يتحدد الأمر وتنفيذه بعلامة الاقتباس المزدوجة ". كما تتحدد إحداثيات النقطة بفراغ وقوسين. 
للموضوع بقية تابعونا