coretan tentang autocad dan excel

April 28, 2009

[CAD-CIV-03]: Surface dari Object Text

Filed under: Civil3D, Tukang Ukur — cadex @ 12:01
Referensi :
Platform : Civil 3D
Lokasi File : download autolisp

Studi Kasus:

Diterima gambar hasil pengukuran bathymetri (kedalaman) berupa file autocad. Angka kedalaman ditulis di autocad dalam bentuk object TEXT dalam satuan dm (decimeter).

Angka yang dimulai dengan tanda “+” adalah elevasi di atas MSL (Mean Sea Level) sedangkan yang tidak ada tandanya berada di bawah MSL.

image

Memodifikasi Object TEXT

Untuk keperluan design dan pembentukan surface di Civil 3D, angka kedalaman di bawah MSL dinyatakan dengan angka negatif, sedangkan untuk yang di atas MSL dinyatakan dalam angka TANPA tanda positif.

Pada command prompt autocad ketik ‘LIST’ kemudian pilih salah satu angka kedalaman:

image

dari hasil list object di atas, terlihat bahwa angka kedalaman ditulis di dalam bentuk object TEXT. Sedangkan untuk koordinat Z=-15.

Koordinat Z ini akan dibuat sama dengan tulisan di object TEXT dengan menghilangkan tanda “+”, sehingga hasil koordinat Z=12.

Program Autolisp di bawah ini bisa dipakai untuk melakukan hal tersebut:

(prompt “ketik ttg disusul <enter>”)
(defun c:ttg()
(setq sset (ssget ‘((0 . “TEXT”))));memilih object Text
(setq Len (sslength sset))
(setq i 0)
(while (<= i Len);looping object text yang terpilih
(setq Nama (ssname sset i))
(setq Elemen (entget Nama))
(setq listKoord (assoc 10 Elemen))
(setq X (nth 1 listKoord) Y (nth 2 listKoord))
(setq Textnya (cdr(assoc 1 Elemen)));mengambil nilai text
;merubah text menjadi angka, text yang bertanda + dihilangkan,
;yang tidak bertanda diberi tanda -
(setq elev (atof (if (= (substr Textnya 1 1) “+”) (substr Textnya 2 2) (strcat “-” Textnya))))
(setq newList (list x y elev))
(setq Elemen (subst (cons 10 newList) (assoc 10 Elemen) Elemen))
(entmod Elemen)
(setq i (+ i 1))
)
)

Setelah program dijalankan, cek lagi list object text, seperti cara di atas.

Hasilnya adalah:

image

Sekarang harga koordinat Z telah sesuai dengan isi dari object TEXT.

Membuat Surface

  1. Pilih Tab ‘Prospector’ dari Toolspace Civil 3D
  2. Click kanan ‘Surfaces’, kemudian pilih ‘Create Surface’
  3. Click ‘OK’ untuk setting default Surface
  4. Di bawah folder surface yang telah dibuat, pilih ‘Definition’
  5. Click kanan ‘Drawings Objects’, kemudian pilih ‘Add’
  6. Pilih Object Type ‘Text’, kemudian click OK
  7. Pilih Object Text yang berisi informasi elevasi
  8. Rebuild Surface
  9. Surface akan ditampilkan sesuai dengan surface style yang aktif

image

[CAD-CIV-02]: Perhitungan Polygon di Civil 3D

Filed under: Civil3D, Tukang Ukur — cadex @ 07:43
Referensi :
Platform : Civil 3D
Lokasi File : download

 

Hasil pengukuran poligon:

JalurPolygon

Urutan perhitungan poligon menggunakan fasilitas ‘Survey Command Line’ kemudian disimpan sebagai ‘Field Book’.

Tahapan perhitungan adalah :

1. Membuat Field Book

2. Setting Survey Database

3. Membuat Network

4. Import Field Book

5. Membuat Jalur Poligon

6. Check Poligon

7. Edit Input Least Square

8. Running Least Square

9. Gambar Titik ke Civil 3D

1. Membuat Field Book

Jalankan Notepad, ketik Survey Command Line (hanya kolom ke-dua) di Notepad:

Keterangan Survey Command Line
Setting Unit Jarak dalam meter dan  Sudut dalam DMS UNITS METER DMS
Input Koordinat Titik Kontrol NE 1 821932.766 234608.27 BM.1
NE 2 821801.717 234677.687 BM.2
NE 5 821926.984 234954.388 BM.5
NE 6 822010.817 234847.371 BM.6
Aktifkan LOOP#1 TRAV ON
Set Station STA 2
Set Back Sight BS 1
Titik Poligon berikutnya pada LOOP#1 AD 3 81.0318 106.032 POL.1
AD 4 239.4039 119.245 POL.2
AD 5 104.2318 135.51 BM.5
AD 6 90.5146  BM.6
Menutup LOOP#1 TRAV OFF
Aktifkan LOOP#2 TRAV ON
Set Station STA 2
Set Backsight BS 1
Titik Poligon berikutnya pada LOOP#2 AD 21 178.3738 94.241 POL.3
AD 22 147.3547 112.907 POL.4
AD 23 117.4510 97.666 POL.5
AD 24 177.4519 134.966 POL.6
AD 5 101.190 139.799 BM.5
AD 6 152.568  BM.6
Menutup LOOP#2 TRAV OFF

