Microsoft Small Basic

Program Listing: QGZ589

List Program

obrazek=Shapes.AddImage("http://blog.fpweb.net/wp-content/uploads/2009/02/federated-4.jpg")
i=0
While "True"
i=i+5
Shapes.Rotate(obrazek,i)
Program.Delay(100)
EndWhile