facebook
Youtube
³×À̹öÄ«Æä
TISTORY
ÅëÇÕ°Ë»ö
3D CAD
±â°è±Ý¼Ó
±ÝÇü±â¼ú
ÀÚµ¿È
Àü±âÀüÀÚ
¹ÝµµÃ¼IT
ÀÚµ¿Â÷±â¼ú
°øÇÐÁö½Ä
Á¶¼±Ç×°ø
°ÇÃàÅä¸ñ
¹®¼¼½Ä
ÀÚµ¿È(FA)
ÀÚµ¿ÈºÎÇ°¿ä¼Ò
(12)
°ø¾Ð/Áø°ø±â¼ú
(33)
À¯¾Ð±â¼ú
(7)
Á÷µ¿½Ã½ºÅÛ
(7)
ÀÚµ¿È±â¼ú
(17)
ÀÚµ¿È±â°è/¼³ºñ
(1)
ÀÚµ¿°ø±Þü°á
(0)
ÇÁ·¹½º±ÝÇü
(0)
¸ôµå±ÝÇü
(0)
±â°è¿ä¼Ò/ºÎÇ°
º£¾î¸µ
(10)
±â¾î
(4)
üÀÎ/½ºÇÁ·ÎŶ
(0)
Å°/ÇÉ
(1)
¿À¸µ/ÆÐÅ·/¾Á
(0)
½ºÇÁ¸µ
(7)
º¼Æ®/³ÊÆ®/¿Í¼Å
(3)
µ¿·ÂÀü´Þ¿ä¼Ò
¸ðÅÍ/°¨¼Ó±â
(11)
Ä¿Çøµ/Á¶ÀÎÆ®
(2)
üÀÎ/Ç®¸®/º§Æ®
(2)
ÄÉÀÌºíº£¾î
(0)
Ŭ·¯Ä¡/ºê·¹ÀÌÅ©
(1)
CAD/2D/3D
Auto Lisp
(280)
IRON CAD
(1)
¼Ö¸®µå¿¡Áö
(0)
À¯´Ï±×·¡ÇȽºNX
(0)
PRO-E
(1)
CATIA
(0)
Àκ¥ÅÍ
(22)
¼Ö¸®µå¿÷½º
(5)
CADian
(0)
Auto CAD
(131)
°¶·¯¸®
(4)
°ø±¸/Åø¸µ
Àý»è/¿¬¸¶°ø±¸
(0)
Àüµ¿/¿¡¾î°ø±¸
(0)
ÃøÁ¤°ø±¸
(0)
±ÝÇü°ø±¸
(0)
Á¶¸³/ÀÛ¾÷°ø±¸
(0)
Ä¡°ø±¸
(0)
¿ëÁ¢°ø±¸
(0)
°ø±¸ÇÔ/ÀÛ¾÷´ë
(0)
Ư¼ö°ø±¸
(0)
±ÝÇü/»çÃâ
±ÝÇüÇ¥ÁغÎÇ°
(0)
ÃëÃâ/±ÝÇüÀÚµ¿È
(0)
±ÝÇü¼³°è
(1)
Çöó½ºÆ½/»çÃâ±ÝÇü
(4)
±ÝÇü°èÃø°Ë»ç
(0)
±ÝÇü°ø±¸/°¡°ø
(0)
ÇÁ·¹½º±ÝÇü
(0)
Ç¥¸é/¿Ã³¸®
(2)
À¥/IT
À¥(WEB)
(1)
IT NEWS
(0)
±â¼úµ¿Çâ
(0)
ÀúÀÛ±Ç
(2)
½ÅÁ¦Ç°
(1)
°¡°ø/Á¶¸³/Á¦ÀÛ
Àý´Ü/Àý°î/¹êµù
(0)
ÆDZÝ
(0)
Àμâ/Á¶°¢/¸íÆÇ
(2)
ÆDZÝ
(0)
³ª³ë/Ư¼ö°¡°ø
(3)
¼±¹Ý/¹Ð¸µ
(0)
¹öÇÎ/»÷µù/µå·ÎÀ×
(0)
¿¬¸¶/·¡ÇÎ
(6)
·¹ÀÌÀú/¸ðÇüÀý´Ü
(1)
°¡°ø±â¼ú
(27)
»ç¾÷/°æ¿µ/°æÁ¦
°æ¿µ/Àü·«/ÄÁ¼³ÆÃ
(11)
¼öÃâÀÔ/¹«¿ª/Åë°ü
(1)
ƯÇã/ÀÎÁõ
(0)
â¾÷/º¥ÃÄ/»ç¾÷
(5)
°æÁ¦/ºñÁî´Ï½º
(11)
¼¼¹«/ȸ°è/Àλç/³ë¹«
(8)
Á¤ºÎÁö¿ø.Á¤Ã¥ÀÚ±Ý
(5)
¸¶ÄÉÆÃ
(0)
¹Ý¼Û/¿î¹Ý/ÇÏ¿ª
¹°·ù¿ä¼Ò/·¢/ºÎÇ°
(0)
ÄÁº£À̾î/·Ñ·¯
(0)
È£À̽ºÆ®/Å©·¹ÀÎ
(0)
¹ÙÄû/¿î¹Ý±¸
(0)
ÆÄ·¹Æ®/ÀûÀç´ë
(0)
¼³Ä¡¿î¹Ý/°øÀåÀÌÀü
(0)
·ÎÇÁ/¿ÍÀ̾î/üÀÎ
(0)
±âŸÇÏ¿ª±â±â
(0)
°ø¾÷±Ô°Ý/´ÜÀ§
KS
(1)
JIS
(12)
DIN
(0)
ISO
(0)
°øÇдÜÀ§
(9)
ASTM
(0)
BS
(1)
ANSI
(0)
±âŸ±Ô°Ý
(1)
Á¦¾î/°èÃø/¼¾¼
¼º¸½Ã½ºÅÛ
(6)
PLC/Á¦¾î±â¼ú
(0)
¼¾¼/½ºÀ§Ä¡/¿£ÄÚ´õ
(2)
È»ó°Ë»ç/¸Ó½ÅºñÁ¯
(0)
·Îµå¼¿/Àεð°ÔÀÌÅÍ
(0)
Á¤¹ÐÃøÁ¤/3Â÷¿ø
(0)
Àç·á/¿Ã³¸®
ÁÖÁ¶/´ÜÁ¶
(0)
°íÁÖÆÄ
(0)
Áø°ø¿Ã³¸®
(6)
°ø¾÷·Î/µµ°¡´Ï
(0)
°æµµ½ÃÇè
(2)
¿Ã³¸®
(33)
±â°èÀç·á
(33)
µµ±Ý/ÄÚÆÃ/µµÀå
Å©·Ò/3°¡Å©·Òµµ±Ý
(0)
PVD/CVD
(0)
µµ±Ý¼³ºñ/Àåºñ
(0)
µµ±Ý¾×
(0)
ÀüÂøÄÚÆÃ/µµÀå
(1)
¾Æ³ë´ÙÀÌ¡
(0)
Ç¥¸éó¸®
(0)
ÀüÀÚºÎÇ°µµ±Ý
(0)
¸¶±×³×½·µµ±Ý
(0)
¹«ÀüÇصµ±Ý
(0)
ÇǸ·Ã³¸®
(0)
Çöó½ºÆ½µµ±Ý(POP)
(0)
±Í±Ý¼Óµµ±Ý
(0)
ÁÖ¼®/ÁÖ¼®Çձݵµ±Ý
(0)
Çձݵµ±Ý
(0)
¾Æ¿¬µµ±Ý
(0)
µ¿µµ±Ý
(0)
Ư¼öµµ±Ý
(0)
Ãë¹Ì/¿©Çà/µ¿È£È¸
Çѱ¹¿©Çà
(1)
¸ÀÀ»Ã£¾Æ¼
(4)
¸¶À½ÀǾç½Ä
ÁÁÀº±Û
(58)
¸í¾ð/½Ã
(6)
»ó½Ä
(2)
À¯Ã¼/ºÐü±â¼ú
À¯·®/À¯¼Ó
(0)
¾Ð·Â/¿Âµµ
(0)
ÆßÇÁ/¹ëºê
(0)
¼Ûdz/¾ÐÃà
(0)
Ç÷£Æ®/ENG
(0)
¹è°ü/ºÎ¼ÓÀÚÀç
(0)
À¯Ã¼»ê¾÷°øÁ¤/ENG
(0)
ÃøÁ¤/°èÃø
(0)
ȯ°æ/¿¡³ÊÁö
´ëü¿¡³ÊÁö
(3)
ž籤±â¼ú
(3)
Ŭ¸°»ç¾÷/°øÁ¶±â±â
(0)
¼Ò°¢·Î/Æó±â¹°
(0)
¼ÒÀ½/¹æÁø
(0)
´ë±â/¿À¿°
(4)
ȯ°æ¼³ºñ/±â±â
(2)
ÃøÁ¤/¼ººÐºÐ¼®
(17)
ź¼Ò¹èÃâ±Ç
(0)
ģȯ°æ/½ÅÁ¦Ç°
(8)
¼öÁú/¼öó¸®
(0)
ROHS/WEEE
(9)
ÀÚ¿øÀçÈ°¿ë
(5)
Reach
(1)
·Îº¿±â¼ú
»ê¾÷¿ë·Îº¿
(1)
Áö´ÉÇü·Îº¿
(1)
·Îº¿ÀÚµ¿È
(1)
·Îº¿±âÀÚÀç/ºÎÇ°
(0)
·Îº¿»ê¾÷
(0)
¼³°è/Á¦µµ
±â°èÁ¦µµ
(1)
±â°è¼³°è
(9)
¼³°è±Ô°Ý/±ÔÁ¤
(101)
ÀÚµ¿È¼³°è
(2)
Ä¡°ø±¸¼³°è
(0)
°øÂ÷·Ð
(2)
¼³°èµµ¸é
(0)
¼³°è°è»ê
(3)
ÇöÀçÀ§Ä¡ : HOME > Search
½ÃÄö½º¸µÅ©
½ÃÄö½º¸µÅ© µî·Ï
Æ÷½ºÆ® °Ë»ö°á°ú : 1034
[S/R] Æú´õ ã±â [VL]
cmguy33
[Æß±Û](defun BrowseFolder (/ ShlObj Folder FldObj OutVal) (setq ShlObj (vla-getInterfaceObject (vlax-get-acad-object) "Shell.Application")) (setq Folder (vlax-invoke-method ShlObj 'BrowseF..
CAD/2D/3D >
Auto Lisp
[S/R] ¹®ÀÚ¿ ³»ºÎÀÇ ¼ýÀÚ ´õÇϱâ
cmguy33
; ¼Ò¼ýÁ¡ µé¾î°£ °Í º° ¹«¸®¾øÀÌ µÊ; õ´ÜÀ§±âÈ£ µé¾î°£ °Í ¾ÈµÊ (defun caltxt (str / ix ix2 ix3 txt0 txtx txt1 txt2 txt4 ) (setq ix 1 txt4 0) (setq n0 (strlen str)) (while (>..
CAD/2D/3D >
Auto CAD
³¯ÀÚÇ¥±â
cmguy33
(defun getdate () (setq Indt (getvar "cdate")) (setq Year (fix (* Indt 0.0001))) (setq Indt (- Indt (* 10000.0 (float Year)))) (setq Year (itoa Year) Mnth (fix (* Indt 0.01)))&nb..
CAD/2D/3D >
Auto Lisp
¼Ò¼ýÁ¡ÀÚ¸® Á¤¸®.
cmguy33
;;=======================================================; float = Á¤¼ö¸¦ ½Ç¼ö·Î ¸¸µë.; fix = ¼Ò¼ýÁ¡ ¸ðµçÀÚ¸®¸¦ ¹ö¸². ; ¼Ò¼ýÁ¡ ÀÚ¸® ¹ö¸².(defun rounddown (a b / k c) ; a=no. b=d..
CAD/2D/3D >
Auto Lisp
Mirror ½Ã ÅؽºÆ® ÀÚ¸®¸ÂÃ㠹ݴë·Î Çϱâ
cmguy33
(defun c:mit(/ ss k ed en jh) (setvar "cmdecho" 0) (prompt "n>>Mirror ½Ã ÅؽºÆ® ÀÚ¸®¸ÂÃ㠹ݴë·Î Çϱâ..") (command "undo" "be") (setq k 0 jh nil) (setq ss (ss..
CAD/2D/3D >
Auto Lisp
[S/R]
cmguy33
³»°¡ ¸¸µç°Ç ¾Æ´ÏÁö¸¸ µ¡ºÙÀÌÀÚ¸é...¾Æ·¡·çƾÀº shell32.dll¸¦ ÀÌ¿ëÇÑ°ÍÀÔ´Ï´Ù.(defun BrowseFolder (/ ShlObj Folder FldObj OutVal) (setq ShlObj (vla-getInterfaceObject (vlax-get-acad-object) "Shell...
CAD/2D/3D >
Auto Lisp
[S/R] "¹®ÀÚ+¼ýÀÚ" ÇüŸ¦ ºÐ¸®Çϱ⠿¹Á¦
cmguy33
(defun get_front(a / b c k np) (setq b (strlen a)) (setq k 1) (setq c "") (while b (setq d (substr a k 1))  ..
CAD/2D/3D >
Auto Lisp
[S/R]¿¡·¯ÇÔ¼ö (º¯¼ö°ª µÇµ¹¸®±â,¿À½º³À µÇµ¹¸®±â)
cmguy33
¸»Àº ¿¡·¯ÇÔ¼öÀä... Ç®¾î¼ Á¤¸®Çϸé ^CÀ» ÀԷ¹ÞÀ¸¸é ½ÇÇàÇ϶ó´Â °ÍÀÔ´Ï´Ù. °á±¹ ^CÀ» ÀԷ¹ÞÀ¸¸é ½ÇÇàµÇ´Â ¼ºê·çƾÀÔ´Ï´Ù. Á¦°¡¿©·¯·çƾÁß ¾×±â½º¸¸ »Ì¾Æ¼ Á¤¸®Çѱ¸¹®ÀÔ´Ï´Ù. ;->*error* star..
CAD/2D/3D >
Auto Lisp
[S/R]¼ýÀÚ·ÎµÈ ¹®ÀÚÀÇ ÈÄÇà 0À» Á¦°ÅÇÏ´Â ·çƾ
cmguy33
(defun @del_0 (tx / k tem) (if (= (atof tx) 0) (setq tx "0")) (setq k (vl-string-position (ascii ".") tx)) (setq tem (substr tx (strlen tx) 1)) (if k&nb..
CAD/2D/3D >
Auto Lisp
±³Â÷Á¡ ±¸Çϱ⠷çƾ
cmguy33
(setq a (ssget));ù¹ø° °´Ã¼ ¼±ÅÃ(setq b (ssget));µÎ¹ø° °´Ã¼ ¼±ÅÃ(setq a1(ssname a 0))(setq b1(ssname b 0))(setq a2(vlax-ename->vla-object a1))(setq b2(vlax-ename->vla-object b1))(setq aaa(vl..
CAD/2D/3D >
Auto Lisp
[S/R]¿À´Ã ³¯ÀÚÇ¥±â
cmguy33
¿À´Ã ³¯ÀÚÇ¥±â(defun getdate (/ Indt Year Day Today) (setq Indt (getvar "cdate")) (setq Year (fix (* Indt 0.0001))) (setq Indt (- Indt (* 10000.0 (float Year)))) (setq Year (itoa ..
CAD/2D/3D >
Auto Lisp
[S/R]Group Name ¾Ë¾Æ³»´Â...
cmguy33
Group Name ¾Ë¾Æ³»´Â...(defun GroupName (ename / key dct rtn) (setq key (cons 340 ename) dct (dictsearch (namedobjdict) "acad_group") ) &nbs..
CAD/2D/3D >
Auto Lisp
[S/R]¼Ò¼ýÁ¡ÀÚ¸® Á¤¸®
cmguy33
; float = Á¤¼ö¸¦ ½Ç¼ö·Î ¸¸µë.; fix = ¼Ò¼ýÁ¡ ¸ðµçÀÚ¸®¸¦ ¹ö¸². ; ¼Ò¼ýÁ¡ ÀÚ¸® ¹ö¸².(defun rounddown (a b / k c) ; a=no. b=digit (setq k 1) (se..
CAD/2D/3D >
Auto Lisp
[S/R}¸®½ºÆ® °è»ê ¹× ó¸® ¹æ¹ýµé
cmguy33
;¿¹: ('(4 + 3) '(16 + 3).......'(2 + 3))(mapcar '(lambda (x) (+ 3 x)) '(4 16 4 6 14 12 30 2)) ;°á°ú>(7 19 7 9 17 15 33 5);¿¹: 8 + 8 + 8 = 24(setq a 0)(foreach n '(8 8..
CAD/2D/3D >
Auto Lisp
[S/R]õ´ÜÀ§ ÄÞ¸¶ Âï±â
cmguy33
õ´ÜÀ§ ÄÞ¸¶Âï±â ¸®½À¿¡ ÀÖ´Â ¼ºê·çƾ.. ;(setq txt "123456");(setq newtxt (cmo_1 txt));ÀÌ·¸°Ô ÇØÁÖ¸é... newtext¿£....;"123,456" ÀÌ·¸°Ô õ´ÜÀ§¸¶´Ù ÄÞ¸¶°¡ ÂïÈ÷°Ô µË´Ï´Ù. ;ÄÞ¸¶Âï±â sub routine-------..
CAD/2D/3D >
Auto Lisp
°¢µµº¯È¯(DTR - RTD)
cmguy33
RTD - Degree To Radian DTR - Radian To Degree1radian=57.29577951 degree 1dgree =0.01745329 radian ¥ð(pi)=3.14159265358979 (defun dtr (a) (* pi (/ a 180.0))) ;degree to radian (def..
CAD/2D/3D >
Auto Lisp
dxf ÄÚµå ¿¬½ÀÇϱâ ÁÁÀº ¸®½À
cmguy33
Ãâó:¾ÆÄ«¸ð¾Æ ;ºí·°Àº ÂïÀ¸¸é... ;ÇØ´ç ºí·°ÀÇ Á¤º¸¸¦...command »ó¿¡ Ç¥±âÇÏ´Â ¸®½À (defun c:binfo(/ en ed la bn ins sx sy sz ro num) (setq en nil) (while (= en nil) (setq en (c..
CAD/2D/3D >
Auto Lisp
[ssget]
cmguy33
±âº»Çü½Ä (ssget ["mode"] [pt1] [pt2] ) Çѹø¿¡ ¿©·¯°³ÀÇ entity¸¦ µ¿½Ã¿¡ ¼±ÅÃÇÒ¼ö ÀÖ½À´Ï´Ù..^ !!Áß¿ä!! pt1 pt2´Â mode¿¡¼ ¼±ÅÃÇÒ ¼ö ÀÖ´Â ÁÂÇ¥¸®½ºÆ®¿Í ÀÏÄ¡Çؾߵ˴ϴÙ. ..
CAD/2D/3D >
Auto Lisp
ºñÁÖ¾ó ¸®½À ÇÔ¼öµé...
cmguy33
ÆÄÀÏÀ» ´Ù·ç±â À§ÇÑ ÇÔ¼ö (vl-directory-files [directory pattern directories]) ÁÖ¾îÁø µð·ºÅ丮 ³»ÀÇ ÆÄÀϵéÀÇ ¸®½ºÆ®¸¦ ¹ÝȯÇÑ´Ù. (vl-exe-filename) ÇöÀç ½ÇÇàÁßÀÎ ARXÆÄÀÏÀÇ À̸§À» È®ÀÎ..
CAD/2D/3D >
Auto Lisp
¢Â º¯È¯ ÇÔ¼ö
cmguy33
¢Â º¯È¯ ÇÔ¼ö AutoLISP¿¡¼´Â ´Ù¸¥ ÇÁ·Î±×·¥ ¾ð¾î¿Í´Â ´Ù¸£°Ô º¯¼ö¸¦ ¹Ì¸® ¼±¾ðÇÏÁö ¾ÊÀ¸¹Ç·Î, º¯¼ö ŸÀÔÀº »ç¿ëÀÚ°¡ ÀúÀåÇÑ µ¥ÀÌÅÍ Å¸ÀÔ¿¡ ÀÇÇؼ °áÁ¤µÇ¸ç º¯¼ö ŸÀÔÀ» µû·Î ¼³Á¤ÇÏÁö ¾Ê±â ¶§¹®¿¡ µ¥ÀÌÅÍ..
CAD/2D/3D >
Auto Lisp
31
32
33
34
35
36
37
38
39
40
¸ÞÄ«ÇǾƼҰ³
Á¦ÈÞ/±¤°í¹®ÀÇ
°³ÀÎÁ¤º¸ 󸮹æħ
ÀÌ¿ë¾à°ü
À̸ÞÀÏÁÖ¼Ò ¹«´Ü¼öÁý °ÅºÎ
Ã¥ÀÓÀÇÇÑ°è¿Í ¹ýÀû°íÁö
ÀúÀÛ±ÇħÇؽŰí
°í°´¼¾ÅÍ
»óÈ£ : (ÁÖ)¸ÞÄ«ÇǾÆ(¼¿ïÁöÁ¡)
´ëÇ¥ÀÌ»ç : ±èÇöÁÖ
»ç¾÷ÀÚµî·Ï¹øÈ£ : 119-85-40453
Åë½ÅÆǸž÷½Å°í : Á¦ 2023-¼¿ïÁ¾·Î-1613È£
°³ÀÎÁ¤º¸ º¸È£Ã¥ÀÓÀÚ : ±èÇöÁÖ
»ç¾÷Àå¼ÒÀçÁö : [03134] ¼¿ïƯº°½Ã Á¾·Î±¸ µ·È¹®·Î 88-1, 3Ãþ
´ëÇ¥ÀüÈ: 1544-1605
Æѽº: 02-6008-9111
E-mail :
mechapia@mechapia.com
Copyright(c)2008 Mechapia Co. All rights reserved.