【有源码】鹿鼎记人物和宝宝补血、打怪--凉凉☆笨笨【TC1.0版本】 - TC官方合作论坛

空间我的程序
功能整型  编辑(字符型 str) //子程序名编辑
整型 A  //定义A为整形
字符型 B //定义B为字符型
B=编辑框.获得文本(str) //需要执行的编辑框名称获得文本为字符串
  如果(字符串.比较(str,"编辑框5")>0||字符串.比较(str,"编辑框8")>0)  //被选中的编辑框名称获得文本为字符串
  如果结束
A=转换.字符型转整型(B)  //这里将 B获得的编辑框文本字符串转换成整型
A=A*1000  //这里将整型A 也就是编辑框获得的文本值乘于1000  编辑框填写的数为秒到这里将变成毫秒
返回 A    //返回A得到值给需要的语句里面
功能结束

功能逻辑型下拉列表(字符型下拉框名称)//子程序名下拉列表
整型选项
选项=下拉框.得到选项(下拉框名称)//需要执行下拉框的名称

如果(字符串.比较(下拉框名称,"下拉框0")==0||字符串.比较(下拉框名称,"下拉框1")==0||字符串.比较(下拉框名称,"下拉框2")==0||字符串.比较(下拉框名称,"下拉框3")==0||字符串.比较(下拉框名称,"下拉框4")==0||字符串.比较(下拉框名称,"下拉框5")==0||字符串.比较(下拉框名称,"下拉框6")==0||字符串.比较(下拉框名称,"下拉框7")==0)
//被选中的下拉框名称的选项编号
      如果(选项==0)  //如果选择的是下拉框选项编号0下面将执行
            大漠.按键(49) //大漠后台数字按键 1  下面一次推  1.2.3.4.5.6.7.8.9.0
      如果结束
      如果(选项==1)
            大漠.按键(50)
      如果结束
      如果(选项==2)
            大漠.按键(51)
      如果结束
      如果(选项==3)
            大漠.按键(52)
      如果结束
      如果(选项==4)
            大漠.按键(53)
      如果结束
      如果(选项==5)
            大漠.按键(54)
      如果结束
      如果(选项==6)
            大漠.按键(55)
      如果结束
      如果(选项==7)
            大漠.按键(56)
      如果结束
      如果(选项==8)
            大漠.按键(57)
      如果结束
      如果(选项==9)
            大漠.按键(48)
      如果结束

如果结束

如果(字符串.比较(下拉框名称,"下拉框8")==0||字符串.比较(下拉框名称,"下拉框9")==0||字符串.比较(下拉框名称,"下拉框10")==0||字符串.比较(下拉框名称,"下拉框11")==0||字符串.比较(下拉框名称,"下拉框12")==0||字符串.比较(下拉框名称,"下拉框13")==0||字符串.比较(下拉框名称,"下拉框14")==0)
//被选中的下拉框名称的选项编号
如果(选项==0)//如果选择的是下拉框选项编号0下面将执行
            大漠.按键(112)//大漠后台数字按键 F1  下面一次推  F1.F2.F3.F4.F5.F6.F7.F8.F9.F10
      如果结束
      如果(选项==1)
            大漠.按键(113)
      如果结束
      如果(选项==2)
            大漠.按键(114)
      如果结束
      如果(选项==3)
            大漠.按键(115)
      如果结束
      如果(选项==4)
            大漠.按键(116)
      如果结束
      如果(选项==5)
            大漠.按键(117)
      如果结束
      如果(选项==6)
            大漠.按键(118)
      如果结束
      如果(选项==7)
            大漠.按键(119)
      如果结束
      如果(选项==8)
            大漠.按键(120)
      如果结束
      如果(选项==9)
            大漠.按键(121)
      如果结束

如果结束
返回真
功能结束

功能逻辑型  瞬回血() //子程序名瞬回血
逻辑型是否成功
整型 x
整型 y
//这里判断人物的血是否低于30%
是否成功=大漠.区域找色(82,29,95,37,"464646-000000",1.0,0,x,y)
如果(是否成功)
//如果低于30%执行下面的
我的程序.下拉列表("下拉框8")
辅助.等待(15000)  //辅助等待15秒15000毫秒
如果结束

返回真
功能结束

功能逻辑型  瞬回蓝()//子程序名瞬回蓝
逻辑型是否成功
整型 x
整型 y
//这里判断人物的蓝是否低于30%
是否成功=大漠.区域找色(87,38,104,47,"464646-000000",1.0,0,x,y)
如果(是否成功)
//如果低于30%执行下面的
我的程序.下拉列表("下拉框9")
辅助.等待(15000)
如果结束
返回真
功能结束

功能逻辑型  慢回血() //子程序名慢回血
逻辑型是否成功
整型 x
整型 y
//这里判断人物的血是否低于50%
是否成功=大漠.区域找色(63,28,116,40,"515151-000000",1.0,0,x,y)
如果(是否成功)
//如果低于50%执行下面的
我的程序.下拉列表("下拉框10")
如果结束

返回真
功能结束

功能逻辑型  慢回蓝()//子程序名慢回蓝
逻辑型是否成功
整型 x
整型 y
//这里判断人物的蓝是否低于50%
是否成功=大漠.区域找色(71,37,121,47,"515151-000000",1.0,0,x,y)
如果(是否成功)
//如果低于50%执行下面的
我的程序.下拉列表("下拉框11")
如果结束

返回真
功能结束

功能逻辑型  宝宝1()//子程序名宝宝1
逻辑型是否成功
整型 x
整型 y
//这里判断宝宝的血是否低于30%
是否成功=大漠.区域找色(46,99,64,106,"404040-000000",1.0,0,x,y)
如果(是否成功)
//如果低于30%执行下面的
我的程序.下拉列表("下拉框12")
如果结束

