Mathematica 9 is now available
Student Support Forum
-----
Student Support Forum: 'flickering' topicStudent Support Forum > General > "flickering"

Next Comment >Help | Reply To Topic
Author Comment/Response
André
08/05/04 1:53pm

Hello,
I have to write a kind of "real Time" animation. I was writing something like that (the points are just an example for you):

pListe = {PointSize[.1]}; buffer =.;
Do[
pListe = Join[pListe, {Hue[Random[]], Point[{Random[], Random[]}]}];
buffer =
Show[Graphics[pListe, ImageSize -> {600, Automatic},
PlotRange -> {{0, 1}, {0, 1}}], DisplayFunction -> Identity];
NotebookWrite[EvaluationNotebook[],
Cell[GraphicsData["PostScript", #],
"Graphics"] & /@ ({DisplayString[buffer]}), All];
FrontEndExecute[FrontEndToken["SelectPreviousCell"]];
, {n, 1, 100}];

This Code does what I want but there is an ungly flicker. Is it possible just to Show the Next Picture without that "black" and that flicker?

Thanks for Help,
André Hollstein


URL: ,

Subject (listing for 'flickering')
Author Date Posted
flickering André 08/05/04 1:53pm
Re: flickering Henry Lamb 08/09/04 04:07am
Re: flickering Andre Hollst... 08/11/04 1:46pm
Next Comment >Help | Reply To Topic