r tufei=DropList{"不突飞":"0"|"1号将":"1"|"2号将":"2"|"3号将":"3"|"4号将":"4"|"5号将":"5"}=0 "选择突飞武将" UserVar xl1=DropList{"1号将":"1"|"2号将":"2"|"3号将":"3"|"4号将":"4"|"5号将":"5"}=1 "1号训练位武将" UserVar xl2=DropList{"1号将":"1"|"2号将":"2"|"3号将":"3"|"4号将":"4"|"5号将":"5"}=2 "2号训练位武将" UserVar xl3=DropList{"1号将":"1"|"2号将":"2"|"3号将":"3"|"4号将":"4"|"5号将":"5"}=3 "3号训练位武将" UserVar xl4=DropList{"1号将":"1"|"2号将":"2"|"3号将":"3"|"4号将":"4"|"5号将":"5"}=3 "4号训练位武将" UserVar xl5=DropList{"1号将":"1"|"2号将":"2"|"3号将":"3"|"4号将":"4"|"5号将":"5"}=3 "5号训练位武将" UserVar sfzs=DropList{"不征收":"0"|"征收":"1"}=0 "是否征收" UserVar zssj=DropList{"事件1":"1"|"事件2":"2"}=1 "征收事件" UserVar sfkj=DropList{"科技1":"1"|"科技2":"2"|"科技3":"3"|"科技4":"4"|"科技5":"5"|"科技6":"6"|"科技7":"7"|"科技8":"8"|"科技9":"9"|"科技10":"10"|"科技11":"11"|"科技12":"12"|"科技13":"13"|"科技14":"14"|"科技15":"15"|"科技16":"16"|"科技17":"17"|"科技18":"18"|"科技19":"19"|"科技20":"20"|"不发展科技":"0"}=0 "科技发展1" UserVar sfkj1=DropList{"科技1":"1"|"科技2":"2"|"科技3":"3"|"科技4":"4"|"科技5":"5"|"科技6":"6"|"科技7":"7"|"科技8":"8"|"科技9":"9"|"科技10":"10"|"科技11":"11"|"科技12":"12"|"科技13":"13"|"科技14":"14"|"科技15":"15"|"科技16":"16"|"科技17":"17"|"科技18":"18"|"科技19":"19"|"科技20":"20"|"不发展科技":"0"}=0 "科技发展2" UserVar sfkj2=DropList{"科技1":"1"|"科技2":"2"|"科技3":"3"|"科技4":"4"|"科技5":"5"|"科技6":"6"|"科技7":"7"|"科技8":"8"|"科技9":"9"|"科技10":"10"|"科技11":"11"|"科技12":"12"|"科技13":"13"|"科技14":"14"|"科技15":"15"|"科技16":"16"|"科技17":"17"|"科技18":"18"|"科技19":"19"|"科技20":"20"|"不发展科技":"0"}=0 "科技发展3" UserVar sfkj3=DropList{"科技1":"1"|"科技2":"2"|"科技3":"3"|"科技4":"4"|"科技5":"5"|"科技6":"6"|"科技7":"7"|"科技8":"8"|"科技9":"9"|"科技10":"10"|"科技11":"11"|"科技12":"12"|"科技13":"13"|"科技14":"14"|"科技15":"15"|"科技16":"16"|"科技17":"17"|"科技18":"18"|"科技19":"19"|"科技20":"20"|"不发展科技":"0"}=0 "科技发展4" UserVar sfkj4=DropList{"科技1":"1"|"科技2":"2"|"科技3":"3"|"科技4":"4"|"科技5":"5"|"科技6":"6"|"科技7":"7"|"科技8":"8"|"科技9":"9"|"科技10":"10"|"科技11":"11"|"科技12":"12"|"科技13":"13"|"科技14":"14"|"科技15":"15"|"科技16":"16"|"科技17":"17"|"科技18":"18"|"科技19":"19"|"科技20":"20"|"不发展科技":"0"}=0 "科技发展5" UserVar yxjz1=DropList{"民居":"1"|"校场":"2"|"商店":"3"|"银库":"4"|"账房":"5"|"军机处":"6"|"兵营":"7"|"粮仓":"8"|"铸币厂":"9"|"驿站":"10"}=1 "优先建造队列1" UserVar yxjz2=DropList{"民居":"1"|"校场":"2"|"商店":"3"|"银库":"4"|"账房":"5"|"军机处":"6"|"兵营":"7"|"粮仓":"8"|"铸币厂":"9"|"驿站":"10"}=2 "优先建造队列2" UserVar yxjz3=DropList{"民居":"1"|"校场":"2"|"商店":"3"|"银库":"4"|"账房":"5"|"军机处":"6"|"兵营":"7"|"粮仓":"8"|"铸币厂":"9"|"驿站":"10"}=3 "优先建造队列3" UserVar yxjz4=DropList{"民居":"1"|"校场":"2"|"商店":"3"|"银库":"4"|"账房":"5"|"军机处":"6"|"兵营":"7"|"粮仓":"8"|"铸币厂":"9"|"驿站":"10"}=4 "优先建造队列4" UserVar yxjz5=DropList{"民居":"1"|"校场":"2"|"商店":"3"|"银库":"4"|"账房":"5"|"军机处":"6"|"兵营":"7"|"粮仓":"8"|"铸币厂":"9"|"驿站":"10"}=3 "优先建造队列5" UserVar yxjz6=DropList{"民居":"1"|"校场":"2"|"商店":"3"|"银库":"4"|"账房":"5"|"军机处":"6"|"兵营":"7"|"粮仓":"8"|"铸币厂":"9"|"驿站":"10"}=3 "优先建造队列6" Delay 300 sDate = Plugin.Sys.GetDateTime() If sDate > "2015-07-21 15:27:31" Then MessageBox "程序错误,运行失败,请与作者联系!" EndScript Else End If Delay 2000 Hwnd = Plugin.Window.MousePoint() Delay 2000 For 5000 Call Plugin.Bkgnd.LeftClick(Hwnd, 880, 575) Delay 2000 Call 征兵 Delay 800 Call 征收 Delay 800 Call 武将训练1 Delay 800 Call 武将训练2 Delay 800 Call 武将训练3 Delay 800 Call 武将训练4 Delay 800 Call 武将训练5 Delay 800 Call 武将突飞 Delay 800 //是否科技 Call Plugin.Bkgnd.LeftClick(Hwnd, 580, 385) Delay 600 Call Plugin.Bkgnd.LeftClick(Hwnd, 560, 335) Delay 2000 If sfkj = 1 Then Call Plugin.Bkgnd.LeftClick(Hwnd, 230, 205) Delay 1200 Call Plugin.Bkgnd.LeftClick(Hwnd, 630, 380) Delay 1200 Call Plugin.Bkgnd.KeyPress(Hwnd, 13) Delay 1000 ElseIf sfkj = 2 Then Call Plugin.Bkgnd.LeftClick(Hwnd, 315, 205) Delay 1200 Call Plugin.Bkgnd.LeftClick(Hwnd, 630, 380) Delay 1200 Call Plugin.Bkgnd.KeyPress(Hwnd, 13) Delay 1000 ElseIf sfkj = 3 Then Call Plugin.Bkgnd.LeftClick(Hwnd, 380, 205) Delay 1200 Call Plugin.Bkgnd.LeftClick(Hwnd, 630, 380) Delay 1200 Call Plugin.Bkgnd.KeyPress(Hwnd, 13) Delay 1000 ElseIf sfkj = 4 Then Call Plugin.Bkgnd.LeftClick(Hwnd, 455, 210) Delay 1200 Call Plugin.Bkgnd.LeftClick(Hwnd, 630, 380) Delay 1200 Call Plugin.Bkgnd.KeyPress(Hwnd, 13) Delay 1000 ElseIf sfkj = 5 Then Call Plugin.Bkgnd.LeftClick(Hwnd, 530, 210) Delay 1200 Call Plugin.Bkgnd.LeftClick(Hwnd, 630, 380) Delay 1200 Call Plugin.Bkgnd.KeyPress(Hwnd, 13) Delay 1000 ElseIf sfkj = 6 Then Call Plugin.Bkgnd.LeftClick(Hwnd, 230, 285) Delay 1200 Call Plugin.Bkgnd.LeftClick(Hwnd, 630, 380) Delay 1200 Call Plugin.Bkgnd.KeyPress(Hwnd, 13) Delay 1000