[求助]：想设置一个全局变量

skywaycao · 发表于 2005-5-24 10:01:26

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

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

×

想设置一个出图比例的全局变量ps，调用其他的lisp程序的时候，线宽等设置就根据ps自动设置

[PHP]

(defun c:plotscale ( / ps)
  (setq ps (getreal
   "\nSpecify plot scale: "
   )
  ))

[/PHP]

这样设置的话是局部变量，

[PHP]

(defun c:plotscale (  ps)
  (setq ps (getreal
   "\nSpecify plot scale: "
   )
  ))

[/PHP]

如果改为全局变量的话，每次调用程序时都要加初始值，这样很不方便，
麻烦大家帮我写两句，谢谢了

lijiao · 发表于 2005-5-24 10:51:41

我觉得你这个变量最好要随图一起保存，在这种情况下，可以保存为LDATA数据或者XRDATA数据。

xiao_longxin · 发表于 2005-5-24 11:09:50

(setvar "userr1" (getreal
"\nSpecify plot scale: "
) )

skywaycao · 发表于 2005-5-25 08:31:04

xiao_longxin 兄，好像不行呀，
我运行后，在cad中查 userr1 的值为 nil , 麻烦解释一下，谢谢

xiao_longxin · 发表于 2005-5-26 18:56:12

userr1是系统变量，用(setq blc (getvar "userr1"))取得

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

[求助] [求助]：想设置一个全局变量

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

相关帖子

浏览过的版块