• 新浪微博:
  • 微信 :
按键精灵电脑版
立即下载

软件版本:2014.05
软件大小:21.6M
更新时间:07-04

按键精灵安卓版
立即下载

软件版本:3.3.5
软件大小:62.5M
更新时间:9-25

按键精灵iOS版
立即下载

软件版本:1.3.5
软件大小:29.2M
更新时间:06-14

最新企业版UiBot
立即下载

软件版本:3.3
软件大小:282M
更新时间:08-06

快捷导航

登录 后使用快捷导航
没有帐号? 注册

登录 注册
发新话题 回复该主题

小新刚编了一个决斗之城的无限循环决斗,但无法运行,求大神指点... [复制链接]

1#
已经通过语言检测,但是就是无法运行,求大神指点问题所在,谢谢各位了!!!
附原代码:
Dim 延时 = 200
Dim 相似度 = 0.9
Function 多点比色(参数) //多点比色
Dim 计数 = 0
Dim 等待次数 = 0
Do While(1)
Delay 延时
If 等待次数 = 0 Then
If CmpColorEx(参数(0),相似度) = 1 Then
Delay 延时
Tap 参数(1), 参数(2)
计数 = 0
等待次数 = 1
End If
Else
等待次数 = 等待次数+1
End If
    
Delay 延时
    
If CmpColorEx(参数(3), 相似度) = 1 Then
Exit Do
End If
    
If 计数 > 50 Then
ShowMessage "网络超时"
Exit Do
Else
计数=计数+1
End If
    
If 等待次数 >2 Then
等待次数 = 0
End If
    
Delay 延时
         
Loop
End Function
Function 开始巅峰对决()
Delay 延时
Dim 次数 = 0
Do
If CmpColorEx("695|66|2AFF8D,421|96|D13BAB,42|262|0512F2,169|731|00FFFF,123|767|0919E1",相似度) = 1 Then
Delay 延时
ShowMessage "开始巅峰对决"
Tap 163,744
Delay 500
End If
Dim 起始图 ="508|9|AAEAFC,513|9|AAEAFC,519|8|AAEAFC,524|8|AAEAFC,551|35|FEFEFE,551|47|E2E6E5,553|40|010303,546|39|070101,539|47|502308"
Dim 点X = 543
Dim 点Y = 33
Dim 结束图 ="509|8|733402,515|9|AAEAFC,517|8|1C1008,558|28|FFFEFF,550|32|EEDEDF,552|37|F4E6E7,551|45|702E09,552|51|7A320C,540|41|F2BEC3"
Dim 数组 = Array(起始图,点X,点Y,结束图)
Call 多点比色(数组)
        
Do
Delay 1000
If CmpColorEx("355|20|0096FF,298|164|0D57FE,525|554|CB5A10,430|618|0195FF,528|765|337CCA",相似度)=1 Then
ShowMessage "胜利了"
Tap 59, 634
Delay 1000
Exit Do
End If
Delay 延时
If CmpColorEx("289|62|845F3E,374|334|1830BB,475|480|34F7FA,447|947|88512C,519|1228|A08269",相似度)=1 Then
ShowMessage "失败了"
Tap 57, 447
Delay 1000
Exit Do
End If
Loop
        
Delay 延时
        
Do
Delay 400
If CmpColorEx("689|58|2BFFAE,671|99|FDE71E,42|260|0514E0,39|385|9F511D,153|681|00568B,176|731|00FFFF,123|768|010BE6,166|774|00FFFF,163|822|005587,28|1187|02834E", 相似度) = 1 Then
次数 = 次数+1
ShowMessage "已经对战次数:"&次数
Exit Do
End If
Loop
Delay 延时
Loop
    
    
End Function
Function 功能模块()
If ReadUIConfig("开始巅峰对决") = true Then
Call 开始巅峰对决()
Delay 500
End If
End Function

Function main()
Call 功能模块()
End Function

Call main()

2#

你应该解决了吧 我也刚写了这个游戏的脚本 我的qq是342927965 我也是萌新 楼主可以加我qq互相交流下

发新话题 回复该主题