OpenEuphoria

1. graphics mode 261 query

• Posted by eeel Sep 10, 2015
• 2608 views

Hello there,
can anybody please suggest ideas as to why graphics mode 261 works ok only once
after a hibernation (or a restart) but subsequent runs of the program only display
a blank screen of the expected background colour (changes of which are displayed
correctly but no text or pixels)

My programs that use g-mode 261 always have a reset to g-mode(-1) at the end
(which i am led to believe is a good habit to get into).

The use_vesa(1) routine seemed to make no difference to this phenomenon.

In case it is relevant i am using...

• an IBM thinkpad
• Windows XP Professional (5.1 build 2600)
• Intel Pentium M at 1.60GHz
• 1526MB RAM
• DirectX 9.0c
• Mobile Intel 915GM/GMS, 910GML Express Chipset with Internal DAC type
• 128MB memory
• native resolution 1024x768

It is so thrilling to see the sharp graphics available in native resolution
and i would prefer not to have to resort to g-mode 18
(the highest resolution that seems to work repeatedly)

Big thanks in advance for any thoughts about this you are able to share with me

(~: eeel the eel :~)

3. Re: graphics mode 261 query

• Posted by eeel Sep 14, 2015
• 2482 views

thank you chris for the speedy reply

i am just gettin back into attempting very simple euphoria 2-D graphics programming and i am used to using just a few simple euphoria 3.1 routines like GRAPHICS_MODE, ALL_PALETTE, PIXEL and DISPLAY_IMAGE some of which needed me to 'INCLUDE' the graphics.e and image.e libraries at the beginning of my program and all of which were documented in the reference manual which i found very useful to consult

i checked out your suggestions and unfortunately felt confused & overwhelmed by the amount & the content of the files

maybe i was naively expecting nothing more than a small number of .e (or .ew if i'm to 'give up' on DOS32) files (similar to graphics.e and image.e with maybe documentation on the routines syntax) to put in the INCLUDE folder, to be used in the same way

i would be very interested to find out if something as basic as this is exists that will easily allow me to (for example) have a fullscreen 1024x768 graphics mode on to which i can plot a single pixel at any coordinate in one of 16 (or even 256) colors in WIN32

sorry i don't understand much about machine code or different graphics 'cards'

i originally learnt 'high-level' programming on the zx spectrum & commodore64 (simon's basic) and so when i first heard about euphoria for programming on a PC i was hoping it would just as easy to 'PLOT' pixels onscreen

i guess my poor old brain is stuck in the eighties

still - any suggestions about very basic graphics programming on windowsXP will be most welcome

thanks again chris and to anyone else with any ideas for me to consider

eel

5. Re: graphics mode 261 query

• Posted by eeel Sep 15, 2015
• 2485 views

thank you pete

would it be fair to say that using phix will be simpler for basic pixel manipulation (in my case on windowsXP at native resolution 1024x768) than euphoria?

does anyone know if phix has the equivalent of the 'reference manual' which lists all the built-in routines & syntax?

is phix a completely separate program to euphoria and thus should be installed in a completely separate folder?

p s

with regards to there being 'no longer a lot of interest in DOS graphics programming' i must say that the only reason i am used to using euphoria in DOS32 mode rather than WIN32 mode is because the reference manual stated that graphics commands (routines?) like PIXEL, DRAW_LINE & GRAPHICS_MODE could only be used in DOS32 mode and i could not find any similar graphics commands to use in WIN32 mode which baffled me at the time (and still does - if & when it crosses my mind) but i simply decided to choose the mode that seemed to allow me to easily achieve what i wanted to do - which was simple pixel manipulation at fullscreen native resolution

7. Re: graphics mode 261 query

• Posted by BRyan Sep 15, 2015
• 2437 views

eeel

Did you try USE_VESA() Its in the library doc in euphoria 3.11

Bernie

9. Re: graphics mode 261 query

• Posted by eeel Sep 16, 2015
• 2421 views

than you greg

i will research what to do with the dos rescue package and hope that i understand the instructions

11. Re: graphics mode 261 query

• Posted by andi49 Sep 18, 2015
• 2365 views

From my point of view, using Dos Graphics (even with Eu3.11) is not the way to go. Maybe you have fun playing arund with this.

include tinewg.exw 
 
WindowType=NoBorderWin          -- we need a window without borders 
atom X=ScreenWidth()            -- getting screen size X 
atom Y=ScreenHeight()           -- see above and Y 
Window("test",-1,-1,X,Y)        -- create the window (full screen centered) 
 
procedure paint() 
sequence coords 
coords=GetClientRect(WinHwnd)                   -- get the size of your working area {xmin,ymin,xmax,ymax} 
 SetCanvas(WinHwnd)                             -- Choose WinHwnd (the Main Window) to paint on 
 SetPenColor(CL_BLACK)                          -- Set Pen color and Brush Color (border and fillcolor) 
 DrawRectangle(0,0,coords[3],coords[4],True)    -- fill it with black 
 SetPenColor(CL_BLUE)                           -- Set border and fill color to blue 
 SetPenSize(5)                                  -- a five pixel Pen Size 
 DrawLine(0,0,coords[3],coords[4])              -- Draw a line from upper left to lower right 
 DrawLine(coords[3],0,0,coords[4])              -- again from upper right to lower left 
 SetPenSize(3)                                  -- new pensize just for fun 
 SetPenCol(CL_WHITE)                            -- now pen is white gives a white border around 
 SetBrushCol(MakeRGB(0,255,0))                  -- shows you can use any RGB Color not only the CL_XXX 
 DrawRectangle(100,100,150,150,True)            -- see above 
 SetBrushCol(CL_RED)                            -- again 
 DrawCircle(floor(X/2),floor(Y/2),200,True)     -- funny circle in the middle 
end procedure 
SetHandler(WinHwnd,Paint,routine_id("paint"))     -- repaint if needed 
 
procedure endapp() 
  CloseApp() 
end procedure 
SetHandler(WinHwnd,Click,routine_id("endapp"))    -- Close the App on a Mouse Click 
SetHandler(WinHwnd,Key,routine_id("endapp"))      -- Also close on Keyboard 
 
paint()  
 
WinMain() 
 

Andreas

13. Re: graphics mode 261 query

• Posted by andi49 Oct 05, 2015
• 2263 views

Hallo

tinewg works with Eu4.0,4.1(32bit) and maybe Phix (i never tested it myself) not with Eu3.1.

From other postings i have seen you are working with Eu3.1.

Maybe you download can EuWinGui and give it a try. EuWinGui comes with really good Doc's and easy to understand Demoprograms.
You can download it on Rapideuphoria http://www.rapideuphoria.com/euwingui.zip

If you come from dos programing, EuWinGui can give you a good start to learn programing under a GUI.

tinewg is my version for a simple GUI wrapper based on (the concept, not the code) EuWinGui
You can downlaod tinewg here https://bitbucket.org/andiwagner/tinewg

Andreas

15. Re: graphics mode 261 query

• Posted by achury Oct 08, 2015
• 2189 views

Laptops have exotic graphics mode, your program will not be compatible with different computers.

DOS graphics are great on "standar" desktop with CRT screen, using VGA or SVGA graphics, this way your program wil be portable on different machines.