TC官方合作论坛

 找回密码
 立即注册
12
返回列表 发新帖
楼主: 17199592

[问题] 求教高手

[复制链接]
发表于 2012-4-27 11:23:54 | 显示全部楼层
来瞧瞧。。看看到底怎么回事
回复 支持 反对

使用道具 举报

 楼主| 发表于 2012-4-27 13:20:02 | 显示全部楼层
我把脚本代码传上来了,请高手帮我看看

本帖子中包含更多资源

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

x
回复 支持 反对

使用道具 举报

发表于 2012-4-27 13:54:30 | 显示全部楼层
:|  帮你顶下。希望大神可以帮你1
回复 支持 反对

使用道具 举报

 楼主| 发表于 2012-4-28 22:56:54 | 显示全部楼层
大神们给看看问题出现在哪里
回复 支持 反对

使用道具 举报

发表于 2012-4-28 22:59:16 | 显示全部楼层
丫的这贴都能盖高楼 哈哈 发个附件 谁会去下哟
回复 支持 反对

使用道具 举报

 楼主| 发表于 2012-4-28 23:06:57 | 显示全部楼层
鹿鼎记自动刷怪脚本,也是下载别人的,用了两天就不能用了
空间 我的程序
bool 标示
整型 线程句柄
整型 窗口句柄
整型 鹿鼎记窗口句柄

功能 逻辑型 运行环境设置()
逻辑型 复选框3
复选框3=复选框.获得状态("复选框3")
如果(复选框3)
        整型 高
        整型 宽
        进度条.设置进度("进度条0",10)
        整型 TC窗口句柄
        系统.获得分辨率(高,宽)
        如果(宽!=1366&&高!=768)
                系统.设置分辨率(1366,768)   
        如果结束
        进度条.设置进度("进度条0",50)
        辅助.等待(1000)
        TC窗口句柄=窗口.找到窗口("TC 简单开发工具")
        窗口.设置位置(TC窗口句柄,475,216)
        进度条.设置进度("进度条0",100)
        标签.设置文本("标签30","成功")   
如果结束
返回 真
功能结束
整型 选项

功能 逻辑型 下拉列表(字符型 下拉框名称)
选项=下拉框.得到选项(下拉框名称)  

//选择恢复技能键
如果(字符串.比较(下拉框名称,"下拉框7")==0)
        如果(选项==0)
                窗口.提交按键(窗口句柄,56)
        如果结束
        如果(选项==1)
                窗口.提交按键(窗口句柄,57)
        如果结束
如果结束
//选择取怪键
如果(字符串.比较(下拉框名称,"下拉框6")==0)
        如果(选项==0)
                窗口.提交按键(窗口句柄,9)
        如果结束
        如果(选项==1)
                窗口.提交按键(窗口句柄,192)
        如果结束
如果结束
//选取组合技能键
如果(字符串.比较(下拉框名称,"下拉框2")==0)
        如果(选项==0)
                窗口.提交按下(窗口句柄,164)   
                窗口.提交按键(窗口句柄,49)
                窗口.提交弹起(窗口句柄,164)
        如果结束
        如果(选项==1)
                窗口.提交按下(窗口句柄,164)   
                窗口.提交按键(窗口句柄,50)
                窗口.提交弹起(窗口句柄,164)
        如果结束
        如果(选项==2)
                窗口.提交按下(窗口句柄,164)   
                窗口.提交按键(窗口句柄,51)
                窗口.提交弹起(窗口句柄,164)
        如果结束
        如果(选项==3)
                窗口.提交按下(窗口句柄,164)   
                窗口.提交按键(窗口句柄,52)
                窗口.提交弹起(窗口句柄,164)
        如果结束
        如果(选项==4)
                窗口.提交按下(窗口句柄,164)   
                窗口.提交按键(窗口句柄,53)
                窗口.提交弹起(窗口句柄,164)
        如果结束
