潍坊奥体中心儿童篮球:发个QQ华夏读坐标的脚本,版主呢?来看看, - 【综合讨论】 - 按键精灵论坛 放飞双手,...

来源:百度文库 编辑:偶看新闻 时间:2024/05/03 07:46:44
  • 默认表情
  • 酷猴
  • 呆呆男
  • 洋葱头
加载中... 3508101 | 我的帖子 提醒 短消息 论坛任务 | 个人中心 退出

严禁发表低俗内容,广告帖[举报有奖] 按键精灵诚聘【脚本工程师、产品助理、程序员】
【QQ】交流群:89723655 按键论坛精品周刊
  • 分栏模式
  • 首页
  • 私人消息 (1)
  • 公共消息 (0)
  • 论坛任务 (0)
  • 系统消息 (0)
  • 好友消息 (0)
  • 帖子消息 (0)
按键精灵论坛 » 【综合讨论】 » 发个QQ华夏读坐标的脚本,版主呢?来看看, 返回列表 回复 发帖 35351256
  • 发短消息
  • 加为好友

35351256 当前离线

UID
279147 
帖子
51 
精华
积分
57 
鲜花
1 个 
鸡蛋
0 个 
铜币
11 个 
银币
5 个 
金币
0 个 
阅读权限
20 
在线时间
12 小时 
注册时间
2009-6-27 
最后登录
2010-4-27 

小学三年级

帖子
51 
积分
57 
鲜花
1 个 
鸡蛋
0 个 
铜币
11 个 
银币
5 个 
金币
0 个 
注册时间
2009-6-27 
最后登录
2010-4-27 

楼主 跳转到 » 倒序看帖 打印 tT 发表于 2009-6-27 22:22 | 只看该作者

[发脚本] 发个QQ华夏读坐标的脚本,版主呢?来看看,

由于玩华夏,前天开始恶补了一下按键精灵,今天尝试写自动练化师任务,用纯粹的记录鼠标动作呢,倒是可以,就是当人在走动时,中间有人挡一下,偏移了坐标了,就导致点不到NPC,非常郁闷,于是想到读取坐标来修正,但在写的时候,硬是搞不懂你这语句VBSCall FindPic(0,50,1023,767,"Attachment:\1111111.bmp",0.9,intX,intY)是如何用,我用QQ的抓图,剪下坐标,然后人物不动.马上就运行脚本,搜不到,郁闷得要死.你这语句到底是如何用?还是对图片有什么要求?我就剪下"1",然后存盘,然后附件里面加上,然后运行脚本,就报找不到,想得我头都痛了,请版主指教一下,实在没法,就写了一个读点来识别坐标的脚本,也能正常运行,一秒不要,就读出坐标,给大家分享一下,也不知找图的方法是不是会比我这快,期待版主说下,这找图的语句的用法,到底是怎么回事?
Plugin hwnd=Window.Find(0,"QQ华夏")
Plugin Window.Active(hwnd)
dim xy(5),a,b,c,d,e,i,f
//QQ华夏坐标是纵坐标850开始显示,这里,我们就取几点
//的特征,判断是否是94ffff颜色,从而判断是几
a=852
b=851
c=853
d=850
e=854
i=0
f=""
For 6
    //如果这两点都无坐标颜色,就是十位数的坐标,为0
    IfColor a,98,94ffff,1
        IfColor c,98,94ffff,1
            xy(i)=0
            Goto 数字
        EndIf
    EndIf
    //下面是特征判断
    IfColor b,99,94ffff,0
        xy(i)=1
        Goto 数字
    EndIf
    IfColor b,100,94ffff,0
        xy(i)=4
        Goto 数字
    EndIf
    IfColor b,104,94ffff,0
        xy(i)=9
        Goto 数字
    EndIf
    IfColor c,101,94ffff,0
        IfColor a,102,94ffff,0
            xy(i)=2
            Goto 数字
        EndIf
    EndIf
    IfColor b,101,94ffff,1
        IfColor a,101,94ffff,0
            IfColor c,101,94ffff,0
                xy(i)=3
                Goto 数字
            EndIf
        EndIf
    EndIf
    IfColor d,101,94ffff,0
        IfColor d,102,94ffff,1
            xy(i)=5
            Goto 数字
        EndIf
    EndIf
    IfColor d,101,94ffff,0
        IfColor e,101,94ffff,1
            xy(i)=6
            Goto 数字
        EndIf
    EndIf
    IfColor c,100,94ffff,0
        xy(i)=7
        Goto 数字
    EndIf
    IfColor d,101,94ffff,1
        xy(i)=8
    Else
        xy(i)=0
    EndIf
    Rem 数字
    a=a+6
    b=b+6
    c=c+6
    d=d+6
    e=e+6
    If a>868 and a<888
        a=a+20
    EndIf
    If b>868 and b<888
        b=b+20
    EndIf
    If c>868 and c<888
        c=c+20
    EndIf
    If d>868 and d<888
        d=d+20
    EndIf
    If e>868 and e<891
        e=e+20
    EndIf
    f=f&xy(i)
    i=i+1
