Re: Rob ?
- Posted by Bernie Ryan <bwryan at PCOM.NET> Oct 11, 1999
- 381 views
On Mon, 11 Oct 1999 13:32:05 -0400, Robert Craig <rds at ATTCANADA.NET> wrote: >I have not produced any demo pcx files. >Maybe you should contact the author. This is the file that you did not write :) ------------------------------------------------------------------- -- test.ex by Rob Craig include graphics.e include pic_load.e include image.e sequence s if graphics_mode(261) then -- try mode 19 if this gives you trouble puts(1, "Try a different mode\n") abort(1) end if -- First try a .GIF file: --s = read_gif("title.gif") --display_image({20,20}, s[2]) --all_palette(s[1]/4) -- N.B. divide by 4 is required -- while get_key() = -1 do -- end while -- Now try a .PCX file: clear_screen() s = read_pcx("wallstxt.pcx") display_image({200,200}, s[2]) all_palette(s[1]/4) while get_key() = -1 do end while if graphics_mode(-1) then end if --------------------------------------------------------- Bernie