How to make ripples shrink

[rcmp1234]

I am supposed to write a program showing the ripples shrinking once it reaches the top of the window
I tried using decreasing radius but it only shows one hollow circle shrinking and thats not what I want...I want the circles to disappear one by one

How do i do that?
Heres my program

const centerx := maxx div 2
const centery := maxy div 2
for radius : 1 .. centery by 10
delay (30)
drawoval (centerx, centery, radius, radius, magenta)
end for

for decreasing radius : centery .. 1 by 10

delay (30)
cls
drawoval (centerx, centery, radius, radius, magenta)

end for

Any help would be greatly appreciated

thanks

[andrew.]

Here you go.

I don't know why, but the decreasing moves the position by 2. It's weird but here.

Turing:

const centerx := maxx div 2 const centery := maxy div 2 for radius : 1 .. centery by 10     delay (30)     drawoval (centerx, centery, radius, radius, magenta) end for for decreasing radius : centery .. 1 by 10     delay (30)     drawoval (centerx, centery, radius+2, radius+2, white) end for

P.S. Next time use the syntax="Turing" tags.

[rcmp1234]

Thanks andrew!!

[andrew.]

No problem.

[Mackie]

andrew. don't do his work for him. He'll never learn anything that way, plus it is against the rules of the forum.