1. I give up, help? :)
Anyone care to lend a hand to an idiot in need? ;) Well, as you'll soon be
finding out, I'm very new to euphoria. I recently downloaded the neil
graphics files, and while the demos run fine on my computer, after days of
trying, I can't seem to make it work on my own.
Again I apologize for taking up space with what I assume will turn out to
be a simple problem, but for some reason I just can't seem to get this
right. Here's what I've tried(running as .ex) using the d2105a.bmp included
with the Dos tutorial by David Gay. The bmp is 189x189 16 color, though I've
failed with all levels of color :) Here's what I clumsily put
together.....can anyone tell me what I'm doing wrong, or show me how to only
load/display an image using neil.e? Oh, and I'm using the 2.1 alpha of
euphoria.
include neil.e
include keyread.e
include get.e
if gfx_mode(640,480,16) then
puts(1, "error: unsupported graphics mode\n") -- error message
abort(1) -- quit
end if
object my_bitmap
my_bitmap = load_bitmap("d2105a.bmp")
if atom(my_bitmap) then
puts(1, "error: loading bitmap\n")
abort(1)
end if
atom my_screen
my_screen = virtual_screen(640,480)
do_command(screen_blit, my_bitmap, {screen,0,0})
while get_key() != 'q' do
end while
restore_mode()
Again, sorry to be a bother so soon after joining the list.
2. Re: I give up, help? :)
--------------145240261ECE
Joe Tierney wrote:
>
> Anyone care to lend a hand to an idiot in need? ;) Well, as you'll soon be
> snip
Don't hesitate to ask! I attached a simple Eu-file and a bitmap example
file.
Unzip all it an empty dir and edit it with ed.exe. Run it by Esc+e. I
hope
it helps you!
Have a nice day, Rolf
--------------145240261ECE
3. Re: I give up, help? :)
> Anyone care to lend a hand to an idiot in need? ;) Well, as you'll
> soon be finding out, I'm very new to euphoria. I recently downloaded the
> neil graphics files, and while the demos run fine on my computer, after
> days of trying, I can't seem to make it work on my own.
> Again I apologize for taking up space with what I assume will turn out
> to be a simple problem, but for some reason I just can't seem to get
> this right. Here's what I've tried(running as .ex) using the d2105a.bmp
> included with the Dos tutorial by David Gay. The bmp is 189x189 16
> color, though I've failed with all levels of color :) Here's what I
> clumsily put together.....can anyone tell me what I'm doing wrong, or
> show me how to only load/display an image using neil.e? Oh, and I'm
> using the 2.1 alpha of euphoria.
include neil.e
include keyread.e
include get.e
if gfx_mode(640,480,16) then
puts(1, "error: unsupported graphics mode\n") -- error message
abort(1) -- quit
end if
object my_bitmap
my_bitmap = load_bitmap("d2105a.bmp")
if atom(my_bitmap) then
puts(1, "error: loading bitmap\n")
abort(1)
end if
-- my_bitmap loaded correctly, so it will be a sequence containing:
-- a virtual screen handle
-- the width of the screen
-- the height of the screen
atom my_screen
my_screen = virtual_screen(640,480)
-- do_command works two ways:
-- if the second argument is an atom (a virtual screen handle),
-- it copies the whole bitmap
-- else it is a sequence containing:
-- a virtual screen handle
-- x position
-- y position
-- width
-- height
-- and it copies a (width,height) sized bitmap located at (x,y)
-- so,
do_command(screen_blit, my_bitmap[1], {screen,0,0})
-- will work, and
do_command(screen_blit, {my_bitmap[1],0,0,my_bitmap[2],my_bitmap[3]},
{screen,0,0})
-- will do the same thing.
-- if you don't need to use the size of the bitmap, you can change it
-- to just the virtual screen handle with
my_bitmap = my_bitmap[1]
-- after loading it successfully, and then
do_command(screen_blit, my_bitmap, {screen,0,0})
-- will work just fine.
while get_key() != 'q' do
end while
restore_mode()
> Again, sorry to be a bother so soon after joining the list.
No problem, that's what we're here for 
_______ ______ _______ ______
[ _ \[ _ ][ _ _ ][ _ ]
[/| [_] |[/| [_\][/ | | \][/| [_\]
| ___/ | _] | | | _]
[\| [/] [\| [_/] [\| |/] [\| [_/]
[_____] [______] [_____] [______]
xseal at harborside.com ICQ:13466657
http://www.harborside.com/home/x/xseal/euphoria/
!!! Try out my new Running Robot raytraced animation !!!
