Hwnd = Plugin.Window.Find("MSPaintApp", 0)
HwndEx = Plugin.Window.FindEx(Hwnd, 0, "MSPaintView", 0)
hwndht=plugin.window.findex(hwndex,0,"Afx:460000:8",0)
TracePrint hwnd
TracePrint hwndEx
TracePrint hwndht
Delay 200
Dim R, pi, du
du = 0
R = 100
pi = 3.14
Do Until du = 360
Call Plugin.Bkgnd.MoveTo(Hwndht,200+R*cos(du*pi/180) , 200+R*sin(du*pi/180))
Delay 2
Call Plugin.Bkgnd.Leftdown(Hwndht, 200+R*cos(du*pi/180), 200+R*sin(du*pi/180))
du=du+10
Delay 1
loop
Call plugin.bkgnd.leftup(hwndht,200+R*cos(du*pi/180), 200+R*sin(du*pi/180))