e䩢  u`LLZV~Vu7^lөȅL!NSC BUF ǷLI Hӱʕh҅҅iҐL Ե`EXECUTWLBRANCKoeHȱeӅhLL#0BRANCdiҐL!(LOOPк PhL(+LOOPеHH}h}h"L(DOHHHH&L! /кHL)/>JкHL(CMOVEDe`LgCMOVY : eL!(U*~Ք֔666uu`U L!(U/ֵ *66&8Hh66`U/ L!AN(=5H5LO5RHLXOKhUHULSP`~HǩLSPvL!RPРL!;ӕhhL!LEAVŪкL!>ҺHHL!RhhL!0ȔL!0*L!AY+8HթըhLFAY#Fuu`D>ZuuuuL"S| FL!v +L!MINUӈ8L!DMINUӚ8LOVEҲHLDRO$SWAL!DU HLRO  HL+ 9 uuL"TOGGL2 Z UL"S->O l HLc | HLCv L! L"C L" HHiҘeL!CONSTANԿ HȱLVARIABL iHeLUSE eHeLDOES  HHȱiHiL- e 8PIȔL L$A0_ LFA0 L+1  L!1  L!2  L!2  L!S  R  TI  WIDT  LJWARNIN  FENC  D  VOC-LIN  BL#  I2  OU<  SCE  OFFSEO  CONTEXY  CURRENf  "STATt  $BASł  &DP̎  (FLę  *CSУ  ,R  .HLķ  0US  PRE  B/BU FIRS LIMIT SEC/BL B/SC  HL( L/ L  @ (F ȔL$ c     m  b  z  ~ z z  z c  & z         `GDz -  z  ---   0    D  < -P --fD D  j X  z  8 ` c  Z  fP P 0    X   T  A aV 2  .   z   f zB `m $  > Nt  |6L!8vvL! z|zz   -;      c  Z    Z  D L!  Y` `  1s {L"]R@ L W   Q uq   zB v }z [m}z dX#z KEPSU i@թ`Ц Vʕ{``Ǒȵ`LLL L L y  Z fmA ȑ  L!`      L! ^ 4 y    ?  ?   ?     '   z R  z  4 zǏ   z  z  D   mz ; z ;z & K 7    ;  Ҷ   ǀP  Ҷ   B    T      X > z z z z T # N2DJU7  (Hd<#d7 (Hd<#d^`ڧ/wX`.!bq`4p,V`eN_`"""'QQRG+((VS[+DF?DFFGG2 22#78)I'~"[~8,) 867l62LLb588`@988`K88`V988`a[`g~`m88`x88`88`88`[~`988`Р \L!Рb \L!8[~L" L$ 5L$e @L$  KL$ VL$! gL"- aL"9 L$C L" 029 ԭЭ L_ЭЭЭ"Эh@c d`m c@ԴL$ c@Ԡ/01Ԡ:/L"  @  <0  ǐ     J       P  %&% )3%L) L)"0) ") L)ʎ")L) A           `ML)     0u'  &         dddd     _Lw L)` L z 6 LILSw)I`V 6L^ L)_xIL)J!8JͿ  J!mJ0  J$8J   J"mJ0   L)    ,_x J ( J0 J0J $L)       /0129:9;6768345$%"#)*)+&'&(,-. !@p0` P@p0` P@p0` CP@p0` Pxxxyz${$)|)/}/4~499??DDIIOux{7 xQ[eoy T/D!%)  ALLALL}ཀྵi84䭉8kg8䨩` }ཡiᭉ8-e☝igg䈑`] H ̉ i L}  i  h` е ] L$ H Йh` е L"  `  ` е L$ е L$ H mgi㽝}佡i轝}潡igh`2!д L"B!གྷἳȱਊ `g! q⪽ཊȱ`!д g!L"!H Й h`!H Й h`!H Й h`! !L$! !L$! !L$!Hq h`" !L$" g! !  ] B!`6"е "L$D"q "`P"д D"L"`"$)  ] )  L)" B!L)"L)L)) )L") )L"ͯ g!L)  Bqz mz zz  Bz Bz i  Bz Bz  x@   Bz Bz e zz  Bz Bz  zzzz  Bz Bz #Щ:/Щ!oԦL! "A#{#z #  ) _ m N"   )zz z z z z 4"/  B$(((HTTH@44LXL\(4@7\\H    C  e z   d%zz <%*%r%zz F%*%%zz P%*%%zz Z%*%&gJmie5%<%F%P%Z%ey.%L!שL! %t& ͛``& t&L&I e͛ ``  ! &  &z   4"   4 ''I' !L,'Ѝ`/'K t& &I cL\'mIL\'Ln'' 'L|' !L' !L)AAAAAAAAA''L' '}''ݍ'&8''' L' ] ޕ'w`'' GL ( ] '}''ݏ' 8'''L9( ޕ'w`Q(' 'L_( '`b(w Q(L)q(w Q(L)(Iǹً'8'J'L('8J''ى'8''L('8''' ُ' g!'ُ''L('' Ǖ''w`)д (L$ p!)L!2)ʔe8.%<%F%L!Q)ʔe8.%P%Z%L!  O) z0 zzzz-!m z-!m -!z-zz -zz  z)qz z   )& )ǯ )zb  *  * "& )& n)     0)- *Ǜ 0)4 *)z & )& !& "& * w m' '  )  O)z0)ze ǰ*+o'' (L)!+ B!L)/+ D" !c)+ a 5 5`  )    ж ж `ж ж 4 *4& *  )a - D & w & !.'  & )w O+ w `& )q 4   D 4  & N"^& B$' ' & ) -  ($)O+, ,T  mq  +a D ,)1111@.1333333333U33344!4G4N4U4\4c4q4}4444j44444535C5\5r5555555 6 636F6Y6l666666Y!#%(*-/259<@DHLQU[`flry  nn#+28  >>BV /lZlpl/Q D. 8 `%. ) `5...`@..  )ȩ.Lu.  )ȩ.Lu.) 5. %.. %. )L.m- .-.`. .--.-9- -ҙ-`.`.--0- .`.--`..-.`.-- .--- ..-0--- .8-.%iJ---- .- .--`h/-.-- -ǘH .h .--`/-0-. ..`-񘝨-`/-,,-`/ /l/-ލ-Ș--`/ `8 `/H / ..-hm-8-i Y--.- .`/0 /--`;0--LI0-`L0H-.hL._0-1- /.---`ɀ-`-}-L.`0-H- /.---`ɀ-`- .- )LN0L0L.`0---`0--G-`1- /H)h-L1- /`"1ٓ-L&1-`51----`D1- _0 0 ;0`U1----- / / L0 / /-`1[--`1--`1.L1L1L11-----`1- h/--L1`1-hH- "1 1-h----------Ȉ`------- .-`N2 1- "1-- 51 U1 D1 1 51-L)  - - -b - b - b - b - - b  -  y24  2 Ҷ  Ҷ      Bz - 2  -Bz -Bz  D m- w3 /L/3-Lw3         xph`XPH@80(  14 0 3L/0<4 0 w3L/0G4L14N4 L14U4L14\4$L14c4 L14j4L14q4" 0L<4}4" 0 L<44 0L<44& 0(L<44& 0L<44L14,$`. ,! , . ,!  * *,* ., ** 2 < << 2 < < << < <<<<2 2 <8<8 < 22 2 222< < < < 2 0 2 2 002202222 22<08,08 ,2$4: 44:2 2 2 2 222 T2 2 2 2 2 2 2 .4.$4.$4.$4...".. Z2222 2 22 2 2 2 0.*, < *$0<.,* ,2<.0 ,.",**20 20,* . .0 .,*, . .,.* 2*2,*0. *222 2 22222"2$222222 222*`." , * . , *$`* .,*.,* .* ., *.,*. 222222 2  & .Bz   -  . ;7@-3B-3  z   {7 77 `7J`7Յ֥&א e؅Րֈ`RAST.DEF A ? ?<<<300030003000   ?<<<300030003000   ?<<<300030003000      7Bz {7P  {7  7Bz  7P  ;& 7U;P & 7Pf  Bo9B8z  9799(@K AALL   @ K  99999G99999999`      2:899) ":8թ8Ս*:9H)ը7:hm98)7:889:-::mǠ:&:Ȍ.:L:IJJ&:i.:`:%֬9 եI!L:L:AL: 8!ڄL:***)%9%օեI!Ձ`   Ȝ    ;;": 7ա؍;*: 7`;;9ح9 79JJeՐm9;m9;9ح9 79JJeՐm9Ǎ;m9;89.: ; ;89.:;;;":Jխ9)Ր; ; ; ;`;;": 7ա؍;*: 7լ9L(<AL(< 8!ڄL(<***)%9И`=<9ܢ;ح;٭;ڭ;ۭ;ٍ;: ; :&: ;: ; : ;e؅ح ;eم;eڅڭ;eۅЬ` 9 2: ;; =<`< Y@  @]ch|@  W0?9 ))) ())* 88- /==5 ;??9H1T9?88?!_g=??9t 9?88 :))) ) 9??9 #)): 88 .).4 x))9 9?8?= 9 =? ~BBBBBBBBBPd} )8GZix,,/,//,/,  4 ,L B    L>?:?`R?'?:?`^`bdfhjln z?&?m6?&?'?m7?'?"?m2?"?#?m3?#?.?  @v?`?#?i`? >? z? ? R?L)? >?L! 9>/   ǰԶ - ж & o &  << "=Mz (& 4=  z  ,? (?z   z 0? zz 4?Ǟ z(? & t? t?P@ ?z   D l   F=z   >z  <  ?z ?z < z >zz (?  >zz ? >zz $? ?  (?z z  `@m@?z  D  @mk?z  -3-3 @4KK  zAzz zAzz  "= Az Az < Az Az <Ǻ< A  B   <& B - B 4 B ' 2Bz   Mz @ b d2B ?3xAB'2B 6B B6B"B6B*B6B2R2|22|2b2222    Z   C   '(! STRFC )8CC8CC C )mCBCCǙ )8 `C )4CH)?CCh)@ɀ`C ) CLD FC`D FCc ) C`   .Dc2Dc"*D VDB B @ DBL)pD,D a @ :5L)DЭ ) CL!        >x%DDə DD D DD)mDDqD)|JmDDʝqD)mDDʝqD)!JOmDDʝq`1E D DD)mD)SJmmDʝD)mDʝ)qJmDʝ`|ED 1EL!ED8DDDDDDLELED 1E`ED DiDDəDLED 1E`EЩD EL!EЩDD 8D 1EL!FдD DL$0FеyDDyDDD DL"VFд8DDDDD DL"|FD_8DDDDDDD D`F |FL)FD EDL)   FF; )coyFF /+LGyFF ǩx @ @oL)  3*STATIC7.GGL:G3IGGʽuGL)*METER-!GeGm } |FL)DIS-STAXGG_LG}uikGv`(DIS-STwGG GL!NO-STATɝG  u_ z _ z G*STATɴGGoJ8ǰ?i48)i_u- u GR-L)     0         ҏ (; Z :;;=><<;< 4T         XXhj t     & -   -    - -   -    TH  PH  @ njxz mz @ z  xz   HH   ҏ ; z(H xHz~z  x  HH  LH (H xHz~z  dH hH (B ~zpH zlH pH XH b  dH  hH  lH  pH hJ dH  hH lH  pH hJ dH  hH lHǶ pH hJ dH  hH lH  pH hJI dH hH  lH  pH hJ dH hH lH  pH hJ dH hH lH pH hJJJJ2KXKK zKzz U dH hH (B z(B ~z  G"  pH lH BhH B dH hJ pH lH BhH B dH hJPH  0 BhH B dH KBhH B dH KPH    "JI L BB hL KP  ҏ ;4 zHH I`I   "JLH  ҏ 4 ; HH I4J `H vD LH  ҏ 4 ; HH 4JIP `H vD K`I KI$     BHz ~(H zBz   LIP ID "Im& - vD 4Im 3v -  KI`H vD $ ҏ ;z  \H m \H  P I ҏ ;4 zHH   I `H vD . pH lH XH dH  hH hJ- XH I =     pH lH XH dH  hH hJ- XH I= P `H vD     - Z & K`I    - Z & KI LLLMBMvMMMM\NNN8O|OO zOzz U  z  &   D l&PPzHz  D H ҏ ;z m$ D H ҏ ;z   "Jv`H m Ir`H Pc - c   56789:;<=\>\?@A\B\\C\D@E\F\QPPKȹPLȹPMȹPsȹPtȹPuȹPȹPȹPȌP`*FAN-STGXQ QPPL)*FAN-SPKQwQPFP  a 5 mP  aP  aP @PLQP  aP  aPP  @PL)'''(''((('(('('('R)@'f͘LBR(f͘뗥)'ژSLgR(ژS`jR)***`*CPU-STjQR RR멅쩗 jRR쩘 jR R멪쩘 jR R#쩘 jRR쩗 jRL)   RRRR-R'LS(ȭRJRR`*MEMDOMzR4SR˅ RR Ri&R߅ Ri&RՅ RL) "(.2 $(+/04;Lh   2    )7?A>@=@<@AOFJEIDHCGZ[Kd|LMMNLUMNLTMNLSMNLRMNLMMNLQNLPNLONLMN'WVWW1;Z]Y\X[EP`cf_be^adCUS SSSSSmSSS0iʭSS8S`YUkiSSk`nU YUBSǭ)S)S)kikmLU8{SSSLUS8{SSSikmS@eSSS`*STRSCR'SVSSSSSS U nUSL)  ?  ALLOT  2109                  5bR     'WЩ֩ՠQ*ʕiL!  d z_W  p  %WOW u=  f`  %WOWz u=z u=f`z PPSW W-z W-z Wz )z   W-v- D   W-v c - c n - z m& & W    m  W  - &   )Vc z  V V  KV z_Vz V V V z V V X V V X WVOVz  KV zzVb (z  V } PP& m_ a D    -  -  -  &  YtYc VcV VcV Vc V Vc V ( zxz[V YDžiȑ(iiȑL"   ?;!f  4 D       DZ$V PPV  "Zǭ ;63"Z$PW D Y72 DZm`Z -z D   Z   m ǰ  [ЭV mVmV i0 V mV i  L!  ) ze & ) ze  [YV  YVz G[[]_aUxJVV0VJVV V̤VVJVV0VJVV V̠VVL) _ V m pV  PY W Y "Z-3Y V z . z- Z-3 V V ZV VǏ V ZV  c  z  \$ 4 Z  4 c   m \  zQz Hz  V z X   & Z  Vz & Z P V z (z  zz[Vz zz _VSV  V V  V   V7 BHX [ _ X b\mV V V V          ` & ]7  & ]7  cG 4 ]7  c 4 ]7 ]]^] ] ]  ]  ] c & - ] Vz ]z ]z z  ]z ]z  Vz ]z ]z z  ]z ]z  BHX B]z D H]z D ;zz"^zz U]z ]z _    V  D >  V  D X - c & m m m  V V ] ]  B]z zB]z z^42^ ]z c m] B] ] ] ] ] m ] D  V V V V {[F\X  XǶ X \(]Y.FL_ [_ & [m ] 0Vz  V V L_] ] V V _ tYY - c nj_tY  X"V z V V  X  X b\m YI [Vz V z( zV  zz  \BHzY 4 P& [XY7 z XzV c   m& `V V V V  \{  ]  g  YVcǞ - z z4 z J]a    _ & a`(#]_   SV B_Vz  - D     4 D zǭD   mc   a   _ P.F& - Z3p-3r-3Z&  tY V 3\{ g _PPnjZam`{[& 6DdY,\6Y2`m Tr`{[|Z_V P PtYdY [ Y   Y  ) 2\{ _Pg ;D \bm\b )YV N I$nZe Fdc d)Y QWHz Jo   ||m||   W zJo   W  WW& Jov  o W & o WW&  3#uQ Hzg|h|G [ Gfa _B a  fq    V V V  D D  F& F& g &  {  &  C  zE W \-    W l ) W  zJo ,t B$& B$ 4 N"& - N"m ~ B$ & B$ & N"m   \oo     a   W pT4& fq  s   W a o, & ms o;a  zQ Hz    6Y V &   n-qM֪%"J(S"\"ћgĶ=Ǜ ;.p3TU$<û pK1]*8lR: ۃ+iGpS4o'; GU N^zǫ(9nI GTr2,J=ao0 $SDhh hEO=|zE`VtMҕj#5SziV)œm8ܠ{L羏e;Ҧ~E㽈Y,˜h4߱P ĕf7٫xIzyW8pu<4ԎUBBHV3{hDrOz0lݿ{ u):_ޖR,ji.{x3#e JH2ºL]4CXoؾѪVXYleVgz X=S*Y& /;6?fFHPZܑZ!mUy?;bjuaW~Xq0(s7 GeĂX=P'kbxO'KH,.:4N_FXUXfh9 r+l) ^8[#_܏l H#n$|`46BX_R1o|z ̋/.- S܋Y U\f.+ѻ 9WZ yV=_NQTd|&2rB*r H,hLlpyK0J{bSq &j:A_08D!pxߥ_.=X)U-ɯK%7RRL4ͼ606OSeW"S}:+0uU#'>Sxv$xKHj^*yq=g_q2ȁg$J0ǣJkOBD ߗw S/}H_=EZt?\;PgN_ƜԊը?6ibu@T}5SW ՇGUc<؅(/;CRAQLʭq5_g RRlX&ݨЛVRP+yP[wԐTpXޒVW6/7.45cc9]r9ka.lc}+i[*hS[GJ$D]ZeZQU^R,LURmRXJPViQkn{nhaenqal~]b`7{)uR,fw.+Zr1{t/v}zx(/G>OvI^^Q_VVGV6Y[^g!sp ًAg!e魺MqE_ft N? 50/HMA|MH#/W"KIFo]chr:8Ɛꬔ&~e6DCRcnjoi`7[ k F-52Mu  1F[]L{n1!;Okhy:{z`*Bz{#QEa 0Tw9.;Sw.ir ,klRgkaUcc[3/fܦ5!I]qt24PKW^RgkqCjӺ BFq!o2*),2>hDygS_mWe^l'֟6Ã=)eǹ8#MRX yt ՝mB!+KfzKw )/5E@OU`ZׇO~$&Ǥ2L^{g'i5xPrى8]]jx靪]c(>zRT㛦5B:G_IsI`7 %oTiw?U-D[avt5G9vQ| !9Gu3];_97h=q82Y{h93XzV U ?M/ \Be*a'$F, AhXQӌ*FaG壠´Ǐo#\f<L3d>J5{=zV>: TAv_aFЋMzQ N G@ԇAIZM״L HځGr[XRX)UԟVX<UhVҟWt#S?~0?k,޷˷6Ƕ#EU|=$)'n!69;:QBIXSRD]mlho~d$&HϠ̫ʗJ̆CQ|VyJ  , /gֺ7ًX z188SIHP?a`hyϯ攓H7L^c+ >CT#k: 65oZdu{ G&"2AlM_-[Ưe,>Cts î U#47Kiuz9!6{;0oMǩ$ryh;lԉ3kӕ ":s=-Al:ʖ+I AZoâN?S)-CS]~z,]ǻ+v<6sf 8zђM&E Va_sfbFh?HU^-߄r*dq;݄9h7b`5 J LzY!sUN8˚.A="0dbҎ+Ůnvbtjs$:0dVH&rUqUm:Xg^? UГtK7I#g3hhiNO4R)7jT&xK `Q%^(h< ՔuHg+q˛pyMC\H_c1 x\Aeʩԏ+{@ǟS>|);u C wənkSG`= 4uKi0 @氍)ȗa9 7[OǷ,uns11]#S~h6wG.wn#$Lڟ[Е^+q:jh*zΟ:LxFߎRi!k6:bFܼEPΪW;kdsAS[}'.կpq)ˈB 4(!7ghr23#9>2GKbAXfQz}uƢO{E !>8A>DPjepikL>79S#6BSISfc!Y1رX^ 'U?u(^`~e S`2 G ".fD7on/W_F'v&,;nCOGwp.V )̬!|.lsi0M"kaO,a QcÉU'KPb!˱N$\af6 ,`~"[#$F]ooBEg`ͽd7j0m; >q3&Ac p!+@bq-h~,}&0/ȼ"74 ,a`c$SsygbBc/Qcigyq4q빛;wǖ"eC#}cm%bF&@ڴ$\ O&$.K)(ͭ",#hP0V̢>Tؠ1p=ڲ1?qd#&αVv?ET<~o600>( 4PQ,EA\uJH@FB\F@Ba$KAHvJD^XWS\PBX^]RmRs[TlH}'$7,!"="t)*O%:c><;;8+HCKCLAB]BHFOl?VXUH[6yzQ04|fze}ve=dHc'zjyaZqzT "汌(pD"9_/ߒ-᪪"63DX'c{y/<7&9mH)B@MN_6;CNgtpw (v( mKr|b'i ^ǑJpz Q+$4<:E]Xgi0|oMiiCmWBZ#Js;GHNUNa{"& 8:9ʅWD"Rc~jqVACM 8^CosrCǃ%6e\Gt׬u$6;VYej# ҅I*)^Sف~d"m@Xp 5$59JMzw91˿{\C:~Dz.q> ,*?TgMnY%,i^0gLtOpEJ #Nf4Tv495Th Bg,No27OZrЫs֏Ck =)ֹ[d`_^k` #[v5duF!AS+iZ4bК1Jxx GimKީ 17̀tPT<[1̙zcEAvZt''n 8sM !8f4N@=>.fǴP݇Xӕi~n$ZKDS[/ o~E{7[# px:rۼmwgY5$< w08xZ뤯#]:E-tB@7ș{ O`0tH)\m=ΟA"Uf6ǘz N/sG([l<͞@!Te5Ɨy M.rF'Zk;̝ Sd4ŖxL- FF.FhC 79dd : SOUND-READY 0 TONIC C!E ^VAR-START VAR-SIZE ERASE  CUR-CHORD 4 ERASEE _SOUND-BUFF BUFF-SIZE ERASE  VOICE-DOC CHAN# FF FILLE [VOL-DONE PRO# DUP FILL  PROC-DEAD? PRO# DUP FILLE ]PROC-INDEX PRO# DUP FILL C FF VOC-HOG C!E ]PRIORITY PRO# 1+ FF FILL  0 KEEP-IT-UP C! ; . : FLICKER 5 0 DO 2 DIST-MASTER C! 3000 JIFFYSQ m0 DIST-MASTER C! 3000 JIFFYS LOOP ;  UU5UWppꪭpppp節p節節節p節p節p節p節p節pppꪯUUp}_p}_p}_p}_p}_ppp}_p}_p}_p}_p}_p}_p;UUp7תתתתתתתתתתתתת׫תUUUWUUpp_Up_Up_Up_Up_Up_Up_Up_Up_Up_Up_Up_Wp_Wp;pUUp7ׯׯׯׯׯׯׯׯׯׯׯׯׯ׿תUUUWU_WްWްWްWްWްWްWްwްްްްWްWްUްU^: UU5UWqxꪭy꺭x}rzvv}}}q{rttꪯU_^޽ް޳ޱ޸^^^^^^ް޽U^:UW UUת׿ׯׯׯׯׯׯׯׯׯׯׯׯׯ745QR[\`dnox  (-2; EJOX bgC! 9>PRUV[moUsx '4BRU0_oUU{UT U@U)TUP5UTUTTUUWTUUUPOUO<TQE@_U_<|U=TQU_U_||U|TUUQE_U_||U|TuUQU_U_||U|TUQE_U_||UPTU@QU_U_||UUTU@ QE_U_||UUTU@QV_U_}|UUTUUR_U_|UUTUU_U_|UUT^^W _U_|UUT^^U_U_|UUTUUU__||UUUE_|D|U<UUPQE_@||U|TUUPE_U_||U|THaE_U_||U|TeE_U_||U|T 8E_U_||U|T E_U_||U|TU<E_U__TU EUWTEPUPUUPT0E'U8T DUUT3bq PPPʊ *$+AB^_{|56RSop )*FGcd..3?V3??33000? 0?< 60 C, 64 C, 68 C, 72 C, 76 C, 81 C, 85 C, 91 C, 96 C, 102 C,B O108 C, 114 C, B 121 C, 128 C, 136 C, 144 C, 153 C, 162 C, 173 C, 182 C, 193 C, 204 C, 217 C, 230 C,  243 C,   CON PITCH-TABLEB EHEX F8pp $<.88 3388<?@FHMW<<\\\[^cchhlo?vx}<<:::8 !&(-04<>CI88MQ  UX8]a8eg8mmsx88|@BB 8|(($D#488A=J8xLLSX\`ehmx}BBC-88>8$"3DBMZxX_X22cchhnq>T00||00~~00||T7GH??00||M`0T00||(gw * >>} ??? >>*' >>-@ ?*?? >>GW8||* >>]p 8 8 ~~??? >>*wp >> !@p@p ?*?? >>/0[aT((Dp{T888D(D(TT(D( +TDT6E@)DBN]HDBEeeiimGOOUUY_8ehn 8(((DD@ z,z~N@@559:??GHNW__eeio88ux@@C~ 0""%xX^.<`@^~rEEIINxX^>CE PIN<<$$$RU^`/ POINT-BUILD SOFT-HOLD SOFT-HOLD POINT-BASE + !A rHERE DUP 1 C, 2 C, 3 C, 4 C, 3 C, 2 C, 1 C, 7F C, 5 POINT-BUILD SOFT-NO-HOLD SOFT-NO-HOLD POINT-BASE + !A mHERE DUP -4 C, -4 C, -3 C, -3 C, -2 C, -2 C,  -1 C, -1 C, 0 C, 7F C,A cPOINT-BUILD DIP DIP POINT-BASE + ! +/P??3333X6@@Hhppvx~UU  !?( +0;UU}u}]}UUU?uYUUUUUUUUUU`qxy0뻻몪4@ .HZ .^x333||3 !%)-15:?B̻GJ̻OR̿WcuUzUU~uU UU}u}]}UUUUUUw]UUUu*UUU}u}]}UUU/0U4;UAAAUU@U@EHMY`dh?hptUx@|UU@@C@L@@@<+1@@@UwwUU 00UYUUU3?0<?3 33B________03033??03333<<<??333?  $ (,UUUQ0P06U<UUUE@BPTFURTPAAVUX\PaQUUUhUhlmErUAAUUUP@AAAAAAPPUUUAA@PPTU$AAPP@A@P,UOPAAUU##3##3#3T???3333333#.333833@Q3Z[3jUjnEz@UUUAEAQAUUUUU3 %UPUq000330u3z00~33330 ???UUD.QU332B??<3?3G??? 3 ????3 3??33333 2%3f4WI01H567 Wmnr&89:;W!#*+,-./;<=W "$GIOZPY\X^abijJoqwxJcLL [sSS[[$!#+WWLQS\r]^_\LsS\]^_\]^_ "$efghijkWQRR]\bLLsf`jn`p{WLL`d`d``LLLvwx!#["[2WSNLLLLLL6[a "$\]^_\]^_WQSMSMSSSMNL\]^_ghl`nr`tWxQSMSSSNL`lmnopqzX'X"S#}(S*N/1 :<$L!LR[89:  a%e #s8tz67   "8& +  15 C8S +,-.   Y] k8 /012    y;  &'()*" 34z5  * ,<>F H qqu k gh    r  @@C!"/199IJWrKJMIHGDF CLCCDE')1=NORSVW^_Z[ABOP[ePQTUXY`a\]ijwx!))--559:GIQQUU]]aboy }  ! %- 12?AIIMMUUYZgiqquu}))00<@9;D0AEC00IEK00QEW00B000]E0]FGHIFJLFGHIFJLFGHIFJLAF GHIFJLKMKM!K'MA-K2MKLAVZ`lNORSNOORTUOstA~PPSPPPPPQA&+1^39^;A^GAM^{FGHIFJLFGHIFJLFGHIFJLAFGHIFJLKKM K MKMAK"M&;$=RScn%68:?@%vvz,/31% 9;<!)%+4<?IS-.52%ds,/01% !"##,0%+47ACHMVWWX%U_-.$2%it%\[ZZY%8<`d  04Q\!%#!y'&$" C +&()*+++,,.++BE/0LN@THVEGj/12BCDAHIJKLHFE*/3&HMNOPHEG:;/FNHQRSTHFEbv/4676;<=494:HUVWXHEG /585>?8955HFE22>->D.F--P`lpdhlpdhlpdhlphbcdhlpdhlpdhlpdhmqeimqeimqeimq'eimqeimqeimqeinrfjnrfjnrfjnr 'fjnrfjnrfjnrfjosgkosgkosgkos 'gkosgkosgkosgklpdhlpdhlpdhlp('dhlpdhlpdhlpdhmqeimqeimqeimq0'eimqeimqeimqeinrfjnrfjnrfjnrtu'fjnrfjnrfjnrfjosgkosgkosgkoszv{z 'gkosgkosgkosgklpdhlpdhlpdhlp(H'dhlpdhlpdhlpdhmqeimqeimqeimqP'eimqeimqeimqeinrfjnrfjnrfjnr 'fjnrfj@nrfjnrfjosgkosgkosgkos 'gkosgkosgkosgklpdhlpdhlpdhlpHh'dhlpdhlpdhlpdhmqeimqeimqeimqp'eimqeimqeimqei*-#$%68@CQZ'>0#$%^`hks<*;'321'A0 *'8@''321.; CP9|:''VX`,w"x''',-('}y''''(-0g'''+./"x''5-'''m}~'6''+) '(5#$&'?G#$&R]'?0#$&f'=0421'B0421#! "),4216U'=0421'B0_b421fs! "y|421U5;HLPTVZv꯫z &XꪪC 0@0 C0 htUUTTQQEEUUzUEEQQ EQQTTU UUQQEEUU(Q(-U0TPP5UFAD@PPTUULUPTTQQTU\EEQQTT`UdEEhUjjjpptUzVVZZZj jjZZVVUjZ$(U(.288^bdllp 00????00 00 33???00$(??,.2N<????Ro  HERE C- 4/ HUFF E- 4/ SLIP C- 4/ PLUCK G#- 4/ PIZZ C- 4/ HUFFB wD#- 4/ SLIP C- 4/ PIZZ C= 4/ HMPH C- 4/ HUFF END-FLAG  POINT-BUILD NICE ^ HERE C- 4/ BWHAP D- 4/ BWHAP E- 4/ BWHAP D- 4/ BWHAP C- 2/ PIZZ END-FLAG POINT-BUILD BWHAPPER  ( FIDDLE TUNE ) HEREA eC= 4/ SLIP F= 4/ HUFF D#= 2/ GRADUAL # C= 4/ BWHAP F= 4/ HUFF A#- 2/ PIZZA eC= 4/ SLIP F= 4/ HUFF D#= 2/ GRADUAL . C= 8/ HMPH A#- 8/ HUFF G- 4/ HMPH F- 2/ PLUCKA ]RECOLOR C, ME-AGAIN END-FLAG  POINT-BUILD CLUCK-OLD-HEN HEX HERE DUPA yPI, C, E- C, 4/ C, SL, C, B- C, 4/ C, DP, C, E= C, 4/ C, ; SH, C, G#= C, 4/ C, SK, C, B= C, 4/ C, PL, C, D#" C, 4/ C,A iEOS C, POINT-BUILD C& C& POINT-BASE + ! HERE DUPA ySH, C, C- C, 4/ C, SL, C, G- C, 4/ C, PL, C, C= C, 4/ C, 9 DP, C, E= C, 4/ C, SK, C, G= C, 4/ C, SH, C, B= C, 4/ C,A iEOS C, POINT-BUILD H& H& POINT-BASE + ! C HERE DUPA ySK, C, F- C, 4/ C, PI, C, C= C, 4/ C, PL, C, F= C, 4/ C, v9 DP, C, A= C, 4/ C, SL, C, C" C, 4/ C, SK, C, E" C, 4/ C,A iEOS C, POINT-BUILD I& I& POINT-BASE + ! HERE DUPA yDP, C, D- C, 4/ C, SK, C, A- C, 4/ C, SH, C, D= C, 4/ C, ; SH, C, F#= C, 4/ C, PI, C, A= C, 4/ C, SL, C, C#" C, 4/ C,A iEOS C, POINT-BUILD L& L& POINT-BASE + ! HERE DUPA yPI, C, G- C, 4/ C, SL, C, D= C, 4/ C, SK, C, G= C, 4/ C, : SH, C, B= C, 4/ C, DP, C, D" C, 4/ C, DP, C, F#" C, 4/ C,A iEOS C, POINT-BUILD D& D& POINT-BASE + ! HERE DUPA ySL, C, E- C, 4/ C, DP, C, B- C, 4/ C, SK, C, E= C, 4/ C, ; SH, C, G#= C, 4/ C, SK, C, B= C, 4/ C, DP, C, D#" C, 4/ C,A iEOS C, POINT-BUILD W& W& POINT-BASE + !  HERE DUPA yDP, C, A- C, 4/ C, SK, C, E= C, 4/ C, DP, C, A= C, 4/ C, ; SH, C, C#" C, 4/ C, PI, C, E" C, 4/ C, SH, C, G#" C, 4/ C,A iEOS C, POINT-BUILD A& A& POINT-BASE + ! HERE DUPA yPI, C, F- C, 4/ C, SK, C, C= C, 4/ C, SH, C, F= C, 4/ C, 9 SL, C, A= C, 4/ C, DP, C, C" C, 4/ C, SH, C, E" C, 4/ C,A iEOS C, POINT-BUILD R& R& POINT-BASE + ! HERE DUPB zPI, C, B" C, 8/ C, PI, C, G" C, 8/ C, PI, C, D" C, 8/ C, ' PI, C, B= C, 8/ C, PI, C, G= C, 8/ C,B zPI, C, D= C, 8/ C, PI, C, B- C, 8/ C, PI, C, G- C, 8/ C, ' PI, C, D- C, 8/ C, PI, C, C- C, 8/ C,B zPI, C, E= C, 8/ C, PI, C, G- C, 8/ C, PI, C, C= C, 8/ C, ' PI, C, E= C, 8/ C, PI, C, G= C, 8/ C,B zPI, C, C" C, 8/ C, PI, C, E" C, 6/ C, PI, C, G" C, 6/ C,  PI, C, C$ C, 6/ C, EOS C,B PPOINT-BUILD E&T eE& POINT-BASE + ! F# HERE DUP SH, C, G- C, 1/ 2/ + C,A fDP, C, D- C, 2/ C, SK, C, D= C, 2/ C, 9 SH, C, G- C, 2/ C, DP, C, C= C, 2/ C, SK, C, G- C, 2/ C,A YSH, C, C- C, 1/ 2/ + C, ( ( DP, C, G- C, 2/ C, SK, C, C= C, 2/ C,< =)A ( SH, C, E- C, 2/ C, DP, C, C- C, 2/ C, SK, C, G- C, 2/ C, ) y EOS C, POINT-BUILD .WIN-BASS .WIN-BASS POINT-BASE + ! HERE DUP SH, C, D" C, 4/ C, DP, C, G" C, 4/ C, SK, C, B" C, 4/ C, 9 SH, C, G" C, 4/ C, DP, C, D= C, 4/ C, SK, C, G" C, 4/ C,A fSH, C, D" C, 4/ C, DP, C, G" C, 4/ C, 9 SH, C, C" C, 4/ C, DP, C, G" C, 4/ C, SK, C, C" C, 4/ C,A ySH, C, G" C, 4/ C, DP, C, C= C, 4/ C, SK, C, E" C, 4/ C, & SH, C, G= C, 4/ C, DP, C, C" C, 4/ C,A yPI, C, E" C, 8/ C, PI, C, G" C, 8/ C, PI, C, C$ C, 8/ C, 9 PI, C, G" C, 8/ C, PI, C, E" C, 8/ C, PI, C, C" C, 8/ C,A tEOS C, POINT-BUILD .WIN-MID .WIN-MID POINT-BASE + ! # ( TALK TO POKEY AND SAVE X ) HEXA wCODE DUB-A-SAV-Y WASTE STY, .A ASL, TAY, RTS, END-CODE  CODE FREQ-POKEC a' DUB-A-SAV-Y JSR, WASTE LDA,  AUDF1 ,Y STA,A NRTS, END-CODE  CODE VOL/DIST-POKEC U' DUB-A-SAV-Y JSR, ) AUDC1 ,Y LDA, VOL/DIST AND, WASTE ORA,C PAUDC1 ,Y STA,  RTS, END-CODEA CODE VOL-POKE PHA, F0 # LDA, VOL/DIST STA, ' VOL/DIST-POKE JSR, PLA, RTS, END-CODE@ CODE DIST-POKE PHA, 1F # LDA, VOL/DIST STA, ' VOL/DIST-POKE JSR, PLA, RTS, END-CODE C# ( MAKE SOUND -ATARI SPECIFIC ) HEX@ L7 HOST-WIDTH  HEREC T00 C, F0 C, 1F C,  LABEL MASK-TABA CODE MAKE-SOUND ( CHAN # IN A,SND-MODE,PARAM-HOLD,MASK-MODE ) ) .A ASL, ( GLOBAL SOUND CHANGES: A=0 )C dCLC, SND-MODE ADC, VOC-FOUND STA, " MASK-MODE LDY, MASK-TAB ,Y LDA,C QVOC-FOUND LDY,  SND-CHIP-SHAD ,Y AND,C RPARAM-HOLD ORA,  SND-CHP ,Y STA,C XSND-CHIP-SHAD ,Y STA,  RTS, END-CODE ) MARAP-DNES ( CODE DEC-YC NDEY, 0< IF,  CHAN# 1 - # LDY,C HTHEN,  RTS, END-CODE CODE PARAM-SEND PARAM-HOLD STA,C YSUB-4? LDA, 0< NOT IF,  (VOC-START ,X LDA, ' MAKE-SOUND JSR,C HTHEN,  RTS, END-CODE @ L5 HOST-WIDTH  CODE STEAL-CHANC YTXA, VOICE-DOC ,Y STA,  TYA, VOC-START ,X STA,A NRTS, END-CODE C 7 HOST-WIDTHA QCODE COUNT-CHANS  0 # LDY, HOG-TEMP STY,C IBEGIN,  1VOICE-DOC ,Y CMP, 0= IF, HOG-TEMP INC, THEN,C Y' DEC-Y JSR, 0= UNTIL,  RTS, END-CODEA `CODE CHOOSE-CHAN VOC-FOUND STX,  0 # LDY, BEGIN,D _VOICE-DOC ,Y LDA, FF # CMP,  "0= IF, ' STEAL-CHAN JSR, THEN,A e' DEC-Y JSR, 0= UNTIL, NUM-PROC LDX, \ CONT. R/W-SECS 4 N20JUN83SEH 0 TARGET-WIDTH +: ( ADDR\START SEC\COUNT\N -- )B \SWAP 2SWAP DUP >R ROT + R>  DRIVE @ OPENDRIVEB \DO 2DUP I ROT ( BREAK-ON )  IF SECRD ELSE SECWT THENB ^( BREAK-OFF ) 8 ?ERROR BPS +  LOOP 2DROP CLOSEDRIVE ; 1F TARGET-WIDTH@ W: R/W-SECS ; 0 TARGET-WIDTH@ b: DRIVEOK @ 0= IF MOUNT THEN 9 >R SEC/BLK * SPDRV1 /MOD DRIVE ! SEC/BLK R> R/W-SECS ;@ O1F TARGET-WIDTH 6 HOST-WIDTH@ |CODE FREE-CHANS VOL-MODE # LDA, MASK-MODE STA, SND-MODE STA, 8 0 # LDY, PARAM-HOLD STY, BEGIN, TXA, VOICE-DOC ,Y CMP,D f0= IF, FF # LDA, VOICE-DOC ,Y STA,  2TYA, PHA, ' MAKE-SOUND JSR, PLA, TAY, THEN,B ]' DEC-Y JSR, TYA, 0= UNTIL, 2 VOC-HOG CPX, 0= IF, FF # LDA, VOC-HOG STA, THEN,@ MRTS, END-CODE C+CODE CHAN-CYCLE ( CALLED FROM ACTIVE LOOP )B {SUB-4? LDA, 0< NOT IF, VOC-START ,X LDY, SEARCH-HOLD STY,  BEGIN, ' DEC-Y JSR,F SEARCH-HOLD CPY, 0= IF, RTS, THEN, ( UNEEDED ERROR CH )  TXA, VOICE-DOC ,Y CMP,D d0= UNTIL, TYA, VOC-START ,X STA,  THEN,@ MRTS, END-CODE \ CONT. R/W-SECS 4 N20JUN83SEH 0 TARGET-WIDTH +: ( ADDR\START SEC\COUNT\N -- )B \SWAP 2SWAP DUP >R ROT + R>  DRIVE @ OPENDRIVEB \DO 2DUP I ROT ( BREAK-ON )  IF SECRD ELSE SECWT THENB ^( BREAK-OFF ) 8 ?ERROR BPS +  LOOP 2DROP CLOSEDRIVE ; 1F TARGET-WIDTH@ W: R/W-SECS ; 0 TARGET-WIDTH@ b: DRIVEOK @ 0= IF MOUNT THEN 9 >R SEC/BLK * SPDRV1 /MOD DRIVE ! SEC/BLK R> R/W-SECS ;@ O1F TARGET-WIDTH " 09 !!$/ $ $ * * k$$ +%(" ) 90* $ :"DBHΡ $ $d`:$d % $ 8 # # 6@PAE! / * * k$ +!)# ) 9 * : DBDY) $! ` ` a : # "DD0LYAEADԯPP $ $)` Kd$ +% @ ) 9 * $`:` 8LL䠡$!`$d``$d e` ` $@ 8 # + " 9!%! / ` 0`* * k$ +!)@# ) 9 * :` ``9) ` `! ` ` a``` ```: ! "$ 09!!a$/ $ $)`* *$kd$ +%)@# ) 90*`$dzb (¡ `ࠡ$!`ddd`:$d`e``` &` 8``c #@  !!a @ ` `* * k +!)@# ) 9 * :` `@9) `` `!` ` ` a``` ```: c G" 9!!a$0/ $`* kd +!)@# ) 90*` `:` (¡! ࠡ$!``d`:$d`e``` "` 8 `c #@ G !!a P ` ` k !+!)@ ) 9 * !:` a@ !`` `!` ` ` a``a @`` a EE