DeepSeek能否写易语言

苏轶

书接上回，之前我发现豆包生成易语言和C++都非常拉跨：https://bbs.ijingyi.com/forum.ph ... 14862784&extra=https://bbs.ijingyi.com/forum.php?mod=viewthread&tid=14862784&extra=
于是我换DeepSeek，试试看能不能写易语言：https://www.bilibili.com/video/BV1agGw6tERq/?spm_id_from=333.1387.homepage.video_card.click&vd_source=c611867b16c2d705c65034a98c60fc1d
你们觉得DeepSeek写得怎么样

qck易语言

hcy3988 发表于 2026-8-2 18:51
主要是看什么项目跟提示词把

对，我看它的思考过程基本就是精易论坛抓代码，精易有的它就会写，没有的估计就不会了

qck易语言

苏轶 发表于 2026-8-2 19:08
你的代码存在错误：置转化进度 程序_延时都不存在

它默认用了精易模块吧，还写了个置转化进度，就是调试输出让我看

刘一缘

Autolinker

chaqing

要不看看我最近帖子?

试说心雨

得看有没有用易语言代码训练，大概率是没有的其实，与其说拿易语言代码训练，不如把易语言核心库和他底层的c代码联系起来用RAG做知识库，通过prompt+lint语法检查约束输出范式

苏轶

qck易语言 发表于 2026-8-2 18:42
deepseek可以写，这是我让它帮我写的匿名管道，图片+音乐合成视频带进度条的

[e=0].版本 2

你的代码存在错误：置转化进度 程序_延时都不存在

苏轶

qck易语言 发表于 2026-8-2 18:42
deepseek可以写，这是我让它帮我写的匿名管道，图片+音乐合成视频带进度条的

[e=0].版本 2

我试试看能不能用
为啥我的就不行呢https://www.bilibili.com/video/BV1agGw6tERq/?spm_id_from=333.1387.homepage.video_card.click&vd_source=c611867b16c2d705c65034a98c60fc1d

hcy3988

qck易语言 发表于 2026-8-2 18:42
deepseek可以写，这是我让它帮我写的匿名管道，图片+音乐合成视频带进度条的

[e=0].版本 2

主要是看什么项目跟提示词把

qck易语言

deepseek可以写，这是我让它帮我写的匿名管道，图片+音乐合成视频带进度条的

  

子程序名	返回值类型	公开	备 注
执行FFmpeg	逻辑型
参数名	类 型	参考	可空	数组	备 注
命令行文本	文本型
最终输出	文本型
退出码	整数型
图片目录	文本型

变量名	类 型	静态	数组	备 注
安全属性	SECURITY_ATTRIBUTES
启动信息	STARTUPINFO
进程信息	PROCESS_INFORMATION
hRead	整数型
hWrite	整数型
缓冲区	字节集
已读字节	整数型
可用字节	整数型
当前文本	文本型
完整输出	文本型
循环计数	整数型
行缓冲	字节集
换行位置	整数型
完整行	字节集
剩余缓冲	字节集
错误码	整数型
退出码临时	整数型

