窗口程序集名 | 保 留 | 保 留 | 备 注 |
窗口程序集_启动窗口 | | |
变量名 | 类 型 | 数组 | 备 注 |
付款码hHook | 整数型 | |
判断1 | 整数型 | |
窗口_总在最前 (取窗口句柄 (),
真)付款码hHook =
SetWindowsHookExA (13, &付款码钩子,
GetModuleHandleA1 (0
), 0
)提升进程权限D2 ()|
付款码钩子 | 整数型 | |
|
nCode | 整数型 | | | |
wParam | 整数型 | | | | lParam | 整数型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 |
消息 | MSG | | |
i | 整数型 | | 3 |
键记录 | 文本型 | | |
返回值 | 整数型 | | |
字符数组 | 整数型 | | 0 |
如果真 (nCode = 0
)
CopyMemory (消息, lParam, 20
)

判断 (文本_寻找文本 ( #数字键值, 到文本 (消息.hwnd
), ,
) = -1
或 消息.hwnd = 8
或 消息.hwnd = 9
)
返回 (0
)






如果 (消息.wParam = 0
)


i
[1
] =
取启动时间 ()

返回 (1
)










如果 (取启动时间 () - i
[1
] ≤ 25
)



判断 (消息.hwnd = 48
)




键记录 = 键记录 +
“0”



加入成员 (字符数组, 消息.hwnd
)



判断 (消息.hwnd = 49
)




键记录 = 键记录 +
“1”



加入成员 (字符数组, 消息.hwnd
)



判断 (消息.hwnd = 50
)



加入成员 (字符数组, 消息.hwnd
)




键记录 = 键记录 +
“2”



判断 (消息.hwnd = 51
)



加入成员 (字符数组, 消息.hwnd
)




键记录 = 键记录 +
“3”



判断 (消息.hwnd = 52
)



加入成员 (字符数组, 消息.hwnd
)




键记录 = 键记录 +
“4”



判断 (消息.hwnd = 53
)



加入成员 (字符数组, 消息.hwnd
)




键记录 = 键记录 +
“5”



判断 (消息.hwnd = 54
)



加入成员 (字符数组, 消息.hwnd
)




键记录 = 键记录 +
“6”



判断 (消息.hwnd = 55
)



加入成员 (字符数组, 消息.hwnd
)




键记录 = 键记录 +
“7”



判断 (消息.hwnd = 56
)



加入成员 (字符数组, 消息.hwnd
)




键记录 = 键记录 +
“8”



判断 (消息.hwnd = 57
)



加入成员 (字符数组, 消息.hwnd
)




键记录 = 键记录 +
“9”



判断 (消息.hwnd = 13
) 




i
[2
] =
取文本长度 (键记录
)




判断 (i
[2
] ≤ 19
且 i
[2
] ≥ 17
)





标签1.标题 = 键记录





清除数组 (字符数组
)





键记录 =
“”





i
[2
] = 0






返回值 = 0











判断 (i
[2
] ≤ 16
且 i
[2
] ≥ 5
)




UnhookWindowsHookEx (付款码hHook
)










计次循环首 (取数组成员数 (字符数组
), i
[3
])





按键2 (字符数组
[i
[3
]], 5,
)





计次循环尾 ()




按键2 (13, 5,
)





i
[3
] = 0






键记录 =
“”





i
[2
] = 0





清除数组 (字符数组
)





返回值 = 0






付款码hHook =
SetWindowsHookExA (13, &付款码钩子,
GetModuleHandleA1 (0
), 0
)
















































UnhookWindowsHookEx (付款码hHook
)


按键2 (消息.hwnd, 5,
)



键记录 =
“”


清除数组 (字符数组
)



返回值 = 0




付款码hHook =
SetWindowsHookExA (13, &付款码钩子,
GetModuleHandleA1 (0
), 0
)







返回 (返回值)UnhookWindowsHookEx (付款码hHook
)付款码hHook =
SetWindowsHookExA (13, &付款码钩子,
GetModuleHandleA1 (0
), 0
)