关于在函数运行前不知道变量个数的设置

aljude

各位大神，我遇见的问题是这样的：在lisp设计的时候，我并不知道使用者会需要输入多少个变量，但是输入的变量个数是有规律的，用盖房子举个简单的例子：第一次输入楼层数，在确定楼层数后之后分别输入房间数，门数和窗户数。这样子在设置变量的的时候应该是根据第一次输入x（楼层数）确定变量一共x*3个，之后再分别输入每层房间数，门数和窗户数。
我自己的构思是用repeat或者while函数实现，比如楼层数确认为5层后，我就定义名称为lc1f(一层房间), lc1m（一层门）,lc1c（一层窗）然后分别赋值。我自己写的如下，但是（strcat）这个函数不能用作setq的symbol名称，请各位大神帮帮忙，到底是我的思路开始就不合适，有更简单的方法，还是其他问题！！

(setq msc (getint "锚索层数<0>："))
(if (null msc)
  (setq msc 0)
)
(setq k 1)
(if (/= msc 0)
  (progn
    (repeat msc
      (setq (strcat "ms" (rtos k))
             (getreal(strcat "第" (itoa k) "层锚索长度:"))
      )
      (setq k (1+ k))
    )
  )
)
这个只是局部遇见问题的地方，谢谢