[求助]：请教，如何把前面输入的数据保存下来

zhouri

rt，如offset命令那样，默认是前面的数值。

程序该如何实现。

lsjjm

请参考：
OFFSETDIST
Type: Real
Not saved
Initial value: 1.0000
Sets the default offset distance.

<0  Offsets an object through a specified point
>0  Sets the default offset distance

ll_j

最初由 zhouri 发布
[B]rt，如offset命令那样，默认是前面的数值。

程序该如何实现。 [/B]

Offset保存距离是使用的系统变量，这些变量都是有确定用途的，你如果设置的用途与命令所使用的系统变量用途相同，可以借用这些系统变量。如果你在一张打开的图形中，使用“全局变量”可以达到相同的效果，随着图形关闭，全局变量不再保存，如果你想一直保存，可以使用Acad为用户保留的几个系统变量－userr1～5等，也可以自己保存到一个文件中供以后调用。

xyp1964

[php]
(defun c:test (/)
  ;;程序内容
  ;;……
  (setq NO1 (@ureal 1 "" "\两点距离" NO1))
  ;;程序内容
  ;;……
)

(defun @ureal (bit kwd msg def / inp)
  (if def
    (setq msg (strcat "\n" msg "<" (rtos def 2) ">: ")
          bit (* 2 (fix (/ bit 2)))
    )
    (setq msg (strcat "\n" msg ": "))
  )
  (initget bit kwd)
  (setq inp (getreal msg))
  (if inp
    inp
    def
  )
)
[/php]

hyx_lyn

3楼你说的Acad为用户保留的几个系统变量－userr1～5等，我还是第一次知道，还有其它的变量吗，在程序关闭后变量中的数值会保存吗？

xyp1964

最初由 hyx_lyn 发布
[B]3楼你说的Acad为用户保留的几个系统变量－userr1～5等，我还是第一次知道，还有其它的变量吗，在程序关闭后变量中的数值会保存吗？ [/B]

USERI1～5：
类型：整数
保存位置：图形
初始值： 0
USERI1、USERI2、USERI3、USERI4 和 USERI5 用于整型值的存储和提取。

USERR1～5：
类型：实数
保存位置：图形
初始值： 0.0000
USERR1、USERR2、USERR3、USERR4 和 USERR5 用于实数值的存储和提取。

USERS1～5：
类型：字符串
不保存
初始值： ""
USERS1、USERS2、USERS3、USERS4 和 USERS5 用于字符串数据的存储和提取。