如何获取txt文件中的多行文字，并按指定条件插入

YAOSHIWEI

首先要获取 多行语言，然后用getpoint取得批文字的插入点，用getdist取得指定的字高
我的这个似乎有问题
(SETQ datafile (GETFILED ""　"" "txt" 2))
(setq ff (open datafile  "r"))
(setq aa (read-line ff))
(setq point (getpoint "请确定一点:"))
(setq hh (getdist point "\n请输入字高"))
(setq cenpt (getpoint "请求确定一点"))
(command "-mtext" point "H" hh cenpt aa  "")
(while aa
     (command aa)
     (setq aa (read-line ff))
  )
(command "")
（close ff）