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