TC官方合作论坛

 找回密码
 立即注册
查看: 1496|回复: 6

[讨论] 求大神看看我的脚本 给个客观评价

[复制链接]
发表于 2013-1-16 17:00:44 | 显示全部楼层 |阅读模式

马上加入TC

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

x
自己憋好几天写的 侠客押镖的挂 住要是接任务进图 跟飙车走一段 然后跳到打怪的功能里  打怪的功能没写呢 应为我越写越觉得脑力有限 所以发上来球大神给个评价  不喜勿喷


空间 侠客押镖
//默认空间

dm=com("dm.dmsoft")
线程句柄
var x,y,x1,y1,x2,y2,x0,y0,x00,y00,x000,y000,x3,y3,x4,y4,x5,y5,x6,y6,x7,y7,x8,y8,x9,y9,x10,y10  //这些事需要找图的坐标值
功能 初始化()
    //注册插件 设置路径及字库
    // 如果插件不在资源目录里,请把路径"rc:TSPlug.dll" 改为 实际路径
    是否成功=辅助.注册插件("rc:TSPlug.dll",真)
    // 真 表示注册成功 反之假表示注册失败
    如果(!是否成功)
        
        辅助.消息框("插件注册失败!","提示")
    如果结束
    路径 = dm.SetPath("E:\\侠客押镖\\侠客押镖\\资源")
    字库= dm.SetDict(0,"侠客字库.txt")//设置字库
   
功能结束

function 进图()
    窗口句柄=窗口.鼠标所在窗口句柄()
    如果(窗口句柄==0)
        辅助.消息框("获得窗口句柄失败!")
    否则
        是否绑定成功=dm.BindWindow(窗口句柄,"dx","normal","dx",0)
        如果(是否绑定成功==0)
            辅助.消息框("窗口绑定失败,请试下其他绑定模式!")
            
            
        如果结束
    如果结束
    help.sleep(50)
   
    while (true)
//C:
   
    x=dm.SetMouseDelay("windows3",20)
    m=dm.SetKeypadDelay("dx",10)
help.sleep(50)
   dm.KeyPress(79)
   help.sleep(500)
   
   
    找入口=dm.FindPic(219,202,808,578,"E:\\侠客押镖\\侠客押镖\\资源\\职业副本.bmp","202020",0.9,0,x,y)
   
   
if(x==-1)
      help.messagebox("chuansong1")
        
      跳转 C //如果没找到入口 跳转到C循环开始处
        
   else  //接任务代码执行
        D:
        
        help.sleep(50)
        dm.MoveTo(x+30,y+30)
        help.sleep(500)
  dm.LeftClick()
    help.sleep(500)        
        //help.sleep(50)
        //接任务=dm.FindPic(1,1,1032,802,"E:\\侠客押镖\\侠客押镖\\资源\\任务列表.bmp","151515",0.9,0,x0,y0)         
        //help.sleep(500)
        //if(x0==-1)
         //跳转 标记A  //说明任务已经接过了 不许接了 直接进图了
        //endif
        //dm.MoveTo(x0+31,y0+31-24)
        //help.sleep(50)      
        //dm.LeftClick()
        //help.sleep(50)
    //endif  
    //help.sleep(5000)
    //接任务2=dm.FindPic(1,1,1032,802,"E:\\侠客押镖\\侠客押镖\\资源\\接受.bmp","090909",0.9,0,x00,y00)
    //help.sleep(500)
    //if(x00==-1)
      //help.messagebox("jieshou")
      
    //else
        //help.sleep(50)
        //dm.MoveTo(x00+44,y00)
        
        //help.sleep(50)
        //dm.LeftClick()
        //help.sleep(50)
        
    //endif  
   
        
    //help.sleep(500)
   
    //关闭=dm.FindPic(1,1,1032,802,"E:\\侠客押镖\\侠客押镖\\资源\\关闭.bmp","090909",0.9,0,x000,y000)
    //如果(x000>-1)
        //dm.MoveTo(x000,y000)
        //help.sleep(50)
        //dm.LeftClick()
        //help.sleep(50)
        
    //如果结束
   
    //help.sleep(400)
