[讨论]通过文本重定义为命令

gavvy · 发表于 2011-3-1 12:53

如何通过文本重定义为命令

EG:
从TXT文件中读取了字符串 "APPLE"
或 (SETQ A "APPLE")

(DEFUN A
(PRINT "AA")
)

结果为输入
(APPLE)
输出 "AA"

caoyin · 发表于 2011-3-1 15:57

(SETQ A "APPLE")

(set (read A)
(lambda()(PRINT "AA"))
)

gavvy · 发表于 2011-3-13 19:21

谢谢大大!我对你的敬仰之情犹如涛涛江水绵绵不绝!又如黄河泛滥一发不可收拾!用一个字来概括
“高”

wdq10105 · 发表于 2011-4-8 00:17

回复 caoyin 的帖子

这种情况下，要在命令栏里面输入（apple）才能显示"AA” ，有不有什么办法直接在命令栏输入apple 就可以达到效果呢，谢谢！

zark · 发表于 2011-4-10 00:11

有点意思，期待中。

gavvy · 发表于 2012-5-20 12:28

wdq10105 发表于 2011-4-8 00:17
回复 caoyin 的帖子

这种情况下，要在命令栏里面输入（apple）才能显示"AA” ，有不有什么办法直接在命令栏 ...

上面版主已经给出答案了,直接用READ 就可以实现重定义命令

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

[函数] [讨论]通过文本重定义为命令