如果结束
如果(字符串.比较(下拉框名称,"下拉框3")==0)
        如果(选项==0)
                窗口.提交按下(窗口句柄,164)   
                窗口.提交按键(窗口句柄,49)
                窗口.提交弹起(窗口句柄,164)
        如果结束
        如果(选项==1)
                窗口.提交按下(窗口句柄,164)   
                窗口.提交按键(窗口句柄,50)
                窗口.提交弹起(窗口句柄,164)
        如果结束
        如果(选项==2)
                窗口.提交按下(窗口句柄,164)   
                窗口.提交按键(窗口句柄,51)
                窗口.提交弹起(窗口句柄,164)
        如果结束
        如果(选项==3)
                窗口.提交按下(窗口句柄,164)   
                窗口.提交按键(窗口句柄,52)
                窗口.提交弹起(窗口句柄,164)
        如果结束
        如果(选项==4)
                窗口.提交按下(窗口句柄,164)   
                窗口.提交按键(窗口句柄,53)
                窗口.提交弹起(窗口句柄,164)
        如果结束
如果结束
//选择普通技能键
如果(字符串.比较(下拉框名称,"下拉框6")!=0&&字符串.比较(下拉框名称,"下拉框7")!=0&&字符串.比较(下拉框名称,"下拉框2")!=0&&字符串.比较(下拉框名称,"下拉框3")!=0)
        如果(选项==0)
                窗口.提交按键(窗口句柄,49)
        如果结束
        如果(选项==1)
                窗口.提交按键(窗口句柄,50)
        如果结束
        如果(选项==2)
                窗口.提交按键(窗口句柄,51)
        如果结束
        如果(选项==3)
                窗口.提交按键(窗口句柄,52)
        如果结束
        如果(选项==4)
                窗口.提交按键(窗口句柄,53)
        如果结束
如果结束
返回 真
功能结束

功能 逻辑型 瞬间回HP()
int x1,y1
int x2,y2
字符型 血量
int 血量整数
血量=编辑框.获得文本("编辑框2")
血量整数=转换.字符型转整型(血量,0)
如果(血量整数>0&&血量整数<=30)
         x1=87
         y1=30
         x2=89
         y2=36
如果结束
如果(血量整数>30&&血量整数<=50)
         x1=110
         y1=30
         x2=112
         y2=36
如果结束

如果(血量整数>50&&血量整数<=75)
         x1=132
         y2=30
         x1=136
         y2=36
如果结束
逻辑型 是否成功
整型 intx
整型 inty
是否成功=大漠.区域找色(x1,y1,x2,y2,"d71414-000000",1.0,0,intx,inty)
如果(!是否成功&&复选框.获得状态("复选框4"))
        窗口.提交按键(窗口句柄,54)
如果结束

返回 真
功能结束

功能 逻辑型 瞬间回MP()
int x1,y1
int x2,y2
字符型 蓝量
int 蓝量整数
蓝量=编辑框.获得文本("编辑框9")
蓝量整数=转换.字符型转整型(蓝量,0)
如果(蓝量整数>0&&蓝量整数<=30)
         x1=97
         y1=39
         x2=100
         y2=44
如果结束

如果(蓝量整数>30&&蓝量整数<=50)
         x1=120
         y1=39
         x2=122
         y2=44
如果结束

如果(蓝量整数>50&&蓝量整数<=75)
         x1=144
         y1=39
         x2=146
         y2=44
如果结束


逻辑型 是否成功
整型 intx
整型 inty

是否成功=大漠.区域找色(x1,y1,x2,y2,"1417d7-000000",1.0,0,intx,inty)
如果(!是否成功&&复选框.获得状态("复选框5"))
        窗口.提交按键(窗口句柄,55)
如果结束
返回 真
功能结束

功能 逻辑型 自动恢复()
逻辑型 是否成功
整型 intx
整型 inty
是否成功=大漠.区域找色(107,30,118,35,"d71414-000000",1.0,0,intx,inty)
//辅助.消息框(转换.整型转字符型(intx))
//辅助.消息框(转换.整型转字符型(inty))
如果(!是否成功)
        我的程序.下拉列表("下拉框7")
        辅助.等待(5000)
如果结束

返回 真
功能结束

功能 逻辑型 自动拾取()

如果(复选框.获得状态("复选框2"))   
   窗口.提交按键(窗口句柄,86)
        辅助.等待(1000)
如果结束


返回 真
功能结束

