def Circle (Canvas, X, Y, R, C=black): addOvalFilled(Canvas, X-R, Y-R, 2*R, 2*R, C) addOval (Canvas, X-R, Y-R, 2*R, 2*R, black) return def String5 (N): Result = str(N) while len(Result) < 5: Result = "0" + Result return Result import time def Main(): W = 800 H = 600 Canvas = makeEmptyPicture(W,H) # Initialization X = W/2 Y = H/2 XD= 1 YD= 1 R = 50 C = yellow Path = pickAFolder() # Loop for I in range(1000): # clear the screen setAllPixelsToAColor(Canvas,magenta) # paint the ball Circle(Canvas,X,Y,R,C) # update the ball's position X = X + XD Y = Y + YD if X > W-R: XD = -1 if X < R: XD = +1 if Y > H-R: YD = -1 if Y < R: YD = +1 # repaint the canvas repaint(Canvas) Filename = "Frame" + String5(I) + ".jpg" writePictureTo(Canvas, Path + Filename) # wait a little bit time.sleep(0.01) StartFilename = Path + "Frame00000.jpg" MyMovie = makeMovieFromInitialFile(StartFilename) writeQuicktime(MyMovie, Path + "MyMovie.mov", 30) return