Microsoft Small Basic

Program Listing: ZGZ752

List Program

' 変数・オブジェクトの準備
x=0
y=0
migihashi = GraphicsWindow.Width
ball = Shapes.AddEllipse(30,30)

'実際のアニメーション
For x=0 To migihashi
Shapes.Move(ball, x, y )
y=y+1
Program.Delay(10)
EndFor