功能 逻辑型 自动打怪()
标示=true
bool 是否成功
整型 intx
整型 inty
int 技能3延迟
int 技能4延迟
int 防卡时间
技能3延迟=转换.字符型转整型(编辑框.获得文本("编辑框0"),0)
技能3延迟=转换.字符型转整型(编辑框.获得文本("编辑框1"),0)   
防卡时间=转换.字符型转整型(编辑框.获得文本("编辑框3"),0)
//字符型 内容
//内容=路径.获得("路径框0")   
窗口句柄=窗口.类名返回窗口("LuDingJi WndClass")
窗口.设置位置(窗口句柄,10,10)
大漠.创建()
是否成功 = 大漠.绑定窗口(窗口句柄,"normal","normal","normal",0)
辅助.等待(500)
我的程序.自动恢复()
循环(true)
        我的程序.自动拾取()
        我的程序.自动恢复()
        我的程序.下拉列表("下拉框6")
        如果(复选框.获得状态("复选框6"))
                窗口.提交按键(窗口句柄,86)
                辅助.等待(1500)
   如果结束
        如果(选项==-1)
                辅助.消息框("请设置选取怪键!!!        ")
                跳出
                返回 真
        如果结束
        我的程序.下拉列表("下拉框5")
        如果(选项==-1)
                辅助.消息框("请设置首次技能键键!!!        ")
                跳出
                返回 真
        如果结束
        整型 time1
        整型 time2
        整型 time
        time1=0
        time2=0
        time=0
        time1=系统.获取毫秒()
        循环(大漠.区域找色(273,33,277,36,"d61b0c-000000",1.0,0,intx,inty))
               
                我的程序.下拉列表("下拉框0")
                如果(选项==-1)
                        辅助.消息框("请设置技能1键!!!        ")
                        跳出
                        返回 真
                如果结束
                辅助.等待(1000)
                我的程序.下拉列表("下拉框1")
                如果(选项==-1)
                        辅助.消息框("请设置技能2键!!!        ")
                        跳出
                        返回 真
                如果结束
                辅助.等待(技能3延迟)
                        我的程序.下拉列表("下拉框2")
                如果(选项==-1)
                        辅助.消息框("请设置技能3键!!!        ")
                        跳出
                        返回 真
                如果结束
                        辅助.等待(技能4延迟)
                        我的程序.下拉列表("下拉框3")
                如果(选项==-1)
                        辅助.消息框("请设置技能4键!!!        ")
                        跳出
                        返回 真
                如果结束
          
                time2=系统.获取毫秒()-time1
//                time=time+time2
               
                如果(time2>防卡时间)
                                辅助.消息框(转换.整型转字符型(time-time1))
                        跳出
                如果结束
//                我的程序.瞬间回HP()
//                我的程序.瞬间回MP()
        循环结束


循环结束
大漠.解绑窗口(窗口句柄)
大漠.释放(线程句柄)
返回 真
功能结束
int i

功能 逻辑型 开始_点击()  
我的程序.运行环境设置()
线程句柄=线程.开启("我的程序.自动打怪")

返回 真  
   
功能结束  

功能 逻辑型 退出_点击()  
线程.关闭(线程句柄)
大漠.解绑窗口(窗口句柄)
大漠.释放(线程句柄)

返回 真  
//函数返回语句   
功能结束  



string 喊话内容1
string 喊话内容2
string 喊话内容3
int 延迟1
int 延迟2
功能 逻辑型 获取喊话内容()

喊话内容1=编辑框.获得文本("编辑框4")   
喊话内容2=编辑框.获得文本("编辑框5")   
喊话内容3=编辑框.获得文本("编辑框6")   
延迟1=转换.字符型转整型(编辑框.获得文本("编辑框7"),0)
延迟2=转换.字符型转整型(编辑框.获得文本("编辑框8"),0)

返回 真
功能结束


功能 逻辑型 粘贴()
   窗口.提交按键(窗口句柄,13)
        键盘.按下(17)
        辅助.等待(100)
        窗口.提交按键(窗口句柄,86)
        辅助.等待(100)
        键盘.弹起(17)
   辅助.等待(100)
   窗口.提交按键(窗口句柄,13)       
        键盘.按下(17)
        辅助.等待(100)
        窗口.提交按键(窗口句柄,86)
        辅助.等待(100)
        键盘.弹起(17)
   窗口.提交按键(窗口句柄,13)
