m = Minute(time) //每天9点,重置一些数据,可以根据自己喜好改变相关参数 If d <> d_temp and h>8 Then d_temp = d Delay 1000 If jiangli =1 Then Call 领取奖励() End If Delay 3000 If mengzhan=1 Then Call 参加盟战() End If Delay 3000 //刷新跑商 Call 商队刷新() jccount = 30 End If //每隔五分钟进入一次城池 mm = m mod 5 If mm = 0 Then Call 进入城池() End If //防止长时间没有动作,过段时间就点一下游戏界面^_^ Call Plugin.Bkgnd.LeftClick(Hwnd, 270, 40) Delay 1000 If paoshang=1 Then Call 跑商() End If Delay 1000 If delaytime > 0 Then h = Hour(Time) m = Minute(time) TimeB = h * 60 + m If (TimeB - TimeA) > delaytime Then //进入跑商界面 Call Plugin.Bkgnd.LeftClick(Hwnd, 942, 110) Delay 2000 //判断在哪交易,然后进行最后一次交易 color_a = Plugin.Bkgnd.GetPixelColor(Hwnd,shanga_x+1,shanga_y+13) If color_a = "13ADFD" Then Call 商队交易(shanga_x+1,shanga_y+13,1) Delay 500 Else color_b = Plugin.Bkgnd.GetPixelColor(Hwnd, shangb_x + 1, shangb_y + 13) If color_b = "13ADFD" Then Call 商队交易(shangb_x + 1, shangb_y + 13,1) Delay 500 End If End If delaytime = 0 Delay 500 End If End If Delay 1000 If keji=1 Then Call 升级科技() End If Delay 1000 If xunlian =1 Then Call 武将训练() End If Delay 1000 If tufei = 1 Then Call 武将突飞() End If Delay 1000 If peiyang=1 and pycount>0 Then Call 武将培养() End If Delay 1000 If jingji =1 Then Call 竞技场() End If Delay 1000 If shangjin = 1 Then Call 刷赏金() End If Delay 1000 If FB20 = 1 Then If h = 20 and m < 3 Then Call 创建20FB() End If End If Delay 5000 Goto 挂机开始 Sub 升级科技() //以下判断科技升级是否空闲,空闲则升级,否则跳出 GetColor = Plugin.Bkgnd.GetPixelColor(Hwnd, 27, 159) If GetColor="00FF00" Then //打开科技界面