好友
阅读权限25
听众
最后登录1970-1-1
|
本帖最后由 mouse31rat 于 2013-6-15 13:32 编辑
这个完全没有模块，花了俩小时= =，原谅我的智力水平。。。
喜欢的热心一下啊，CB啊，哈哈
.版本 2
.支持库 shellEx
.支持库 spec
.支持库 eAPI
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
子程序1 ()
.子程序 子程序1
A ＝ 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, #F5键)
B ＝ 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, #F3键)
C ＝ 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, #F4键)
.子程序 _按钮1_被单击
X ＝ 到数值 (编辑框1.内容)
Y ＝ 到数值 (编辑框2.内容)
E ＝ X － 到整数 (55)
F ＝ Y ＋ 到整数 (55)
G ＝ X ＋ 到整数 (55)
H ＝ Y － 到整数 (55)
.子程序 _标签1_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型
.如果真 (参数一 ＝ B)
编辑框1.内容 ＝ 到文本 (取鼠标水平位置 ())
编辑框2.内容 ＝ 到文本 (取鼠标垂直位置 ())
X ＝ 取鼠标水平位置 ()
Y ＝ 取鼠标垂直位置 ()
E ＝ X － 到整数 (100)
F ＝ Y ＋ 到整数 (100)
G ＝ X ＋ 到整数 (100)
H ＝ Y － 到整数 (100)
色 ＝ 取点_ (取设备场景_ (0), 取鼠标水平位置 (), 取鼠标垂直位置 ())
调试输出 (色)
.如果真结束
.如果真 (参数一 ＝ C)
时钟1.时钟周期 ＝ 20
时钟2.时钟周期 ＝ 1000
.如果真结束
.如果真 (参数一 ＝ A)
时钟1.时钟周期 ＝ 0
时钟2.时钟周期 ＝ 0
.如果真结束
.子程序 __启动窗口_将被销毁
撤销热键 (_启动窗口.取窗口句柄 (), A)
撤销热键 (_启动窗口.取窗口句柄 (), B)
.子程序 _时钟1_周期事件
鼠标移动 (E, F)
延迟 (10)
鼠标移动 (G, H)
.子程序 _时钟2_周期事件
.如果真 (取点_ (取设备场景_ (0), 509, 260) ＝ 77630)
模拟鼠标点击 (910, 317, 0)
.如果真结束
.如果真 (取点_ (取设备场景_ (0), 943, 269) ＝ 2031653)
模拟鼠标点击 (910, 317, 0)
.如果真结束
.如果真 (取点_ (取设备场景_ (0), 477, 372) ＝ 11068)
模拟鼠标点击 (910, 317, 0)
.如果真结束
.如果真 (取点_ (取设备场景_ (0), 1369, 248) ＝ 4892)
模拟鼠标点击 (792, 380, 0)
.如果真结束
.如果真 (取点_ (取设备场景_ (0), 97, 264) ＝ 70686)
模拟鼠标点击 (792, 380, 0)
.如果真结束
.如果真 (取点_ (取设备场景_ (0), 592, 370) ＝ 77117)
模拟鼠标点击 (910, 317, 0)
.如果真结束
API部分
.版本 2
.DLL命令 鼠标移动, 整数型, , "SetCursorPos"
.参数 X, 整数型
.参数 Y, 整数型
.DLL命令 取点_, 整数型, "gdi32.dll", "GetPixel"
.参数 设备场景句柄, 整数型
.参数 x坐标, 整数型
.参数 y坐标, 整数型
.DLL命令 取设备场景_, 整数型, "user32", "GetDC", , 获取指定窗口的设备场景 指定窗口的设备场景句柄，出错则为0
.参数 窗口的句柄, 整数型, , 将获取其设备场景的窗口的句柄。若为0，则要获取整个屏幕的DC;
变量部分：
.版本 2
.全局变量 X, 整数型
.全局变量 Y, 整数型
.全局变量 A, 整数型
.全局变量 B, 整数型
.全局变量 C, 整数型
.全局变量 E, 整数型
.全局变量 F, 整数型
.全局变量 G, 整数型
.全局变量 H, 整数型
.全局变量 色, 整数型
喜欢的自己再改改。。。
使用时先打开天猫网页http://www.tmall.com/把鼠标移动到相应位置按下F3获取基本坐标，然后程序会以该坐标为准进行移动，软件自动识别错误对话框自动关闭，主要针对金猪，所以固定方向移动。。。。
默认仅支持1440*900推荐水平坐标700 ，纵向坐标297。
其他分辨率请自行测试修改，分辨率不同，需要点击的相应位置也不同，你需要更改源码中最后面的那个时钟2中的程序模拟点击的坐标，.如果真 (取点_ (取设备场景_ (0), 509, 260) ＝ 77630)
模拟鼠标点击 (910, 317, 0)，这个模拟鼠标点击后面框里面的就是你取得的错号坐标，也就是模拟鼠标点击 (横坐标值, 纵坐标值, 0)，，可能前面的取点颜色的坐标也需要自行设置，具体你用易语言打开源码的时候调试运行在相应位置按下F3记录下程序里面的X,Y坐标，然后看易语言主界面下面的调试输出有颜色值更改到取点_ (取设备场景_ (0), 横坐标, 纵坐标) ＝ 颜色值
源码打包：
新建 易程序 - 副本.rar
(2.36 KB, 下载次数: 91)
编译好了的：
10.rar
(244.63 KB, 下载次数: 426)
|
|
发表于 2013-6-14 17:36
|
发表于 2013-6-14 17:37
