开发工具:
文件大小: 17kb
下载次数: 0
上传时间: 2013-08-17
详细说明: .版本 2 .程序集 窗口程序集1 .程序集变量 程序集_文件号, 整数型 .程序集变量 程序集_控制, 逻辑型 .程序集变量 程序集_缓存, 字节集 .程序集变量 程序集_读取位置, 整数型 .程序集变量 程序集_使用时间, 整数型 .子程序 __启动窗口_创建完毕 组合框_效验方式.加入项目 (“无效验”, 0) 组合框_效验方式.加入项目 (“奇效验”, 1) 组合框_效验方式.加入项目 (“偶效验”, 2) 组合框_效验方式.加入项目 (“标志效验”, 3) 组合框_效验方式.加入项目 (“空白效验”, 4) 组合框_效验方式.现行选中项 = 2 程序集_缓存 = 取空白字节集 (1028) .如果真 (文件是否存在 (取运行目录 () + “\CRC32.DLL”) = 假) .如果真 (写到文件 (取运行目录 () + “\CRC32.DLL”, #资源_CRC) = 假) 信息框 (“创建CRC32效验程序失败!”, #错误图标, ) 返回 () .如果真结束 .如果真结束 .子程序 __启动窗口_将被销毁 端口1.停止 () 关闭所有文件 () .子程序 _按钮_断开_被单 击 端口1.停止 () 关闭所有文件 () 按钮_读取.禁止 = 真 按钮_断开.禁止 = 真 按钮_连接.禁止 = 假 .子程序 _端口1_数据到达 .参数 数据字节值, 整数型 .如果真 (程序集_控制 = 真) 程序集_缓存 = 程序集_缓存 + 到字节集 (到字节 (数据字节值)) .如果真 (取字节集长度 (程序集_缓存) = 1028) .如果真 (DLL命令1 (取字节集左边 (程序集_缓存, 1024), 1024) ≠ 取字节集数据 (取字节集右边 (程序集_缓存, 4), #整数型, )) 信息框 (“无法验证”, 0, ) 返回 () .如果真结束 插入字节集 (程序集_文件号, 取字节集左边 (程序集_缓存, 1024)) 进度条1.位置 = 进度条1.位置 + 1 程序集_缓存 = { } 程序集_读取位置 = 程序集_读取位置 + 4 .如果真 (程序集_读取位置 ≠ 53248) 端口1.发送数据 ({ 45, 0 } + 取字节集左边 (到字节集 (程序集_读取位置), 2) + { 191, 0, 4 }) 返回 () .如果真结束 信息框 (“文件输出完成! 用时” + 到文本 ((取启动时间 () - 程序集_使用时间) \ 1000) + “秒”, #信息图标, “成功”) 连续赋值 (假, 按钮_断开.禁止, 按钮_取消.禁止, 按钮_浏览.禁止, 按钮_读取.禁止) 返回 () .如果真结束 返回 () .如果真结束 .如果真 (程序集_控制 = 假 且 数据字节值 = 66) 端口1.发送数据 (到字节 (99)) 端口1.发送数据 (到字节 (10)) .如果真结束 .如果真 (程序集_控制 = 假 且 数据字节值 = 76) 端口1.发送数据 (到字节 (99)) 端口1.发送数据 (到字节 (10)) .如果真结束 .如果真 (程序集_控制 = 假 且 数据字节值 = 58) 端口1.发送数据 (到字节 (117)) 端口1.发送数据 (到字节 (112)) 端口1.发送数据 (到字节 (10)) .如果真结束 .如果真 (程序集_控制 = 假 且 数据字节值 = 10) 端口1.发送数据 (到字节 (30)) .如果真结束 .如果真 (程序集_控制 = 假 且 数据字节值 = 30) 程序集_控制 = 真 连续赋值 (假, 按钮_断开.禁止, 按钮_读取.禁止, 按钮_浏览.禁止, 按钮_取消.禁止) 按钮_连接.禁止 = 真 .如果真结束 .子程序 _按钮_连接_被单击 .如果真 (端口1.启动 () = 假) 信息框 (“串口无法打开!”, #错误图标, “端口错误”) 返回 () .如果真结束 连续赋值 (真, 按钮_连接.禁止, 按钮_读取.禁止) 连续赋值 (假, 按钮_断开.禁止, 按钮_取消.禁止) .子程序 _按钮_取消_被单击 结束 () .子程序 _按钮_读取_被单击 .如果真 (编辑框_文件名.内容 = “”) 信息框 (“请选择文件路径以及文件名!”, #错误图标, “选择文件”) 返回 () .如果真结束 程序集_文件号 = 打开文件 (编辑框_文件名.内容, #重写, ) .如果真 (程序集_文件号 = 0) 信息框 (“创建文件失败!”, #错误图标, ) 返回 () ...展开收缩
(系统自动生成,下载前可以参看下载内容)
下载文件列表
相关说明
- 本站资源为会员上传分享交流与学习,如有侵犯您的权益,请联系我们删除.
- 本站是交换下载平台,提供交流渠道,下载内容来自于网络,除下载问题外,其它问题请自行百度。
- 本站已设置防盗链,请勿用迅雷、QQ旋风等多线程下载软件下载资源,下载后用WinRAR最新版进行解压.
- 如果您发现内容无法下载,请稍后再次尝试;或者到消费记录里找到下载记录反馈给我们.
- 下载后发现下载的内容跟说明不相乎,请到消费记录里找到下载记录反馈给我们,经确认后退回积分.
- 如下载前有疑问,可以通过点击"提供者"的名字,查看对方的联系方式,联系对方咨询.