女弹药吧 关注:14,616贴子:727,840

先发个帖子,小福利

只看楼主收藏回复

很久没来贴吧了,最近有人跟我玩黄龙的脚本,闲着没事就做了一个,我玩的是手雷兵,所以黄龙脚本只适合手雷兵,有要的我晚上回去把脚本放在网盘里。


IP属地:北京来自Android客户端1楼2014-03-24 14:21回复
    网盘呢


    IP属地:江苏来自Android客户端2楼2014-03-24 18:01
    收起回复
      2025-07-26 13:31:08
      广告
      不感兴趣
      开通SVIP免广告
      求。。。Orz


      IP属地:河南来自手机贴吧3楼2014-03-24 18:05
      回复
        地址呢
        --待我长发及腰,少年娶我可好。
        --待你青丝绾正,铺十里红妆可愿。
        --却怕长发及腰,少年倾心他人。
        --待你轻丝绾正,笑看君怀她笑颜。
        -----却不知君有意,伊人不自知。


        IP属地:广东来自Android客户端4楼2014-03-24 19:43
        回复
          膜拜下蜗牛蜀黍


          IP属地:福建来自Android客户端5楼2014-03-24 22:13
          回复
            我已经做好了


            6楼2014-03-24 22:25
            收起回复


              IP属地:江苏来自iPhone客户端7楼2014-03-24 22:40
              回复


                8楼2014-03-25 04:05
                回复
                  2025-07-26 13:25:08
                  广告
                  不感兴趣
                  开通SVIP免广告
                  大家骚等啊,今天拿错U盘了,里面只有狂战的脚本,现在没办法啊,白天上班回不去。


                  IP属地:北京9楼2014-03-25 09:09
                  回复
                    Hwnd = Plugin.Window.Find("地下城与勇士", "地下城与勇士")
                    Call Plugin.Window.Move(Hwnd, 0, 0)
                    //Call 开始打
                    SetSimMode 2
                    KeyDown "D", 1
                    Rem rem1
                    Delay 600
                    FindPic 0,0,800,600,"Attachment:\进图界面.bmp",0.8,intX,intY
                    If intX > 0 And intY > 0 Then
                    KeyUp "D", 1
                    SetSimMode 0
                    Delay 600
                    Call begin
                    Else
                    Goto rem1
                    End If
                    Sub click(x,y)
                    MoveTo x, y
                    Delay 100
                    LeftClick 1
                    Delay 100
                    End Sub
                    Sub begin//这是在进图界面
                    call click(552,413)
                    Call click(552, 413)
                    For 20
                    guaiwu=0
                    Rem rem2
                    Delay 1000
                    FindPic 0,0,800,600,"Attachment:\按空格开始.bmp",0.8,intX,intY
                    If intX > 0 And intY > 0 Then
                    Delay 500
                    KeyPress "Space", 1
                    Delay 7800
                    Call 狂战开始打
                    Else
                    Goto rem2
                    End If
                    Rem rem5
                    Delay 1000
                    FindPic 0,0,800,600,"Attachment:\打完了.bmp",0.8,intX,intY
                    If intX > 0 And intY > 0 Then
                    Delay 500
                    Call click(650, 88)
                    MoveTo 0,0
                    Else
                    Goto rem5
                    End If
                    Next
                    End Sub
                    Global thread1
                    Global thread2
                    Global thread3
                    Global guaiwu
                    Sub 狂战开始打
                    //启动三个线程同时执行
                    /*
                    线程1监听技能是否冷却,冷却完就放
                    线程2一直普通攻击
                    线程3监听怪物是否死亡
                    */
                    For 2
                    If guaiwu = 0 Then
                    thread1 = BeginThread(狂战自由攻击)
                    thread2 = BeginThread(狂战普通攻击)
                    thread3 = BeginThread(怪物死亡)
                    Rem rem4
                    Delay 300
                    If guaiwu = 1 Then
                    Else
                    Goto rem4
                    End If
                    Else
                    For 3
                    guaiwu = 0
                    Delay 13200
                    thread1=BeginThread (狂战自由攻击)
                    thread2 = BeginThread(狂战普通攻击)
                    thread3 = BeginThread(怪物死亡)
                    Rem rem3
                    Delay 300
                    If guaiwu = 1 Then
                    guaiwu = 0
                    Else
                    Goto rem3
                    End If
                    Next
                    End If
                    Next
                    Delay 7000
                    KeyPress "V", 1//移动物品
                    Delay 2000
                    KeyPress "B", 1//移动角色
                    For 10
                    KeyPress "Num 4", 1
                    Delay 200
                    Next
                    End Sub
                    Sub 狂战自由攻击
                    //查看怒气爆发是否冷却,如果冷却完毕直接攻击
                    While guaiwu = 0
                    FindColor 600,529,622,539,"68F0F8",intX,intY
                    If intX > 0 And intY > 0 Then
                    KeyPress "Num +", 1
                    Delay 1300
                    End If
                    //查看崩山击是否冷却
                    FindColor 689,528,713,538,"68F0F8",intX,intY
                    If intX > 0 And intY > 0 Then
                    Delay 200
                    SetSimMode 2
                    KeyPress "PageDown", 1
                    SetSimMode 0
                    Delay 1000
                    End If
                    //查看淤血之怒是否冷却
                    FindColor 599,566,623,576,"68F0F8",intX,intY
                    If intX > 0 And intY > 0 Then
                    KeyPress "Num 0", 1
                    Delay 15000
                    End If
                    Wend
                    End Sub
                    Sub 狂战普通攻击
                    While guaiwu = 0
                    KeyPress "Num 4", 1
                    Delay 200
                    Wend
                    End Sub
                    //每过0.5秒检查一次怪物是否死亡
                    Sub 怪物死亡
                    While guaiwu = 0
                    Delay 500
                    FindColor 476,74,476,74,"000000",intX,intY
                    If intX > 0 And intY > 0 Then
                    guaiwu = 1
                    StopThread thread1
                    StopThread thread2
                    TracePrint "怪物死亡"&"-------"&guaiwu
                    End If
                    Wend
                    End Sub


                    IP属地:北京10楼2014-03-25 09:11
                    回复
                      这是最先给狂战基友做的


                      IP属地:北京11楼2014-03-25 09:12
                      回复
                        c么,感觉好熟悉,但是我的用的按键精灵做的,我的基本通用,只要修改几个键位就好了,麻子牡丹听说用着不错,当然手雷


                        来自Android客户端12楼2014-03-25 09:14
                        收起回复
                          网盘呢


                          IP属地:安徽来自Android客户端13楼2014-03-25 09:16
                          收起回复
                            !!!!!!!!!!!


                            来自Android客户端14楼2014-03-25 09:39
                            回复
                              2025-07-26 13:19:08
                              广告
                              不感兴趣
                              开通SVIP免广告
                              没见过的科技啊


                              IP属地:广东来自Android客户端15楼2014-03-26 07:08
                              收起回复