标题:
[软件]
提供一一自动刷蜡烛脚本
[打印本页]
作者:
pandaguo
时间:
2009-5-20 22:37
标题:
提供一一自动刷蜡烛脚本
把我自己做的自动刷蜡烛软件提供给大家看看，可以让大家也学学按键啊。
将下面的东西复制到记事本上，然后将记事本存在按键精灵软件里的script文件夹里.......
[General]
Description=速度刷蜡烛
BeginHotkey=121
BeginHotkeyMod=0
PauseHotkey=0
PauseHotkeyMod=0
StopHotkey=123
StopHotkeyMod=0
RunOnce=1
EnableWindow=
Enable=1
AutoRun=0
[Repeat]
Type=1
Number=1
[Relative]
SetupOCXFile=
[Comment]
Content=.
【功能说明】.
本脚本主要是运用了按键精灵里的找图打怪例子，找到NPC的点，然后移动鼠标
.
【使用说明】.
这个例子无法直接试用，供大家学习参考。.
.
【作者介绍】.
摘自兄弟论坛，帖子网址：.
http://bbs.vrbrothers.com/viewthread.php?tid=20488.
作者： 峨眉山区的天才刷免爆 .
.
[Script]
Plugin hwnd=Window.Find(0,"QQ幻想")
Plugin Window.Active(hwnd)
//需要先得到可以发送按键消息的窗口
Plugin hwnd = Window.GetKeyFocusWnd()
Plugin Window.Move(hwnd,0,0)
For -1
Rem star
MoveTo 894,567
Delay 100
LeftClick 1
Delay 100
Plugin Window.SendString(hwnd,"刷蜡烛卖")
Rem 数字
Randomize
//得到 1~99 之间的一个随机数
x = Int((99 * Rnd) + 1)
//判断这个数字是否2位数字，如果不是2位数字，就重新生成
If x<10
Goto 数字
EndIf
SayString x
Delay 109
KeyPress 13,1
Delay 63
KeyPress 13,1
Delay 1828
KeyPress 13,1
Delay 2000
VBSCall FindPic(0,0,1024,768,"力.bmp",0.9,x,y)
//区域找图 0,0,1024,768为区域范围 "神盾.bmp"为图片名（路径） 1为找图的相似度 x,y为找到图片后的坐标变量
If x>=0 and y>=0
MoveTo 526 452
Delay 5
LeftClick 1
MoveTo 879 695
Delay 100
LeftClick 1
Goto shanhao
EndIf
KeyPress 40,1
Delay 250
KeyPress 13,1
Delay 1032
KeyPress 40,1
Delay 219
KeyPress 13,1
Delay 4000
MoveTo 591 349
Delay 10
LeftClick 1
Delay 1000
VBSCall FindPic(0,0,1024,768,"容大胖子.bmp",0.9,x,y)
//区域找图 0,0,1024,768为区域范围 "神盾.bmp"为图片名（路径） 1为找图的相似度 x,y为找到图片后的坐标变量
If x>=0 and y>=0
MoveTo x-169 y+111
Delay 5
LeftClick 1
Else
Goto shanhao
EndIf
Delay 1000
VBSCall FindPic(0,0,1024,768,"容大胖子.bmp",0.9,x,y)
//区域找图 0,0,1024,768为区域范围 "神盾.bmp"为图片名（路径） 1为找图的相似度 x,y为找到图片后的坐标变量
If x>=0 and y>=0
MoveTo x+12 y+51
Delay 5
LeftClick 1
EndIf
Delay 2000
KeyPress 40,1
Delay 20
KeyPress 40,1
Delay 20
KeyPress 40,1
Delay 20
KeyPress 40,1
Delay 20
KeyPress 13,1
Delay 20
KeyPress 13,1
Rem 建号
Delay 20
KeyPress 13,1
Delay 200
KeyPress 13,1
Delay 200
KeyPress 13,1
VBSCall FindPic(0,0,1024,768,"玉.bmp",0.9,x,y)
//区域找图 0,0,1024,768为区域范围 "神盾.bmp"为图片名（路径） 0.9为找图的相似度 x,y为找到图片后的坐标变量
If x>=0 and y>=0
Delay 50
KeyPress 13,1
//回车
Else
Delay 10
EndIf
VBSCall FindPic(0,0,1024,768,"容大胖子.bmp",0.9,x,y)
//区域找图 0,0,1024,768为区域范围 "神盾.bmp"为图片名（路径） 0.9为找图的相似度 x,y为找到图片后的坐标变量
If x>=0 and y>=0
MoveTo x-508 y+275
Delay 50
LeftClick 1
//左键单击进行攻击
EndIf
Delay 2500
LeftClick 1
Delay 2500
VBSCall FindPic(0,0,1024,768,"清.bmp",0.9,x,y)
//区域找图 0,0,1024,768为区域范围 "神盾.bmp"为图片名（路径） 0.9为找图的相似度 x,y为找到图片后的坐标变量
If x>=0 and y>=0
MoveTo x-250,y+100
LeftClick 1
Delay 1500
Else goto 建号
EndIf
LeftClick 1
Delay 1500
LeftClick 1
Delay 1500
VBSCall FindPic(0,0,1024,768,"武.bmp",0.9,x,y)
//区域找图 0,0,1024,768为区域范围 "神盾.bmp"为图片名（路径） 0.9为找图的相似度 x,y为找到图片后的坐标变量
If x>=0 and y>=0
MoveTo x-250,y+270
LeftClick 1
Delay 2500
Else goto 建号
EndIf
LeftClick 1
Delay 2500
LeftClick 1
Delay 2500
MoveTo 69,283
LeftClick 1
Delay 2800
LeftClick 1
Delay 2800
LeftClick 1
Delay 2800
LeftClick 1
Delay 2800
LeftClick 1
Delay 2800
VBSCall FindPic(0,0,1024,768,"考官一.bmp",0.9,x,y)
//区域找图 0,0,1024,768为区域范围 "神盾.bmp"为图片名（路径） 0.9为找图的相似度 x,y为找到图片后的坐标变量
If x>=0 and y>=0
MoveTo x-661 y+75
Delay 50
LeftClick 1
//左键单击进行攻击
Else
Goto shanhao
EndIf
Delay 3000
MoveTo 685,528
Delay 10
LeftClick 1
Delay 1000
KeyPress 13,1
Delay 100
Rem 交任务
KeyPress 13,1
Delay 100
KeyPress 13,1
Delay 100
KeyPress 13,1
Delay 100
MoveTo 738,731
LeftClick 1
Delay 4000
MoveTo 921,529
Delay 50
LeftClick 1
Delay 2300
VBSCall FindPic(0,0,1024,768,"考官一.bmp",0.9,x,y)
//区域找图 0,0,1024,768为区域范围 "神盾.bmp"为图片名（路径） 0.9为找图的相似度 x,y为找到图片后的坐标变量
If x>=0 and y>=0
Delay 10
Else goto 交任务
EndIf
LeftClick 1
Delay 2300
LeftClick 1
Delay 2300
LeftClick 1
Delay 2300
LeftClick 1
Delay 2300
MoveTo 961,289
Delay 10
LeftClick 1
Delay 2600
MoveTo 961,289
Delay 10
LeftClick 1
Delay 2600
MoveTo 961,289
Delay 10
LeftClick 1
Delay 2600
MoveTo 961,289
Delay 10
LeftClick 1
Delay 2600
MoveTo 961,289
Delay 10
LeftClick 1
Delay 2600
MoveTo 961,289
Delay 10
LeftClick 1
Delay 2600
MoveTo 574,142
Delay 10
LeftClick 1
Delay 2500
LeftClick 1
Delay 2500
VBSCall FindPic(0,0,1024,768,"容大胖子.bmp",0.9,x,y)
//区域找图 0,0,1024,768为区域范围 "神盾.bmp"为图片名（路径） 0.9为找图的相似度 x,y为找到图片后的坐标变量
If x>=0 and y>=0
MoveTo x+10 y+100
Delay 50
LeftClick 1
Delay 2000
//左键单击进行攻击
EndIf
KeyPress 13,1
Delay 200
KeyPress 13,1
Delay 200
KeyPress 13,1
Delay 200
VBSCall FindPic(0,0,1024,768,"容大胖子.bmp",0.9,x,y)
//区域找图 0,0,1024,768为区域范围 "神盾.bmp"为图片名（路径） 0.9为找图的相似度 x,y为找到图片后的坐标变量
If x>=0 and y>=0
MoveTo x-7 y-174
Delay 50
LeftClick 1
Delay 2000
//左键单击进行攻击
EndIf
VBSCall FindPic(0,0,1024,768,"容大胖子.bmp",0.9,x,y)
//区域找图 0,0,1024,768为区域范围 "神盾.bmp"为图片名（路径） 0.9为找图的相似度 x,y为找到图片后的坐标变量
If x>=0 and y>=0
MoveTo x+109 y-330
Delay 50
LeftClick 1
Delay 4000
//左键单击进行攻击
EndIf
MoveTo 708,770
Delay 10
LeftClick 1
Delay 1000
MoveTo 873,484
Delay 500
LeftClick 1
Delay 500
MoveTo 546,411
Delay 500
LeftClick 1
Delay 500
Rem shanhao
MoveTo 1012,760
Delay 100
LeftClick 1
Delay 100
MoveTo 553,383
Delay 100
LeftClick 1
Delay 1000
MoveTo 906,650
Delay 100
LeftClick 1
Delay 50
LeftClick 1
Delay 50
KeyPress 13,1
Delay 2000
Rem ==========以上是按键精灵录制的内容==========
EndFor
用该脚本电脑要求是分辨率1280*960，幻想分辨率是1024*768，显示驱动：硬件加速，显示模式：窗口模式
另外，由于不能添加bmp格式的图片，所以我的图片不能上传了，我在一楼教不懂的如何制作图片。
作者:
pandaguo
时间:
2009-5-20 22:37
本帖最后由 pandaguo 于 2009-5-20 22:52 编辑
首先说一下我刷蜡烛的速度，大约4分45秒刷一个蜡烛，用一个新QQ创小号，刷完之后自动删号，建号。另外放一个可以带宠物的大号在桃东门口的芳草林，宠物开收集。然后你人就可以出去玩了，自己可以刷蜡烛。
本来我想自己说一下如何制作bmp图片的，但是我怕我说的不明白，就到按键精灵的官方论坛找一个帖子，很具体的介绍如何制作图片
http://bbs.vrbrothers.com/viewth ... &extra=page%3D1
，大家可以进去看看，如果还有不懂的，可以问我一下，我每天都会逛一下紫菀论坛的。
作者:
火热の月亮
时间:
2009-5-20 22:48
有时间试看看
作者:
飘逸007
时间:
2009-5-20 23:50
紫苑,不就有嘛,没市场了
作者:
氯原子
时间:
2009-5-21 00:35
这个是紫菀的
http://bbs.szyin.com/thread-2956-1-1.html
因为这个系统一直没怎么变过
所以SZ也一直没更新
作者:
weiwei4585
时间:
2009-5-21 08:05
现在刷蜡烛也不挣钱了，买的人太少了
作者:
larrylongbin
时间:
2009-5-21 08:31
基本没有多少人买。
作者:
larrylongbin
时间:
2009-5-21 08:33
现在也不知道什么东西赚钱了。
作者:
licio
时间:
2009-5-21 08:44
我一看到程序头就大了
作者:
mojun911
时间:
2009-5-21 13:06
虽然蜡烛不吃香了但东西是好的，顶
能研究个自动刷免爆句更好了
作者:
adan..521
时间:
2009-5-21 13:09
感谢楼主分享
作者:
wenliu
时间:
2009-5-21 13:19
看了我也看不懂，看来该去上学了
作者:
独霸天下88
时间:
2009-5-21 19:17
看不懂啊 怎么办
作者:
zhouxinchen
时间:
2009-5-22 09:27
刷蜡烛卖还不够电费的呢
欢迎光临 紫菀论坛 (http://bbs.szyin.com/)
Powered by Discuz! 7.1
有时间试看看
感谢楼主分享