11. Ãâ·Â ÇÔ¼ö

¹®ÀÚ¿­À» È­¸é¿¡ µð½ºÇ÷¹ÀÌÇϰųª, º¯¼ö¿¡ ÁöÁ¤µÈ °ªÀ» È­¸é¿¡ Ãâ·ÂÇÏ´Â ÇÔ¼öµéÀÌ´Ù.

Ãâ·Â ÇÔ¼ö´Â princ, prin1, print, promptÀÇ 4 Á¾·ù°¡ ÀÖÀ¸¸ç, ¸ðµÎ ÁöÁ¤ÇÏ´Â ³»¿ëÀ» È­¸é¿¡ ³ªÅ¸³»Áö¸¸,

ó¸®ÇÏ´Â ¹æ½Ä¿¡¼­ Â÷ÀÌ°¡ ÀÖ´Ù.

 

**Âü°í

Á¦¾î ¹®ÀÚ

ÀÇ       ¹Ì

   \\

   \

   \"

   ""

   \e

   Escape

   \n

   New Line, ´ÙÀ½ÁÙ¿¡ Ç¥½Ã.

   \r

  Return Key·Î µ¿ÀÛ

   \t

  Tab, Á¤ÇØÁø °£°Ý¸¸Å­ ¿À¸¥ÂÊÀ¸·Î À̵¿

   \nnn

 

 

(1) Princ

    (1) ±â´É

      Princ´Â ""¸¦ ¹«½ÃÇÑ ³»¿ëÀ» Ãâ·ÂÇÏ°í, °³Çà ¹®ÀÚ¸¦ ¼öÇàÇϸç, ÀÚ½ÅÀ» ÇÑ ¹ø ´õ ¹Ýº¹ÇÑ´Ù.

    (2) »ç¿ë

      (princ "Expression")

    (3) ¿¹

       (Princ "Hello LISP \n Hi LSIP")

       ; Hello LISP
          Hi LSIP"Hello LISP \n Hi LSIP"

       (princ "Hi lisp")

       ;  Hi lisp"Hi lisp"

       (setq a 252000)

       ;  !a   :   252000

       (princ a)

       ;  252000252000

       (setq cha "autolisp")

       ;  !cha   :   "autolisp"

       (princ cha)

       ;  autolisp"autolisp"

       (princ cha)(princ)

       ;  autolisp

       (princ (+ a 100))(princ)

       ;  252100

     

    ** Âü°í : Princ, Prin1, PrintÀÇ Ãâ·Â ³»¿ë ¹Ýº¹À» Á¦°ÅÇϱâ À§ÇÏ¿© Princ, Prin1, Print¸¦ Çѹø ´õ »ç¿ëÇÑ´Ù.

    ** Âü°í : AutoLISP ÇÁ·Î±×·¥ÀÌ ½ÇÇàÀ» ¸¶Ä¥ ¶§´Â Ç×»ó "nil"À» È­¸é¿¡ Ç¥½ÃÇϴµ¥, ¸¶Áö¸· ºÎºÐ¿¡ À§ÀÇ È­¸é

    princ ¸í·É¾î¸¦ Àû¾îµÎ¸é ½ÇÇà ÈÄ "nil" Ç¥½Ã°¡ ³ªÅ¸³ªÁö ¾Ê´Â´Ù. 

 

 

(2) Prin1

    (1) ±â´É :

      Prin1Àº ""¸¦ Æ÷ÇÔÇÑ ³»¿ëÀ» Ãâ·ÂÇÏ°í, °³Çà ¹®ÀÚ¸¦ ¹«½ÃÇϸç, ÀÚ½ÅÀ» ÇÑ ¹ø ´õ ¹Ýº¹ÇÑ´Ù.

    (2) »ç¿ë¹ý

      (prin1 "Expression")

    (3) ¿¹

       (prin1 "Hello LISP \n Hi LISP")

       ; "Hello LISP \n Hi LISP""Hello LISP \n Hi LISP"

       (prin1 "Hi LISP")

       ; "Hi LISP""Hi LISP"

       (setq a 2000)

       ; !a   :   2000

       (prin1 a)

       ; 20002000

       (setq cha "autolisp")

       ; !cha   :   "autolisp"

       (prin1 cha)

       ; "autolisp""autolisp"

       (prin1 "autolisp")(prin1)

       ; "autolisp"

       (prin1 "autolisp")(princ)

       ; "autolisp"

       (princ "autolisp")(princ)

       ;  autolosp

       (princ (+ a 100))(princ)

       ;  2100

       

 

(3) Print

    (1) ±â´É

      Print´Â ""¸¦ Æ÷ÇÔÇÑ ³»¿ëÀ» Ãâ·ÂÇÏ°í, °³Çà ¹®ÀÚ¸¦ ¹«½ÃÇϸç, ÀÚ½ÅÀ» Çѹø ´õ ¹Ýº¹Çϸ鼭

      ÇÑ ÁÙÀÇ °ø¹é°ú ÇÑ Ä­ÀÇ °ø¹éÀ» µÐ´Ù.

    (2) »ç¿ë¹ý

      (print "Expression")

    (3) ¿¹

       (print "Hello LISP \n Hi LISP")

       ; "Hello LISP \n Hi LISP"   "Hello LISP \n Hi LISP"

       (print "Hi LISP")

       ; "Hi LISP"   "Hi LISP"

       (setq a 262000)

       ; !a   :   262000

       (print a)

       ; 262000   262000

       (setq cha "autolisp")

       ; !a   :   "autolisp"

       (print cha)

       ; "autolisp"   "autolisp"

       (print "autolisp")(print)

       ; "autolisp"

       (print "autolisp")(prin1)

       ; "autolisp"

       (pinc "autolisp")(print)

       ;  autolisp

       (princ (+ a 100))(princ)

       ;  252100

     

 

(4) Prompt

    (1)  ±â´É

      ¹®ÀÚ¿­À» Ãâ·ÂÇϱâ À§ÇÑ ÇÔ¼öÀ̸ç, Ãâ·Â ³»¿ëÀº ¹®ÀÚ¿­¸¸ °¡´ÉÇÏ´Ù.

    (2) »ç¿ë¹ý

      (Prompt "Expression")

    (3) ¿¹Á¦

       (setq num 262000)

       ; !num   :   262000

       (prompt num)

       ; error: bad argument type
         (PROMPT A)
         *Cancel*

       (prompt 262000)

       ; error: bad argument type
         (PROMPT 262000)
         *Cancel*

       (prompt "autolisp")

       ; autolispnil

       (setq cha "autolisp")

       ; !cha   :   "autolisp"

       (prompt cha)

       ; autolispnil

       (prompt cha)(princ)

       ; autolisp

       (prompt "\n autolisp")

       ; autolispnil

     

     

(5) ¿¹Á¦ ÇÁ·Î±×·¥
 

       

       (defun c:sample()

          (prompt " Loaded..")

          (prompt "\n By PNP")

          (princ "\n Copytight 2000")

          (princ)

       )

       

       

      Command: sample

       Loaded..

       By PNP

       Copytight 2000

     

     

 

Defun ÇÔ¼ö

ÃÖÃÊ ÀÛ¼ºÀÏ 2000.02.08

ÀÔ·Â ÇÔ¼ö

ÃÖÁ¾ ¼öÁ¤ÀÏ 2006.04.10