Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!tut.cis.ohio-state.edu!ucbvax!hplabs!felix!dhw68k!macintosh
From: PUGH@ccc.nmfecc.gov (Jon Pugh)
Newsgroups: comp.binaries.mac
Subject: PlaySound
Message-ID: <27570@dhw68k.cts.com>
Date: 13 Nov 89 05:02:04 GMT
Sender: macintosh@dhw68k.cts.com
Lines: 95
Approved: Info-Mac@sumex-aim.stanford.edu

[PlaySound]

Here is a newer version of PlaySound, the simplest sound player in the
Macintosh universe.  It puts up an SFGetFile dialog and allows you to
select a file of type FSSD (as created by SoundCap, SoundWave, and
Sound Recorder) and it plays it.  If you hold the option key down it
will play it repeatedly.  Any sound can be interrupted by a mouse
click.  When you pick Cancel, it quits.

Changes in this version:  I forgot InitFonts and that made the text
disappear on SEs running MF, but nowhere else.  Strangeness.

Changes last version:  A bigger dialog box.  Less crashes due to better
use of the Sound Manager (from tips in the Apple Q&A stack).  A SIZE
resource for MultiFinder.

Share and Enjoy.

Jon

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

:#9"XBAP6Eh9ZC!""8&"-2cmr2`%!!!!!!!!!$4(NK`!!!!!"!!!!$)-!!!Z$!!!
!MNMRm-!JE`!J)Qm!(%*$3N!3'%*"%KQb3'd'0!"R&'!%#9"XBAP6Eh9ZC!)!!!"
"8&"-2cmr2`%!!%!!!!!!!!!!!%&38%`r2cmr!3!!3!!!!!!!!!!!!!!!!!!!!!!
!!!!!S88!RJ!!!!!!!!d4B@GPFJa%CA0V)%eKEQ&RCA)14'9fD@0P)%eKEQ&RCA)
14'PKE'pR)%eKEQ&RCA)-4'PcDb"0B@jKCf9b$%CTE'8J6@&ZB@GPFJa'Efjd)%e
KEQ&RCA)96'PRD(4cF'9PC#"QB@0TE'PdD@9c$%aTFh3J6@&ZB@GPFJa0C@je)%e
KEJ!!#G3!#!!%)#hq6'F%)%"1N!#Tp#a08fhri$Ym!!,rhN*YrpK#VIj-3Uhq8%+
YrP4#VIjB3QhqL%*YrST3lIk-81hqM9(YrSj4lIk2-$`(d%kk!#!J8#Y)rNK1G8K
k!"!r2!!"UHY1G8Kk!!CJmJ!!!!eCMbmm6&03)$m!UD!JAb!)6R8LAb!IS%`ZJ%j
aF!![#6(!!L"1GA!!B2BLAb!IS4iZL%lkrqSLAb"IS"p1q[rJ)PmJ(k%L,SK1q[r
8)PmJAk!M6[VrbL*I)&qJ*5k!DJC#PdlkrlT1q[qd)PmJAk!T6[VrV#*I)&qJ+Nl
krk)L(b!I)PmJAk!Z)N&1q[q56PErcN(ZrmiKEJ!1!")aEJ!-!"C#+!!D3LJ!'d+
S!"bJ!#*Z!!JbU!!B28!!%NjH)&rHr!!+6Y"19[r13HlrcM&Z!!J!'+!"28!!#Nj
H)&p8Mdl38F&J!P$"6PErcN(ZrmiKEJ!)!#!aEJ!3!"JLEJ!-)9%!*%*S!#a#U!!
Z5J&Q"+!#B!+J!ce!!")LEJ!-)UJ!+%jH)PrHr!!+6Y&19[r!3Hlr`#&Z!!S!%M&
Z!!J!&U!928!!$NjH)PpFMdl46PErcN(ZrmiaEJ!-!"LJ%6e!!!iLEJ!))UJ!(%j
H)PpFMdl45RJ#MQXN)&m`(bm)6PEri%(Zrq!aI2rm!"JaI!!#!"Sa3!!FSJ41ANj
e)&m`(bm)$$N!r`"!!!PR*%$R!(`$!")j!1rrrJ*"!2J#3!!(%F!#B)*!%m%!lrr
q4Yp1G3*!!!F4`!*JidJ513$mhB%#!3$aJJ!6`3$mhB&1G5"I)Pp#'4+i!Q"1d#"
i#ZL`q!S'CKj`1U-LCJ!!dU!T)FJ+k#*3)hJ$2!!d3rS"!L(*!c`L8%TT!""[IL)
[!!4VFP$T!$Nb+3!b*!K)jf!!UH&-h`!'5N"Q!!#8F!!'33!--!'J*'B!!)DJ+5(
)#ZJL8#"i!RSK53!))8N!$#"#)&!3+!!iJ5N!1#"#S#-c33!b#+N!!!!iC`K#D3!
36VS!R&(T!$R5`A!-NX""l`!%S#jJ2M!S!""ZqL"*-A`!1J!b)@m!#!!N)@m!$!!
J-Acrr!!B)Lm!"'S%S!0J$L&"!"a$qJ"B)8N!$+3$5N"R!Q%))PrHr!!-6Y%JH!V
SX2J+"QF3)P!Kk3!d!cbJ)b(i#JB+k%je6PEri%(Zrq!aI2rm!"LL"N*i!S"KcNj
H6R9Kj#!i!ca[pL"!6Y")jq$!)(J+k#"35LJ!1@F'81J!1'"L-#J!-L)S!"aR$#*
"51H!J%k460m"!3a!!$TR4L*)3HJ!1L0B!"`M@!!N)eJ!)$0mrr`!'(*'N!""Ca)
b!%M!)NL5r!!-S#i'33!kB!*b1L"i#ZJJ8$&"!$*$q[q3!#&*!!bN!dcI!`G1G5*
I80FJH!VSX2J+"QF))&"+D!!3ApG%&dl4G!%JAcm#,`LYkR3%6[Vrp%j@rqa)j`-
B+'i!$#CZ!!Jq,!!@RQ`!%M!Yrek3!%G)`)(m!!)q!$`YrebFE!!8R'`!%!C'rqa
)aShm!!-'4J!8,``r"cm'3LHT'cG(!!)fKNcI'-"1AL"I8%p1d%0&6P4&8N4*6PB
!!+Rd6Pj1G8*268)J)#!J6PB!!#m0+RJ*"&92UA4+(fFD6VVqU"em!!%!#%)YrT8
r22rr3QFJ(k!bB!T96dkkrc!GA`!)+Pp1ANje4NP1590)48419[rL51F""#Ti#33
q,J!-28F!$Ja(rrpQ+#mZ!!J`,Ilk"N!!#cm!5'lrlNKZrqT)E[rLUBd[,[rU2c`
!!DPMB(B-4`!,A-!-4`!5Am(!!6)Yr[S'33!,[N&@`F!"CeJ[,J!)-#hqqJC!!!X
r!%KZrqj)E[rU5'lriUQ0,blrkN*RU@-`"`C!rr8l32lk2bhqqNkkr&)[,J!)2`G
)E[rZ5'lrkNKZrq+TM5mZrqSr2!!"U@0#EJ!160mJJ%jH)&pF6dl39Np-4NP-9%9
19J!!,`dUH!N%3Li!&#"Z!!``+!!1!N!)!%T!9X"%!"Y!rT8UAdjH)&p2l`!-6Y"
0@8C*6&4&8NkkqK"1Z[T86PB!!%(Yrm`[#+KZU4+SrUN`5'd!-UPlU&"1Z[e35'h
qq%kkr$)lEIlir[T+EIlkCJilI!!"r[Sr,Ilk6VVlR$Ym!$IqN!!lI!"NrT)VI%C
68d6qi&P22c`2S%+RF2m[!+Pm*Pm[#dKYrT!!6VVpcLm,U(0#CkL(2c`!$+L+3Lh
qP5mYrT!!5(S!K%+R2c`!!8KYrZ")E3!k5'hqPMmm$k")E3"#6VVpN!"+,Ik@CcC
C6dKYrU!r,IkF6VS!L#KI)!aR)Lm-3UG1ZJ+XUE496dkkrH*+(fId%#hqP9-!Cq3
[$%kk!$S3,Ik@8`"RNMmYr[K1Z[VU6VVmH+Rd6Pj1Z[N#6Pj1G9"-39P66e91$N0
SEfpcC5"K)(0[G@jN%Nj@!!!JEJ!),bJ!#%kkqB`[,J!)6VVjENjH,Tp1G84*8e"
28d966PEphNMR!aJJEJ!+3qlqm(!r)YK4b2rmQFa96dKZr[!r,J!)5'lqlNkkqBa
+AfB!!AT96cmZrZj)E[lS6VVk1%TICJ!"CNUZrZK[!!&H@8p`$#m!6VVir#KI@8m
[,[lS6VVj"LPI!!K96cki!L"+AeI!)Ja@`F!"C`!"(&922blqlNKZrZJJE!!),a"
1Z[Pm5PpQ!!$X98mr,[lZ6VVj8$iI98p"l[hH,`Jr,J!)6VVjT$iI98p)E[l`UCF
m(`a'rrpR!!#U@8m[2'PZCQmr2!#!UD!QAe92UDp+AeI!)JY@`F!"Cd![%bm-F!3
[!%kkq,B-E!!"!!*G`!aX!!3!!Pl"J!&R"MPm!!%!!Ja8!%aG`!a8!`"H`B!"C`3
i[!%!,`ZTSf!m@8m[2%P14Nmr2!2SUD!QAe92UDp+AeI!)JY@`F!"Ca)J8cPS!"i
!!MLm!3![#kQMB!SjI!!"!!)i[!%!+@lqk!!%2`DTQQ!m1A`!!3!#1,`"!#PZrZJ
!"'!U,`a1Z[j@98mr,[lZ6VViB$iIQFaJ&#m-6VVq3&922blqlNkkq%Sq(jR-,8`
!$NcI'-"1AL"IA%p1d%a238466e916PErl#m-@8p`$#m!6VVhJLKI@8m[2(GKGQ8
r,J!)UD!TA`!),b`!#+Q598qTVdTICL!JE!!),a![$(!),`"1Z[HN@8m[,!!)6VV
hFLPI!!4J##m-6VVh4TR-,8`!#LKI6PiJAe426Y"-6d&%8dp96Nj@rqa)j`!B+'i
!$#mX!!K1Z[G1)'`!##C33P0C6cm8-#`!!Z&!2`#SD5GI!!)JE!!),a![,!!%,bi
!#%kkq,)[,!!)6VVh*%cI'!"1AL"I8%p1d&"-39P66e91!!!!1!!!!%J!!!'i!!!
!+!!!!#!!3%lY!#T1F3Ak2c`!!DR`"+!r2!!"UI!%pMmm!!'Tm!A#2c`!!DR`!!!
!%J!!3!!!#!!!!!3!#41)!!!!!!!!!!S!J!!3!!!!"!!!!!!",J!4!!!!!!#+!8m
!R!'I"!42F'9Z!!!!!!!!!MX!8!*0"!C)D@4NC@i!!!!!!+-"6`#e!Cm%"N0KEQ0
PE!!!!!!!*J%k!$S"VB!!!!!!!!"%!8m!9J'I"!9&DQ9MG!!!!!!!!&d"6`"[!Cm
%"84bDACP!!!!!!!!*`!-!,N"+!!!!!!!!!!R!5F!Z3%i!!!!!!!!!(`"6!"p!D5
!!!!!!!!!!!)8!'8#G)J!!!!!!!$!!'8!d`#IL!C@EfaeE@8!!!!!!0-!%!$R!$-
'!6%!!!!!!!$6!$8!j`"B"J%b`!!!!!!!d`"D!1F!I3B"-`-!!!!!!0-!I`$R!+)
'!63$!!!!!!$6!+3!j`$("J%e!`!!!!!!d`$*!1F!l!B"0J-!!!!!!0-!lJ$R!4%
'!6FN!!!!&3!'rrS!qJ(!!!%!!!!!!!!!!!qJ!!!!!3!!!!b$!!!,J`!!!)i!0hT
N#f3!!!!F!)i!"%024%8!!3!U6&03)!!!!%*659T&!!!!6N4*9%`!!!"D4%a24`!
!!'B!!Irr0!!!!!!hj#!!!2rr)!!*f!!!!!!(d2rr&!!+&!!hj#6rrrrr!!!++J!
hj"J2S2rr)!!+1!!hj"`2S2rr)!!,DJ!hj"6m5`:
---