网站 › 『申请专区』 › 申请ID：aod321

发表于 2011-7-2 20:28

申请ID：aod321

最近想学习学习破解呀汇编什么的，发现吾爱论坛比较出色。于是就像更深入的来学习一下。本人虽然做了不少作品，但是不便公布布在网络上，就暂且发个高仿pubwin网吧收费系统挂机锁的源码吧。
源码就不提供下载了，直接贴上来
截图：_启动窗口

窗口1



为了证明该作品是我原创，我特意放上我发布该软件的地址http://bbs.netbarghost.com/forum.php?mod=viewthread&tid=16767&highlight=%B9%D2%BB%FA%CB%F8
有图为证：

————————————————————分割线——————————————————————————

.版本 2
.支持库 OPenGL
.程序集 窗口程序集1
.子程序 _按钮1_被单击
模拟键盘 (#VK_LWIN, 0, 0, 0)
模拟键盘 (#D键, 0, 0, 0)
模拟键盘 (#VK_LWIN, 0, #KEYEVENTF_KEYUP, 0)
载入 (窗口1, , 真)
销毁 ()
.子程序 _编辑框1_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型
.如果真 (键代码 ＝ 13)
    _按钮1_被单击 ()
.如果真结束

.子程序 _按钮2_被单击
销毁 ()


.子程序 __启动窗口_将被销毁
结束绘图操作 ()
.版本 2
.支持库 iext
.程序集 窗口程序集2
.程序集变量 lpOldProc, 整数型
.程序集变量 hBlackBrush, 整数型
.程序集变量 OldEditProc
.程序集变量 钩子句柄, 整数型
.程序集变量 Edit
.程序集变量 限制范围, 限制范围
.子程序 _图形按钮1_被单击
.局部变量 键代码, 整数型
.局部变量 任务栏句柄, 整数型
.如果真 (_启动窗口.编辑框1.内容 ≠ 窗口1.编辑框1.内容)
    .如果真 (窗口1.编辑框1.内容 ＝ “aod321”)
      任务栏句柄 ＝ 查找窗口_ (“Shell_TrayWnd”, 字符 (0))
      置窗口状态_ (任务栏句柄, 1)
      结束 ()
    .如果真结束
    透明标签1.标题 ＝ “解除挂机失败，请检查口令或咨询” ＋ #换行符 ＋ “服务员！”
    编辑框1.内容 ＝ “”
    返回 ()
.如果真结束
销毁 ()

.子程序 _编辑框1_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型
.如果真 (键代码 ＝ 13)
    _图形按钮1_被单击 ()
    返回 (假)
.如果真结束

.子程序 _窗口1_创建完毕
.局部变量 NULL, 整数型
.局部变量 任务栏句柄, 整数型
.局部变量 窗口大小, rect
.局部变量 空值, 整数型
.局部变量 窗口ID, 整数型
.局部变量 系统菜单句柄, 整数型
.局部变量 图片, 对象

.如果真 (钩子句柄 ＝ 0)
    钩子句柄 ＝ SetWindowsHookEx (13, &钩子函数, GetModuleHandle (0), 0)
    .如果真 (钩子句柄 ＝ 0)
      输出调试文本 (“安装钩子失败！”)
      返回 ()
    .如果真结束
.如果真结束
_时钟1_周期事件 ()
屏蔽win键 ()
屏蔽任务管理器 ()
任务栏句柄 ＝ 查找窗口_ (“Shell_TrayWnd”, 字符 (0))
置窗口状态_ (任务栏句柄, 0)
lpOldProc ＝ GetWindowLong (取窗口句柄 (), #GWL_WNDPROC)
SetWindowLong (取窗口句柄 (), #GWL_WNDPROC, 到数值 (&WndProc))
Edit ＝ 编辑框1.取窗口句柄 ()
图片.创建图片对象 (图片框1.图片)
hBlackBrush ＝ CreatePatternBrush (图片.读数值属性 (“handle”, ))
SetWindowLong (取窗口句柄 (), #GWL_WNDPROC, 到数值 (&WndProc))
.子程序 WndProc, 整数型
.参数 hwnd, 整数型
.参数 umsg, 整数型
.参数 wparam, 整数型
.参数 lparam, 整数型
.如果真 (umsg ＝ #WM_CTLCOLOREDIT)
    SetBkMode (wparam, #TRANSPARENT)
    返回 (hBlackBrush)
.如果真结束
返回 (CallWindowProcA (lpOldProc, hwnd, umsg, wparam, lparam))
.子程序 _窗口1_可否被关闭, 逻辑型
返回 (假)
.子程序 _编辑框1_内容被改变
编辑框1.重画 ()
.子程序 钩子函数, 整数型
.参数 icode, 整数型
.参数 wparam, 整数型
.参数 lparam, 整数型
.局部变量 按键信息, 按键信息
CopyMemory (按键信息, lparam, 28)
.如果真 (icode ＝ 0)
    .如果 (按键信息.message ＝ #Alt键)
      返回 (1)
    .否则
    .如果结束
    .如果 (按键信息.message ＝ #Tab键)
      返回 (1)
    .否则
    .如果结束
    .如果 (按键信息.message ＝ #Esc键)
      返回 (1)
    .否则
    .如果结束
.如果真结束
返回 (CallNextHookEx (钩子句柄, icode, wparam, lparam))
.子程序 _窗口1_将被销毁
.局部变量 任务栏句柄, 整数型
任务栏句柄 ＝ 查找窗口_ (“Shell_TrayWnd”, 字符 (0))
置窗口状态_ (任务栏句柄, 1)

.子程序 _窗口1_被激活
编辑框1.激活 ()
.子程序 _时钟1_周期事件
_按钮1_被单击 ()
.子程序 _按钮1_被单击
.局部变量 窗口大小, rect
.局部变量 空值, 整数型
.局部变量 窗口ID, 整数型
窗口ID ＝ 窗口1.取窗口句柄 ()
取窗口大小 (窗口ID, 窗口大小)
窗口大小.Top ＝ 窗口大小.Top ＋ 3
限制移动 (窗口大小)
——————————————————————分割线————————————————————
我非常希望加入论坛，很大家一起讨论学习，还望版主审核通过，谢谢。

发表于 2011-7-3 11:16

哦，晕啊。忘记写邮箱了。565493226@qq.com

发表于 2011-7-3 15:43

7月10号注册哟- -

huitian200 发表于 2011-7-3 20:53

网吧幽灵的同志啊，欢迎欢迎！

mayunshan 发表于 2011-7-4 06:31

第一次看见，希望你以后能出更多的东西

yang0317 发表于 2011-7-4 07:08

a799980990 发表于 2011-7-4 10:35

神马意思呢{:301_1009:}

发表于 2011-7-4 12:24

回复 yang0317 的帖子

不是啊，论坛发的是编译好的工具，这个是源码

发表于 2011-7-4 17:47

Pubwin的密码都能逆出来!
具体方法就是找到pubwin4早期版本.

发表于 2011-7-5 18:39

回复 Guest from 219.237.193.x 的帖子

晕，我这是仿挂机锁，不是破解密码的。不和你说这些。。。。。。。版主不会真的要我等到7月10号自己注册吧？

查看完整版本: 申请ID：aod321