EndFor
MessageBox "你的坐标是:"&f
2

评分人数

  • 很好很好^0^ 欢迎来新手版帮助新人^0^   鲜花 + 1 个 银币 + 1 个

    我是新手

  • +2   银币 + 2 个

    qq88261267

收藏 分享 1
回复 引用

评分 报告 使用道具

vrx1
  • 发短消息
  • 加为好友

vrx1 当前离线

UID
216263 
帖子
558 
精华
积分
612 
鲜花
0 个 
鸡蛋
0 个 
铜币
7 个 
银币
36 个 
金币
0 个 
阅读权限
50 
性别
男 
在线时间
108 小时 
注册时间
2009-1-11 
最后登录
2010-3-1 

高中二年级

帖子
558 
积分
612 
鲜花
0 个 
鸡蛋
0 个 
铜币
7 个 
银币
36 个 
金币
0 个 
注册时间
2009-1-11 
最后登录
2010-3-1 

沙发 发表于 2009-6-27 22:43 | 只看该作者 用3个点就区分10个数字!强啊! 回复 引用

评分 报告 使用道具 TOP

sfmb
  • 发短消息
  • 加为好友

sfmb 当前离线

UID
117576 
帖子
101 
精华
积分
207 
鲜花
0 个 
鸡蛋
0 个 
铜币
47 个 
银币
0 个 
金币
0 个 
阅读权限
40 
在线时间
211 小时 
注册时间
2007-1-26 
最后登录
2010-10-18 

初中一年级

帖子
101 
积分
207 
鲜花
0 个 
鸡蛋
0 个 
铜币
47 个 
银币
0 个 
金币
0 个 
注册时间
2007-1-26 
最后登录
2010-10-18 

板凳 发表于 2009-7-6 08:52 | 只看该作者 强人 回复 引用

评分 报告 使用道具 TOP

davidlee0205
  • 发短消息
  • 加为好友

davidlee0205 当前离线

UID
316130 
帖子
14 
精华
积分
16 
鲜花
0 个 
鸡蛋
0 个 
铜币
0 个 
银币
5 个 
金币
0 个 
阅读权限
20 
性别
男 
在线时间
3 小时 
注册时间
2009-9-28 
最后登录
2009-9-29 

小学一年级

帖子
14 
积分
16 
鲜花
0 个 
鸡蛋
0 个 
铜币
0 个 
银币
5 个 
金币
0 个 
注册时间
2009-9-28 
最后登录
2009-9-29 

地板 发表于 2009-9-28 18:45 | 只看该作者 新技术我都喜欢 【脚本交易,上任务中国,安全可靠,人流量大】 【按键精灵急聘脚本技术工程师】 回复 引用

评分 报告 使用道具 TOP

61169270
  • 发短消息
  • 加为好友

61169270 当前离线

UID
379089 
帖子
19 
精华
积分
25 
鲜花
0 个 
鸡蛋
0 个 
铜币
30 个 
银币
1 个 
金币
0 个 
阅读权限
20 
在线时间
11 小时 
注册时间
2010-3-27 
最后登录
2010-6-8 

小学一年级

帖子
19 
积分
25 
鲜花
0 个 
鸡蛋
0 个 
铜币
30 个 
银币
1 个 
金币
0 个 
注册时间
2010-3-27 
最后登录
2010-6-8 

5 发表于 2010-4-28 20:31 | 只看该作者 本帖最后由 61169270 于 2010-4-28 20:37 编辑

我的更简单,不过也是参考别人写的
Rem a
dim zbx(2),zby(2)
// [初始位置设置]
VBS x1=850:y1=98
i=0
For 3
    Call 数字检测()
    zbx(i)=sz1
    // [6为2个数字之间间距]
    VBS x1=x1+6
    i=i+1
