开发工具:
文件大小: 360kb
下载次数: 0
上传时间: 2013-02-27
详细说明： .版本 2 .支持库 EThread .程序集 窗口程序集1 .程序集变量 飞记录小窗口状态, 逻辑型 .程序集变量 dm, 大漠插件 .程序集变量 飞句柄, 整数型 .程序集变量 飞切换标志, 整数型 .程序集变量 飞线程ID, 整数型 .子程序 __启动窗口_创建完毕 .局部变量 飞防重复, 文本型 .局部变量 飞标题, 文本型 飞切换标志 ＝ 0 飞记录小窗口状态 ＝ 假 飞标题 ＝ “初学计牌” 飞防重复 ＝ dm.方法_EnumWindow (0, 飞标题, “”, 1) 标题 ＝ 飞标题 .如果真 (飞防重复 ≠ “”) 信息框 (“已经开启，无需重复”, 0, ) 结束 () .如果真结束 载入 (窗口1, _启动窗口, 假) 飞初始化基址偏移 () ' 时钟1.时钟周期 ＝ 1000 启动线程 (&飞线程一, , 飞线程ID) .子程序 __启动窗口_位置被改变 .如果真 (_启动窗口.位置 ＝ 2) ' 最小化 _启动窗口.位置 ＝ 0 _启动窗口.可视 ＝ 假 飞记录小窗口状态 ＝ 窗口1.可视 窗口1.可视 ＝ 假 置托盘图标 (#图标1, “记牌器”) .如果真结束 .如果真 (_启动窗口.位置 ＝ 3) ' 最大化 _启动窗口.位置 ＝ 0 .如果 (_启动窗口.高度 ＞ 40) _启动窗口.高度 ＝ 20 .否则 _启动窗口.高度 ＝ 309 .如果结束 .如果真结束 .子程序 __启动窗口_托盘事件 .参数 操作类型, 整数型 .如果真 (操作类型 ＝ #双击) 置托盘图标 (, ) 窗口1.位置 ＝ 0 .如果真 (飞记录小窗口状态 ＝ 真) 窗口1.可视 ＝ 飞记录小窗口状态 .如果真结束 _启动窗口.位置 ＝ 0 _启动窗口.高度 ＝ 309 _启动窗口.可视 ＝ 真 .如果真结束 .子程序 _按钮1_被单击 .如果 (窗口1.可视 ＝ 真) 按钮1.图片 ＝ #图片2 窗口1.可视 ＝ 假 .否则 按钮1.图片 ＝ #图片1 窗口1.可视 ＝ 真 .如果结束 飞记录小窗口状态 ＝ 窗口1.可视 .子程序 _时钟1_周期事件 .局部变量 hwnd1, 整数型 .局部变量 hwnd2, 整数型 飞句柄 ＝ 飞取窗口句柄 () hwnd1 ＝ dm.方法_GetWindow (dm.方法_GetPointWindow (300, 300), 0) hwnd2 ＝ dm.方法_GetWindow (dm.方法_GetPointWindow (300, 300), 0) .如果 (飞句柄 ＞ 0 且 飞句柄 ＝ hwnd1 或 飞句柄 ＝ hwnd2) .如果真 (飞切换标志 ＝ 0) __启动窗口_托盘事件 (#双击) 飞切换标志 ＝ 1 ' 表示恢复 .如果真结束 .如果真 (飞切换标志 ＝ 1) 飞读取分张数 () 飞显示余牌 () .如果真结束 .否则 .如果真 (飞切换标志 ＝ 1) _启动窗口.位置 ＝ 2 飞切换标志 ＝ 0 ' 程序最小化 .如果真结束 .如果结束 .子程序 飞线程一 .局部变量 hwnd1, 整数型 .局部变量 hwnd2, 整数型 .判断循环首 (真) 飞句柄 ＝ 飞取窗口句柄 () hwnd1 ＝ dm.方法_GetWindow (dm.方法_GetPointWindow (300, 300), 0) hwnd2 ＝ dm.方法_GetWindow (dm.方法_GetPointWindow (300, 300), 0) .如果 (飞句柄 ＞ 0 且 飞句柄 ＝ hwnd1 或 飞句柄 ＝ hwnd2) .如果真 (飞切换标志 ＝ 0) __启动窗口_托盘事件 (#双击) 飞切换标志 ＝ 1 ' 表示恢复 .如果真结束 .如果真 (飞切换标志 ＝ 1) 飞读取分张数 () 飞显示余牌 () .如果真结束 .否则 .如果真 (飞切换标志 ＝ 1) _启动窗口.位置 ＝ 2 飞切换标志 ＝ 0 ' 程序最小化 .如果真结束 .如果结束 延时 (600) .判断循环尾 () .子程序 飞读取分张数 .局部变量 飞计次, 整数型 .局部变量 飞地址, 文本型 .局部变量 hwnd, 整数型 hwnd ＝ 飞句柄 .计次循环首 (15, 飞计次) 飞地址 ＝ “[[[[” ＋ 飞余张数基址 ＋ “]” ＋ “+” ＋ 飞余张数偏移1 ＋ “]+” ＋ 飞余张数偏移2 ＋ “]+” ＋ 飞余张数偏移3 ＋ “]+” ＋ 飞余张数偏移4 [飞计次] 飞剩余张数 [飞计次] ＝ 飞读取整数 (hwnd, 飞地址) .计次循环尾 () .子程序 飞读取角色 .局部变量 飞计次, 整数型 .局部变量 飞地址, 文本型 .局部变量 hwnd, 整数型 hwnd ＝ 飞句柄 .计次循环首 (4, 飞计次) 飞地址 ＝ “[[[” ＋ 飞角色基址 ＋ “]” ＋ “+” ＋ 飞角色偏移1 ＋ “]+” ＋ 飞角色偏移2 [飞计次] ＋ “]+” ＋ 飞角色偏移3 飞角色名称 [飞计次] ＝ 飞读取文本 (hwnd, 飞地址) .计次循环尾 () .子程序 飞读取总张数 .局部变量 飞计次, 整数型 .局部变量 飞地址, 文本型 .局部变量 hwnd, 整数型 hwnd ＝ 飞句柄 .计次循环首 (4, 飞计次) 飞地址 ＝ “[[” ＋ 飞张数基址 ＋ “]” ＋ “+” ＋ 飞张数偏移1 ＋ “]+” ＋ 飞张数偏移2 [飞计次] 飞张数 [飞计次] ＝ 飞读取整数 (hwnd, 飞地址) .计次循环尾 () .子程序 飞读取整数, 整数型 .参数 飞句柄1, 整数型 .参数 飞地址, 文本型 .局部变量 飞读取值, 整数型 飞读取值 ＝ dm.方法_ReadInt (飞句柄1, 飞地址, 0) 返回 (飞读取值) .子程序 飞读取文本, 文本型 .参数 飞句柄1, 整数型 .参数 飞地址, 文本型 .局部变量 飞读取值, 文本型 飞读取值 ＝ dm.方法_ReadString (飞句柄1, 飞地址, 0, 100) 返回 (飞读取值) .子程序 飞取窗口句柄, 整数型 .局部变量 hwnd, 整数型 hwnd ＝ 到数值 (dm.方法_EnumWindow (0, “”, 飞游戏类名, 2)) 返回 (hwnd) .子程序 飞显示余牌 .局部变量 飞计次, 整数型 .局部变量 飞文本型牌, 文本型 飞计次 ＝ 1 飞文本型牌 ＝ “” .如果真 (飞剩余张数 [飞计次] ＞ 0) .计次循环首 (飞剩余张数 [飞计次], ) 飞文本型牌 ＝ 飞文本型牌 ＋ “Z ” .计次循环尾 () .如果真结束 标签1.标题 ＝ 飞文本型牌 飞计次 ＝ 2 飞文本型牌 ＝ “” .如果真 (飞剩余张数 [飞计次] ＞ 0) .计次循环首 (飞剩余张数 [飞计次], ) 飞文本型牌 ＝ 飞文本型牌 ＋ “F ” .计次循环尾 () .如果真结束 标签2.标题 ＝ 飞文本型牌 飞计次 ＝ 3 飞文本型牌 ＝ “” .如果真 (飞剩余张数 [飞计次] ＞ 0) .计次循环首 (飞剩余张数 [飞计次], ) 飞文本型牌 ＝ 飞文本型牌 ＋ “2 ” .计次循环尾 () .如果真结束 标签3.标题 ＝ 飞文本型牌 飞计次 ＝ 4 飞文本型牌 ＝ “” .如果真 (飞剩余张数 [飞计次] ＞ 0) .计次循环首 (飞剩余张数 [飞计次], ) 飞文本型牌 ＝ 飞文本型牌 ＋ “A ” .计次循环尾 () .如果真结束 标签4.标题 ＝ 飞文本型牌 飞计次 ＝ 5 飞文本型牌 ＝ “” .如果真 (飞剩余张数 [飞计次] ＞ 0) .计次循环首 (飞剩余张数 [飞计次], ) 飞文本型牌 ＝ 飞文本型牌 ＋ “K ” .计次循环尾 () .如果真结束 标签5.标题 ＝ 飞文本型牌 飞计次 ＝ 6 飞文本型牌 ＝ “” .如果真 (飞剩余张数 [飞计次] ＞ 0) .计次循环首 (飞剩余张数 [飞计次], ) 飞文本型牌 ＝ 飞文本型牌 ＋ “Q ” .计次循环尾 () .如果真结束 标签6.标题 ＝ 飞文本型牌 飞计次 ＝ 7 飞文本型牌 ＝ “” .如果真 (飞剩余张数 [飞计次] ＞ 0) .计次循环首 (飞剩余张数 [飞计次], ) 飞文本型牌 ＝ 飞文本型牌 ＋ “J ” .计次循环尾 () .如果真结束 标签7.标题 ＝ 飞文本型牌 飞计次 ＝ 8 飞文本型牌 ＝ “” .如果真 (飞剩余张数 [飞计次] ＞ 0) .计次循环首 (飞剩余张数 [飞计次], ) 飞文本型牌 ＝ 飞文本型牌 ＋ “0 ” .计次循环尾 () .如果真结束 标签8.标题 ＝ 飞文本型牌 飞计次 ＝ 9 飞文本型牌 ＝ “” .如果真 (飞剩余张数 [飞计次] ＞ 0) .计次循环首 (飞剩余张数 [飞计次], ) 飞文本型牌 ＝ 飞文本型牌 ＋ “9 ” .计次循环尾 () .如果真结束 标签9.标题 ＝ 飞文本型牌 飞计次 ＝ 10 飞文本型牌 ＝ “” .如果真 (飞剩余张数 [飞计次] ＞ 0) .计次循环首 (飞剩余张数 [飞计次], ) 飞文本型牌 ＝ 飞文本型牌 ＋ “8 ” .计次循环尾 () .如果真结束 标签10.标题 ＝ 飞文本型牌 飞计次 ＝ 11 飞文本型牌 ＝ “” .如果真 (飞剩余张数 [飞计次] ＞ 0) .计次循环首 (飞剩余张数 [飞计次], ) 飞文本型牌 ＝ 飞文本型牌 ＋ “7 ” .计次循环尾 () .如果真结束 标签11.标题 ＝ 飞文本型牌 飞计次 ＝ 12 飞文本型牌 ＝ “” .如果真 (飞剩余张数 [飞计次] ＞ 0) .计次循环首 (飞剩余张数 [飞计次], ) 飞文本型牌 ＝ 飞文本型牌 ＋ “6 ” .计次循环尾 () .如果真结束 标签12.标题 ＝ 飞文本型牌 飞计次 ＝ 13 飞文本型牌 ＝ “” .如果真 (飞剩余张数 [飞计次] ＞ 0) .计次循环首 (飞剩余张数 [飞计次], ) 飞文本型牌 ＝ 飞文本型牌 ＋ “5 ” .计次循环尾 () .如果真结束 标签13.标题 ＝ 飞文本型牌 飞计次 ＝ 14 飞文本型牌 ＝ “” .如果真 (飞剩余张数 [飞计次] ＞ 0) .计次循环首 (飞剩余张数 [飞计次], ) 飞文本型牌 ＝ 飞文本型牌 ＋ “4 ” .计次循环尾 () .如果真结束 标签14.标题 ＝ 飞文本型牌 飞计次 ＝ 15 飞文本型牌 ＝ “” .如果真 (飞剩余张数 [飞计次] ＞ 0) .计次循环首 (飞剩余张数 [飞计次], ) 飞文本型牌 ＝ 飞文本型牌 ＋ “3 ” .计次循环尾 () .如果真结束 标签15.标题 ＝ 飞文本型牌 .子程序 __启动窗口_将被销毁 关闭线程句柄 (飞线程ID) ...展开收缩
(系统自动生成,下载前可以参看下载内容)
下载文件列表
相关说明
- 本站资源为会员上传分享交流与学习,如有侵犯您的权益,请联系我们删除.
- 本站是交换下载平台，提供交流渠道，下载内容来自于网络，除下载问题外，其它问题请自行百度。
- 本站已设置防盗链，请勿用迅雷、QQ旋风等多线程下载软件下载资源，下载后用WinRAR最新版进行解压.
- 如果您发现内容无法下载，请稍后再次尝试；或者到消费记录里找到下载记录反馈给我们.
- 下载后发现下载的内容跟说明不相乎，请到消费记录里找到下载记录反馈给我们，经确认后退回积分.
- 如下载前有疑问，可以通过点击"提供者"的名字，查看对方的联系方式，联系对方咨询.
