Live in code

发现 AutoIt 真的很强大! 整天编程的我怎么就老是忽略这个好东西呢? 完整的 api , 完整的 ui 组件. 还可以生成 exe 可执行文件. 现学现用, 写了一个内存整理的脚本. 原理是使用微软的 empty.exe 内存清理工具.
; 整理前的内存使用量
$old_mem = MemGetStats()
; 列出所有进程
$list = ProcessList()
for $i = 1 to $list[0][0]
RunWait("empty.exe " & $list[$i][1], ".", @SW_HIDE)
next
; 整理后的内存使用量
$new_mem = MemGetStats()
; 气泡显示
TrayTip("内存整理完成", "使用量从 " & $old_mem[0] & "% 降低到 " & $new_mem[0] & "%" & @LF & "现在内存占用情况 " & ($new_mem[1] - $new_mem[2]) / 1000 & "MB/" & $new_mem[1] / 1000 & "MB", 5, 0)
Sleep(5000)
执行脚本时将 empty.exe 放在脚本同一目录下, 或放在 PATH 路径中. 效果如下: