文件内容批量搜索替换工具

.计次循环首 (超级列表框1.取表项数 (), 循环计次)
.如果真 (是否停止 ＝ 真)
跳出循环 ()
.如果真结束
bin ＝ 读入文件 (超级列表框1.取标题 (循环计次 － 1, 0))
bin2 ＝ 子字节集替换 (bin, 到字节集 (编辑框3.内容), 到字节集 (编辑框4.内容), , )
.如果 (bin ≠ bin2)
.如果真 (写到文件 (超级列表框1.取标题 (循环计次 － 1, 0), bin2))
num ＝ num ＋ 1
.如果真结束
超级列表框1.置标题 (循环计次 － 1, 3, “已替换”)
.否则
超级列表框1.置标题 (循环计次 － 1, 3, “忽略”)
.如果结束
超级列表框1.保证显示 (循环计次 － 1)
.计次循环尾 ()