TC官方合作论坛
标题:
大神啊帮帮我吧！
[打印本页]
作者:
sc2908
时间:
2012-8-21 20:40
标题:
大神啊帮帮我吧！
功能 逻辑型 选择状态()
逻辑型 状态,状态1,状态2,状态3,状态4,状态5,状态6
字符型 窗口
dm.SetPath(辅助.获取资源路径("rc:"))
dm.SetDict(0,"1.txt")
整型 窗口绑定是否成功
整型 句柄窗口
如果(c1!=0)
句柄窗口=转换.字符型转整型(句柄
,0)
否则
句柄窗口=窗口句柄
如果结束
窗口绑定是否成功=dm.BindWindow(句柄窗口,"dx","dx","dx",0)
如果(窗口绑定是否成功==0)
辅助.消息框("窗口绑定失败")
否则
状态=复选框.获得状态("刺探")
如果(状态==真)
修正琉璃盏.完整刺探()
如果结束
状态5=复选框.获得状态("刺探1")
如果(状态5==真)
修正琉璃盏.完整刺探()
如果结束
状态1=复选框.获得状态("琉璃盏")
如果(状态1==真)
修正琉璃盏.完整琉璃盏()
如果结束
状态6=复选框.获得状态("琉璃盏1")
如果(状态6==真)
修正琉璃盏.完整琉璃盏()
如果结束
状态2=复选框.获得状态("挖矿")
如果(状态2==真)
修正琉璃盏.完整挖矿()
如果结束
状态3=复选框.获得状态("拉骆驼")
如果(状态3==真)
修正琉璃盏.沙漠酋长()
如果结束
状态4=复选框.获得状态("换号")
如果(状态4==真)
修正琉璃盏.开始点击()
如果结束
如果结束
返回 真
//函数返回语句
功能结束
功能 逻辑型 原地()
//这里添加你要执行的代码
整型 intX,intY
整型 X,Y
整型 次数
字符型 窗口
整型 数字1
数字1=0dm.SetPath(辅助.获取资源路径("rc:"))
dm.SetDict(0,"1.txt")
整型 窗口绑定是否成功
整型 句柄窗口
如果(c1!=0)
句柄窗口=转换.字符型转整型(句柄
,0)
否则
句柄窗口=窗口句柄
如果结束
窗口绑定是否成功=dm.BindWindow(句柄窗口,"dx","dx","dx",0)
如果(窗口绑定是否成功==0)
辅助.消息框("窗口绑定失败")
否则
循环(真)
//dm.FindPic(0,0,1024,768,"d:\\原地复活.bmp","000000",0.9,0,intX,intY)
dm.FindStr(0,0,1024,768,"原地","ffffff-405060",1.0,intX,intY)
如果(intX>0)
标签.设置文本("加载","选择原地复活")
dm.FindStr(865,0,975,41,获得本国内容,"ffffff-405060",1.0,X,Y)
如果(X>0)
辅助.等待(1000)
dm.MoveTo(intX,intY)
辅助.等待(200)
dm.LeftClick() //左键单击
否则
辅助.等待(1000)
修正琉璃盏.Esc()
dm.MoveTo(intX,intY)
辅助.等待(200)
dm.LeftClick() //左键单击
标签.设置文本("加载","随即移动防死亡")
dm.KeyPress(77)
辅助.等待(500)
dm.MoveTo(135,115)
辅助.等待(100)
//dm.LeftClick()
dm.LeftDoubleClick()
如果结束
//琉璃.判断()
数字1=数字1+1
修正琉璃盏.Esc()
跳出
如果(数字1==10)
修正琉璃盏.安全()
标签.设置文本("加载","原地10次跳出")
如果结束
否则
辅助.等待(500)
跳出
如果结束
循环结束
返回 真
//函数返回语句
功能结束
这是代码！ 怎么我 开两条线程执行 选择 和原地 就 结束 窗口和脚本了呢
作者:
shine宝宝
时间:
2012-8-21 20:41
天啊这字体。。。。。。
功能 逻辑型 选择状态()
逻辑型 状态,状态1,状态2,状态3,状态4,状态5,状态6
字符型 窗口
dm.SetPath(辅助.获取资源路径("rc:"))
dm.SetDict(0,"1.txt")
整型 窗口绑定是否成功
整型 句柄窗口
如果(c1!=0)
句柄窗口=转换.字符型转整型(句柄,0)
否则
句柄窗口=窗口句柄
如果结束
窗口绑定是否成功=dm.BindWindow(句柄窗口,"dx","dx","dx",0)
如果(窗口绑定是否成功==0)
辅助.消息框("窗口绑定失败")
否则
状态=复选框.获得状态("刺探")
如果(状态==真)
修正琉璃盏.完整刺探()
如果结束
状态5=复选框.获得状态("刺探1")
如果(状态5==真)
修正琉璃盏.完整刺探()
如果结束
状态1=复选框.获得状态("琉璃盏")
如果(状态1==真)
修正琉璃盏.完整琉璃盏()
如果结束
状态6=复选框.获得状态("琉璃盏1")
如果(状态6==真)
修正琉璃盏.完整琉璃盏()
如果结束
状态2=复选框.获得状态("挖矿")
如果(状态2==真)
修正琉璃盏.完整挖矿()
如果结束
状态3=复选框.获得状态("拉骆驼")
如果(状态3==真)
修正琉璃盏.沙漠酋长()
如果结束
状态4=复选框.获得状态("换号")
如果(状态4==真)
修正琉璃盏.开始点击()
如果结束
如果结束
返回 真
//函数返回语句
功能结束
功能 逻辑型 原地()
//这里添加你要执行的代码
整型 intX,intY
整型 X,Y
整型 次数
字符型 窗口
整型 数字1
数字1=0dm.SetPath(辅助.获取资源路径("rc:"))
dm.SetDict(0,"1.txt")
整型 窗口绑定是否成功
整型 句柄窗口
如果(c1!=0)
句柄窗口=转换.字符型转整型(句柄,0)
否则
句柄窗口=窗口句柄
如果结束
窗口绑定是否成功=dm.BindWindow(句柄窗口,"dx","dx","dx",0)
如果(窗口绑定是否成功==0)
辅助.消息框("窗口绑定失败")
否则
循环(真)
//dm.FindPic(0,0,1024,768,"d:\\原地复活.bmp","000000",0.9,0,intX,intY)
dm.FindStr(0,0,1024,768,"原地","ffffff-405060",1.0,intX,intY)
如果(intX>0)
标签.设置文本("加载","选择原地复活")
dm.FindStr(865,0,975,41,获得本国内容,"ffffff-405060",1.0,X,Y)
如果(X>0)
辅助.等待(1000)
dm.MoveTo(intX,intY)
辅助.等待(200)
dm.LeftClick() //左键单击
否则
辅助.等待(1000)
修正琉璃盏.Esc()
dm.MoveTo(intX,intY)
辅助.等待(200)
dm.LeftClick() //左键单击
标签.设置文本("加载","随即移动防死亡")
dm.KeyPress(77)
辅助.等待(500)
dm.MoveTo(135,115)
辅助.等待(100)
//dm.LeftClick()
dm.LeftDoubleClick()
如果结束
//琉璃.判断()
数字1=数字1+1
修正琉璃盏.Esc()
跳出
如果(数字1==10)
修正琉璃盏.安全()
标签.设置文本("加载","原地10次跳出")
如果结束
否则
辅助.等待(500)
跳出
如果结束
循环结束
返回 真
//函数返回语句
功能结束
作者:
sc2908
时间:
2012-8-21 20:42
我直接复制的呢 怎么字体变了！奇怪
作者:
shine宝宝
时间:
2012-8-21 20:45
你运行以后有提示错吗？
作者:
sc2908
时间:
2012-8-21 20:54
不是错误 是全正确
但是 一 运行 就 死啦！ 脚本和 游戏 都退出了 难道是不能进行两次绑定？
作者:
shine宝宝
时间:
2012-8-21 21:13
把字体先改了吧= =
作者:
sc2908
时间:
2012-8-21 21:13
tc 网页显示问题和我字体没关系啊！
作者:
shine宝宝
时间:
2012-8-21 21:28
看了看 你比我厉害 哈哈 帮你改字体了
作者:
梦里只影向你
时间:
2012-8-21 22:00
都不会贴代码
用code标签嘛
作者:
feng123144
时间:
2012-8-22 00:29
玩玩游戏打打金币
欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/)
Powered by Discuz! X3.1
看了看 你比我厉害 哈哈 帮你改字体了