[comp.binaries.mac] ToggleSndVolume FKEY 1.0

COSC006@unlcdc2.BITNET (Mike Gleason) (07/26/90)

[ToggleSndVolume FKEY 1.0]

This is an FKEY I wrote to toggle the mac's speaker volume on and off. 
All you have to do is install the FKEY resource into your system file
(via ResEdit or an FKEY installer) and press command-shift-7 to activate
it.  If the volume was set at 0, the volume will be set to 7, and if the
volume was set at any nonzero number, it will be set to zero.

Think Pascal source is included.

* mike gleason *

---
(This file must be converted with BinHex 4.0)

:$A4[CfGXCA0ZC#jcDA3!8dP8)90*9#%!!!!!#*%!!!!!Cae6593K!!-!!!L4FNa
KG3%!!!!!!!!!!J-A9'pRCfaP8fjN4NY&@5"1Eh4P,R4PH(3!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!9%9B9%eM8fX!!+)+3)qL#N#2!!!
#2J!!!VB!!!%9!!!"eHJ"@*F!!!!!!!$AV3!!"!JSN!!F3B-"YBJC8S3)PB!&h!M
mpiqJaB!#+"+m3I!#P6GRcV!T-m80'50,LQ3"iH30R6)ZAZ+K)i!JP5*B(J+iQE2
*Q#PV,JSG+P58!L#2-0V#k%2J1J!2lNL#"i)L#)(jS-j"4Y8U!!&",(EpGj9!c3G
``-%,iC9!1l%L["ES*(D%A(PL6AJed%6X#Dm*E)K&!GJ59$XJi+A`UU#I@"89!`)
"N!#!laXhBFDm)FUjXqI24!N!-!!!!8&+""FSA4e`B%!SR5R+MKalYQf0RQq$*J*
J4!!"!Hk!(NkmXqZ#"`PU!F"KM$%#b!Kb!,"F3"%M6R3#d&#%5K!K"%d8JI*N#N%
C!pEK&MU!hAVH"!Hd@mr%)J,15fB*c548ld5'ATP-a0+)Sp++E6e5UUb@eEeeX-J
#j,YHES*F,aUC45eQ95a)ED!AG+CB6Hed@dVGE#jPCXCF*M4V,@)!$IK'KGmAil4
I$Q5dpYU6fJ`-#YH0$QFAd0Emr#dKZ&&VGY#KrRSHrQ-@C5JRdpkH2SJqZ5IHrJp
N#!JFE*@94P&l@)!$IK'KGmAih1T*M)d%r@FaHmMj2MXUeChp&V"DKDa-N!!!Epi
4Y#5d&5UU`d4*hPme5#G5'-qK!Q*C9T5Ji,RRi[JaNCZH,hRbcId($+960rHp2(d
XUb@&3YV"HKDerHp2(dF'GlC0$60rH%E3RIaIYNNCk4NCKf9DA%`R060rHTS3r8X
4E-2h2%*q"BDI3QErC9ldmI4`ChYjmXhpi4Y#Gr&qf5C[k21XM-1bV5JZ%jUC[l`
MD%lq,pZH08#'pV*1*4D`BS@YIh[6ap("RHfErTVrrBcIhNI*mG#eVjiM2(C9UfI
PfEqMr4Uji1DQEqm)fK1rLrEFr'[rkXUmq@53!*q"8@Yd)b-mD,2*KQZDIC[RM9$
rh(KYFd[C[cmpcVVX`[Y0mm4&e-2p5Rd*Qr[#0$Vle)ATpPS"`CQl0rYhTiqM9RI
d@X(GB$`%&!)!'94[CfGXC90ZC&C[E(9YC5"'5d9C)%P%26FJ9%9B9#"35Ne0)#!
J)#!J16)a)$-`*3!!!!!!!!!!!!!!!!!!!(*cFQ058d9%!!#L#MfpSJSpb3!!!KB
!!!!!!!!"Z`!!!!$E[J!!!!!!!!!!G!X!!!3)+*!!'N'$!BA3U41'$3JiBH5%D91
'6KNj)1Lm!4%'K*NhFYSdI#MRcCJb&+Lm1A1'6CNTEXKBHF1Q$N834TB8b9*%!%%
jFq5-N6)P)&#K4)X3)FLdU91RSK6dk198J)8aG0+mF6-5SN5+&Z@iU%)P$j`b)0+
i'I1Q$F5XBY+`58-R$`Ja&Hq8+H1'Bpm`@"Nk$"26)dL4$Z'82%QQMN5()$h@@CY
eDpH)%bYHG%&$5T%J4*Jim8X'a"8T5DJ8%3eL$'%3@`P#!q-JB-kG!!ii$D,[RlX
3b")i!a03N4)m!KbY)3(L#i`2,a!iXI)2A""he@2`qFF2!!EY!(aUL!%%!!G4"*a
iF9+RqI2S$()!q!HJI))c*)#F!m"R!!!*mVhcMcm#"!%!2J+8Gd!%`!J!KL"!6"!
-!!,kBm3hl#@B'i-1MS-%J!$`dddJ!J`8Mb!!5"MLL1`e*m)A3Q3J!5i11J(0G,i
KiBC[6ZMbMcT+l1L1'3Vm`%0Z2Ii$"KJ'#(&'NPJB#B!#U5#M(RX"$C3P3J"`+33
!$`KLK!(P"F3"!$,BTP-@"#Q3!0Y6$m3$cJ-UXH356$,4C&-C!!-@9'pRCfaP8fj
N9QpXG@eP)%C,49NZF(3!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!9%9B9&"+68d!!+)+2(LL#MfZ!!!!!!!!!jN!!!!!!!!#KJ!!$YF!!!!
!!!$hGJK0b%lXi8kS6fA@LhLbA1k#mP%SbPdd9QeVhIDXZYM"F&Q06,jKB4BP&U4
9,X6'ETc38SP-J#fLMdPDVa,,BY0Z)D9-5'G+&5V[+V+lHPXSC*1IkE3fHABHbXd
Nd%Fi%hGP$**cr6D'cbl$f9QNQLpcm#EZ`b@5kA3pN!$&Cp02h%Cq+6hHV%VCYQY
`FmZUGHF$!k*,AU*lh2bfffffEZbr1D1L5e64p2M+qJVHjqF#EZXm@,)qSdP4e)F
[SX)Ir,'1a6FRXQa6@$GGEIPb2[Fr!QlUPrC3[@fQP'+Aac8QiArAQMl-THNf&V2
ch5DM59(8KbqLpcmYY#EZabHbEek8Zk8VE+(ARK"V2ikmIL[f0hrAB"2&HpFGlRj
EEEEE0hBS49,dQ`YCr(8qYJ%m9leUX3I91[0(dI5EKIq1pcm#EZTpE#eRkV%(`ei
r&6'UG&)[KXRdNQ6(8qYHD2UX3I91pcm#EZXV0*0'1TpEL@5UGPYQ-EePaAjAaX*
TpLlGK)mD`EVeafXq1pcm#EZafLjLPFXBk2`CLrk,YVV$bZG5,ek8ZXNQh*bEYVV
$bZG5,Eh2cR0EAaK4Ir1"!*[p$Kqi4eXJ'UaVc4p(dQiArF(*@PaPIXE!*[p$Kq[
MR2SV2,m58+emjV#$2iIYBVSpmi$cfPH!''YYRQP0Kb1!'%F@fHD8f@NFi%!Qrd1
(lK(@b1!%V%H!!2F)rY@cce0eYI*m51")mR@q!')pHKZfKXmc2F)rY@cc14`!e#V
h#2l9XmdTX29,rI!!1RVd0fd0RQE#1,E2-r!$mTrJ!(6ek'lD'cc0KVECjR)i!G'
%p9r`65b(R)i(l33$9F)kh@[R2fJU$9AEdYD`6%B!!!:
---