TC官方合作论坛

 找回密码
 立即注册
查看: 4465|回复: 3
打印 上一主题 下一主题

[其他] 求个木瓜奇迹自动拾取物品

[复制链接]
跳转到指定楼层
楼主
发表于 2012-1-20 15:06:25 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上加入TC

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
求个木瓜奇迹自动拾取物品
回复

使用道具 举报

沙发
 楼主| 发表于 2012-1-20 15:07:47 | 只看该作者
QQ 136552596  新菜鸟有耐心的教我下!
回复 支持 反对

使用道具 举报

板凳
发表于 2012-2-4 19:14:26 | 只看该作者
Rem a
Delay 10
VBSCall FindPic(0,0,1024,768,"Attachment:\木瓜.bmp",0.9,intX,intY)
If intx>0 and inty>0
MoveTo intx+18 inty+30
Delay 500
LeftClick 1
Delay 100
LeftClick 1
Delay 100
LeftClick 1
Else
Goto b
EndIf
Rem b
VBSCall FindPic(0,0,1024,768,"Attachment:\宝石-灵魂1024.bmp",0.9,intX,intY)
If intx>0 and inty>0
MoveTo intx+18 inty+30
Delay 500
LeftClick 1
Delay 100
LeftClick 1
Delay 200
LeftClick 1
Else
Goto c
EndIf
Rem c
VBSCall FindPic(0,0,1024,768,"Attachment:\宝石-祝福1024.bmp",0.9,intX,intY)
If intx>0 and inty>0
MoveTo intx+18 inty+30
Delay 500
LeftClick 1
Delay 100
LeftClick 1
Delay 50
LeftClick 1
Else
Goto d
EndIf
Rem d
VBSCall FindPic(0,0,1024,768,"Attachment:\赢.bmp",0.9,intX,intY)
If intx>0 and inty>0
MoveTo intx+18 inty+30
Delay 200
LeftClick 1
Delay 200
LeftClick 1
Delay 10
LeftClick 1
Else
Goto e
EndIf
Rem e
RightDown 1
Delay 100

高人给解读一下!!
回复 支持 反对

使用道具 举报

地板
发表于 2013-9-11 14:57:21 | 只看该作者
平台奇迹里面有木瓜奇迹挂机拾取脚本
回复 支持 反对

使用道具 举报

*滑动验证:
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

站长推荐上一条 /2 下一条

关闭

小黑屋|TC官方合作论坛 (苏ICP备18043773号

GMT+8, 2025-10-2 15:20 , Processed in 0.168297 second(s), 24 queries .

Powered by 海安天坑软件科技有限公司

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表