局_字节集 = 快照 (, , )
局_路径 = 取运行目录 () + “\1.bmp”
执行 (#浏览文件夹, 局_路径, , , #普通激活)
写到文件 (局_路径, 局_字节集)
处理事件 ()
局_转换数值 = 转换到JPG (局_路径, 局_路径 + “.jpg”, 假, 75, 真, 10)
文件更名 (取运行目录 () + “\” + “1.bmp.jpg”, 取运行目录 () + “\” + 到文本 (取现行时间 ()) + “.jpg”)
删除文件 (取运行目录 () + “\1.bmp”)