[comp.sys.next] Screen dimming and saving

Gerben.Wierda@bbs.acs.unc.edu (Gerben Wierda) (06/05/91)

PLEASE: reply to gerben@rug.nl and not to sender of this posting...

Hi!

	There have been some postings on screen dimming, and most of
them use an ioctl call on /dev/evs0 to set the brightness to 0. But that
doesn't dim the screen completely, and since my machine will be in a
kind of server mode and turned on for most of the time I like to get the
screen COMPLETELY black. Is there a way to do this? Like putting some
black picture on top?

	And since I am posting, Another possibility would be that kind
of zero brightness that is offered know combined with a "block-mover"
screensaver that you see on macintosh, MS-windows and probably also
X-Windows. Has anybody seen that somewhere?

	Thanks in advance.

Gerben

--
   The opinions expressed are not necessarily those of the University of
     North Carolina at Chapel Hill, the Campus Office for Information
        Technology, or the Experimental Bulletin Board Service.
           internet:  bbs.oit.unc.edu or 128.109.157.30

eps@toaster.SFSU.EDU (Eric P. Scott) (06/06/91)

In article <4005@beguine.UUCP> Gerben.Wierda@bbs.acs.unc.edu
	(Gerben Wierda) writes:
>	There have been some postings on screen dimming, and most of
>them use an ioctl call on /dev/evs0 to set the brightness to 0. But that
>doesn't dim the screen completely, and since my machine will be in a
>kind of server mode and turned on for most of the time I like to get the
>screen COMPLETELY black. Is there a way to do this? Like putting some
>black picture on top?

Sure.  Just create a screen-sized Nonretained window that
autofills to black, and order it to the front of the highest
tier.

For a demonstration, try
  pft -s -f /path/to/a/file/containing/the/following

0 currentwindowbounds Nonretained window
dup frontwindow currentwindowlevel exch setwindowlevel
dup windowdeviceround
setexposurecolor
obscurecursor
Above 0 2 index orderwindow
0 currentmouse
{ buttondown { exit } { yield
    0 currentmouse 2 index eq exch 3 index eq and not
    { 500 { yield buttondown { exit } if } repeat obscurecursor } if
  } ifelse } loop
pop pop
{ buttondown { yield } { exit } ifelse } loop
Out 0 2 index orderwindow
termwindow

[The above is for 2.0/2.1 systems; if you're still running
1.0/1.0a, remove the line with the setwindowlevel.  You might
also need to replace both occurrences of "orderwindow" with
"systemdict /orderwindow get exec"]

					-=EPS=-