VMP加壳程序开源

.判断开始 (取文本长度 (路径_编辑框.内容) ≠ 0)
加壳时间_时钟.时钟周期 ＝ 50
写到文件 (临时目录 ＋ “VMP.dll”, #VMP算法)
复制文件 (路径_编辑框.内容, 子文本替换 (路径_编辑框.内容, 取文本右边 (路径_编辑框.内容, 4), “.bak”, , , 真))
运行 (加壳命令 ＋ 临时目录 ＋ “VMP.dll” ＋ 路径_编辑框.内容 ＋ 加壳参数, 真, 1)
删除文件 (临时目录 ＋ “VMP.dll”)
文件更名 (路径_编辑框.内容, 子文本替换 (路径_编辑框.内容, 取文本右边 (路径_编辑框.内容, 4), “.vmp”, , , 真) ＋ 取文本右边 (路径_编辑框.内容, 4))
.默认
信息框 (“未指定文件名称”, 16, _启动窗口.标题, _启动窗口)
VMP加壳程序开源例子。