绘制卫浴Lisp

neekcotrack · 发表于 2022-7-6 15:37:05

第二行spose开头的ip是否在（）中？我觉得很奇怪。

Lee Mac · 发表于 2022-7-6 15:41:15

哎呀！对不起，错过了一个括号！


(setq ent1 (entsel "\nSelect Point for Block...")
     ip   (osnap (cadr ent1) "_nea"))

Se7en · 发表于 2022-7-6 15:44:24

这将是一个变量（“IP”是一个变量的名称）。

它已经包含在paren中。SETQ可以接受多个参数[如（SETQ var1 value1 var2 value2…）AutoLisp解释器会忽略空白，因此已经为您键入了什么：

（setq ent1（entsel“\n为块选择点…”）
ip（osnap（cadr ent1）“U nea”）

在口译员看来基本上就是这样：

（setq ent1（entsel“\n为块选择点…”）ip（osnap（cadr ent1）“U nea”）