31 lines
379 B
Markdown
31 lines
379 B
Markdown
|
```Lisp
|
||
|
|
|
||
|
|
(defun c:hello ()
|
||
|
|
|
||
|
|
(setq name (getstring "\n당신의 이름을 입력 : "))
|
||
|
|
(setq msg (strcat name "님 안녕하세요"))
|
||
|
|
|
||
|
|
(alert msg)
|
||
|
|
(princ)
|
||
|
|
|
||
|
|
; 주석
|
||
|
|
|
||
|
|
)
|
||
|
|
|
||
|
|
```
|
||
|
|
|
||
|
|
- defun
|
||
|
|
> 기능 추가
|
||
|
|
|
||
|
|
- setq
|
||
|
|
> 변수에 값 저장
|
||
|
|
|
||
|
|
- getstring
|
||
|
|
> 키보드 입력값 받기
|
||
|
|
|
||
|
|
- strcat
|
||
|
|
> 문자열 결합
|
||
|
|
|
||
|
|
|
||
|
|
- princ
|
||
|
|
> nil 출력 방지(princ), 커맨드창에 출력 (princ msg)
|