进程列表 ＝ 取系统进程列表 ()
临时名称 ＝ 取执行文件名 ()
.计次循环首 (取数组成员数 (进程列表), 成员)
临时文本 ＝ 临时文本 ＋ 进程列表 [成员].进程名称
.计次循环尾 ()
第一位置 ＝ 寻找文本 (临时文本, 临时名称, , 真)
第二位置 ＝ 寻找文本 (临时文本, 临时名称, 第一位置 ＋ 2, 真)
.如果真 (第二位置 ＞ 第一位置)
信息框 (“该程序正在运行中...” ＋ #换行符 ＋ “请不要重复运行...”, #警告图标, “提示信息”)
结束 ()
上一篇 批量打乱文件数据工具