|
马上加入TC
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
空间 闵乐游挂机
变量 dm,线程句柄
dm=com("dm.dmsoft")
功能 开始_点击()
编辑框.设置文本("编辑框0","开启挂机功能...")
线程句柄=线程.开启("闵乐游挂机.挂机",0)
功能结束
功能 挂机()
循环(真)
闵乐游挂机.模式选择()
辅助.等待(500)
闵乐游挂机.不抢庄()
辅助.等待(500)
闵乐游挂机.亮牌()
辅助.等待(500)
闵乐游挂机.换桌功能()
辅助.等待(500)
闵乐游挂机.快速加入()
辅助.等待(500)
循环结束
功能结束
功能 亮牌()
变量 找图1,找图2,找图3,intX,intY
系统.设置路径(辅助.获取资源路径("rc:"))
循环(真)
找图1=dm.FindPic(0,0,1680,1020,"亮牌.bmp","000000",0.9,0,intX,intY)
如果(找图1<0)
找图2=dm.FindPic(0,0,1680,1020,"提示.bmp","000000",0.9,0,intX,intY)
如果(找图2>=0)
鼠标.移动(intX,intY)
鼠标.左键单击(1)
否则
找图3=dm.FindPic(0,0,1680,1020,"亮牌.bmp|提示.bmp","000000",0.9,0,intX,intY)
如果(找图3<0)
跳出
如果结束
如果结束
否则
鼠标.移动(intX,intY)
鼠标.左键单击(1)
如果结束
循环结束
功能结束
功能 快速加入()
变量 找图1,找图2,intX,intY
系统.设置路径(辅助.获取资源路径("rc:"))
循环(真)
找图1=dm.FindPic(0,0,1680,1020,"1.bmp|不抢.bmp|继续.bmp|换桌|亮牌.bmp","000000",0.9,0,intX,intY)
如果(找图1<0)
找图2=dm.FindPic(0,0,1680,1020,"快速加入.bmp","000000",0.9,0,intX,intY)
如果(找图2>=0)
鼠标.移动(intX,intY)
鼠标.左键单击(1)
否则
跳出
如果结束
如果结束
循环结束
功能结束
功能 换桌功能()
变量 找图1,找图2,找图3,intX,intY
系统.设置路径(辅助.获取资源路径("rc:"))
循环(真)
找图1=dm.FindPic(0,0,1680,1020,"继续.bmp","000000",0.9,0,intX,intY)
如果(找图1>=0)
鼠标.移动(intX,intY)
鼠标.左键单击(1)
否则
找图2=dm.FindPic(0,0,1680,1020,"换桌.bmp","000000",0.9,0,intX,intY)
如果(找图2>=0)
鼠标.移动(intX,intY)
鼠标.左键单击(1)
否则
找图3=dm.FindPic(0,0,1680,1020,"换桌.bmp|继续.bmp","000000",0.9,0,intX,intY)
如果(找图3<0)
跳出
如果结束
如果结束
如果结束
循环结束
功能结束
功能 不抢庄()
变量 找图1,找图2,intX,intY
系统.设置路径(辅助.获取资源路径("rc:"))
循环(真)
找图1=dm.FindPic(0,0,1680,1020,"不抢.bmp","000000",0.9,0,intX,intY)
如果(找图1>=0)
编辑框.设置文本("编辑框0",intX&","&intY)
鼠标.移动(intX,intY)
鼠标.左键单击(1)
否则
找图2=dm.FindPic(0,0,1680,1020,"1.bmp","000000",0.9,0,intX,intY)
如果(找图2>=0)
编辑框.设置文本("编辑框0",intX&","&intY)
鼠标.移动(intX,intY)
鼠标.左键单击(1)
否则
找图3=dm.FindPic(0,0,1680,1020,"1.bmp|不抢.bmp","000000",0.9,0,intX,intY)
如果(找图3<0)
跳出
如果结束
如果结束
如果结束
循环结束
功能结束
功能 模式选择()
变量 找图1,intX,intY
系统.设置路径(辅助.获取资源路径("rc:"))
循环(真)
编辑框.设置文本("编辑框0","正在确认摆牌模式...")
找图1=dm.FindPic(0,0,1680,1020,"搓牌模式.bmp","000000",0.9,0,intX,intY)
如果(找图1<0)
编辑框.设置文本("编辑框0",intX&","&intY)
编辑框.设置文本("编辑框0","执行下一个功能")
跳出
否则
鼠标.移动(intX,intY)
鼠标.左键单击(1)
编辑框.设置文本("编辑框0","执行下一个功能")
跳出
如果结束
循环结束
功能结束
功能 退出_点击()
线程.关闭(线程句柄)
辅助.退出()
功能结束
功能 热键0_热键()
编辑框.设置文本("编辑框0","恢复挂机功能...")
线程.恢复(线程句柄)
功能结束
功能 热键1_热键()
编辑框.设置文本("编辑框0","暂停挂机功能...")
线程.暂停(线程句柄)
功能结束
空间结束
-----------------------------------------------------------------------------------------
运行时提示 无法打开文件<换桌><错误信息>系统找不到指定文件
求指点
|
|