Autolisp Sharing
+7
ytsejeffx
jean7
francozizm
ERICK
whey09
bokkins
Butz_Arki
11 posters
:: Software Discussion :: AutoCad
Page 2 of 2
Page 2 of 2 • 
1, 2
Autolisp Sharing
by Butz_Arki Wed Feb 25, 2009 8:48 pm
First topic message reminder :
Mga bro & sis!! share nyo mga autocad lisp nyo..!!
Mga bro & sis!! share nyo mga autocad lisp nyo..!!
Butz_Arki- Superbeast
- Number of posts : 4081
Age : 43
Location : Guinea Ecuatorial,United States of Africa
Registration date : 18/09/2008 -
Re: Autolisp Sharing
by Guest Sat Apr 04, 2009 11:53 pm
Butz_Arki wrote:Command: Appload
This dialog appear..
mas ok kung i-add mo sya sa startup ng autocad mo pra hndi mo na iloload everytime..after n mload type mo lang yung commmand or name ng lisp file..that's it![img]
[/img]
sana may sense...hehe..
add ko lang bro... don;t forget to check "load autolisp on every drawing" sa option/preferences
Guest- Guest
Re: Autolisp Sharing
by Butz_Arki Sun Apr 05, 2009 10:32 pm
thanks men!!
agent7 wrote:sir tnx 4 sharing.....galing mo talaga.... godbless!
Butz_Arki- Superbeast
- Number of posts : 4081
Age : 43
Location : Guinea Ecuatorial,United States of Africa
Registration date : 18/09/2008 -
Re: Autolisp Sharing
by Butz_Arki Sun Apr 05, 2009 10:33 pm
salamat sayo pre kietsk...hehe..ano blita sayo?
kietsmark wrote:Butz_Arki wrote:Command: Appload
This dialog appear..
mas ok kung i-add mo sya sa startup ng autocad mo pra hndi mo na iloload everytime..after n mload type mo lang yung commmand or name ng lisp file..that's it![img]
sana may sense...hehe..
add ko lang bro... don;t forget to check "load autolisp on every drawing" sa option/preferences
Butz_Arki- Superbeast
- Number of posts : 4081
Age : 43
Location : Guinea Ecuatorial,United States of Africa
Registration date : 18/09/2008 -
Re: Autolisp Sharing
by Guest Mon Apr 06, 2009 10:21 am
@butz
OT: eto daming gawa lol nakaw oras sa pagsilip sa CGP
OT: eto daming gawa lol nakaw oras sa pagsilip sa CGP
Guest- Guest
Re: Autolisp Sharing
by Butz_Arki Mon Apr 06, 2009 10:33 pm
ok lang yan dre...bsta para sa family..add moko sa ym mo?ztub_1891@yahoo.com
kietsmark wrote:@butz
OT: eto daming gawa lol nakaw oras sa pagsilip sa CGP
Butz_Arki- Superbeast
- Number of posts : 4081
Age : 43
Location : Guinea Ecuatorial,United States of Africa
Registration date : 18/09/2008 -
Re: Autolisp Sharing
by jolicoeur030488 Sun Sep 20, 2009 9:44 pm
ngaun ko lang nakita to.... salamat nman... !
jolicoeur030488- CGP Apprentice
- Number of posts : 785
Age : 36
Location : caloocan
Registration date : 17/08/2009
Re: Autolisp Sharing
by Butz_Arki Mon Sep 21, 2009 4:50 am
welcome bro!
jolicoeur030488 wrote:ngaun ko lang nakita to.... salamat nman... !
Butz_Arki- Superbeast
- Number of posts : 4081
Age : 43
Location : Guinea Ecuatorial,United States of Africa
Registration date : 18/09/2008 -
Re: Autolisp Sharing
by ar_monzter Tue Jun 14, 2011 6:43 pm
wow meron palang ganitong thread hehe. thanks for sharing! 
ar_monzter- CGP Apprentice
- Number of posts : 260
Age : 33
Location : Pasig City
Registration date : 06/06/2010
Re: Autolisp Sharing
by Butz_Arki Wed Aug 03, 2011 2:18 pm
oo bro..sharing lang tayo..
ar_monzter wrote:wow meron palang ganitong thread hehe. thanks for sharing!
Butz_Arki- Superbeast
- Number of posts : 4081
Age : 43
Location : Guinea Ecuatorial,United States of Africa
Registration date : 18/09/2008 -
Re: Autolisp Sharing
by cadmagic Thu Jul 12, 2012 3:01 am
HERE'S ANOTHER AUTOLISP I DID WHEN I WAS SO ADDICTED TO LISP MAKING WAY BACK 8 YEARS AGO.
JUST COPY THE CODE AND PASTE IN NOTEPAD AND SAVE IT AS ANY NAME YOU WANT BUT I CALL THIS INVISIBLE AND VISIBLE AND JUST MAKE SURE TO PUT A .LSP EXTENSION TO IT.
(defun C:00 (/ ent) ; mawagtang ka hahahhaha
(setq ent (entget (car (entsel))))
(if (assoc 60 ent)
(setq ent (subst '(60 . 1) (assoc 60 ent) ent))
(setq ent (append ent '((60 . 1)))))
(entmod ent)
(princ)
(ALERT "\n WAGTANG MAN UG KALIT HAHAHHAHA")
)
(defun C:11 (/ ss n ent) ; mobalik ka hahahhahaha
(setq ss (ssget "x" '((60 . 1)))
n (1- (sslength ss)))
(while (>= n 0)
(setq ent (entget (ssname ss n))
ent (subst '(60 . 0) (assoc 60 ent) ent)
n (1- n))
(entmod ent))
(princ)
(ALERT "\n NIBALIK NA HAHAHAHHA")
)
JUST COPY THE CODE AND PASTE IN NOTEPAD AND SAVE IT AS ANY NAME YOU WANT BUT I CALL THIS INVISIBLE AND VISIBLE AND JUST MAKE SURE TO PUT A .LSP EXTENSION TO IT.
(defun C:00 (/ ent) ; mawagtang ka hahahhaha
(setq ent (entget (car (entsel))))
(if (assoc 60 ent)
(setq ent (subst '(60 . 1) (assoc 60 ent) ent))
(setq ent (append ent '((60 . 1)))))
(entmod ent)
(princ)
(ALERT "\n WAGTANG MAN UG KALIT HAHAHHAHA")
)
(defun C:11 (/ ss n ent) ; mobalik ka hahahhahaha
(setq ss (ssget "x" '((60 . 1)))
n (1- (sslength ss)))
(while (>= n 0)
(setq ent (entget (ssname ss n))
ent (subst '(60 . 0) (assoc 60 ent) ent)
n (1- n))
(entmod ent))
(princ)
(ALERT "\n NIBALIK NA HAHAHAHHA")
)
cadmagic- CGP Newbie
- Number of posts : 55
Age : 47
Location : Cebu City/ Jeddah, Saudi Arabia
Registration date : 19/12/2009
Page 2 of 2 • 1, 2
Similar topics» Autolisp SHARING for Autocad!
» Please I Need Your Help!!! error handling in AutoLISP
» AUTOLISP AUTOCAD 2009
» PSD for Entourage
» Help lang po. Error handling in autolisp sa autocad 2008
» Please I Need Your Help!!! error handling in AutoLISP
» AUTOLISP AUTOCAD 2009
» PSD for Entourage
» Help lang po. Error handling in autolisp sa autocad 2008
:: Software Discussion :: AutoCad
Page 2 of 2
Permissions in this forum:
You cannot reply to topics in this forum