返回 真
功能结束

功能 逻辑型 执行喊话()
如果(单选框.获得状态("单选框0"))
        窗口句柄=窗口.类名返回窗口("LuDingJi WndClass")
        help.sleep(2000)
        循环(真)
                如果(字符串.长度(喊话内容1)!=0)
                        辅助.写入剪切板(喊话内容1)
                        辅助.等待(1000)
                        我的程序.粘贴()
                如果结束
                  辅助.等待(延迟1)
                如果(字符串.长度(喊话内容2)!=0)
                        辅助.写入剪切板(喊话内容2)
                        辅助.等待(1000)
                        我的程序.粘贴()
                如果结束
                辅助.等待(延迟1)
                如果(字符串.长度(喊话内容3)!=0)
                        辅助.写入剪切板(喊话内容3)
                        辅助.等待(1000)
                        我的程序.粘贴()
                如果结束
                辅助.等待(延迟2)
        循环结束       
如果结束

如果(单选框.获得状态("单选框1"))
        字符型 窗口集
        整型 字符位置
        字符型 截取
//        整型 窗口句柄
        整型 延迟

        延迟=转换.字符型转整型(编辑框.获得文本("编辑框4"),0)  
        //自动识别窗口的个数
        窗口集=大漠.枚举窗口(0,"鹿鼎记","",1+4+8+16)
        //辅助.消息框(窗口集)
        循环(真)
                字符位置=字符串.查找字符(窗口集,124)

                如果(字符位置==-1)
                         跳出
                如果结束
                截取=字符串.截取(窗口集,0,字符位置)
                //辅助.消息框(截取)
                窗口句柄=转换.字符型转整型(截取,0)
                窗口.置顶(窗口句柄,真)
                //字符型  内容
                窗口集=字符串.移除(窗口集,字符位置+1,假)
                //辅助.消息框(内容)       
                辅助.等待(100)
//                循环(真)
                        如果(字符串.长度(喊话内容1)!=0)
                                辅助.写入剪切板(喊话内容1)
                                辅助.等待(1000)
                                我的程序.粘贴()
                        如果结束
                          辅助.等待(延迟1)
                        如果(字符串.长度(喊话内容2)!=0)
                                辅助.写入剪切板(喊话内容2)
                                辅助.等待(1000)
                                我的程序.粘贴()
                        如果结束
                        辅助.等待(延迟1)
                        如果(字符串.长度(喊话内容3)!=0)
                                辅助.写入剪切板(喊话内容3)
                                辅助.等待(1000)
                                我的程序.粘贴()
                        如果结束
                        辅助.等待(延迟2)
//        循环结束       

循环结束
如果结束
返回 真
功能结束

功能 逻辑型 按钮0_点击()
我的程序.获取喊话内容()
线程.开启("我的程序.执行喊话")
返回 真
功能结束



功能 逻辑型 按钮1_点击()
线程.关闭(线程句柄)

返回 真
功能结束

//功能 逻辑型 初始化()
//        逻辑型 是否成功
//         是否成功=大漠.获取路径("d:\\dm.dll")
//        if(是否成功)
////                help.messagebox("111")
//        endif
//        图片框.设置图片("图片框0","images\\tctc.png")
//返回 真
//功能结束

功能 逻辑型 按钮2_点击()
辅助.命令("http://bbs.tyuyan.com/",false)

返回 真
功能结束

空间结束
空间 鹿鼎记

功能 逻辑型 开始_点击()
//这里添加你要执行的代码

返回 真
功能结束

空间结束
回复 支持 反对

使用道具 举报

 楼主| 发表于 2012-4-28 23:07:57 | 显示全部楼层
编译通过了,不能执行了 求教
回复 支持 反对

使用道具 举报

发表于 2012-4-29 00:18:02 | 显示全部楼层
回复 17楼17199592的帖子

亲 老版本的TC偶真的不会哦 不好意思 帮不了你了
回复 支持 反对

使用道具 举报

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

本版积分规则

关闭

推荐上一条 /2 下一条

关闭

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

GMT+8, 2024-9-30 10:42 , Processed in 0.038206 second(s), 21 queries .

Powered by 海安简单软件服务部

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

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