chatgpt给的lisp命令根本运行不了！

ftmm · 发表于 2023-2-8 16:59

本帖最后由 ftmm 于 2023-2-8 17:24 编辑

选择1个或者多个块，以块的基准点为基准点放大2倍。
代码：
(defun C:scc (/ ss ent)
(setq ss (ssget '((0 . "insert"))))
   (if ss
   (progn
      (setq ent (entsel "选择块: "))
      (setq ent (car ent))
      (command "_.scale" ent 2 2 2 (cdr ent))
      )
   )
(princ)
)
bug：
1 选择快的时候会选择2次，第二次才有效
2  (command "_.scale" ent 2 2 2)这一步完全执行不了。

mccad · 发表于 2023-2-8 17:42

告诉它，它就会改进

aws · 发表于 2023-2-8 20:23

提供了大致的思路，稍作修改即可使用

xyp1964 · 发表于 2023-2-8 21:34

(DEFUN C:TT ()
  (SETQ I -1)
  (IF (SETQ SS (SSGET '((0 . "INSERT"))))
(WHILE (SETQ S1 (SSNAME SS (SETQ I (1+ I))))
   (COMMAND "SCALE" S1 ""(CDR (ASSOC 10 (ENTGET S1))) 2 2)
)
  )
  (PRINC)
)

liuhe · 发表于 2023-2-8 22:17

你真以为自己不懂代码，无脑复制么，它只是提供思路，而不是完全照搬。这玩意只能取代不严谨的专业，比如自媒体之类的

超超超人1670 · 发表于 2023-2-9 13:33

国外就有人用它训练开发了一门新的编程语言。就好比手机上的相机，有人能拍好出大片的效果，你不能说相机不行吧。

cghdy · 发表于 2023-2-9 15:15

缺少训练，你问他会不会autolisp，他直接告诉你不会

超超超人1670 · 发表于 2023-2-9 16:27

你不要问他会不会，你直接让他写代码，这个就跟人家问你会不会lisp一样，你说会就叫你帮忙写代码，问多了你肯定说不会。

d1742647821 · 发表于 2023-2-9 18:27

chapgpt是连续对话的，你可以继续说让他修改

vormittag · 发表于 2023-2-14 18:30

有一个类比说得很好，这就像你看见一只猴子在沙滩上写 1+1=3，你不要嘲笑猴子愚蠢，应该对它能写出这些东西感到惊奇。要知道：

总有一天他会算对的。

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

[讨论] chatgpt给的lisp命令根本运行不了！