【搬运】剑三官方综合论坛的技术贴

发布时间:2018-6-25 05:46

313 20 0

qazwww

用户头衔:管理员

关注 私信
我只是一个搬运的小蚂蚁,我只是一个搬运的小蚂蚁,我只一个搬运的小蚂蚁,重要的事说三次,花爹镇楼

本帖子中包含更多资源

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

x
B Color Smilies
  • qazwww
    2018-6-25 05:49:39
    居然弄错镇楼图了就这样吧

    本帖子中包含更多资源

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

    x
  • qazwww
    2018-6-25 05:53:01
    插一下
    hi,可以借我五毛钱买个小布丁次吗  天气热了看别人都在吃我也想吃

    本帖子中包含更多资源

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

    x
  • qazwww
    2018-6-25 05:56:29
    今天在坛子看到一个帖子,不玩剑三了,发个技术贴,于是我就开始搬运了

    本帖子中包含更多资源

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

    x
  • qazwww
    2018-6-25 05:59:31
    奶秀:Rem sss
    dm_ret = dm.CmpColor(605,526,"a4d95e-0f0f0f",1.0)
    If dm_ret = 0 Then
    Delay 5
    Goto sss
    End If
    //如果自己在读条就返回
    dm_ret = dm.FindPic(812,638,856,653,"解控1.bmp|解控11.bmp|解控2.bmp|解控22.bmp","282828",0.9,0,intX,intY)
    If intX < 0 Then
    Delay 5
    KeyDown &quot;Num 9&quot;, 1
    Delay 5
    KeyUp &quot;Num 9&quot;, 1
    Delay 5
    End If
    //两个解控都在CD就重置
    dm_ret = dm.FindPic(355,520,524,533,&quot;被定.bmp|被晕.bmp|被锁.bmp&quot;,&quot;101010&quot;,0.9,0,intX,intY)
    If intX > 0 Then
    Delay 5
    KeyDown &quot;O&quot;, 1
    Delay 5
    KeyUp &quot;O&quot;, 1
    Delay 5
    End If
    dm_ret = dm.CmpColor(374,348 ,&quot;f5866e-0f0f0f&quot;,1.0)
    If dm_ret = 1 Then
    Call bb()
    End If
    //血少于40就开风袖
    dm_ret = dm.CmpColor(421,348,&quot;f69067-0f0f0f&quot;,1.0)
    If dm_ret = 1 Then
    Call aa()
    End If
    //血少于60就开中加
    dm_ret = dm.CmpColor(495,563,&quot;e4804f-0f0f0f&quot;,1.0)
    If dm_ret = 1 Then
    Delay 5
    Call cc()
    End If
    //自己血少于60就开天地
    dm_ret = dm.CmpColor(504,572,&quot;36b5f3-0f0f0f&quot;,1.0)
    If dm_ret = 1 Then
    Delay 5
    KeyDown &quot;Num 5&quot;, 1
    Delay 5
    KeyUp &quot;Num 5&quot;, 1
    Delay 5
    End If
    //自己蓝少于85就回蓝
    dm_ret = dm.FindColor(383,331,424,340,&quot;dfdf06-141414|6666c3-1
  • qazwww
    2018-6-25 06:02:24
    找到天策的了:


    Rem sss
    s = dm.Ocr(932,624,983,649, &quot;AAAA0F-55550F&quot;, 1.0)
    If 260 > s and s > 0 Then
    Call a()        
    End If
    Delay 10
    If 300 > s and s > 75 Then
    Call b()        
    End If
    Delay 10
    If 90 > s and s > 45 Then
    Call c()
    End If
    Delay 10
    If 55 > s and s > 0 Then
    Call d()
    End If
    Delay 10
    Goto sss

    Sub a()
    dm_ret = dm.CmpColor(688,788,&quot;E2704C-321e19&quot;,0.9)
    If dm_ret = 1 Then
           KeyDown &quot;3&quot;, 1
           Delay 10
                 KeyUp &quot;3&quot;, 1
           Delay 10
    End If
    dm_ret = dm.CmpColor(762,788,&quot;EE8957-101010&quot;,0.9)
    If dm_ret = 1 Then
           KeyDown &quot;2&quot;, 1
           Delay 10
                 KeyUp &quot;2&quot;, 1
           Delay 10
    End If
    End Sub
    //25尺以内血低于25%开虎,低于50%开林
    Sub b()
            dm_ret = dm.CmpColor(1396,799,&quot;030303-050505&quot;,1.0)
    If dm_ret = 0 Then
           KeyDown &quot;Num *&quot;, 1
           Delay 10
                  KeyUp &quot;Num *&quot;, 1
           Delay 10
    Goto sss
    End If        

    dm_ret = dm.FindPic(1224,792,1678,853,&quot;御天.bmp|笑日.bmp|敌方山.bmp|敌方虎.bmp|任驰骋.bmp|生太极.bmp&quot;,&quot;505050&quot;,0.9,0,intX,intY)
    If intX < 0 Then
           KeyDown
  • qazwww
    2018-6-25 06:05:47
    (麓锝ウ仫渐`) 我今天就要818那个。。。那个。。。那个。。。咦咦咦我叫啥来着 ∑(°△°|||)︴
    (麓°胎胎胎胎胎胎胎胎ω°胎胎胎胎胎胎胎胎‘)求好心人告诉我我叫啥
  • qazwww
    2018-6-25 06:08:45
    藏剑找到了:


    Rem sss
    UserVar 距离1 &quot;&quot;
    UserVar 距离2 &quot;&quot;
    UserVar 距离3 &quot;&quot;
    UserVar 距离4 &quot;&quot;
    UserVar 距离5 &quot;&quot;
    UserVar 重剑 &quot;&quot;
    UserVar 血量 &quot;&quot;
    UserVar 目标读条 &quot;&quot;



    dm_ret = dm.CmpColor(170,79,&quot;cd5232-282823&quot;,0.9)
    If dm_ret = 1 Then
    Delay 8
    血量 = 1
    Else
    血量 = 0
    Delay 8
    End If



    dm_ret = dm.CmpColor(693,209,&quot;040404-040404&quot;,1.0)
    If dm_ret = 0 Then
    Delay 8
    目标读条 = 1
    Else
    目标读条 = 0
    Delay 8
    End If



    dm_ret = dm.FindPic(598,976,620,1002,&quot;重剑.bmp&quot;,&quot;3c3c3c&quot;,0.9,0,intX,intY)
    If intX > 0 Then
    Delay 8
    重剑 = 1
    Else
    重剑 = 0
    End If
    Delay 8

    s = dm.Ocr(930,636,972,658, &quot;d7d714-282814&quot;, 1.0)
    If 65 > s and s > 0 Then
    距离1 = 1
    End If
    Delay 10
    If 85 > s and s > 0 Then
    距离2 = 1
    End If
    Delay 10
    If 152 > s and s > 80 Then
    距离3 = 1
    End If
    Delay 10
    If 170 > s and s > 120 Then
    距离4 = 1
    End If
    Delay 10
    If 245 > s and s > 80 Then
    距离5 = 1
    End If
    Delay 10

    If 距离5 = 1 and 目标读条 = 1 and 重剑 = 0 Then
           KeyDown &quot;5&quot;, 1
           Delay 5
                 KeyUp &quot;5&quot;, 1
           Delay 5
    End If
    //目标小于24尺大于8尺读条就玉虹打断



    If 距离2 = 1 and 目标读条 = 1 Then
  • qazwww
    2018-6-25 06:12:20
    我也不知道这是啥
    感觉好厉害的技术贴,就搬运了,听说还有和苍爹有关的

    本帖子中包含更多资源

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

    x
  • qazwww
    2018-6-25 06:14:56
    完全看不懂这个技术贴

    本帖子中包含更多资源

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

    x

:D 获取中...

Powered by 护民图库 X3.4© 2001-2018FH7.COM

网站内容仅供用于学习和交流,请遵循相关法律法规

QQ在线咨询|Archiver|手机版|小黑屋|毫州论坛