[net.sources.mac] Data Fork -> Resource Program

baron@runx.OZ (Jason Haines) (10/30/86)

The following is D2R, a program which converts the Data Fork of a file
to a resource. You set the Resource Type, the Resource ID, and the Resource
Name, and Voila! - you can write the resource out to a file.

I wrote this after all the articles posted regarding the conversion of the
data fork of a file to a resource. It was suggested that 'Rez' be used.
Since 'Rez' is not widely available, I thought "Why not write a program to
do it?".

The LightspeedC source is available upon request.

/* Jason Haines            ACSnet: baron@runx
 * Sydney, Australia       CSNET:  baron@runx.oz
 *                         ARPA:   baron%runx.oz@seismo.css.gov
 * UUCP:
 *   {enea,hplabs,mcvax,prlb2,seismo,ubc-vision,ukc}!munnari!runx.oz!baron
 */

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

:!d3b8J""8&"-4$*5)#!!N!FZNi)X!*!%!3#3!baD!!!V@J!!!MNTPJ#3"!%#rrm
%!#VS!*!&J2rr!!!V(J!#ShS!J30%-P)#!*!$39"36%3b8L!K!!#@!3!#KJ!!"$F
!N!C"8&"-4$*5)#%!!*B"!!+''&N!N!JUX!#3"*`fN!"E!*!',T0QE`Y6Bh*[E'`
J9'9iG!K(CA3J5@jQE`+Tm![f2c`!!UR`$a!r2!!#UI!2-Mmm!!+Tm!!!!ce%-P)
J-5i`$8pMG'pLCA)J-c!X)$%j1$B09h*TG(4PEL"LH5"+BA0[EL")B@PZCA-02C!
5$3e8D'Pc)("b!*!$#!%@!2J$G!!%!*!$&J!!"%p`C@i!N!-$8R9Z!!"%394"!*!
*XJ#3"%&38%`!N!4'D@jNCA)!!"9&FR*[FL!Y)%peG#"[CL"0C@e[FRN!N!B94A*
bEh)J,5"2GA3JEfBJ6@9YEh*j!*!'&8&Z)'9bFQpb)'KKFb"[Bf0eFQ9N)3#3$#*
$Eh9XC'iRG#"bC@e[GQ8JCAKTFh4TEQFJFQ9cEh9bBf8K!"4AFQPdC5"bCA0[GA*
MC5"TER4[b3!)9@jdDA4XC@3!N!-CcS"4!!G19[lm$'i!!3!)CJ!!(%KZrra)E[l
m6VS*VP#25N"Q!!!)F!&J!!!Z6VS)TJaZ!!%!#'B!!"j9Md+R2blrr%kk!qi`(d*
R5'lqr%kk"PCJ!!!%UI41ANje69P&@%P8)*!$E`!)2c`!!DRZ)'m!"##!6[S!%#"
[!!3J,`!)2c`!!+RZ)&p36dl3)'m!"%2S!!&`!")3%-!3!@EiNFNJ#"-!)!P1G5"
[!!4`!"!3B!33k!!"8FMrqN)3)#m!"%jeS#a1qJ(3)PmJAk"A6[S"a#*I)%qJ'Gl
m!!j1qJ'f)PmJAk!Y6[S"V%Si!SjU+L"i!6"$q!%8)!L3!*&d$,##C4BL85()!43
LJ%)4)RJ#UL+))),4U3!-6R@JBdjeS$C1qJ&dS4S[5!!%6[S"DL*I)&qJ'dlk!9i
[H!+Q!!41qJ&F,hJ#UJ!%6[S"8L*I)"qK)Lk)6[S"2L*I)&qJ)dlk!63LAb"IS#8
ZJ'S'3TG1qJ%N6[S"(L*I)"mJAk!N6[S"&#*I)&qK*Lk)6[S"##*I)&qK+#k)6[S
!qL*I)"mJAk!R6[S!m#*I)"qK(Lk)6[S!j#*I)&qJ(dlk!0SLAb"IS#%ZJ'S'3TG
1qJ$+6[S!a#*I)"mJAk!J6[S!ZL*I)&qK5#k)6[S!VU!F,d!!"%lk!+`LAk%G)JJ
JAb#",S"1qJ#5)PmJ(k"-,S"1qJ#')PmJ(k"!6[S!IL*I)"qJ68lk!(3LAb"IS#Y
1qJ"U)PmJAk!T6[S!B#*I)&qJ+Nlk!&BLAb"IS%P1qJ"-)PmJAk"+6[S!3L*I)&q
J5dlk!$J[H!-S!!41G5)I)"mLAb"IS#iL38lk!#![H!%)!!41qJ!H2hJ#)!!%6R8
[H!%`!!41qJ!-F!![#6(!!L"1GA!!B2Cd!5"I2`)[#+hUG!01q[rdG!*1q[rZG!4
1q[rS)PmJ(bm*S$*1G5pi![!!"%je,hJ#p!!%6R919J!!)'i!%#*Z!!a`!"!B5%!
3'8SZ!!KR$NSZ!!TR"+3mB"#J2'!-5Li!#QF%SMaJ!U)m#J!!!4e!!"41AL"Ihr`
!N!--6Y!LAa)I)&p`!"!B,`P+!@F%S&4J!U*86R919J!!@8m[2&088L-r,J!+UD!
LEJ!-3K%J(fFJ)%!J8$!B-Li!#,*!EK*`!&0"C`B3'0(!B2B3%&*!S#j1AL"I8)p
1d&("B!*3`8j@rmj"l[r1)@i!#!!J-@i!%!!B)Qi!$#&4!#4#D!!X3UJ!,NS"CJ5
J!Q!#S!-p3!!5)Qi!$#+S!#K1AL*Ihr`!N!-+6Y&19[r!3Hlr`#&Z!"!!%M&Z!"3
!&N*S!"bJ"ce!!"BLEJ!--UJ!&L!S!$$JJ1+!`1J!2Z1!iB!LEJ!))S"1AL*Ihr`
!N!-16Y&19[r!3Hlr`#&Z!!`!%U!828!!%#*Z!!JbU!!@6PiLAe#26Y&19[r!3Hl
r`#&Z!!S!%M&Z!!J!&U!928!!$NjH)PpFMdl46PEr`%(Zrm!aEJ!)!"BKEJ!+!"+
J%ce!!!j1AL*IA)p1d8j@rl""l[q`)@i!%J!5-@i!%!!@3LJ!'U!)5N"Q&N*S!"b
J$#!)3qJ!)#,Z!!JLVJ!-S!dp3!!@6PiLAprm!*!$$Nl46PErcN(ZrmiKEJ!1!")
aEJ!-!"C#+!!D3LJ!'d+S!"bJ!#*Z!!JbU!!B28!!%NjH)&rIr!#3!`T1d%j@rmj
"l[r1-@i!$!!BS"Jp3!!1)Qi!##+S!#j1AL*IA)p1d8j@rmj"l[r1-@i!$J!B-@i
!$!!X)@i!#!!ZS%3p3!!36PiLAe#26Y&19[r13HlrcM&Z!!`!'+!428!!$L*Z!!J
LU!!F6PiLAeb26Y&19[r13HlrcM&Z!!`!'#&Z!!J!(+!528!!$NjH)PpFMdl46PE
rcN(ZrmiaEJ!)!"LJ!6e!!!T1AL"I9)p1d%j@rl""l[q`)@i!$J!5-@i!$!!@3LJ
!'N*S!"bJ$$e!!"*"k!!J)Qi!#$!m!"#J,NjH)PrIr!#3!`T1d8j@rl""l[q`)@i
!$J!5-@i!$!!@3LJ!'N*S!"bJ$%2S!#!JEJ!)-$`!%+!Z3HlrX+!028!!%NjH)Pr
Ir!#3!`T1d8j@rmj"l[r1)@i!$J!5-@i!$!!@3LJ!'L&Z!!J!(+!,28!!%NjH)Pr
Ir!#3!`T1d8j@rmj"l[r1)@i!#J!5-@i!#!!@3LJ!'U!*28!!$NjH)PpFMdl4)Pm
`(bm*S8B[5!!%6R8LAc!I)&m[#D"(6R8J(b*I)&m[!+!l)S"1G5"I-"qTbDRr3Hm
!"+Rb3Hm!"+Rc6PErpPQ22c`"!+R!)"mY32rk,blrqNkkqf)[,[rkU6a`!6e!rrj
J!!!S-#lrrNM!jB""lIf+dF"CMcmZrriY52rfU8NJ(b"ZrrBJJ&*Zrri-EJ!$rrj
[!2r5,bhpMNKj4&*@8UP0F!%p32rqB!!!'M!Zrrj)`1@!3HhpLY(!,a"#CkNe8Ql
rrJaZ!!2rrQm!rq![,[rk6VVkl#mZrrT1Z[S'U6G1ANje6891990&9&919J!!6VV
r5PQ25(P849K82c`"!+QJ)"mV32kH6Pj1G90&9&93)*!$6PErr%MR!"JSEJ!)*Qi
!$#e-rra"e&+-3p05La#4CJ$rp#!Zrra-haJ!6Pj1G9088N03@5!J6PErM(!"28$
rM+K35Ui!#'B!!!K`rce!ria)E[qb2c`!8Mmm!%HSJ#mZrl*)H3#3"%+R2blrM%K
Z!!K#TdKZrlC1Z[UX5LlrYQF!!$49McmZrla)E[q85'lrNNKZrij1Z[ZN-"p)E[r
!,bi!$%kkreT3Mb"Z!"!`V[qmB!!!##"Z!!a#%"!ZrlC)J%jH6R9(494'58a&)%j
@rikS8%KZrl)r2!"S2c`!6kL!,blrXLmZ!!J[,J!-3UG)E[qf6VVk)%SZrlCR!!!
d9Bmr,[qm5'lrP%KZrj*)E[q16VVl+$!I5'lr`#mZ!""1Z[lH8)mJEJ!8-+lr['!
!!!JJEJ!33K!3,[qf5)"1ANje8&984NP-45"19[rmB!!!##mZrrbT&PQ2U53J(be
!rra+J'B!rqa1ANje38a-9dP13da19[rm51F!'#KZ!!JQEJ!-,8crr%(88Sa$de+
,%*&Q!2rd)#lrr%cI'!"1ANje8e453e"C)#"19[lD,bi!#$mm!!&)E[rq5'lrqNK
Zrr+TMA!!%#hl2%T!CJ!!$%(Yqh`J#'!!!!K"lIam)!JY32lZ,blrqNKZr[+TAP@
25'lqmLmZrZj#Cd*R6VVj6K!I5J"Q!!!L,blrqLmZrZkTAbmZ!!Jr2!!"2blrrLm
ZrrT)E[rbUBi`,J!-6PiJAdr[!!BqJ%l369P%6%G)6dp19[rBU&")E[rm2c`!8Mm
m!%ZSJ#mZrra)H3#3!`*#Tcmm!!&)H3#3!`4)E3"b5'hl-Nkkq,*+,IXbC`!!'#"
Z!!``VIXi5'hl2#mZ!!K1Z[lN8)m3,IXb5)"1ANje9&*"6P0'49*19[rL5'lriUL
B5'lrp+Kd,bi!#$mZ!!a#Td+R5'lrq+Q0,bi!#+Kc2c`!!cmm!!1SQdKZrrJr22r
m2ccrr+LT5'lrq$mm!"!r2!!3U,![,[rdU(0)E[rLU*P1ANje3Np-4%P848e19J!
!5LhpJ'F!!!J[,IemU9G1AL"I6qm!"Nl34&*"9e0$8Np19[rb,bi!#Mmm!!0)E[r
f5'lrmNKZrrLTM8SYrB"R!!!)5'lrq+LK)'hpKL"33qlrq&#))YJLf%KZrrJ[,If
'UG01AL"I6qm!"Nl34&*"9e4&@&419[rq-#hpJY"Z!!Jp32rq5QlrrQ`!!!C#E[r
q9Bm[,IemU@)`(l"ZrrjX!!!39Bm[,IemU@)`(ce!rri[,Iem2blrrUPM-#hpJT!
!E[rq)'hpKL"3`HJ!'$e!!!K#CcmZ!!J[,If'UGdlE[rqrB*1ANje4%p63e*26%a
19[rq@Bm[,J!+U9SJ(c"Z!!La`'B!!%S`,J!)6Ud!1J!8!"F!-J!)!"!!'!!NF2m
p32rqB!!!)(!"28$rrQ!!!"B`,If%4%!p32rqB!!!#$eYrB6rrMmZrrj1Z[mU9)p
1AL"I6qm!"Nl39&*"3dY63e*19[r`)'i!$!a3!!&Q!!##)'i!$#eS!!Vrr%KZrrb
SF9@2,bhpI#mZrrbTCM!I28$rqJaZ!)(rqQB!!#a9MbmYrA`[,[rm3UHTD$!I9Bm
[,IemU@!`(j!!EIf#2`"1Z[kf9)pJ!!#Q5QlrqQF!!*i`E[rk,bhpI#m)U9Y9Mbm
YrA`[,[rm5'd!HUPS-"pJ!!"m)'i!$!a3!!0Q!!"`)'i!$#!m!!$r!-#S!!,JL$e
!rrJ-EJ!NrrKR!!!-$'i!02riCJ!!5#mZ!"!r2!!"3UG#TdKZrr#TM8KZrr!r2!!
+2c`!#ULc5(J!$d+R6VVjUNKZrr!r2!!+2c`!#ULc)'i!#(!"-)"`rf!!!!4`!%j
H)&p2l`!-(S"1d&4&@&4'58a86PErh%+Zrpa)E[rmU(4CMcmZ!!K#TdKirrqTI#!
I,8$rq#mZrrJr2!!$5'lrp%KZrr")E[rSUBd[,[ri2c`!!cmZrr4)E3##5'lrk+Q
1,blrq+Kc2bi!$UL(2bi!%+L+5'lrk$mm!!3r2!!%U+PCMdKZrqK)E[rSUG)J(bY
!rBC+,J!6CJ!!$L"YrBBJ8($r-8!!5#"YrBBJ8#eS!$lri#"YrBBJ8#&Z!!S!2Lm
YrBDTd$!Zrqb3!'lrk#"YrBBJ8%M!JHJ!'$e!rq3JEIf')&!`+!"HN!"Zrq3p32r
Q5QlrjPl!4!")J"Y!rB![,[ri2c`!!NKZrr4)E[r`5'lrk+Q0,blrq$mm!!)r,[r
d5'd!LNKZrqLTMNSYrB"R!!"-@Bm[,[ri5'lrk%Kj!*!$#N*R3QG#Cd*R2c`!%%+
RU93J(bY!rA`[,Iem2blrjUPP-'lrj#!)JI`!!MY!rB4#EIf#3Hd!NLe)rp`[,[r
iU48r2!!",blrq%kkqjjFMbmZrpa)E[rfUC%JEIf')&!KE[rJ!$i[,If'UFe+,If
!C`!!##mYrAbT95mZrrbSFbmZrrLTJdjH6R9849K84%a24dj@!!![,IkH6VVc5Mm
m!!%r2!!*2c`!!bmYrTir2!%!6VVq)%r[!!`[,IkH6VVc-%jH6R90@8&#6e98)%j
@!!")H3#3!`a)H!,J6VVjfP#2UI41ANje3e*"8dK639C19[kf51F$!%KYqbkSEUM
qU4+T-+R-5'd!QUPlU&!r22rr3QG1Z[0J3Hlrm%2YqVSJf5$C@Bmr2!!%UENJ(b"
!)&"$lIkUF"!Lf&()rra)EIkUU&&1Z[I@3Hlrf%2Zrr!Jf5$C5'hk`UK4UE49Mcm
mrrp)E[r!UA!3(dS!C`$rl$!Zrm"1V3!k!!%!#2rH!"$rfJ$!rpB![2r5rp$rcP@
2,blrbNKZrp#T,$!I6Ud!1J!"!!B!RJ!-!#3!K!!Z!*3!2&Q2,blrbUNp)"p)E[r
!,`"1ZJ#b8)pJ!!"i5'lr`#mZrp#TXf!!!'S[,[r3,blrbNKZrpLT*@!!!&K9Mbm
Zrp![,[r+U4i3(dS!C`!!4#mZrp#T&JJZ!!2rcQB!!!aJ!!!`,blrd+N@@BqT*#!
I,8$rd%U!CJ$rl'!!!"CCMkNN)"q`V[r3C`!!##mZrp#T(`JZ!!$rcQF!ra"CMa!
Zrm9)J$m!U6iJ(bm!6VS!'&L2B!$qpNcI!-"1ANje68&*6L#3"%j@rmT9MbmZ!!L
SDM!I28$re&@2,bi!#+KV-"mp32r5-#lre%kY!$S!!3!$!4)!"J"i!0i-EJ!"rp*
Q!!"%)'i!$!JS!!-!$QF!!"JJEJ!-##J!N!-1C`!!#NkkrF"J!!$H)'i!$!JS!!-
!$QF!!!T1Z[fUB!!!b%kkrD*J!!$!5'lrcUKd,bhpMMmZrp*)E[rBU8C9MdKZrpL
TYM!I,blrcUKcB!!!Q$!Zrp*1V3!k!!%!"J#+!!`!%J!d!))!1!"%6VS%KQ!!!(C
)EIrm5'hrqNKYrrC)EIlf,bhqSNkk!'j2l`!81d$rrQ!!!&*1ZJB5B!!!5Mmm!!&
1ZZj-9)pJ!!!m3QG1ZZj!9)pJ!!!`9Bm`,[r58d!r!+R#%"p+!'B!!"``,[r56Ud
!1J!"!!B!$J!-!!S!#!!'!!3!!N*RU6K1ANje4%p$6de038j19[hU@Bmr2!%"3UG
)H2rrUA`J(bY!rCS[,IfD2c`!"%KZrra)E[ri5'lrm+Q0,blrq#mZ!!bTMbmYrCS
r2!!%3QFr2(rrUAi[,IfD2c`!#%KZrra)E[ri5'lrm+Q0@Bm[,J!)6VVZmL!I,8$
pkLmZrHT)E[hZ6VVYpLmZrrK)E[hZUBm[,IfD2c`!%%KZrra)E[ri5'lrm+Q0)'i
!&$"3,`K)E[hZ6VVYaLmZrrK)E[hZUBm[,IfD2c`!"NKZrra)E[ri5'lrm+Q0,bi
!%%KZrZj1Z[BJ8)p)E[lZ6VVYT&L2,blrq%KZrZkTMdKZrZj1ZZfX@)m[,IfD2c`
!#8KZrra)E[ri5'lrm+Q0)'i!'("!`&![,[ri2`#TBbmYrCSr2!!+5'lrr%KZrrK
)E[r`UBdJEJ!BF#$!8#mZrrJr!+PM,bhpQMmm!!Y)E[rm5'lrq%KZrr#TM5"Z!"K
`%-"3,blrq$m!U@-[,IfD2c`!$%KZrra)E[ri5'lrm+Q0)'i!'(!)`&![,[ri2`#
TBbmYrCSr2!!05'lrr%KZrrK)E[r`UBdJEJ!BF!6!8#mZrrJr!+PM,bhpQUN9,bh
pQUNJ3UG)E[rqUC%-EJ!"rrjQ!!'B,bhpQMmm!!4)E[rm5'lrq%KZrr#TM5mZrrJ
[,J!-UC!!,bhpQMmm!!C)E[rm5'lrq%KZrr#TM5mZrrK)E[lZUC!!5'lqlNkkl)C
BMdKZrZi[,J!36VVdcP#25'lqlNkkl&*BMbmYrCSr2!!35'lrr%KZrrK)E[r`UBd
[,[ri5'lplUQ3!%KZrHj)E[hU6VVVr#"Z!"3`V[hX)'i!'%*3,bhpQMmm!!P)E[r
m5'lrq%KZrr#TM9@2,blrq+PJ-"p+3'F!!!`JEJ!B#1J!"J!",bhpQMmm!!T)E[r
m5'lrq%KZrr#TM9@2,blrq+PJ-"p+3'F!!!`JEJ!B#1J!"3!",bhpQMmm!!Y)E[r
m5'lrq%KZrr#TM9@2,blrq+PJ-"p+3'F!!!`JEJ!B#1J!"!!",bhpQMmm!!a)E[r
m5'lrq%KZrr#TM9@2,blrq+PJ-"p+3'F!!!`JEJ!B#1J!!`!",bhpQMmm!!e)E[r
m5'lrq%KZrr#TM9@2,blrq+PJ-"p+3'F!!!`JEJ!B#1J!!J!"F!%G32r[B!!!J!a
Z!!,rrQB!!""`!)"YrriG32r[B!!!D!aZ!!RrrQF!!#S-EJ!+rrjR!!!J$'i!#rr
qC`!!&JaZ!!crrQF!!!`-EJ!0rrjQ!2i3,bhpQMmZrrj)E[rm5'lrq%KZrr#TM9@
2,blrq+PJ-"p+3&I!4!")J#mZrrJr!+PMB!$ph#mYrCUT&K!Zrqp1ANje4$*54d9
858j19[l%5'lqc%KZrXj#TdkkmDT2l`!-5N"R!!#k@Bm[,IkL6VVV1#!I5S"R!!!
+,bhqSNkkkaj9MdKZrXir,[l-5'lqbNkklQi`(ce!rX49McmZrXT)EIlb6VVZi$!
I@Bm[,Ilb6VVUi#!I+d$qSNUYrU*Q!!!52c`!!8kk!Sa8Mh!!B!!!8#mYrU*1ZZZ
D9Bmr,[l+5'hqmL"YrU)[%%kkl03`(ce!rXJ[,IkL6VVVJP@22blqbNkklXJ`(ce
!rX3[,If52c`!!UNj,bhpNMmm!!1T18jH6R928%91)*!%6PEql(!"(8$ql9@2UC3
`(ce!rrir,J!)UCJYEJ!+r[*9MbmZr[+TR$!I28$rr%*RUCXpE[rmrZjJ!!#'@Bm
[,[lb2blqlUQG)"mY32ri9Bm[,[riUD3`(l"Z!!KQ!!"H,blrq%KZrrC)E[lb5'l
qpUQS-#lrpV"Z!!jQ!!"!9Bm[,[riUDB`(`*!!!!p32l`,blrq$mZr[#TTbmZrrL
TV9@2UDm`(dT!C`!!%N)ZrZe)H3#3!fj1ZJ(i@)p6E[lZ5QlqlQi!rhB3,[lY6Pj
1G80-6d*#49*56PEqjNTYrrjQ!!!L5'hrr%KYrrT)EIrf5'hqpLmYrU*1Z[SU6qm
!&$Y!rrj+EIrqC`!"%NKZr[j)E[m!5(N!N!1S5(N!N!156VV`8%r[!""+3'F!!2"
9Md+R5'lqqNkkkr!`(e@23UFr,[lq6VVX"M!I9Bp)E[m!UCF`(ce!r[J-E[rrr[K
Q!!!b9Bp)E[m!2blqrNKj4$*5)%Kj4%&838kkl"B`(dKZr`#TX9@25'lr!+QA-"m
p32li,bhqSUQU2bhrqLmYrrBr,[li6VVq@P#25J"R!!"Z,bhqSLmYrrBr,Irk5'h
qpUQV9Bm[,IkLUDB`(i"Yrr`l32rm,bhqSMmYrrbTTbmYrU*1ZZQ!,bhqSUQ`,bh
qSNkkk@J[,IkLUC)r,[liUCT9Md+R2blqrNkkkf3`(e@23UFr,[lk6VVV0$!I6Pj
1G9G5594&)*!$6PErrM!Z!!K1V3!k!*!$!3"#!!3!)%Kj!*!$&%Kj!*!$+NKj!*!
$,%Kj!*!$,UQ,B!!!1NKj!*!$-%Kj!*!$4NKj!*!$5%Kj!*!$5UQ,B!!!(%Kj!*!
$6%Kj!*!$BNKj!*!$C%Kj!*!$CUQ,9Bmr2!%#3UHTK6!I28$rrNjH6R90@8958Np
5)%j@rri[,J!)5(N!N!0S5(N!N!0U5(N!N!0XUBY9Mcmm!3*#TkQ&-"mp32rq6Pj
1G8958Np538a&!*!$,JmE$N8AQ4Ip'!-C*aNY'6-C14P&'8XC84PA'@-CD4P['A8
CS4QR'Dd(l`RP#I%!!!2S!*!$#J#3"k*#H!T+RFiX2&088P01ZJ-Z3IVrjL#-6VS
!R%kk!Tj#CdKj!!$rrdK[!!4)9cmm!!%L1[r+6V83!%lk!(4)jrri2Lm!2#!m!!#
!!+"!82J+APQ2,ca$6d4&2`HTS#!ICcBJ3#43##S!N!-"Cb!!%!$!#")!"fF@@Bm
[2%0548`r"kQJ)"pR%#"!6VS!GJ*5Irj-harr6R9`$kR*,`K1ZJ*-)&qTmLm)6VS
#3L"IUI01ZJ)kUI4CMbmm@N956d*RUD!N9eQ2,ca%394"3QHTS#"A)&!LH!N)*&*
J$M,BCJSb'Q!#3KP4bIrmZmPQlUQMUD0CMbmm4&*&6%*RUD!JAb40S#8[##"3iN"
J%L30-KJ)J3!!C`3N1[lLeE)3!&()rqbTSdje)&mb'$3BX&KAbIrk5N*RrNl`)2`
JAc)B0"L`Q&I*rrT+3QIq6[!JqL"I-KJd',"#EJU3!%&Y"Y"!3I!!!M!3Crj1m!!
!)#m!"#p"!!3L,`!),em!"%MR2!!N!#B"5%,%`bJ!+J&)4FM&e%4)3T!$`-(3JNc
I!$`L(dje)#m!"#p"!!3L,`!),em!"%MR-3"1ZJ#F60m!M#)I6R8J,`!%,d%!"#)
[!!J[A`!%51Fa!%kk!(`J!8cI!)`L(dje)#m!"#p"!!3L,`!),em!"%MR-3"1ZJ!
X60m!M#)I6R8J,`!%,d%!"#)[!!J[A`!%51Fa!%kk!!`J!8cI!)`L(dje5S"U(%U
"DJa%J%5"6VS!)%5"6R9%J%kk!"C%J%5"6R9+J@S+4)&1ZJ!'4)"1G5im!!$rrl+
!B`BL!(!!6R@`Kf)-J-&)3$)!3N")3%jeXSGL'Li!3N")3)$"5%")4ci!5%H1`6!
(5%Fb"dje*!!Q!H+)iSQbKf,iJ-(!Kc)$`X!Z!dK(cX")4p+(C3L5JQ)%4)&1G90
!B13b2+R`3rVpI%kk!%Sb2+Rb3rVpcNkk!$ib2+Rc3rVpc%kk!$)b2+Rd3rVpbNl
k!#C1ZJ$J-MbTm%kk!$Bb2+Rb6VS!,M)mUI01ZJ!Q-MbTp%lk!"i`!D&'*%K`$+8
H-!'J4c$m6VNJb6$m6[NJbNje-!'K4L*S!!LJ(c!")%QJ4dje3MJ+APQ2,`C#CkQ
J*PpCMbm,UD8Q(b",+!-q2!#"B")'K!!!IrjCMbm'2`G54kQJ)&p9Mbm)UDB`(`J
!!!9Qi&$i#PiJ"+%H+%J[#kQL)%XJ!cS(2M`!JCT(B"*CMbm'2`G54kQJ)&mJ2!!
!Iri[##"3)NcC`+!ZUD04cIrJQF41G3#3"%(krrSJV`!%6R9"q[r`)""Q!Nje3T!
!)%"1d!#3!jJ!N!1S!!!&R!#3!iJ!N!-J!!Jr2!!"UI!",$mm!!'Tm!&!2c`!!DR
`!93r2!!"UI!"F$mm!!'Tm!'Q2c`!!DR`!FBr2!!"UI!"k$mm!!'Tm!))2c`!!DR
`!mSr2!!"UI!*-$mm!!+Tm!Z%2c`!!UR`#VBr2!!#UI!+NMmm!!+Tm![f2c`!!UR
`$a!r2!!#UI!2-Mmm!!+Tm!!!!cY%-P)J-5i`$8pMG'pLCA)J-c!X)$%j1$B09h*
TG(4PEL"LH5"+BA0[EL")B@PZCA-02C!5$3e8D'Pc)("bEfGbB@dJB@aXEhGc)(4
SC5"eFf9b)(4[)'0[ERCPFR3JG'KP)%4KG'%J4QpbDb"[CL"K)'CTE'8JG'mJB5"
bCA0[GA*MC5i09'KTFb"`FQpRFQ&Y)'Pc)'4PC'PMBA4PC#"dEb"dD'pcC5"ZEh3
JCQpbG(9ZBA4P)'9ZEh9RD#"dEb"SBACP)%e39bi0$9GSD@aP)(4SDA-JF(*[Ch*
KE5"TFb"16e3J8(9LE'PM)%4[E@&TEL`JH@pe)'eKH5"eFf8JEh)JC'PcG(*TBR9
dC5"TG#"QFQ9P)'C[FL"16diYBfpYE@9bBfPKE#"`GA*`Eh0PFbiJ)&9ZC'9b)%j
2)'0TFQ0eEA0dB@jMCA-JBf&Z)(P[G5"cC@aX)(4SDA-JF(*[Ch*KE5`JEh)JGA0
P)'Pd)(4[)("bEfe[G'8JG'KP)(0KE'9c)'pQ)'&ZH5"`FQpNG@0d,Jd09'KTFb"
`FQpRFQ&Y)'Pc)'0[F(PbD@GSG##T-6Ni0L"LH5"+BA0[EL")B@PZCA-Z$90PEQ3
JBR9R)(*PF'pbG(-JB@jN)'0[E@ePER4c)(4[)(4SC5"KGA4SEh)J1Jd05Q&cEfi
J5'&TEQ9c$@-[Eb"%CA"d,L"[CL"3FhPMD'pXEfGj$99ZDACPFR0TG(NJEfBJ8hP
NEQ9j$8iZ8bjA,L`J-M!`0Je"GA0dFQ&XD@%0$89XC@0dFQpZD@-JB@4NFQ9cFf9
c)'&bC6S02C!6$3e"3e0ZCA3k)'*KFQpZ3(*eERJ03e01493k)#"LBA*[EN"bG@j
i,Qpk$8&58%%k)*!$BQ&bEfiPFR9ZH#j[HN"cC@PcE@mZBh0c,QG[GJe+38j&9$S
J)(*eERJZEhSKBQ&bEfj!G@YM$9993e!k$AYPEQ9K,'K`E'&LFbaYBhCKH#a`FQa
L-LacC@PcE@mXG@*M,ACTFfP[ELaeDf0p)@eeEQjKFQNKFR9ZH#j[HL&LBA*[EJd
0!!!$283b8L!a,M!06f0dEf*PFL!c-#`J-6Ni0JeAFQPdG'9Z)'*j)%TKFfpZ)%K
KD@jPF`dpN")0$94SDA-JF(*[Ch*KE5"KE'a[Gh-JG'KP)(9cCA)JG'mJBfpZGQ9
bG#"dD'8J4'&dB5"'Eh*V)'pQ)'%JCQPXC5"dEb"K)(*PFfpeFQ0P,Je8D'Pc)("
bEfGbB@dJDA-JC'9ND@0KG'9N)(4[)(4SEh0P)'j[G#"QEh*dG@jKG'8JC@j[G@G
S)(4[)'KKGQ8J69"A,Jd09fKTE'8JG'KTFb"`FQpRFQ&Y)'Pc)%j29#"3G@*XD@-
J4'pYB@PZ,#"jEh8JE@&j)(9cC5"[FL"NDA0dFQPLGA4P)'Pd)'CbC@8JCQpb)%j
26LeMEfeYCA*MD@&X)("eFR"[Ff9c,L!J9@jNCA)J6NmJBfPbBh9YFh4KEQ0PFb"
MB@iJH@pe)(0PE'`JG'KTFb"`FQpRFQ&Y,#"[FL"eFf8JDA3JG'mJF(*[E@pdC5"
dD'8JFf&XCA-JEfBJB@jj)("bEf4eBh3Z$3e8D'Pc)("bEfGbB@dJDA-JBfp`HA*
TCfKd)#KM+6%j1$BJBRNJ5Q&cEfiJ5'&TEQ9c,Je6C@jN)'*eCb"bCA"[FR4c)'&
ZC#"MEfeYC@jdFb"dEb"dD'8JBA9dD'pb)$S0$8TKFfpZ)%KKD@jPF`eM,fmJ4'9
`G#iJEfBJ8(0jBfK[E'pRH3e9EQPfCA*cDA4j)'pQ)&0jC'jPH3e1,P-Z9biX)$)
`-$B03A9cG(*KE'PK$3e&E'9MG(*[EQPM)'&NC(*PFh0PFb"KFQ8k$6f3%`d0380
6EQ9d1L"LBA*[EN"bG@ji$8066N981L!JBQ&bEfj!FR9ZH#j[HJe"8P""1L#3!f*
KFQpZ*A*eERJZEhT!Ff9TFfe[,Q0cFbjREhB05N&1493k)#"bG@ji,Qpk)@*KFQp
Z3(9VB`e998031JelC@jPB5aSF'aKBR-XE@0fBAJXF(*XBM)XFf9TFfe[,(9LBbe
fDA0TEfiXG@YMI5&YG@jZBA*T)A*eERJZEhSKBQ&bEfi0$3#3!``!)3!8!&8"kJ%
#4%3!!!%!Iq!(rN!J"!*HS!3D3#!&QPHJ"B*!)!3#AU!%-N!J"E*GS3@#3#'%'PZ
[a0T!,q6#AUrd!N![j$*EVm3b3#'&JPfK"CT!)!3D@k!%!N!J"-*AS!6#3#!%!Rr
J"ri!N!4Lk-E'995SU&GFcXK99++SC95XTJ#3$2q3J!!!!3!2rri!#!!$!!J!-S!
)!%T!#B"+)!T!-K!+4J2i#BN!#!J*$!J)aK))#5!5#!NJ$!J)`B!)#!*!#!J#3!J
)!B!)#$!$#!K)")J)5!5)#$!$#!J!`!J)!5B)#!%T#!KJb3J)N!!'#!L4J!J)BN-
)#!*%L!J"K)J)!!-)#!!!#!rrrrJ2rri!$rrr!!rrri!2rrr!$rrri!rrrr!2rrr
i$rrrq!rrrrJ2rrri$rrrq!rrrrJ2rrri$rrrq!rrrrJ2rrri$rrrq!rrrrJ2rrr
i$rrrq!rrrrJ2rrri$rrrq!rrrrJ2rrri$rrrq!rrrrJ2rrri$rrrq!rrrrJ2rrr
i$rrrq!#3!aNB4$*5)#dJU6%j1$BJ5Q&cEfiJ5'&TEQ9c!*!$#!!$!3!"N!-#!*!
$#J#3!`3!N!-$!*!&5!!$!*!)rrrmH`4&C'Pd"&9ZC'm!@J!!!5d!N!3$3h9d!&J
!!!4$Eh"j!%-!!!93BA0dC3"@!!!&3faPBA)!N!Kh!!)!N!MrrrlM"%CTE'826'p
KC#"%BA4K)%C[FQ[*!%`!!"*6CA3J8Q9cEh9bBf8J5@jQEmN!53!!&eGbDA4P)(*
PFfpeFQ0P)(4[)'CTE'A*!&F!!!%Y!*!%#&&eDA3J9'r*!&3!!!44G@Pd!&%!N!B
Q!!%!N!MrN!2l!43+3@*[GA3J4$*5b3#3"!%Y!*!)&3!L!#S"-3(E!!%!N!J"!*!
&&3!m!&i!qJ'@!!%!N!J"!3#3"$)!!J#3"I%"2J%&!AS%!Np,!*!&#`'8!1B"T)!
#r`%!N!8,!!m!jJ'9J!)(!*!$!8i!%!#3"Cd!Q`#a!0F%!Np,!*!&R3$P!,%")33
'3f&ZBf9X!*!&#J!-!"S!2SJ&6Q&YC6TP!*!&#J")!"S"+a!!N!BI!!`!,`!qL!9
8@9"&1J#3"Km!5!![!*`3!*!')3$&!$%!jiJ&8fPkC6S!N!BK!1N!-3%RL!4cDAT
P!*!&E3!-!(d!HJ8,8hPcG'9Y)%KPBA!!N!D"!!`!N3"f"3P3GA*RC@&LE'8!N!C
Y!(X!I3$3"3C-Ef0VC@3!N!@"!(X!N3$3"3P3FQpdC@0dC@3!N!CY!0i!I3%c"3G
3FQ9XEf&N!*!'@3!-!'N!ESJ,3A4dFQPLGA4PFcS!N!CC!*!$8!%X!!*Zq`#3"63
!5!"%!*`3!*!'0!!-!%3!2SJ$583k!*!%-J!#!*!*0!(b!!+B-!#3"3S!5!!U!H!
)!Pi`!*!&#J!8!#S!0#!#!*!&*%3b8L!!N!-"4P*&4J!"!*!$J!!"!)&*3diM!!%
!N!1!!!%!J3#3!`G%394"!!%!N!3(39"36!#3"3%!N!-X@J!!+eS!!!)j!!+N!J(
B!*!$(!(U!""D49*2!*!$LN4"9%%!!3#@4&*&6!#3!kj69&*6!*!$ZN024%8!!J$
'3e*&6!#3!qT849K8!*!$pN&-8P3!!!%#5801)`!"!3j%-P)J!!!"*Ne#39)!!!%
b8dPD43!!!6j048j9!!)"5N4-6dF!!3&Z4%P86!!#!BC#6N4-!!!"UNC548B!!3'
f!!$rr`J!N!3#S`S!!2rr+!!!$!!#S`)!N!-2!!!LU`#3"[rr+!!!*J!#S`i!!2r
r#!!!+J!#Sa)!![rr+!!!i!!#Sai!!Irr(!!Dj!#3"[rr+!!Hd!#3"3,rrbJ!'V)
!!U-D!3#3"4pX!!+M"J%#rrm%!#AX!!+MEJ#!rrm!!#Am!!+MGJ#"rrm%!#F!N!I
rr`!!+!3!!U,q!3$rr`3!+#%!!U11!)$rr`!!+#d!!U,k!3)!&!3!+$X!!U2Q!3%
!'33!+)F!N!3"!!!H"!!T!J#3"!%!!#8%!#NX!!+MJJ%"!$%!!#P&!*!%!3!!1J3
!+9i!!U0U!3%!4J!!+C3!N!3"![rr"!!UjJ#3"B$rr`!!+a`!!U0k!)(rr`!!+d3
!!U2U!)$rr`!!+dm!N!313@*[GA3J4$*5)&4PH(3%G'9cG!4&C'Pd"%CTE'8'3@*
[GA6*#e0MFQpXE#"8CAKd#%GPG#"*EQC[#e0MFQpXE#"8CAKd#%GPG#"*EQC[SN):
----------------------------(FINI)------------------------------