OpenEuphoria

Re: Palette Cycling Problem

• Posted by Pete Eberlein <xseal at HARBORSIDE.COM> Jan 02, 1999
• 439 views

> This is the one I decided to go for.
> It works really fast, but it creates black flickering horizontal
> lines on the screen. Is my video card too slow? Wrong driver?
> The delay loop helps, but by the time you get it slow enough
> to kill the lines it's too slow again.
> Is there some slight change which might fix it?

The flicker you indicate is caused by repeatly calling get_all_palette.
Try something like:

s = get_all_palette()
while get_key()=-1 do
    s[2..length(s)] = append(s[3..length(s)], s[2])
    all_palette(s)
end while

which only does get_all_palette once outside the loop.
I also suspect that all_palette might already wait for a vertical retrace.
 _______  ______  _______  ______
[    _  \[    _ ][ _   _ ][    _ ]
[/| [_] |[/| [_\][/ | | \][/| [_\]
  |  ___/  |  _]    | |     |  _]
[\| [/]  [\| [_/] [\| |/] [\| [_/]
[_____]  [______] [_____] [______]
xseal at harborside.com  ICQ:13466657
http://www.harborside.com/home/x/xseal/euphoria/