OpenEuphoria

2. Re: All Pallettes.........

• Posted by Lucius Hilley III <lhilley at CDC.NET> Mar 01, 1999
• 626 views

You aren't forgetting to divide by 4 are you?

include image.e

sequence pal, bmp

pal = {graphics_mode(261)}--19 will work.

--{pal, bmp} = read_bitmap("C:\windows\clouds.bmp")-- wouldn't this be neat?
pal = read_bitmap("C:\windows\clouds.bmp")
bmp = pal[2]
pal = pal[1]

all_palette(pal/4)
display_image({0,0}, bmp)--I think this is right.

while get_key() != 27 do end while--Until [ESC]ape pressed.
pal = {graphics_mode(261)}--19 will work.

         Lucius L. Hilley III
--This message was sponsered in part by Hollow Horse.
--The company that doesn't horse around. 8^)

On Mon, 1 Mar 1999 08:41:14 PST, Patrick Quist <quistnet at HOTMAIL.COM> wrote:

>Hy,
>
>Is it me, or doesn't
>all_pallette()
>work anymore.
>
>If I load it from a bitmap file,
>I get some colors. (1 or 2)
>And the rest is all BLACK.
>
>Very Strange.....
>
>Bye,
>PQ
>QC
>
>______________________________________________________
>Get Your Private, Free Email at http://www.hotmail.com