EndFor
//zbx1是找到的x坐标
zbx1=zbx(0)&zbx(1)&zbx(2)
Delay 1000
vbs x1=888:y1=98
i=0
For 3   
    Gosub 数字检测
    zby(i)=sz1
    VBS x1=x1+6
    i=i+1
EndFor
//zby1是招到的Y坐标
zby1=zby(0)&zby(1)&zbx(2)
zb2=zbx1&zby1
MessageBox zb2

Goto a
Sub 数字检测()

    IfColor x1+2,y1+2,"94ffff",0 Then
        sz1=1
        Goto 识别结束1
    EndIf  
    IfColor x1+0,y1+7,"94ffff",0 Then
        sz1=2
        Goto 识别结束1
    EndIf
    IfColor x1+3,y1+6,"94ffff",0 Then
        sz1=4
        Goto 识别结束1
    EndIf
    IfColor x1+1,y1+6,"94ffff",0 Then
        sz1=9
        Goto 识别结束1
    EndIf
    IfColor x1+1,y1+7,"94ffff",1 Then
        sz1=7
        Goto 识别结束1
    EndIf
    IfColor x1+3,y1+1,"94ffff",0 Then
        sz1=6
        Goto 识别结束1
    EndIf
    IfColor x1+4,y1+1,"94ffff",1 Then
        sz1=5
        Goto 识别结束1
    EndIf
    IfColor x1+4,y1+3,"94ffff",0 Then
        sz1=0
        Goto 识别结束1
    EndIf
    IfColor x1+1,y1+3,"94ffff",0 Then
        sz1=8
        Goto 识别结束1
    Else
        sz1=3
    EndIf
    Rem 识别结束1
End Sub 【脚本交易,上任务中国,安全可靠,人流量大】 【按键精灵急聘脚本技术工程师】 回复 引用

评分 报告 使用道具 TOP

kexiongxiao
  • 发短消息
  • 加为好友

kexiongxiao 当前离线

UID
510512 
帖子
12 
精华
积分
15 
鲜花
0 个 
鸡蛋
0 个 
铜币
42 个 
银币
0 个 
金币
0 个 
阅读权限
20 
在线时间
5 小时 
注册时间
2010-10-3 
最后登录
2010-10-16 

小学一年级

帖子
12 
积分
15 
鲜花
0 个 
鸡蛋
0 个 
铜币
42 个 
银币
0 个 
金币
0 个 
注册时间
2010-10-3 
最后登录
2010-10-16 

6 发表于 2010-10-4 17:52 | 只看该作者 【脚本交易,上任务中国,安全可靠,人流量大】 【按键精灵急聘脚本技术工程师】 回复 引用

评分 报告 使用道具 TOP

返回列表
高级模式 | 发新话题 B Color Image Link Quote Code Smilies

 

≡ 交流讨论区 ≡
  • 【按键盒子】
  • 『公告新闻』
  • 『脚本源码』
  • 『常见问题』
  • 【按键精灵8】
  • 【新手专区】
  • 『版主推荐贴』
  • 【综合讨论】
  • 『常见问题』
  • 『BUG反馈』
  • 『验证码讨论』
  • 【教程工具】
  • 『其他教程』
≡ 资源发布区 ≡
  • 【免费脚本】
  • 『脚本银币收费区』
  • 『源码库讨论区』
  • 【收费脚本】
  • 『源码交易区』
  • 【求购脚本】
≡ 专题研讨区 ≡
  • 【插件界面】
  • 【繁体讨论区】
  • 【网页按键】
  • 【办公脚本】
  • 【游戏专区】
  • 『大话、梦幻西游』
  • 『热血江湖』
  • 『热血传奇』
  • 『星际家园』
≡ 休闲娱乐区 ≡
  • 【活动中心】
  • 【闲聊茶馆】
  • 【天下美图】
≡ 论坛事务区 ≡
  • 【公告新闻】
  • 『所获荣誉』
  • 【论坛事务】
  • 『违规内容举报』
[收藏此主题]  [关注此主题的新回复]
您可以用快捷键 Ctrl + V 粘贴到 QQ、MSN 里。')" href="javascript:;">[通过 QQ、MSN 分享给朋友]

[通过站内短消息分享给朋友]

Powered by Discuz! 7.2 Design by bbs.ajjl.cn © 2001-2010 Comsenz Inc.

按键精灵论坛 ( 闽ICP备05016595号)|联系我们 |Archiver|WAP|

GMT+8, 2010-10-21 22:08, Processed in 0.046489 second(s), 7 queries.