//标记A:   
   
    //help.sleep(400)
    //传送=dm.FindPic(219,202,808,578,"E:\\侠客押镖\\侠客押镖\\资源\\传送.bmp","090909",0.9,0,x1,y1)
    //help.sleep(50)
    //if(x1==-1)
        //help.messagebox("chuansong")
    //else
        
        //help.sleep(80)
        //dm.MoveTo(x1+6,y1+6)
        //help.sleep(80)
        //dm.LeftClick()
        //help.sleep(1000)
     

        
        //help.sleep(400)
        //确定=dm.FindPic(219,202,808,578,"E:\\侠客押镖\\侠客押镖\\资源\\确定.bmp","090909",0.9,0,x2,y2)
        //endif
        
        //if(x2==-1)
            //help.messagebox("queding")
        //else     
            //help.sleep(50)
            //dm.MoveTo(x2,y2)
            //help.sleep(50)
            //dm.LeftClick()
            //help.sleep(50)
        //endif
        //help.sleep(8000)
        //开镖 =dm.FindColor(219,202,808,578,"be9645-000000|8c8a88-000000|513a27-000000|665031-000000",1.0,0,x4,y4)
        //if(x4>-1)
        //help.sleep(50)
        //dm.MoveTo(x4,y4)
        //dm.RightClick()
        //help.sleep(1000)
        //ELSE
        //help.messagebox("kaibiao")
        //endif
        //前进=dm.FindStr(219,202,808,578,"命令镖队前进","63ff85-000000",1.0,x5,y5)
        //if(x5>-1)
        //help.sleep(50)
        //dm.MoveTo(x5+57,y5)
        //help.sleep(50)
        //dm.LeftClick()
        //help.sleep(5000)
        //else
            //help.messagebox("qianjin")
        //endif
       while(true)
        镖车=dm.FindStr(219,202,808,578,"镖车","1af11a-000000",1.0,x6,y6)
         help.sleep(60)
        镖车1=dm.FindStr(219,202,808,578,"镖车","1af11a-000000",1.0,x7,y7)
       if(x6==x7)
           help.messagebox("该打怪了")
     
      else
          dm.MoveTo(x7,y7)
        help.sleep(50)
        
        dm.LeftClick()
        
           
      endif
       endwhile
      
        
     //交任务=dm.FindStr(219,202,808,578,"32单人镖走风","63ff85-000000",1.0,x8,y8)
     if(x8==-1)
         跳转 D
     else
     //dm.MoveTo(x8,y8)
     //help.sleep(50)        
     //dm.LeftClick()
     //help.sleep(5000)
     //完成=dm.FindPic(219,202,808,578,"E:\\侠客押镖\\侠客押镖\\资源\\完成.bmp","090909",0.9,0,x9,y9)
           
        //dm.MoveTo(x9,y9)
     //help.sleep(50)        
     //dm.LeftClick()
     //help.sleep(5000)
     endif
D:
     
     //离开=dm.FindPic(57,29,1517,586,"E:\\侠客押镖\\侠客押镖\\资源\\离开.bmp","090909",0.9,1,x10,y10)
        //dm.MoveTo(x10,y10+51)
        //help.sleep(50)        
        //dm.LeftClick()
        //确定=dm.FindPic(219,202,808,578,"E:\\侠客押镖\\侠客押镖\\资源\\确定.bmp","090909",0.9,0,x2,y2)
        //help.sleep(50)
            //dm.MoveTo(x2,y2)
           //help.sleep(50)
            //dm.LeftClick()
            //help.sleep(50)
       //endwhile
        
    endfunction


功能 热键0_热键()
    //这里添加你要执行的代码
    线程句柄=线程.开启("侠客押镖.进图","")
    热键.销毁("热键0")
功能结束


功能 热键1_热键()
    //这里添加你要执行的代码
    线程.关闭(线程句柄)
    dm_ret= dm.UnBindWindow()
    help.exit()
功能结束

空间结束
//空间结束语句
回复

使用道具 举报

发表于 2013-1-16 17:01:44 | 显示全部楼层
路过。。。完全不懂=。=
回复 支持 反对

使用道具 举报

 楼主| 发表于 2013-1-16 17:02:19 | 显示全部楼层
跟跟随镖车的思路是 确定镖车一个点的坐标 然后如果两个坐标一样就是镖车停止 就要打怪了

但是我没能实现
回复 支持 反对

使用道具 举报

发表于 2013-1-16 17:11:03 | 显示全部楼层
回复 3楼a5754556的帖子

这个你可以先得到镖车的坐标 然后加个延迟 再次判断镖车的坐标 分别存在2个不同的变量里 然后把这2个变量进行对比   来确定镖车是否移动,
如果你这游戏战斗时的画面和非战斗的时候不一样那就更好判断了
回复 支持 反对

使用道具 举报

发表于 2013-1-16 17:45:26 | 显示全部楼层
看见英文瞄一下  看见中文就好好看会
回复 支持 反对

使用道具 举报

发表于 2013-1-16 17:51:55 | 显示全部楼层
眨眼看去跟C写的差不多
回复 支持 反对

使用道具 举报

发表于 2013-1-16 18:44:02 | 显示全部楼层
  表示压力很大
回复 支持 反对

使用道具 举报

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

本版积分规则

关闭

推荐上一条 /2 下一条

关闭

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

GMT+8, 2024-6-3 11:01 , Processed in 0.061569 second(s), 23 queries .

Powered by 海安简单软件服务部

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

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