明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
12
返回列表 发新帖
楼主: su37

[讨论] deepseek写的程序,在cad中运行后总是提示:读入的 (八进制) 字符不正确

[复制链接]
发表于 昨天 20:17 来自手机 | 显示全部楼层
没细看代码。前几天也试用DeepSeek写代码,感觉其能力比其它ai强,最最主要的是把自己的语言类型及功能要求简洁地描述清楚
回复 支持 反对

使用道具 举报

发表于 昨天 20:19 | 显示全部楼层
你试一下另存看看
回复 支持 反对

使用道具 举报

发表于 昨天 20:53 | 显示全部楼层
找个软件直接打开db文件,然后另存为,再把原db文件删除,将另存的改名。写啥lisp代码
回复 支持 反对

使用道具 举报

发表于 17 小时前 | 显示全部楼层
GEGEYANG88 发表于 2025-2-2 13:07
DEEPSEEK是个国际玩笑

凭什么你这么贬低deepseek?张口就来吗?
回复 支持 反对

使用道具 举报

 楼主| 发表于 9 小时前 | 显示全部楼层
经过我的几轮问答,deepseek终于给出了正确解。总结,deepseek还是很厉害的,远远强于其他AI,编程方面尤为突出。难怪老美怕的要死

(defun c:ForceSetTime (/ oldfile newfile randomNum newFileName)
  ;; 获取原文件的完整路径
  (setq oldfile (strcat (getvar "DWGPREFIX") (getvar "DWGNAME")))
  
  ;; 检查是否已经保存了初始文件名
  (if (not (boundp '*initialFileName*))
    (setq *initialFileName* (getvar "DWGNAME")) ; 如果是第一次运行,保存初始文件名
  )
  
  ;; 生成5个随机阿拉伯数字(范围:10000 到 99999)
  (setq randomNum (itoa (+ 10000 (fix (* (rem (getvar "CPUTICKS") 1e6) 0.9)))))
  
  ;; 生成新的文件名,格式为 "2025-5个随机数字-初始文件名"
  (setq newFileName (strcat (getvar "DWGPREFIX") "2025-" randomNum "-" *initialFileName*))
  
  ;; 另存为新文件
  (command "_.SAVEAS" "" newFileName)
  
  ;; 使用PowerShell修改原文件的最后修改时间
  (startapp
    (strcat
      "powershell.exe -NoExit -Command \"(Get-Item '"
      oldfile
      "').LastWriteTime = Get-Date\""
    )
  )
  
  (alert "原文件时间已修改,请手动删除临时文件。")
)
回复 支持 反对

使用道具 举报

发表于 9 小时前 | 显示全部楼层
(alert "原文件时间已修改,请手动删除临时文件。")
为什么还要用手动解决问题?难怪老美怕的要死。
回复 支持 反对

使用道具 举报

 楼主| 发表于 9 小时前 | 显示全部楼层
GEGEYANG88 发表于 2025-2-3 12:48
(alert "原文件时间已修改,请手动删除临时文件。")
为什么还要用手动解决问题?难怪老美怕的要死。

说话好好说,我说的是deepseek这个软件编程厉害,和为什么还要用手动解决问题有毛关系,不愿意听就别进来
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2025-2-3 22:08 , Processed in 0.143162 second(s), 19 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表