initget
(initget [bits] [string]) -get°ü·ÃÇÔ¼ö¸¦ »ç¿ëÇÒ¶§ ÀԷ¿¡ ´ëÇÑ »óŸ¦ Á¦¾îÇÕ´Ï´Ù.
-ÀÌ ÇÔ¼ö´Â getstring °ú getvar ÇÔ¼ö¸¦ Á¦¾îÇÏÁö´Â ¾Ê½À´Ï´Ù. -Ç×»ó nil À» ÀÀ´äÇÏÁö¸¸ bit¼ö¸¦ Á¶ÇÕÇÏ¿© ±â´ÉµéÀ» ½ÇÇà½Ãų ¼ö ÀÖ½À´Ï´Ù. -[bits] °¡ »ý°½ÀÌ µÇ¸é 0À¸·Î °£ÁÖ
command : (initget (+ 1 2 4))
command : (setq money (getint "how much?")) money º¯¼ö¿¡ null °ú 0°ª°ú À½¼ö°ªÀ» ¹ÞÁö ¸øÇÕ´Ï´Ù.
[string] ¿¡´Â getÇÔ¼ö·Î ÀÔ·ÂÀ» ¹ÞÀ»¶§ ´ÜÃàÅ°ÀÇ ¾àÀÚ¸¦ ÁöÁ¤ÇÒ¼ö ÀÖ½À´Ï´Ù. ´ë¹®ÀÚ·Î ÁöÁ¤ÇÑ °ÍÀÌ ¾àÀÚ·Î ¼±Á¤µÇ¸ç ´Ù¸¥ ¾àÀÚ¿Í´Â °ø¹éÀ¸·Î ±¸ºÐÇÕ´Ï´Ù. command : (initget 1 "Yes No")
command : (setq st (getword "Yes or No<Y/N>")) initget ÇÔ¼ö´Â ´ÙÀ½¿¡ ¿À´Â get°ü·Ã ÇÔ¼ö¿¡ Çѹø¸¸ ¿µÇâÀ» ÁÝ´Ï´Ù. ------------------------------------------------------ getword (getword ["prompt"]) initget¿¡¼ ¹Ì¸® ±× ¾àÀÚ°ªÀÌ ¼³Á¤µÇ¾îÀÖ¾î¾ßÇÕ´Ï´Ù.
initget¿¡¼ ÇÒ´çµÈ ´ÜÃàÅ°¸¦ ¹ÞÀ»¼ö ÀÖ°Ô ÀԷ¹®À» ½á³Ö´Â´Ù°í º¸½Ã¸éµË´Ï´Ù. command : (initget 1 "Yes No")
command : (setq st (getword "Yes or No<Y/N>")) |