|
发表于 2010-9-10 13:29:32
|显示全部楼层
Rem 1
Plugin Hwnd = Window.Find(0, "后台1")
Plugin Window.SetText(Hwnd,"<<梦三国OL>>")
Delay 1000
Plugin Hwnd = Window.Find(0, "<<梦三国OL>>")
Plugin Window.Move(Hwnd, 0, 0)
Plugin Window.SetText(Hwnd,"后台1")
Delay 1000
Plugin Bkgnd.MoveTo(Hwnd, 877-4, 651-23)
Delay 500
Plugin Bkgnd.LeftClick(Hwnd, 877-4, 651-23)
Delay 9000
Plugin Bkgnd.MoveTo(Hwnd, 500-4, 159-23)
Delay 500
Plugin Bkgnd.LeftClick(Hwnd, 500-4, 159-23)
Delay 500
Plugin Bkgnd.MoveTo(Hwnd, 992-4, 754-23)
Delay 500
Plugin Bkgnd.LeftClick(Hwnd, 992-4, 754-23)
Delay 1000
Plugin Hwnd1 = Window.Find(0, "后台2")
Plugin Window.SetText(Hwnd1,"<<梦三国OL>>")
Delay 1000
Plugin Hwnd1 = Window.Find(0, "<<梦三国OL>>")
Plugin Window.Move(Hwnd1, 1300, 800)
Plugin Window.SetText(Hwnd1,"后台2")
Delay 1000
Plugin Bkgnd.MoveTo(Hwnd1, 929-4, 305-23)
Delay 500
Plugin Bkgnd.LeftClick(Hwnd1, 929-4, 305-23)
Delay 500
Plugin Bkgnd.MoveTo(Hwnd1, 992-4, 754-23)
Delay 500
Plugin Bkgnd.LeftClick(Hwnd1, 992-4, 754-23)
Delay 10000
KeyPress 91,1
Delay 800
MoveTo 0,0
Delay 500
LeftClick 1
Plugin Bkgnd.MoveTo(Hwnd, 999-4, 638-23)
Delay 300
Plugin Bkgnd.LeftClick(Hwnd, 999-4, 638-23)
Delay 800
Plugin Bkgnd.MoveTo(Hwnd,193-4, 379-23)
Delay 300
Plugin Bkgnd.LeftClick(Hwnd, 193-4, 379-23)
Delay 500
Plugin Bkgnd.MoveTo(Hwnd, 551-4, 395-23)
Delay 300
Plugin Bkgnd.LeftClick(Hwnd, 551-4, 395-23)
Delay 700
Plugin Bkgnd.MoveTo(Hwnd, 854-4, 302-23)
Delay 300
Plugin Bkgnd.LeftClick(Hwnd, 854-4, 302-23)
Delay 800
Plugin Bkgnd.MoveTo(Hwnd, 134-4, 695-23)
Delay 500
Plugin Bkgnd.RightClick(Hwnd, 134-4, 695-23)
Delay 1000
Plugin Bkgnd.KeyPress(Hwnd, 79)
Delay 800
Plugin Bkgnd.KeyPress(Hwnd, 82)
Delay 500
Plugin Bkgnd.KeyPress(Hwnd, 82)
Delay 25000
Plugin Bkgnd.MoveTo(Hwnd, 999-4, 638-23)
Delay 300
Plugin Bkgnd.LeftClick(Hwnd, 999-4, 638-23)
Delay 800
Plugin Bkgnd.MoveTo(Hwnd, 553-4, 345-23)
Delay 300
Plugin Bkgnd.LeftClick(Hwnd, 553-4, 345-23)
Delay 800
Plugin Bkgnd.MoveTo(Hwnd, 553-4, 345-23)
Delay 300
Plugin Bkgnd.LeftClick(Hwnd, 553-4, 345-23)
Delay 800
Plugin Bkgnd.MoveTo(Hwnd, 553-4, 345-23)
Delay 300
Plugin Bkgnd.LeftClick(Hwnd, 553-4, 345-23)
Delay 800
Plugin Bkgnd.MoveTo(Hwnd, 651-4, 345-23)
Delay 300
Plugin Bkgnd.LeftClick(Hwnd, 651-4, 345-23)
Delay 800
Plugin Bkgnd.MoveTo(Hwnd, 853-4, 303-23)
Delay 300
Plugin Bkgnd.LeftClick(Hwnd, 853-4, 303-23)
Delay 800
Plugin Bkgnd.MoveTo(Hwnd, 26-4, 728-23)
Delay 500
Plugin Bkgnd.RightClick(Hwnd, 26-4, 728-23)
Delay 42500
Plugin Bkgnd.KeyPress(Hwnd, 72)
Delay 400
Plugin Bkgnd.KeyPress(Hwnd, 72)
Delay 400
Plugin Bkgnd.KeyPress(Hwnd, 72)
For 28
Delay 1000
Plugin Bkgnd.MoveTo(Hwnd1, 26-4, 728-23)
Delay 300
Plugin Bkgnd.RightClick(Hwnd1, 26-4, 728-23)
Delay 12000
Plugin Bkgnd.KeyPress(Hwnd, 79)
Delay 500
Plugin Bkgnd.KeyPress(Hwnd, 82)
Delay 500
Plugin Bkgnd.KeyPress(Hwnd, 70)
Delay 500
Plugin Bkgnd.KeyPress(Hwnd, 100)
EndFor |
|