3. AutoLISP ÇÔ¼ö Á¾·ù

 

 ±âÈ£ ¹× ¼ýÀÚ

 (+ <num1> <num2> ... )

  + Ç¥½Ã ÀÌÈÄ ¼ýÀÚ¸¦ ¸ðµÎ ´õÇÑ´Ù.

 (- <num1> <num2> ... )

  <num1>¿¡¼­ <num1> ÀÌÈÄÀÇ ¼ýÀÚ¸¦ ¸ðµÎ »«´Ù.

 (* <num1> <num2> ... )

  * ÀÌÈÄÀÇ ¼ýÀÚ¸¦ ¸ðµÎ °öÇÑ´Ù.

 (/ <num1> <num2> ... )

  <num1>¿¡¼­ <num1> ÀÌÈÄÀÇ ¼ýÀÚµéÀÇ °öÀ¸·Î ³ª´«´Ù. 

 (= <num1> <num2> ...)

  <num1>°ú <num2>°¡ °°ÀºÁö °Ë»çÇÑ´Ù.

 (/= <num1> <num2>)

  <num1>°ú <num2>°¡ ´Ù¸¥Áö °Ë»çÇÑ´Ù.

 (< <num1> <num2> ...)

  <num1>ÀÌ <num2>º¸´Ù ÀÛÀºÁö °Ë»çÇÑ´Ù.

 (<= <num1> <num2> ...)

  <num1>ÀÌ <num2>º¸´Ù °°°Å³ª ÀÛÀºÁö °Ë»çÇÑ´Ù.

 (> <num1> <num2> ...)

  <num1>ÀÌ <num2>º¸´Ù Å«Áö °Ë»çÇÑ´Ù.

 (>= <num1> <num2> ...)

  <num1>ÀÌ <num2>º¸´Ù °°°Å³ª Å«Áö °Ë»çÇÑ´Ù.

 (~ <integer>)

  <num>ÀÇ 2Áø NOTÀ» ÀÀ´äÇÑ´Ù.

 (1+ <num>)

  <num> 1À» ´õÇÑ´Ù.

 (1- <num>)

  <num> 1À» »«´Ù.

 

 A

 (abs number)

 numberÀÇ Àý´ë °ªÀ» ±¸ÇÑ´Ù.

 (alert string)

 ´ëÈ­»óÀÚ¸¦ ÅëÇØ °æ°í ¸Þ½ÃÁö¸¦ Ãâ·ÂÇÑ´Ù.

 (and expression1 expression2 ...)

 expression1, expression2 ¸ðµÎ°¡ TÀ̸é T¸¦ ÀÀ´äÇÑ´Ù.

 (angle point1 point2)

 point1¿¡¼­ point2±îÁö Á÷¼±ÀÇ °¢À» ±¸ÇÑ´Ù.

 (angtos angle [<mode> [<precision>]])

 ¶óµð¾È ´ÜÀ§¸¦ ¿©·¯ ´ÜÀ§·Î º¯È¯ÇÏ¿© ¹®ÀÚ¿­·Î ÀÀ´äÇÑ´Ù.

 (append <list1> <list2> ...)

 ³ª¿­µÈ <list>À» ÇϳªÀÇ list·Î ¸¸µç´Ù.

 (apply <function> <list>)

 <list>ÀÇ Àμö¸¦ °¡Áø <function>À» ½ÇÇàÇÑ´Ù.

 (ascii <string>)

 <string>ÀÇ ASCII ¹®ÀÚ CODE¸¦ ÀÀ´äÇÑ´Ù.

 (assoc <item> <alist>)

 <alist>ÀÇ <item>¿¡ ÇØ´çÇÏ´Â list¸¦ ±¸ÇÑ´Ù.

 (atan num [num2])

 ¾ÆũźÁ¨Æ® °ªÀ» ¶óµð¾ÈÀ¸·Î ÀÀ´äÇÑ´Ù.

 (atof string)

 stringÀ» ½Ç¼ö·Î º¯È¯ÇÑ´Ù.

 (atoi string)

 stringÀ» Á¤¼ö·Î º¯È¯ÇÑ´Ù.

 (atom <item>)

 <item>ÀÌ listÀÎ °æ¿ì nilÀ» ÀÀ´äÇÑ´Ù.

 

 B

 (boole <func> <int1> <int2> ...)

 ÀÏ¹Ý ³í¸® booleÇÔ¼ö¸¦ ÀÀ´äÇÑ´Ù.

 (boundp <atom>)

 ÀÏ¹Ý ³í¸® booleÇÔ¼ö¸¦ ÀÀ´äÇÑ´Ù.

 

 C

 (cadr <list>)

 <list>ÀÇ µÎ ¹ø° ¿ä¼Ò¸¦ ±¸ÇÑ´Ù.

 (car <list>)

 <list>ÀÇ Ã¹ ¹ø° ¿ä¼Ò¸¦ ±¸ÇÑ´Ù.

 (cdr <list>)

 <list>ÀÇ Ã¹ ¹ø° ¿ä¼Ò¸¦ Á¦¿ÜÇÑ ¸ðµç ¿ä¼Ò¸¦ ±¸ÇÑ´Ù.

 (char <num>)

 <num>¸¦ ÇØ´ç ASCII¹®ÀÚ¸¦ ÀÀ´äÇÑ´Ù.

 (close <file-desc>)

 ÆÄÀÏÀ» ´Ý´Â´Ù.

 (cond <testexpr> <result>...)

 °¢°¢ÀÇ Á¶°Ç½ÄÀÇ °á°ú°¡ TÀÌ¸é ´ÙÀ½ÀÇ <result>¸¦ ½ÇÇàÇÑ´Ù.

 (cos angle)

 angleÀÇ ÄÚ»çÀΰªÀ» ±¸ÇÑ´Ù.

 

 D

 (defun <sym> <arg list> <expr> ...)

 <sym>À̶ó´Â À̸§À¸·Î ÇÔ¼ö¸¦ Á¤ÀÇÇÑ´Ù.

 (distance <pt1> <pt2>)

 <pt1>°ú <pt2>»çÀÌÀÇ °Å¸®¸¦ ±¸ÇÑ´Ù.

 

 E

 (entdel <entity-name>)

 <entity name>À» »èÁ¦Çϰųª º¹±¸ÇÑ´Ù.

 (entget <entity-name>)

 <entity name>ÀÇ entity list¸¦ ±¸ÇÑ´Ù.

 (entlast)

 °¡Àå ÃÖ±Ù¿¡ ±×·ÁÁø µµ¸é¿ä¼Ò¸¦ ¼±ÅÃÇÑ´Ù.

 (entmod <elist>)

 µµ¸é¿ä¼ÒÀÇ ¹Ù²ï ³»¿ëÀ» È­¸é¿¡ ¹Ý¿µÇÑ´Ù.

 (entnext [<ename>])

 <ename> ´ÙÀ½¿¡ ÀÖ´Â µµ¸é¿ä¼Ò¸¦ ±¸ÇÑ´Ù.

 (eq <expr1> <expr2>)

 <expr1>°ú  <expr2>°¡ °°ÀºÁö °Ë»çÇÑ´Ù.

 (eval <expr>)

 <expr>ÀÇ °è»ê°á°ú¸¦ ÀÀ´äÇÑ´Ù.

 (exp <num>)

 eÀÇ <num> Á¦°öÀ» ±¸ÇÑ´Ù.

 (expt <base> <power>)

 <base> <power> Á¦°öÀ» ±¸ÇÑ´Ù.

 

 F

 (findfile <filename>)

 <filename>ÀÇ ÆÄÀÏÀ» ã´Â´Ù.

 (fix <num>)

 <num>¸¦ Á¤¼ö·Î º¯È¯ÇÑ´Ù.

 (float <num>)

 <num>¸¦ ½Ç¼ö·Î º¯È¯ÇÑ´Ù.

 (foreach <name> <list> <expr> ...)

 <list>³»ÀÇ ¸ðµç ¿ä¼Ò¸¦ <expr>·Î ½ÇÇàÇÑ´Ù.

 

 G

 (gcd <num1> <num2>)

 <num1>°ú <num2>ÀÇ ÃÖ´ë °ø¾à¼ö¸¦ ±¸ÇÑ´Ù.

 (getangle [<pt>] [prompt>])

 »ç¿ëÀڷκÎÅÍ °¢µµ¸¦ ¿ä±¸ÇÑ´Ù.

 (getcorner <pt> [prompt>])

 »ç¿ëÀڷκÎÅÍ <pt>Á¡À» ±âÁØÀ¸·Î Á¡¸¦ ¿ä±¸ÇÑ´Ù.

 (getdist [<pt>] [prompt>])

 »ç¿ëÀڷκÎÅÍ °Å¸®¸¦ ¿ä±¸ÇÑ´Ù.

 (getenv <var-name>)

 ½Ã½ºÅÛ È¯°æº¯¼öÀÇ °ªÀ» ÀÀ´äÇÑ´Ù.

 (getreal [<prompt>])

 »ç¿ëÀڷκÎÅÍ ½Ç¼ö ÀÔ·ÂÀ» ¿ä±¸ÇÑ´Ù.

 (getstring [<cr>] [<prompt>])

 »ç¿ëÀڷκÎÅÍ ¹®ÀÚ¿­ ÀÔ·ÂÀ» ¿ä±¸ÇÑ´Ù.

 (getvar <varname>)

 AutoCADÀÇ ½Ã½ºÅÛ º¯¼ö¸¦ ±¸ÇÑ´Ù.

 (graphscr)

 È­¸éÀ» ±×·¡ÇÈ È­¸éÀ¸·Î ÀüȯÇÑ´Ù.

 

 I

 (if <testexpr> <thenexpr> [<esleexpr>])

 <testexpr>ÀÌ nilÀÌ ¾Æ´Ï¸é <thenexpr>À»,
 ±×¿ÜÀÇ °æ¿ì¿¡´Â <elseexpr>À» ½ÇÇàÇÑ´Ù.

 (initget [<bits>] [<string>]...)

 getxxx ÇÔ¼ö¿¡ ÀÇÇؼ­ »ç¿ëµÇ´Â °¢Á¾ ¿É¼ÇÀ» ¼³Á¤ÇÑ´Ù.

 (itoa <integer>)

 Á¤¼ö¸¦ ¹®ÀÚ·Î º¯È¯ÇÑ´Ù.

 

 L

 (lambda <arguments> <expr> ...)

 anonymous(¹«¿µ) ÇÔ¼ö¸¦ Á¤ÀÇÇÑ´Ù.

 (last <list>)

 <list>ÀÇ ¸¶Áö¸· ¿ä¼Ò¸¦ ÀÀ´äÇÑ´Ù.

 (length <list>)

 <list>ÀÇ ¿ä¼Ò¼ö¸¦ Á¤¼ö·Î ÀÀ´äÇÑ´Ù.

 (list <expr1> <expr2>...)

 <expr1>, <expr2> ÀÌÈÄÀÇ ¿ä¼Ò¸¦ ¹­¾î ÇϳªÀÇ list·Î ÀÀ´äÇÑ´Ù.

 (listp <item>)

 <item>ÀÌ ¸®½ºÆ®À̸é T, ±×·¸Áö ¾ÊÀ¸¸é nilÀ» ÀÀ´äÇÑ´Ù.

 (load <filename> [<onfaiure>])

 AutoLISP ÆÄÀÏÀ» loadingÇÑ´Ù.

 (log <num>)

 <num>ÀÇ ÀÚ¿¬´ë¼ö¸¦ ±¸ÇÑ´Ù.

 (logand <num> <num> ... )

 logand ÀÌÈÄÀÇ ¼ýÀÚÀÇ ³í¸®°ö AND¸¦ ±¸ÇÑ´Ù.

 (logior <num> <num> ... )

 logand ÀÌÈÄÀÇ ¼ýÀÚÀÇ ³í¸®ÇÕ OR¸¦ ±¸ÇÑ´Ù.

 (lsh <num> <numbits> ... )

 <num>À» <numbits> ¸¸Å­ ³í¸®ÀûÀ¸·Î ½ÃÇÁÆ®ÇÑ´Ù.

 

 M

 (mapcar <function> <list> <list>... )

 listÀÇ °³º° ¿ä¼Ò¸¦ °®´Â <function>À» ½ÇÇàÇÑ´Ù.

 (max <num1> <num2> ... )

 ³ª¿­µÈ ¼öÄ¡ Áß °¡Àå Å«¼ö¸¦ ±¸ÇÑ´Ù.

 (member <expr> <list>)

 <list>¸¦ °Ë»öÇÏ¿© <expr> À» ã´Â´Ù.

 (min <num1> <num2> ... )

 ³ª¿­µÈ ¼öÄ¡ Áß °¡Àå ÀÛÀº¼ö¸¦ ±¸ÇÑ´Ù.

 

 N

 (not <item>)

 <item>ÀÇ °á°ú TÀÎÁö nilÀÎÁö °Ë»çÇÑ´Ù.

 (nth <n> <list>)

 <list>ÀÇ <n>¹ø° ¿ä¼Ò¸¦ ÀÀ´äÇÑ´Ù.

 (null <item>)

 <item>ÀÌ nilÀ̸é T¸¦ ÀÀ´äÇÑ´Ù.

 (nump <item>)

 <item>ÀÌ ½Ç¼ö ¶Ç´Â Á¤¼öÀ̸é T¸¦ ÀÀ´äÇÑ´Ù.

 

 O

 (open <filename> <mode>)

 ÆÄÀÏÀ» ¿ÀÇÂÇÑ´Ù.

 (or <expr1> <expr2> ...)

 <expr1>, <expr2> Áß ¾î´À Çϳª¶óµµ nilÀÌ ¾Æ´Ï¸é T¸¦ ÀÀ´äÇÑ´Ù.

 (osnap <pt> <mode>)

 <mode>¿¡ ÀÇÇؼ­ <pt>Á¡¿¡ Àû¿ëÇÑ Á¡À» ±¸ÇÑ´Ù.

 

 P

 (pi)

 »ó¼ö·Î 3.1415926, ¥ð

 (polar <pt><angle><distance>)

 <pt>Á¡¿¡¼­ <angle> °¢À¸·Î <distance>°Å¸®¸¸Å­ ¶³¾îÁø Á¡À» ±¸ÇÑ´Ù.

 (prin1 <expr> [<file-desc>])

 <expr>À» È­¸é ¶Ç´Â ÆÄÀÏ¿¡ Ãâ·ÂÇÑ´Ù.

 (princ <expr> [<file-desc>])

 <expr>À» È­¸é ¶Ç´Â ÆÄÀÏ¿¡ Ãâ·ÂÇÑ´Ù.

 (print <expr> [<file-desc>])

 <expr>À» È­¸é ¶Ç´Â ÆÄÀÏ¿¡ Ãâ·ÂÇÑ´Ù.

 (progn <expr1> <expr2> ...)

 ¿©·¯ °³ÀÇ ½ÇÇ๮ ¹× ¼ö½ÄÀ» ÇϳªÀÇ ¹®ÀåÀ¸·Î ¹­¾î ó¸®ÇÑ´Ù.

 (prompt <msg>)

 È­¸é¿¡ <msg>¸¦ Ãâ·ÂÇÑ´Ù.

 

 Q

 (quote <expr>)

 <expr>À» °è»ê ¾øÀÌ ±×´ë·Î ÀÀ´äÇÑ´Ù.

 

 R

 (read <string>)

 <string>ÀÇ Ã¹ ¹ø° list¶Ç´Â atomÀ» ÀÀ´äÇÑ´Ù.

 (read-char [<file-desc>])

 Å°º¸µå ¶Ç´Â ÆÄÀÏ¿¡¼­ ÇϳªÀÇ ¹®ÀÚ¸¦ ÀÐ¾î µéÀδÙ.

 (read-line [<file-desc>])

 Å°º¸µå ¶Ç´Â ÆÄÀÏ¿¡¼­ ÇϳªÀÇ ¹®ÀÚ¿­À» ÀÐ¾î µéÀδÙ.

 (redraw [<ename> [<mode>]])

 µµ¸é Àüü ¶Ç´Â <ename>À» REDRAWÇÑ´Ù.

 (rem <num1> <num2>)

 <num1>À» <num2>·Î ³ª´©°í ³ª¸ÓÁö¸¦ ±¸ÇÑ´Ù.

 (repeat <num> <expr> ...)

 <expr>À» <num>¸¸Å­ ¹Ýº¹ÇÑ´Ù.

 (reverse <list>)

 <list>¸¦ °Å²Ù·Î ¹èÄ¡ÇÑ´Ù.

 (rtos <num> [<mode> <precision>])

 <num>¸¦ ¿©·¯ ÇüÅÂÀÇ ¹®ÀÚ¿­·Î ÀÀ´äÇÑ´Ù.

 

 S

 (setq <sym> <expr> ...)

 <expr>À» <sym>¿¡ ¼³Á¤ÇÑ´Ù.

 (setvar <varname> <value>)

 AutoCADÀÇ ½Ã½ºÅÛ º¯¼ö¸¦ <value>·Î ¼³Á¤ÇÑ´Ù.

 (sin <angle>)

 <angle>ÀÇ »çÀΰªÀ» ±¸ÇÑ´Ù.

 (ssadd [<entity-name> [<selection-set>]])

 <selection-set>¿¡ <entity-name>À» Ãß°¡½ÃŲ´Ù.

 (ssget [<mode> <pt1> <pt2> <pt-list>] [<filter-list>])

 Çϳª ÀÌ»óÀÇ µµ¸é¿ä¼Ò¸¦ ¼±ÅÃÇÑ´Ù.

 (sslength <selection-set>)

 <selection-set>¿¡ ÀÖ´Â µµ¸é¿ä¼ÒÀÇ °¹¼ö¸¦ ±¸ÇÑ´Ù.

 (ssname <selection-set> <index>)

 <selection-set>¿¡¼­ <index>¹ø°ÀÇ µµ¸é ¿ä¼ÒÀÇ À̸§À» ±¸ÇÑ´Ù.

 (sqrt <num>)

 <num>ÀÇ Á¦°ö±ÙÀ» ±¸ÇÑ´Ù.

 (strcase <string> [<t>])

 <string>À» ´ë¹®ÀÚ ¶Ç´Â ¼Ò¹®ÀÚ·Î ÀÀ´äÇÑ´Ù.

 (strcat <string1> <string2> ...)

 ³ª¿­µÈ <string1>, <string2> ...À» ¿¬°áÇÏ¿© ÀÀ´äÇÑ´Ù.

 (strlen <string>)

 <string>ÀÇ ¹®ÀÚ¼ö¸¦ ±¸ÇÑ´Ù.

 (substr <string> <start> [<length>])

 <string>À» <start>ºÎÅÍ <length>¼ö ¸¸Å­ ÀÀ´äÇÑ´Ù.

 

 T

 (tblsearch <table name> <symbol> [<setnext>])

 <table name>ÀÇ <symbol>¿¡ ´ëÇÑ Á¤º¸¸¦ ÀÀ´äÇÑ´Ù.

 (terpri)

 È­¸é¿¡ newlineÀ» Ãâ·ÂÇÑ´Ù.

 (textscr)

 TEXT È­¸éÀ¸·Î ÀüȯÇÑ´Ù.

 (type <item>)

 <type>ÀÇ ÇüŸ¦ ÀÀ´äÇÑ´Ù.

 

 W

 (while <testexpr> <expr> ....)

 <testexpr>ÀÌ nil ÀÌ µÉ ¶§±îÁö <expr>À» °è»êÇÑ´Ù.

 (write-char <num> [<file-desc>])

 ÆÄÀÏ¿¡ <num>ÀÇ ASCII Äڵ忡 ´ë´çÇÏ´Â ¹®ÀÚ¸¦ ±â·ÏÇÑ´Ù.

 (write-line <string> [<file-desc>])

 ÆÄÀÏ¿¡ <string>À» ±â·ÏÇÑ´Ù.

 

 Z

 (zerop number)

 number°¡ 0ÀÎÁö °Ë»çÇÑ´Ù.

 

AutoLISP »ç¿ë ±ÔÄ¢

ÃÖÃÊ ÀÛ¼ºÀÏ 2000.02.09

Load ÇÔ¼ö

ÃÖÁ¾ ¼öÁ¤ÀÏ 2006.03.11