1. blinking colors and intense.e
Hi, all. I am playing with writing colored text to a DOS window,
and I find that having background colors of 8-15 cause the fore-
ground chars to blink. Searching the EUForum, I find mention of
a file named intense.e, by David Cuny, but I can't find the file
anywhere. I found the SCREEN.e in his EE files, but the code does
not seem to work.
Is there an easy fix for this, to work in both maximized and
non-max'ed DOS screens? I am seeing this on both Win2K and XP.
(note: the blinking only occurs during a maximized DOS screen, but
not when the window is not max'ed.)
Thanks,
michael
2. Re: blinking colors and intense.e
Michael Thompson wrote:
> Hi, all. I am playing with writing colored text to a DOS window,
> and I find that having background colors of 8-15 cause the fore-
> ground chars to blink. Searching the EUForum, I find mention of
> a file named intense.e, by David Cuny, but I can't find the file
> anywhere. I found the SCREEN.e in his EE files, but the code does
> not seem to work.
>
> Is there an easy fix for this, to work in both maximized and
> non-max'ed DOS screens? I am seeing this on both Win2K and XP.
> (note: the blinking only occurs during a maximized DOS screen, but
> not when the window is not max'ed.)
The following program works for me, using the ex.exe 2.4 interpreter
under Win 98:
include graphics.e
include machine.e
type boolean (object x)
if integer(x) and (x = 0 or x = 1) then
return 1
end if
return 0
end type
global procedure set_blink (boolean enable)
-- In text mode, a text_color() value in the interval [16,31] normally
-- causes a blinking foreground.
-- With set_blink(OFF), these values cause a bright background instead.
-- Note: The way this procedure is written here, it works only on
-- EGA, MCGA, and VGA screencards,
-- *not* on MDA/Herc and CGA screencards.
sequence reg_list
reg_list = repeat(0, REG_LIST_SIZE)
reg_list[REG_AX] = #1003 -- BIOS service to disable/enable blink
reg_list[REG_BX] = enable
reg_list = dos_interrupt(#10, reg_list)
end procedure
constant
OFF = 0,
ON = 1
set_blink(OFF)
clear_screen()
for fore = 0 to 31 do
text_color(fore)
for back = 0 to 7 do
bk_color(back)
puts(1, " aaa ")
end for
end for
if getc(0) then end if
Regards,
Juergen
3. Re: blinking colors and intense.e
On 2 Jun 2004, at 8:02, Michael Thompson wrote:
>
>
> posted by: Michael Thompson <michaelstee at comcast.net>
>
> Hi, all. I am playing with writing colored text to a DOS window,
> and I find that having background colors of 8-15 cause the fore-
> ground chars to blink. Searching the EUForum, I find mention of
> a file named intense.e, by David Cuny, but I can't find the file
> anywhere. I found the SCREEN.e in his EE files, but the code does
> not seem to work.
>
> Is there an easy fix for this, to work in both maximized and
> non-max'ed DOS screens? I am seeing this on both Win2K and XP.
> (note: the blinking only occurs during a maximized DOS screen, but
> not when the window is not max'ed.)
Try ansi.sys?
Kat
4. Re: blinking colors and intense.e
>>The following program works for me, using the ex.exe 2.4 interpreter
>>under Win 98:
>>
>>global procedure set_blink (boolean enable)
>> sequence reg_list
>>
>> reg_list = repeat(0, REG_LIST_SIZE)
>> reg_list[REG_AX] = #1003 -- BIOS service to disable/enable blink
>> reg_list[REG_BX] = enable
>> reg_list = dos_interrupt(#10, reg_list)
>>end procedure
>>
>>constant
>> OFF = 0,
>> ON = 1
>>
>>set_blink(OFF)
This was just what I was looking for!! Thanks a lot!!
michael