返回真
功能结束

功能逻辑型  宝宝2()//子程序名宝宝2
逻辑型是否成功
整型 x
整型 y
//这里判断宝宝的血是否低于30%
是否成功=大漠.区域找色(136,100,154,107,"404040-000000",1.0,0,x,y)
如果(是否成功)
//如果低于30%执行下面的
我的程序.下拉列表("下拉框13")
如果结束

返回真
功能结束

功能逻辑型  宝宝3()//子程序名宝宝3
逻辑型是否成功
整型 x
整型 y
//这里判断宝宝的血是否低于30%
是否成功=大漠.区域找色(224,99,242,106,"404040-000000",1.0,0,x,y)
如果(是否成功)
//如果低于30%执行下面的
我的程序.下拉列表("下拉框14")
如果结束
返回真
功能结束

整型线程    //定义线程名
功能逻辑型  脚本() //主程序名称
逻辑型是否成功
整型 x
整型 y

整型 time //定义的获取系统毫秒
time=0 //定义的系统毫秒值先为0
整型 time1
time1=0
整型 time2
time2=0
整型 time3
time3=0

整型窗口句柄 //整型的窗口句柄
字符型鼠标所在窗口句柄  //采用TC鼠标获取鼠标所在的窗口句柄
窗口句柄=窗口.鼠标所在窗口句柄()  // 窗口句柄就是上面鼠标获取的句柄
鼠标所在窗口句柄=转换.整型转字符型(窗口句柄)//这里是将鼠标获取的句柄进行整型转换成字符型
窗口.设置位置(窗口句柄,-10,0)//应为下面采用了DX2图像模式所以窗口要向屏幕外移除一点
是否成功=大漠.创建()//用大漠插件需要注册
是否成功=大漠.绑定窗口(窗口句柄,"dx2","dx2","windows",0)//这里用到大漠插件绑定床后进行后台运行
//第一个是图像  第二个是鼠标  第三个是键盘  模式要根据游戏相对的模式才能使用详解在帮助档案里可以找到
辅助.等待(500) //等待500毫秒 0.5秒

循环(真) //无限循环次数
time=辅助.获取系统毫秒()  //上面定义过time值为0 到这里time的值就是当前的系统毫秒
循环(真)
大漠.按键(192)
//这里用最多的血量来判断是否找到怪
是否成功=大漠.区域找色(365,29,374,38,"d71414-000000",1.0,0,x,y)
如果(是否成功)
//如果找到执行下面的
time1=辅助.获取系统毫秒()  //二次获取系统毫秒
我的程序.下拉列表("下拉框0") //到这里将执行子程序下拉列表模块
循环(真)


我的程序.下拉列表("下拉框1")  //到这里将执行子程序下拉列表模块根据相对的编辑框名称进行
辅助.等待(300)  //等待300毫秒
我的程序.下拉列表("下拉框2")
辅助.等待(300)
我的程序.下拉列表("下拉框3")
辅助.等待(300)
我的程序.下拉列表("下拉框4")
辅助.等待(300)
我的程序.慢回血() //这里将执行子程序慢回血模块
我的程序.慢回蓝() //这里将执行子程序慢回蓝模块
我的程序.宝宝1() //这里将执行子程序宝宝1模块
我的程序.宝宝2() //这里将执行子程序宝宝2模块
我的程序.宝宝3() //这里将执行子程序宝宝3模块

//这里判断怪是否死亡如果死亡按键V拾取2次跳出循环.如果没死亡继续循环
是否成功=大漠.区域找色(273,30,284,38,"4a4a4a-000000",1.0,0,x,y)
辅助.等待(500)
如果(是否成功)
大漠.按键(86)
辅助.等待(100)
大漠.按键(86)
   跳出
   否则
   继续
如果结束

time2=辅助.获取系统毫秒()  //这里是第三次获取系统毫秒
如果(time2-time1>我的程序.编辑("编辑框8"))//这里将第三次或许的系统毫秒减去第二次的如果大于编辑框的说将执行下面的
//这里是防卡怪判断如果防卡怪判断
是否成功=大漠.区域找色(290,28,374,40,"d61b0c-000000",1.0,0,x,y)
如果(是否成功)
大漠.按键(192) //大漠后台按键 ~ 键
跳出
如果结束
如果结束
循环结束
否则
//否则按一下 ~ 键再次找怪
大漠.按键(192)
如果结束

我的程序.瞬回血() //这里将执行子程序瞬回血
我的程序.瞬回蓝() //这里将执行子程序瞬回蓝

time3=辅助.获取系统毫秒() //这里是获取系统毫秒第4次
如果(time3-time>我的程序.编辑("编辑框5"))//这里将第4次获取的系统毫秒减去第一次的，如果大于编辑框获得的数将执行下面的语句否则继续循环
我的程序.下拉列表("下拉框5")
跳出
  如果结束
  循环结束  //循环结束语句
循环结束
返回真
//函数返回语句
功能结束

功能逻辑型开始_点击()
//这里添加你要执行的代码,这里是你点击开始按钮执行的代码
线程=线程.开启("我的程序.脚本")//这里是点击开始直接执行线程  线程开启我的程序脚本
返回真
//函数返回语句
功能结束

功能逻辑型退出_点击()
大漠.解绑窗口(线程)//大漠绑定的窗口一定要解绑  不然.....
大漠.释放(线程)// 创建的大漠一定要释放资源  不然  .....
线程.关闭(线程) //线程关闭语句
辅助.退出()//脚本  退出
返回真
//函数返回语句
功能结束

空间结束
//命名空间结束语句