TC官方合作论坛

 找回密码
 立即注册
查看: 2034|回复: 1

【剑仙教程】tc炫舞,脚本教程。

[复制链接]
发表于 2016-1-9 16:10:58 | 显示全部楼层 |阅读模式

马上加入TC

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

x
本帖最后由 剑仙十号 于 2016-1-9 16:14 编辑



先使用大漠综合工具做字库。
点阵的个头,做得越大越好。
点阵的特征,越明显越好。
相反的,
点阵的个头小做得很小,做好的字库就差,误识别率很高。
点阵的特征不明显,做好字库也是差,识别率低。
把tc炫舞 拖动到Flashplayer9 中,就可以启动跳舞的游戏。
Ult_X,Ult_Y,客户区左上角的X,Y座标。 User,客户区。 top left corner,左上角。



var 线程ID1,线程开关
function tc炫舞()
  线程开关 = 真
  var hwnd=windowfind("Adobe Flash Player 9","ShockwaveFlash")
  if(hwnd==0)
    messagebox("游戏未启动。")
    threadclose(线程ID1)
  end
  
  windowactivate(hwnd)
  窗口设置大小(hwnd,558,458)
  
  var dm=com("dm.dmsoft")//建立大漠对象.
  dm.SetPath("D:\\1编程\\1大漠\\dm_字库图片")
  dm.SetDict(0,"tc炫舞2016.txt")
  var dm_ret = dm.BindWindow(hwnd,"gdi","windows","windows",0)
  sleep(100)
  
  while(线程开关)//主循环。
   
    //第一部分:先用大漠完成识字。
    var M=dm.Ocr(78,214,516,291,"ff0000-000000",1.0)
    sleep(100)
    if(M!= "")
      var L=strlen(M)
      traceprint("找到的方向键为:"&M)
      staticsettext("标签2",M)
      sleep(30)
      
      //第二部分:完成所有的方向键。//嵌套循环1。
      for(var i=0;i<L;i++)
        var ret=strsub(M,i,i+1)
        select(ret)
          case "↑"
          dm.KeyPress(38)
          case "↓"
          dm.KeyPress(40)
          case "←"
          dm.KeyPress(37)
          case "→"
          dm.KeyPress(39)
        end
        sleep(20)
      end
      traceprint("已经完成方向键的按键。")
      sleep(100)
      
      //第三部分:定点比色,判断小球是否来到P点。//嵌套循环2。
      //var返回值=cmpcolor(442,584,"B8CFE9",1.0)//不匹配,返回值=-1
      //traceprint(返回值)
      //var返回值=cmpcolor(247,814,"B8CFE9",1.0)//匹配成功,返回值=0
      //traceprint(返回值)
      while(线程开关)
        if(dm.CmpColor(357,160,"FFFFFF-000000",0.9)==0)//匹配成功,返回值 = 0.证明小球来到了时间槽。
          sleep(35)
          dm.KeyPress(32)
          break
        end
        sleep(10)
      end
      traceprint("已经完成P点的按键。")
      sleep(300)
      
      //第四部分:用定点比色,判断新循环是否开始了。//嵌套循环3.
      while(线程开关)
        if(dm.CmpColor(106,155,"FFFFFF-000000",0.9)==0)//匹配成功,返回值 = 0.证明小球重新开始。
          break
        end
        sleep(10)
      end
    end
    traceprint("已经开始新的循环。")
    sleep(100)
  end//主循环尾。
  
  dm.UnBindWindow()
  sleep(100)
  traceprint("脚本已经停止。")
end
function 启动_热键()
  线程ID1=threadbegin("tc炫舞","")
end
function 终止_热键()
  线程开关 = 假
end
功能 按钮_窗口绑定_点击()
  线程ID1=threadbegin("tc炫舞","")
结束
功能 按钮_解除绑定_点击()
  线程开关 = 假
结束




2tc炫舞.bmp
3.bmp
4.bmp
5.bmp
6.bmp

评分

参与人数 2威望 +13 金币 +13 收起 理由
言术 + 10 + 10 支持分享
东月山 + 3 + 3 很给力!

查看全部评分

回复

使用道具 举报

发表于 2016-1-9 20:40:36 | 显示全部楼层
嘿嘿,感谢楼主分享!!...
回复 支持 反对

使用道具 举报

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

本版积分规则

关闭

推荐上一条 /2 下一条

关闭

小黑屋|TC官方合作论坛 (苏ICP备18045623号)

GMT+8, 2024-9-30 17:09 , Processed in 0.051592 second(s), 26 queries .

Powered by 海安简单软件服务部

© 2008-2019 版权所有 保留所有权利

快速回复 返回顶部 返回列表