新龙族官方论坛

 找回密码
 立即注册

跪求~~战士 白发魔女版 挂机脚本 - 第2页 - 按键脚本交流区

楼主: hotman121121

跪求~~战士 白发魔女版 挂机脚本 [复制链接]

Rank: 1

发表于 2015-5-18 15:01:17 |显示全部楼层



   交流贴。。。。

使用道具 举报

发表于 2015-5-28 11:50:59 |显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽

使用道具 举报

发表于 2015-5-28 15:07:34 |显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽

使用道具 举报

发表于 2015-5-29 11:53:39 |显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽

使用道具 举报

发表于 2015-5-29 13:18:22 |显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽

使用道具 举报

发表于 2015-5-29 13:42:06 |显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽

使用道具 举报

发表于 2015-5-29 15:55:33 |显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽

使用道具 举报

Rank: 1

发表于 2015-5-29 17:11:15 |显示全部楼层
[General]
Description=战士TB粘钱防错屏5月21日测试版(F1为TB魔女脚本)
BeginHotkey=111
beginHotkeyMod=8
RunOnce=1
Enable=0
[Repeat]
Type=1
Number=3799968
[Comment]
Content=

[Script]
Delay 1000
KeyPress 13 1
Delay 1000
SayString 脚本将<<自动卡住SHIFT>>~~~众神传说~白发魔女之<<战士用TB顶怪>>5月21日<<粘钱防错屏>>版
Delay 1000
KeyPress 13 1
Delay 500
KeyDown 16 1
Delay 1000
SayString 请在5秒内<<粘上零钱>>
Delay 1000
KeyPress 13 1
Delay 2000
LeftDown 1
Delay 2000
Delay 1000
LeftDown 1
Delay 500
KeyPress 13 1
Delay 1000
SayString 如果粘钱成功~~则在3秒内鼠标移到<<攻击点>>
Delay 1000
KeyPress 13 1
Delay 2000
Delay 1000
VBSCall GetCursorPos(b1,b2)
Delay 500
KeyPress 13 1
Delay 1000
SayString 3秒内将鼠标放在 << 技能施放点 >>
Delay 1000
KeyPress 13 1
Delay 1000
KeyPress 27 1
Delay 2000
VBSCall GetCursorPos(a1,a2)
Delay 200
KeyPress 13 1
Delay 1000
SayString 警告:如果粘钱未成功不要运行脚本
Delay 1000
KeyPress 13 1
Delay 1000
SayString 警告:运行期间不要按鼠标左键,停止脚本则先按多按几下鼠标左键和SHIFT.
Delay 1000
KeyPress 13 1
Delay 500
KeyPress 27 1
Delay 500
KeyDown 112 1
Delay 200
KeyUp 112 1
Delay 1500
MoveTo a1 a2
Gosub 右键按下弹起
Gosub 右键按下弹起
Delay 200
Rem 开始攻击
KeyDown 16 1
Delay 200
MoveTo b1 b2
For 8
    For 120
        LeftDown 1
        Delay 50
    EndFor
    Gosub 跳过边境
    Delay 50
    Gosub 死亡等待复活
EndFor
Delay 50
Gosub 用TB
KeyPress 13 1
Delay 1000
SayString 警告:如果粘钱未成功不要运行脚本,停止脚本则先按多按几下鼠标左键和SHIFT,魔女5月21日
Delay 1000
KeyPress 13 1
Delay 200
Goto 开始攻击
Sub 用TB
    MoveTo a1 a2
    Gosub 右键按下弹起
    Gosub 右键按下弹起
Return 用TB
Sub 右键按下弹起
    Delay 200
    RightDown 1
    Delay 200
    RightUp 1
    Delay 200
Return 右键按下弹起
Sub 判断血量并喝水
    IfColor 33 584 10046b 1
        Delay 200
        MoveTo 33 544
        Delay 200
        KeyUp 16 1
        Delay 200
        KeyDown 27 1
        Delay 200
        KeyUp 27 1
        Delay 200
        KeyDown 49 1
        Delay 200
        KeyUp 49 1
        Delay 200
        KeyDown 16 1
        Delay 300
        MoveTo b1 b2
        Delay 200
    Else
    EndIf
Return 判断血量并喝水
Sub 跳过边境
    IfColor 518 424 425d73 0
        Delay 200
        KeyDown 27 1
        Delay 200
        KeyUp 27 1
        Delay 200
        KeyDown 27 1
        Delay 200
        KeyUp 27 1
        Delay 200
    Else
    EndIf
