কিভাবে গ্রিড তুল্য তৈরি করতে

বক্তৃতা ব্ল্যাক সেখানে বেশ কয়েকটি লেগ রয়েছে যে আমি লিপ্পিটি বুঝতে চাই না, প্রোগ্রামটি গ্রেড জেনারেটের আগেই ডাউনলোড করা আছে? আপনি আমাকে পছন্দ করবেন ... আপনাকে ধন্যবাদ

হ্যালো, আপনি কীভাবে তা ব্যাখ্যা করতে পারেন? আমি ওর সাথে লোড করার চেষ্টা করেছি কিন্তু আমি এটা পাই না, কেউ আমাকে এটা ব্যাখ্যা করতে পারে? আমি এটি কৃতজ্ঞ, আমি সত্যিই আমার কাজের জন্য এটি প্রয়োজন
গ্রেসিয়া এবং সালুদস

অটোক্যাডে গ্রিডটি একটি লিস্প রুটিন দিয়ে সম্পন্ন করা হয়, আমি এটি 10 বছর আগে ব্যবহার করেছি

এখানে এটি:

(ডিফল্ট স্ট্রিপ্টো (এএ / লং)
(setq দীর্ঘ (strlen aa))
(cond ((= x minx))
(setq l (append l (তালিকা x)))
)
(সেটাক তালিকা (সিডিআর তালিকা))
)
(তালিকা (মিনিট (কার এল) (ক্যাডার এল)) (সর্বোচ্চ (কার এল) (ক্যাডার এল)))
)

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;
;;
;; পার্থক্য এক্স সমন্বয় দেওয়া
;;
(ডিফন ক্যালক্লু (abcx)
(যদি (= 0.0 খ); কোন ছেদ আছে
শূন্য
(/ (- সি (* কুঠির)) খ)
)
)

(ডিফুন ইনটারেকেকি (/ l তালিকা)
(সেটেক এল ()
তালিকা (তালিকা (গণনা করুন A1XXXXXXXXXXXXXXXXXXXXXXXX)
(ক্যালক্লু এক্সএক্সএক্সএক্সএক্সএক্সএক্সএক্সএক্সএক্সএক্সএক্সএইচএইচএইচ.এন.এফ.
)
)
(যখন (/ = তালিকা নিল)
(সেটাক এবং (গাড়ী তালিকা))
(যদি (এবং (/ = এবং নিল) (= এবং MINY))
(setq l (append l (তালিকা y)))
)
(সেটাক তালিকা (সিডিআর তালিকা))
)
(তালিকা (মিনিট (কার এল) (ক্যাডার এল)) (সর্বোচ্চ (কার এল) (ক্যাডার এল)))
)

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;
;;
;; প্রধান প্রোগ্রাম
;;
(ডিফিউন সি: ক্যাদ্রি
আলফা startX starty মিনি এক্স miny maxx maxy)
(সেটভার "সিএমরাইট" 0)
(কমান্ড "লেয়ার" "এম" "গ্রিড" "সি" "8" "")))
(setq p1 (getpoint “\nএকটি অঞ্চলের শীর্ষস্থান লিখুন”)
p2 (পয়েন্ট p1 “\nঅন্য শীর্ষবিন্দুতে প্রবেশ করুন”)
)
(কমান্ড "লাইন" p1 p2 "")
(যদি (> (ক্যাডার পি 1) (ক্যাডার পি 2)); সর্বদা পি 1 নীচে
(সেটাক পক্স পিএক্সএক্সএক্সএক্সএক্সএক্সএক্সএক্সএক্সএক্সএক্সএক্সএক্সএক্সএক্সএক্সএক্সএক্সএক্সএক্সএক্সএক্সএক্সএফএক্স)
)
(setq p3 (getpoint p1 “\nঅঞ্চলের প্রস্থের জন্য পয়েন্ট লিখুন”)
l (দূরত্ব p1 p3); প্যাকএক্সএক্সএক্সএক্সএক্সএক্সএক্সএক্সএক্সএক্সপিএল
আলফা (কোণ P1 P2); একটি দূরত্ব এ pxNUMX এবং p1
আলফা (+ (/ পিআই 2) আলফা)
)
(যদি (> (গাড়ি পি 3) (গাড়ি পি 1))
(সেটাক আলফা (+ পাই আলফা))
)
(যদি (= (গাড়ী P1) (গাড়ী P3))
(যদি ((- সর্বাধিক শুরু) (* 2 উচ্চ))
(কমান্ড "TEXT" (তালিকা (+ x1 dl) (+ startY dh)) উচ্চ 0 coordY)
(কমান্ড "TEXT" "R" (তালিকা (- x2 dl) (+ startY dh)) উচ্চ 0 coordY)
)
)
(setq startY (+ starty incy))
)
(যখন ((- startx minx) (* 2 উচ্চ))
(কমান্ড "TEXT" (তালিকা (- startX dh) (+ y1 dl)) উচ্চ 100 coordX)
(কমান্ড "TEXT" "R" (তালিকা (- startX dh) (- y2 dl)) উচ্চ 100 coordX)
)
)
(setq startX (+ startx incx))
)
(যদি (> (দূরত্ব পি 1 পি 3) (দূরত্ব পি 1 পি 2))
(সেটাক আলফা এঙ্গপক্স NUMXXXXX)
(সেটাক আলফা এঙ্গপক্স NUMXXXXX)
)
(যদি (বা (/ = আলফা পিআই) (/ = আলফা 0.0))
(সেটাক আলফারাদ (* -1 আলফা)
আলফা (* -1 (/ (* 180 আলফা) pi))
p4 (তালিকা (- (* (গাড়ী পিএক্সএইচএনএক্স) (cos alfarad)) (* (cadr p4) (আলফারাদ ছাড়াই)))
(+ (* (পিএক্সএইচএএনএক্সএক্স) (আলফারাদ ছাড়া) (* (ক্যাডার পিক্সেক্সএক্সএক্সএক্সএক্সএক্স) (কোস আলফারাদ)))
)
p1 (তালিকা (- (* (গাড়ী পিএক্সএইচএনএক্স) (cos alfarad)) (* (cadr p1) (আলফারাদ ছাড়াই)))
(+ (* (পিএক্সএইচএএনএক্সএক্স) (আলফারাদ ছাড়া) (* (ক্যাডার পিক্সেক্সএক্সএক্সএক্সএক্সএক্স) (কোস আলফারাদ)))
)
বেস (তালিকা 0.0 0.0); মূল
)
)
)

যাইহোক যাই হোক না কেন ধন্যবাদ

সত্য যে আমিও আতঙ্কিত হয়েছে, এই ম্যাপ সঙ্গে করা যেতে পারে?

অটোক্যাড সিভিল 3D না দিয়ে, কারণ প্রোগ্রামটি প্রজেকশন সিস্টেম পরিচালনা করে। কিন্তু হ্যাঁ অটোক্যাড ম্যাপ 3D সঙ্গে আপনি কিছু অনুরূপ করতে পারেন।

এটি অটোক্যাড 3 এর সিভিল 2009D দিয়ে করা যেতে পারে, আমি অনুমান করি কারণ এটি এমনকি Google Earth- এ সংযোগ করার অনুমতি দেয়, তাই এটি অনুমান সমর্থন করতে অনুমিত হয়।