重复dimaligned

clint0577 · 发表于 2022-7-6 07:20:16

我必须有2个lisp例程，我需要循环，但我需要一些帮助。这只是为了让用户不必按enter键返回命令。

; TIES TO BOUNDARY
(DEFUN C:DAT ()
(command ".osnap" "end,per")
(COMMAND "LAYER" "S" "BUILDING_LABELS" "")
(COMMAND "DIM" "RES" "HOUSE" "EXIT")
(COMMAND "DIMALIGNED")
(command ".osnap" "NOD,end,INT,CEN,mid")
)
; BUILDING DIMS
(DEFUN C:DAH ()
(command ".osnap" "mid")
(COMMAND "LAYER" "S" "BUILDING_LABELS" "")
(COMMAND "DIM" "RES" "WALLS" "EXIT")
(command ".osnap" "NOD,end,INT,CEN,mid")
(COMMAND "DIMALIGNED" "")
)

Dadgad · 发表于 2022-7-6 07:55:25

DIM的使用会继续有帮助吗？

clint0577 · 发表于 2022-7-6 08:36:07

好吧，现在我只想回去工作，试试看。英雄联盟

[编程交流] 重复dimaligned

发表回复

精选推荐