资源描述:
《按键精灵9 得到鼠标指向的窗口句柄》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、//得到鼠标指向的窗口句柄Hwnd = Plugin.Window.MousePoint()//得到窗口句柄的客户区大小sRect = Plugin.Window.GetClientRect(Hwnd)Dim MyArrayMyArray=Split(sRect,"
2、")Ux=MyArray(0)Uy=MyArray(1)MoveTo ux,uy//MessageBox "游戏窗口左上角的坐标:"&Vbcrlf&Ux&","&Uy&Vbcrlf&"句柄是:"&Hwnd '&是字符串连接符, Vbcrlf是换行符//坐标定位Hx=Ux+756//好友菜单Hy=Uy
3、+277Hx1=Ux+640//第一位好友Hy1=Uy+170Jlx=Ux+380//确定获得奖励Jly=Uy+395Scx1=Ux+483//与他赛车Scy1=Uy+577Scx2=Ux+315//赛一场Scy2=Uy+503Gtx=Ux+55//快速过图Gty=Uy+481Cjx=Ux+380//去抽奖Cjy=Uy+422Cjx1=Ux+272//抽奖一Cjy1=Uy+467Cjqx=Ux+313//抽奖确认Cjqy=Uy+348Cjjsx=Ux+377//抽奖结束Cjjsy=Uy+547'==========传说中的分割线=========='=====打
4、开好友菜单For8MoveTo hx, hyDelay 500MoveTo hx1, hy1Delay 40LeftClick 1 Delay 400'=====单击 获得奖励MoveTo JLx, JLyDelay 5000LeftClick 1 Delay 400'=====单击与他比赛MoveToScx1,Scy1Delay400LeftClick1Delay400'=====单击赛一场,开始比赛MoveToScx2,Scy2Delay400LeftClick1Delay400'=====快速跳过比赛MoveToGtx,GtyDelay1000LeftCl
5、ick1Delay400'=====单击开始抽奖MoveToCjx,CjyDelay3000LeftClick1Delay400MoveToCjx1,Cjy1Delay200LeftClick1Delay400For2Cjx1=Cjx1+110MoveToCjx1,Cjy1Delay200LeftClick1Delay400MoveToCjqx,CjqyDelay200LeftClick1Delay400Next'=====比赛结束单击确定For2MoveTo711,740Delay400LeftClick1Delay400NextNext'==========
6、以下是按键精灵录制的内容=========='==========开始执行比赛Delay7MoveTo699,614Delay100LeftClick1Delay400'==========赛一场选择Delay7MoveTo319,533Delay1000LeftClick1Delay400GetColor=GetPixelColor(22,279)WhileGetColor=000000MoveTo740,319Delay100LeftClick1Delay10GetColor=GetPixelColor(22,279)WendGetColor=GetPixe
7、lColor(22,249)WhileGetColor=000000MoveTo741,390Delay100LeftClick1Delay10GetColor=GetPixelColor(22,249)WendGetColor=GetPixelColor(22,230)WhileGetColor=000000MoveTo742,461Delay100LeftClick1Delay10GetColor=GetPixelColor(22,230)Wend'==========跳过动画Delay7MoveTo64,511Delay1000LeftClick1Dela
8、y400'==========确定输赢Delay7MoveTo388,451Delay2500LeftClick1Delay400