枚举驱动例子

.变量循环首 (0, Number, 1, )
Buffer ＝ Buffer ＋ 71 × 4
RtlMoveMemory (ModulesInfo, Buffer, 284)
Path ＝ 到文本 (ModulesInfo.ModuleInformation.ImageName)
.如果真 (Path ＝ “”)
到循环尾 ()
.如果真结束
调试输出 (Path, ModulesInfo.ModuleInformation.Index, ModulesInfo.ModuleInformation.dwBase, ModulesInfo.ModuleInformation.dwSize, ModulesInfo.ModuleInformation.dwFlags, ModulesInfo.ModuleInformation.Unknown, ModulesInfo.ModuleInformation.LoadCount, ModulesInfo.ModuleInformation.dwReserved, ModulesInfo.ModuleInformation.ModuleNameOffset)
.变量循环尾 ()