#import "dm.dmsoft" DM
#include"自動喊話測試.t"
#include"下拉框使用.t"
#include"釣魚.t"
空間 大漠測試
整型 線程句柄,下拉框選項,喊話線程,釣魚線程,小雞線程,等級線程
功能 邏輯型 大漠()
整型 窗口句柄
邏輯型 是否成功
DM.SetPath(輔助.獲取資源路徑("rc:")) //全局路徑
// DM.SetDict(0,"小遊戲.txt") //設置的字符
窗口句柄=窗口.找到窗口("QQ仙境")
// 窗口句柄=窗口.鼠標所在窗口句柄()
窗口.設置位置(窗口句柄,0,0)
// 綁定窗口
DM.BindWindow(窗口句柄,"dx","dx","dx",0)
整型 是否成功1
整型 intx
整型 inty
整型 x,y
整型 是否成功2,是否成功3
整型 intx2,inty2
整型 intx3,inty3,字符串1,字符串2,血值百分比,藍值百分比,圖像值1,圖像值2
整型 intx4,inty4,是否成功4
字符型 字符串11,字符串22
字符串11=編輯框.獲得文本("編輯框5")
字符串22=編輯框.獲得文本("編輯框6")
字符串1=字符串.長度(字符串11)
字符串2=字符串.長度(字符串22)
如果(單選框.獲得狀態("抓小雞"))
小雞線程=線程.開啟("抓小雞.抓小雞")
如果結束
如果(單選框.獲得狀態("釣魚"))
釣魚線程=線程.開啟("釣魚.釣魚開始")
如果結束
如果(復選框.獲得狀態("自動喊話打鉤"))
喊話線程=線程.開啟("自動喊話測試.自動喊話")
如果結束
如果(單選框.獲得狀態("打怪"))
是否成功1=DM.FindPic(0,200,1026,736,"人物等級41.bmp","000000",0.7,0,intx,inty)
是否成功2=DM.FindPic(0,200,1026,736,"等級39.bmp|等級39打.bmp","000000",0.7,0,intx2,inty2)
//是否成功1 人物等級 //是否成功2 怪物等級
循環(真)
///////////////////////////////////////////////輔助技能區域
是否成功4=DM.FindPic(0,0,500,500,"盾.bmp","000000",1.0,0,intx4,inty4)
如果(是否成功4>=0)
否則
DM.KeyPress(112) //F1
輔助.等待(1000)
如果結束
//找圖
是否成功4=DM.FindPic(0,0,500,500,"冰盾.bmp","000000",1.0,0,intx4,inty4)
如果(是否成功4>=0)
否則
DM.KeyPress(113) //F2
輔助.等待(1000)
如果結束
///////////////////////////////////////////////輔助技能區域
///////////////////////////////////////////////加血加藍區域 區域找色
是否成功1=DM.FindColor(0,0,500,500,"a00707-000000",1.0,0,intx3,inty3)
圖像值1=圖像.坐標點取色(intx3,inty3)
如果(復選框.獲得狀態("復選框0")) //加血打鉤
如果(字符串1==0) //沒有輸入字
輔助.消息框("請輸入人物低於紅值!!!")
否則
圖像值2=圖像.坐標點取色(intx3+轉換.字符型轉整型(字符串11),inty3)
如果(圖像值2==#0707A0)
否則
鍵盤.按鍵(57,1) //數字鍵盤9 加血
輔助.等待(200)
如果結束
如果結束
如果結束
//區域找色
是否成功1=DM.FindColor(0,0,500,500,"89a8da-000000",1.0,0,intx3,inty3)
圖像值1=圖像.坐標點取色(intx3,inty3) // 加藍設置
如果(復選框.獲得狀態("復選框1")) //加藍打鉤
如果(字符串2==0) //沒有輸入字
輔助.消息框("請輸入人物低於藍值!!!")
否則
圖像值2=圖像.坐標點取色(intx3+轉換.字符型轉整型(字符串22),inty3)
如果(圖像值2==#DAA889)
// 輔助.消息框("找到藍條")
否則
鍵盤.按鍵(48,1) //數字鍵盤0 加藍
輔助.等待(200)
如果結束
如果結束
如果結束
///////////////////////////////////////////////加血加藍區域
///////////////////////////////////////////////自動打怪區域
如果(inty+30>inty2-50&&inty+30<inty2+50) //Y軸在範圍
如果(intx+15>intx2) //開始X軸的移動
////// //37← 39→ 40↓ 38↑
鍵盤.按下(37)
輔助.等待(200)
鍵盤.彈起(37)
輔助.等待(150)
////
否則
鍵盤.按下(39)
輔助.等待(200)
鍵盤.彈起(39)
輔助.等待(150)
////
如果結束
如果(inty+30>inty2-50&&inty+30<inty2+50)
如果(intx+15>intx2-150&&intx+15<intx2+150) //X軸在範圍
如果(intx+15>intx2) //人在怪右邊的方向 轉向,反之。
鍵盤.按下(37)
輔助.等待(10)
鍵盤.彈起(37)
輔助.等待(150)
下拉框選項=線程.開啟("下拉框使用.下拉框得到")
鍵盤.按鍵(32,8)
輔助.等待(150)
否則
鍵盤.按下(39)
輔助.等待(10)
鍵盤.彈起(39)
輔助.等待(150)
下拉框選項=線程.開啟("下拉框使用.下拉框得到")
鍵盤.按鍵(32,8)
輔助.等待(150)
如果結束
如果結束
如果結束
否則
如果(inty+30>inty2-50&&inty+30<inty2+50)
如果(inty+50>inty2-50)
鍵盤.按下(38)
輔助.等待(200)
鍵盤.彈起(38)
輔助.等待(200)
如果(inty+50<inty2+50)
鍵盤.按下(40)
輔助.等待(200)
鍵盤.彈起(40)
輔助.等待(200)
////
如果結束
如果結束
如果結束
//是否成功1 人物等級 //是否成功2 怪物等級
是否成功1=DM.FindPic(0,200,1026,736,"人物等級41.bmp","000000",0.7,0,intx,inty)
如果(intx+15>intx2) //人在怪右邊的方向 轉向,反之。
鍵盤.按下(37)
輔助.等待(100)
鍵盤.彈起(37)
輔助.等待(150)
否則
鍵盤.按下(39)
輔助.等待(100)
鍵盤.彈起(39)
輔助.等待(150)
如果結束
如果結束
是否成功2=DM.FindPic(0,200,1026,736,"等級39.bmp|等級39打.bmp","000000",0.7,0,intx2,inty2)
如果(是否成功2>=0)
否則
鍵盤.按下(37) //沒找到的情況下 原地走
輔助.等待(200)
鍵盤.彈起(37)
輔助.等待(200)
鍵盤.按下(39)
輔助.等待(300)
鍵盤.彈起(39)
輔助.等待(200)
如果結束
///////////////////////////////////////////////自動打怪區域
循環結束
如果結束 //整個打怪和加血-自動打怪
DM.UnBindWindow()
返回 真
功能結束
功能 邏輯型 開始_點擊()
線程句柄=線程.開啟("大漠測試.大漠")
返回 真
功能結束
功能 邏輯型 退出_點擊()
線程.關閉(線程句柄)
DM.UnBindWindow()
輔助.退出()
返回 真
功能結束
//熱鍵 開啟 關閉
功能 邏輯型 熱鍵0_熱鍵()
線程句柄=線程.開啟("大漠測試.大漠")
返回 真
功能結束
功能 邏輯型 熱鍵1_熱鍵()
線程.關閉(線程句柄)
線程.關閉(釣魚線程)
線程.關閉(喊話線程)
線程.關閉(小雞線程)
返回 真
功能結束
功能 邏輯型 初始化() //打開的時候 讓窗口界面停留在第壹個選項卡
選項卡.激活("選項卡0",1)
返回 真
功能結束
空間結束 提示 有語法錯誤 查證再試 有請大神級 朋友幫忙 怎麽整啊