Computer Science Canada

flickerfree animation

Author:

msimard8 [ Mon Nov 29, 2004 6:02 pm ]

Post subject:

flickerfree animation

is there a way to make this flicker free

CAUTION MY CAUSE SEISURES!

code:

for c : 1 .. 400
drawfilloval (335, 235, 20 + c, 20 + c, blue)
delay (10)
drawfilloval (335, 235, 1 + c, 1 + c, 53)
delay (10)

end for

ok ... how do i run to counting loops at once...i want to make a warp screen

thanks

Author:

Cervantes [ Mon Nov 29, 2004 6:20 pm ]

Post subject:

Sure is.

code:

setscreen ("offscreenonly")
for c : 1 .. 400
drawfilloval (335, 235, 20 + c, 20 + c, blue)
drawfilloval (335, 235, 1 + c, 1 + c, 53)
View.Update
delay (10)
end for

EDIT:
counting loops = for loops I take it?
to run two for loops at the same time:

code:

for loop 1
for loop 2
%code
end for loop 2
end for loop 1

or, you could try this:

code:

loop

for loop 1
%code
end for loop 1

for loop 2
%code
end for loop 2

end loop

Author:	Viper [ Thu Dec 02, 2004 2:18 pm ]
Post subject:
you gotta be carefull with setscreen ("offscreenonly") since if your program isnt made in a certian way it will create a blank screen

Author:

DanShadow [ Tue Dec 14, 2004 12:01 am ]

Post subject:

Im pretty sure that this question has alerady been answered...but owell. To utilize the setscreen correctly, I suggest this:

code:

loop
setscreen("offscreenonly")
View.Update
%Code, drawing, etc.

delay(5)
end loop
%This assumes your program wants to run in a loop

What this should do (this is making the -wrong- assumption that all your code does is draw a circle) is every time it goes through the loop, it sets the screen offset of its max parameters, updates the screen, redraws everything, then gives a slight delay so the image stays on. Then this whole set of instructions resets and starts over. I hope this helps your 'non-flicker' question.

You can syndicate this boards posts using the file backend.php or view the topic map using sitemap.php.

Terms of Use | Privacy Policy