Return 跳过边境
Sub 死亡等待复活
    IfColor 23 595 292494 1
        Delay 200
        MoveTo 33 544
        Delay 200
        KeyUp 16 1
        Delay 200
        KeyDown 27 1
        Delay 200
        KeyUp 27 1
        Delay 200
        KeyDown 49 1
        Delay 200
        KeyUp 49 1
        Delay 200
        KeyDown 16 1
        Delay 6000
        Gosub 跳过边境
        Delay 200
        IfColor 23 595 292494 1
            Delay 1000
            KeyPress 13 1
            Delay 1000
            SayString 以众神传说之名~~复活我哈~----魔女5月21日粘钱防错屏测试版,请及时更新新
            Delay 1000
            Delay 1000
            KeyPress 13 1
            Delay 20000
            For 10000
                Delay 1000
                Gosub 跳过边境
                Delay 4000
                KeyPress 13 1
                Delay 1000
                SayString 以众神传说之名~~复活我哈~----魔女5月21日粘钱防错屏测试版,请及时更新
                Delay 1000
                KeyPress 13 1
                Delay 1000
                Delay 1000
                IfColor 23 595 292494 0
                    Delay 5000
                    Rem 切换状态
                    Delay 200
                    KeyDown 27 1
                    Delay 200
                    KeyUp 27 1
                    Delay 200
                    Rem 以下这个判断点和颜色来源于"有点另类",在此感谢他~
                    IfColor 731 564 ffffff 1
                        Delay 100
                        KeyDown 9 1
                        Delay 100
                        KeyUp 9 1
                        Delay 100
                        Goto 切换状态
                    EndIf
                    KeyDown 16 1
                    Delay 500
                    MoveTo b1 b2
                    For 5
                        For 120
                            LeftDown 1
                            Delay 50
                        EndFor
                        Gosub 死亡等待复活
                        Delay 50
                        Gosub 跳过边境
                    EndFor
                    Delay 200
                    KeyDown 112 1
                    Delay 200
                    KeyUp 112 1
                    Delay 1500
                    MoveTo a1 a2
                    Gosub 右键按下弹起
                    Gosub 右键按下弹起
                    MoveTo b1 b2
                    Goto 开始攻击
                EndIf
            EndFor
        Else
            Delay 200
            MoveTo b1 b2
            Delay 200
        EndIf
    EndIf
Return 死亡等待复活

使用道具 举报

Rank: 1

发表于 2015-5-29 17:12:46 |显示全部楼层
[General]
Description=加泰班用双重砍战绩,自动换武器(F1双重,F2狂风,F3泰班,F8回复)
BeginHotkey=122
BeginHotkeyMod=0
PauseHotkey=0
PauseHotkeyMod=0
StopHotkey=121
StopHotkeyMod=0
RunOnce=1
EnableWindow=
Enable=1
AutoRun=0
[Repeat]
Type=0
Number=1
[CallBack]
OnSetup=
[Comment]
Content=

[Script]
//加泰班用双重砍战绩,自动换武器
//F1双重,F2狂风,F3泰班,F8回复
//挂前设置武器为F9,并保证有能加泰班的CP。
Delay 500
KeyPress 13 1
Delay 500
KeyDown 16 1
Delay 500
SayString 粘钱!
Delay 500
KeyPress 13 1
Delay 1000
LeftDown 1
Delay 1000
Delay 1000
LeftDown 1
Delay 500
KeyPress 13 1
Delay 5000
SayString 寻找攻击点!
Delay 5000
KeyPress 13 1
Delay 1000
Delay 1000
VBSCall GetCursorPos(b1,b2)
Delay 500
KeyPress 13 1
Delay 1000
SayString 寻找技能释放点!
Delay 1000
KeyPress 13 1
Delay 1000
KeyPress 27 1
Delay 2000
VBSCall GetCursorPos(a1,a2)
Delay 1000
KeyPress 27 1
Delay 500
Gosub 判断武器并更换
Delay 100
Rem 用泰班
KeyDown 114 1
Delay 200
KeyUp 114 1
Delay 1500
MoveTo a1 a2
Gosub 右键按下弹起
Delay 2000
KeyDown 113 1
Delay 200
KeyUp 113 1
Delay 1000
Rem 用双重
Delay 200
Delay 200
Gosub 判断武器并更换
Delay 200
KeyDown 112 1
Delay 200
KeyUp 112 1
Delay 1500
MoveTo a1 a2
Gosub 右键按下弹起
For 1000
    Delay 200
    Rem 开始攻击
    KeyDown 16 1
    Delay 200
    MoveTo b1 b2
    For 4
        For 25
            LeftDown 1
            Delay 50
        EndFor
        Delay 50
        Gosub 判断CP并用回复
        Delay 50
        Gosub 判断双重是否用完
        Delay 50
    EndFor
    Delay 50
    Gosub 跳过边境
    Delay 50
    Gosub 死亡等待复活
    Delay 50
EndFor
Goto 用双重
//主程序结束
Sub 右键按下弹起
    Delay 200
    RightClick 3
    Delay 200
Return 右键按下弹起
Sub 判断双重是否用完
    IfColor 757 587 31a242 1
        Delay 200
        Goto 用双重
        Delay 200
    EndIf
