AutoLisp File

Menu
Tool
Load Application
Sila Pilih Lisp
Load

(Tips= bagi memudahkan anda sila copy ke dalam folder, c:\ program file, autocad @ cadian, support,)

Selamat mecubanya. Bagi memudahkan anda belajar (semuanya dalam (format acci (text)) Jadi anda boleh edit dalam notepad atau lain lain. he he he

Tips aku nak kongsi dengan kau orang semua,
LISP FILE yang aku buka dengan mengunakan notepad

(defun c:bsT ( / )
(PRINC "Aku he he he ")
(setvar "cmdecho" 0)
(setq rad (getreal "\nSila Masukkan Jejari BST (Link=8.7/Mtr=1.75): "))
(setq set1 (ssget "x" (list (cons 0 "circle"))))
(setq count 0)
(if (/= set1 nil)
(while (< count (sslength set1))
(setq blt (ssname set1 count))
(command "change" blt "" "" rad)
(setq count (1+ count))
)
)
(setvar "cmdecho" 1)
)



Nak cuba sila Downloop kat bawah ni (PERCUMA) je he he he

1 ssx - Select objek atau text
http://www.ziddu.com/download/5297931/SSX.rar.html

2 CHTEXT - Ubah text
http://www.ziddu.com/download/5297965/CHTEXT.rar.html

3 PLOTCP2 - Plot bering dan jarak (plot cp & trabas)
http://www.ziddu.com/download/5316191/PLOTCP2.rar.html

4 BEA - Text untuk bering dan jarak
http://www.ziddu.com/download/5316090/BEA.rar.html

5 KODINET - Text untuk kordinat
http://www.ziddu.com/download/5316163/KODINET.rar.html

6 CZ - Ubah Circle Size (untuk batu sempadan)
http://www.ziddu.com/download/5316158/CZ.rar.html

7 SD - Buat Precom (mesti cuba)
http://www.ziddu.com/download/5316188/SD.rar.html

Kalau dah mahir LISP diatas ni aku berani jamin kalau setakat nak buat Pelan akui dan pelan Precom tu, tak akan jadi masaalah untuk kau orang (Kacang je) he he he

Tapi kenalah belajar dan tahu cara pengunaanya dulu he he he
Tak susah pun, nak tanya aku pun boleh tak jadi masaalah pun..