置转化进度 (“=== 开始执行FFmpeg ===”)
置转化进度 (“命令行: ” ＋ 命令行文本)
安全属性.nLength ＝ 12
安全属性.lpSecurityDescriptor ＝ 0
安全属性.bInheritHandle ＝ 真
如果真 (CreatePipe (hRead, hWrite, 安全属性, 0) ＝ 假)
置转化进度 (“创建管道失败！”)
返回 (假)
置转化进度 (“管道创建成功”)
启动信息.cb ＝ 68
启动信息.dwFlags ＝ 位或 ( #STARTF_USESHOWWINDOW, #STARTF_USESTDHANDLES )
启动信息.wShowWindow ＝ #SW_HIDE
启动信息.hStdOutput ＝ hWrite
启动信息.hStdError ＝ hWrite
如果真 (CreateProcess (0, 取运行目录 () ＋ “\ffmpeg.exe ” ＋ 命令行文本, 0, 0, 真, 0, 0, 0, 启动信息, 进程信息) ＝ 假)
置转化进度 (“创建进程失败，错误码=” ＋ 到文本 (GetLastError ()))
CloseHandle (hRead)
CloseHandle (hWrite)
返回 (假)
置转化进度 (“进程创建成功”)
CloseHandle (hWrite)
置转化进度 (“父进程写句柄已关闭”)
行缓冲 ＝ {  }
循环计数 ＝ 0
完整输出 ＝ “”
退出码 ＝ 0
判断循环首 (真)
循环计数 ＝ 循环计数 ＋ 1
如果 (循环计数 ％ 10 ＝ 0)
置转化进度 (“循环次数: ” ＋ 到文本 (循环计数))



PeekNamedPipe (hRead, 0, 0, 0, 可用字节, 0)
如果 (可用字节 ＞ 0)
置转化进度 (“管道有数据，大小=” ＋ 到文本 (可用字节))
缓冲区 ＝ 取空白字节集 (可用字节)
如果 (ReadFile_ (hRead, 缓冲区, 可用字节, 已读字节, 0) ＝ 真)
' ---------- 读取成功，处理数据 ----------
置转化进度 (“ReadFile_ 成功，读取了 ” ＋ 到文本 (已读字节) ＋ “ 字节”)
如果 (已读字节 ＞ 0)
行缓冲 ＝ 行缓冲 ＋ 取字节集左边 (缓冲区, 已读字节)
判断循环首 (真)
换行位置 ＝ 寻找字节集 (行缓冲, { 10 }, )
如果 (换行位置 ＝ -1)
跳出循环 ()
完整行 ＝ 取字节集左边 (行缓冲, 换行位置 － 1)
剩余缓冲 ＝ 取字节集右边 (行缓冲, 取字节集长度 (行缓冲) － 换行位置 － 1)
当前文本 ＝ 取字节集数据 (完整行, #文本型, )  ' 若为UTF-8请替换为编码转换
完整输出 ＝ 完整输出 ＋ 当前文本 ＋ #换行符
行缓冲 ＝ 剩余缓冲

判断循环尾 ()
置转化进度 (“ReadFile 读取了0字节”)
调试输出 (当前文本)

' ---------- 读取失败，处理错误 ----------
错误码 ＝ GetLastError ()
置转化进度 (“ReadFile_ 失败，错误码=” ＋ 到文本 (错误码))
如果 (错误码 ＝ 109)  ' 管道已关闭
' 1. 立即获取进程退出码
置转化进度 (“管道已关闭，等待进程结束...”)
WaitForSingleObject (进程信息.进程句柄, #INFINITE )
GetExitCodeProcess (进程信息.进程句柄, 退出码)
置转化进度 (“进程退出码=” ＋ 到文本 (退出码))
' 2. 尝试读取管道中可能残留的最后数据
PeekNamedPipe (hRead, 0, 0, 0, 可用字节, 0)
如果 (可用字节 ＞ 0)
置转化进度 (“发现残留数据，大小=” ＋ 到文本 (可用字节))
缓冲区 ＝ 取空白字节集 (可用字节)
如果 (ReadFile_ (hRead, 缓冲区, 可用字节, 已读字节, 0) ＝ 真)
置转化进度 (“残留数据读取成功，大小=” ＋ 到文本 (已读字节))
如果 (已读字节 ＞ 0)
行缓冲 ＝ 行缓冲 ＋ 取字节集左边 (缓冲区, 已读字节)
' 切分完整行
判断循环首 (真)
换行位置 ＝ 寻找字节集 (行缓冲, { 10 }, )
如果 (换行位置 ＝ -1)
跳出循环 ()
完整行 ＝ 取字节集左边 (行缓冲, 换行位置 － 1)
剩余缓冲 ＝ 取字节集右边 (行缓冲, 取字节集长度 (行缓冲) － 换行位置 － 1)
当前文本 ＝ 取字节集数据 (完整行, #文本型, )
完整输出 ＝ 完整输出 ＋ 当前文本 ＋ #换行符
行缓冲 ＝ 剩余缓冲

判断循环尾 ()



置转化进度 (“残留数据读取失败，放弃”)

置转化进度 (“管道已空，无残留数据”)

' 3. 处理行缓冲中最后不完整的行（无换行符）
如果 (取字节集长度 (行缓冲) ＞ 0)
置转化进度 (“处理最后剩余的行（无换行符）”)
当前文本 ＝ 取字节集数据 (行缓冲, #文本型, )
完整输出 ＝ 完整输出 ＋ 当前文本
行缓冲 ＝ {  }



跳出循环 ()  ' 管道已关闭，结束循环
' 其他错误，直接退出
置转化进度 (“非预期错误，退出循环”)
跳出循环 ()


' 管道无数据，检查进程状态
GetExitCodeProcess (进程信息.进程句柄, 退出码临时)
如果 (退出码临时 ≠ #STILL_ACTIVE )
置转化进度 (“进程已正常退出，退出码=” ＋ 到文本 (退出码临时))
' 处理最后未换行的数据
如果 (取字节集长度 (行缓冲) ＞ 0)
置转化进度 (“处理进程退出前的最后数据”)
当前文本 ＝ 取字节集数据 (行缓冲, #文本型, )
完整输出 ＝ 完整输出 ＋ 当前文本
行缓冲 ＝ {  }


退出码 ＝ 退出码临时
跳出循环 ()
' 进程仍在运行，等待
程序_延时 (10, )


判断循环尾 ()
置转化进度 (“循环结束，共循环 ” ＋ 到文本 (循环计数) ＋ “ 次”)
' 安全清理
如果真 (退出码 ＝ 0)  ' 若循环意外跳出未获取退出码，则再次尝试
WaitForSingleObject (进程信息.进程句柄, 5000)
GetExitCodeProcess (进程信息.进程句柄, 退出码)

CloseHandle (hRead)
CloseHandle (进程信息.进程句柄)
CloseHandle (进程信息.线程句柄)
置转化进度 (“资源已释放，最终退出码=” ＋ 到文本 (退出码))
最终输出 ＝ 完整输出
返回 (退出码 ＝ 0)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 执行FFmpeg, 逻辑型, 公开<br /> .参数 命令行文本, 文本型<br /> .参数 最终输出, 文本型, 参考 可空<br /> .参数 退出码, 整数型, 参考 可空<br /> .参数 图片目录, 文本型, 可空<br /> .局部变量 安全属性, SECURITY_ATTRIBUTES<br /> .局部变量 启动信息, STARTUPINFO<br /> .局部变量 进程信息, PROCESS_INFORMATION<br /> .局部变量 hRead, 整数型<br /> .局部变量 hWrite, 整数型<br /> .局部变量 缓冲区, 字节集<br /> .局部变量 已读字节, 整数型<br /> .局部变量 可用字节, 整数型<br /> .局部变量 当前文本, 文本型<br /> .局部变量 完整输出, 文本型<br /> .局部变量 循环计数, 整数型<br /> .局部变量 行缓冲, 字节集<br /> .局部变量 换行位置, 整数型<br /> .局部变量 完整行, 字节集<br /> .局部变量 剩余缓冲, 字节集<br /> .局部变量 错误码, 整数型<br /> .局部变量 退出码临时, 整数型<br /> <br /> 置转化进度 (“=== 开始执行FFmpeg ===”)<br /> 置转化进度 (“命令行: ” ＋ 命令行文本)<br /> <br /> 安全属性.nLength ＝ 12<br /> 安全属性.lpSecurityDescriptor ＝ 0<br /> 安全属性.bInheritHandle ＝ 真<br /> <br /> .如果真 (CreatePipe (hRead, hWrite, 安全属性, 0) ＝ 假)<br />     置转化进度 (“创建管道失败！”)<br />     返回 (假)<br /> .如果真结束<br /> 置转化进度 (“管道创建成功”)<br /> <br /> 启动信息.cb ＝ 68<br /> 启动信息.dwFlags ＝ 位或 (#STARTF_USESHOWWINDOW, #STARTF_USESTDHANDLES)<br /> 启动信息.wShowWindow ＝ #SW_HIDE<br /> 启动信息.hStdOutput ＝ hWrite<br /> 启动信息.hStdError ＝ hWrite<br /> <br /> .如果真 (CreateProcess (0, 取运行目录 () ＋ “\ffmpeg.exe ” ＋ 命令行文本, 0, 0, 真, 0, 0, 0, 启动信息, 进程信息) ＝ 假)<br />     置转化进度 (“创建进程失败，错误码=” ＋ 到文本 (GetLastError ()))<br />     CloseHandle (hRead)<br />     CloseHandle (hWrite)<br />     返回 (假)<br /> .如果真结束<br /> 置转化进度 (“进程创建成功”)<br /> <br /> CloseHandle (hWrite)<br /> 置转化进度 (“父进程写句柄已关闭”)<br /> <br /> 行缓冲 ＝ {  }<br /> 循环计数 ＝ 0<br /> 完整输出 ＝ “”<br /> 退出码 ＝ 0<br /> <br /> .判断循环首 (真)<br />     循环计数 ＝ 循环计数 ＋ 1<br />     .如果 (循环计数 ％ 10 ＝ 0)<br />         置转化进度 (“循环次数: ” ＋ 到文本 (循环计数))<br />     .否则<br /> <br />     .如果结束<br /> <br />     PeekNamedPipe (hRead, 0, 0, 0, 可用字节, 0)<br />     .如果 (可用字节 ＞ 0)<br />         置转化进度 (“管道有数据，大小=” ＋ 到文本 (可用字节))<br />         缓冲区 ＝ 取空白字节集 (可用字节)<br />         .如果 (ReadFile_ (hRead, 缓冲区, 可用字节, 已读字节, 0) ＝ 真)<br />             ' ---------- 读取成功，处理数据 ----------<br />             置转化进度 (“ReadFile_ 成功，读取了 ” ＋ 到文本 (已读字节) ＋ “ 字节”)<br />             .如果 (已读字节 ＞ 0)<br />                 行缓冲 ＝ 行缓冲 ＋ 取字节集左边 (缓冲区, 已读字节)<br />                 .判断循环首 (真)<br />                     换行位置 ＝ 寻找字节集 (行缓冲, { 10 }, )<br />                     .如果 (换行位置 ＝ -1)<br />                         跳出循环 ()<br />                     .否则<br />                         完整行 ＝ 取字节集左边 (行缓冲, 换行位置 － 1)<br />                         剩余缓冲 ＝ 取字节集右边 (行缓冲, 取字节集长度 (行缓冲) － 换行位置 － 1)<br />                         当前文本 ＝ 取字节集数据 (完整行, #文本型, )  ' 若为UTF-8请替换为编码转换<br /> <br /> <br />                         完整输出 ＝ 完整输出 ＋ 当前文本 ＋ #换行符<br />                         行缓冲 ＝ 剩余缓冲<br />                     .如果结束<br /> <br />                 .判断循环尾 ()<br />             .否则<br />                 置转化进度 (“ReadFile 读取了0字节”)<br />             .如果结束<br />             调试输出 (当前文本)<br /> <br />         .否则<br />             ' ---------- 读取失败，处理错误 ----------<br />             错误码 ＝ GetLastError ()<br />             置转化进度 (“ReadFile_ 失败，错误码=” ＋ 到文本 (错误码))<br />             .如果 (错误码 ＝ 109)  ' 管道已关闭<br />                 ' 1. 立即获取进程退出码<br />                 置转化进度 (“管道已关闭，等待进程结束...”)<br />                 WaitForSingleObject (进程信息.进程句柄, #INFINITE)<br />                 GetExitCodeProcess (进程信息.进程句柄, 退出码)<br />                 置转化进度 (“进程退出码=” ＋ 到文本 (退出码))<br /> <br />                 ' 2. 尝试读取管道中可能残留的最后数据<br />                 PeekNamedPipe (hRead, 0, 0, 0, 可用字节, 0)<br />                 .如果 (可用字节 ＞ 0)<br />                     置转化进度 (“发现残留数据，大小=” ＋ 到文本 (可用字节))<br />                     缓冲区 ＝ 取空白字节集 (可用字节)<br />                     .如果 (ReadFile_ (hRead, 缓冲区, 可用字节, 已读字节, 0) ＝ 真)<br />                         置转化进度 (“残留数据读取成功，大小=” ＋ 到文本 (已读字节))<br />                         .如果 (已读字节 ＞ 0)<br />                             行缓冲 ＝ 行缓冲 ＋ 取字节集左边 (缓冲区, 已读字节)<br />                             ' 切分完整行<br />                             .判断循环首 (真)<br />                                 换行位置 ＝ 寻找字节集 (行缓冲, { 10 }, )<br />                                 .如果 (换行位置 ＝ -1)<br />                                     跳出循环 ()<br />                                 .否则<br />                                     完整行 ＝ 取字节集左边 (行缓冲, 换行位置 － 1)<br />                                     剩余缓冲 ＝ 取字节集右边 (行缓冲, 取字节集长度 (行缓冲) － 换行位置 － 1)<br />                                     当前文本 ＝ 取字节集数据 (完整行, #文本型, )<br />                                     完整输出 ＝ 完整输出 ＋ 当前文本 ＋ #换行符<br />                                     行缓冲 ＝ 剩余缓冲<br />                                 .如果结束<br /> <br />                             .判断循环尾 ()<br />                         .否则<br /> <br />                         .如果结束<br /> <br />                     .否则<br />                         置转化进度 (“残留数据读取失败，放弃”)<br />                     .如果结束<br /> <br />                 .否则<br />                     置转化进度 (“管道已空，无残留数据”)<br />                 .如果结束<br /> <br />                 ' 3. 处理行缓冲中最后不完整的行（无换行符）<br />                 .如果 (取字节集长度 (行缓冲) ＞ 0)<br />                     置转化进度 (“处理最后剩余的行（无换行符）”)<br />                     当前文本 ＝ 取字节集数据 (行缓冲, #文本型, )<br />                     完整输出 ＝ 完整输出 ＋ 当前文本<br />                     行缓冲 ＝ {  }<br />                 .否则<br /> <br />                 .如果结束<br /> <br />                 跳出循环 ()  ' 管道已关闭，结束循环<br />             .否则<br />                 ' 其他错误，直接退出<br />                 置转化进度 (“非预期错误，退出循环”)<br />                 跳出循环 ()<br />             .如果结束<br /> <br />         .如果结束<br /> <br />     .否则<br />         ' 管道无数据，检查进程状态<br />         GetExitCodeProcess (进程信息.进程句柄, 退出码临时)<br />         .如果 (退出码临时 ≠ #STILL_ACTIVE)<br />             置转化进度 (“进程已正常退出，退出码=” ＋ 到文本 (退出码临时))<br />             ' 处理最后未换行的数据<br />             .如果 (取字节集长度 (行缓冲) ＞ 0)<br />                 置转化进度 (“处理进程退出前的最后数据”)<br />                 当前文本 ＝ 取字节集数据 (行缓冲, #文本型, )<br />                 完整输出 ＝ 完整输出 ＋ 当前文本<br />                 行缓冲 ＝ {  }<br />             .否则<br /> <br />             .如果结束<br />             退出码 ＝ 退出码临时<br />             跳出循环 ()<br />         .否则<br />             ' 进程仍在运行，等待<br />             程序_延时 (10, )<br />         .如果结束<br /> <br />     .如果结束<br /> <br /> .判断循环尾 ()<br /> <br /> 置转化进度 (“循环结束，共循环 ” ＋ 到文本 (循环计数) ＋ “ 次”)<br /> <br /> ' 安全清理<br /> .如果真 (退出码 ＝ 0)  ' 若循环意外跳出未获取退出码，则再次尝试<br />     WaitForSingleObject (进程信息.进程句柄, 5000)<br />     GetExitCodeProcess (进程信息.进程句柄, 退出码)<br /> .如果真结束<br /> <br /> CloseHandle (hRead)<br /> CloseHandle (进程信息.进程句柄)<br /> CloseHandle (进程信息.线程句柄)<br /> 置转化进度 (“资源已释放，最终退出码=” ＋ 到文本 (退出码))<br /> <br /> 最终输出 ＝ 完整输出<br /> 返回 (退出码 ＝ 0)