1. Psychedelic BMPS
- Posted by Paul Kerslake <paulk at UNISERVE.COM> Aug 24, 2000
- 474 views
------=_NextPart_000_0090_01C00DEC.75763D20 boundary="----=_NextPart_001_0091_01C00DEC.75763D20" ------=_NextPart_001_0091_01C00DEC.75763D20 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable Well, it seems I'm having some BMP problems. They just don't look right! = If I make a BMP that uses 256 colours, and when I use it in Euphoria, = it looks, well, groovy. By groovy I mean the entire palette seems to be = scrambled.=20 Does Euphoria have near to none graphics capabilities or am I doing = something wrong? I suspect the latter.=20 I've included 2 BMPs, one is the original, the other is a picture of how = it looks in Euphoria. +++++ Here's what I've written: include graphics.e include get.e include image.e use_vesa(1) integer gmode gmode=3Dgraphics_mode(18) if gmode=3D1 then puts(1,"Your computer cannot support this program!") end if sequence gtitle gtitle=3Dread_bitmap("git.BMP") display_image({1,1}, gtitle [2]) +++++++++++ Just thought I'd mention: I'm working on a gamer's test. I.e. a quiz on = popular games. Is that suitable to put on the Euphoria Archive? If so, = how do I go about doing that? --Bye Thomas ------=_NextPart_001_0091_01C00DEC.75763D20 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2614.3500" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT face=3DArial size=3D2>Well, it seems I'm having some BMP = problems. They=20 just don't look right! If I make a BMP that uses 256 colours, and = when I=20 use it in Euphoria, it looks, well, groovy. By groovy I mean the entire = palette=20 seems to be scrambled. </FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>Does Euphoria have near to none = graphics=20 capabilities or am I doing something wrong? I suspect the latter. = </FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>I've included 2 BMPs, one is the = original, the=20 other is a picture of how it looks in Euphoria.</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>+++++ Here's what I've = written:</FONT></DIV> <DIV> </DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>include graphics.e<BR>include = get.e<BR>include=20 image.e</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>use_vesa(1)</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>integer = gmode<BR>gmode=3Dgraphics_mode(18)<BR>if=20 gmode=3D1 then<BR>puts(1,"Your computer cannot support this = program!")<BR>end=20 if</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>sequence=20 gtitle<BR>gtitle=3Dread_bitmap("git.BMP")<BR>display_image({1,1}, gtitle = [2])</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>+++++++++++</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>Just thought I'd mention: I'm working = on a gamer's=20 test. I.e. a quiz on popular games. Is that suitable to put on the = Euphoria=20 Archive? If so, how do I go about doing that?</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>--Bye</FONT></DIV> ------=_NextPart_001_0091_01C00DEC.75763D20-- ------=_NextPart_000_0090_01C00DEC.75763D20 name="original image.bmp"
2. Re: Psychedelic BMPS
- Posted by Aidan Bindoff <abindoff at ONE.NET.AU> Aug 25, 2000
- 509 views
------=_NextPart_000_0015_01C00E7E.BE447700 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable =20 include graphics.e include get.e include image.e =20 use_vesa(1) =20 integer gmode gmode=3Dgraphics_mode(18) if gmode=3D1 then puts(1,"Your computer cannot support this program!") end if =20 sequence gtitle gtitle=3Dread_bitmap("git.BMP") =20 all_palette(gtitle[1]/4) -- Very important! display_image({1,1}, gtitle [2]) =20 =20 Thomas, please find the bug fix above. =20 Kind Regards, Aidan ------=_NextPart_000_0015_01C00E7E.BE447700 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"> <HTML> <HEAD> <META content=3Dtext/html;charset=3Diso-8859-1 = http-equiv=3DContent-Type><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 = Transitional//EN"> <META content=3D'"MSHTML 4.72.3110.7"' name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <BLOCKQUOTE=20 style=3D"BORDER-LEFT: #000000 solid 2px; MARGIN-LEFT: 5px; PADDING-LEFT: = 5px"> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>include graphics.e<BR>include = get.e<BR>include=20 image.e</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>use_vesa(1)</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>integer = gmode<BR>gmode=3Dgraphics_mode(18)<BR>if=20 gmode=3D1 then<BR>puts(1,"Your computer cannot support this=20 program!")<BR>end if</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>sequence=20 gtitle<BR>gtitle=3Dread_bitmap("git.BMP")<BR></FONT></DIV> <DIV><FONT face=3DArial size=3D2></FONT><STRONG><FONT = color=3D#000000=20 = -- Very important!</FONT></STRONG></DIV> <DIV><FONT face=3DArial size=3D2>display_image({1,1}, gtitle = [2])</FONT></DIV> <DIV> </DIV> <DIV> </DIV> <DIV><STRONG><FONT color=3D#000000 size=3D2>Thomas, = please find the=20 bug fix above.</FONT></STRONG></DIV> <DIV><STRONG><FONT color=3D#000000 = size=3D2></FONT></STRONG> </DIV> <DIV><STRONG><FONT color=3D#000000 size=3D2>Kind = Regards,</FONT></STRONG></DIV> <DIV><STRONG><FONT color=3D#000000=20 ------=_NextPart_000_0015_01C00E7E.BE447700--
3. Re: Psychedelic BMPS
- Posted by Irv <irv at ELLIJAY.COM> Aug 24, 2000
- 472 views
- Last edited Aug 25, 2000
Thomas wrote: On Thu, 24 Aug 2000, Aidan Bindoff wrote: > > include graphics.e > include get.e > include image.e > > use_vesa(1) > > integer gmode > gmode=graphics_mode(18) -- ! -- Note: mode 18 is 640x480 16 color. You won't get "photo" -- quality out of this. Try for a 256 color mode, such as -- 256, 257, 259 or 261. If you can live with 320x200 resolution and 256 -- colors, use mode 19 -- There's also a hi-color library out there somewhere for more colors. -- Irv > if gmode=1 then > puts(1,"Your computer cannot support this program!") > end if > > sequence gtitle > gtitle=read_bitmap("git.BMP") > > all_palette(gtitle[1]/4) -- Very important! > display_image({1,1}, gtitle [2]) > >