急需一个变量名赋予变量值

wewehua · 发表于 2019-3-2 16:40:41

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

现在程序遇到难题啦！！！紧急求助！！
原因是这样的，我想
(setq ii2 1 tcy1 1)
(repeat 10
(if (= tx5 "/")
(setq (strcat "ty" (rtos tcy1 2 0)) ii2)
(setq tcy1 (+ 1 tcy1))
))

(setq ii2 (+ 1 ii2))
)

我的构思是，第1次出现“/”，结果是ty1=ii2；第2次出现“/”，结果是ty2=ii2；以此类推。
但是问题是如果这样表达(setq (strcat "ty" (rtos tcy1 2 0)) ii2)，程序会显示出错，也没办法运行，不知道什么原因。

Lisphk · 发表于 2019-3-2 17:19:25

read函数把字符串变符号，然后用set函数赋值，比如

(set (read (strcat "ty" (rtos tcy1 2 0))) 1.0)

tzfcn · 发表于 2019-3-2 20:54:48

高招，我上次也是这个问题没有办法解决。

账号		自动登录	找回密码
密码			立即注册

[求助] 急需一个变量名赋予变量值

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。