简单的下载器适合做自动更新

.判断开始 (消息类型 ＝ #传送常量.下载上传开始)
进度条1.位置 ＝ 0
文件总大小 ＝ 未定义1
调试输出 (文件总大小)
调试输出 (“开始下载了”)
.判断 (消息类型 ＝ #传送常量.下载上传结束)
调试输出 (“下载结束了”)
.判断 (消息类型 ＝ #传送常量.收到数据)
标签1.标题 ＝ 到文本 (数值到格式文本 (100 × 程序集_下载对象.取已下载长 () ÷ 文件总大小, 2, 假) ＋ “%”)
进度条1.位置 ＝ 取整 (100 × 程序集_下载对象.取已下载长 () ÷ 文件总大小)