AutoLISP เป็นเครื่องมือช่วยในการเขียนแบบด้วย AutoCAD ให้รวดเร็วยิ่งขึ้นช่วยประหยัดเวลาในการทำงาน ลดขั้นตอนในการเรียกใช้คำสั่ง ... และอื่นๆอีกมากมาย
วันอาทิตย์ที่ 28 พฤษภาคม พ.ศ. 2566
วันเสาร์ที่ 20 พฤษภาคม พ.ศ. 2566
Area of Cross Section
วันพฤหัสบดีที่ 4 พฤษภาคม พ.ศ. 2566
Draft Scale Divide and Dimensions
Draft Scale Divide and Dimensions.
วันอังคารที่ 25 เมษายน พ.ศ. 2566
Manual Geographic to UTM Coordinate Converter
Geographic to UTM Coordinate Converter
ในโปรแกรมเรามีทั้งหมด
5 ส่วนด้วยกันดังนี้
1. File Lat Long
2. File UTM
3. Save to .CSV File
4. Zone Hemisphere N or S
5. Drawing XY or NE
1. File Lat Long
เมื่อเรากดปุ่ม
File Lat
Long จะมีไดอะรอค ให้เราทำการเลือกไฟล์ Lat Long Excel .CSV
ส่วนไฟล์
Excel .CSV ก็จะมีค่าจำนวน 2 เซล คือเซล
A = Latitude Decimal Degrees. เส้นรุ้งซึ่งมีหน่วยเป็นองศา
B = Longitude Decimal Degrees. เส้นแวงซึ่งมีหน่วยเป็นองศา
เมื่อเรานำเข้าไฟล์
Lat Long Excel
.CSV แล้วในโปรแกรมของเราทางด้านซ้ายมือ คือค่า Latitude และ Longitude ที่มีหน่วยเป็นองศา
ที่เราต้องการจะแปลงให้เป็น UTM Datum WGS84 ซึ่งค่าที่ได้ออกมาจะอยู่ทางด้านขวามือคือ
UTM WGS84 East(X) North(Y)
ในส่วนนี้เราสามารถ วาดภาพจากค่า Coordinate UTM WGS84 ที่เราได้แปลงมาแล้วได้ด้วยข้อ
5.Draw. XY or NE โดยทำการติ้ก / ในช่อง Draw แล้วเลือก Coordinate เป็น XY หรือ NE แล้วกด OK ดำเนินการ ส่วนช่อง FLOC คือการหาตำแหน่งที่ Drawing ในแผนที่ Google Map.
2. File UTM ในการแปลง UTM WGS84 เป็น Latitude และ Longitude ให้เรากำหนดค่าในส่วนที่ 4. Zone Hemisphere N or S ที่ต้องการและเลือกค่า ซีกโลก hemisphere เป็น N (North) หรือ S (South)
เมื่อเรากดปุ่ม
File UTM จะมีไดอะรอค ให้เราทำการเลือกไฟล์ UTM WGS84 Excel .CSV
ส่วนไฟล์
Excel .CSV ก็จะมีค่าจำนวน 2 เซล คือเซล
A = Easting (X)
B = Northing (Y)
วันพุธที่ 12 เมษายน พ.ศ. 2566
Sheet Metal Tools bar
วันศุกร์ที่ 7 เมษายน พ.ศ. 2566
How to Setting Survey Tools bar
วันพุธที่ 11 มกราคม พ.ศ. 2566
All Blocks
All Blocks
วันอาทิตย์ที่ 8 มกราคม พ.ศ. 2566
Grid Table and North&East
Grid Table and North&East
วันศุกร์ที่ 25 พฤศจิกายน พ.ศ. 2565
Manual PTC_fb.VLX
1. Select
B.S. name : เลือกชื่อตำแหน่ง B.S.
1.1 Pick Point B.S. หลัง เลือกตำแหน่ง
B.S.
2. Select
I.S. name : เลือกชื่อตำแหน่ง B.S.
2.1 Pick
Point I.S. ตั้งกล้อง เลือกตำแหน่ง I.S.
*** หัวข้อที่ 3
จะทำวนไปจนครบจำนวนหมุดที่ต้องการ
3. Select
point name (ชื่อหมุด) : เลือกชื่อหมุด
3.1 Pick
Next Point : เลือกหมุด
3.2 Pick
Text Point : วางข้อความ ค่ามุมและระยะห่าง
เมื่อทำการวนจนครบตามจำนวนหมุดที่ต้องการแล้ว กด Enter เพื่อจบการทำงาน โปรแกรมก็จะส่งข้อมูลไปยังโปรแกรม EXCEL จะเด้งขึ้นมา เมื่อเราต้องการเริ่มบันทึกรอบวงใหม่ให้เลื่อนเซลเริ่มต้นลงมายังเซลที่ว่างเช่นจาก
A1 ไปยัง A6
การเรียกใช้งาน
เมื่อเราทำการโหลดโปรแกรม
PTC_fb.VLX
แล้วให้เรียกใช้คำสั่ง PTC เพื่อเริ่มต้นโปรแกรม
วันพฤหัสบดีที่ 20 ตุลาคม พ.ศ. 2565
Dimensions Sum
;|
Dimensions Sum #AutoCAD #CADTHAI
- Selected Dimensions
- Enter and pick to text sum.
|;
(defun
c:sumdim (/ sum ss n dim mea ddata prec)
(setq old_cmdecho (getvar "cmdecho"))
(setvar "CMDECHO" 0)
(setq sum 0.0)
(prompt "\nAdd values of
Dimensions")
(if (setq ss (ssget '((0 .
"DIMENSION"))))
(progn
(repeat (setq n (sslength ss))
(setq dim (ssname ss
(setq n (1- n))))
(setq mea (cdr (assoc 42
(setq ddata (entget dim)))))
(setq prec (getvar
"DIMDEC")
sum (+ sum mea)
)
)
(setq p1 (getpoint
"\nPick point to Text Sum. :"))
(command "text"
"j" "mc" p1 (getvar "textsize") "0"
(rtos sum (getvar 'lunits) prec))
(prompt(strcat "\nSum of
distances = " (rtos sum (getvar 'lunits) prec)))
)
(prompt "\nNo Dimensions
selected.")
)
(setvar
"CMDECHO" old_cmdecho)
(princ)
)



















