AutoCAD وAutoLISP للمساحين: دليل وكود مثال
دليل عربي لفوائد AutoCAD في المساحة، وإزاي AutoLISP بيوفر الشغل المتكرر، مع كود مثال وجديد AutoCAD 2027.
🧭 ليه AutoCAD لسه أساسي في المساحة؟
AutoCAD هو لغة الرسم المشتركة بين المساحين والمهندسين والمقاولين. ملف الـ DWG بيتبادل بين الكل، فمهما اشتغلت بأجهزة وبرامج تانية، غالبًا هتحتاج تسلّم أو تستلم رسمة DWG.
🎯 فوائده للمساحة
رسم الخرائط والمناسيب والحدود وإخراج لوحات طباعة.
إحداثيات (COGO) وOsnap وUCS لرسم دقيق وتحويل بين أنظمة.
DWG وDXF هم الصيغ الأشهر بين المساحين والتصميم.
AutoLISP وScripts تختصر شغل متكرر زي ترقيم النقاط وتصدير الإحداثيات.
استيراد نقاط من CSV/TXT، وتصدير إحداثيات من الرسم.
Xref لربط خرايط ورفع كتير في رسمة واحدة.
🧩 إيه هو AutoLISP ولماذا يهم المساحين؟
AutoLISP لغة بتوسّع AutoCAD وبتنفذ أوامره. المساحين بيستخدموها في شغل متكرر: ترقيم نقاط، كتابة مناسيب كنصوص، حساب مساحات وأطوال وطباعتها في جدول، ربط نقاط بخطوط، تصدير جداول إحداثيات. الكود بيتكتب في ملف نصي بامتداد .lsp.
📥 إزاي تحمّل ملف LISP؟
- احفظ الكود في ملف نصي بامتداد .lsp (مثلاً من Notepad++ أو محرر Visual LISP).
- حمّله بسحب الملف على الرسمة، أو أمر APPLOAD.
- لو عايزه يتحمل كل مرة، أضفه في Startup Suite داخل APPLOAD.
- اكتب اسم الأمر (مثلاً PTCSV) في سطر الأوامر.
- لو ظهر تحذير أمان، أضف فولدر الملف لـ Trusted Locations بس لو متأكد من الكود.
💻 كود مثال: تصدير نقاط الرسمة إلى CSV
الكود ده مثال تعليمي بسيط (مكتوب خصيصًا للمقال): بيجيب كل عناصر POINT اللي تختارها ويحفظ رقمها وإحداثياتها E وN وZ في ملف CSV.
(defun c:PTCSV ( / ss n ent pt f fname)
;; Export selected POINT entities to a CSV file: P,E,N,Z
(setq ss (ssget '((0 . "POINT"))))
(if ss
(progn
(setq fname (getfiled "Save CSV" "points" "csv" 1))
(if fname
(progn
(setq f (open fname "w") n 0)
(write-line "P,E,N,Z" f)
(repeat (sslength ss)
(setq ent (entget (ssname ss n))
pt (cdr (assoc 10 ent))
n (1+ n))
(write-line
(strcat (itoa n) ","
(rtos (car pt) 2 3) ","
(rtos (cadr pt) 2 3) ","
(rtos (caddr pt) 2 3))
f))
(close f)
(princ (strcat "\nExported " (itoa n) " points."))))))
(princ))- انسخ الكود في ملف باسم
ptcsv.lspوحمّله بـ APPLOAD. - اكتب
PTCSVفي سطر الأوامر. - اختار النقاط (POINT) من الرسمة واضغط Enter.
- حدد مكان حفظ ملف الـ CSV.
🪶 وAutoCAD LT؟
✅ LISP على LT مناسب لما…
- بتستخدم LT وعايز LISP بسيط (من 2024).
- الكود بيستخدم أوامر ودوال أساسية.
- بتحمّل ملفات .lsp بالسحب أو APPLOAD.
- بتكتب الكود في محرر نصوص عادي.
⛔ الأفضل AutoCAD كامل لما…
- محتاج محرر Visual LISP أو debugger في LT.
- الكود بيتصل ببرامج خارجية زي Excel.
- الكود بيعتمد على ميزات 3D أو constraints مش موجودة في LT.
- عايز تشغل ملفات VLX/FAS مش مفتوحة المصدر.
🆕 جديد AutoCAD 2027
تقنية تجريبية تفحص الرسمة مقابل معايير CAD الخاصة بمؤسستك.
تخزين DWG سحابي وإصدارات وصلاحيات ومشاكل وعرض وماركب، ومضمّن مع الاشتراك المنفرد.
أكتر من مستخدم يعدّل نفس الـ DWG بتحديد الجزء المطلوب ودمجه.
اقتراح إصلاح الـ Xref لما الملفات تتنقل أو يتغير اسمها.
كشف الفجوات والتجاوزات وزوايا غير منتظمة واقتراح إصلاحات.
دعم أوسع لـ GSF وأنماط عرض واقعية.
🗺️ Map 3D toolset
AutoCAD الكامل بيشمل Map 3D toolset: ربط CAD ببيانات GIS، قراءة قواعد بيانات (Oracle وPostgreSQL وSQL Server)، أدوات COGO، وتحويل بين DWG وصيغ GIS. مفيد لو شغلك بين المساحة والـ GIS.
⚠️ أخطاء شائعة مع بيانات الرفع
✅ الأفضل…
- حدد نظام الإحداثيات والوحدات في أول المشروع.
- احتفظ بنسخة من الملف الأصلي قبل أي كود أو تعديل.
- راجع النقاط على نقاط كنترول معروفة بعد الاستيراد.
- سجّل مصدر البيانات وتاريخ الرفع.
⛔ بلاش…
- تخلط وحدات (متر وقدم) أو أنظمة إحداثيات بدون تحويل.
- تحرّك أو تعدّل نقاط الكنترول الأصلية.
- تشتغل على الرسمة الأصلية بدل نسخة.
- تعتمد على شكل الرسم كدليل على صحة الإحداثيات.
🔗 المصادر والروابط الرسمية
🙋 أسئلة شائعة
❓ إيه هو AutoLISP؟
لغة برمجة بتوسّع وتخصّص AutoCAD وبتنفذ أوامره. بتكتب الكود في ملف نصي بامتداد .lsp وتحمّله في البرنامج.
❓ إزاي أحمّل ملف LISP؟
تقدر تسحب الملف على الرسمة، أو بأمر APPLOAD، أو تضيفه في Startup Suite عشان يتحمل تلقائي. الدوال اللي بتكتبها في سطر الأوامر بتضيع لما تقفل، فاحفظها في ملف .lsp.
❓ AutoCAD LT بيدعم LISP؟
أيوه من إصدار 2024، لكن من غير محرر Visual LISP ولا الربط مع برامج خارجية زي Excel. وملف التحميل التلقائي بيتسمى acadLTdoc.lsp بدل ACADDOC.lsp.
❓ هل الكود ده آمن؟
الكود المنقول من النت لازم تقرأه وتجربه على نسخة من الرسمة. الدوال بتشتغل بصلاحياتك على ملفاتك.
❓ إمتى أروح لـ Civil 3D بدل AutoCAD؟
لما محتاج سطوح وكنتور ومحاور وطرق وقواعد بيانات رفع مساحي. شوف مقال Civil 3D في السلسلة.
➡️ مقالات ذات صلة
اسأل عن أي جهاز، شارك تجربتك الميدانية، وشوف مشاريع حقيقية مع مجتمع المساحة العربي.
انضم مجانًا