Else
EndIf
Return 判断双重是否用完
Sub 判断CP并用回复
    IfColor 789 588 182831 2
        KeyPress 13 1
        Delay 1000
        SayString 话说一对男女偷情,男的进入之后趴在女的身上不动,温柔的说:咱们现在联通了,女的有些不悦, 男猛烈进攻,女的高声大喊:移动就是比联通好
        Delay 1000
        KeyPress 13 1
        Delay 300
        For 100
            LeftDown 1
            Delay 50
        EndFor
        Rem 用回复
        Delay 500
        KeyDown 119 1
        Delay 300
        KeyUp 119 1
        Delay 1500
        Gosub 判断武器并更换
        Delay 300
        MoveTo a1 a2
        Gosub 右键按下弹起
        Gosub 右键按下弹起
        MoveTo b1 b2
        Delay 200
        For 5
            For 120
                LeftDown 1
                Delay 50
            EndFor
            Gosub 跳过边境
            Delay 50
            Gosub 死亡等待复活
        EndFor
        Delay 200
        IfColor 782 510 ad8652 2
            Delay 500
            KeyPress 13 1
            Delay 1000
            SayString 回复CP完成~~~
            Delay 1000
            KeyPress 13 1
            Delay 500
            KeyPress 27 1
            Delay 200
            Goto 用泰班
        Else
            Delay 500
            KeyPress 13 1
            Delay 1000
            SayString 一男青年在公交车上看到一美女的衣领开得很低,春光外泄,戏言道‘真是桃花盛开的地方啊’,美女听后,撩起裙子说:‘还有生你养你的地方’!
            Delay 1000
            KeyPress 13 1
            Delay 500
            Goto 用回复
        EndIf
    Else
    EndIf
Return 判断CP并用回复
Sub 判断血量并喝水
    IfColor 33 584 10046b 1
        Delay 50
        MoveTo 33 544
        Delay 50
        KeyUp 16 1
        Delay 50
        KeyDown 27 1
        Delay 50
        KeyUp 27 1
        Delay 50
        KeyDown 49 1
        Delay 50
        KeyUp 49 1
        Delay 50
        KeyDown 16 1
        Delay 50
        MoveTo b1 b2
        Delay 200
    Else
    EndIf
Return 判断血量并喝水
Sub 跳过边境
    IfColor 518 424 425d73 0
        Delay 200
        KeyDown 27 1
        Delay 200
        KeyUp 27 1
        Delay 200
        KeyDown 27 1
        Delay 200
        KeyUp 27 1
        Delay 200
    Else
    EndIf
Return 跳过边境
Sub 死亡等待复活
    IfColor 23 595 292494 1
        Delay 200
        MoveTo 33 544
        Delay 500
        KeyUp 16 1
        Delay 200
        KeyDown 27 1
        Delay 200
        KeyUp 27 1
        Delay 200
        KeyDown 49 1
        Delay 200
        KeyUp 49 1
        Delay 200
        KeyDown 16 1
        Delay 500
        Delay 6000
        Gosub 跳过边境
        Delay 200
        IfColor 23 595 292494 1
            Delay 1000
            KeyPress 13 1
            Delay 1000
            SayString ~~复活我哈~
            Delay 1000
            Delay 1000
            KeyPress 13 1
            Delay 20000
            For 10000
                Delay 1000
                Gosub 跳过边境
                Delay 4000
                KeyPress 13 1
                Delay 1000
                SayString ~~复活我哈~
                Delay 1000
                KeyPress 13 1
                Delay 1000
                Delay 1000
                IfColor 23 595 292494 0
                    Delay 5000
                    Rem 切换状态
                    Delay 200
                    KeyDown 27 1
                    Delay 200
                    KeyUp 27 1
                    Delay 200
                    Rem
                    IfColor 731 564 ffffff 1
                        Delay 100
                        KeyDown 9 1
                        Delay 100
                        KeyUp 9 1
                        Delay 100
                        Goto 切换状态
                    EndIf
                    KeyDown 16 1
                    Delay 500
                    MoveTo b1 b2
                    For 5
                        For 120
                            LeftDown 1
                            Delay 50
                        EndFor
                        Gosub 死亡等待复活
                        Delay 50
                        Gosub 跳过边境
                    EndFor
                    Delay 500
                    Goto 用双重
                EndIf
            EndFor
        Else
            Delay 200
            MoveTo b1 b2
            Delay 200
        EndIf
    EndIf
Return 死亡等待复活
Sub 判断武器并更换
    IfColor 91 571 BDFBBD 0
        Delay 200
        KeyPress 27 3
        Delay 200
        KeyPress 120 3
        Delay 200
    EndIf
Return 判断武器并更换
RightClick 3

使用道具 举报

发表于 2015-5-29 18:19:03 |显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

新龙族官方论坛

GMT+8, 2020-9-19 04:46 , Processed in 0.060571 second(s), 7 queries .

Powered by Discuz! X2

© 2001-2011 Comsenz Inc.

回顶部