Moving Circle

RSS

Modified on 2011/07/17 07:04 by 184.96.241.151 Categorized as Samples

circle = GraphicsWindow.AddEllipse(100, 100) GraphicsWindow.MouseDown = OnMouseDown

Sub OnMouseDown x = GraphicsWindow.MouseX y = GraphicsWindow.MouseY GraphicsWindow.AnimateShape(circle, x, y, 500) EndSub

ScrewTurn Wiki version 3.0.5.600. Some of the icons created by FamFamFam.