1. problem in my fast_puts()
Hi, pals!
I have got some trouble in my program. Heeeeelp me please!
I myselp made fast_puts() routine using poke() as follows, but did not work well
when it is used with "switching display pages".
graphic mode is 80x25 color text mode.
---- code starts here
include image.e
global procedure fast_puts(integer ForeColor, integer BackColor,
integer row, integer col, sequence string)
sequence screen, buffer
integer str_len
screen = #B8000 + get_active_page()*4000 -- Is this Incorrect ??????
str_len = length(string)
buffer = repeat(BackColor*16+ForeColor, str_len*2)
for i=1 to str_len do
buffer[i*2-1]=string[i]
end for
poke(screen+(row-1)*160+(col-1)*2,buffer)
end procedure
----- code end here
2. problem in my fast_puts()
- Posted by Robert Craig <robert_craig at COMPUSERVE.COM>
Apr 03, 1997
-
Last edited Apr 04, 1997
Lee woo seob writes:
> screen = #B8000 + get_active_page()*4000 -- Is this Incorrect ?????
I believe that should be 4096, not 4000.
Look at display_text_image() in image.e.
It does this kind of thing.
Regards,
Rob Craig
Rapid Deployment Software
