[comp.binaries.mac] Set Volume DA 1.0

nf0i+@andrew.cmu.edu (Norman William Franke, III) (09/02/89)

[Set Volume DA 1.0]

This is Set Volume, which is a DA that lets you set the volume of the
Mac's speaker.  I wrote it because the control panel is too slow coming
up, and I seem to change the volume a lot.  This DA can optionally beep
when you change the setting, and save the setting into PRAM if you'd
like, and remembers it location on the screen for the next time you
open it.  Set Volume is freeware.

Norman Franke
nf0i+@andrew.cmu.edu

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

:$P0PG#"@EfaeE@8ZFfPd!&0*9#&6593K!!!!!!e"!!!!!-(p8dP8)3!"!!!03A*
-BA8"!!!!!!!!!!)!#P0PG#"@EfaeE@9(,["!JG%13)(4'%#"d5K#C`!$2#lqj#S
Zr[3!4bm'!%4@+!"(Q,)$XJ%0!"i!!3!!!%F[)%4'58a%68p@!3#Jeq9SS0IPdJ!
!%+%!!!!!!!!-Z`!!!!!["3!!!!!!!!!!AK3!!!3)#1$"[)!1$JCd4G$#J50Ph*5
4%iD0!)*Mb*5a-bI2R$%a(!dN#%$"P$*d3&Kj`kC1Qc*@,JBNBL3*%b*0RPJC'4!
B5CSfFHVN#F!RbD0)!i+k9Ji08JLKNNUG5V@UeDYBXfVGZX!E!B)"e"#d!3!+!$%
!k!!`Y!$!bC3V@llF5K!-J!8HR1J#)%F[!'PqrF%"i&I1'S%#l!,3j4H,Ah4`![M
PSTL0Ab0qVF%4i&H*BLeqDIJP"QH!Aab+NIJ9i9F@(!*q66!!mJrGQB!bCJXd%e$
9B-9J3(a!FJi!$K*)6#3"!F3*Y#T2ALaiSH!(B9hri-$i8!-)!!K1kZJ1F-B#!K8
#!4J`!`'%%K&,Q(cM!1!&$J6m`Jp'X%)p!!*Q@2!#!2cj9m!C")!`"5JUJ,"%+5J
`+*amp)@Ra#S!8'!'#M$dKi%43+b$"!"!q!3&2JTiNF8M,r"!4""8"'&G+U!)Gi*
h&#!iB#U5K!G#IcND`"`+8)#53RM@rCMK'3J)J5%&c)%b`RCJS%)F--$)-##8E`"
JJ3K)$#B#-'1@5HDCCSV3T3C6"(''"h"m!%N3iL34"$`"`C!!646*r-12I!--m-)
9*6ha6NRK4C!!"3!IJ-(1PB#!d#8%-'`Ta`IQ)#%*%*9Q+)"h"lc3*3-!5"!!$"!
!)&m!!h$a4(JLI#%F+%bi!)J6F3cf3J)a!#-!#2S"!)BpXB,`KC41k2-21m8HHk5
biM6,B,,rB#0Y%Y3k)m)(`NRVJJK"81[,#h`%&!!qri8A"$lR`[%2+$Mmi"eXGA3
VkaF$JV+$#,I@S33H!MLb"JR'E[F#!NjBm3mi3ELcF!amq!N!"K!$F*%'-AM(J5L
`HH(M&`BM`%!1!2a$)J!*R%%#%-Aa-8#T*,rcMcm#"!%!2Tm#F%!%[S)K#"!6"!1
!c2iBm8ei1HrFmcK)5%!b2pd%)X"!m3J#30!!3"h)al%+NB%%Z#6QR+3%rX#$3+Q
i3hD#YqS$J!0VJc"JNfHNE5`8Vd+6F%"C4-I$&&4)-F)2,T4%S`KZ!-#!%"%)G`B
)c)%!"3`Bb&!i!V)!iBB%Jl9jKJ%3B"!0--0#!)%83)$LJK0Hh2f)F`RlS`aaTjU
3!(L6L60`BBEXQ@ea+XMd%$%PLYX9!"i3X+$c&!$F&J!8,`#TPcq%j(!B"[mT`FC
rE#J!Jr)%%!&%$[0qrpm8imrEGprQ%i!%-!2kAJ!UA!J(!#$rr11VG8+FiZk1I%M
"&`,L!Z8"!!4(L-(e!-#'%f`[)"j!JK[q`BhTbH-&"S5"#bKS"5"B4i,rd!B)V3&
#Ck5L%5rBS$9m&i"8M%'#rR!'qm$h[[LGEAleqm$pmVFr!,"`HL*d3`aKU)cTS3+
$!I(G!N!Ba(q3!(##*N5K#JRR$fDi%)BbI%,lDZM$'p,2I[M6R`#Xic[1k-)IL-!
L%DGR"54f8A&-('%*6jK#*e,4LQ0`BbSUS-F2Z"%9FmK!Z3Cb!&4!!3`#NTiZqQ'
$k!(!!kR`Bhmm!%K$1T)#HZQ(#Z6$J&Yj`3@I#-m6S&!%*d!1FJRl"c+)-`!0&Qj
aLB1!%*4h!!5q!!8CdJXri)(!&L""P5!%"bVSm-Fjp+e&4'$#%ii``rp`8AjIe'%
BHdJM%XMUJ5e`#J6q33i3NJ-9F!#"&%$J#Qk#!*Y1S3!h[3P1FBCJJZ6i$h95SBT
j`Q+HSkLM-1IJ4L@#m&%6j!B)SA&#k054'kN!3`qqX+aMrLe`)fLQqq$h4Kb#NBG
M"!#06##V+84JJZd!J+!-k$X'r"1%!TdJ34YKd!dL9+%-CBH#2[U2N!!@3$Vda1N
p&j!!LP%`)(%"@*BCC0!hA8U!"F1C)$YdU3S3'!%'Z)6!Tr$a$mXY+aa"!%33R*U
ald"(,rZJad+ATFG"k(%8#&5#8c$!"J6B%Mbkf!FX3$""C!J"&BqNUbT[QFZiqN'
[GX8V"6J*$0EG,@p$81B8LR$+9'EU(!1!J1d)*)3MZ"%'"qMJ"bHS$L5X`4r!m+`
rN!""aa@!9JKe'i-8MX#!)qMX$GMSjbY"f0R2K[DcT%@KDB("3KGU8(&Am1"epZ'
&ITjYLC`9l@e(@p$Sl$DK22J!!ib`'`2iEJ$!N`m##YZk,lM+184iJK5#3)3N2!&
B9JJ)G#6k6#rQF)Ik'`$r6T'+3Y#93$(iJMm!mmP3eL'm34$#%kT!"I3ZM(D5[Ce
"9r#2cLSe&5bJ8N#FS4Kc3-Hc"hjJ-&-"##9mi$B!J)B'&`B'*8K(,rmJK'*iZd&
`R2L-e&#-,'4li-q5d,DLcHf#3CY3(dJ5Y*K9J(F#-+-a+!B3k0-0!mJJ!QK`DJI
UFF)q,2B28NcX(qA--TDhV19bmZ)I[!$$1-Z&-V9"3A*"3)I&KZ!`FSM!@YM`TZm
)-'G8T++1l)KHJlfCLK+!`30Ji)"Z$%!'#cJC"P!fJ*5T6)*r0"S&ri!dGYbKA8q
#-McKc8N9&MZ&f%Q#1!H3!'8XlmX![Q*5&rN)cZfJ#J!0f%8!&VJ[![M+JBBYl'"
`J-#!p*)2,S`B(-CcaJXF-$e4[&T!'a4(+N434h%!8Sq"D(BU4Q!mIBcB(6N,J"+
!i$aff1iIiT!!$L"EX!4rm),8fAbN2h!K"#0FeJ#D"3!-R`KD'1BfKDG0V45--0h
AaPQ)e1#e)LlV!Rp3)plcKQ&SKAM[J[2fE#dFJb'0TiGVIfSJfci$$rS'JQ3,!"!
"-CN0ri'2D)+K1K!(R['Bd!9!R%%H8h#j1f*q"RA3h"bp4BEa,1Ia3a$N(kd9PKN
%i!FB""d'A!"'d'r`K@!!Jcb81S!"D!10H!pEPkci`3'3!+#(!'J"KT,`(E&eF3m
eJ&d[ph$&'A4JA)%NA)J,Cki83G[E,T4Q3$#8K9l`33&m!`1eUHM#eAA"$haSRHX
!)!IDd3"L6KaH$`#`"GUeB)9L#+!)!VPX!DCqPmhkJpjaeh&d(*l3KHlAlaVFVj!
!"9*N-D2[0[k!34@i$3"r2)IfXRYpl9%`HpMl!!`b!!--FJi'&%aGIlT4!"NmF1K
%,eS!rF!'Z+F[$QjQL*[B*iFjFfGUY&Y!Zq!`l"I`jT`K[#T`6f!##,D#!)+dRbj
5DIpAj$m9Q9J-j#!RbGlUXi$*1Z#h#!!'9Q"3#i"ff,"3T3)'@L!%L5-"B"!Mkb"
2#!!(0`8!U2!&"*K#L%*iq)#!%K!%%8J!Z&D"U1!&B+!#5N",+T1"KD-![1B$(JJ
'%R!'U2"kX["kY2"kU["keX"4iQFSL!)064!%f(*+kaF3lcF9T)*,Z%31!8!'`6!
)4%!%"'%!&M-34#%1Gh%8hQ%A@!!!S%!!"4!%B[!'G8!(*N-5l3F$%`-!k)!)E&)
'E&!'Bj!!%R5!"Q8!!KSa"fNJ"f9!"L"J"bcK%Q@J!dH"5qf(!`"JI+H5KJ6"K-B
KE`B3!$%3!SFSEj')"T-S!lK%%VMN&)U)#*-i!iiB%,L%#*')#T0)!dL"5hLPL-J
`L6A3LJ#!$*')$T0S!d5aL'jS(!'!!*0i!hp`&*LA!!"3"3!3"!9!!%*3"Q8`'#5
"HF*`M!#J$mXi"@&J"f9J,Yi!!!9`&!d!!(J5!J(!!J3J!%p`'#34MZ0BM[NR&DN
b$)M!!@qK%S2i%L$`)L!3!bi!!b!3$I[B!NT3"fc3!MK!-L54+J'aIT!!J!J8)!4
j!#a[)!GY%!CZi&38i3CVN!#(5G#44p%#k3%'!H!$L*!!"e5!"QN`"rQi95N*!QE
JKf9`"f(JKb`!!RPJKL"3N4&C"h13!)GTN!!5BC!!%Ql`"L!`"Qm`"h43Nf*`KMD
*NcT*9fq3!")pb3CX!!)rk3+3!!-&%dN(DI!'EU#53r!'F*!!"h+3!!CRJ!BTN3V
lQ!-iJ!-+NJF9k3Cd3)FJ%*Cb!!F6'C4Gk3D&Fa4YN!!H[c#5L,!0dS#0fMJ0))#
8%eN'+RQ(H5L)FT'(28N(A1N'Mj-'&`N(-aN',c'AFL"13G!%)(!(H(L4Bm!'4rQ
(05N0cIL-L#N'cJJ(+NQD%G'8p6)'D'#4Cj!!KikCQ#K4Q@H!P5"`NRRS"Li"Qjq
jN4i"!KB*L0)!"SJj"KB*!V!*!McjKbijNEj*QCMj1,d*QB3SR+b*Q-d*!S8CRG0
CRGF*L'DJREf*Qh5i"Y6j"RM!Q-*C"'kJ"Qq3!!FKS*!!M")!I3!!Xa!!h"!![2!
GjR)8`5!)*S%5pKLC#4S3"S%3#J%!$"%!qi!(#'!""%%ISZ#04#!&9L!&"#%$,a)
M"1%$3F!%8N!&"+%%J#-i"'%&j88&6*!!(Q+3!%c,4"#3!%FU5$%!CJ!&`4"'!E%
!@NJ38CJr4HS1*,'J5RSArY#NJ[#N$0"q!i!'2*!!T'R)!%b+T&1DKJi!$564&[8
B&i3)4cB!!!:
---