.版本 2
.支持库 EDataStructure
.支持库 edroptarget
.支持库 iext
.支持库 spec
.程序集 窗口程序集1
.程序集变量 hOldWndProc, 整数型
.程序集变量 long, 整数型
.程序集变量 add节点, 节点
.程序集变量 YY节点, 节点
.子程序 _窗口1_创建完毕
Creaate ()
.子程序 _窗口1_将被销毁
.子程序 Creaate
long ＝ 标签long.取窗口句柄 ()
hOldWndProc ＝ SetWindowLong (long, -4, 到数值 (&处理函数))
拖放对象1.注册拖放控件 (窗口1.取窗口句柄 ())
_拖放对象1_得到文件 (取运行目录 () ＋ “\未完成账号.txt”)
.子程序 _按钮清空_被单击
liveYY.全部删除 ()
.子程序 _按钮导入_被单击
OpenDialog.类型 ＝ 0
OpenDialog.初始目录 ＝ 取运行目录 ()
OpenDialog.过滤器 ＝ “文本文件(*.txt)|*.txt”
.如果真 (OpenDialog.打开 ())
线程_启动 (&Insert)
' 导入 ＝ 真
.如果真结束
.子程序 处理函数, 整数型
.参数 hwnd, 整数型, , 要接收消息的那个窗口的句柄
.参数 wMsg, 整数型, , 消息的标识符
.参数 peid, 整数型, , 具体取决于消息
.参数 addeax, 整数型, , 具体取决于消息;
.局部变量 xx, 整数型
.局部变量 addyy, 整数型
.局部变量 handle, 整数型
.如果真 (wMsg ＝ 4097)
.如果真 (addeax ＞ 0)
add节点.加入属性 (进制_十到十六 (addeax), 到文本 (peid))
.如果真结束
.如果真结束
返回 (CallWindowProcA (hOldWndProc, hwnd, wMsg, peid, addeax))
.子程序 _按钮start_被单击
start ()
.子程序 start
.局部变量 YYPID, 整数型, , "0"
.局部变量 I
.局部变量 N
.局部变量 ADD, 整数型
.局部变量 PEID, 整数型
.局部变量 bool, 逻辑型
I ＝ 进程_取ID数组 (“YY.EXE”, YYPID, 假)
.如果真 (I ＝ 0)
log (“YY.exe没有运行”)
返回 ()
.如果真结束
.' 如果真 (CreateDM () ＝ 假)
' 返回 ()
.如果真结束
.计次循环首 (I, N)
PEID ＝ YYPID [N]
ADD ＝ Getyyadd (PEID)
调试输出 (进制_十到十六 (ADD))
.如果真 (ADD ＞ 0)
bool ＝ 线程_DLLYY (PEID, 取运行目录 () ＋ “\lol.dll”, “Load”, ADD, long, PEID)
.如果真结束
.计次循环尾 ()
.如果真 (bool ＝ 真)
时钟1.时钟周期 ＝ 3000
.如果真结束
WORKID ＝ 线程_启动 (&work)
.子程序 work
.局部变量 user, 文本型
.局部变量 pass, 文本型
.局部变量 帐号总数, 整数型
.局部变量 N, 整数型
.局部变量 当前, 整数型
帐号总数 ＝ list.取表项数 ()
.计次循环首 (帐号总数, N)
当前 ＝ N － 1
user ＝ list.取标题 (当前, 1)
pass ＝ list.取标题 (当前, 2)
kp_登陆帐号 (user, pass)
调试输出 (user, pass)
.计次循环尾 ()
.子程序 _时钟1_周期事件
读取YY子程序 ()
.子程序 读取YY子程序
.局部变量 addarr, 文本型, , "0"
.局部变量 add总数, 整数型
.局部变量 N, 整数型
.局部变量 PEID, 文本型
.局部变量 YYadd, 文本型
.局部变量 IDYY, 整数型
.局部变量 bzid, 整数型
.局部变量 YY, 文本型
add节点.取全部属性名 (addarr)
add总数 ＝ 取数组成员数 (addarr)
.计次循环首 (add总数, N)
YYadd ＝ addarr [N]
add节点.取文本值 (YYadd, PEID)
.如果真 (读内存YY (到整数 (PEID), 进制_十六到十 (YYadd), IDYY, bzid))
add节点.删除属性 (YYadd)
.如果真 (IDYY ＞ 100000 且 bzid ＜ 256)
YY ＝ 到文本 (IDYY)
.如果 (选择框过.选中 ＝ 真)
.如果真 (过滤YY号 (YY) ＝ 假)
showYY (YY)
.如果真结束
.否则
showYY (YY)
.如果结束
.如果真结束
.如果真结束
.计次循环尾 ()
.子程序 showYY
.参数 st, 文本型
.局部变量 xx, 整数型
.局部变量 I, 整数型
.局部变量 ARR, 文本型, , "0"
.局部变量 N, 整数型
.局部变量 YYB, 文本型
xx ＝ liveYY.插入表项 (-1, , , , , )
liveYY.置标题 (xx, 0, st)
.子程序 过滤YY颜色, 逻辑型
.参数 bzid, 整数型
.局部变量 bool, 逻辑型
' bool ＝ 假
.判断开始 (bzid ＝ 25)
.如果真 (选择框白.选中 ＝ 真)
返回 (真)
.如果真结束
.判断 (bzid ＝ 66)
.如果真 (选择框绿.选中 ＝ 真)
返回 (真)
.如果真结束
.判断 (bzid ＝ 88)
.如果真 (选择框亮.选中 ＝ 真)
返回 (真)
.如果真结束
.判断 (bzid ＝ 100)
.如果真 (选择框蓝.选中 ＝ 真)
返回 (真)
.如果真结束
.判断 (bzid ＝ 150)
.如果真 (选择框粉.选中 ＝ 真)
返回 (真)
.如果真结束
.判断 (bzid ＝ 175)
.如果真 (选择框红.选中 ＝ 真)
返回 (真)
.如果真结束
.判断 (bzid ＝ 200)
.如果真 (选择框黄.选中 ＝ 真)
返回 (真)
.如果真结束
.判断 (bzid ＝ 230)
.如果真 (选择框橙.选中 ＝ 真)
返回 (真)
.如果真结束
.判断 (bzid ＝ 255)
.如果真 (选择框紫.选中 ＝ 真)
返回 (真)
.如果真结束
.默认
返回 (假)
.判断结束
返回 (假)
.子程序 _按钮导出_被单击
.局部变量 arr, 文本型, , "0"
.局部变量 I
.局部变量 tFileh
.局部变量 YY, 文本型
.局部变量 N, 整数型
tFileh ＝ 打开文件 (取运行目录 () ＋ “\” ＋ 到文本 (取时间部分 (取现行时间 (), 5)) ＋ “未加完.txt”, 5, 1)
I ＝ liveYY.取表项数 ()
.计次循环首 (I, N)
YY ＝ liveYY.取标题 (N － 1, 0)
写文本行 (tFileh, YY)
.计次循环尾 ()
关闭文件 (tFileh)
log (“未加完的YY号保存完毕”)