[LISP程序]：请教关于对话框赋值的问题

hudson

在编程过程中，参照了一本书上的程序，上面用到将dat文件中的值用循环读出，我想能否也用循环将数据中的各个数赋值在对话框中并显示，看了一些文章，中间提到了可以将sym变为字符串类型，但是不知道这种想法可行么，还是只能根据关键字，老老实实地一步步写程序，附上相关的语句
(VL-LOAD-COM)
(while (setq str (read-line fp))

(setq lt (read str))
(set  (car lt)  (cadr lt) )
(setq lt1 (car lt))
(setq lt2 (cadr lt))


(set_tile  (vl-symbol-name lt1)  (rtos lt2  2 1))
;;主要是想问一下这个语句，不知道能否用相关的语句替代，以实现功能？
);;end of while

这是dat文件，其中的car中的数据和对话框中的关键字相同的
(gd 1)
(chd 1)
(kd 1)
(xz 1)
(kd 1)

或许是我异想天开了，在此先向诸位大侠谢过了！