[fa.info-mac] Suggested Desk Accessory

info-mac@uw-beaver (12/22/84)

From: singer@harvard.ARPA (Andrew Singer)

   I've hacked up the requested desk accessory to blank the Macintosh
screen. It will leave it blank until a mouse click occurs. In order to
work properly, it must save the screen somewhere before it blanks it so
that it can restore it. If it can't find enough memory to do this, it
just quits. This is vey likely to be the case on a 128K Mac.

   I tried it from within the Finder, and there wasn't enough memory
(with only one mounted disk) by a few hundred bytes. On a Fat Mac it
works fine. I therefore adapted it to run as an application, which
simply blanks the screen until a click and then launches the Finder
again (which repaints the screen).

The two files are as follows in BINHEX format.

     Jon F. Hueras
     (singer@harvard)

Blank Screen Accessory:

(This file must be converted with BinHex.Hex)
#????????$0000
***COMPRESSED
***RESOURCE FORK
(    0    (    !     $                      
(                                           
(                                           
(                                           
(                                           
(                                           
(                                           
(                                           
(    *H            @ *8 I@"F *8,0FQA;FL@4V-R
(&5E;@ @/   58"A(DI 9GHO"* I2D!G!B!\WJT  :A2
("!7(E @?  'IP @/   %5\BV%'(__P@?  'IP @/   
(!5?<O\@P5'(__R?_    ! @3W  ",   : Q2@!F\M_\
(    ! B5R!1(GP !Z< (#P  !5?(MA1R/_\J%,@7Z C
($I 9P8@?-ZM  %P $YU                        
(                                           
(                                           
(                                  < #(  $12
(%92    "@ ?   @          T 0FQA;FL@4V-R965N
(                                           
(                                           
(                                           
(                                           
(                                           
(                                           
(                                           
(                                           
(                                           
(                                           
(                                           
(                                           
(                                           
(                                           
***END OF DATA
***CRC:728E

Blank Screen Application:

(This file must be converted with BinHex.Hex)
#APPL????$0000
***COMPRESSED
***RESOURCE FORK
(    0    (    !     #X                     
(                                           
(                                           
(                                           
(                                           
(                                           
(                                           
(                                           
(    !@    H   "      @    @   _/  !J?     X
(     &H4B!\  >G " \   57W+_(,%1R/_\G_P    0
("!/<  (P  !H#%* &;RW_P    0J%.I]           
(                                           
(                                           
(                                           
(                                           
(                                           
(                                  < #X  $-/
($1%  $ "@  __\@           !__\T   <        
(                                           
(                                           
(                                           
(                                           
(                                           
(                                           
(                                           
(                                           
(                                           
(                                           
(                                           
(                                           
(                                           
(                                           
***END OF DATA
***CRC:713D