고수님들께 해석을 부탁 드립니다.

1(defun C:TAH(/ ents nent ypnt count ent old10 old11 old72 new10 2new11)
3(setq ents (ssget))
4(setq nent (sslength ents))
5(setq ypnt (getpoint “nPick Point: “))
6(setq count 0)
7(repeat nent
8(setq ent (entget (ssname ents count)))
9(if (= “TEXT” (cdr (assoc 0 ent)))
10(progn
11 (setq old10 (assoc 10 ent))
12 (setq old11 (assoc 11 ent))
13 (setq old72 (assoc 72 ent))
14 (setq old73 (assoc 73 ent))
15 (setq new10 (cons 10 (list (car (cdr old10)) (cadr ypnt))))
16 (setq new11 (cons 11 (list (car (cdr old11)) (cadr ypnt))))
17 (if (and (= (cdr old72) 0) (= (cdr old73) 0))
18 (setq ent (subst new10 old10 ent))
19 (progn
20 (setq ent (subst new11 old11 ent))
21 (setq ent (subst (cons 73 0.2) old73 ent))
22 ) ;of progn
23 ) ;of if
24 (entmod ent)
25 ) ;of progn
26 ) ;of if
27 (setq count (+ count 1))
28);of repeat
29(princ)
———————————————–
질문입니다.29개의 라인중 텍스트의 줄간격을 조절할수 있는
부분이 어디인지 궁굼합니다..
아직 초보라서 너무 어렵네요..