simpan file dengan extensi *.fbk, misal ‘JalurPoligon.fbk’

2. Setting Survey Database di Civil 3D

2.1. Jalankan Civil 3D, kemudian set ke satuan metric dengan memilih template drawing metric.
2.2. Pilih tab ‘Survey’ pada toolspace Civil 3D
2.3. Click kanan ‘Survey Databases’
2.4. Pilih ‘New local survey databases..’
2.5. Masukkan nama database ‘SurveyTerestris’
2.6. Click kanan ‘SurveyTerestris’, kemudian pilih ‘Edit survey database setting’

image

2.7. Pilih unit distance ‘Meter’ dan Least Square Network Adjustment Type 2-Dimensional

image

3. Membuat Network
3.1. Di bawah icon ‘SurveyTerestris’, click kanan ‘Networks’ kemudian click ‘New’
3.2. Masukkan ‘KKH’ di kolom baris ‘Name’ dan ‘Kerangka Kontrol Horisontal’ di kolom ‘Description’

4. Import Fieldbook
4.1. Click kanan icon ‘KKH’, kemudian pilih ‘Import field book…’
4.2. Pilih file ‘JalurPoligon.fbk’, kemudian click OK

image

4.3. Click ‘No’ jika muncul pesan error seperti di atas.

5. Membuat Jalur Polygon

5.1. Di bawah folder KKH,clik kanan icon ‘Traverses’, kemudian pilih New
5.2. Dalam baris ‘Name’, masukkan nama poligon ‘Loop1′, kemudian di baris Description masukkan keterangan dari loop1 yaitu “Jalur BM.1, BM.2, POL.1, POL.2, BM.5, BM.6″.

image

5.3. Click OK
5.4. Buat Traverse baru untuk loop baru

image

6. Check Polygon

6.1. Di bawah ‘Traverse’ click kanan icon ‘Loop1′, kemudian pilih ‘Traverse analysis…’, kemudian click OK. Akan ditampilkan 3 file notepad yaitu loop1 balance.trv, loop1 Raw Closure.trv dan loop1.lso . Ketelitian sudut dan jarak dari Loop1:

Angular error      = -0-00-02
Angular error/set  = 0-00-00 Under
Error North     : -0.0013
Error East      : 0.0004
Absolute error  : 0.0014
Error Direction : S 18-05-17 E
Perimeter       : 360.7870
Precision       : 1 in 255747.0955
Number of sides : 3

6.2. Seperti langkah 6.1, click kanan icon ‘Loop2′, kemudian pilih ‘Traverse analysis’. Ketelitian sudut dan Jarak Loop2:

Error North     : -0.0183
Error East      : 0.0083
Absolute error  : 0.0201
Error Direction : S 24-20-09 E
Perimeter       : 579.5790
Precision       : 1 in 28823.8328
Number of sides : 5

7. Edit Input Least Square

Sampai langkah 6, sudah dilakukan proses perhitungan poligon tiap loop. Dengan menggunakan fasilitas Least Square, akan dilakukan proses perhitungan seluruh Loop secara simultan.

7.1. Di bawah folder ‘Networks’, click kanan ‘KKH’, pilih ‘Least squares analysis..’, kemudian ‘Create input file..’

7.2.  Di bawah folder ‘Networks’, click kanan ‘KKH’, pilih ‘Least squares analysis..’, kemudian ‘Edit input file..’

7.3. Beri tanda ‘?’ didepan titik poligon yang dicari koordinatnya atau di titik yang bukan titik kontrol, sehingga tampilan file input adalah sbb:

image

7.4. Simpan dan tutup file ‘Network.lsi’

8. Running Least Square

8.1. Di bawah folder ‘Networks’, click kanan ‘KKH’, pilih ‘Least squares analysis..’, kemudian ‘Perform analysis..’

image

pada baris ‘create input file’, set ke ‘No’ (dalam kondisi tidak terpilih), kemudian click ‘OK’

8.2. Hasil Network Adjustment

Total # of Unknown Points: 6
Total # of Points        : 10
Total # of Observations  : 17
Degrees of Freedom       : 5
Confidence Level      : 95%
Number  of Iterations    : 1
Chi Square Value         : 1.40006
Goodness of Fit Test     : Passes at the 5% Level

Standard Deviation of Unit Weight: 0.52916

9. Gambar Titik ke Civil 3D

image

9.1. Click Kanan ‘Control Points>>Points>>Insert into drawings’

Theme: Shocking Blue Green. Blog at WordPress.com.

Follow

Get every new post delivered to your Inbox.