返回列表 回复 发帖

[软件] 提供一一自动刷蜡烛脚本

把我自己做的自动刷蜡烛软件提供给大家看看,可以让大家也学学按键啊。
将下面的东西复制到记事本上,然后将记事本存在按键精灵软件里的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格式的图片,所以我的图片不能上传了,我在一楼教不懂的如何制作图片。
+12

评分记录

马上就要放假了
本帖最后由 pandaguo 于 2009-5-20 22:52 编辑

首先说一下我刷蜡烛的速度,大约4分45秒刷一个蜡烛,用一个新QQ创小号,刷完之后自动删号,建号。另外放一个可以带宠物的大号在桃东门口的芳草林,宠物开收集。然后你人就可以出去玩了,自己可以刷蜡烛。

本来我想自己说一下如何制作bmp图片的,但是我怕我说的不明白,就到按键精灵的官方论坛找一个帖子,很具体的介绍如何制作图片http://bbs.vrbrothers.com/viewth ... &extra=page%3D1,大家可以进去看看,如果还有不懂的,可以问我一下,我每天都会逛一下紫菀论坛的。
马上就要放假了
有时间试看看
紫苑,不就有嘛,没市场了
这个是紫菀的
http://bbs.szyin.com/thread-2956-1-1.html

因为这个系统一直没怎么变过
所以SZ也一直没更新
现在刷蜡烛也不挣钱了,买的人太少了
基本没有多少人买。
想多了,头会痛!
想明白了,心会痛!
现在也不知道什么东西赚钱了。
想多了,头会痛!
想明白了,心会痛!
我一看到程序头就大了
虽然蜡烛不吃香了但东西是好的,顶
能研究个自动刷免爆句更好了
莫愁前路无知己~~天下谁人不识君
返回列表