[net.sources.mac] SetSound & StuffClip DA's

shulman@topaz.RUTGERS.EDU (Jeff Shulman) (12/27/85)

[ Uploaded from Delphi.  Simulposted to Usenet/INFO-MAC - JSS ]

Name: SETSOUND/STUFFCLIP - 2 SMALL DAS
Date: 24-DEC-1985 16:51 by BILLS
 
These are 2 small da's I wrote (in 68000 assembler using MDS) to do useful
things in very little space.
 
SetSound is a very small da (558 bytes installed) that will set the
sound volume for you.  It sets it immediately, and also sets the
parameter ram as well.  It works on the xL too, and will work while
complex sound is being generated (like musicworks or vco).  If you
want cute, use Apple's Control Panel; if you want small, use SetSound.
SetSound has no private resources.
 
StuffClip is a small (1.2K installed) da that will stuff a single control
character into the clipboard.  Usefull for all those times when you need to
enter a control character, and the application you're running won't let you.
(Useful in your telecommunications program too, not just in your word
processor!)
 
These DA's work on all Macs, including the xL and under HFS with the HD20.
                                        -- Bill Steinberg [BillS]

(This file must be converted with BinHex 4.0)

:&N4"Fb"6CA46Eh9ZC#C6G(9QCN0XDA!!4%C*6%406eB!N!J)JfDU!*!%!3#3!`J
(!!!("`#3!h`K,8Bf8$3L-dSM-b&J*LScC'P0)5SK*NSP3c8d1%)0)8iK3#'3"#)
KN!-L)5SK*#&6)C!%0#'3"#ST)C!$*93KN!9,)b'3!c-K-b%K+58M)5%P)5%c)5-
L)5-0)5)KN!-c)8Sc)5-K-b'3!c-T*8JK)b9+*b%K06NL05%M05%e5L%e)5&#-bN
c)8JT*5-K)5BM)6-K)5SKN!0+)3dc+5%P)5-P)5&+*M8K)58K5b'3!dSP5L%K*5%
c)C!$5LNKN!-P*5'3"%`KN!3Q)5%U)54+)C!%-b-c)@!a$5'3"#KJ)C!$*(%KN!-
!!!)b4!#3!`&)!*!$(!$Q!+J!jJ###&0PG&0[G@jN!%j@r[SJ95m3+%Pf!%UX!"j
Q6%(krp#K+#m)5'lrrNKZrrT)E[lkUDKC6d+R5(S"CNKZr[T#Ccmm!!4`rbm!(`"
#TkN6GZNL(fF83IS"0##")%%aE!!B!'`T5!!HGJ#SFdjH)!01G5K*)&8[%#!i#GC
R&V#k!3aR##"!)#J!N!"Jm#m!U44#V!!HU(0J2LK*)P8[%6!S!"T53'I5$%!!3@B
L4rJ###4S!"`[1J$@U(--8J!$C`!!MJa5!!CR(!a5!!KR$+Kc)N`[1!Mm3N"1G8(
k!033UJ!2B1SNHJ#Q,`T)DJ!3,`UT)K!64IS![-!Dd"T(qJ%-&S#SScmDU)03jkN
$4rS!JLmEU*0#CkL(2aUSJcmm!!'SKhJ!GJ-[#UL%,aZSNaJDe-44brrbU50#CkN
$4IS!FJL5!!"RL$mm!!1Tb'#!3N)8+J!&"!)!-'[b$!)!"flX!K-!q)866P(riL"
*-3)a2!!#-6crr#"2SJ41@8(i!IK`rk!i5(S!)UNSB,S!N!88!!S!)`!6!$)!'`"
"!#8!+!!#!(-!e3!Q!+m!-J#q!!!(-#!!)+NF-6Ni05"LH5"AD@aXD@&Y)&!Z)&0
dC@PZBQ9bCaa@CA*c)$%Z-L!Y)%CbC@8J4'PcG(*TBR9dD@pZ'%0eFR*PER3J9Qp
XG@eP)%aPGQ9X)$dJ!"9&ER4PFL"1CAFJ6'9fC@`J+$!Y0bN!N!-#!%3!N!4#!*!
$(J$Q!,3!jJ#1#P0dG@CQ%80XDA!!6PEqqL"9,a!S5AB!5U`!(QC@3IVrcU%S,`K
)E[rq5'lrqNKZr[UTU&Q2-#lrrZY!!%$!!!C!!!!r!%+RF2m[!+PmGZNL(fFJ3IS
"G##")%%aE!!B!'`T5!!HGJ""qJ&i3T!!3IS"GN*3U(01AL!$6R8S55"9,a!J1!R
@CaD`ZJ&!C`JJ3#!S!*!!B2![!+Q$3U`!(UKcB$)S55*9,a%`+!!D8N"RdJa!!%&
Q&L4S!"`[1J%1U(--8J!"CfS-8J!'C`bSFb*-,cJ)r%*!6R8NHJ$`-$S"#'B'0M`
!rf!#3N-[#Mmm!!4)HJ$L5(S!i%Kk!1#TM5"k!0DJ+5"3&#J!%5"k!-UJ+VB#C`i
[1J$!2`1TA8Kk!,bT+Lm+U5)[#UQ",`UT)f#F98m[#NKk!*K)HJ#BUB!`(fH+-$S
!MJa!!!4R5#!k!*4R##m!3QHTBf!'5(S!IUNS3IS!K##k!'`[1J"N2cS!C%Kk!'*
)HJ"J5(S!B+Q03IS!BL#k!&)[1J"1F!%r!+PMB!$r1MBk!&"R*PY$3IS!5K#$@8q
Tr#!ICKCC6h!",`![2&4&@&4)HJ!`UIjB6f!'F!%r!+R)B!$r"!#3*J+Q!#-!N!9
i!!J!L!$%L"UT-6Ni05"LH5"AD@aXD@&Y)&0dC@PZBQ9bC`#3"BN!"J#9!'@)$9C
PFR0TEfiM)$%Z-$!+!*!&PJ!'!+)!CBJ29'KTFb"%35"TFb"'FQ9P%J#3"B`!D3#
L!,m%$90dG@CQ)(4[)%0XDA!+!*!&"3!'!"8!1!B$6P9-#J#3"4-!"J!M!$J'!e0
25!S!N!8K!!B!-3!i"J069&J!N!B[!!B!2`!i"J0&9&J!N!Bp!!B!63!i"J0&6e3
!N!C,!!B!@`!i"J0&6P(!!*!&@3!'!'N!1!B$380,`!#3"@F!"J"h!$J'!d*&6-!
!N!8&!$J!&3"J"J*#8`#3"4-!1!!M!'!'!NK8!*!&)3!i!$%!B!B#6%B!N!8[!$J
!2`"J"J*@9!#3"6d!1!"0!'!'!NC'!*!&5`!i!&X!B!B#3e)!N!9C!$J!D3"J"J*
66`#3"@F!1!"h!'!'!P0*!*!&"3"L!"8!P!B$4%a&jJ#3"4-!BJ!M!*3'!d4$-3#
3"L%!BJ!a!*3'!d4$-X!!N!8[!')!2`#8"J0%3c2!!*!&23"L!%d!P!B$4%-d`!#
3"8X!BJ"E!*3'!dj"5m!!N!9C!')!D3#8"J06@8l!!*!&C`"L!(F!P!B$494#`!#
3"38!P3!9!-F'!d0"6X!!N!86!*8!)`$("J*&63#3"5%!P3!a!-F'!e093Y`!N!8
[!*8!2`$("J0&8d2Q!*!&23#9!%d!a`B#4P-!N!9,!*8!@`$("J*(8`#3"9N!P3"
T!-F'!P*6!*!&C`#9!(F!a`B#99-!N!-I!#S!"!$9!-X!"!!!rrm!N!6"S!T6G(9
QCK&$E'P`!!!"!*!$#!F!!!F(!*!$I!!!c"`!A!#3!a`!CJ!#4&*@8J!"!"T%594
-!*!$-N4-6dF!N!-q!!d!#L!!!MB!N!8-!!!J!*!%!4@k`D$rrb!!"$S!N!6"S2r
r)!!'j!#3"!N!8f9d8fpeEQ3,!&0dG@CQ%80XDA!j*3: