[comp.sys.mac] SHOWINIT Enclosed

hunt@firqb.dec.com (Phil Hunt) (11/24/87)

Hello,
 
  While I was searching for ShowINIT, a utility that displays the INIT's ICON 
during system startup, I was told that each and every INIT file must use a piece
of code that was in the public domain to do this.  Oh, well,   but...  I just 
came across AutoIdle by Larry Rosenstein of Apple that was put in the public
domain, and it does SHOWINIT of it's ICON, but from a seperate INIT resource!!!
He must have modified it to allow its use from a seperate resource!!
 
So I took the resource and pasted it into each and every INIT I have (42 of
them) and lo, and behold, they all show their ICONS on startup now except for
3 of them, namely, Suitcase!, Pyro! and CheapBeep.  
 
Anyway, since the routine is public domain and the AutoIdle I grabbed it from is
public domain and the routine is short, enclosed is ShowINIT.HQX.  To use, just
use the utility BINHEX to pack it back to a binary file and then use RESEDIT 1.1
or so to paste it's INIT, ID=128 resource into your INIT files.  Be
careful not to overwrite and INIT ID of 128 already in your INIT file.  BTW,
Pyro! and Suicase! INITs are ID=128.  I wonder if that is the reason it didn't
work on them, even after ShowINIT was renamed to 127, oh well.
 
Also,  The INIT must have an ICN# resource or the ShowINIT code will not execute
anyway because there would be no picture to display anyway.  Have fun!!!
 
==========================================
(This file must be converted with BinHex 4.0)
 
:%90SEhG*EQPd)&*PFfpeFQ0P!$q3#!#3#!+Vj(`!N!3"!*!$!R!!!!&`!*!$1rH
NJ)!!*)#Ipk5!N!!8T)#3!"5NJ*rh[)#!!!#!J!!!J2m48fK[GdPZDA3J8Q9cEh9
bBf8#!*!$2j!)!*!%2j!)!*!BRFjbB!#3"J+VJ2q3!i$rN!1!rj!$J2q3!i$rN!1
!rj!$J2q3!i$rN!1!rj!$J2q3!i$rN!1!rj!$J2q3!i!!N!X(39"36!!"!*!%6&0
$6e3!N!-"5801)`!'!!%%(`!#B23!!h'K!!3GmJ!&!Yi!"MJJ!!F2e%C548B!"J!
"F9F!!J!!!@a19[lk,`LJ+5mA5'lrqNKZrra)E[lkUDJr,[rk2ccrrdkk!!SJAk!
U6Pj1G8j@!!![#d+R,ca*3diM2bi!#UQJ)"pR)#"!S#NQ5#m32bi!#%kk!"3J5k!
U,`LTSbCI6PiZRdjeB2C19[kX51Fr(#mi#34,l[rm)Fd*"%KZrrLSENKZrUbSEc!
i#5cM@!T!%#'`H!NZCaJ-Z&"KG@`+H'F)-I`!#!NXB!Baq!Tq#5a"l[kX-#J!$!4
!!#K)3$!i#5`Y32mQ,8$r+JCZ!#$r,!CZ!#$r+LCZ!!TK0$!i#5`b,J!)DJ3b2!!
Sd%%a`!NXieJ+3"!K-F!*,NKZrUbSI5(I#34-hcMm6PiJAeb26Y"*l[mB+)X'P!#
3!i!jI!!%!!4#V!!'+A`!)!!J!!S[$%AZrUa)DJ!#5(S!,%KZrbBr2!!$3UHSl!5
8!*!$J#m-5'S!!NKk!"")E[mQ2c`!!8+RU1a1G3#3"5!!)!!!!3#3!`*`!!!"F!#
3!cX!#MF8"5B!N!-F!$)!!%P1593!N!-+!)!!!#!!N!3+TAJ)8fK[GdP1596(rJ:
 

lsr@apple.UUCP (Larry Rosenstein) (11/25/87)

In article <8711240508.AA03224@decwrl.dec.com> hunt@firqb.dec.com (Phil Hunt) writes:
> 
>He must have modified it to allow its use from a seperate resource!!
> 
>So I took the resource and pasted it into each and every INIT I have (42 of
>them) and lo, and behold, they all show their ICONS on startup now except for
>3 of them, namely, Suitcase!, Pyro! and CheapBeep.  

Yes.  Paul Mercer's ShowINIT code only requires the ID of the icon as a
parameter.  The code I wrote gets that number from its own resource ID.  You
can take the resource and paste it into any INIT file.  Then decide which
ICN# resource you want to display and change the id of my resource to the
same number.

>Pyro! and Suicase! INITs are ID=128.  I wonder if that is the reason it didn't
>work on them, even after ShowINIT was renamed to 127, oh well.

You do have to be careful not to have 2 INIT resource with the same number.
In the case of Pyro & Suitcase, you might try changing their original
INIT/128 resource to have id 127, and making my INIT resource have ID 128.
(Assuming that the icon you want to display has id 128.)

I also should point out (again) that the ShowINIT code is from Paul Mercer
and is in the public domain.  According to the documentation for one of
Paul's other works, he can be reached as:

Delphi:	LOGICHACK
MCI:	SOL

and at:

681 E. Seneca Tpk. #A4
Syracuse, NY 13205
315-492-3348

Be advised, however, that Paul is moving out to California (about this time,
I believe) so he may not be reachable for a couple of weeks.

-- 
Larry Rosenstein

Object Specialist
Apple Computer

AppleLink: Rosenstein1
UUCP:  {sun, voder, nsc, mtxinu, dual}!apple!lsr
CSNET: lsr@Apple.com