`8NNlop NN`  @`!#@%`)+-/1 3@5`79;=?A C@E`GIKMOQ S@U`WY[]_a c@e`gikmoq s@u`wy{} @` ` @ ` @ ` ǀ ɠ  Ӑ o ׀  @` @`!Aa   !Aa<!!#A%a')+-/1!3A5a79;=?A!CAEaGIKMOQ!SAUaW`  @`!#@%`)+-/1 3@5`79;=?A C@E`GIKMOQ S@U`WY[]_a c@e`gikmoq s@u`wy{} @` ` @ ` @ ` ǀ ɠ  Ӑ o ׀  @` @`!Aa   !Aa<!!#A%a')+-/1!3A5a79;=?A!CAEaGIKMOQ!SAUaWSTUKPDSWDSKDESKTOP INFt A68_ASSM t STLOGO t 'TINYBAS t XLISP t #a000000 #b000000 #c7770007000600070055200505552220770557075055507703111103 #d #E DB 03 #W 00 00 0C 01 1D 17 09 A:\*.*@ #W 00 00 2C 01 1D 17 00 @ #W 00 00 0E 09 2A 0B 00 @ #W 00 00 0F 0A 2A 0B 00 @ #M 00 00 00 FF A ST UK PD@ @ #M 00 01 00 FF B SOFTWARE@ @ #C 00 07 00 FF c CARTRIDGE@ @ #T 00 06 02 FF S.W.S.L.@ @ #F FF 04 @ *.*@ #D FF 01 @ *.*@ #G 03 FF *.APP@ @ #G 03 FF *.PRG@ @ #F 03 04 *.TOS@ @ #P 03 04 *.TTP@ @ .  t..  tA68 TTPt uA68V2 DOCt "READ_ME DOCjYA68000 TTPTt `pJC6*O*m# - ЭЭм"ҍ¼.A// Bg?<JNA y"h#E?/ NFN"/0<NBNu o AdpNu#BNuNV0/"/ NBd0< Aq"NB0<NBN^Nu o2/0/ HSoQBNu o0/JfBNuf SNuNV.{NG.{NG.{NGJnfad.|/ n /(afP.|/NFX#(fa&B@333 33B##3a.(NO=@JngaJyo>/<|NGX`$3.|/NFX#(fa.| / n /(aP.|%/NFX#$faJaAB##aJyf.|'NGaB2`>/<|9NGX.(NO.$NO.|ENGBy`<09 @"|,.09 м,//<|YNGPRy09y mBn`.}"NG=@ n fN^NuNV>/<|bNGXaaJ@fN^NuNV=| y*fa `>a =@ nafaa09`a~`a/~`a?D`ap`a`a|`a;`za) `ra$`ja`ba"z`Za'`Ra"j`Ja=`Ba(`:a.`2a,`*a$`"a(`a$`a`` a;$`a`a:`aX`a`av`a8N`a3 `a`a2`a46`a'`a `a!H`a!f`a=`a4`a,`za!l`ra&`ja4`ba`Za5`Ra;`La66`Fa5 `@a;`:a`4a `.Bn`(a `">a ``S@||b@0@t PNJnga 0.N^NuNVBn`a h y g y g y:g>a =@`2 nl09"|4nRna >a =@ nag |2nBByBn`40n"|r"./<NdXJ@f 0.R@3Rn n}mB@`pJygN^NuNV yfBn>a =@`2 nl09"|4nRna P>a =@ nag n0g |2nB.a =@ nfF.a @=y Ry 0. м, @!y0. м, @B(`>a ``a y g y fN^NuNV=|Bna09`b n BPy=y`\ n BP09Q@=@`F n BP=|`6 n BP=|`& n BP=|` y(g>a Na a(Jym yly =y`>a  y)g>a  n BPa `aJym yly=y`>a y)g>aa x y+f na d n BP`L n Pf n 0` n 0R@H"n 2=|a=|:a` y,f yf n m n o>a naDa^Jym yn|09|r `? n0H yl <"na yf n` yg>a y)g>a=|;a`>a`>a`jJymX ylL n 0=y n y)f:n( yf" n o n o>aja*` y,f yf n m n o>a, naaJym yn|09|r `? n0H yl <"na yf n` yg>a y)g>an0aP`>a`>ax`>an` >ad``|-b@0@v PN yf n 0@=@ y,fa0.N^NuNVB@=@=@av>aL=@ n-fB=|a>a,=@ n(f 3-` n0g nag>a0.`~B`R n l0/< /9NgP29HЁм#Rn`>afa&>a=@ n0g3`&aB`P nl<09|=@ n o 0._@=@ 92.HЁ#Rn`>aa y0m y9o yAm yFo3``2 nl09"|4nRnaN>a=@ nag n0g |2nB3Bn`00n"|q./<NdXJ@f3Rn nl yg yfH yf>.a@3 yg09 м, @#`>a`ax yLf 3` yWf 3`>aaD`ba>0y#a.3 y'g>aPa`. ng&3a``H |vrW hN nf 9D#N^NuNV y oa09 м,-@./.NeX09 м, @B(N^NuNV=|Bn`80. м,-@./.NdX=@Jnf=n`Rn0.y m0.N^NuNV-n ./.NeX`R nJg n .f n .fS./.NdXN^NuNV>/<|nNGXRy.}"NGN^NuNV`a y faN^NuNV nam nzo nAm nZnpa`` n0m n9np0``0.N^NuNV.|zNGNON^NuNV.|NGNON^NuNV.(NG3|gP yam yzny.}0?9NXT y f.}0?9NXT`.|NGNON^NuNV.$?.NXT=@ nf.|NGNON^NuNVJn o$A-H nH>aR nH>aN^NuNV0n-H> /YaXN^NuNVJn o4-n n fT ` nH>aLRSn Jn nN^NuNV yfRTa33./<aXHѹ./<aXHѹ`"Ta@3 30 y f3 y f3 3 ./<adX309@Hѹ./<aa` yfFBy3FB@09y y<b yc yd>ar` yfFBy3@B@09y y9b yc yd>a"`h yf@By3NhB@09|y ye yc>a` yf@By3N`B@09|y ye yc>a` y<c>ax ye yb y f>aRB@09y y9c>a2 ye yb y f>a B@09|3r 09h3B@09yy809H3B@09y>?9a(T>/<adX>/<aRX09@HѹN^NuNVTa3 yf0./<ahX./<aVXHѹ`3 ./<a.X lJo 93yr 09h3yP y fy@ y fy. /<aX3 y:c >at`B@09y09 @Hй# ytfy>?9aT> /<aX`>aN^NuNV yfTa|fT`T09`3a`3``3d`3e`3g`3l`3n`x3b`l3o``3c`V3m`L3k`B3f`83j`.3h`$3i``| |b@0@v PNa3 y f >a`a-y 9 y fV n oJf >a`0 .3yB@09y>?9aT`D n .n >aV`$>?9aTT>/YaXN^NuNV yfFT3./<a&XHѹ./<a XHѹ`d3T y f3@ yf3 yf3 yfBy./<aX309@Hѹ y<f y`: yd(r 09h3B@09yy`>a./<a$X3 y<f>a y9c yg>aB@09y>?9a*T>/<afX>/<aTX09@HѹN^NuNVT yf>?aa0.N^NuNV yfa09 S@ м, @!y09 S@ м, @|N^NuNV`aT y g y gN^NuNVaR#3N^NuNVa=@ nf=|aa-y nf/</.RNghP-@/.0n/NgP-@ 9Ю# yf./</.NghP-@`>BgaaD`0y-H>/YaXa y g y'f y f>a`v nfNBn09 Hѹax-y yf$ y f .a`>/Ya.X` y,f =|a`>a@ y g y g y f y f(9g yfBWaB09 HѹN^NuNVT yfa3./<aX3./<aX3 y<fl 93 ybL yd8r 09h3B@09yyp>?9aT`>a.`>a$`>aN^NuNVT yfZ. /<aX yg>a 93 yc>ayN@>?9a(TN^NuNVT yf(3ad3a8aR3 yer ybfB@09|r hy ye yb y@` yb y`>aB@09|y`t yb`B@09|r hy ye yb y` yb yH`>aB@09y`>ax>?9aTN^NuNVT yf~a3 y f 3H` y f 3H`>aa ym yn09|y`>a>?9aRTN^NuNVTav3 33 yf8./<aXHѹ./<aXHѹ`3 yqmy y fy@ y fy./<aDX309@Hѹ./<aX3 ybB@09r hy y<bB@09y`>a y f yc yd>a>?9aT>/<a4X` ye ybB@09|r hy y<bB@09y`>a y f>a y f y`y>?9aTT>/<aX` y<f3 yqm3 y fy@ y fyB@09y y9c>aT>?9aT>/<aX>/<aX`~ ybjB@09r hyy ye y9bB@09y`>a>?9a/<axX`>a09@HѹN^NuNVT yf>??????a`, yd y f 3@` y f 3`3 yc6 y f 3`3y y f>a.B@09r hyB@09y y<c>a`z y<ff y f 3 @` y f 3 `3 B@09y yc ye y9c>a`>a>?9aT>/<a,X>/<aX09@HѹN^NuNVTa3 B@33 yfV./<a"XHѹ y g. y g$ y g./<aXHѹ`Z./<aX309@Hѹ3 y g, y g" y g./<a~X3 yf09`R3`^3`T3`J3`@3`63`,3`"3``H |wJrW h NB@09y ye y9c>a y g>a>?9aT>/<aDX` yd09`R3`^3`T3`J3`@3`63`,3`"3``H |wrW h NB@09ySy 09 @y ydy B@09r hy`6 y<f$ 93B@09|r hy`>ax>?9aT`>a^N^NuNVTa3 yf./<aRXHѹ`./<a4X309@Hѹ ye yc y9b09`43B`@3D`63@`,3F`"3J``H |wrW hNSy 09 @yB@09y>?9aT>/<a X`>a4N^NuNVTa3 33 yf8./<aXHѹ./<aXHѹ`./<aX309@Hѹ./<aټX3 y<f ye yc y9b09`By`,3 `"3``H |x rW hNSy 09 @yB@09y>?9arT>/<aX>/<aX09@Hѹ` yfb09` 3<`,3 <`"3<``H |xBrW hN>?9aT>/<a X`t yf`09` 3|`,3 |`"3|``H |xzrW hN>?9avT>/<aX`>a` yd y<g09` 3`$3`>a``|gڰ|Tg`Sy 09 @yB@09r hyB@09y yc ye y<c>a0>?9aT>/<aX` yd09`*3`43`*3` >a``|gа|ar yd yc>aV yd y<g>a:>?9aT>/<aX09@Hѹ`>aN^NuNVTa yf./<aXHѹ`./<aX3 yc ye y'c y<d3AB@09y./<aՀX3B@09|r hy ye yc>a >?9aT>/<aX`>a09@HѹN^NuNVTa yf./<aXHѹ`./<aX3 yc ye y'cl y<db yCf 3N` yWf 3H@`3NB@09y>?9aߜT>/<aX`>a09@HѹN^NuNVXa3 yf3./<aX309@Hѹ yd y f 3H` y f 3H`>ab./<axX3B@09y y e y'b .a ye yc y e y9c>a09@Hѹ yf2>?9aDT>/<aނX>/<apX` yc y e y'c y<d./<aX3 y f 3L` y f 3L`>a*B@09y yf2>?9a݂T>/<aX>/<aݮX`>a yf3N^NuNV. /.aX=@ nl6Bn=|2.0.`=@0.n=nar=@` n-fZa&aZ=@ nn 0.nl>a@=n` =|2.0.`=@0.nRn0.no`F nl. nl>a=|2.0.`=@0.n` n/g>a=naۀa=@ y,g y g y g y f0.H"n"Bn y,fa00.N^NuNV n =@=|=|Bn=|` 0.ng B@0.nRn nm0.H"n"N^NuNV yDf*aڸ09|=@Jnm no>a`> yAf,aڄ09|=@ nm no>aٚ`=y0.N^NuNVTa033 yf./<azXHѹ` y8f 3`0 y9f 3` yMf 3`3./<aX3 yc ye y<c>aB@09y./<aX3B@09r hy yc>az>?9aT>/<a&X09@HѹN^NuNV3Ta yf./<a:XHѹ`./<aX3 yc ye y9c>aB@09|J3 yOfyH?>?9aT>/<aPX09@HѹN^NuNVTa yfV./<alX3 ye yc>a"B@09|NX3>?9a؀TN^NuNVX yfR3./<aX3 y<g>aֶ>?/<adXN^NuNVXa: yf3./<ăX3 ye yc>aX3 y<g>a>?9anT>/<aתXN^NuNVTa yf./<aXHѹ`T09`3Q`3P`3T`3U`3W`3\`3^`x3R`l3_``3S`V3]`L3[`B3V`83Z`.3X`$3Y``|b|b@0@x PN./<aX3 yc ye y9c>aԐB@09y>?9aT>/<a.X09@HѹN^NuNVa yf X`09`3Q`3P`3T`3U`3W`3\`3^`x3R`l3_``3S`V3]`L3[`B3V`83Z`.3X`$3Y``|&|b@0@y PNTa./<ahX3a# yg>a yc>aB@09y 9 n 9l >a`&>?9a:TT>/<arXN^NuNVaN=@ nf=|aa`-y nf/</.RNghP-@/.0n/NgP-@ 9Ю# yfza y,g>a a nf 9ခ nf=|`=|/</.NghP-@`>/<aӂXSJnN^NuNVT yfaB3 yf 3`3Sy 09 @y./<alX3./<aTX3 yd, yd"B@09yB@09r hy`b ycP y(dF yc< y(d2yB@09|yB@09|r hy`>aЎ>?9aTN^NuNVT yfa yf 3`3./<aZX3./<aBX3 yd, yd"B@09yB@09r hy`b ycP y(dF yc< y(d2yB@09|yB@09|r hy`>a|>?9aTN^NuNVT yfa3 3Sy 09 @y./<aBX3./<a*X3 ycP y dF yc< y d2yB@09|yB@09|r hy`>aΚ>?9a TN^NuNVTa. yfL./<aĄX3 yc>aDB@09|H@3>?9aϢTN^NuNVX yf4aغ3 y f>a./<aX3./<aX3 ydB y'c8 y0d.3B@09r hyB@09|y`T ydB y'c8 y0d.3B@09r hyB@09|y`>a y fy@>?9azT>/<aζX>/<aΤXN^NuNVJyff>?<`a8T>/<avX>BgaNT>BgaBT>Bga6T>Bga*T>BgaT>BgaTN^NuNVJyfJyg>/<$aX=|`^0n"|$ 02nSI$"-@`>a> n .@.H>aRn0.ym` >BgafTBWaN^Nu#NN/9Nu#NM/9Nu#NA/9NuNVH*n(n BG`|lRG0&@}"0+|f|mB` wg Wf>?</ NN\<`p ag Af>>?</ NQh\<l>?</ NN\<`>B?NR\`$ rg Rf>Bg/ NQh\<`B`@JFlB`8Bk 6B'@'@ rg Rf7|`7|Jnfk JL8N^NuNVBW/. /.aPN^NuNVBW/. /.aPN^NuNV>/. /.aPN^NuNVHN`BW/<qNRbX>/<qNRbX>/<qNRbX n2n B*n`&HHм @g H| `HRJf> /.NK XJL N^NuNV. /./<}0NSPN^NuNV./. /.NSPN^NuNVH*nSm m mH|R` `.NGJL N^NuNVH*n-fp`-g m p`Jf&-f>NZ+@fm`m-g0Hм+@}"f9}3g .}0NP-g>`>/-?NH\;@ Jm n m fm0`m p`Sm +m mH|RJL N^NuNVH>Nat*@ fp`b-gB@`V-g3  3p`8-gB0../. / NI|P``B0../. / NJPJL N^NuNVH *n(n ..-G`> ?/ /-/ Nf=@Bn` L2n gRnB@0.neJng L2n f =nU >/ aPX=@B0.ѭB0.B0.Jo -g` -o+m .JL0N^NuNVH *n-M B2. Ё-@(M`  gRe JL0N^NuNVH *n(n ..> ?/ /-/ Nf=@JnfU B0.ѭ -o+mB@0.JL0N^NuNVH BWN_##By.qa*n`N`RJgHHм @fJg2 "g 'fFH>/ RNX(@ f.|/ aVX H> M2GBRG.Ra`BG`RG M2GJg5pHHм @gJ5pg M2GBRGH`BWNP>BW/ RNRzXJ@g.R/<|aX`l>NP> ->f@>/ TNRzX|f>B?<NR\|f.R/<|a|X`$BW/ RNOjX|g.R/<|aVX`>?/ NXJf>*/ NXJg-|D.8?<NT>/ ?<Nc`\<f.}/ aX`^.H?/.aZ\.Ne2>RWNe(@./ NeX.a>/ ?<Nc`\<f`.a`|g`JfBaSy.Nz|f.}/<}a*XB/9?9N\>NOJL0N^NuNV|./NeX. /NdX.}/NdX.?< NT>NON^NuNVH*n y XRyJL N^NuNVH*n. (nGVfJL8N^NuNVHN`~>|fp`>Na08*@JnfU.q/.Ne`XJ@f U0`R`.q/.Ne`XJ@fU0`2>/.?Nc`\J@g3# 3p`U0JL N^NuNVBW?. /.a:\N^NuNVBW?. /.a"\N^NuNV>?. /.a\N^NuNVNO>NN^NuNVHBG`0м}".NORG|mJLN^NuNVH*n0-|g*.NP-g .N\rB@H+@+@Bm m>NP>JL N^NuNVH>.>Nat*@ f3  3p`NBF0|f>?<>NgT<l|>Na>N`JFf0``3 3pJL N^NuNVN^NuNVH*n0-| |f, -<o >/-?N`\>Gg mp`J-gJg-g;| `;| `>0- D@H/?NR\Bm +mB@JL N^NuNVHN`~>|fp`>Na08*@Jn fUJnfU.q/.Ne`XJ@fU;n 0``.q/.Ne`XJ@fU0`d>/.?Nc`\J@g>N`3 3p`0U>B-H?NR\BWB-H?NR\0JL N^NuNVBW?. /.a\N^NuNVBW?. /.a\N^NuNV>?. /.a\N^NuNVH>Nat*@ f3  3p`$>?-/. ?<BNgP+@U -JL N^NuNV>B?.a\N^NuNVH*nBnJ gh``BE-n `RRE nJg n %fJEo.?/. NXd\-n n n %@R DfBn n H|-@R Df n R Rn| <0fG n R =|<*f-M n=PT n R `8`*JnlBnH2. A|=@ n R <0m<9o|<.f BF n R <*f-M n<T n R `*`H2 A<| n R <0m<9oBn<lg<LfRn n R A-HH` RnJng <^r` <_(#.?<?< // N^ Jngp`pH`RnJng <^r` <_(#.Bg?< // N^ Jngp`pH`zRnJng <^r` <_(#.Bg?<// N^ Jngp`pH`&RnJng <^r` <_(#.Bg?<// N^ Jngp`pH`-M n-PX`-M n0|@B.T`H>?// NW X|`~H>?// NW X|`XH>?// NX X|`4.H?NXTRn``|C|5b@0@~ PN.Ne2:ElJFm:0.E=@JnfX .0f* n -f SE. nH?NXTRRn`..H?NXTRn0.SnJ@n.?/.NXd\n`..H?NXTRn0.SnJ@n`0.JL N^NuNVJnlp`0.=@ n -@>/. /.NhPN^NuNVJnlp`0.=@ n -@>/. /.NjPN^NuNV>/. /.a~P-@. Ne22.^AAo>/. /.aP-@ .N^NuNVH *n>. (n,g$Bl >/ ?N`\Gg lp`*B@`&`.H?NXT|fp` 0SGJ@fB@JL0N^NuNVH. *n Sm mH"m|R``.H?NYTJL N^NuNVH. *n BF:-fp`$JfV-fN>NZ+@+@fm`2m>NZhJ@gm@`;| H"mR`-gA+H +@ mR-gz>/-?N`\<Bm `n-g>< g -мb" -:>/-?N`\<+mBm `( -:>/-?N`\<;| +mFg mp`H|JL N^NuNVH>Nat*@ fB@`-fB@`pJL N^NuNVH>Nat*@ fB@`0|JL N^NuNV>aJ@g <q`BN^NuNVH>.^GORG>a*@ fB` >/ aXJL N^NuNVH (y~*T`ZB@0-BA2-@F@J@g>N]B`:B@0-ne `*~f>a*@ f>N]B`(M*U`JL0N^NuNVH n*PB@0. X@me n `F(MB@0. HH@B@H@B@0-n 9@B@0,F@9@( n ;n B@0-F@;@#~ PJL0N^NuNVH >.|?GG0@>N_*@fB`* R*@(M9GB@0,F@9@.Pa 9~JL0N^NuNVH *nQB@0-BA2-@F@J@g>N]p`(y~eeecd(T`e2 BA2-IHABAHAЁ" BB4,JHBBBHB҂b #~B@`n BA2-IHABAHAЁf T0(mB@0-F@;@ T*`* BA2,IHABAHAЁfB@0-lB@0,F@9@(`(#~B@JL0N^NuNVH *n.a>. ^GORG>a-@fB`J n(PPg2d`Sn Jn f`B0. B0. `%Sn Jn f>/.aXJL0N^NuNVN^NuNVN^NuNVH /?.?./ /. nN*@ мfB(n `%H|0|9o^G мfB JL0N^NuNVH-|*n<.H n. nfz` |SEJgJEf`h nf$z ` |SEJgJEfJEf-`*n<.JngJGlB@0D@> n P-"n R`B0H@B0>JGf JL N^NuNVH >.HμgR*y(G.Nz|f3  3p`>Bg/ N\ JL0N^NuNVH>Nat*@ fp`XJnfB@`N-g3  3p`0-g>/. / NaP``>/. / NbPJL N^NuNVH|BG` ~f ~0`RG|m3 3pJLN^NuNVp2.`F@H~B@N^NuNVHBG`>aRG|mJLN^NuNVH 0.8*@0.@BUB-+| BB> Bg/ N\> ?< / N\JL0N^NuNVH>.|e3  3B`0B@08*@-f3  3B` JL N^NuNVH *n(n >.B@=@=@``Rnnc L2n  fB@0.ncf>?.B@0.W B2.Ё//-/ Nf=@B0.ѭJnf3 3p`^=n`8Rn>?</<~/-/ Nf=@B0.ѭnb4 -o+mB@0.JL0N^NuNVH*n>?./. /-/ Nf=@Jnf3 3p` B0.ѭ -o+mB@0.JL N^NuNVH*n 0.8м-@~.a&M`RJg :fJgc .Am .On*K`K0.`BW/ ?<o n1GBG`BW/ ?<NNg\JgB@`0<>`d>ONgJgB@`0<>`J.?<=NgT>o n1GBG`,.?<ANgT>``||b@0@~ PN0JL8N^NuNV n am n zn n nHRJfN^NuNVH *n (n`RJff .JL0N^NuNVH *n(n `op`lp`JgJfHHAJL0N^NuNVH *n (nf .JL0N^NuNVH *n(M`RJf HJL0N^NuNVN^NuNVH *n(n `$H>a0H>a&op`lp` JfJfB@JL0N^NuNVH>.|am |zn|0JLN^Nu _B0Z"yCCbNC NNVH..,. Jf# <`Hc #B`:fzB`(xe 〼b`BJge`# JLN^NuJg .NuNV n=h.0n/0n/NgP/?.?<?NgPN^NuNV n=h.0n/0n/NgP/?.?<@NgPN^Nu#NA/9NuNVBBJlDRBJ lD RB0. -@0.2. An=@ .gDN^NuNVH?BCB..,. f# <`hlDRCJlDRCn8fzB`0l :HGH`xe`Jge`|fD# D`# JLN^NuNVH-n Jnnp` nop`0.R@8BGB/.Nl8Pl n -R /.NmX-@B/.Nl8Po.`/<D/.NmP-@SG/<A/.Nl8Pm`/<D/.NlVP-@RG/<D/.Nl8PlG|0H/NlvX-@`/<D/.NlVP-@RFDm/<B/.NlVP//.NlP-@/<D/.Nl8Pm -|ARGJGl4 n 0R n .R JDlD|` n 0R SFGnBF`j/.NmX:0|0"n R Gf n .R 0H/NlvX-@//.NmP-@/<D/.NmP-@RFDm n BR .JLN^NuNVH-n Jnnp` nop`0.R@8BGB/.Nl8Pl n -R /.NmX-@B/.Nl8Po.`/<D/.NmP-@SG/<A/.Nl8Pm`/<D/.NlVP-@RG/<D/.Nl8Pl|0H/NlvX-@`/<D/.NlVP-@RFDm/<B/.NlVP//.NlP-@/<D/.Nl8Pm -|ARGBF`j/.NmX:0|0"n R JFf n .R 0H/NlvX-@//.NmP-@/<D/.NmP-@RFDm n ER JGl0D@> n -R 0H |0"n R 0H H@|0"n R n BR .JLN^NuNVH..,. Nn LN^NuNVH..,. NnLN^NuNVH..,. No LN^NuNVHJl| .D-@`BFJfB`^~` .-@R .f` .-@S. g .-@޼@ JFg .JLN^NuNVH .м<JgJFlB`V .:|oJEg <` <`0..μ|`RFJFm`SFJFnJEg D. JLN^NuNVH..,. No LN^NuNVH..Nm LN^NuNVH..,. Nm LN^Nu<NuJg NugR kjklf`>k^g>k^g2k8<d,&B<ރeNuRid~S<Nu.NuJNu:ڼ.gNugRghEDvi^E]HE:BB8HD&HC؃HF&؃BDHDHGHFHEބj ޼gNuSiex@ބއdRgNu~NujJ<Numc68343 floating point firmware (c) copyright 1981 by motorola inc. Stack Overflow$C runtimeCON:LST:yJyMyPySyVyYy\y_ybyeyhykynyqytywyzy~yyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyzzz z zzzzz"z'z,z1z6z;z?zDzIzNzSzXz]zbzgzlzpzuzzz}zzzzzzzzzzzzzzzzzzzzzzzzzzz{{{{ {{{{{!{&{+{,{0{4{8{={A{E{I{L{P{T{X{\{`{d{h{l{p{s{x{|{{{{{{{{{{{\\\\dddddddddddddd****************************************************************************** * A68 - MC68000 ASSEMBLER * ****************************************************************************** (C) COPYRIGHT 1985 ROBERT G. BROWN ALL RIGHTS RESERVED A68 VERSION 1.0 PLACED IN THE PUBLIC DOMAIN WITH THE PROVISION THAT IT NOT BE SOLD FOR PROFIT WITHOUT THE AUTHOR'S CONSENT. **************************************************************************** *A68 VERSION 2.0 IS NOW AVAILABLE FOR $30.00 POSTAGE PAID. SEND * YOUR CHECK OR MONEY ORDER TO: BOB BROWN 53 CLIFF LANE LEVITTOWN N.Y. 11756 A68 VERSION 2.0 SUPPORTS MANY OF THE FEATURES NOT SUPPORTED BY VERSION 1.0. * - GEMDOS SEGMENTS ARE SUPPORTED ALLOWING FOR SMALLER FILES. * - EXPRESSIONS MAY CONTAIN + AND -. * - TWICE THE SPEED OF VERSION 1.0. * - UPPER AND LOWER CASE ARE SUPPORTED. * - SP MAY BE SUBSTITUTED FOR A7. * - DBRA SUPPORTED. * - EQUATES TO LABELS AND PREVIOUS EQUATES SUPPORTED. * - <*> CURRENT ADDRESS OPERATOR SUPPORTED. * - IMPROVED ERROR REPORTING * - PRINTED MANUAL EXPLAINING OPERATION, 68000 ADDRESSING, GEMDOS ADDRESSING CONSIDERATIONS AND GEMDOS INTERFACING INCLUDED. ALLOW 2-3 WEEKS FOR DELIVERY. VERSION 1.0 DOCUMENTATION. A68 TAKES A STANDARD 68000 ASSEMBLY LANGUAGE SOURCE FILE WITH THE EXTENSION .A68 AND PRODUCES A GEMDOS .PRG FILE. THE COMMAND LINE TAKES THE FORM A68 filename (NOTE: DO NOT INCLUDE THE EXTENSION IN THE COMMAND LINE) THE SOURCE FILE SHOULD CONTAIN STANDARD 68000 ASSEMBLY LANGUAGE AS DESCRIBED IN THE M68000 PROGRAMMER'S REFERENCE MANUAL. EACH LINE TAKES THE FORM: [label] opcode[.ext] [source],[destination] [comments] or *[comments] LABELS - must start in the first column with a letter. They are valid to 6 characters and contain letters and digits. Lower case letters are converted to upper case by a68. A label must be follow by a white space character (TAB or SPACE). COMMENT LINES - are indicated by a * in the first column. OPCODE - must be preceded by white space. The ext is .b for byte .w for word and .l for longword. If left out .w is assumed. The branch instructions use .b and .w for short and long branch. OPERANDS - must be prceded by white space and separated by a comma. The addressing modes follow the standard as follows: SP is not accepted in place of A7 or a7. The absolute short addressing mode is not supported by GEMDOS. Absolute long is assumed as the default unless .w is used as the extension. The address register with displacement (with or without an index) mode is treated as follows: d(An) d is treate as an absolute displacement. The program counter with displacement (with or without an index) mode is treated as follows: d(PC) d is treated as location to which a displacement is calculated. For the displacement with index modes the length of the index must be specified by the .w or .l extension. # indicates immediate data $ indicates hex (i.e. #$ff is immediate data 255). Only simple expressions are accepted by version 1.0. (no + - etc.) THE FOLLOWING PSEUDO-OPS ARE SUPPORTED: EQU label EQU value use the EQU to reference absolute memory locations. The locations referenced by a EQU are not relocated by GEMDOS. For V 1.0 must equate to a decimal or hex number. ORG ORG value use only as the first opcode in a file to create an absolute file without the GEMDOS relocation information. DC.[ext] DC.B 'string',$hexvalue,decimalvalue etc. defines constants of lenght .ext. Moves to next even address after DC.B. DS.[ext] DS.l value reserves value number of locations of length .ext. DCB.[ext] DCB.W count,value defines constant value count number of times. A68 ERROR MESSAGES ARE REPORTED AS THE SOURCE CODE IS DISPLAYED ON THE CONSOLE IMMEDIATELY AFTER THE ERROR IN THE FORM <**En**>. 1 - Illegal opcode 2 - Duplicate label 3 - undefined label 4 - illegal operand 5 - illegal size 6 - branch out of range 7 - displacement out of range THE SYMBOL TABLE IS LISTED AT THE CONCLUSION OF THE ASSEMBLY AND A68 WAITS THE A SPACE BEFORE RETURNING. IF YOU FIND A BUG PLEASE REPORT IT TO BOB BROWN 53 CLIFF LANE LEVITTOWN N.Y. 11756 ocations referenced by a EQU are not relocated by .  t'..  tLOGO PRGt ({LOGO RSCt `C0$ o #` (.@#` ( ШШм//??<JN)J@g /N)X`NAN/< N).N)/N)X#`N*X 9`Nu Nu 9`Nu 9`Nu#`NM/9`Nu#`NN/9`Nu o BNu o0/H.X,X.Nu y8B2/剂oB@0Nu y8B0/00Nu y8B0/00Nu y8B0/ 0Nu y8B0/刀o Nu y8B0/1Nu y8B0/1Nu y8B0/!Nu y8B0/B20ҹ` AN"/0<NBNu#`NA/9`NuNV30.|HмC0-@=|` nH2n2RRn nm.PNB@09N^NuNV#{J#{N#{R#{V#{Z#F{^#{JP> aF3pN^NuNV>a*pN^NuNV33 3 333333 3 333 3"#$3(3*>a n<0$ n@0&B@09N^NuNV#3 >aTN^NuNV#3 3>a,N^NuNV#3 3> aN^NuNV#3 3>!aN^NuNV#3 3>(aN^NuNV#3 >)aN^NuNV#3 33333>*aLN^NuNV#3 >2a,N^NuNV33 3 333333 >3aN^NuNV3# >4aN^NuNV>Ma n0 n 0 n0 n0"B@09N^NuNV3# >NaTN^NuNV>OaD n0 n 0 n0 n0"N^NuNV## >Za n0B@09N^NuNV33 3 33>daN^NuNV33 3 33>eazN^NuNV3>fabN^NuNV3>gaJN^NuNV33 >ha* n 0 n0 n0 n0"B@09N^NuNV33 3 333>iaN^NuNV3>kaN^NuNVH *n (n33 3333>la^888 8"JL0N^NuNV#>na(N^NuNV33 >pa n FB@09N^NuNVNJ@fXB@093>N3 N3BNJ@f"NJ@gNf`3 ~N N^NuNVN.N:N&N>Nd>N`NNz`.^NJ@g>N>N~N(N^NuNVaBNJ=@lNfN`N0.SnJ@fNN^NuNVNNaN^NuNV>NnN^NuNVNNN^NuNVNB@09~y0gBW`>NN^NuNV>@aN^NuNV>0aN^NuNVH>.>N>N<`Ny~g >~NL>NSFJ@gN4JLN^NuNVNJ@fNN>NnN^NuNVN>@?9~a6TN^NuNVNJ@f>N>NbJ@fB@`pN^NuNVaJ@gNNB@0.n fNaJ@f Nf`NaJ@f NNN^NuNV/9FdN\/N0dX/N:hP.N6N^NuNVN\.N.N6N^NuNVN\.N.N6N^NuNVN\.aN^NuNVNN nNN^NuNVH>N>N`N nNN"SG>NJ@gN4JLN^NuNV.RaN^NuNV/9F`/.N8Pl/.N:X` .N^NuNVH*npH/N9PX//N9X>/0H/N9PX-@/N:P/aX/N8Pl .`NxJL N^NuNVN\-@.Ya~/N9X>aT>NN^NuNVH *n(n /9F`/ aFX(/N8PfNn.a**//N8P/N9XJL0N^NuNVN\-@N\-@.Q/YaXH/N9PX.N6N^NuNVN\-@N\-@/./Q/YaDPH/N9PX/N:hP//.N:P.N6N^NuNV3*N^NuNVN/9F`N6/N8Pl/<`/<@N6/N8P.aN^NuNV.Pa.N6N^NuNV.ajN^NuNV.Ha>N^NuNVN6>NN6/N:X.N6N^NuNVN6/N?N4T/N8P.N6N^NuNVN6/N?N4T/N:P.N6N^NuNVaJ@g.N6/N?N4T/N8PoBW`>`aJ@oBW`>NN^NuNV>~N?N^TJ@gBW`>NN^NuNVaJ@g.N6/N?N4T/N8PlBW`>`aJ@lBW`>NN^NuNVa >NN^NuNVaJ@g,N6/N?N4T/N8PmB@`p`aJ@mB@`pN^NuNVaXJ@g.N6/N?N4T/N8PnBW`>`aRJ@nBW`>NN^NuNV/9F`N6/N8PfNnN6/N?N4T/N8P.N6N^NuNVN6/N?N4T/N:hP.N6N^NuNV.aN^NuNVaJaN^NuNVNN>aN^NuNVa$a:N^NuNVaaN^NuNVaaN^NuNVNNNNN4N^NuNVN>NJ@g>~NJ@fB@`pN^NuNV>~N?aTN^NuNVHN$&>NьBWN*yn> NьN$L./<^NALXJL N^NuNV/<P09*|3*H/N9PX/pH/N9PX/0.H/N9PX/N:hP/N:hP/N8P/N9XN^NuNVN>~a N4N^NuNVH>.JGf Np`~ND>N>a8>a8:>N>N<JEf>?NT>NL`0` >N<SEf>N>?NT>?NT0R@JLN^NuNVHNJy~gN3~>NbJ@fNfNJ@f>~N>NL`N>N>NaJ@f"N>?9~NT>NL`N>>NJ@f>~N>?NT`R>N>N>NaJ@f&>N>?9~NT>?NT` >N>`>N<JFfN4NJLN^NuNVN3~~NN^NuNV>0?9~aTN^NuNV>@?9~aTN^NuNVN\.a.N6N^NuNV/9FdN\/N:hP.N6N^NuNV/9FdN\/N8P.N6N^NuNV/9Fd0<H/N9PX/N8P.N6N^NuNV/9F`N\/NX-@/N8PfNf/.N6/NX/N8P.N6N^NuNV/9F`N\/N8PlNfN6.N8.N6N^NuNVN\.N9.N6N^NuNV/9F`N\/N8PnNfN6.N94.N6N^NuNV/9F`N\/N8PnNf.DN94/N6/N94X/N8P.N6N^NuNV.zaN^NuNV/9F`N?N4T/N8Pn N>/<F>NtX?N2TN6/N?N4T/N94X/N:hP.N9.N6N^NuNVH>.<. >N*J@gNf`JFfN>N<|@SGDnB@0JLN^NuNVH>.BF` RF>N>JGf0JLN^NuNVH>.<. JGf~>NB@3~:`HJEf>N>N:3~` >N>N8>?NT:>N<0SGJ@gJFfNB@0JLN^NuNVH>.<. :. JGf~>N`*>N>N8>?NT:>N<0SGJ@gJFfNB@0JLN^NuNVNta f9^H>NN^NuNVN>N*J@g >a ~`>~N3~N^NuNVN^ |^#n/N6/N9XH _NNN^NuNVN>a >NN^NuNVH>.>NbJ@ga @B@09}6`>aJLN^NuNVH>.<. :>N*J@g>N*J@g>NJ@g6>NJ@g*>N4/?N4T/N8PgB@`p`>NJ@f >NJ@g>?NVTJ@gB@`p`bFgB@`p`VB@`RND>N*J@f>>N>?NT?a&TJ@g>N>?NT?aT`B@JLN^NuNVH>.>NJ@gB@`2>NbJ@g>~a  ynJgB@`p` JGgB@`pJLN^NuNVN>a>NN^NuNVN>N*J@gBWaD`4>~NJ@fBy~`>~?9~a2T?SWaTTN^NuNVNN>NN^NuNVN>~N*J@g aNN`>~N3~N^NuNVNN>NbJ@g0NazN>Nь>~NьaN``>~N?NT3~N^NuNVHa~>N>NbJ@g&aTy}6cN0S@HѹnNN`*>~aGlN>~?NT3~JLN^NuNVN>~N*J@g"aB@09}6S@H@B@H@ѹnNN`">~?9~aT?NT3~N^NuNV>N>a|N4N^NuNVN>NbJ@gBW`>NN^NuNVHNN>NbJ@g0Na>~NьN>NьaN``JJy~g.>~BgaT>N?NT??<azX`N>N3~JLN^NuNVHa>N>?a,T<N>?NTNJLN^NuNVHav:N>?aT>N<>NbJ@g >N<>?NTNJLN^NuNVNN>NbJ@ga>`a>NN^NuNVHNaN>Nь>9}6f aB@`v*yn>~Nьa~B@09}6G3`3`4y`@Sy`Dn*>/ /9nNAPRJ@fp`RyJy`fByB@JL N^NuNVHN>3`6>~N>?aTJ@gp`(>~N3~RyJy~fByB@JLN^NuNVN>>~NJ@f>~NJ@fBW`>NN^NuNVH>N=@BWN`N>NJ@fNJy~gD>~NbJ@g>~N>>NL`>~Bga4T>>~NL`@>~NbJ@g>~N<>?NT>`>?9~BgaxX>>NSnJ@gPN4JLN^NuNVN>Nb>NN^NuNVH>N>aha.N>`B>N<>NbJ@f>?9BNT?N2T>Nь>N>JGfaN`JLN^NuNVH>NJ@gN`JN>N>>N`N>N<>?NT>Sn>NJ@gJLN^NuNVHa>N\/N9X<0GlNfN>NbJ@g2aZy}6cN0S@Hѹn0GR@3}6N``2>~a FlN>~?aT>?0WRWaTJLN^NuNVHN\/N9X>o0`NfJLN^NuNV>NN^NuNV.a N`N^NuNV.a N`N^NuNVHNta*yn`H? nNTR 9nB29}6ЁeaJL N^NuNVJy~fNfaSy}60.HѹnN`N^NuNVaJy}6fNfN^NuNVa>~NьaN^NuNVH>. |^#n/Bg?NT?NT?NT?NX _JLN^NuNV>~NJ@gad`>~a ynJfNfN^NuNVB@3}6"|^#n3{fN^NuNV#^nBy{fN^NuNVRnN^NuNV` 3>a ynH>NdJ@fN^NuNVa>NьaBy>Jy}6fB@` yn -faa yn .faaJy>fB@`f ynH>N|Ef$a\ yn +g yn -fa@aJJy>g ynJgB@`.^N5D#~pN^NuNVN.& N?NTJ@g >NLNa2a NaJN^NuNV.^NJ@f NNN^NuNVN>Nd>NN^NuNV>N>N~N(NN^NuNV3~N^NuNVNt>~NJ@g,B@33~NN>/<^NXN>J@fNT`B@09~y\f>/<NXNN^NuNVNNN^NuNVNtaN>J@f>{h?< NT?NT3~gj`T>~N3`6Bya|B@09y~fNNBW/<^NXNJ@g>~N3~fNN^NuNV`Nذ|gNTN>J@gN^NuNV.&?9NT?NTJ@gxNfNJ@f>N>NJ@gJN$&>N>NьN$LJy}6g"N> 9"^fNN3`:>Nyf&NfNJ@fa<`NfNJ@gNfN^NuNVB@09:H@B@H@/N9PX.NDN4N^NuNVNN` >@N/rNJ@fN4N^NuNV3<>NN^NuNVBy<>N N^NuNV>~?9z*NT3z*N^NuNV>z*?9~NT3z*N^NuNVNJ@g>LN`N<.)ar.)"ahNJyz*g >NNN^NuNVNJ@gByz*`N<.)a"NJyz*f >N NN^NuNVHN>`>N3~ nN>N>JGfJLN^NuNVNNNN>?9~aTN>NӰN^NuNVH>N>`NtBW?9~a,T>NSGJ@gNJLN^NuNVNt>~a:J@f>{j?9~NTJ@fBW`>NN^NuNVNt>~NN^NuNVNNt>~N?aTN^NuNVH>.<. >a3`f0>N>N>?9{j?NFXNN`>?9`NTJy/<҄B0r//</9ONNN2NJLN^NuNVNNt>~N?NT3~N^NuNVNt>~Nl3~N^NuNVNNN>N??<NT?NFXNNNN^NuNVHNNڨN>`>N>N&`^NܺJ@fTN>,/<҄B09^r//<҄?NTH@B@H@r//<ь/9O2NNfJ@f>N>>NLJGfpNNJLN^NuNVNNt>~N?NTNN^NuNVNNN>NڨN4NN^NuNV> ?.NT>N>PN?NT3PNN^NuNVH>9P`*>N>Nnf >N`>N>JGfB@JLN^NuNV>Nd>NNڨ>NNjN^NuNVNN>N*J@gNf>~N>aD>~N>a|N>~?9{hN?NFXNNN^NuNVH>.>NbJ@gNf`>N>NT>N>JGfJLN^NuNVH>.`$>N>N*J@gNf>N>JGfJLN^NuNVNta3~N^NuNVN>?.NT>NLN^NuNVNtNBW?9~aTNNN^NuNVH>.>{h?NT<g~>?aTJ@flN0. @>N&>?NTN.> RW?aT=@>aBJnf(NDN> RW?NT?aTNJLN^NuNVH>.>N*J@g> ?a8T`&<`> ?NT?aT>N<JFfJLN^NuNVH>. `,>N<`>Nnfp`>N<JFf0SGJ@fB@JLN^NuNVHByF>9L`*>F?NT?NT3F>N>JGfN>9L`>>{h?NT?NT>N>?NT?a6T>N>JGfNBW?9FNתTNJLN^NuNVH>. >NJ@g\>{h?NT<gHng>?9FNT3F>?aTJ@fR>aNND>N>?aT>N*J@f*`$ND>N>?.ahT>N>JGfJLN^NuNVHByFN>N*J@g>~N3~N`>9L`x>{h?NT?NT>N>aJ@g@>FN>?NT?aTJ@f>N>aRN3F>N>JGf>~N3~Jy~fbNBW?9FNתTNJLN^NuNVH>.>NJ@g>~NGgB@`p`8>N*J@f*`$ND>N>aJ@gp`>N>JGfB@JLN^NuNV>{h?9~NTN^NuNVNta>NN^NuNV3L~N^NuNVNt>~N>NN^NuNVHNN>~NJ@g>9R`ajJ@g>9{h`NfN>N?9~NTJ@g,>N?9~NT>?9NN?NFX>?9~NT>?N?NFXNNJLN^NuNVa@`*N"a6>~NzN>?9~NTNJ@gNN^NuNVN>>~NJ@fNfN^NuNVaNNN>N?NתTNp>N?NתTNBNֈN^NuNVaNp>N?NאTNֈN^NuNVafN>N?NאTNֈN^NuNVHNJ@gJJyXg$>?9XNT?NאTByX`Jy{dg #}H`N `aN>`>>N3~>NT>{j?9~NTJ@fNF>N>JGfN>N?NתT>N?NתTNBNֈJLN^NuNVaf`>@?9J?9~NFXaJ@fN^NuNVa6`>J?9~NTaJ@fN^NuNVNN&N&N^NuNVa>"N>@N.NN^NuNVHNJ@g>NN`$>,?9@NTJ@g >@N/rNJ@f`a|`N>JN?NT>?NTJ@g>/</9NNP`>NN`>z,?9@NTGf>{h?9@NT<g aNL>?9@NTN.>{j?9@NTJ@g .Na>@N&`NܺJ@f .Na` NfJ@fNJ@fTN>N>NLNJ@fNNJLN^NuNVaBW?9{j?9{hafX>N?NתT>N?NתTNN^NuNVaNaaHNN^NuNVaNBWN?NתTNN^NuNVaa NN^NuNVNp>N?NתTN^NuNVaLa NN^NuNVN>N?NתTN^NuNVaNNaaNJ@fN>,NڨN>,NjN>z,Nڨ>z,NjNN^NuNVaNLNN^NuNVaZ>{jaN?9{j?9{ha`XJyfBWaF` NNNN^NuNVN>NdN>Nڨ>aN^NuNV>@?9,?<NT?NFX`>Jng>z,?9~NTJ@f >N>?9z,?9~NFXa0J@fNN^NuNVN>N*J@g>~N3~N"N^NuNVNJ@gN`aN^NuNVa>,aN^NuNVa>{haN^NuNVH>.BW??a XJLN^NuNVH>.<. N:`f>N3~>NTN"Jn g>~N&NJ@g>NڌJ@f>NڌJ@fNfN>N:JEfJLN^NuNVNJ@fNNB@`>N>N3~>NJ@fNfN>N>NLpN^NuNVN\/N9X-@ .f o>NnNf .N^NuNVH>. nn0`0.R@JLN^NuNV>NN^NuNV/<ON\-@/N X/N8PnNXN .`NfN^NuNVNNJN^NuNVN3~N^NuNVJyfN>N>N>N3N^NuNVaN>NJ@f&N>NJ@gNNV`NfN^NuNVadaaN^NuNVN>N4N^NuNVHaa/N9X>nnJGlNf0JLN^NuNV.F`/9F`NX.F`N N^NuNV>F6/< aXN^NuNVa^/9F@ad-@/N X/N8PnL/9F@a@-@/N X/N8Pn(NXNi@./.NDXNi@a`NfN^NuNVN\/N:X-@NX.NaXN^NuNVNXNnN2N^NuNVNXNnNaN~N2N^NuNVN\-@NX.NaN^NuNVN$.NDN2.NDN`.NDNV0@"|O>.NN>NɦN>NN">NN^NuNVN~>NɦN0@"|ON.NN.NDN6.NDN.NDN.ND>NN^NuNVNXNN2N^NuNVNXaN2N^NuNVa2/N:X.NN2N^NuNVa.NN2N^NuNV>N=@NX>N~adN^NuNVa.N N2N^NuNVa=@NX>Nfa&N^NuNVHaa>a>N$&N>NьN$LNX.O>/<^NALXJ@fN`f.OB/<^NALXJ@fN~`F.OF/<^NALXJ@fN>`&.OJ/<^NALXJ@fN&`Nf>NfaTJLN^NuNVaNXa-@.a/NXaN^NuNVN\-@NXN2./.NXaN^NuNVN\-@NX.N$/NXaN^NuNVNXNN2N^NuNVaN2/a/N:P-@/9F`N$/a/N:P-@/N8Pf*/9F`/.N8Pl.H`.F`N6`r/9Fd/./.N8P/N0dX/N:hP//<GN:P-@/9F`/.N8Pl/<H/.N8P.`.N6N^NuNVN>NN^NuNVNXNF2/<aXN^NuNV0. H/N9PX/N\//<AN8P/N8Pnd0. H/N9PX/N6/N8Pn@/9F`N6/N8Po(NXNi@N6/ nNXNi@a`NfN^NuNVN$.N6N^NuNVN2.N6N^NuNVN$.NDN2.ND>NN^NuNVN`.N6N^NuNVa( @H>WNN^NuNVHa*@N^NJL N^NuNVN2NN^NuNVa NN^NuNVH>N>>NJ@f$NNa&SG>NJ@fN&`NJLN^NuNVJy~g*>~N*J@g>~Nь` >~NN^NuNVNNaN^NuNV>~N҄NNN^NuNVN.4NJ@gNR`(BWNR <F#n.NA3}6N`N^NuNV.4NJ@gNR`&N"R `N!v#`nNNN^NuNVN.4NJ@gNR`BWNRNN4N^NuNVaL`4N.N6?<N T|gB@`p=@NrJnfNJ@g3N^NuNVByN^NuNVH*n`H>a H>NjJ@g> a JL N^NuNV`N!NJ@g . f > N. H>NN^NuNVH.N".^?<.NTJ@f./<^NA"X.^NAH*@^`.FD-H?NTJ@f S^b.NA| oNfJL N^NuNVBW/9nN(X3|nNrN^NuNVBW/9nN)lX3|nNfN^NuNV>N(İ|nNN^NuNV>?</ N(\|gN*N^NuNV>?</UN(\J@gB@`p3NgB.` . fa| .HN^NuNV |F2y/a _Ry09|mN |F2yBN^NuNV3BByByNaaaN^NuNV.Na.nN)|nNrNN^NuNV м Tм=@|lNB0.N^NuNVN`,R/9a _09>noNBRy>JyNgaNNBN HN a#T` yH>aR yJfaN^NuNVvNNN<.NaaHNJ@f*Nt>@?9,B@09~3?NFXaDN3R`NzJyRfN(NN*NN^NuNVNNN<=y|.NaaJ@gNZaNN?NתTNp>N?NתTN>Nڨ>N?NתTN>z,Nڨ>N?NתT>N?NתTa4N N*3|NN^NuNVBW/9nN(X3|nB@`p=@ga0.N^NuNV.NaaJ@gNf.n/NAX.NaaJ@fNf./9nN)X|nNfNN^NuNVH.N"*|^Jg& -:fH>WN)T|nNfTJf\B-.N) |nNfNJL N^NuNVN(T|A@|:N(T>RW/N)8X.Nt3~N^NuNV.N(fNBW/9nN(~X|o8N>/NtX?NT>NLN(|o`N^NuNVNJ@gN$&N$L` .N" ynJg yn (:f0 ynJ(f$.N/<FG/9nNA"P/NA"Xa$N4N^NuNVpN^NuNVHN>N?L-@N>N?L./.NX*@0y2"n2TT0y4"n2JL N^NuNVN>/<GN?L/N:P.N//<IN:P/p H/N9PX/N:hP/N9XN^NuNVN>/9F`N?L-@/N8PlNf/. nNX/N9XN^NuNV.aN^NuNV.aN^NuNV>{j/9OZNtX?NTy@gB@`pN^NuNVB@3.3*3(3&3$3 aJ@gp`p333afN^NuNV n g> Nf> a33By3  By"N3`3By33z6N09{l3`yfp.OfNt>/9O^NtX?NT=@gD>NJ@g63qBy3>N4/N9X3z6NN^NuNV=ya>0.3a>3z63 By3N0.N^NuNV3By33z6N=ya@3{la@0.N^NuNV3By33z6N=yaB3{laB0.N^NuNV3By33z6N=yaD3{laD0.N^NuNVH0. 3`>a$0.3`>aV0. 3`>a y`f.ObNt>/9O^NtX?NT=@g>NbJ@f>N(|fBG`>?RWNT=@>NJ@g/<?.N4T/N8Pmf/<P?.N4T/N8PnH>N4/N9X?0Gz60RG|mx3pBy3NJLN^NuNVNrNN^NuNVaN~3a2N2NN^NuNVNXN~N^NuNV>a>aTN^NuNV n32 n34 n0(y6f n0(y8g n> n?(N{T3a, n36 n38>`?9`?9`aXN>?9`?9`aXN^NuNVJya,g Bya,N|N^NuNV3 3|3D3 fN^NuNV09`N^NuNV09`N^NuNV09`N^NuNV-n nf.aF/. ?<N\`Jnf-|aF3333z6 n3 n3" n0"n2)AS@3$ n0("n2)AS@3&NN^NuNV.?<aHTN^NuNV n0.1@|H"n3@ n1n nBh n1y` n N^NuNV.z6Nb.{lN. NR.Nr3z63z83z:3z<3z>3z@3zB3zD3zF3zH3zJ3dBy3 3N09{lR@3~09{nR@309{S@33333{3{33{zf3'3{r3{tBy`=y{` Ry` nn3a3&ByByN3a.`/<`/<`/<`?9aa.`/<`/<`/<`?9aa09~H`3`09H`3`Bya,Bya.N^NuNV nf09` nf09`pN^NuNV3eByByNN^NuNV3 3ByBy 3"N n 0 n0 n0 n0N^NuNV>ap=@> a=@Jn g > a=@3 3"0.nS@3$0.nS@3&3r3ByaR>a>avJn g>aN^NuNV>?9~B/<aaN >?9~B/<aa0 3  3 "0. nS@3$0. nS@3&3(3*0.nS@3,0.nS@3.3z6aN^NuNVH*nNr3333 `@0.n3"BG`5pH|2Gz62RGnmN0. H0.nmJL N^NuNVNr3  aNn 3". H|3z6333NN^NuNV3m33.aN.aNanN^NuNV# a63a03a2Bya4N^NuNVJya0gJya2gBya2B@=@=@=y~=y.Q/.NXJ@g`.Q?<afTN~ ya0f.Q/9O:aX`.a6/Q?<a\3a:3a n ?(Bpnмa/a* n > n ?(/.0.мa/a 0.@H(@ pn@H*@ n : n ;h n 0"n 2)AS@;@ n 0("n 2)AS@;@BTBl n 0(S@9@ n 0(S@9@3z6aJL0N^NuNVBBW/.N(X=@H|nN v>H?< /LN(\|nN 0.Ly`gN 0 9O:gN. /NNtXJ@f63a4.NNBya4. /N?<N\`. X/R?<N\ n Jhg n Jhg n 0("n 2)A=@J n 1| n 0(|H`@=@F`@>H?.F/LN(\|nN .L/. Bga\ n Rh n 0(nJm>HN(N^NuNV>?. /.N(\=@|nN 0.n l" ya0fBWNBBgaTN*N^NuNVBBW/.N)lX=@H|nN v=y`L.N/. ?<N\>H?< /LaT\ n 0("n 2)A=@J n 1| n 0(|H`@=@F`4.L/. ?<a\>H?.F/La\ n Rh n 0(nJm>HN(İ|nN N^NuNV._`a3a2N^NuNV.a8aN^NuNV.O6NIVNX.Q/<2?<N\N~/Q/<^ nNPN~N2NN^NuNV09`N^NuNV09`N^NuNV09`N^NuNV09`N^NuNV09`N^NuNV>a6=@N>ab33By3 3 "3 $3&a:>aN^NuNVN>aX. aay S@3$a?09"_R@3&aJ@g3 33`P09$3,3(09 303$09"323.3&*33ByaN^NuNVN>a. aZa\3,a3z8a3z6aN^NuNVN>aZ. aa3(3,a.J@g8B@3*3&3$3 3By3a`Byz63z8aN^NuNVN>>N?b=@>a">N?b=@>N?b>?.?.a"XNN^NuNV>`Nɦ>`Nɦ>`Nɦ>NN^NuNVHN>aN=|IBG`Jyg0@@Hм .aRGnmaJ@gp `p33ByaJLN^NuNVN>a. aa3$a3&aJ@gBy3`33Byz63z83 3aXN^NuNVN>>N?b=@>N?b=@>N?b>?.?.aXNN^NuNV>`Nɦ>`NɦN>Nɦ>NN^NuNV3jBy3>?N3z6N3{la.NN^NuNV>a.NN^NuNV>a>F,?<?<aX>?<?<aXJyfB@`pN^NuNVN^NuNV3By33z6NN^NuNV>Wa0.@|f>`>ar=@33By092n3 094n 3"092n 3$094n3&ab3a2>aN^NuNVapJ@gLav3g333z6092y3 094y3"a N^NuNV3By33z63 z83 z:3z.g|. g0D@`0JLN^NuNVHNJ@gX=y`=y`>?<?<aX>a=@NR:VEHŋHŋHENR<VF0HZ<|g E09`S@`H*@0HDS092y303 094y323"~`b>RH?aT?092W09W0G 0RG>RWRH?aT?094W09W0G 0RG|m33Bya>?.?.aX>aJL N^NuNVN^NuNVN^NuNV.2a 3a2N^NuNVH*nN~>a=@>?-?-?Bg?<?<a >aTJL N^NuNV9DHN^NuNV9DHN^NuNV9DHN^NuNV9DHN^NuNV9DHN^NuNV9DHN^NuNV9DHN^NuNV9DHN^NuNV9DHN^NuNV9DHN^NuNV9DHN^NuNV9DHN^NuNV9DHN^NuNV9DHN^NuNV9DHN^NuNV9DHN^NuNV0<H`N^NuNVaHN^NuNVH*nNBW/ N)8X n f.N`.O6/<FJ/ NA"P/NA"XB-(N.U/ (/ NP.NA>` M2GBSGJGg.FM5pH?NTJ@g.(/ NA"X0.JL N^NuNVN>83aNN>>N?b3aP>N?b3aR>N?b>?9aR?9aP?9aNNh\NN^NuNVHN>8>Nh*@>NɦT>NɦT>Nɦ>NJL N^NuNVH>N>N!^N=@=|NV` N`N~=@`=|``J@gܰ|g|gNUN$&N>`&>N3~NGN>N>gN&JGfN$L>NS4=@>a333}6092y3 094y3"BF`" ynH|2Fz62RnRFy}6eNU>NS4>a JLN^NuNV3By33z6NN^NuNV.U/Y/]/QN 094n>092n?.N|T=@g-|-|`N/N6/0.29AAH/N9PX/N8P/N8P-@N/N/N6/N:hP/09@nH/N9PX/N8P/N8P-@.ND.ND>WNN">WNN"JngBW`>NN">NN^NuNV0. йaTм @0N^NuNV0.йaTм @ PgB@`p=@>BgaT0.N^NuNVN$&.NDN>N,B9g.^ | 2. ҹaT p/NAXN$LN^NuNV | 2.ҹaT p./9nNAX.nNt>N$=@ n ~0.N^NuNV#aTNJ@g>`> ?<aTNV>W ?<aT>N$/aX>N2/aX>N`/aXN^NuNVH#aT>aJ@gFNXN>ajJ@gN`> aVJ@gN~ `RG>a@J@g0`"N`2N~`*N>`"N&``| gذ| gڰ|gܰ|g.Y?<aTJ@g".Q?<avTJ@g./.NX.?<aPTJ@gr/.0<H/N9PX/N8Pl0<H/N9PX-@/.0<H/N9PX/N8Po0<H/N9PX-@.N N2`:>BgaT>BgaT> BgaT~ ` >BgaTRG|mJLN^NuNV#aT>N/aX>N6/aX>N/aX>N/aXN>W ?<alTN^NuNV#aT>atJ@gNX> a`J@gN`&> aLJ@gN<`> a8J@gN^.Y?<aTJ@g .N.Y?<aTJ@g .N .Y?<aTJ@g".Q?<anTJ@g./.NDXN2`0> BgaT> BgaT> BgavT>BgajTN^NuNV3aXNb=@Nb=@Nb=@>?<aT?NT=@>NZ>?< aT?NT=@>?< aT?NT=@>?.?.NT:X. ?<NVT n> n?( n?( n?( ?.?.?<NZ BWNV>?.?.NT:XpN^NuNV3 aXNb=@Nb=@N=@>?< aT?NT=@>?<aT?NT=@>?<aT?NT=@>?.?.NR6X. ?<NVT n> n?( n?( n?( BgBg?<NZ n0(@"ni n> n?( n0(WSW n?( n?( Nb\BWNV>?.?.NR6XpN^NuNV3aX>?<aT?NT>NSt=@. ?<NVT n> n?( n?( n?( Bg?<?<NZ BWNV>NStpN^NuNV0.H |0@0.H H@|0@B..Y | 2. ҹaT p/NAXN^NuNV | 2.ҹaT p./YNAX.YN@N^NuNV#aT3aXNQJ@g>`>?<aT>Nb?a0T> Nb?aT> Nb?a T> Nb?aT>Nb?aT>N?aT>N~?aT#u0{>#v>|#w| yaT0 yaTV0 yaT0 yaT {> yaT\ | yaT |N^NuNV#aTJn gR>aJ@g=y@>aJ@g=y0>?9{j/9OZNtX?NFX>?<a&T?NT=@>NZ>?< aT?NT=@>?< aT?NT=@>?.?.NT:X>?< aT?NT=@>?<aT?NT=@>?<avT?NT=@>?.?.NR6X>?<aDT?NT>N~`$>Bga@T>Bga4T>Bga(TN^NuNVB?<NjT>aX/.NXB?<NjT>a =@f>aJ@f`0.N^NuNV33 =yap=yataDJy}Bf/9a/<B0.yapH/N9PX/N8P/N8P//9~N8P#~/9a/<B09atnH/N9PX/N8P/N8P//9~N8P#~N^NuNVJy}Bf=y=ya0.yf 0.yg033Ni@3a3aNi@>?9anTJ@gJyabgNi@aNi@N^NuNV09S@3ap09S@3at093avD@3ax093azD@3a|09@3a~09S@@3aN^NuNV3a 9F`#aZ#~#~Bya^Bya`Byab#FPadB@3ar3anaF09H/N9PX/09H/N9PX/N8P.ax>F.a>F,a00<H/N9PX/09F4H/N9PX/N8P.a.F`/9F`aXaazaBN^NuNVJyaf3aNi@N^NuNVByaN^NuNVaNi@N^NuNV09alN^NuNVNi@0.3al>NNi@N^NuNVaha~aiN^NuNVB9ahN^NuNVahaaiN^NuNVaha>aiN^NuNV9ahHN^NuNV3aja|g 09ajaiN^NuNV09ajN^NuNV/9~/./9aZNFX/N:hP/N8P./9~/./9aZNdX/N:hP/N8P/aXN^NuNV/./9aZN8P.aN^NuNVNi@.a #aZ/N9X3a^Ni@N^NuNV09a^N^NuNV 9aZN^NuNV>alNjNi@N^NuNV. /.aX>a?9aa ?9a TJ@gN`a3abN^NuNV09abN^NuNV/9a/.N:hP#a#adaN^NuNV 9adN^NuNV``D/9F\/.N:P-@/.N9X>/.0H/N9PX/N8PfRG0JLN^NuNV0<>H/N9PX//.N X/N8PoN` .N^NuNVH. /.aPX>a?9aaTNi@3a3a09a33a09a33a#~# ~avJ@gaJ@g>aha<>G>a?9aaTJ@gr3aa3aa0Fav2Ga0Q3aa3aa0Fav2Ga0i3aa3aa`ja`aNJ@g>ahaNi@JLN^NuNVHp3a3a3aBya|`~~`n0F2G"|a003a2Gan2AlBW??aX3a`,0G"|an00yal>??aX3aRG0|mRF0|mzJyafP>a?9aaTJ@f:>a?9aazTJ@f$>?9a?9a?9a?9aNgP09aJLN^NuNVH>. <.0G2n an3a0F2G"|a002|4Ga2A3ag0F2|a/09aH/N9PX/0|2|"|a002F4|a2AH/N9PX/0F2G"|a00yaH/N9PX/N:hP/N8P/aX _P0F2Ga0a0@n 3ayaf3a09ayaf3a3aa3aa09aJLN^NuNV yabgB@`pN^NuNV yabf> ?.aTJ@gN`N^NuNV`/9FT/.N:P-@/9FT/.N8Pl`/9FT/.N8P-@/.B@H/N9PX/N8Pn .N^NuNVH>.yanm$yapn09arn n09atn mB@`pJLN^NuNVH>.|am|zn0r @`0JLN^NuNVH>.|Am|Zn0r @`0JLN^NuNVH>.| g| g | gB@`pJLN^NuNV/9Fh/.N8P.aN^NuNVHBG#a`/9Fh/9aN:P#aRG/9Fh/9aN8Png/9a/9FhN:P#a/9a/9aN9X3aH/N9PX/N8Pf0ya"|Fl 0`09aH/N9PX//9aN:P/0yaRH"|Fl/0N:hP//9a09aR@H/N9PX/N:P/0ya"|Fl/0N:hP/N8P#ag/9aN:X` 9aJLN^NuNV.N.NdN^NuNV.N.NFN^NuNVHN**ByByXByByVBy.N>g&B@3}B3R|f N|NNN|a `JLN^NuNVByLN..4NJ@gNRNL`V>?NR.NNTJ@gN`4.NNTJ@gN`.NNTJ@fBy{dNVN^Nu#a"<apsNBNuNV0. @ kR@`S@@N^NuNV0. @ R@@N^NuNV#aN^NuNV#aN^NuNV#aN^NuNV#aN^NuNV#N^NuNV#N^NuNV#N^NuNV n N^NuNV.Y?.BgNX .N^NuNVH>.a'r0(*@|P.\/ X/ T/ ?<0G"|b?0N0(м| @1|yf30G"|b>Nda'@JL N^NuNVH n>ah> n0`:> n?(/9aN\ n>a`(a&.U/Y/]/Q?< n?(N`J.Q/.PNXJ@g .Q?aNT.U/Y/]/Q?< n?(NJngJnf`BW?< n?(NX3 n>a`ta|f&9yg>:a9yg>;a`|fyDf>$a>a&`$.U/Y/]/Q?< n?(N./. /. /.P?< n?(N.Q/.PNtXJ@g<./. /. /.P?< n?(Na n>Nl@?NT> n?( Nl,?NX? n?( n?(?< n?(N 0(м| @=h0(м| @=h>a|f>aNV` .Q?aT`|fP n0("n2) A29}8y}:An" n0( "n2)A29} n?( n?( n?(?< n?(N 0(м| @=h0(м| @=h>a Ծ|f>a`L0( @"||00nf0( @"||00ng.Q?aT`yDf>ab` n>?< n?(NXBW n?(?Bga \??Bga\`b n>?< n?(NXBW n?(??<a ~\???<a\` n0(`>0( @"||?0RW?Bgat\`>0( @"||?0SW?BgaN\` yDf|fNk>a`$>0( @"||?0SW??<a\`d yDf|fNk>a`$>0( @"||?0RW??<a\` `|gp|g|g<|g``| |b@0@H4 PNa! nBPJLN^NuNV0.`p`0p`,p`(p`$p` p``H |HrW hN0.N^NuNV.///?<?.Na!4.U/Y/]/Q//BgBg/9TBgBgBgBgBg?.?.?.?.?<?<?<?<?<N8=@09(м|.NW.g .~an.g>a< ng Jyaf`a 409D(м|.NWN^NuNV=yD0.`BW 9a-@//<aBP nBP`Nk>a`Nk>a`Nk>a`Nk>a`Nk|>a~`Nk>an`zNk\>a^`jNk>aN`ZNk>a>`JNk,>a.`:NkL>a`*Nk<>a`a$L`Nl>a`Nk>a`09ar@>a#8.a09aa?N]TJyaga.|N]@` yy>y?<=/9aN\ yDgaR`x yy>y?</<yNlPXJ@g .y?.aT` BW/<yNlPXJ@g.y?.aT`>/<yNlPXJ@g.y?.aT`.aNq>/9a/<aPa.aNra`.aNs>/9a/<aP.aNt.`N.aNx>/9a/<{raP>/9aNyX``| |3b@0@H PN3DN^NuNVH-n Nl >a>aJgBG`6pH>aRG|mJLN^NuNVH?aL .fa`a n > n <69}:C09@=@:9}:GE89FD n 0 n 0>???BgBg?.?BgN>???BgBg?.??<N>?9}:BgBg?<Bg/. NJ?./. nN\=@>???BgBg?.??<N>XW?XW?WW?WWBgBg?.??<N0.JLN^NuNV n >?.Bga~X n >?.?<ahX0.yDf >aX nfa8Nk\>aN^NuNVH>.<. |g0(2AHЁм| @=h0(2AHЁ @"||>$SW0(2TAAHЁ @"||00H2Gy~ёW?<NT=@/<0n /NBPмH=@.0(м|/?<N\./?<N\./?<N\0. no>0(2AHЁм|/?. ?.NX _1@nf=|Bn`F0. nl8> BgNT?0(2AHЁм| @1_fBn=|``0(м|.?<NVT0(2AHЁ @"||00ng0(2AHЁ @"||>0.WN\2Gy~=@0GTH06no0."N4Gi0."N4GXJʑi>?.?.?.?.?.?<N[T Jnf0GTH06n"N4Gi N2GTI1n.?a&TJngr.///]?PW0F"|b?0N0.ng.>?.?.?.?PW0F"|b?0N BWNVJLN^NuNVH>.<. |g40(2TAAHЁ @"||00n l0(2TAAHЁ @"||00H2Gy~=@0(2AHЁ @"||>$SW0.W?<NT?/<0(2AHЁ @"||00H/NBPмH=@>?PW0F"|b?0NX`V.]/]/]/U?PW0F"|b?0N>??ajX?0(2AHЁм| @1_JLN^NuNVHJnfp`&BG`0G"|b00nf0` RG|mpJLN^NuNV/<0n /0. (2.AHЁ @"||?0$SW0. (2.TAAHЁ @"||00H2ny~ёW?<NXH/NBP/NB PN^NuNV0.(м|.\0.(м|/X0.(м|/T0.(м|/?<0n"|b?0N0.(м|./9yNXN^NuNVHBG`0(м| @1|RG|o.|/.?<N\09|HS@3| n> n?( n?( n??<NP3b.|/.?<N\09|H3|R@y|Sy| n> n?( n?( n??</NP3b .|/.?<N\09|H3|R@y|09|HS@3| n> n?( n?( n??<NP3b.}/<|?<N\ n> n?( n?( n??<NP3b BG`0GbJPl .IaFRG|oJLN^NuNVH>.B?<NjTBWBg/. ?<0G"|b?0N .Q0(м|/P?<N\>?.?.?.0G"|b?0N,P>a0(м| @ hf0(м| @1nf0(м| @1ng&0(м| @p1@"2(Ҽ|"A3@ 0(м| @Bh0(м| @p1@2(Ҽ|"A3@0(м| @!n0.S@2(Ҽ|"A3@$> 0(м| @0.1@&2(Ҽ|"A2.3A$?/.N4\>a0(м| @BhBBgNjTJLN^NuNVJy|f.U/Y/]/Q?<?9bN.Q0.(м|/PNXJ@g.Q/9y?<N\0.HS@=@0.HS@=@>?.?.?.?<?9bN BWa 0.T@n0.(м|.P/Q?<N\N^NuNVH>.Jn g0(м| @2Gz1Q`.0Gz2(Ҽ|"A00(м| @BhJLN^NuNVH>.>a(0(*@| n > n ?( n ?( n ?BgBg?<NZ n 0(S@Hy~T@=@ n 0"n 2UHy~HAA=@ n 0(yy"n 2)mHyHAA=@ n 0(mHym$"n 2UHy~Am=@ n > n 0(W?.?.?.?9y?-$ -2.HЁ/N\>a JL N^NuNVH0.(*@|JmgR>y?9y~0-"mS@y?0-W0- mS@y~?0W?<?<?<NZ JL N^NuNVByaB@3a3aN^NuNV` >Da.a03(м| @Jhf4BW?< 0G"|b?0NX0(м|.NW`0`>P?<?</<bBg/<IBgaJBW?<?9bNXBW?< ?9bNX`>a>P?<?</<iBg/<I?<a`d>/<I?<a\`N>a>P?<?</<qBg/<I?<a``J@g.|g|g|glJLN^NuNVH>.0`J=|=|O`R>a=@>a=@`<=|=|O`.0(м|.NU``J@g|gа|gذ|g|g$>?.?a T??aT?NV\0(м|.NWJLN^NuNVH>.. NW|f8 n > n ?( n ?( n ??<Bg/92NJ`@0(м| @Jhf. ?ajT`. Nj>|?9|N]T09D(м|.NWJLN^NuNV yf .|N]@N^NuNV0.( @"||00"N^NuNV0.( @"||00 N^NuNV0.( @"||00Hy>?<NTN^NuNV0.( @"||00Hy~>?<NTN^NuNV=|=yb .Q/.?</BgNaX=@nmJnn">?.0.HW?9Bga\>a=@nmJnn$>?. 0.HW?9?<a\>?9aTJL N^NuNVH>. <. a$09(*@|>arRm 0G2SA$n Jmg,yyl3yyyo3yyyl3y`P0mS@y>0-W0mS@y~?0W. H?N\X.??a|X>aJL N^NuNVHaV09(*@|>aJmf.?. ?.a*X;n ;n ">axJL N^NuNVH<9KJyagaaaaJyagB@`p|1=@./Y/ / / / Bg|f?<(`Bg/9TBgBgBgBg?<BgBgBgBg?<?<?<?<?.N8>./ / /]?< BgN>a4<./ //QN 0.yaf 0.yag3a3aa`0|f|f,gNl ng>a$g .~a8`09aJL N^NuNV=| yag:Nl2.HAg Nk2.HAgNl 2.HAf aL=|09ayafJyafD0yaa/?.a.T _@Rya09aHH@3aB@0.yaN^NuNVaJ@gB0yaahRya09aHH@3ayafB@`p3a``.HN^NuNVHa09(*@|Jmg=m>aBWa;n>a. -2-$HЁ/0-&S@$?N\> ?-$0-&S@$HЭ/N4\.Q/ ?<N\>09yW?.?.?.?.09yW?.?<N[T >y?.?.0.W09yW?.BgBg?<NZ >aJL N^NuNVa09(м|-@>a n ("n2)$HЁ. n/(?9aTS@"n$?N\> n?($ n/(N4\.Q/.?<N\0.HyH@n>09yW?.?.09yW?.?.?.?<N[T >y?.?.?.BgBg?<NZ >aN^NuNV09D(м|-@ nJhf8 np1@""n3@ > n0($"n&? n/(N4\a n> n?( n?( n?BgBg?<NZ >aFN^NuNVa0.`09( @"||0029(Ҽ|"ARiJ@fT3y09(м| @3"y09(м| @3 y>aBW?9aT`^09( @"||JpgD09(м| @1|09(м| @Jho09(м| @Shf yyg.Q09(м|/?<N\09y29(Ҽ|"A2)AS@yn09yyyR@y=@yyf:09y29(Ҽ|"A2)AS@y~=@0.n0.n.Q?9aLT>?9aT>ah``J@g.|g|gN^NuNVB@3D>anN^NuNVJyygJy}f>aِN^NuNVJyygJy|f>apN^NuNVp3D>aN^NuNVp3D>a>aBWa~N^NuNVJyyf aaa\> nf?<:`?<;/9aN\0.yyN^NuNV09yng"BW nf?<:`?<;/9aN\0.F@yyJyyfaN^NuNVp3D>aHaN^NuNVJyag6adB?<NjTBya.U/U/<a/<aN N^NuNVJyafaXB?<NjT3aaN^NuNV>N$N^NuNVBWN$N^NuNVB@3y>?</9aN\N^NuNVp3y>?</9aN\N^NuNV>aN^NuNVBWaN^NuNVH~`0.r@>?/9aN\RG|$m`>?/9aN\RG|0o~5`0.r@>?/9aN\RG|=mBW?</9aN\BW?</9aN\BW?<8/9aN\BW?<&/9aN\BW?<+/9aN\JnfJyyfaaJLN^NuNV>?< NT363aNBJ@g(.Q/]/Y/UN* >Ng$J@f .GaNV3y~NV3yNV?09y_3y./<}:/<}aՊ#a>a|#a>an#a>a`#a#H2#H,y>?9}:?9}?9}:?9}/9aNjX>aa aFa*N^NuNV0.3a>?<9/9aN\N^NuNVHNP|J@fN~`BW?/9aN\RG|mBW?<#/9aN\JyafBW?<9/9aN\JLN^NuNVaZ.?<N TaN^NuNV>6?< NTNZ>NBBgN(?<N(WN($N^NuNV n "n0 n"n0 n"n0 n"n0N^NuNV n0 n1n n1n n1nN^NuNV n0"n 2Af< n0("n 2)Af( n0("n 2)Af n0("n 2)AgB@`pN^NuNV. \/. X/. T/. n?( n?( n?( n?a N^NuNVH n> n0W?.0. WaT: n> n0W?. 0.WazT8> n?aLT>> n?a. `0SGJ@fJL N^NuNVJnl0.D@`0.N^NuNV`aJ@faH9 H>NJ@fN^NuNV 9  gB@`pN^NuNV9 H>NjN^NuNV  yBfNJR* y* N^NuNV y*Jf* .> f.N <F#*/NAX`p`B@N^NuNVRnSy}6N^NuNV n oN yBfXJyNg:NJ@ByRJy}BgNBy}B` |F#*B>aT`09HмFW#* yBf aJ@ga>aJ@gN`dJyBf\ n?f4Jy}@g=|!N`N.>N҄N&NJ@fJng >NN #F*aN^NuNVBy y*H3JyLg` aLRy y*  g y*  aN^NuNVH*n `H. fp`JfB@JL N^NuNVH>.>aJ@gp` .J?aTJLN^NuNV.J". H?aTN^NuNV9 H>aN^NuNVJ9g 9)fB@`9H>a~N^NuNVH. <0m<9oB@`pJLN^NuNVa"J@g By>` 9" f 3>` 9: f 3>` 9. f*a^J@g" y*(H>atJ@g 3>`9 H>aVJ@g 3>` 9- fa J@g y*(H>aJ@f$ y* (.f y*(H>aJ@g 3>`8 y* ((g y*(H>aDJ@gB@`p33>`3>N^NuNVaRy}6N^NuNV`" 9# fa9 H>NjJ@f aa(J@gN^NuNVHBG`4RG0|o&a.* 9nB29}6Ё/NAX`a|9 H>aJ@fJLN^NuNVa yBfJ0yF ( fNJ09HмF.W <F#*/NAX3#*nBy}6ByaB@09>`6By}6`Fa9 H>a J@f(aJ@gaa`a` 9- faa 9. faa9 H>N|Ef ab 9+ g 9- faJa yn2y}6B.nN5D#~ yn2y}6 `zahJ@gNa.J(9H?aTJ@g..J,9 H?aTJ@g9H9 ga`"a``|b@0@I PNB9N^NuNV`aarJ@g3>N^NuNVH *n y>gB@`0>9}6(yn`0SGJ@fB@` gB@`JfJGgB@`pJL0N^NuNVB@09}6S@gB@` . H>aN^NuNV>;aN^NuNV y>f ynH. gB@`pN^NuNVH?>.89}6*yn>N>N>`j>N6|`F #f |oRSD>?NT:JEf JDgB@`p`:0SDJ@fB@`.H@gB@`"RF0|m>N>JGfJDgB@`pJL N^NuNVHN>>NN8>?NTN:>?NTN>?NT>?NT>N>|`vJy}6fBWBg?NBX` yn #f y}6ca ynH>??NBXRnSy}6fRF0|lBW??NBX`NRF0|mBWN>NN>N>NLN>?NTN:`0JLN^NuNVaBWN?NT>N0y."|@>N?NT?0y.@0N^NuNV#~aN^NuNVH/9~N9X>/9~0H/N9PX/N8Pf>a`.~a*JLN^NuNV>?< NT>NN^NuNVH#N>>NN>?NT>?NT.?NT?NTJLN^NuNVHJyg>N`LaT0y.@>`.>N>aJ@g>N>N`>N>JGfNJLN^NuNVHBy.*yn #fR 9nB29}6Ёd Hy.`y.JL N^NuNVa8NJ@f NaN^NuNV y>fa:`aaa:N^NuNVaJ@g Nax`,>]a\J@gaNa\`NDa aNN^NuNV>[a(J@ga2aa``avN^NuNV`a>]aJ@fa0J@gN`NDaaNN^NuNVByXaN^NuNVJyXgp`Jy>gXJyLgLaJ@gDa&>za y;f>H`>NaaaNDa`fB@``JyLfp`T>>aJygB@`p3Xgp`2>za>PN>aa"ByNDa0N^NuNVRyzN^NuNVNNJyrfN>N3Z3r`0N>N>?9ZNT>ZN3ZNN^NuNVJy>g2aJ@f* y>fa` .nNaaN`NN^NuNV.NaJ@gN`&a:NDNJ@f Na`aNN^NuNVHa y>fad` y>g N.`aN>>NJ@gNzJ@gN`>Na3LByzaaBNJyrf>N?NT`>r?9N?NFX>NӰN>?9{h?NFXNJy}Bf>/</9NNPNNJLN^NuNVH*n`B mH>N`, HSAAHЁм -@ n/( n PNXRfJL N^NuNVH?>.>N>N>g>?NT?NT6`|>N<z`X>?NTg`Jn g6.J0H?NTJ@fH>NJ@gJCg >#NH>NRE0|m>N>JGfJLN^NuNVH>.JyLg >NJ@gBW`>?aTJLN^NuNVH >.>N4,.N *//N9X-@/N9PX/N8Pf .a`/<n7/N8Po///N3P(@`N>//N1P(@.NAH*@ S .g` MBS 0f Rb .fB.NJL0N^NuNVH..Jl>-N D./< /NB P,g.a/< /NCPH>W0NJLN^NuNV0n.aN^NuNVH>.a>>NJ@g>a`>a>JLN^NuNVH>.JGgaNJ@gyVf3|{b3F}F>N=@>axN̺>N>gV>N*J@g.J6N>aP`:B@0.yg$B@0.yg>Ny0gN&`^a`JLN^NuNVH>.JGg>N*J@g>a`&>[NNDN̺>a>]NJLN^NuNVH>.N&>NJ@g>"N>a`>axJLN^NuNVH>af>. >N>`(N&>:N>N>a8>N>JGf>N?.NT3rByzaJ@gaJ@gN&afavNJLN^NuNVJyg>?9z,?.NFXN^NuNV`paְyPf>a>N4/N9X=@a N>aBJ@gp`B@WN&`$atJ@gN&`NaaNaJ@fN^NuNVJyrfB@`4>rN>N>N4/N9XyzgB@`pN^NuNVaygB@`pN^NuNV>rN>N>NN^NuNV>rN>N>NN^NuNVBWa?a TN^NuNV>rN3rN^NuNVByrN^NuNV>{ja"N^NuNVN>{ha >NaN^NuNVH>.`ZN>N<>aJ@f*>z,?NT:g >aJ@f >?NTN>N>NLNJ@fNJLN^NuNVNaN^NuNVNahaN^NuNV>LaN>NLN^NuNVH>.JGg*ND>N>a>{h?NT?a TJLN^NuNVN>{ja&N^NuNVN HBy{d3B 9TS#*  NNzJyBg`N(N^NuNVp3F3{b3}FNN^NuNVa.NJ@gNB3LN N'nB@3>"yT#N^NuNVN'naN `S}H y}H"yS09>Sy>J@f#}HN^NuNVab> ?.aTaN^NuNVH>.`~N.>N3z0. `D>{h?9zNT<gxaZ>?9zNT n fR`(Nyf 3F}F>N>N>N<fNJyVf 3f{ba N`,>{j?9zNTJ@fa>zNьa`>{j?9zNT<g>N<a"J@gT.NN.JRN>zNьN&>NJ@g>"N>Nь`>N҄`.>/<҄B09zr//<ь/9ONN`>za`>a^J@f6.NN>zN>^N>,NNaJ@f`.NN>z,?9zNT>N>zNN`L>J?9zNTJ@g.NN>zNN`|b@0@J: PN>N>JGfN.JLN^NuNV.NNN&N^NuNVN.NNNNN^NuNV>N?NTN^NuNVa*`>?9@aTaNLN^NuNVB@3HH@B@H@м@ @3(N^NuNV`6RyB@09|eB@`LB@09HH@B@H@м@ @3(Jy(g>(N3@>(N3(pN^NuNVH>.<. >NJ@gv|f>aapJ@f``>?NTJ@gN>z,?NT:>N3zfJEg>abJ@f`>?9zN@TJ@g>N/rJLN^NuNV` aJ@fB@`aJJ@fpN^NuNV>Nl3BN^NuNV>J?.NTy@gB@`pN^NuNVJyBfB@`@>BN3^>BN>N3,>BNl3BpN^NuNV>^N# 9.^gB@`pN^NuNVJyLfB@`pN^NuNV yLgB@`pN^NuNVByLN^NuNVByByBN^NuNVN.n/</9NNPN^NuNVNN3>N3~>NL`a Va J@g N2NGNJ@gNN^NuNV>{h?9 NT3zfN>PN> N>~N>zN>N>Nd>NaB.^NJ@gNa`NN>zN>aN>NNaJ@f>N3~>?<NTJy~g>~N3av>NJy~/<҄NH@B@H@r//</9ONNN2aN^NuNVH>~NJ@fJyf> N|fNN> N3 ?N._fr>{hB@09 3?NT>gP>N3~g@> N~>~N3> N>N?aTNp`B@JLN^NuNV>N~N(N3N>aZN^NuNV.^NJ@fNa` aJy~g>~N3NJ@fJyz*gtN>N*J@gbNNaN>/<NH@B@H@r//<҄/9O"N``N(>N:N2a`NN^NuNVH>.JGf8Jy/</9NNPNN2`NJ@gN>NaaJ@fN>NN"ND>N>anN>?NT?N-TJy/<҄?NTH@B@H@r//</9ONNN2NJLN^NuNVNN!NJ@fN>N3 >N*J@g,Jy fBy~a`> NJ@ga`> NJ@g3Lz3L> N$3z3zLJyzga`Jy}6g>N> 9"^fN`an` 9:^fN`>~aaL`h> N3zfa|`N>BN3Ba>zN3BN3B` .KVN`aN^NuNV3 ~aN^NuNVaxaN^NuNV>NB@09~3>NN!`aNJ@gN4N3N^NuNV>N3~N`a(aNJ@gN3N^NuNVJy~g>~N3~N^NuNVNJ@f>N3N^NuNVH`DJyPf .KYN>9P>N>N>PN3P>NB@09PnfJLN^NuNVH>.<9Pn gB@0=@@f > an`lJGf .K\N>N>N>N>N>N>Nng >N<N>n g`>?NTJLN^NuNVH>.>N-<f8>NJ@g>{j?NT<f>N>N3~`>N3~JLN^NuNV n hN`Bn` n2.AH.?9 NTJ@gh> NaN? n h NTN" n hN?<NT? n h NT n2.AH pNN`Rn n2.AHJf` n2.AHJg NJ@g:N^NuNV.JVaN^NuNV.JaN^NuNV.JaN^NuNV.KaN^NuNV.K6aN^NuNVa>Nh3 N^NuNVaJ@f >NN^NuNVH>.>a>~NbJ@f>~?N2TJLN^NuNVH>.>a>~NJ@fN0J@f>~?N2TJLN^NuNV>~N?N^T>aN^NuNVJng B@09@`B@0903~N^NuNV y~fB@`pN^NuNVaJ@gN N^NuNVHNNNJ@fBG`~`RGNN.J@f>[N>N|.K_NJLN^NuNVB@09yBf0<`0.N^NuNV noa` JngB@`pN^NuNVH>.>a>>aJ@g>BN>N0JLN^NuNV.aN^NuNV.aN^NuNVaJ@g>BN>N nNN4J@f>BN>NN^NuNVaB@09~N^NuNVa>NbJ@gNfN^NuNVa>NJ@f aHJ@fNfN^NuNVaN"N^NuNV>N*J@g>N$J@fB@`pN^NuNVH>~a>g NVN40JLN^NuNVar>~N4N^NuNVa,>aN^NuNVaaN^NuNVaN"N^NuNVaJ@fNfN^NuNVa>NN^NuNVaN"N^NuNVahB@09~y@gB@09~y0gNN^NuNVHa@/N9X>m nn0`NfJLN^NuNV>~a>~NJ@gaJ@f >~NN^NuNV>{j?9NTy@gB@`pN^NuNV>RN?NTN^NuNV3~N^NuNV>Ny0gB@`pN^NuNVaJ@gp`aN^NuNVJygB@`pN^NuNV>NɦN4N^NuNV.NDN4N^NuNV3}6aN^NuNVNN4N^NuNV .#n.NA3}6NNN^NuNV.a>NN^NuNVH>.>NJ@g4>N>g(N/?NTH@B@H@П gB@`p`B@JLN^NuNVN`N0.SnJ@fN4N^NuNV>~N4N^NuNVa/N9XN^NuNV>aN^NuNV>?.aTN^NuNVB@33~`*NذnfN> /<^NXNTN>J@gJn gN4J@gN > /<NXN^NuNVN>NbJ@fNfN^NuNVJyRgJyNgBy}B`NN^NuNV yBfN>N^NuNVH>.>NJ@fNfJLN^NuNVByBByByz.ByPBy~ByByFNN^NuNVH yd:bBN#"J@g.NBNX`*Jy}@f"3}@aJy}@ga3TNJy}>fZB@09yDd$BW>9}4?a TRy}4>aRy`$.NF?<N T>/<NX`>9}>>N3}>BW?a ~TSy:B@0JLN^NuNVH>.BW?a ,T>}>?a FT3}>Ry:JLN^NuNVBy}>aa`>a>~av>z*al>Lab>FaX>raN>aD>Pa:>a0>a>N>N>a N4J@g >~a>Taa yd:eBy}@N^NuNVH3z`0yz@<`>N>aJ@f>N<JFf0yz@0gB`.>N>aJ@g >a^<`>N>?aT>N>f>a6Ryz09z|mhB@09Dy3:3z`$<9Jyz>a:J@g>at`>aRyz09zyeJLN^NuNVH|`D0F@>`2>N:>N>N8g >a(>a>N>JGfRF0|mJLN^NuNVH>.>aJ@fD>aB>N>>N<>a(`>N>a>a>N<JFfJLN^NuNVH>.`>a,J@f~| d|dp>aJ@g4>aJ@g >a4J@g>N>a>a`>a:`2` >aN"J@ga(>N>az>N>JGfzJLN^NuNVH.NJ?<N T~`>B@09JWaRG0ye>/<NXJLN^NuNVH>.B@0|0@"|Kb0H?B@0HH@B@H@йt @_JLN^NuNVH>. ytBA2I0HBA2|HABAHAҼKb"AHAJLN^NuNVH>.B@0|0@"|Kb0HF@?B@0HH@B@H@йt @_JLN^NuNVJyz.gB@`pN^NuNVa~|f> a03P>z.a>?9z.aT3z.N^NuNVH>.>?9TaZT>z.?9Ta T3z.a3TJLN^NuNV>z.NN^NuNVH>9z.>N3z.>aJLN^NuNVHa><9z.>N3z.>a`B@0JLN^NuNV>?9z.aTN^NuNV`a0.SnJ@fN^NuNV`af0.SnJ@fN^NuNVH>9z.` >N>0.SnJ@f>NJLN^NuNVH>. <9z.` >N<0.SnJ@f>?aTJLN^NuNVH>z.N>>N>?9z.aT>z.?aT3z.JLN^NuNVH>.` >N>0. Sn J@fB@0JLN^NuNVH>.>N>|fp `|fp ` |fp `pJLN^NuNVH>.JGg>?9z.atT>`>z.NJLN^NuNVa>aN^NuNVBWavN^NuNV>~adN^NuNVa3~N^NuNVH<9z.`L>N>>a |b |ep`p3z`>N>>a<09zSyzJ@fJFfJLN^NuNVHBG`0G"|^>?RWaTRG|mJLN^NuNVHBG`>RWa?0G^0RG|mJLN^NuNV3z.aN^NuNV`D>N|fB@`8>N|f> ?9aT>N` aN|fap` aJyfB@N^NuNV>a>?9aT3N^NuNVH>.> ?N\TB@0JLN^NuNVH>.> ?NrTB@0JLN^NuNVH>.JGfp`>N>JGc| eB@`pJLN^NuNVH>.JGfB@`>aJLN^NuNVH>.>N|b>N| dB@`pJLN^NuNVH>.>N| gB@`pJLN^NuNVH>.>N|gB@`pJLN^NuNV> ?.a?aX?aTN^NuNVH>.>axJ@g>NH/N9PX#`>N>N.# 9JLN^NuNVH>.>aJ@f*N.>N>N҄>N>gN&`JLN^NuNVH>.BW?a(TJLN^NuNV>Nh|gB@`pN^NuNVH>. >aJ@gB@`0`JGfB@0`$` >N> n@SnDn>NJLN^NuNVH>.JGfB@`>NJLN^NuNVH>.`">NyRf>N>N` >a>fB@JLN^NuNVH>.`>Nn f >N` >an>fB@JLN^NuNVH>.>NJ@g> ?aT>a2`B@JLN^NuNVH>.>NJ@fB@`<. y{hf>aJ@f BW?aT>?aJT:fN>N8>N>?. NT>NN>?NT>?NTN`> ?NTB@0JLN^NuNVH>.B@0. y{hf>a`>N<`.>Nn f>N>N>?NT`<>N>fJLN^NuNVH>.>N>NJLN^NuNVH>N>NJyLfN3L`H>9L`>Nn g>>N<f>N?NTN>?NTJLN^NuNV>?9LaTN^NuNV>?9z*aTN^NuNVH>.`>Nn fp`>N>JGfB@JLN^NuNV>?9La T3LN^NuNVH>.JGfB@`T>Nn f >N`<<`0>N:>Nn f>N>?NT`<JFfB@0JLN^NuNV>~N>NN^NuNVN3N3~N^NuNV.NR?<6a8TN^NuNV.NV?<"a TN^NuNV.NZ?<aTN^NuNV>Nɦ>N.NaN^NuNV>Nɦ>N.NaN^NuNV>BN>aN^NuNV.N^?<%aTN^NuNV>&Nɦ>~a0.NaN^NuNV>)Nɦ>N> a.O&?<abTN^NuNV>~?9BNhT?aTN^NuNV>*Nɦ>N>N.O*?<aTN^NuNV>1Nɦ.Nt>N.NaN^NuNV3}@.Nb?<aTN^NuNV>2Nɦ>BN>N.OatN^NuNV>Nɦ>BN>N.OaDN^NuNV.Nf?< aTN^NuNVN2./</9NNPNN^NuNV.Nj?<-aTN^NuNV> NɦN".NaN^NuNV>Nɦ>~aP.NaN^NuNV.Nn?< anTN^NuNV.Nr?< aVTN^NuNV.Nv?<.a>TN^NuNV.N?<aTN^NuNV.N?<aTN^NuNV.Nz?</aTN^NuNV>#Nɦ> N.NaN^NuNV>$Nɦ>N.NaN^NuNV>NɦN".OaN^NuNV>NɦN".Oa~N^NuNV>NɦN". a^N^NuNVH>.>NbJ@g>NjJ@g>.`>NJLN^NuNV>Nɦ. BgaTN^NuNV.?<aTN^NuNVHN~N2N NByRN$&0.`b. N`fN>/<҄/. NP`JN=@>/<҄NHr//<҄/. N`J@g|g|gN$L3>NN>N>NN3X>NB@09~3>Nh>N>BNh>NB@093V>Nh>N>NNNNNNN3>{j?9hNTy@gB@`p>gNR>aJ@gN>/<^NX`JGfa a JLN^NuNVN>J@g` >N>N4/N9X>/<NX>aNBW/<^NXN^NuNVNذng .KjazN^NuNVH`BNذ|g@Nذ|f$> N>ngy@g|fp`NTN>J@gB@JLN^NuNV <^#n.NA3}6N^NuNVH (n*n .NAH`.KmH?NTJ@g0.SnJ@gfBJL0N^NuNVH*|^axn m2> / /.aP.Kp/.NA"X0. H> Wa .NA>/ /.aNPJL N^NuNVano.Kt0.Hм^/WNAXN^NuNV&NJyXfP.Kx/hNAX>/ha0X.K/hNA"X.?<N T`2.K/hNAXB9.^/*NAXN$&>XN҄N$L>a.^NA>/<^/ha>P.K/hNA"X.*/<^NAX>/haVX.K/hNA"XN$&>Nh>NN$L>/haX.K/hNA"X.?<N T|f .NN&HNrNN^NuNV|.L/<K/NAP/NA"X.?<N T|gB@`pN^NuNV.O:/9nNALXJ@f.L5?<daT`.LR?<daTN^NuNV.O:/9nNALXJ@f.Ln?<eaT`.L?<eaBTN^NuNV.O:/9nNAXJ@f.L?<fanT`aN^NuNV.L?<gaTN^NuNVN>N:NNNp3<3{dN'~#TB@H#&#".Taa,N^NuNV м #}HT3J|lNB y}HBN^NuNV |#}HB>N:3}L <F#.aTJyg .FNHJ9Fg2BWa#F` yH>aR yJfaLN^NuNV=yBya y}HH"nR}HRJ@f#}H3N^NuNV#xBy}LBWN:N^NuNVBy3F3|HJy}Lf$>}FSWBgaTa a>{bSWan.NJ@gN!va dN"R09@`a` a`aXJ@fa`a RJ@fR`a`a`aR`a4`a`BWa4 y`PgR`.H>a.H>NjJ@f a 2J@f`az`aJ@f aaa`nJy}LgapN`b> a`L>|a``>a~J@f > aa`&a`>#ap`aRJ@f >Bga@T`a:J@f>?<arT`a J@f>D09W?<aNT`aJ@f>09DWSWBgaT`ap`aJ@faD`aJ@f>a`laJ@f,BWN:-y}HBWal.aa>N:`4Jy@o >@a~`N`||b@0@M PNN!v`N^NuNVN!vaaJ@fa`N^NuNV`*aNJ@fBWaydyfmaa6R}H 9}H`fN^NuNVaJ@f.aJ@faJ@ga`aaJ@g aJ@fahN^NuNVafBWa<>?9N'TN^NuNV>aBN^NuNVHBWN:N!T>`> a\0SGJ@n>N:JLN^NuNV`a,J@fa|?9N'TN^NuNVaaN^NuNVJy>gxJydg a>Sy|?9|NT`Na.J@g aRa$`a0>09dW`>fSW?9SWN'TN^NuNVa 9"}He 9"`b #`" 9&}He 9&`b #`&#`}HaN^NuNVJydfa:J@gaJJ@fa y ( fad`ha>J@g apa4`V y`Jg R`a>f?9SWN'T>?9|?< NX>?9|NTN^NuNVa,aN^NuNV=y=y|a#}HjNBWN:a>?.N'T>N:N^NuNVa9|BWN:aJy>gaJ@ga`aBSya>a>N:JLN^NuNV>aN^NuNVa,J@fBWN:aa J@gN`BaaaJ@g.>?9|?<!NX>?9|NT`aJ@g`RaJ@fJaJ@gaaJy}Lg >N:>Ry?9N'TJy}LgBWN:a>a>N:N^NuNVH>.y|o >09|W`BWaJLN^NuNVa:J@gaf y}HPa".H>NN^NuNVa Ry|N^NuNVaJ@f aJ@gara R}HN^NuNVH>. `NaJ@fJa(J@gN`:aJ@fBWa8ydyfmSGaaaJ@gSGR}HJGfJng&a\J@gaJ@faN'~ahJGlaJLN^NuNV09DH>?<aTN^NuNVaSn gahJ@fa`N'~BWN:-y`aJng`a .}Hf>N:N^NuNVa*J@g"N>N:>/<NXN^NuNVHJy}Lgp`0<>yF 9}H|lr`2HmB@`pJLN^NuNV`a JydfN^NuNVSy>SydS}HS y}H"y 9"f #}H" 9&f #}H&N^NuNVRydRy> 9"}Hf #" 9&}Hf #& y"y}HRaJ@gaN^NuNV09d"yRBydRyF09FyDo3HN^NuNVSyFS yH3dN^NuNV y}HJgB@`pN^NuNVaJ@f aJ@fB@`pN^NuNV y}H  gB@`pN^NuNV y`H>NjN^NuNVJy>gB@`pN^NuNV yfBWay|gB@`p`B@N^NuNV09Fn|n09H`pN^NuNVa?.N'T>N:N^NuNV. NJ@f yjJgF 9jZf09yf` yZJga`a yjH>ab`* yZJgaaLJ@g a^RZ>a8``0 yjJga&J@g RZRyaJ@gRj`XN^NuNVajJ@graJ@g6>?9|?< NXRy|JnfaJ@gN'n`@`>?9|?<!NXRy|aJ@fRya` adJ@gaN^NuNVHaJ@ga`ra"J@gap`ba>0|o.0HѹZ0Hѹj>09|W?9N'T`$a~J@f yjH>a`RjRZ`JLN^NuNV`aHJ@f yjH>a*RjajJ@gN^NuNVH*yj#Zz BG`"0y|yfl*H>NjJ@fRG yz H@Rz Dg0JL N^NuNV yjH>NjN^NuNV yZH>NjN^NuNV yj  gB@`pN^NuNV yZ  gB@`pN^NuNVanJ@g>/< NXNN^NuNV`a(J@f> aRZanJ@gN^NuNVa J@gaJ@g>/< NX. H>NN^NuNVJ. f #}Nz$`$ <~ݰz$ba` yz$ Rz$ yz$BN^NuNV <}NN^NuNV#"&#}H"N^NuNVHBWN:#"a*@`>aZHfa>N:JL N^NuNVJ"gJ&g 9"&c-y"#&"#& 9"&gL."aXBWa` y"H>aR" 9"&eJng#&}HazalB@H#&#"N^NuNV .d*aJ@f .dJydga4`a,``J .}Hg>aN:>BgaT>/<NXN^NuNVRyB@09|c Bya^N^NuNVH>.| gJGgB@`pJLN^NuNV y|oaN^NuNV> aNN^NuNVN N2a.aN^NuNV` .H>a nH@>a|RJ@gN^NuNVH. Jy{fg4Ry}6B@09}6|eN ynRn ynB` yLf<< f a> NJ`H>NJ`a`Ry|H>NJ``NJ@g09>29J|A@Ry>Dm>/<NX< fa>a`r< f RyFa`&09|yf@Ry|DmRyF3|R y`(Jyg H>NIH`>?<NTaJ@g >N:N J@gNh`Ry>p3|?NTaHJ@g BWN:a` y|o>Sy|?9|NT`xa~>a`jNJ@g>?9|?<!NXa>?9|H?NXRy|`"` |g|| g| g| g6`JLN^NuNV09F*29|SA49F*SBBAN^NuNVBy@N^NuNVN|faN^NuNVN| >a3@aN^NuNVaJ@g$.NN?<N T>/<NXaaJ@g azNR`ajN^NuNV y@faJ@fB@`pN^NuNVJyLfJyRfJy/<4NX`aN^NuNVH~*|D`0.Hf0` SGJf0.JL N^NuNVH yBg yLf 9T29JHЁ` 9T. мIc3 м bB@`pJLN^NuNVJy}BgJyRgB@`pN^NuNV y@faJ@fa>N:JygNJ@fByJya`\Nذ|f(> Nʰ|fN>/<^NXNذ|fNBW/<^NXNTN>J@g>/<NXN^NuNVBn` N2n/N _@Rn nm .N^NuNV y@faJ@gaBy}LN`&N>J@fNذ|fa>Nn`.MaD`.Ma6`aX. <^#n/NAX.N).n/<M/<FNAP/NA"X.Fa`.Ma`.Ma`.Ma`x.N a`j.Na`\.}Na`PJyz*g.N`.Na`4JyJ@f Nذ|fBW?<NTN^NuNVa$././<FNAP/NA"X.a B9FN^NuNV>NN%.^N`*ByXN`(N#*NZNV` J@g|g`N%N^NuNV`a0.SnJ@nN^NuNV> a0N^NuNVHN2N>gna>/<҄/./</9O.N.N3aJyg>N>N҄`Jy~g>~N>N҄`.aTa.JLN^NuNV3|N^NuNVaZJ@g >N:N>?<aTa8J@gBWN:N^NuNV0.3>0. 3|?NTN^NuNVJy?<NTN^NuNV. ?.NTN^NuNV>NN^NuNV.?<NTN^NuNV> /.?<NN\N^NuNV>ONN^NuNV.?<=NTN^NuNV>?<>NTN^NuNV.0n /?.?<?NPN^NuNV.0n /?.?<@NPN^NuNV.?<;NTN^NuNV> /.?<GN\N^NuNV>?<NTN^NuNV> /.?<.NA@BF`..NA>/ 2HЁ/NAPJ@gB@`p:fRFGo0JL0N^NuNVHN^-@Nм#T/<! 9T/SNB PЮT#8.9T8 o 3D`3D .Y#t3 JJLN^NuNVHN!vNBG`0G@BPRG|mB@3}>3By}@By3J}43D:N3T y.0Nt3R>aaaaafJLN^NuNV#`Bn3}6NǮN/ < 䐟>?< NT>?9RN3?NFXN^NuNV.NNt3@>a.NNt30>a y.4Nt3{h>a y.a y.TNt3N>a y.HNt3P>a y.LNt3H>ap y.PNt3>aT y.XNt3J>a8 y.\Nt3z,>a y.`Nt3,>a y.dNt3\>a y.hNt3>a y.lNt3h>a y.pNt3.>aN^NuNVH*n#nBy}6`Ry}6RJg  fNʞNN/ . >?< NT>?9RN3~?NFXJg`B@09~JL N^NuNV>?.NT3N^NuNVHN(*@N'>`Jg ./a.XP0SGJ@fJL N^NuNV./<`DaX3./<`FaX30N^NuNV/..N0| .N^NuH~<,<AB'ebc FGN<<CD<c|`8|*< A?rrt`ڄܐ(&䣞j.XRQN?.Jg .<AN;Jg<L~NuNVH-n Jnnp` nop`0.R@8BG/.B@H/N9PX/N8Po n -R /.N:X-@/</.N8Po.`/<D/.N:hP-@SG/<A/.N8Pm`/<D/.N8P-@RG/<D/.N8PlG|0H/N9PX-@`/<D/.N8P-@RFDm/<B/.N8P//.N8P-@/<D/.N8Pm -|ARGJGl4 n 0R n .R JDlD|` n 0R SFGnBF`j/.N9X:0|0"n R Gf n .R 0H/N9PX-@//.N:P-@/<D/.N:hP-@RFDm n BR .JLN^NuNVH-n Jnnp` nop`0.R@8BG/.B@H/N9PX/N8Po n -R /.N:X-@/</.N8Po.`/<D/.N:hP-@SG/<A/.N8Pm`/<D/.N8P-@RG/<D/.N8Pl|0H/N9PX-@`/<D/.N8P-@RFDm/<B/.N8P//.N8P-@/<D/.N8Pm -|ARGBF`j/.N9X:0|0"n R JFf n .R 0H/N9PX-@//.N:P-@/<D/.N:hP-@RFDm n ER JGl0D@> n -R 0H |0"n R 0H H@|0"n R n BR .JLN^NuNVH KIBnBn`R n  g n  g n -gB@`p=@ n -g n +fR`$ n .fRn` nJngRnR nJg n eg n EfB n eg n EfDR n -gB@`p=@ n -g n +fR` nR nJfB.a-@.N@=@Jng 0.D@n`0.ܐn=@/.?.a:T/N:hP-@.N7-@Jng .JL0N^NuNVJnl,-|A`/<D/.N8P-@RnJnm`*-|A`/<D/.N:hP-@SnJnn .N^NuNV-|`D/<D/.N:hP-@/. nH|H/N9PX/N8P-@R n 0m n 9o .N^NuNVH/</.N8PfB`/</.N8Pl/.N:X-@z`BEBG`RG/<B/.N8P-@/<A/.N8Pl`SG/<B/.N:hP-@/<@/.N8Pm/<Y/.N:hP-@/.N9X-@ .-@|@0|HJEg .JLN^NuNVH..,. N; LN^NuNVH..,. N LN^NuNVH..N> LN^NuNVHJl| .D-@`BFJfB`^~` .-@R .f` .-@S. g .-@޼@ JFg .JLN^NuNVH .м<JgJFlB`V .:|oJEg <` <`0..μ|`RFJFm`SFJFnJEg D. JLN^NuNVH..,. N> LN^NuNVH..N; LN^NuNVH..,. N; LN^Nu<a<NugPk dR< HC6<(*,A4.< ` (؄*[ZcR FHCNu@ @ <NuJg NugR kjklf`>k^g>k^g2k8<d,&B<ރeNuRid~S<Nu.NuJNu:ڼ.gNu<Jj~`~<L~Nu.<AOJNuH~?g<$,<;AN>i<`D<o< l",,.N;$`B.B<CD<c~z,<&A@tra6YSBr a.YSBr a&J/jDD܅N?.k4g0TL~NuRB&(Jk ڄ܃QNuޘQNuJgj<a<Nu~N>$H~<A,<A$N;BN;,N,N;L~NugRghEDvi^E]HE:BB8HD&HC؃HF&؃BDHDHGHFHEބj ޼gNuSiex@ބއdRgNu~NujJ<Nu!T3~SUU???xBJg.jD<¼bHF<܆[Jj ܼdRNuz,W}bGX@U @ @ mc68343 floating point firmware (c) copyright 1981 by motorola inc.NVH*nBGBF`RHHм`H @f +fR` -fRRF` H@| 0m 9oJFg0D@>0JL N^NuNVH *n (n`RJff .JL0N^NuNVH *n(n `op`lp`JgJfHHAJL0N^NuNVH *n(n >.` JfB@`RRSGoHgHHAJL0N^NuNVH *n (nf .JL0N^NuNVH *n(M`RJf HJL0N^NuNVN^NuNVH?BCB..,. f#{F <`hlDRCJlDRCn8fzB`0l :HGH`xe`Jge`|fD#{F D`#{F JLN^NuNVBBJlDRBJ lD RB0. -@0.2. An=@ .gDN^NuNV/. /.NB 9{FN^Nu                      s 1^N\/*\*\:AIO@.FGY;<^;0\>>co>>Y>^>? W??7y??D?|?p? ???ak?r.?qr?^?8?@ى@@mu@'D@@y@@@%@@{@L%@q@ @@&@9@>@4@{@@ɻ@sa@@ѳ@;@ֳ@@oP@ݳ@@@@\@@@3@[@@@ @xm@`@>@F@eK@pN@g@K@\@%@3@~@@@`Z@-@@@A[3][Can't find logo.rsc][EXIT][3][I can't initialize LOGO.][EXIT]CVT:GHKMPR"&Bprrrrrrrr<<rhhrZTrb,,rr,Jbrr r*:r$r,,[3][Not enough windows to run LOGO][exit]LOGO DIALOGUELOGO EDITORGRAPHICS DISPLAYDEBUG INFOLOGO.RSC,,,",ź()=<>+-*/;^ [] <=><=>#[]; . ؖN٤ "2TTRnnznn  H R$$hz6#1#2#2]  @#3]|!| ...[3][LOGO ERROR:| | |][OK][3][ERROR IN: |PROBLEM: |IN LINE: ][OK|EDIT][1][Please be sure you have saved|your work before quitting.|If you haven't, cancel now|and do so.][OK|CANCEL]I can't open the buffer fileI can't open picture file I'm having trouble with the buffer fileI'm having trouble with Can't close buffer file. Disk full? is not a picture or is the wrong resolution ~ 4  H$    v h F . ~  ~      "#:;$$%V%:%H$%~$%d%r%%%LOAD "SAVE "SAVE "LOADPIC "SAVEPIC "ERASEFILE "EDALLEDF "NOWATCHWATCHNOTRACETRACE: OjOOOOPPGPhPPPPPPPQQ#Q:Q]Q^Q_Q`QeQkQpQqQtQxQ{QQQQQQQQQQQQQRR2RFR\RoRRRRRRRRSS6SBSISUS]SwSSSSSSSSSSSSSSS[3][Printer is not working.|Please turn it on.|][Now OK|Cancel]Pausing...Stopped![3][I need more memory to run LOGO][EXIT][3][I don't have any LOGO nodes left][OK][3][Out of LOGO stack during!garbage collection][OK][3][Out of LOGO stack space][OK]No pan with FENCE or WRAPTurtle out of boundsNumber too big) without (I'm running out of nodesCan't divide by zeroThe word is too longI'm having trouble with the diskDisk is fullMy edit buffer is fullIf wants [ ]'s around instructionsTRUEFALSE.LOGTOBYEEDENDMAKEPPROPPACKAGEBURY (NAME) (PROPERTY) is buried defined isn't a name or procedureEvaluating  is a primitiveNot enough inputs to I don't know what to do with  isn't a parameter!!! LOGO system bug Too few items in  is not TRUE or FALSEFile  already existsFile  not foundI don't know how to  has no valueI can't find catch for Can't find label I can't  while loading a fileCan't  from the editorMaking "  is  returns In ,  doesn't like  as input didn't output to  in 's  is .PIC$TEMP$.PICPUPDPXPEWINDOWWRAPFENCEGFILLGRAPHICS.FPT.LPTZb~ZhZtZZZZ2ZLZZZnZZZZVZZZ Z Z!Z"Z"Z"[ *[*T[*[*[!+[',[--n[3,l[7, [=->[EF[NG[SH[_G[lHL[xG[}5[68[:\[:[:[9Z[9[9[9[:&[.\[/Z[Nd[KB[K[O[L[M[OJ[N[H[H\%X\& \&\&\&\(n\#\+(\5(\;(\C)D\I)\Q.2\Z \] \`\jR\p\w \{ \ `\ 4\ p\ \ \ \ \ .\ \ P\\ `\ \\\\8\V\p]*]4X]46]4 ]#4$],5]35]86 ]=;]B;]G/]N1]S2|]Y7(]^;X]f;]m7]s7X]z]~]]]"]|]]]]h]]]] ] ] ]]]2]]@Z]@]@]^]@^A^A^B^~^*&^6>^D^MB8^VBR^\B~^lB^rB^yC^Ej^C^C^D$^D>^^EB^E,^F^F^E\^@^An^m_?_?_h6_b,_#bD_+F(_0F>_5FT_9F_Am_Hm~_LcV_Pd_TdT_[e_ce\_hd_pe&_yfD_f_f_g_o<____________________`` `````&`-`4ASCIIBUTFIRST BFBUTLAST BLCHARCOUNTEMPTYPEQUALPFIRSTFPUTITEMLASTLISTLISTPLPUTMEMBERPNUMBERPSENTENCE SEWORDPWORDPIECEWHEREUPPERCASE UCLOWERCASE LCMAKELOCALNAMEPTHINGGPROPPLISTGLISTPPSPPROPREMPROPPRINT PRTYPEREADCHAR RCREADQUOTE RQREADLIST RLSHOWEDALLEDIT EDERALLERNERASE ERPOPOALLPOTSPONSPOPSDEFINETEXTCHANGEFERASEFILEEDFDIRLOADSAVEPATHSETPATHCOPYONCOPYOFFCATCHERRORTHROWGOLABELNODESRECYCLE.CONTENTSTRACENOTRACEWATCHNOWATCHNOFORMATCOIFOUTPUT OPPAUSEREPEATRUNSTOPANDNOTORARCTANCOSINTQUOTIENTRANDOMREMAINDERRERANDOMSHUFFLEROUNDSIN.REPLACE.REPTAILSORTTESTIFFALSE IFFIFTRUE IFTNAMECOPYDEFPRIMITIVEPDEFINEDPPROCLISTFOLLOWEDNSEDPSERNSERPSPOCALLPOTLPOREFBURYPACKAGEPKGALLPOPKGUNBURYABSDEGREESRADIANSPITANSQRTEXPLOGLOG10^<= =<<> ><=> >=+ SUM-* PRODUCT/<=>BACK BKCLEANCLEARSCREEN CSFENCEFORWARD FDHIDETURTLE HTHOMELEFT LTPENDOWN PDPENERASE PEPENREVERSE PXPENUP PURIGHT RTSETBGSETHEADING SETHSETPCSETPENSETPOSSETSCRUNCHSETXSETYSHOWTURTLE STTOWARDSWINDOWWRAPKEYP.EXAMINE.DEPOSITCLEARTEXT CTTURTLEFACTS TFSCREENFACTS SFTURTLETEXT TTSETZOOMSETPANFILLLOADPICSAVEPICXCORYCORPOSHEADINGSETPALPALBOXARCCIRCLEELLIPSEPOLYSETFILLFILLATTRSETLINELINEATTRSETTEXTGETTEXTMOUSEDR LOGO FOR GEM!LOADING: STARTUP.LOG.FIL.RDR.WTR.PRM.DEF.FUN.APV.CAT.PAU.SPC.REM.ENL.FMT.BUR.PAK.PKGTOPLEVELREDEFPERRACTan empty word-()!!!!"" ( $ " "  $              $           $ $ 0 $    <                             60  0    ,  $  , *                         " 0                                      &                &     $"& (                                                      <      & 8                                            &       ,                 (                      *     X   :0&   ..h R4 PT            "       & 8    $B &  B H&     &     "      "4   N*  R  2B  4   0J  2 L  "         : 2                                         $ $     .                      L(  @84*"6<<& 0 2*&@H&LDH44 "       $       L* 6" 6*L6&  0$ " `v . :$ " " (0L"  ( ( ( * .    <$$  0,.,      &B 0    B ..* * , 4.&     &("    (   D2               ."(     > &          "  $     R F     2 &   2     :0& >(                      ( L           *R   " 2   6$28   *4    "      4        & 6                   "         "   "(  :  (2 "  R   2  * .6           *     " > `$  ($ .(   ""L  0   0D4 (@  (,R**X  & :@&  .,6,  (  "      "          0   "     4 ,              64 4 tL  0Z$6 6 "&    & 8 .( ,   *&($ 6  0  4  &    $   T      &*  (  : L  "        8  4  &     &        :  $ """ $.      $ 0   &                 4  . (P T0b 06D,6 >"P : , ((T *6nf r n(8d\:($z@6$x?:?A?H?M?S?]?p??????@@@@)@8@F@T@c@j@q@x@@@@@@@@@@@A AA*A8AFATAbAqAAAAAAAAAAABBBBBBB"B,B/B2B<B?BBBLBOBUBXBbBeBhBrBuBxBBBBBBBBBBBBBCCC C.C4C;CFCKCPCXC^CcCjC{CCCCCCCCCCCDDD)D.D;DBDGDMDZDkDwDD_bl or|      "/ 9CV   "3 =G_ PP! z       4P     . CN\ix!       4"3#$%&'()#*1+?,M -\ .j /x 0 123!5= 6789:; <=4*#8 BGN TY  \   A x        A   a%   < X`    n t {        % !t     i  n   {   1&       '  | ,|LOGO.RSC00n0nn Desk File Run Edit Settings About Atari Logo-------------------- Desk Accessory 1 Desk Accessory 2 Desk Accessory 3 Desk Accessory 4 Desk Accessory 5 Desk Accessory 6 Load ... Save as ... Delete ...-------------- Load Pic... Save Pic...-------------- Quit Save Stop! Run Buffer Continue Pause Workspace File... Save Edit ^C Abandon ^G-------------- Mark ^S Cut ^W Copy ^T Paste ^Y-------------- Top ^R Bottom ^X Center ^L Page Up ^U Page Down ^V--------------  Line ^A  Line ^E Graphics Turtle Screen -------------- Buffer Grph Watch Trace Close Debug Close Edit GRAPHICS OK CANCELFill:TRUEFALSE11Style: __9922Index: __9933Color: __99Line:44Style: __9955Width: __9966Color: __9977Background: __99TURTLE SETTINGS:Position:222222222X: _________XXXXXXXXX333333333Y: _________XXXXXXXXX111111111Heading: _________XXXXXXXXXTurtle State:SHOWNHIDDENPen State: UP DOWNREVERSEERASE OK CANCELSCREEN SETTINGS:111111111Aspect Ratio: _________XXXXXXXXX333333333X: _________XXXXXXXXX OK CANCEL444444444Y: _________XXXXXXXXX222222222Zoom: _________XXXXXXXXXPan:Window Mode:WINDOWWRAPFENCEATARI LOGOCopyright 1985Atari Corp.Digital Research Inc.All Rights ReservedOK.  t..  tSTARTREKTBIt TINYBAS PRGt TBI DOCt 7TOSFORMTTBIt Xi:0005Y=2999:IN."Do you want a difficult game? ","(Y or N)"A :000AP."Stardate 3200: Your mission is ",:IFA=YY=999 :000FK=0,B=0,D=30:F.I=0TO63:J=R.(99)<5,B=B+J :0014M=R.(Y),M=(M<209)+(M<99)+(M<49)+(M<24)+(M<9)+(M<2),K=K+M :0019@(I)=-100*M-10*J-R.(8):N.I:IF(B<2)+(K<4)G.15 :001EP."to destroy ",#1,K," Klingons in 30 stardates. :0023P."There are ",#1,B," starbases.":GOS.160:C=0,H=K :0028U=R.(8),V=R.(8),X=R.(8),Y=R.(8) :002DF.I=71TO152:@(I)=0:N.I:@(8*X+Y+62)=4,M=A.(@(8*U+V-9)),N=M/100 :0032I=1:IFNF.J=1TON:GOS.165:@(J+134)=300,@(J+140)=S,@(J+146)=T:N.J :0037GOS.175:M=M-100*N,I=2:IFM/10GOS.165 :003CM=M-M/10*10,I=3:IFMF.J=1TOM:GOS.165:N.J :0041GOS.145:GOS.325:IFKG.95 :0046P.:P."Mission accomplished.":IFD<3P."Boy, you barely made it. :004BIFD>5P."Good work...":IFD>9P."Fantastic!":IFD>13P."Unbelievable! :0050D=30-D,I=H*100/D*10:P.#1,H," Klingons in ",D," stardates. (",I,") :0055J=100*(C=0)-5*C:P.#1,C," casualties incurred. (",J,") :005AP."Your score:",I+J:G.110 :005FIFD<0P."It's too late, the Federation has been conquered.":G.110 :0064IFE>=0G.120 :0069P."Enterprise destroyed":IFH-K>9P."But you were a good opponent :006EY=987:P.:IN."Another game? ","(Y or N)"A:IFA=YG.5 :0073P."Goodbye...":STOP :0078S=220,G=180,L=200,P=260,R=420,W=465,T=555:IN."Captain"A :007DIF(A=S)+(A=G)+(A=L)+(A=P)+(A=R)+(A=W)+(A=T)G.A :0082P."R=Report S=SR. sensor L=LR. sensor :0087P."G=Galaxy map P=Phaser T=Torpedo :008CP."W=Warp engine * Please use one of these commands *":G.120 :0091F.I=X-(X>1)TOX+(X<8):F.J=Y-(Y>1)TOY+(Y<8) :0096IF@(8*I+J+62)<>2N.J:N.I:O=0:R. :009BIFO=0P.'Sulu: "Captain, we are docked at Starbase." :00A0E=4000,F=10,O=1:F.I=64TO70:@(I)=0:N.I:R. :00A5S=R.(8),T=R.(8),A=8*S+T+62:IF@(A)G.165 :00AA@(A)=I:R. :00AFP."Enterprise in Q-",#1,U,V," S-",X,Y:R. :00B4GOS.175:J=2:GOS.375:IFIG.120 :00B9P." of galaxy map":F.I=0TO7:P.:P.#1,I+1,":",:F.J=0TO7:M=@(8*I+J) :00BEP.#4,(M>0)*M,:N.J:P.:N.I:P." ",:F.I=0TO7:P." ..",:N.I:P. :00C3P." ",:F.I=1TO8:P.#4,I,:N.I:P.:P.:G.120 :00C8GOS.175:J=3:GOS.375:IFIG.120 :00CDP.:F.I=U-1TOU+1:F.J=V-1TOV+1:M=8*I+J-9,A=0 :00D2IF(I>0)*(I<9)*(J>0)*(J<9)A=A.(@(M)),@(M)=A :00D7P.#4,A,:N.J:P.:N.I:G.120 :00DCGOS.175:J=1:GOS.375:IFIG.120 :00E1M=8*U+V-9,@(M)=A.(@(M)) :00E6P.:F.I=1TO8:P.#1,I,:F.J=1TO8:M=@(8*I+J+62):IFM=0P." .", :00EBIFM=1P." K", :00F0IFM=2P." B", :00F5IFM=3P." *", :00FAIFM=4P." E", :00FFN.J:P.:N.I:P." ",:F.I=1TO8:P.#2,I,:N.I:P.:G.120 :0104J=4:GOS.375:IFIG.120 :0109IN." Energized. ","Units to fire"A:IFA<1G.120 :010EIFA>EP.'Spock: "We have only ',#1,E,' units."':G.120 :0113E=E-A:IFN<1P."Phaser fired at empty space.":G.65 :0118A=A/N:F.M=135TO140:IF@(M)=0G.290 :011DGOS.295:P.#3,S," units hit ",:GOS.305 :0122N.M:G.65 :0127IFA>1090P."...OVERLOADED..":J=4,@(67)=1,A=9:GOS.375 :012CI=@(M+6)-X,J=@(M+12)-Y,S=A*30/(30+I*I+J*J)+1:R. :0131P."Klingon at S-",#1,@(M+6),@(M+12),:@(M)=@(M)-S :0136IF@(M)>0P." **DAMAGED**":R. :013B@(M)=0,I=8*U+V-9,J=@(I)/A.(@(I)),@(I)=@(I)-100*J,K=K-1 :0140I=8*@(M+6)+@(M+12)+62,@(I)=0,N=N-1:P." ***DESTROYED***":R. :0145IFN=0R. :014AP."Klingon attack":IFOP."Starbase protects Enterprise":R. :014FT=0:F.M=135TO140:IF@(M)=0G.350 :0154A=(@(M)+R.(@(M)))/2:GOS.295:T=T+S,I=@(M+6),J=@(M+12) :0159P.#3,S," units hit from Klingon at S-",#1,I,J :015EN.M:E=E-T:IFE<=0P."*** BANG ***":R. :0163P.#1,E," units of energy left.":IFR.(E/4)>TR. :0168IF@(70)=0@(70)=R.(T/50+1),J=7:G.375 :016DJ=R.(6),@(J+63)=R.(T/99+1)+@(J+63),I=R.(8)+1,C=C+I :0172P.'McCoy: "Sickbay to bridge, we suffered',#2,I,' casualties." :0177I=@(J+63):IFJ=1P."Short range sensor", :017CIFJ=2P."Computer display", :0181IFJ=3P."Long range sensor", :0186IFJ=4P."Phaser", :018BIFJ=5P."Warp engine", :0190IFJ=6P."Photon terpedo tubes", :0195IFJ=7P."Shield", :019AIFI=0R. :019FP." damaged, ",#1,I," stardates estimated for repair":R. :01A4P."Status report:":P."Stardate",#10,3230-D:P."Time Left",#7,D :01A9P."Condition ",:IFOP."Docked":G.445 :01AEIFNP."Red":G.445 :01B3IFE<999P."Yellow":G.445 :01B8P."Green :01BDP."Position Q-",#1,U,V," S-",X,Y:P."Energy",#12,E :01C2P."Torpedoes",#7,F:P."Klingons left",#3,K:P."Starbases",#6,B :01C7F.J=1TO7:IF@(J+63)GOS.375 :01CCN.J:G.120 :01D1J=5:GOS.375:IFI=0P. :01D6IN."Sector distance"W:IFW<1G.120 :01DBIFI*(W>2)P.'Chekov: "We can try 2 at most, Sir."':G.470 :01E0IFW>91W=91:P.'Spock: "Are you sure, Captain?" :01E5IFE0):N.M :01F9P=45*X+22,G=45*Y+22,W=45*W:F.M=1TO8:W=W-R:IFW<-22G.525 :01FEP=P+S,G=G+T,I=P/45,J=G/45:IF(I<1)+(I>8)+(J<1)+(J>8)G.530 :0203IF@(8*I+J+62)=0X=I,Y=J:N.M :0208P."**EMERGENCY STOP**":P.'Spock: "To err is Human." :020D@(8*X+Y+62)=4:GOS.175:G.65 :0212P=U*72+P/5+W/5*S/R-9,U=P/72,G=V*72+G/5+W/5*T/R-9,V=G/72 :0217IFR.(9)<2P."***SPACE STORM***":T=100:GOS.360 :021CIF(U>0)*(U<9)*(V>0)*(V<9)X=(P+9-72*U)/9,Y=(G+9-72*V)/9:G.45 :0221P."**You wandered outside the galaxy** :0226P."On-board computer takes over, and saved your life":G.40 :022BJ=6:GOS.375:IFIG.120 :0230IFF=0P." Empty":G.120 :0235P." Loaded":GOS.615:IFR=0G.120 :023AP."Torpedo track ",:F=F-1,P=45*X+22,G=45*Y+22:F.M=1TO8 :023FP=P+S,G=G+T,I=P/45,J=G/45:IF(I<1)+(I>8)+(J<1)+(J>8)G.585 :0244L=8*I+J+62,W=8*U+V-9,R=@(W)/A.(@(W)):P.#1,I,J," ",:G.585+5*@(L) :0249N.M:P."...Missed":G.65 :024ES=R.(99)+280:F.M=135TO140:IF(@(M+6)=I)*(@(M+12)=J)GOS.305 :0250N.M:G.65 :0253B=B-1,@(L)=0,@(W)=@(W)-10*R:P."Starbase destroyed! :0255P.'SPOCK: "I often find Human behaviour fascinating."':G.65 :0258P."Hit a star":IFR.(9)<3P."Torpedo absorbed":G.65 :025D@(L)=0,@(W)=@(W)-R:IFR.(9)<6P."Star destroyed":G.65 :0262T=300:P."It novas! ***RADIATION ALARM***":GOS.360:G.65 :0267IN."Course (0-360)"I:IF(I>360)+(I<0)R=0:R. :026CS=(I+45)/90,I=I-S*90,R=(45+I*I)/110+45:G.625+5*(S<4)*S :0271S=-45,T=I:R. :0276S=I,T=45:R. :027BS=45,T=-I:R. :0280S=-I,T=-45:R. @ `  #>``P` ` &` N` ` ^.y>M a # 9>#l#B###.y>M a <>aa (HAa a JAgldXYYa *Ifa *$M&ya (# g&y,K 9c#"N$Ma"H$M&La`rLISLOANERUSAVNEXLEIGOTGOSURETURREFOINPUPRINPOKSTOBYCALPEERNABSIZTSTE><<0Vl  ~Jz|$d<Rbdjp|vCEza x&HBf K`$<.g<g X KBJj`tJjG&RNaL#a>`a6 y#JgB"Ha@e# ITa JC E`haa"af@`aaaeaPa g <fa ga`x aL:a `a@ a`ra2# a<8`aX`a,ab`a`?a8"at`aF`haa/"adf/9/9B#`a("9g*.A## _ah`aa#CgE`\a#CjE`Bax`p###,O` gf$O"NGa.K`$a"e"@ 9g~ga` йi""9JjAm# y`a`` aJf"HBaZd`.y#X _/a` aeV$@`/ae$@B"_a//9##/ <:a$AaR$_$# _Xa0,``*  g aNa,``a yaag<@g<:fa$a ag< f`#a`tBAag<Ae_< QNua: y"ya< ab< aZc<:aNa:a6< ga:`<@a0< a(< a <aad`Xt<<0<9c^aQNua*a,/a "_` `vaJg/"@N _`aV/CoE`a2m$`&a,g` a&o`a n`af `Nual`NuBNupNu Nu "//a"Nua-B`"a+a&a+/a"Ёi6`ap-l/aDNa&a\*/a"a`aJ/F/a "Aa`CXE`a*e"@B Nua4 JBfa(aa)Nu`naJB<@eBf(RHaЀeЀe/a"c 9Nu< <eRH@@"9ANu(JjDJjDc AbH4H@H@Ђe8JjDNuJg*$(JjDJjDv"BҁрgkRQAJjDDNua"@BNuaJgk""y:9eC #:a RNuaJjDkNu 9Nuae:/a= a,_,Nu`&a:X`a X`Nua  fNu/MaF _ 9ggB"yaH<?a"B@Sah`f/M!`/M`aV/M'`a< aAag<g&<gD< g< ea< g^e<a< ac<aS`"gSA<ax< ap<ahQA`z< aRNud<"y$ySe JSAeNuT  f`ܷg`Nug!`,_#g####N"9d,_"9g/9/9/9/9/Nga< f< aNua"<""Ha I"_< gTNa'<'`a_< a`"_`Nu&?<JjDSD i ¼`0BAHA 42 HA2HAH@H@SDJfSDk < aQJj<-ak <0a`8NuBIxa< aB@`aN"_g BSNRRNBBBa0 0e( 9b" d ҁҁҀҁҀRB`Nu  fR`NuAB< g<"g<'gJfaR`NuJf`ֲfB`ΰ<ae <zb< Nua$g <f`dNuM5ga`NuH?<?<NMXOJg ??<?<NM\OLNuH?<?<NMXOJg?<?<NMXOLNuHD/<D/<?9B?<@NA kxLNuH/<E/<?9B?<?NA kF9ELNuHCF<"g m`<"gl`LNuH?</<F?<=NAPO3B|mLNuHBg/<F?<NAJLNu?<NA Gordo's MC68000 Tiny BASIC, v1.0 v2.0 for the Atari 520 ST version adapted by Kenneth L. Hurley 1230 W 7th #3 Eugene, OR 97402 OK How? What? Sorry.File Error! CR TAB CTRLCCTRLHCTRLSCTRLXBUFLENLENDMEM>STARTCSTART"GOWARMWSTARTZGOOUT OUTCH GOININCH 6GOAUXOAUXOUT bGOAUXIAUXIN GOBYEBYEBYE zTXTBGNTXT@INITMSG PRMESG TXTUNFSTKLMTVARBGNSTKGOSCURRNTOKMSG ST3~GETLN TOUPBUF BUFFERTSTNUM ZIGNBLK DIRECT QHOW FNDLN ST4FNDNXT MVUP QSORRYMVDOWN TAB1TAB2 TAB4XTAB5gTAB6jTAB8oTAB11zNEWVRUNlSAVETAB21NEXT IF~GOTOGOSUBJRETURNzREM|FORINPUTPRINTPOKE$STOPRGdCALLNX1\NX2tIF2IF1FNDSKP INPERRSTKINPIP2IP4 IP3PRTSTG XIP5PARSENAM OPENFILE GBYTEvCLOSEFIL bGBYTE1zGBYTE2CREATFIL :SAVE1SAVENDPBYTESAVE2PBYTE1PBYTE2PKER8EXPR2XP18XPRT0XPRT1XP15RTXP16RTXP21XP26XP22EXPR3XP23XP25XP24XP42>EXPR4XP31XP34MULT32DIV32XP41$EXP4RT"PARN.XP43@TSTVRTTV1|MLT1MLT2MLT3MLTRETDIV1DIV2DIV3DIV4DIVRT RANPNT:RA1>ABSRT`SV1FI1FI2AWHATWHTMSGERRORASORRYSRYMSG!HOWMSGFERROR FERRMSG'GL1 *GL3 \GL4 GL2 HGL7 GL6 GL5 FNDRET MVRET PP1 $PU1 TPS1 ZPRTRET rQT3 QT1 ~QT2 QT4 QT5 PN1 PNOV TOASCII PN4 PN3 PN5 PNRET "TC1 TTN1 `TSNMRET IGBRET IGB1 TOUPB1 TOUPBRT DOQUO TOUPPER DOQUO1 TOUPRET CHKRET CLMSG5PRMRET INCRET \OUTBYTEDFHANDLEBINBYTEEFILENAMEFPN_L1   4  J ( .8 042.d J " 0&8P^l &   Documentation for Gordo's MC68000 Tiny BASIC version 1.0 This is an adaptation of Li Chen Wang's 'Palo Alto Tiny BASIC' for the Motorola MC68000 microprocessor. It includes more functions and program save and load. As distributed, it is set up for a Motorola MEX68KECB Educational Computer Board connected to a host CP/M computer. The source code should give you enough details to allow you to install it on a different system. If you have any problems, you can write to me at: Gordon Brandly R.R. 2 Fort Sask., AB, Canada T8L 2N8 This version for the Atari 520 ST translated by : Kenneth L. Hurley 1230 W 7th #3 Eugene, OR 97402 (503) 343-7285 The Language Numbers In this Tiny BASIC, all numbers are integers and must be in the range 2147483647 to -2147483648. Variables There are 26 variables denoted by the letters A through Z. There is also a single array @(I). The dimension of this array (i.e., the range of value of the index I) is set automatically to make use of all the memory space that is left unused by the program (i.e., 0 through SIZE/4, see SIZE function below). All variables and array elements are 4 bytes long. Functions There are 4 functions: ABS(X) gives the absolute value of X. RND(X) gives a random number between 1 and X (inclusive). SIZE gives the number of bytes left unused by the program. PEEK(X) gives the value of the byte at memory location X. Arithmetic and Compare Operators / Divide. (Note that since we have integers only, 2/3=0) * Multiply. - Subtract. + Add. > Greater than. (comparison) < Less than. (comparison) = Equal to. (comparison) Note that to certain versions of BASIC "LET A=B=0" means "set both A and B to 0". To this version of Tiny BASIC, it means "set A to the result of comparing B with 0". <> Not equal to. (comparison) >= Greater than or equal to. (comparison) <= Less than or equal to. (comparison) +, -, *, and / operations result in values between -2147483647 and 2147483647. (-2147483648 is also allowed in some cases.) All compare operators result in a 1 if true and a 0 if not true. Expressions Expressions are formed with numbers, variables, and functions with arithmetic and compare operators between them. + and - signs can also be used at the beginning of an expression. The value of an expression is evaluated from left to right, except that * and / are always done first, and then + and - , and then compare operators. Parentheses can also be used to alter the order of evaluation. Note that compare operators can be used in any expression. For example: 10 LET A=(X>Y)*123+(X=Y)*456+(XV)*(U<99)*(V>3) PRINT "Yes" 30 LET R=RND(100), A=(R>3)+(R>15)+(R>56)+(R>98) In line 10, A will be set to 123 if X>Y, to 456 if X=Y, and to 789 if XB, V=(A>B)*X+(A This indicates that XLISP is waiting for an expression to be typed. When an incomplete expression has been typed (one where the left and right parens don't match) XLISP changes its prompt to: n> where n is an integer indicating how many levels of left parens remain unclosed. When a complete expression has been entered, XLISP attempts to evaluate that expression. If the expression evaluates successfully, XLISP prints the result of the evaluation and then returns to the initial prompt waiting for another expression to be typed. Input can be aborted at any time by typing the CONTROL-G key (it may be necessary to follow CONTROL-G by RETURN). XLISP: An Experimental Object Oriented Language Page 6 BREAK COMMAND LOOP 4.0 BREAK COMMAND LOOP When XLISP encounters an error while evaluating an expression, it attempts to handle the error in the following way: If the symbol '*breakenable*' is true, the message corresponding to the error is printed. If the error is correctable, the correction message is printed. If the symbol '*tracenable*' is true, a trace back is printed. The number of entries printed depends on the value of the symbol '*tracelimit*'. If this symbol is set to something other than a number, the entire trace back stack is printed. XLISP then enters a read/eval/print loop to allow the user to examine the state of the interpreter in the context of the error. This loop differs from the normal top-leval read/eval/print loop in that if the user types the symbol 'continue' XLISP will continue from a correctable error. If the user types the symbol 'quit' XLISP will abort the break loop and return to the top level or the next lower numbered break loop. When in a break loop, XLISP prefixes the break level to the normal prompt. If the symbol '*breakenable*' is nil, XLISP looks for a surrounding errset function. If one is found, XLISP examines the value of the print flag. If this flag is true, the error message is printed. In any case, XLISP causes the errset function call to return nil. If there is no sur; Make the class ship and its instance variables be known (setq ship (Class :new '(x y xv yv m name captain registry))) (ship :answer :getx '() '( x )) ; just evaluate x (ship :answer :getxv '() '( xv )) ; note that the method is a (ship :answer :gety '() '( y )) ; list of forms, the value (ship :answer :getyv '() '( yv )) ; of the last one being the (ship :answer :getm '() '( m )) ; value of the method (ship :answer :getname '() '( name )) (ship :answer :getcaptain '() '( captain )) (ship :answer :getregistry '() '( registry )) ; formal ; param ; of ; method (ship :answer :setx '(to) '( (setq x to) ) ) (ship :answer :setxv '(to) '( (setq xv to) ) ) (ship :answer :sety '(to) '( (setq y to) ) ) (ship :answer :setyv '(to) '( (setq yv to) ) ) (ship :answer :setm '(to) '( (setq m to) ) ) (ship :answer :setname '(to) '( (setq name to) ) ) (ship :answer :setcaptain '(to) '( (setq captain to) ) ) (ship :answer :setregistry '(to) '( (setq registry to) ) ) (ship :answer :sail '(time) ; the METHOD for sailing '( (princ (list "sailing for " time " hours\n")) ; note that this form is expressed in terms of objects: "self" ; is bound to the object being talked to during the execution ; of its message. It can ask itself to do things. (self :setx (+ (self :getx) (* (self :getxv) time))) ; This form performs a parallel action to the above, but more ; efficiently, and in this instance, more clearly (setq y (+ y (* yv time))) ; Cute message for return value. Tee Hee. "Sailing, sailing, over the bountiful chow mein...")) ; is not terribly instructive. How about a more ; informative print routine? (ship :answer :print '() '((princ (list "SHIP NAME: " (self :getname) "\n" "REGISTRY: " (self :getregistry) "\n" "CAPTAIN IS: " (self :getcaptain) "\n" "MASS IS: " (self :getm) " TONNES\n" "CURRENT POSITION IS: " (self :getx) " X BY " (self :gety) " Y\n" "SPEED IS: " (self :getxv) " XV BY " (self :getyv) " YV\n") ) )) ; a function to make life easier (defun newship (mass name registry captain &aux new) (setq new (ship :new)) (new :setx 0) (new :sety 0) (new :setxv 0) (new :setyv 0) (new :setm mass) (new :setname name) (new :setcaptain captain) (new :setregistry registry) (new :print) new) ; and an example object. (setq Bounty (newship 50 'Bounty 'England 'Bligh)) (defun factorial (n) (cond ((= n 1) 1) (t (* n (factorial (- n 1)))))) (defun fib (x) (cond ((< x 2) 1) (t (+ (fib (1- x)) (fib (- x 2)))))) ; Good ol towers of hanoi ; ; Usage: ; (hanoi ) ; - an integer the number of discs (defun hanoi(n) ( transfer 'A 'B 'C n )) (defun print-move ( from to ) (princ "Move Disk From ") (princ from) (princ " To ") (princ to) (princ "\n")) (defun transfer ( from to via n ) (cond ((equal n 1) (print-move from to )) (t (transfer from via to (- n 1)) (print-move from to) (transfer via to from (- n 1))))) rounding errset function, XLISP prints the error message and returns to the top level. XLISP: An Experimental Object Oriented Language Page 7 DATA TYPES 5.0 DATA TYPES There are several different data types available to XLISP programmers. o lists o symbols o strings o integers o objects o file pointers o subrs/fsubrs (built-in functions) Another data type is the stream. A stream is a list node whose car points to the head of a list of integers and whose cdr points to the last list node of the list. An empty stream is a list node whose car and cdr are nil. Each of the integers in the list represents a character in the stream. When a character is read from a stream, the first integer from the head of the list is removed and returned. When a character is written to a stream, the integer representing the character code of the character is appended to the end of the list. When a function indicates that it takes an input source as a parameter, this parameter can either be an input file pointer or a stream. Similarly, when a function indicates that it takes an output sink as a parameter, this parameter can either be an output file pointer or a stream. XLISP: An Experimental Object Oriented Language Page 8 THE EVALUATOR 6.0 THE EVALUATOR The process of evaluation in XLISP: o Integers, strings, objects, file pointers, and subrs evaluate to themselves o Symbols evaluate to the value associated with their current binding o Lists are evaluated by evaluating the first element of the list o If it evaluates to a subr, the remaining list elements are evaluated and the subr is called with these evaluated expressions as arguments. o If it evaluates to an fsubr, the fsubr is called using the remaining list elements as arguments (they are evaluated by the subr itself if necessary) o If it evaluates to a list and the car of the list is 'lambda', the remaining list elements are evaluated and the resulting expressions are bound to the formal arguments of the lambda expression. The body of the function is executed within this new binding environment. o If it evaluates to a list and the car of the list is 'macro', the remaining list elements are bound to the formal arguments of the macro expression. The body of the function is executed within this new binding environment. The result of this evaluation is considered the macro expansion. This result is then evaluated in place of the original expression. o If it evaluates to an object, the second list element is evaluated and used as a message selector. The message formed by combining the selector with the values of the remaining list elements is sent to the object. XLISP: An Experimental Object Oriented Language Page 9 LEXICAL CONVENTIONS 7.0 LEXICAL CONVENTIONS The following conventions are followed when entering XLISP programs: Comments in XLISP code begin with a semi-colon character and continue to the end of the line. Symbol names in XLISP can consist of any sequence of non-blank printable characters except the following: ( ) ' ` , " ; Upper and lower case characters are distinct. The symbols 'CAR' and 'car' are not the same. The names of all built-in functions are in lower case. The names of all built-in objects are lower case with an initial capital. Symbol names must not begin with a digit. Integer literals consist of a sequence of digits optionally beginning with a '+' or '-'. The range of values an integer can represent is limited by the size of a C 'int' on the machine that XLISP is running on. Literal strings are sequences of characters surrounded by double quotes. Within quoted strings the '\' character is used to allow non-printable characters to be included. The codes recognized are: \\ means the character '\' \n means newline \t means tab \r means return \e means escape \nnn means the character whose octal code is nnn XLISP defines several useful read macros: ' == (quote ) #' == (function ) ` == (backquote ) , == (comma ) ,@ == (comma-at ) XLISP: An Experimental Object Oriented Language Page 10 OBJECTS 8.0 OBJECTS Definitions: o selector - a symbol used to select an appropriate method o message - a selector and a list of actual arguments o method - the code that implements a message Since XLISP was created to provide a simple basis for experimenting with object oriented programming, one of the primitive data types included was 'object'. In XLISP, an object consists of a data structure containing a pointer to the object's class as well as a list containing the values of the object's instance variables. Officially, there is no way to see inside an object (look at the values of its instance variables). The only way to communicate with an object is by sending it a message. When the XLISP evaluator evaluates a list the value of whose first element is an object, it interprets the value of the second element of the list (which must be a symbol) as the message selector. The evaluator determines the class of the receiving object and attempts to find a method corresponding to the message selector in the set of messages defined for that class. If the message is not found in the object's class and the class has a super-class, the search continues by looking at the messages defined for the super-class. This process continu; get some more memory (expand 1) ; some fake definitions for Common Lisp pseudo compatiblity (setq symbol-function symbol-value) (setq fboundp boundp) (setq first car) (setq second cadr) (setq rest cdr) ; some more cxr functions (defun caddr (x) (car (cddr x))) (defun cadddr (x) (cadr (cddr x))) ; (when test code...) - execute code when test is true (defmacro when (test &rest code) `(cond (,test ,@code))) ; (unless test code...) - execute code unless test is true (defmacro unless (test &rest code) `(cond ((not ,test) ,@code))) ; (makunbound sym) - make a symbol be unbound (defun makunbound (sym) (setq sym '*unbound*) sym) ; (objectp expr) - object predicate (defun objectp (x) (eq (type x) 'OBJ)) ; (filep expr) - file predicate (defun filep (x) (eq (type x) 'FPTR)) ; (unintern sym) - remove a symbol from the oblist (defun unintern (sym) (cond ((member sym *oblist*) (setq *oblist* (delete sym *oblist*)) t) (t nil))) ; (mapcan ...) (defmacro mapcan (&rest args) `(apply #'nconc (mapcar ,@args))) ; (mapcon ...) (defmacro mapcon (&rest args) `(apply #'nconc (maplist ,@args))) ; (save fun) - save a function definition to a file (defun save (fun) (let* ((fname (strcat (symbol-name fun) ".lsp")) (fp (openo fname))) (cond (fp (print (cons (if (eq (car (eval fun)) 'lambda) 'defun 'defmacro) (cons fun (cdr (eval fun)))) fp) (close fp) fname) (t nil)))) ; (debug) - enable debug breaks (defun debug () (setq *breakenable* t)) ; (nodebug) - disable debug breaks (defun nodebug () (setq *breakenable* nil)) ; initialize to enable breaks but no trace back (setq *breakenable* t) (setq *tracenable* nil) ; (defun prettyprint (s) (ppaux s 0 t)(terpri)) (defun ppaux (s-exp s-exp-start newline) (prog (arg-start) (cond (newline (terpri) (setq column 0))); Do carriage return? (do () ((= column s-exp-start)); Move out to starting place. (princ sp) (setq column (1+ column)) ) (cond ((atom s-exp) ; If s is an atom, print it. (princ s-exp) (setq column (+ column (length (explode s-exp))))) (t (princ lp) ; Print left paren. (setq column (1+ column)); Increment column (ppaux (car s-exp) column nil); Pretty-print 1st element (cond ((cdr s-exp); If more, (princ sp); print space (setq column (1+ column)); Increment column (setq arg-start column); assign arg-start (ppaux (cadr s-exp) arg-start nil); Pretty-print ; next (mapcar '(lambda (e); and the rest on new lines. (ppaux e arg-start t)) (cddr s-exp)))) (princ rp); Print right paren. (setq column (1+ column)))) )) (setq lp "(") (setq rp ")") (setq sp " ") ;; The following is a tiny Prolog interpreter in MacLisp ;; written by Ken Kahn and modified for XLISP by David Betz. ;; It was inspired by other tiny Lisp-based Prologs of ;; Par Emanuelson and Martin Nilsson. ;; There are no side-effects anywhere in the implementation. ;; Though it is VERY slow of course. (defun prolog (database &aux goal) (do () ((not (progn (princ "Query?") (setq goal (read))))) (prove (list (rename-variables goal '(0))) '((bottom-of-environment)) database 1))) ;; prove - proves the conjunction of the list-of-goals ;; in the current environment (defun prove (list-of-goals environment database level) (cond ((null list-of-goals) ;; succeeded since there are no goals (print-bindings environment environment) (not (y-or-n-p "More?"))) (t (try-each database database (cdr list-of-goals) (car list-of-goals) environment level)))) (defun try-each (database-left database goals-left goal environment level &aux assertion new-enviroment) (cond ((null database-left) nil) ;; fail since nothing left in database (t (setq assertion (rename-variables (car database-left) (list level))) (setq new-environment (unify goal (car assertion) environment)) (cond ((null new-environment) ;; failed to unify (try-each (cdr database-left) database goals-left goal environment level)) ((prove (append (cdr assertion) goals-left) new-environment database (+ 1 level))) (t (try-each (cdr database-left) database goals-left goal environment level)))))) (defun unify (x y environment &aux new-environment) (setq x (value x environment)) (setq y (value y environment)) (cond ((variable-p x) (cons (list x y) environment)) ((variable-p y) (cons (list y x) environment)) ((or (atom x) (atom y)) (cond ((equal x y) environment) (t nil))) (t (setq new-environment (unify (car x) (car y) environment)) (cond (new-environment (unify (cdr x) (cdr y) new-environment)) (t nil))))) (defun value (x environment &aux binding) (cond ((variable-p x) (setq binding (assoc x environment)) (cond ((null binding) x) (t (value (cadr binding) environment)))) (t x))) (defun variable-p (x) (and x (listp x) (eq (car x) '?))) (defun rename-variables (term list-of-level) (cond ((variable-p term) (append term list-of-level)) ((atom term) term) (t (cons (rename-variables (car term) list-of-level) (rename-variables (cdr term) list-of-level))))) (defun print-bindings (environment-left environment) (cond ((cdr environment-left) (cond ((= 0 (nth 2 (caar environment-left))) (prin1 (cadr (caar environment-left))) (princ " = ") (print (value (caar environment-left) environment)))) (print-bindings (cdr environment-left) environment)))) ;; a sample database: (setq db '(((father madelyn ernest)) ((mother madelyn virginia)) ((father david arnold)) ((mother david pauline)) ((father rachel david)) ((mother rachel madelyn)) ((grandparent (? grandparent) (? grandchild)) (parent (? grandparent) (? parent)) (parent (? parent) (? grandchild))) ((parent (? parent) (? child)) (mother (? parent) (? child))) ((parent (? parent) (? child)) (father (? parent) (? child))))) ;; the following are utilities (defun y-or-n-p (prompt) (princ prompt) (eq (read) 'y)) ;; start things going (prolog db) ; This is a sample XLISP program. ; It implements a simple form of programmable turtle for VT100 compatible ; terminals. ; To run it: ; A>xlisp pt ; This should cause the screen to be cleared and two turtles to appear. ; They should each execute their simple programs and then the prompt ; should return. Look at the code to see how all of this works. ; Get some more memory (expand 1) ; Clear the screen (defun clear () (princ "\e[H\e[J")) ; Move the cursor (defun setpos (x y) (princ "\e[") (princ y) (princ ";") (princ x) (princ "H")) ; Kill the remainder of the line (defun kill () (princ "\e[K")) ; Move the cursor to the currently set bottom position and clear the line ; under it (defun bottom () (setpos bx (+ by 1)) (kill) (setpos bx by) (kill)) ; Clear the screen and go to the bottom (defun cb () (clear) (bottom)) ; :::::::::::: ; :: Turtle :: ; :::::::::::: ; Define "Turtle" class (setq Turtle (Class 'new)) ; Define instance variables (Turtle 'ivars '(xpos ypos char)) ; Answer "isnew" by initing a position and char and displaying. (Turtle 'answer 'isnew '() '( (setq xpos (setq newx (+ newx 1))) (setq ypos 12) (setq char "*") (self 'display) self)) ; Message "display" prints its char at its current position (Turtle 'answer 'display '() '( (setpos xpos ypos) (princ char) (bottom) self)) ; Message "char" sets char to its arg and displays it (Turtle 'answer 'char '(c) '( (setq char c) (self 'display))) ; Message "goto" goes to a new place after clearing old one (Turtle 'answer 'goto '(x y) '( (setpos xpos ypos) (princ " ") (setq xpos x) (setq ypos y) (self 'display))) ; Message "up" moves up if not at top (Turtle 'answer 'up '() '( (if (> ypos 0) (self 'goto xpos (- ypos 1)) (bottom)))) ; Message "down" moves down if not at bottom (Turtle 'answer 'down '() '( (if (< ypos by) (self 'goto xpos (+ ypos 1)) (bottom)))) ; Message "right" moves right if not at right (Turtle 'answer 'right '() '( (if (< xpos 80) (self 'goto (+ xpos 1) ypos) (bottom)))) ; Message "left" moves left if not at left (Turtle 'answer 'left '() '( (if (> xpos 0) (self 'goto (- xpos 1) ypos) (bottom)))) ; ::::::::::::: ; :: PTurtle :: ; ::::::::::::: ; Define "DPurtle" programable turtle class (setq PTurtle (Class 'new Turtle)) ; Define instance variables (PTurtle 'ivars '(prog pc)) ; Message "program" stores a program (PTurtle 'answer 'program '(p) '( (setq prog p) (setq pc prog) self)) ; Message "step" executes a single program step (PTurtle 'answer 'step '() '( (if (null pc) (setq pc prog)) (if pc (progn (self (car pc)) (setq pc (cdr pc)))) self)) ; Message "step:" steps each turtle program n times (PTurtle 'answer 'step: '(n) '( (dotimes (x n) (self 'step)) self)) ; :::::::::::::: ; :: PTurtles :: ; :::::::::::::: ; Define "PTurtles" class (setq PTurtles (Class 'new)) ; Define instance variables (PTurtles 'ivars '(turtles)) ; Message "make" makes a programable turtle and adds it to the collection (PTurtles 'answer 'make '(x y &aux newturtle) '( (setq newturtle (PTurtle 'new)) (newturtle 'goto x y) (setq turtles (cons newturtle turtles)) newturtle)) ; Message "step" steps each turtle program once (PTurtles 'answer 'step '() '( (mapcar '(lambda (turtle) (turtle 'step)) turtles) self)) ; Message "step:" steps each turtle program n times (PTurtles 'answer 'step: '(n) '( (dotimes (x n) (self 'step)) self)) ; Initialize things and start up (setq bx 0) (setq by 20) (setq newx 0) ; Create some programmable turtles (cb) (setq turtles (PTurtles 'new)) (setq t1 (turtles 'make 40 10)) (setq t2 (turtles 'make 41 10)) (t1 'program '(left right up down)) (t2 'program '(right left down up)) es from one super-class to the next until a method for the message is found. If no method is found, an error occurs. When a method is found, the evaluator binds the receiving object to the symbol 'self', binds the class in which the method was found to the symbol 'msgclass', and evaluates the method using the remaining elements of the original list as arguments to the method. These arguments are always evaluated prior to being bound to their corresponding formal arguments. The result of evaluating the method becomes the result of the expression. XLISP: An Experimental Object Oriented Language Page 11 OBJECTS Classes: Object THE TOP OF THE CLASS HEIRARCHY Messages: show SHOW AN OBJECT'S INSTANCE VARIABLES returns the object class RETURN THE CLASS OF AN OBJECT returns the class of the object isnew THE DEFAULT OBJECT INITIALIZATION ROUTINE returns the object sendsuper [...] SEND SUPERCLASS A MESSAGE the message selector the message arguments returns the result of sending the message XLISP: An Experimental Object Oriented Language Page 12 OBJECTS Class THE CLASS OF ALL OBJECT CLASSES (including itself) Messages: new CREATE A NEW INSTANCE OF A CLASS returns the new class object isnew [] INITIALIZE A NEW CLASS the superclass returns the new class object answer ADD A MESSAGE TO A CLASS the message symbol the formal argument list this list is of the form: (... [&optional ...] [&rest ] [&aux ...]) where a formal argument an optional argument (default is nil) bound to the rest of the arguments a auxiliary variable (set to nil) a list of executable expressions returns the object ivars DEFINE THE LIST OF INSTANCE VARIABLES the list of instance variable symbols returns the object cvars DEFINE THE LIST OF CLASS VARIABLES the list of class variable symbols returns the object When a new instance of a class is created by sending the message 'new' to an existing class, the message 'isnew' followed by whatever parameters were passed to the 'new' message is sent to the newly created object. When a new class is created by sending the 'new' message to the object 'Class', an optional parameter may be specified indicating the superclass of the new class. If this parameter is omitted, the new class will be a subclass of 'Object'. A class inherits all instance variables, class variables, and methods from its super-class. XLISP: An Experimental Object Oriented Language Page 13 SYMBOLS 9.0 SYMBOLS o self - the current object (within a message context) o msgclass - the class in which the current method was found o *oblist* - the object list o *keylist* - the keyword list o *standard-input* - the standard input file o *standard-output* - the standard output file o *breakenable* - flag controlling entering the break loop on errors o *tracenable* - flag controlling trace back printout on errors and breaks o *tracelimit* - maximum number of levels of trace back information printed on errors and breaks o *evalhook* - user substitute for the evaluator function o *applyhook* - (not yet implemented) o *unbound* - indicator for unbound symbols XLISP: An Experimental Object Oriented Language Page 14 EVALUATION FUNCTIONS 10.0 EVALUATION FUNCTIONS (eval ) EVALUATE AN XLISP EXPRESSION the expression to be evaluated (setq *tracelist* nil) (defun evalhookfcn (expr &aux val) (if (and (consp expr) (member (car expr) *tracelist*)) (progn (princ ">>> ") (print expr) (setq val (evalhook expr evalhookfcn nil)) (princ "<<< ") (print val)) (evalhook expr evalhookfcn nil))) (defun trace (fun) (if (not (member fun *tracelist*)) (progn (setq *tracelist* (cons fun *tracelist*)) (setq *evalhook* evalhookfcn))) *tracelist*) (defun untrace (fun) (if (null (setq *tracelist* (delete fun *tracelist*))) (setq *evalhook* nil)) *tracelist*) ; EXTFUNC.L ; ~~~~~~~~~ ; A small library of functions to help fill in the gap between PC and ; Franz Lisp. These functions are for learning purposes only are not very ; effectient or very robust. Also included is a set of turtle graphics ; commands that will work on just about any MS-DOS machine via the BIOS. ; ; Peter Ashwood-Smith (defun member(x y)(cond((null y)nil)((equal x(car y))y)(t(member x(cdr y] (defun memq(x y)(cond((null y) nil)((eq x(car y))y)(t(memq x(cdr y] (defun tailp(l1 l2)(cond ((null l2) nil)((eq l1 l2) l1)(t(tailp l1(cdr l2] (defun arrayp(x) nil) (defun bcdp(x) nil) (defun bigp(x) nil) (defun dtpr(x) (and(listp x)(atom (cdr x)] (defun fixp(n) nil) (defun hunkp(n) nil) (defun litatom(n) (and(atom n)(not(floatp n] (defun numbp(n) (floatp n)) (defun numberp(n) (floatp n)) (defun purep(n)(or(eq n t)(eq n nil)(eq n 'lambda)(eq n 'nlambda)] (defun stringp(n) nil) (defun symbolp(n) (litatom n)) (defun valuep(n) nil) (defun vectorp(n) nil) (defun typep(n)(type n)) (defun eqstr(a b)(equal a b)) (defun neq(a b)(not(eq a b))) (defun nequal(a b)(not(equal a b))) (defun append1(a b)(append a (list b))) (defun copy(a)(reverse(reverse a))) (defun ncons(a)(cons a nil)) (defun xcons(a b)(cons b a)) (defun last(l)(nth (- (length l) 1) l)) (defun nthcdr(n l)(cond((< n 0)(cons nil l))((= n 0)l)(t(nthcdr (- n 1)(cdr l] (defun nthelem(n l) (nth (- n 1) l)) (defun add fexpr(l)(eval(cons '+ l] (defun add1(n)(+ 1 n)) (defun diff fexpr(l)(eval(cons '- l] (defun difference fexpr(l)(eval(cons '- l] (defun minus(n)(- 0 n)) (defun product fexpr(l)(eval(cons '* l] (defun times fexpr(l)(eval(cons '* l] (defun quotient fexpr(l)(eval(cons '/ l] (defun sub1(n)(- n 1)) (defun evenp(n)(= (mod n 2) 0)) (defun minusp(n)(< n 0)) (defun oddp(n)(= (mod n 2) 1)) (defun onep(n)(= 1 n)) (defun plusp(n)(> n 0)) (defun zerop(n)(= n 0)) (defun infile(f)(fileopen f 'r)) (defun character-index(a c)(prog(n)(setq n 1 a(explode a))(cond((floatp c)(setq c(ascii c))))nxt:(cond((null a)(return nil)))(cond((eq(car a)c)(return n)))(setq n(+ n 1)a(cdr a))(go nxt:] ; ; Some simple Turtle Graphics Routines to demonstrate PC-LISP. Remember that ; the graphics commands go though the BIOS so they are portable but slow. ; (defun TurtleGraphicsUp() (#scrmde# 6) (#scrsap# 0) (TurtleCenter)) (defun TurtleGraphicsDown() (#scrmde# 2)) (defun TurtleCenter() (setq Lastx 100 Lasty 100 Heading 1.570796372)) (defun TurtleRight(n) (setq Heading (+ Heading (* n 0.01745329)))) (defun TurtleLeft(n) (setq Heading (- Heading (* n 0.01745329)))) (defun TurtleForward(n) (setq Newx(+ Lastx(*(cos Heading)n))Newy(+ Lasty(*(sin Heading)n))) (#scrline#(* Lastx 3.2) Lasty (* Newx 3.2) Newy 1) (setq Lastx Newx Lasty Newy) ) ; ; end of Turtle Graphics primitives, start of Graphics demonstration code ; you can cut this out if you like and leave the Turtle primitives intact. ; (defun Line_T(n) (TurtleForward n) (TurtleRight 180) (TurtleForward (/ n 4)) ) (defun Square(n) (TurtleForward n) (TurtleRight 90) (TurtleForward n) (TurtleRight 90) (TurtleForward n) (TurtleRight 90) (TurtleForward n) ) (defun Triangle(n) (TurtleForward n) (TurtleRight 120) (TurtleForward n) (TurtleRight 120) (TurtleForward n) ) (defun Make(ObjectFunc Size times skew) (prog() TOP:(cond ((= times 0) (return))) (ObjectFunc Size) (TurtleRight skew) (setq times (- times 1)) (go TOP:) ) ) (defun GraphicsDemo() (TurtleGraphicsUp) (Make Square 40 18 5) (Make Square 60 18 5) (gc) ; idle work (TurtleGraphicsUp) (Make Triangle 40 18 5) (Make Triangle 60 18 5) (gc) ; idle work (TurtleGraphicsUp) (Make Line_T 80 50 10) (gc) ; idle work (TurtleGraphicsDown) ) returns the result of evaluating the expression (apply ) APPLY A FUNCTION TO A LIST OF ARGUMENTS the function to apply (or function symbol) the argument list returns the result of applying the function to the argument list (funcall ...) CALL A FUNCTION WITH ARGUMENTS the function to call (or function symbol) arguments to pass to the function returns the result of calling the function with the arguments (quote ) RETURN AN EXPRESSION UNEVALUATED the expression to be quoted (quoted) returns unevaluated (function ) QUOTE A FUNCTION (THIS IS THE SAME AS QUOTE) the function to be quoted (quoted) returns unevaluated (backquote ) FILL IN A TEMPLATE the template returns a copy of the template with comma and comma-at expressions expanded (see the Common Lisp reference manual) XLISP: An Experimental Object Oriented Language Page 15 SYMBOL FUNCTIONS 11.0 SYMBOL FUNCTIONS (set ) SET THE VALUE OF A SYMBOL the symbol being set the new value returns the new value (setq [ ]...) SET THE VALUE OF A SYMBOL the symbol being set (quoted) the new value returns the new value (setf [ ]...) SET THE VALUE OF A FIELD the field specifier (quoted): set the value of a symbol (car ) set the car of a list node (cdr ) set the cdr of a list node (get ) set the value of a property (symbol-value ) set the value of a symbol (symbol-plist ) set the property list of a symbol the new value returns the new value (defun ...) DEFINE A FUNCTION (defmacro ...) DEFINE A MACRO symbol being defined (quoted) list of formal arguments (quoted) this list is of the form: (... [&optional ...] [&rest ] [&aux ...]) where is a formal argument is an optional argument (default is nil) bound to the rest of the arguments is an auxiliary variable (set to nil) expressions constituting the body of the function (quoted) returns the function symbol (gensym []) GENERATE A SYMBOL string or number returns the new symbol (intern ) MAKE AN INTERNED SYMBOL the symbol's print name string returns the new symbol (make-symbol ) MAKE AN UNINTERNED SYMBOL the symbol's print name string returns the new symbol XLISP: An Experimental Object Oriented Language Page 16 SYMBOL FUNCTIONS (symbol-name ) GET THE PRINT NAME OF A SYMBOL the symbol returns the symbol's print name (symbol-value ) GET THE VALUE OF A SYMBOL the symbol returns the symbol's value (symbol-plist ) GET THE PROPERTY LIST OF A SYMBOL the symbol returns the symbol's property list XLISP: An Experimental Object Oriented Language Page 17 PROPERTY LIST FUNCTIONS 12.0 PROPERTY LIST FUNCTIONS (get ) GET THE VALUE OF A PROPERTY the symbol the property symbol returns the property value or nil (remprop ) REMOVE A PROPERTY the symbol the property symbol returns nil XLISP: An Experimental Object Oriented Language Page 18 LIST FUNCTIONS 13.0 LIST FUNCTIONS (car ) RETURN THE CAR OF A LIST NODE the list node returns the car of the list node (cdr ) RETURN THE CDR OF A LIST NODE the list node returns the cdr of the list node (caar ) == (car (car )) (cadr ) == (car (cdr )) (cdar ) == (cdr (car )) (cddr ) == (cdr (cdr )) (cons ) CONSTRUCT A NEW LIST NODE the car of the new list node the cdr of the new list node returns the new list node (list ...) CREATE A LIST OF VALUES expressions to be combined into a list returns the new list (append ...) APPEND LISTS lists whose elements are to be appended returns the new list (reverse ) REVERSE A LIST the list to reverse returns a new list in the reverse order (last ) RETURN THE LAST LIST NODE OF A LIST the list returns the last list node in the list (member [ ]) FIND AN EXPRESSION IN A LIST the expression to find the list to search the keyword :test or :test-not the test function (defaults to eql) returns the remainder of the list starting with the expression (assoc [ ]) FIND AN EXPRESSION IN AN A-LIST the expression to find the association list the keyword :test or :test-not the test function (defaults to eql) returns the alist entry or nil XLISP: An Experimental Object Oriented Language Page 19 LIST FUNCTIONS (remove [ ]) REMOVE AN EXPRESSION FROM A LIST the expression to delete the list the keyword :test or :test-not the test function (defaults to eql) returns the list with the matching expressions deleted (length ) FIND THE LENGTH OF A LIST the list returns the length of the list (nth ) RETURN THE NTH ELEMENT OF A LIST the number of the element to return (zero origin) the list returns the nth element or nil if the list isn't that long (nthcdr ) RETURN THE NTH CDR OF A LIST the number of the element to return (zero origin) the list returns the nth cdr or nil if the list isn't that long (mapc ...) APPLY FUNCTION TO SUCCESSIVE CARS the function or function name a list for each argument of the function returns the first list of arguments (mapcar ...) APPLY FUNCTION TO SUCCESSIVE CARS the function or function name a list for each argument of the function returns the list of values returned by each function invocation (mapl ...) APPLY FUNCTION TO SUCCESSIVE CDRS the function or function name a list for each argument of the function returns the first list of arguments (maplist ...) APPLY FUNCTION TO SUCCESSIVE CDRS the function or function name a list for each argument of the function returns the list of values returned by each function invocation XLISP: An Experimental Object Oriented Language Page 20 LIST FUNCTIONS (subst [ ]) SUBSTITUTE EXPRESSIONS the new expression the old expression the expression in which to do the substitutions the keyword :test or :test-not the test function (defaults to eql) returns the expression with substitutions (sublis [ ]) SUBSTITUTE USING AN A-LIST the association list the expression in which to do the substitutions the keyword :test or :test-not the test function (defaults to eql) returns the expression with substitutions XLISP: An Experimental Object Oriented Language Page 21 DESTRUCTIVE LIST FUNCTIONS 14.0 DESTRUCTIVE LIST FUNCTIONS (rplaca ) REPLACE THE CAR OF A LIST NODE the list node the new value for the car of the list node returns the list node after updating the car (rplacd ) REPLACE THE CDR OF A LIST NODE the list node the new value for the cdr of the list node returns the list node after updating the cdr (nconc ...) DESTRUCTIVELY CONCATENATE LISTS lists to concatenate returns the result of concatenating the lists (delete [ ]) DELETE AN EXPRESSION FROM A LIST the expression to delete the list the keyword :test or :test-not the test function (defaults to eql) returns the list with the matching expressions deleted XLISP: An Experimental Object Oriented Language Page 22 PREDICATE FUNCTIONS 15.0 PREDICATE FUNCTIONS (atom ) IS THIS AN ATOM? the expression to check returns t if the value is an atom, nil otherwise (symbolp ) IS THIS A SYMBOL? the expression to check returns t if the expression is a symbol, nil otherwise (numberp ) IS THIS A NUMBER? the expression to check returns t if the expression is a symbol, nil otherwise (null ) IS THIS AN EMPTY LIST? the list to check returns t if the list is empty, nil otherwise (not ) IS THIS FALSE? the expression to check return t if the expression is nil, nil otherwise (listp ) IS THIS A LIST? the expression to check returns t if the value is a list node or nil, nil otherwise (consp ) IS THIS A NON-EMPTY LIST? the expression to check returns t if the value is a list node, nil otherwise (boundp ) IS THIS A BOUND SYMBOL? the symbol returns t if a value is bound to the symbol, nil otherwise XLISP: An Experimental Object Oriented Language Page 23 PREDICATE FUNCTIONS (minusp ) IS THIS NUMBER NEGATIVE? the number to test returns t if the number is negative, nil otherwise (zerop ) IS THIS NUMBER ZERO? the number to test returns t if the number is zero, nil otherwise (plusp ) IS THIS NUMBER POSITIVE? the number to test returns t if the number is positive, nil otherwise (evenp ) IS THIS NUMBER EVEN? the number to test returns t if the number is even, nil otherwise (oddp ) IS THIS NUMBER ODD? the number to test returns t if the number is odd, nil otherwise (eq ) ARE THE EXPRESSIONS IDENTICAL? the first expression the second expression returns t if they are equal, nil otherwise (eql ) ARE THE EXPRESSIONS IDENTICAL? (WORKS WITH NUMBERS AND STRINGS) the first expression the second expression returns t if they are equal, nil otherwise (equal ) ARE THE EXPRESSIONS EQUAL? the first expression the second expression returns t if they are equal, nil otherwise XLISP: An Experimental Object Oriented Language Page 24 CONTROL FUNCTIONS 16.0 CONTROL FUNCTIONS (cond ...) EVALUATE CONDITIONALLY pair consisting of: ( ...) where is a predicate expression evaluated if the predicate is not nil returns the value of the first expression whose predicate is not nil (and ...) THE LOGICAL AND OF A LIST OF EXPRESSIONS ... the expressions to be ANDed returns nil if any expression evaluates to nil, otherwise the value of the last expression (evaluation of expressions stops after the first expression that evaluates to nil) (or ...) THE LOGICAL OR OF A LIST OF EXPRESSIONS ... the expressions to be ORed returns nil if all expressions evaluate to nil, otherwise the value of the first non-nil expression (evaluation of expressions stops after the first expression that does not evaluate to nil) (if []) EXECUTE EXPRESSIONS CONDITIONALLY the test expression the expression to be evaluated if texpr is non-nil the expression to be evaluated if texpr is nil returns the value of the selected expression (let (...) ...) BIND SYMBOLS AND EVALUATE EXPRESSIONS (let* (...) ...) LET WITH SEQUENTIAL BINDING the variable bindings each of which is either: 1) a symbol (which is initialized to nil) 2) a list whose car is a symbol and whose cadr is an initialization expression ... the expressions to be evaluated returns the value of the last expression (catch []...) EVALUATE EXPRESSIONS AND CATCH THROWS the catch tag ... expressions to evaluate returns the value of the last expression the throw expression (throw []) THROW TO A CATCH the catch tag the value for the catch to return (defaults to nil) returns never returns XLISP: An Experimental Object Oriented Language Page 25 LOOPING FUNCTIONS 17.0 LOOPING FUNCTIONS (do ([]...) ( []...) []...) (do* ([]...) ( []...) []...) the variable bindings each of which is either: 1) a symbol (which is initialized to nil) 2) a list of the form: ( []) where: is the symbol to bind is the initial value of the symbol is a step expression the termination test expression ... result expressions (the default is nil) ... the body of the loop (treated like an implicit prog) returns the value of the last result expression (dolist ( []) []...) LOOP THROUGH A LIST the symbol to bind to each list element the list expression the result expression (the default is nil) ... the body of the loop (treated like an implicit prog) (dotimes ( []) []...) LOOP FROM ZERO TO N-1 the symbol to bind to each value from 0 to n-1 the number of times to loop the result expression (the default is nil) ... the body of the loop (treated like an implicit prog) XLISP: An Experimental Object Oriented Language Page 26 THE PROGRAM FEATURE 18.0 THE PROGRAM FEATURE (prog (...) []...) THE PROGRAM FEATURE (prog* (...) []...) PROG WITH SEQUENTIAL BINDING the variable bindings each of which is either: 1) a symbol (which is initialized to nil) 2) a list whose car is a symbol and whose cadr is an initialization expression expressions to evaluate or tags (symbols) returns nil or the argument passed to the return function (go ) GO TO A TAG WITHIN A PROG CONSTRUCT the tag (quoted) returns never returns (return []) CAUSE A PROG CONSTRUCT TO RETURN A VALUE the value (defaults to nil) returns never returns (prog1 []...) EXECUTE EXPRESSIONS SEQUENTIALLY the first expression to evaluate ... the remaining expressions to evaluate returns the value of the first expression (prog2 []...) EXECUTE EXPRESSIONS SEQUENTIALLY the first expression to evaluate the second expression to evaluate ... the remaining expressions to evaluate returns the value of the second expression (progn []...) EXECUTE EXPRESSIONS SEQUENTIALLY ... the expressions to evaluate returns the value of the last expression (or nil) XLISP: An Experimental Object Oriented Language Page 27 DEBUGGING AND ERROR HANDLING 19.0 DEBUGGING AND ERROR HANDLING (error []) SIGNAL A NON-CORRECTABLE ERROR the error message string the argument expression (printed after the message) returns never returns (cerror []) SIGNAL A CORRECTABLE ERROR the continue message string the error message string the argument expression (printed after the message) returns nil when continued from the break loop (break [ []]) ENTER A BREAK LOOP the break message string (defaults to "**BREAK**") the argument expression (printed after the message) returns nil when continued from the break loop (errset []) TRAP ERRORS the expression to execute flag to control printing of the error message returns the value of the last expression consed with nil or nil on error (baktrace []) PRINT N LEVELS OF TRACE BACK INFORMATION the number of levels (defaults to all levels) returns nil (evalhook ) EVALUATE AN EXPRESSION WITH HOOKS the expression to evaluate the value for *evalhook* the value for *applyhook* returns the result of evaluating the expression XLISP: An Experimental Object Oriented Language Page 28 ARITHMETIC FUNCTIONS 20.0 ARITHMETIC FUNCTIONS (+ ...) ADD A LIST OF NUMBERS ... the numbers returns the result of the addition (- ...) SUBTRACT A LIST OF NUMBERS OR NEGATE A SINGLE NUMBER ... the numbers returns the result of the subtraction (* ...) MULTIPLY A LIST OF NUMBERS ... the numbers returns the result of the multiplication (/ ...) DIVIDE A LIST OF NUMBERS ... the numbers returns the result of the division (1+ ) ADD ONE TO A NUMBER the number returns the number plus one (1- ) SUBTRACT ONE FROM A NUMBER the number returns the number minus one (rem ...) REMAINDER OF A LIST OF NUMBERS ... the numbers returns the result of the remainder operation (min ...) THE SMALLEST OF A LIST OF NUMBERS ... the expressions to be checked returns the smallest number in the list (max ...) THE LARGEST OF A LIST OF NUMBERS ... the expressions to be checked returns the largest number in the list (abs ) THE ABSOLUTE VALUE OF A NUMBER the number returns the absolute value of the number XLISP: An Experimental Object Oriented Language Page 29 BITWISE LOGICAL FUNCTIONS 21.0 BITWISE LOGICAL FUNCTIONS (bit-and ...) THE BITWISE AND OF A LIST OF NUMBERS the numbers returns the result of the and operation (bit-ior the numbers returns the result of the inclusive or operation (bit-xor the numbers returns the result of the exclusive or operation (bit-not ) THE BITWISE NOT OF A NUMBER the number returns the bitwise inversion of number XLISP: An Experimental Object Oriented Language Page 30 RELATIONAL FUNCTIONS 22.0 RELATIONAL FUNCTIONS The relational functions can be used to compare integers or strings. The functions '=' and '/=' can also be used to compare other types. The result of these comparisons is computed the same way as for 'eq'. (< ) TEST FOR LESS THAN the left operand of the comparison the right operand of the comparison returns the result of comparing with (<= ) TEST FOR LESS THAN OR EQUAL TO the left operand of the comparison the right operand of the comparison returns the result of comparing with (= ) TEST FOR EQUAL TO the left operand of the comparison the right operand of the comparison returns the result of comparing with (/= ) TEST FOR NOT EQUAL TO the left operand of the comparison the right operand of the comparison returns the result of comparing with (>= ) TEST FOR GREATER THAN OR EQUAL TO the left operand of the comparison the right operand of the comparison returns the result of comparing with (> ) TEST FOR GREATER THAN the left operand of the comparison the right operand of the comparison returns the result of comparing with XLISP: An Experimental Object Oriented Language Page 31 STRING FUNCTIONS 23.0 STRING FUNCTIONS (strcat ...) CONCATENATE STRINGS ... the strings to concatenate returns the result of concatenating the strings (strlen ) COMPUTE THE LENGTH OF A STRING the string returns the length of the string (substr []) EXTRACT A SUBSTRING the string the starting position the length (default is rest of string) returns substring starting at for (ascii ) NUMERIC VALUE OF CHARACTER the string returns the ascii code of the first character (chr ) CHARACTER EQUIVALENT OF ASCII VALUE the numeric expression returns a one character string whose first character is (atoi ) CONVERT AN ASCII STRING TO AN INTEGER the string returns the integer value of the string expression (itoa ) CONVERT AN INTEGER TO AN ASCII STRING the integer returns the string representation of the integer value XLISP: An Experimental Object Oriented Language Page 32 INPUT/OUTPUT FUNCTIONS 24.0 INPUT/OUTPUT FUNCTIONS (read [ []]) READ AN XLISP EXPRESSION the input source (default is standard input) the value to return on end of file (default is nil) returns the expression read (print []) PRINT A LIST OF VALUES ON A NEW LINE the expressions to be printed the output sink (default is standard output) returns nil (prin1 []) PRINT A LIST OF VALUES the expressions to be printed the output sink (default is standard output) returns nil (princ []) PRINT A LIST OF VALUES WITHOUT QUOTING the expressions to be printed the output sink (default is standard output) returns nil (terpri []) TERMINATE THE CURRENT PRINT LINE the output sink (default is standard output) returns nil (flatsize ) LENGTH OF PRINTED REPRESENTATION USING PRIN1 the expression returns the length (flatc ) LENGTH OF PRINTED REPRESENTATION USING PRINC the expression returns the length (explode ) CHARACTERS IN PRINTED REPRESENTATION USING PRIN1 the expression returns the list of characters (explodec ) CHARACTERS IN PRINTED REPRESENTATION USING PRINC the expression returns the list of characters (maknam ) BUILD AN UNINTERNED SYMBOL FROM A LIST OF CHARACTERS list of characters in symbol name returns the symbol (implode ) BUILD AN INTERNED SYMBOL FROM A LIST OF CHARACTERS list of characters in symbol name returns the symbol XLISP: An Experimental Object Oriented Language Page 33 FILE I/O FUNCTIONS 25.0 FILE I/O FUNCTIONS (openi ) OPEN AN INPUT FILE the file name string returns a file pointer (openo ) OPEN AN OUTPUT FILE the file name string returns a file pointer (close ) CLOSE A FILE the file pointer returns nil (read-char []) READ A CHARACTER FROM A FILE OR STREAM the input source (default is standard input) returns the character (integer) (peek-char [ []]) PEEK AT THE NEXT CHARACTER flag for skipping white space (default is nil) the input source (default is standard input) returns the character (integer) (write-char []) WRITE A CHARACTER TO A FILE OR STREAM the character to put (integer) the output sink (default is standard output) returns the character (integer) (readline []) READ A LINE FROM A FILE OR STREAM the input source (default is standard input) returns the input string XLISP: An Experimental Object Oriented Language Page 34 SYSTEM FUNCTIONS 26.0 SYSTEM FUNCTIONS (load [ []]) LOAD AN XLISP SOURCE FILE the filename string (".lsp" is appended) the verbose flag (default is t) the print flag (default is nil) returns the filename (gc) FORCE GARBAGE COLLECTION returns nil (expand ) EXPAND MEMORY BY ADDING SEGMENTS the number of segments to add returns the number of segments added (alloc ) CHANGE NUMBER OF NODES TO ALLOCATE IN EACH SEGMENT the number of nodes to allocate returns the old number of nodes to allocate (mem) SHOW MEMORY ALLOCATION STATISTICS returns nil (type ) RETURNS THE TYPE OF THE EXPRESSION the expression to return the type of returns nil if the value is nil otherwise one of the symbols: SYM for symbols OBJ for objects LIST for list nodes SUBR for subroutine nodes with evaluated arguments FSUBR for subroutine nodes with unevaluated arguments STR for string nodes INT for integer nodes FPTR for file pointer nodes (exit) EXIT XLISP returns never returns N/| -@-n.?<N0T-@ n-h.N=@.?<N0T @ (=@Jg.?<N0T @ (`0.H=@.N0.nڰno0.ؐnR@=@0.ܰno =|Bn>N -@>N!b-@/ n!_0.S@HѮ` n"nRR0.SnJ@f nB# .N^NuNV.P?<N0T @ (=@.NB/N/|X-@>N `Ǡ\& BN0`FCLEAR68K V02.00, Copyright(c) 1984, Digital Research XXXX-0000-654321 o#"h#E?/ N N o AdpNu#BNuNV0/"/ NBd0< AǠ"NB?<NAN^Nu o2/0/ HSoQBNu o0/JfBNuf SNuNVB/N/|X-@.PN-@.N.N'-@# .N^NuNVB//N/|P-@.PN-@.P?<N0T-@.NJg n f.N'-@./.N( X-@# .N^NuNVB//N/|P-@.PN-@-nJg n f.N'-@./.N( X-@# .N^NuNV.PN-@.N .N^NuNV.PN-@.NJgF n f< n (df,>N -@ n!n n!y-n`2Jg n f.N-@`./<N&X .N^NuNVB/N/|X-@.PN-@.N.a-@# .N^NuNVJg n g -n` n (Tf> nJg n h g .N n h.N'-@` nJg n h f n h (XfB//N/|P-@ n hJg n h h g .N n h h.N'-@B`D>N -@ n"n!iJg n!n`-n-n n-hJg n gJg n.a/ n!_` n.a|-@#`XB/N/|X-@>N -@ n.a>/ n!_ n.a(/ n!_# .N^NuNV.P?<N0T-@.PN-@.N./.NdX .N^NuNVB///N/| -@-n`:.?<N0T-@.N-@./.NdXJf# .N^NuNVB///N/| -@-n`r.N-@.N-@Jg n f./.NdX`*Jg n f./.a&X` .NJf# .N^NuNV.P?<N0T-@ԈfpB//N/|P-@.P?<NT-@.P?<NT-@.N./. /.N P#` .Ԍg .ԐffB/N/|X-@.P?<NT-@.N .Ԍf n!n ` n h!n #` .Ԁg .ԄfpB/N/|X-@.P?<NT-@.NJg, n f" .Ԁf n!n ` n!n #` .NN^NuNV.d/.aXN^NuNV.h/.aXN^NuNVB///N/| -@.P?<N0T-@.P?<N0T-@>N -@>N -@/ n!_ n!y n!n >N / n!_ n h!n n h!n./.NdX# .N^NuNVJgb.PN-@ nH`< n./<NX`2 n (3Z`"./<N&X`|gְ|g`.N>Z/</<0/NR RyZBW/NdXN^NuNVBW/.aXN^NuNV>/.aXN^NuNVB/N/|X-@.P?<N0T-@.N n-hJn gBW/.N2X`BW/.NdX-@# .N^NuNV.P?<N0T-@.N n h (N^NuNV.P?<N0T-@.N.NN^NuNV.P?<N0T-@.N n h (N^NuNV.P?<N0T-@.P?<N0T-@.N./.NXN^NuNV.P?<N0T-@.PN-@.P?<N0T-@.N././.N P .N^NuNV.P?<N0T-@.P?<N0T-@.N./.NXBN^NuNVB//N/|P-@-nB`F.?<N0T-@.NJg`.N-@Jf`Jf# .N^NuNVB/N/|X-@-n-yD`.N-@gJf# .N^NuNVB/N/|X-@-nB`.N-@fJf# .N^NuNVB///N/| -@.PN-@.PN-@Jg .PN`B-@.N.N'Jg.`.N'-@# .N^NuNV>/.aXN^NuNVBW/.aXN^NuNVB//N/|P-@-n.N*-@Jn f#./?<N0\/a XJn g#B`.N-@Jf y## .N^NuNV>/.aXN^NuNVBW/.aXN^NuNVB//N/|P-@-n.N*-@Jn f#./?<N0\/a XJn g#./.a X y## .N^NuNV.PN-@.N.N@LN^NuNVJg .PN`B-@.N.N@N^NuNV>/.aXN^NuNV>/.aXN^NuNVB//N/|P-@-n`.N-@0. Sn J@f`.NJf# .N^NuNVB/N/|X-@-nB`.N-@Jf# .N^NuNV>/.aXN^NuNVBW/.aXN^NuNVB/////N/|-@-n.?<N0T-@.N*-@Jn f#./.aXJn g#.?<N0T-@.N-@Bn`,./.a XJ@g=|`> /.aFX.N'JgJnf(B`.N-@Jg n g y## .N^NuNVB/////N/|-@-n.?<N0T-@.?<N0T-@.?<NT-@Jg.N`B-@.N*#.B/.NNPBn`< n./.NdX./.aRXJ@g=|` n-hJg n gJnfB/.NdX.N'-@ y## .N^NuNVB////N/|-@-n.?<N0T-@.?<N0T-@.?<NT @ (=@Jg.N`B-@.N*#.B/.NNPBnBn`<0n.N! ./.NdX./.aXJ@g=|`Rn0.ʰnmJnf(0n.N! ./.NdX.N'-@ y## .N^NuNVB//N/|P-@.PN-@-nB.?</N>\.NJ@g -y``.N-@Jf.N?P# .N^NuNV.PN-@Jg .PN`B-@.N./.NAXN^NuNV.P?<N0T @-hJg .PN` 9-@.N./.N&XN^NuNV.P?<N0T @-h.P?<N0T @-hJg .PN` 9-@.N././.NDPBN^NuNVJg.P?<N0T @ (` <6-@Jg .PN` 9-@.N./.NXBN^NuNV.NN?N^NuNV.NN@N^NuNVB//N/|P-@.PN-@Jg .PN` 9D-@.N.?</N>\.NJ@gB`&.N'-@>N -@ n!n.N?P# .N^NuNVB///////N/|-@.PN-@.PN-@.PN-@Jg .PN` 9-@.N y\-h y\!n y`-h y`!n-y#.N'-@ y\!n y`!n## .N^NuNVB////N/|-@-n` n-hJg n f -nB`HJg6 n f,.?<N0T-@.N-@` .@N. /./.NNP n-hJg n gd#N^NuNVB/////N/|-@-n` n-hJg n f.?<N0T-@ n-hJgx.N-@Jn gP>N -@ n!n-n>N / n!_ n h!n n h!n`./.NdX n-hJg n g(`* n h. n h/(NdX n-hJf#N^NuNVB/N/|X-@-n.?</N>\.N=@|f n =|`b nf-y`2 nJg n h f.N` n-hJg n g n Bn.N?P#0.N^NuNVa2./.aFXN^NuNV./.NArXN^NuNV>/. /.B/<La N^NuNVBW/. /.Ba N^NuNV>/./. /.a N^NuNV././<R/<ՖNR .ՖN> .g.YN>.N>` yp.NqJ g$. /<]/<ՖNRP.ՖN>N^NuNV y|Jf./. NArX>/./. /./<oa N^NuNV././. /.a N< ytJg0 yx-hJg n f n (>`>aB/N/|X-@Ry.D?<8/N>\Bn`.N=@g>0.`&N/. yp/(NoP yp.NqJngJ.N?PSy# nf./<ȓNArXN^NuNVRy09|l0y N^NuNVSyN^NuNVJym yl y2y 0` 9N^NuNV=y`$ nl y2n.N>SnJnm 0.SnJ@gJnlN^NuNV>Np#f .Ȩa<b3ByN^NuNV-ytfa,-ytf .N n#tSyl0."n n!| .N^NuNV>a-@ n!n .N^NuNV> a~-@ n!n .N^NuNV>RWNp-@f"a>RWNp-@f .N0.R@Hѹb .N^NuNV.N>a-@./.NX .N^NuNV.NR@Hb.NN^NuNV.aN.aF.a>-y` n.a* n-hJfalJtfa`RynN^NuNVJgFB-n`4` n(f n(.aJ@g, n(-n-n n-h n!n`:.aJ@g, n(-n-n n-h n!n```t`Jg n(gd.aJ@g6 n( n-h n!n n-h n!n`H` -n n-h n!n-n` -n n-h n!n-n`f`N^NuNVBtByl-yp` .\-@ n=P` n(f nH`> nJhf nJg n.a`( nJg n.N`` |g|g nB nB( n!| n!yt#tRyl` n( 0.SnJ@fJ n-hJf"N^NuNVJyffB@`09fS@ >W?<NT-@g n0f n!yp#p .\-@=yf` n!yt#t 0.SnJ@f09fS@ |Hѹb09fyh09fylRyjp``B@N^NuNV nH`6B@`H nJfB@`p`6 nH>/<6NXN`S@|b@0@ȼ PNN^NuNV nH`6B@`H nJfB@`p`6 nH>/<aNXN`S@|b@0@ PNN^NuNV>h/<ɍ/<ՖNRP.ՖN>>l/<ɞ/<ՖNRP.ՖN>>j/<ɯ/<ՖNRP.ՖN>>f/</<ՖNRP.ՖN>.b/</<ՖNRP.ՖN>>n/</<ՖNRP.ՖN>N^NuNV3fBbB@3n3l3j3hBtBpB####N^NuNV y\Jg .a`.aN^NuNVJfB`P.NJg n f.a-@`Jg n f.N-@N .N^NuNVJf .NJg" n f/. n hNX-@`Jgv n fj nJg$ n h f n-h n-h`-y n (dg .N./. /.ahP-@` .N .N^NuNVB//aP-@ n-h n-h.ar-@f . NJg n gJg> n f4Jg n f .a-@/. n hNX-@`Jg n f nJg$ n h f n-h n-h`-y n (-@ܰdf$.at-@././.a0P-@`< .ܰhf$././.a P-@.a`-@` .-N`2Jg n f./.NbX-@` .?N# .N^NuNVB///a -@>N -@ n!n>N / n!_ n h!y y\-h y\!| y`-h y`!|./.aX-@ y\!n y`!n# .N^NuNVB//aP-@-nB`nJg n g .LN>N -@Jg n!n` .-@-@ n.a/ n!_-n n-hJf# .N^NuNV./<z/<^NDPN^NuNVB///a: -@ n-hgJg n g .ʋN n-hgJg n g .ʣN.N*-@-y./. /.aFP# n-h`.N-@Jf## .N^NuNV`,. n /(/.NNP n-h n -h Jg0 n f& n (-@.aJ@fJ g n gJg n f n (Ԡf n-h`,. n /(/.NNP n-h n -h Jg0 n f& n (-@.a\J@fJ g n g`.B/.NNP n-hJg n f n (-@.aJ@gJg n ft n (Ԥfb n-hJg8 n f. n-hg".aJ@f./. /.NNP` .ʼN n-hB JgN n fD n (Ԩf4`.B n/(NNP n-hgJg n g . gJg.`.NN^NuNV .Ԡg .Ԥg .ԨgB@`pN^NuNV-yA-H`* n P!| n P!y n#X nJf .N^NuNVB//N/|P-@Jg .PN.` yl (-@Jg .PN`B-@.N./.NuXJ@f-n# .N^NuNV>?</.ap\N^NuNVBW?</.aX\N^NuNVBWBg/.aD\N^NuNVJg .PN.` yp (-@.N.NqBN^NuNVB//N/|P-@.PN-@Jg .PN.` yp (-@.N> /./.NoPJng .Nq# .N^NuNV>/.aXN^NuNVBW/.aXN^NuNVB/N/|X-@.PN-@.NBy^> /.BNoP#0y^.N! N^NuNV./.aXN^NuNV./.aXN^NuNV.P?<N0T-@.N. n/(NX-@g">N -@ n!n nBh`B .N^NuNV.P?<N0T-@.N nJf .N n.N n!|BN^NuNVJg .PN.` yl (-@.N.N9=@|fB` 0n.N! N^NuNVJg .PN`B-@Jg .PN.` yl (-@.NJg*` .N9.N;=@|g n o`.N;=@ nfB` 0n.N! N^NuNV.P?<N0T-@Jg .PN.` yp (-@.N n (>/.N<0X .N^NuNVB//N/|P-@Jg .PN.` yl (-@.N>N -@ nBhBn-|Ֆ` .䐼Ֆdfp nB>WdN!b-@ nBJng" n./.NX n.N! n!n.Ֆ/.N0Xnd-|Ֆ0."nR.N9=@ܰ|g n fTJnf" .䰼Ֆf nf#B`z nB .䐼Ֆ>0.WN!b-@ nBJng" n./.NX n.N! n!n.Ֆ/.N0X# .N^NuNVN'.NN Nm-|`& n. n?( n/N\ nJf-|`& n. n?( n/N\ nJf.NN#D yD!yD.NN#H.NN#L. NN#P.NN#T.NN#X.&NN#d.-NN#h.3NN#Ԕ.7NN#Ԁ.;NN#Ԅ.?NN#Ԉ.CNN#Ԍ.PNN#Ԑ.]NN#Ԙ.cNN#Ԝ.mNN#Ԡ.wNN#Ԥ.}NN#Ԩ.ւNN#l>N / yl!_ yl h!|8 yl hBh.֓NN#p>N / yp!_ yp h!|F yp hBh.֥NN#\ y\!|.ְNN#` y`!|.ּNN#t yt!|.NN#x yx!|.NN#| y|!yD.NN-@ n!yD.NN#Ԭ. NN#԰.NN#Դ.NN#Ը. NN#Լ.(NN#.0NN#.8NN#.@NN#N^NuNVJf =|`Jg n fz n-hf=|``Jg& n f n-hgJg n g .FN n"n!if n!| n (=@` n=hg nBh` n-hJy`g| <8fnJyg&>/<Q/<ՖNRP.ՖN>Jy\o&>\/<U/<ՖNRP.ՖN>.XN>By`.N=@| g nf <8f3` <8f& nf.F?< NXT.[N0.N^NuNVJf =|`Jgd n fZ n-hf=|`DJg& n f n-hgJg n g .iN n (=@`/./.aX _1@=@0.N^NuNVRy^Jf`Jg~ n frB/N/|X-@>N -@0n .N! / n!_ nJg n h!n` n!n n!n#` n.?. NXTN^NuNVJy`f yl.a| fN^NuNVj.x/<tNX.?</zN>\.NJ@g.׮NNN6.zN?P.D?</zN>\.NJ@fBWBg/<Ns\.NJ@fb=|n`P n 2nn./</NRPBW?</Ns\J@f .NRnn0.nnmB/pN/|X`f.NJ@g" y\!| y`!|N<.r yl/(NuXJ@g.rN'-@r.ra`.zN?PN^NuNV>/. yp/(NoP yp.NqN^NuNV. yp/(NqXN^NuNV n0 n!n n!yJ n!yN n1yR n!yF#N^NuNV n#FN^NuNV# y#J y#N y3R#> /9\NXN^NuNV-y`$ n(gB?</.a\ n-hFJf.NN^NuNV-y`& n(gB?< /.a<\ n-hFJf.NN^NuNV-y`\ n(gF n-h`* n (f.?</.a\ n-hJg n g n-hFJf.NN^NuNV-y`( n(g.?</.ap\ n-hFJf.#NN^NuNV-y`6 n(g n (f. ?</.a\ n-hFJf.8NN^NuNV-y`L n(g6 nJg. /.B/<LNf B?</.a\ n-hFJf.RNN^NuNV.f/.axXN^NuNV.h/.a`XN^NuNV.j/.aHXN^NuNV.m/.a2XN^NuNV.p/.aXN^NuNV.s/.aXN^NuNV.P?<N0T-@.N`( n a@R Df n (` n (-@ n JgJg n g n JgJg .vN .N^NuNV.PN-@.PN-@.N>N -@ n!n n!n .N^NuNVB///N/| -@-nB`H.N-@>N -@Jf-n` n!n n!n-nJf# .N^NuNVB////N/|-@-n`n.?<N0T-@`D>N -@Jf-n` n!n n"n!i-n n-hJg n gJf# .N^NuNVB//N/|P-@.P?<N0T-@.N`6>N -@ n"n!i n!n-n n-hJg n g# .N^NuNV.P?<N0T-@.N` n-hJg n f nJf .N^NuNVB///N/| -@.PN-@.P?<N0T-@.P//NDP.NB`.. n/(/.aPnf-n` n-hJg n g# .N^NuNVB///N/| -@.PN-@.P?<N0T-@.P//NDP.NB`J n-hg4Jg. n f$. n/(/.aPnf-n` n-hJg n g# .N^NuNVB////N/|-@.PN-@.PN-@.PN-@.P//NDP.N>/./././.a-@# .N^NuNV./. /.aPnf -n`Jg n fB//N/|P-@>/. n/(/. /.a-@>/. n/(/. /.aj-@>N -@ n!n n!n#`-n .N^NuNVB///N/| -@.P?<N0T-@.PN-@.P//NDP.N>/././.a -@# .N^NuNV>/././. a -@g n-h`J g n fB//N/|P-@>/. n /(/.a -@>/. n /(/.af -@>N -@ n!n n!n#`-n .N^NuNV`H n -hg2Jg, n f". n/(/.a.Pnf .` n -h J g n gBN^NuNVB////N/|-@.PN-@.P?<N0T-@.P//NDP.N`^. n/(/.alPng:>N -@ n"n!iJg n!n`-n-n n-hJg n g# .N^NuNVB/N/|X-@>N -@ n!n>N / n!_ n h!n ./.N( X-@#JfB@`pN^NuNV>/.aXN^NuNVBW/.aXN^NuNV.P?<N0T @ (=@l .؃N.P?<N0T-@f .ؐN.N` n-hJg n f 0.SnJ@fJn gJg n f n (` .N^NuNV.PN-@.NJg n f&Bn` n-hRnJg n g`6Jg n f n.N=@`./<؝N&X0n.N! N^NuNVBW?</.aH\N^NuNV>?</.a0\N^NuNVBWBg/.a\N^NuNV>Bg/.a\N^NuNVB////N/|-@.PN-@.P?<N0T-@Jnf-n>N -@ n!n-n`8>N -@ n!n-n.P?<N0T/ n!_JfJg n f.N'-@B-n`R>N -@ n!n-nJn g n (` ."n#@ n"n!i n-hJg n-hgJg n gJfbJngH>N -@Jg n!n`-n./.N( X/ n!_-n`./.N( X`# .N^NuNV.P?<N0T-@f .دN.PN-@.N n!n .N^NuNV.P?<N0T-@f .ؼN.PN-@.N n!n .N^NuNVB`X.P?<N0T-@gBJg n!n`-n` n-h nJg n h g-nJf .N^NuNVB///N/| -@.PN-@.P?<N0T-@.P//NDP.N`&. n/(/.aPPnf n-hJg n g .-@-@Jgb n fX n-h`<. n/(/.aPnf n"n!i`-n n-hJg n g# .N^NuNV.PN-@.NJg n g 9D`BN^NuNV.PN-@.NJgJg n f 9D`BN^NuNV.PN-@.NJg n gJg n  f 9D`BN^NuNV.P?<N0T-@.N.NְfB` 9DN^NuNV.PN-@.NJf 9D`BN^NuNV.PN-@.NJg n f 9D`BN^NuNV.PN-@.NJg n f 9D`BN^NuNV./.a2XN^NuNV./.aXN^NuNV./.aXN^NuNV.PN-@.PN-@.N/./. n NPJ@g 9D`BN^NuNV>+/.aXN^NuNV>-/.aXN^NuNV>*/.aXN^NuNV>//.aXN^NuNV>%/.aXN^NuNV>m/.alXN^NuNV>M/.aVXN^NuNV>E/.aBXN^NuNV>&/.a.XN^NuNV>|/.aXN^NuNV>^/.aXN^NuNV.PN-@Jg n f n-h=|`4Jg n  f n (-@Bn`./<ڒN&X n- f(Jf"Jng .D-@`/.NbX-@`T.PN-@Jg2 n f(Jng n-h` n/(N*X-@`XJg@ n  f6Jng"/.N*X-@ n (-@Bn` n (-@`./<ڤN&XJng0. ` .Ѯ` .`/./.NP-@`.a/./.N:P-@`~.av/./.NP-@`^ .o-n`L .l-n`: .`0 .`& .`a D`H |r W h(N`0. `/./.N~/.aXN^NuNV>A/.aXN^NuNV>+/.aXN^NuNV>-/.aXN^NuNV>S/.aXN^NuNV>C/.alXN^NuNV>T/.aVXN^NuNV>E/.aBXN^NuNV>R/.a.XN^NuNV>I/.aXN^NuNV>F/.aXN^NuNV.PN-@.NJg n f n-h0. `P .F-@`ZJl .D` .-@`BR``:Jg n  f n (-@0. `/</.N\Pl/.NbX` .-@`/<A/.N`a6`H |ٚr W h(N.N!@``./<N&XN^NuNV>-/.aVXN^NuNV>Z/.aBXN^NuNV>+/.a.XN^NuNV>E/.aXN^NuNV>O/.aXN^NuNV.PN-@.NJg n f n-h0. `rJmB@`pH-@`rJgB@`pH-@`\JnB@`pH-@`H.gB@`pH-@`2.fB@`pH-@`a`H |rW hN`Jg n  f n (-@0. `/.B@H/N*X/N\PnB@`pH-@`v/.B@H/N*X/N\PgB@`pH-@`H/.B@H/N*X/N\PmB@`pH-@`a`|+gȰ|-gh|Zg``./< N&XJg 9D`BN^NuNV>L/.aVXN^NuNV>=/.aBXN^NuNV>#/.a.XN^NuNV>G/.aXN^NuNV>>/.aXN^NuNV.PN-@.PN-@.NJgB n f8Jg2 n f( n. n/(NZXH-@=|`*Jg: n f0Jg* n f n ("n")-@=|`Jg> n  f4Jg. n  f$ n/( n/(N~P-@Bn`JgF n f /.a ,X @ (N^NuNV> /.a X @!nN^NuNV.NN-@>N -@/ n!_ n!y|>a |/ n!_0n .N! .?</.a\0n .N! .?</.ah\.Հ?</.aT\ .N^NuNV>/.a XX-@>N -@ n"n!i n!n. NN/ n!_N^NuNV. NN./.aX-@>N / n!_ n h!nN^NuNV. ?<NT. n/(a"X-@f .vNB/N/|X-@. N+R-@././.aPP-@# .N^NuNV.a-@fB@` n "n pN^NuNV.a-@fB@` n!n pN^NuNV.N.xNN^NuNV.N.xN @ (N^NuNVB/N/|X-@Jg .PN.` yp (-@.N.xN-@ n-h.ۑ/.NqX>/./.NoP.ۜ/.NqX>/./.NoP.Nq n-h`>/.aX-@>/.aXX=@>/.aFX?0._=@`t.ۨ/.NqX> n/(/.NoP.۫/.NqX>?./.a4\//.NoP.Nq n-hRn0.nm>/.aX-@Jf*# .N^NuNV.xN-@> n/(aX-@.P?<N0T./.aFX-@f .ۯN././.aPN^NuNVB/N/|X-@.xN-@>N -@ n!n>/.aX>a/ n!_# .N^NuNV.P?<N0T-@Jg.P?<N0T`B-@Jg.P?<N0T` 9Հ-@.N.xN-@.?</.a\.?</.a\.a>aH.?</.ad\.?</.aR\.a=@0n.N! .?</.a*\>/.aXn0n.N! .?</.a\ .N^NuNVB////N/|-@-n.?<N0T-@.?<N0T-@.?<N0T-@.N.xN-@./.aBX-@>N -@/ n!_ n!n n!n# .N^NuNVBW/.aX-@ n-h`& n h-H ( f .`\ n-hJf>N -@ n"n!i n!n>N -@/ n!_ n!n  .N^NuNV#Ռ`ZBW/9Ռa6X-@`* n-hg n ( f .`0 n-hJf>/9ՌaX#ՌJՌfBN^NuNVB/////N/|-@ n -hJg n gJg n g .NBN*-@-y././9xNNP./9Ռ/9ՐNNPJg( n f#/. n hNX-@`D./. n/(N-P# n-h`.N-@Jf# n (Մf>Jg8.Ո n/(a4X-@f .N././.aP# .N^NuNV> /.a/.aX-@>/.aVX=@>/.aDX?0._=@`. n (f>/.aX` n-hRn0.nm>/.a:X-@Bn`, n (f>/.aX`D n-hRnJg n g>/.aX-@Jg n gBN^NuNV n-h`"Jg n-h` .NSn Jn n .N^NuNV>/.axX-@`"Jg n-h` .6NSn Jn n .N^NuNVBn` n-hRnJg n g0.N^NuNVB/N/|X-@`">N -@ n!n-nSnJnn# .N^NuNVB#Հ#|.NNN#x.SNN#Ր.\NN#Մ.aNN#Ո>/<haX#| y|!y|BW/<nalX#Հ.Հ?</9|a2\.u/9|aX./9|aX.܇/9|aX.ܒ/9|aX.ܘ/9|aX.ܞ/9|a~X.ܤ/9|alX.f$/<ܭ/9|aP.f/<ܲ/9|aP.g/<ܹ/9|axP.c/</9Հa`P.c/</9ՀaHP.d /</9Հa0P.e/</9ՀaPN^NuNVJ f.8/.aX` n H`. /<(/.N<0X-n `p> n/(/.azP n-hgFJg n f> /.N<0X`$.G/.a8X>/./.a*P` -nJf>)/.N<0X`. N./.aX` n ./.alX` n ./.aX`Jng n ./.aX` n ./.aX`p. /<K/.aP`X. /<P/.aP`B. /<W/.azP`,. /<\/.adP``| b@0@ PNN^NuNV> /.N<0XN^NuNV` n H>/.N<0XR n JfN^NuNV>"/.N<0X` n m n\f>\/.N<0X0.`n>e/.N<0X`r>n/.N<0X`^>r/.N<0X`L>t/.N<0X`:>\/.N<0X`(>/.a"X``H |rW hN`>/.N<0X n H=@R J@f.>"/.N<0XN^NuNV. /<`/<ՖNRP.Ֆ/.aX./<h/<ՖNRP.Ֆ/.aX>>/.N<0XN^NuNV. /<l/<ՖNRP.Ֆ/.aDXN^NuNV. /<p/<ՖNRP.Ֆ/.aXN^NuNV> /<s/<ՖNRP.Ֆ/.aXN^NuNVB//N/|P-@>N -@ n!| nBhJn g$./</<ՖNRP.ՖN>./.NX/ n!_f#B@`.D?</N>\.NJ@gBn`:`.N'-@Jng .N>./.aDXJ@f=|.N?P n.N n!|#0.N^NuNVBy\. /.aXN^NuNV`.a=@`.N9B@`.N9.H/.a4X/ n p`.N9.N9=@`d.N.L/.aX/ n `T.ar/ n `B.N9H.N! / n `$."N`H |xrW hNp`.N9.P/.arX/ n p`.N9.N;|@f$.N9.X/.a0X/ n `.T/.aX/ n p`.aT/ n p`.abJ@g.a(/ n ` .\Np``H |ݨr W h(N`N^NuNVB`p nam nzn 0.|=@ n0m n9o nAmP nFnH.N9 . n9n 2.|`2.|HЁ-@.N;=@|f~.N! N^NuNV.a$=@|g n fN^NuNVRy\B/N/|X-@.N9BB` nf.a n.f`.N9Jf .nN./.aXJ@f.a n!n.a@|)g .ނN`h>N -@Jf-n` n!n./.aVXJ@f.aB n!n-n.a=@|)f".N9#Sy\ .N^NuNV~B/N/|X-@.N9Bn`0.`.a.a=@`=|`=| `=| `=| `v n0mJ n7nB0.|=@.a@|=@.a0|=@0.@2.AAn=@` `|eg||ng~|rg|tg``|gD|\gD0."N4n@Rn ndl.a=@|"f N2nB(>N -@.N!/ n!_ nBh# .N^NuNVB/N/|X-@>N -@ n!n >N / n!_./.a:XJ@f.a& n h!n# .N^NuNVBn`8 nam nzn 0.|`0."N4n@Rn.N9 ndl .N;=@|g >aJ@f N2nB(./aXJ@g .`BW/N2XN^NuNV` .N9.N;=@|g n o0.N^NuNV.N9=@|f.a0.N^NuNV.N9.ޖNN^NuNV-nB@=@=@ n +g n -fR`RRn n 0m n 9o n .f"R`RRn n 0m n 9oJnfJng nJgB@`x n +fR.NHЮ @ (.f.NHЮ @B(Jng.N.N!@/`.N.N! / n pN^NuNV n o@ nl8 n(g0 n)g( n;g n,g n`g n"g n'fB@``pN^NuNVB/N/|X-@-nBn`$.?<N0T @.NnJf>N -@>N!b-@/ n!_ nB`".P?<N0T @./.N0XJf# .N^NuNVB///N/| -@-n.?<N0T-@ n-h.N=@.?<N0T @ (=@Jg.?<N0T @ (`0.H=@.N0.nڰno0.ؐnR@=@0.ܰno =|Bn>N -@>N!b-@/ n!_0.S@HѮ` n"nRR0.SnJ@f nB# .N^NuNV.P?<N0T @ (=@.NB/N/|X-@>N `pJC6*O*m# - ЭЭм"ҍ¼.A// Bg?<JNA y"h#E?/ NFN"/0<NBNu o AdpNu#BNuNV0/"/ NBd0< Aq"NB0<NBN^Nu o2/0/ HSoQBNu o0/JfBNuf SNuNV.{NG.{NG.{NGJnfad.|/ n /(afP.|/NFX#(fa&B@333 33B##3a.(NO=@JngaJyo>/<|NGX`$3.|/NFX#(fa.| / n /(aP.|%/NFX#$faJaAB##aJyf.|'NGaB2`>/<|9NGX.(NO.$NO.|ENGBy`<09 @"|,.09 м,//<|YNGPRy09y mBn`.}"NG=@ n fN^NuNV>/<|bNGXaaJ@fN^NuNV=| y*fa `>a =@ nafaa09`a~`a/~`a?D`ap`a`a|`a;`za) `ra$`ja`ba"z`Za'`Ra"j`Ja=`Ba(`:a.`2a,`*a$`"a(`a$`a`` a;$`a`a:`aX`a`av`a8N`a3 `a`a2`a46`a'`a `a!H`a!f`a=`a4`a,`za!l`ra&`ja4`ba`Za5`Ra;`La66`Fa5 `@a;`:a`4a `.Bn`(a `">a ``S@||b@0@t PNJnga 0.N^NuNVBn`a h y g y g y:g>a =@`2 nl09"|4nRna >a =@ nag |2nBByBn`40n"|r"./<NdXJ@f 0.R@3Rn n}mB@`pJygN^NuNV yfBn>a =@`2 nl09"|4nRna P>a =@ nag n0g |2nB.a =@ nfF.a @=y Ry 0. м, @!y0. м, @B(`>a ``a y g y fN^NuNV=|Bna09`b n BPy=y`\ n BP09Q@=@`F n BP=|`6 n BP=|`& n BP=|` y(g>a Na a(Jym yly =y`>a  y)g>a  n BPa `aJym yly=y`>a y)g>aa x y+f na d n BP`L n Pf n 0` n 0R@H"n 2=|a=|:a` y,f yf n m n o>a naDa^Jym yn|09|r `? n0H yl <"na yf n` yg>a y)g>a=|;a`>a`>a`jJymX ylL n 0=y n y)f:n( yf" n o n o>aja*` y,f yf n m n o>a, naaJym yn|09|r `? n0H yl <"na yf n` yg>a y)g>an0aP`>a`>ax`>an` >ad``|-b@0@v PN yf n 0@=@ y,fa0.N^NuNVB@=@=@av>aL=@ n-fB=|a>a,=@ n(f 3-` n0g nag>a0.`~B`R n l0/< /9NgP29HЁм#Rn`>afa&>a=@ n0g3`&aB`P nl<09|=@ n o 0._@=@ 92.HЁ#Rn`>aa y0m y9o yAm yFo3``2 nl09"|4nRnaN>a=@ nag n0g |2nB3Bn`00n"|q./<NdXJ@f3Rn nl yg yfH yf>.a@3 yg09 м, @#`>a`ax yLf 3` yWf 3`>aaD`ba>0y#a.3 y'g>aPa`. ng&3a``H |vrW hN nf 9D#N^NuNV y oa09 м,-@./.NeX09 м, @B(N^NuNV=|Bn`80. м,-@./.NdX=@Jnf=n`Rn0.y m0.N^NuNV-n ./.NeX`R nJg n .f n .fS./.NdXN^NuNV>/<|nNGXRy.}"NGN^NuNV`a y faN^NuNV nam nzo nAm nZnpa`` n0m n9np0``0.N^NuNV.|zNGNON^NuNV.|NGNON^NuNV.(NG3|gP yam yzny.}0?9NXT y f.}0?9NXT`.|NGNON^NuNV.$?.NXT=@ nf.|NGNON^NuNVJn o$A-H nH>aR nH>aN^NuNV0n-H> /YaXN^NuNVJn o4-n n fT ` nH>aLRSn Jn nN^NuNV yfRTa33./<aXHѹ./<aXHѹ`"Ta@3 30 y f3 y f3 3 ./<adX309@Hѹ./<aa` yfFBy3FB@09y y<b yc yd>ar` yfFBy3@B@09y y9b yc yd>a"`h yf@By3NhB@09|y ye yc>a` yf@By3N`B@09|y ye yc>a` y<c>ax ye yb y f>aRB@09y y9c>a2 ye yb y f>a B@09|3r 09h3B@09yy809H3B@09y>?9a(T>/<adX>/<aRX09@HѹN^NuNVTa3 yf0./<ahX./<aVXHѹ`3 ./<a.X lJo 93yr 09h3yP y fy@ y fy. /<aX3 y:c >at`B@09y09 @Hй# ytfy>?9aT> /<aX`>aN^NuNV yfTa|fT`T09`3a`3``3d`3e`3g`3l`3n`x3b`l3o``3c`V3m`L3k`B3f`83j`.3h`$3i``| |b@0@v PNa3 y f >a`a-y 9 y fV n oJf >a`0 .3yB@09y>?9aT`D n .n >aV`$>?9aTT>/YaXN^NuNV yfFT3./<a&XHѹ./<a XHѹ`d3T y f3@ yf3 yf3 yfBy./<aX309@Hѹ y<f y`: yd(r 09h3B@09yy`>a./<a$X3 y<f>a y9c yg>aB@09y>?9a*T>/<afX>/<aTX09@HѹN^NuNVT yf>?aa0.N^NuNV yfa09 S@ м, @!y09 S@ м, @|N^NuNV`aT y g y gN^NuNVaR#3N^NuNVa=@ nf=|aa-y nf/</.RNghP-@/.0n/NgP-@ 9Ю# yf./</.NghP-@`>BgaaD`0y-H>/YaXa y g y'f y f>a`v nfNBn09 Hѹax-y yf$ y f .a`>/Ya.X` y,f =|a`>a@ y g y g y f y f(9g yfBWaB09 HѹN^NuNVT yfa3./<aX3./<aX3 y<fl 93 ybL yd8r 09h3B@09yyp>?9aT`>a.`>a$`>aN^NuNVT yfZ. /<aX yg>a 93 yc>ayN@>?9a(TN^NuNVT yf(3ad3a8aR3 yer ybfB@09|r hy ye yb y@` yb y`>aB@09|y`t yb`B@09|r hy ye yb y` yb yH`>aB@09y`>ax>?9aTN^NuNVT yf~a3 y f 3H` y f 3H`>aa ym yn09|y`>a>?9aRTN^NuNVTav3 33 yf8./<aXHѹ./<aXHѹ`3 yqmy y fy@ y fy./<aDX309@Hѹ./<aX3 ybB@09r hy y<bB@09y`>a y f yc yd>a>?9aT>/<a4X` ye ybB@09|r hy y<bB@09y`>a y f>a y f y`y>?9aTT>/<aX` y<f3 yqm3 y fy@ y fyB@09y y9c>aT>?9aT>/<aX>/<aX`~ ybjB@09r hyy ye y9bB@09y`>a>?9a/<axX`>a09@HѹN^NuNVT yf>??????a`, yd y f 3@` y f 3`3 yc6 y f 3`3y y f>a.B@09r hyB@09y y<c>a`z y<ff y f 3 @` y f 3 `3 B@09y yc ye y9c>a`>a>?9aT>/<a,X>/<aX09@HѹN^NuNVTa3 B@33 yfV./<a"XHѹ y g. y g$ y g./<aXHѹ`Z./<aX309@Hѹ3 y g, y g" y g./<a~X3 yf09`R3`^3`T3`J3`@3`63`,3`"3``H |wJrW h NB@09y ye y9c>a y g>a>?9aT>/<aDX` yd09`R3`^3`T3`J3`@3`63`,3`"3``H |wrW h NB@09ySy 09 @y ydy B@09r hy`6 y<f$ 93B@09|r hy`>ax>?9aT`>a^N^NuNVTa3 yf./<aRXHѹ`./<a4X309@Hѹ ye yc y9b09`43B`@3D`63@`,3F`"3J``H |wrW hNSy 09 @yB@09y>?9aT>/<a X`>a4N^NuNVTa3 33 yf8./<aXHѹ./<aXHѹ`./<aX309@Hѹ./<aټX3 y<f ye yc y9b09`By`,3 `"3``H |x rW hNSy 09 @yB@09y>?9arT>/<aX>/<aX09@Hѹ` yfb09` 3<`,3 <`"3<``H |xBrW hN>?9aT>/<a X`t yf`09` 3|`,3 |`"3|``H |xzrW hN>?9avT>/<aX`>a` yd y<g09` 3`$3`>a``|gڰ|Tg`Sy 09 @yB@09r hyB@09y yc ye y<c>a0>?9aT>/<aX` yd09`*3`43`*3` >a``|gа|ar yd yc>aV yd y<g>a:>?9aT>/<aX09@Hѹ`>aN^NuNVTa yf./<aXHѹ`./<aX3 yc ye y'c y<d3AB@09y./<aՀX3B@09|r hy ye yc>a >?9aT>/<aX`>a09@HѹN^NuNVTa yf./<aXHѹ`./<aX3 yc ye y'cl y<db yCf 3N` yWf 3H@`3NB@09y>?9aߜT>/<aX`>a09@HѹN^NuNVXa3 yf3./<aX309@Hѹ yd y f 3H` y f 3H`>ab./<axX3B@09y y e y'b .a ye yc y e y9c>a09@Hѹ yf2>?9aDT>/<aނX>/<apX` yc y e y'c y<d./<aX3 y f 3L` y f 3L`>a*B@09y yf2>?9a݂T>/<aX>/<aݮX`>a yf3N^NuNV. /.aX=@ nl6Bn=|2.0.`=@0.n=nar=@` n-fZa&aZ=@ nn 0.nl>a@=n` =|2.0.`=@0.nRn0.no`F nl. nl>a=|2.0.`=@0.n` n/g>a=naۀa=@ y,g y g y g y f0.H"n"Bn y,fa00.N^NuNV n =@=|=|Bn=|` 0.ng B@0.nRn nm0.H"n"N^NuNV yDf*aڸ09|=@Jnm no>a`> yAf,aڄ09|=@ nm no>aٚ`=y0.N^NuNVTa033 yf./<azXHѹ` y8f 3`0 y9f 3` yMf 3`3./<aX3 yc ye y<c>aB@09y./<aX3B@09r hy yc>az>?9aT>/<a&X09@HѹN^NuNV3Ta yf./<a:XHѹ`./<aX3 yc ye y9c>aB@09|J3 yOfyH?>?9aT>/<aPX09@HѹN^NuNVTa yfV./<alX3 ye yc>a"B@09|NX3>?9a؀TN^NuNVX yfR3./<aX3 y<g>aֶ>?/<adXN^NuNVXa: yf3./<ăX3 ye yc>aX3 y<g>a>?9anT>/<aתXN^NuNVTa yf./<aXHѹ`T09`3Q`3P`3T`3U`3W`3\`3^`x3R`l3_``3S`V3]`L3[`B3V`83Z`.3X`$3Y``|b|b@0@x PN./<aX3 yc ye y9c>aԐB@09y>?9aT>/<a.X09@HѹN^NuNVa yf X`09`3Q`3P`3T`3U`3W`3\`3^`x3R`l3_``3S`V3]`L3[`B3V`83Z`.3X`$3Y``|&|b@0@y PNTa./<ahX3a# yg>a yc>aB@09y 9 n 9l >a`&>?9a:TT>/<arXN^NuNVaN=@ nf=|aa`-y nf/</.RNghP-@/.0n/NgP-@ 9Ю# yfza y,g>a a nf 9ခ nf=|`=|/</.NghP-@`>/<aӂXSJnN^NuNVT yfaB3 yf 3`3Sy 09 @y./<alX3./<aTX3 yd, yd"B@09yB@09r hy`b ycP y(dF yc< y(d2yB@09|yB@09|r hy`>aЎ>?9aTN^NuNVT yfa yf 3`3./<aZX3./<aBX3 yd, yd"B@09yB@09r hy`b ycP y(dF yc< y(d2yB@09|yB@09|r hy`>a|>?9aTN^NuNVT yfa3 3Sy 09 @y./<aBX3./<a*X3 ycP y dF yc< y d2yB@09|yB@09|r hy`>aΚ>?9a TN^NuNVTa. yfL./<aĄX3 yc>aDB@09|H@3>?9aϢTN^NuNVX yf4aغ3 y f>a./<aX3./<aX3 ydB y'c8 y0d.3B@09r hyB@09|y`T ydB y'c8 y0d.3B@09r hyB@09|y`>a y fy@>?9azT>/<aζX>/<aΤXN^NuNVJyff>?<`a8T>/<avX>BgaNT>BgaBT>Bga6T>Bga*T>BgaT>BgaTN^NuNVJyfJyg>/<$aX=|`^0n"|$ 02nSI$"-@`>a> n .@.H>aRn0.ym` >BgafTBWaN^Nu#NN/9Nu#NM/9Nu#NA/9NuNVH*n(n BG`|lRG0&@}"0+|f|mB` wg Wf>?</ NN\<`p ag Af>>?</ NQh\<l>?</ NN\<`>B?NR\`$ rg Rf>Bg/ NQh\<`B`@JFlB`8Bk 6B'@'@ rg Rf7|`7|Jnfk JL8N^NuNVBW/. /.aPN^NuNVBW/. /.aPN^NuNV>/. /.aPN^NuNVHN`BW/<qNRbX>/<qNRbX>/<qNRbX n2n B*n`&HHм @g H| `HRJf> /.NK XJL N^NuNV. /./<}0NSPN^NuNV./. /.NSPN^NuNVH*nSm m mH|R` `.NGJL N^NuNVH*n-fp`-g m p`Jf&-f>NZ+@fm`m-g0Hм+@}"f9}3g .}0NP-g>`>/-?NH\;@ Jm n m fm0`m p`Sm +m mH|RJL N^NuNVH>Nat*@ fp`b-gB@`V-g3  3p`8-gB0../. / NI|P``B0../. / NJPJL N^NuNVH *n(n ..-G`> ?/ /-/ Nf=@Bn` L2n gRnB@0.neJng L2n f =nU >/ aPX=@B0.ѭB0.B0.Jo -g` -o+m .JL0N^NuNVH *n-M B2. Ё-@(M`  gRe JL0N^NuNVH *n(n ..> ?/ /-/ Nf=@JnfU B0.ѭ -o+mB@0.JL0N^NuNVH BWN_##By.qa*n`N`RJgHHм @fJg2 "g 'fFH>/ RNX(@ f.|/ aVX H> M2GBRG.Ra`BG`RG M2GJg5pHHм @gJ5pg M2GBRGH`BWNP>BW/ RNRzXJ@g.R/<|aX`l>NP> ->f@>/ TNRzX|f>B?<NR\|f.R/<|a|X`$BW/ RNOjX|g.R/<|aVX`>?/ NXJf>*/ NXJg-|D.8?<NT>/ ?<Nc`\<f.}/ aX`^.H?/.aZ\.Ne2>RWNe(@./ NeX.a>/ ?<Nc`\<f`.a`|g`JfBaSy.Nz|f.}/<}a*XB/9?9N\>NOJL0N^NuNV|./NeX. /NdX.}/NdX.?< NT>NON^NuNVH*n y XRyJL N^NuNVH*n. (nGVfJL8N^NuNVHN`~>|fp`>Na08*@JnfU.q/.Ne`XJ@f U0`R`.q/.Ne`XJ@fU0`2>/.?Nc`\J@g3# 3p`U0JL N^NuNVBW?. /.a:\N^NuNVBW?. /.a"\N^NuNV>?. /.a\N^NuNVNO>NN^NuNVHBG`0м}".NORG|mJLN^NuNVH*n0-|g*.NP-g .N\rB@H+@+@Bm m>NP>JL N^NuNVH>.>Nat*@ f3  3p`NBF0|f>?<>NgT<l|>Na>N`JFf0``3 3pJL N^NuNVN^NuNVH*n0-| |f, -<o >/-?N`\>Gg mp`J-gJg-g;| `;| `>0- D@H/?NR\Bm +mB@JL N^NuNVHN`~>|fp`>Na08*@Jn fUJnfU.q/.Ne`XJ@fU;n 0``.q/.Ne`XJ@fU0`d>/.?Nc`\J@g>N`3 3p`0U>B-H?NR\BWB-H?NR\0JL N^NuNVBW?. /.a\N^NuNVBW?. /.a\N^NuNV>?. /.a\N^NuNVH>Nat*@ f3  3p`$>?-/. ?<BNgP+@U -JL N^NuNV>B?.a\N^NuNVH*nBnJ gh``BE-n `RRE nJg n %fJEo.?/. NXd\-n n n %@R DfBn n H|-@R Df n R Rn| <0fG n R =|<*f-M n=PT n R `8`*JnlBnH2. A|=@ n R <0m<9o|<.f BF n R <*f-M n<T n R `*`H2 A<| n R <0m<9oBn<lg<LfRn n R A-HH` RnJng <^r` <_(#.?<?< // N^ Jngp`pH`RnJng <^r` <_(#.Bg?< // N^ Jngp`pH`zRnJng <^r` <_(#.Bg?<// N^ Jngp`pH`&RnJng <^r` <_(#.Bg?<// N^ Jngp`pH`-M n-PX`-M n0|@B.T`H>?// NW X|`~H>?// NW X|`XH>?// NX X|`4.H?NXTRn``|C|5b@0@~ PN.Ne2:ElJFm:0.E=@JnfX .0f* n -f SE. nH?NXTRRn`..H?NXTRn0.SnJ@n.?/.NXd\n`..H?NXTRn0.SnJ@n`0.JL N^NuNVJnlp`0.=@ n -@>/. /.NhPN^NuNVJnlp`0.=@ n -@>/. /.NjPN^NuNV>/. /.a~P-@. Ne22.^AAo>/. /.aP-@ .N^NuNVH *n>. (n,g$Bl >/ ?N`\Gg lp`*B@`&`.H?NXT|fp` 0SGJ@fB@JL0N^NuNVH. *n Sm mH"m|R``.H?NYTJL N^NuNVH. *n BF:-fp`$JfV-fN>NZ+@+@fm`2m>NZhJ@gm@`;| H"mR`-gA+H +@ mR-gz>/-?N`\<Bm `n-g>< g -мb" -:>/-?N`\<+mBm `( -:>/-?N`\<;| +mFg mp`H|JL N^NuNVH>Nat*@ fB@`-fB@`pJL N^NuNVH>Nat*@ fB@`0|JL N^NuNV>aJ@g <q`BN^NuNVH>.^GORG>a*@ fB` >/ aXJL N^NuNVH (y~*T`ZB@0-BA2-@F@J@g>N]B`:B@0-ne `*~f>a*@ f>N]B`(M*U`JL0N^NuNVH n*PB@0. X@me n `F(MB@0. HH@B@H@B@0-n 9@B@0,F@9@( n ;n B@0-F@;@#~ PJL0N^NuNVH >.|?GG0@>N_*@fB`* R*@(M9GB@0,F@9@.Pa 9~JL0N^NuNVH *nQB@0-BA2-@F@J@g>N]p`(y~eeecd(T`e2 BA2-IHABAHAЁ" BB4,JHBBBHB҂b #~B@`n BA2-IHABAHAЁf T0(mB@0-F@;@ T*`* BA2,IHABAHAЁfB@0-lB@0,F@9@(`(#~B@JL0N^NuNVH *n.a>. ^GORG>a-@fB`J n(PPg2d`Sn Jn f`B0. B0. `%Sn Jn f>/.aXJL0N^NuNVN^NuNVN^NuNVH /?.?./ /. nN*@ мfB(n `%H|0|9o^G мfB JL0N^NuNVH-|*n<.H n. nfz` |SEJgJEf`h nf$z ` |SEJgJEfJEf-`*n<.JngJGlB@0D@> n P-"n R`B0H@B0>JGf JL N^NuNVH >.HμgR*y(G.Nz|f3  3p`>Bg/ N\ JL0N^NuNVH>Nat*@ fp`XJnfB@`N-g3  3p`0-g>/. / NaP``>/. / NbPJL N^NuNVH|BG` ~f ~0`RG|m3 3pJLN^NuNVp2.`F@H~B@N^NuNVHBG`>aRG|mJLN^NuNVH 0.8*@0.@BUB-+| BB> Bg/ N\> ?< / N\JL0N^NuNVH>.|e3  3B`0B@08*@-f3  3B` JL N^NuNVH *n(n >.B@=@=@``Rnnc L2n  fB@0.ncf>?.B@0.W B2.Ё//-/ Nf=@B0.ѭJnf3 3p`^=n`8Rn>?</<~/-/ Nf=@B0.ѭnb4 -o+mB@0.JL0N^NuNVH*n>?./. /-/ Nf=@Jnf3 3p` B0.ѭ -o+mB@0.JL N^NuNVH*n 0.8м-@~.a&M`RJg :fJgc .Am .On*K`K0.`BW/ ?<o n1GBG`BW/ ?<NNg\JgB@`0<>`d>ONgJgB@`0<>`J.?<=NgT>o n1GBG`,.?<ANgT>``||b@0@~ PN0JL8N^NuNV n am n zn n nHRJfN^NuNVH *n (n`RJff .JL0N^NuNVH *n(n `op`lp`JgJfHHAJL0N^NuNVH *n (nf .JL0N^NuNVH *n(M`RJf HJL0N^NuNVN^NuNVH *n(n `$H>a0H>a&op`lp` JfJfB@JL0N^NuNVH>.|am |zn|0JLN^Nu _B0Z"yCCbNC NNVH..,. Jf# <`Hc #B`:fzB`(xe 〼b`BJge`# JLN^NuJg .NuNV n=h.0n/0n/NgP/?.?<?NgPN^NuNV n=h.0n/0n/NgP/?.?<@NgPN^Nu#NA/9NuNVBBJlDRBJ lD RB0. -@0.2. An=@ .gDN^NuNVH?BCB..,. f# <`hlDRCJlDRCn8fzB`0l :HGH`xe`Jge`|fD# D`# JLN^NuNVH-n Jnnp` nop`0.R@8BGB/.Nl8Pl n -R /.NmX-@B/.Nl8Po.`/<D/.NmP-@SG/<A/.Nl8Pm`/<D/.NlVP-@RG/<D/.Nl8PlG|0H/NlvX-@`/<D/.NlVP-@RFDm/<B/.NlVP//.NlP-@/<D/.Nl8Pm -|ARGJGl4 n 0R n .R JDlD|` n 0R SFGnBF`j/.NmX:0|0"n R Gf n .R 0H/NlvX-@//.NmP-@/<D/.NmP-@RFDm n BR .JLN^NuNVH-n Jnnp` nop`0.R@8BGB/.Nl8Pl n -R /.NmX-@B/.Nl8Po.`/<D/.NmP-@SG/<A/.Nl8Pm`/<D/.NlVP-@RG/<D/.Nl8Pl|0H/NlvX-@`/<D/.NlVP-@RFDm/<B/.NlVP//.NlP-@/<D/.Nl8Pm -|ARGBF`j/.NmX:0|0"n R JFf n .R 0H/NlvX-@//.NmP-@/<D/.NmP-@RFDm n ER JGl0D@> n -R 0H |0"n R 0H H@|0"n R n BR .JLN^NuNVH..,. Nn LN^NuNVH..,. NnLN^NuNVH..,. No LN^NuNVHJl| .D-@`BFJfB`^~` .-@R .f` .-@S. g .-@޼@ JFg .JLN^NuNVH .м<JgJFlB`V .:|oJEg <` <`0..μ|`RFJFm`SFJFnJEg D. JLN^NuNVH..,. No LN^NuNVH..Nm LN^NuNVH..,. Nm LN^Nu<NuJg NugR kjklf`>k^g>k^g2k8<d,&B<ރeNuRid~S<Nu.NuJNu:ڼ.gNugRghEDvi^E]HE:BB8HD&HC؃HF&؃BDHDHGHFHEބj ޼gNuSiex@ބއdRgNu~NujJ<Numc68343 floating point firmware (c) copyright 1981 by motorola inc. Stack Overflow$C runtimeCON:LST:yJyMyPySyVyYy\y_ybyeyhykynyqytywyzy~yyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyzzz z zzzzz"z'z,z1z6z;z?zDzIzNzSzXz]zbzgzlzpzuzzz}zzzzzzzzzzzzzzzzzzzzzzzzzzz{{{{ {{{{{!{&{+{,{0{4{8{={A{E{I{L{P{T{X{\{`{d{h{l{p{s{x{|{{{{{{{{{{{\\\\dddddddddddddddd<DllLTt ||$$$$,4@@@@@@@@ZZZZZZZZp  j  $'(.0a H RPDP\ht8, FGYZ[\))))))** *, FGYZ[\********+ !PQS|,4,>,H,R,\,~<=TV-------<=TV.l.l.b.b.X.X.<=TV.......;;;;h;;;;;;;;;;t<2<2<2<2<2<2<<<<= <=="=.=:=D=N=X=b=l<=v=A0A1A2A3A4A5A6A7D0D1D2D3D4D5D6D7CCRSRUSPPC.L.WABCDADDADDAADDIADDQADDXANDANDIASLASRBCCBCHGBCLRBCSBEQBGEBGTBHIBLEBLSBLTBMIBNEBPLBRABSETBSRBTSTBVCBVSCHKCLRCMPCMPACMPICMPMDBCCDBCSDBEQDBFDBGEDBGTDBHIDBLEDBLSDBLTDBMIDBNEDBPLDBTDBVCDBVSDCDCBDIVSDIVUDSENDEOREORIEQUEXGEXTILLEGAJMPJSRLEALINKLSLLSRMOVEMOVEAMOVEMMOVEPMOVEQMULSMULUNBCDNEGNEGXNOPNOTORORGORIPEARESETROLRORROXLROXRRTERTRRTSSBCDSCCSCSSEQSFSGESGTSHISLESLSSLTSMISNESPLSTSTOPSUBSUBASUBISUBQSUBXSVCSVSSWAPTASTRAPTRAPVTSTUNLK A68 v 1.0 10/85 (C) COPYRIGHT 1985 ROBERT G. BROWN ALL RIGHTS RESERVED .a68r %d errors - aborted r.PRGw no errors found %d errors assembly complete %s %lx pass = %d <<**E%d**>> can't open file TABLE OVERFLOWN end of file ** DISK WRITE ERROR ** : unmatched quoteCannot open Cannot append Cannot create : No matchStack Overflow $   V TV<VbVVVVVVVVUfVVVVVUVVUVVVVVVVVVVV TV<VbVVVVVVVVUjVVVVVUVVU~~ dddcdd8ddddc!!!!"CP/M-68K(tm), Version 1.2, Copyright (c) 1983, Digital Research XXXX-0000-6543216$ N     ",    B " R        : : 2  4 : P & (           (""6\                                     0 2              *   * 0  $4         2                                                                                  "    (                                     x ( (                                       2 &                            \ F ,2$   ," 4P& \& DN ,D( 0 <    >  h 0HN&  j^***`&$ D"V8*R$ZF \@(B4.J".86 Jp $""@2&"fHR"(<@* vf FT0^0 :  ((    -@>N!b-@/ n!_0."nR nB# .N^NuNV.P?<N0T @-h.P?<N0T @ (=@.NJnm.Nnn0n.N! ./<ަN&X0n"n0HH.N! N^NuNV.NN-@> N / n!_ n h!nN^NuNV nJg n P g .޺N n P-h n"n"Q  .N^NuNV. a-@ nf$Jg n g./<N&X`&Jg nHng./<N&X .N^NuNVB/N/|X-@.a2-@.N'-@# .N^NuNV. a-@ nf$Jg n g./<N&X`&Jg nHng./<N&X .N^NuNV nJg n P g n"yԔ  n 0` n P-h .Ԙf n 0` .Ԝf n BP` .N n"n"Q  nJg n P g .1N n"n"Q  nJg n P f n.N'/ n n"n"Q N^NuNV.a-@gJJg" n f nJf .ON`"Jg n g./<]N&X .N^NuNVJg .oNN^NuNV . gB@`pN^NuNV. /.aXJ@g p``Jg< n f2J g, n f" n ("n ")gB@`p``Jg> n  f4J g. n  f$ n /( n/(N\PgB@`p`J`HJg@ n f6J g0 n f& n . n/(NZXJ@gB@`p``B@N^NuNV. /.aXJ@gp```\JgT n fJJ gD n f: n . n/(aXJ@g n . n/(aXJ@fB@`p``B@N^NuNV n :f.`.?. /.a\N^NuNV.߂/.NZXJ@fB`B n-h`0 n.az./.NZX=@o-n n-hJfJgJnf n (`pB/N/|X-@>N -@> /.a\X/ n!_ n!nJg n!n` n!n# n (N^NuNV>/.aXN^NuNVB/N/|X-@>N -@ n :f .` 9"n#@>N / n!_>N -@/ n h!_Jn f .N!` ."n#@ n1n # .N^NuNV n h h (N^NuNV>N -@ n!n .N^NuNV>N -@ n"n!i n!n>N / n!_ n h!n n h!n N^NuNV` .N,.a-@g .N^NuNV.Y/.Nc|XJ@g .`.aN^NuNV-y`F n-h`* n h (f n h (`( n-hJf n-hJf n (N^NuNV. /.NcXJ@fb-y`H n-h`, n h (f n h!n `* n-hJf n-hJf n!n N^NuNV. /.aNX-@g n (`BN^NuNV./.a&X-@fxB/N/|X-@>N -@ n!n>N -@/ n!_ n!n  n"n"i!i n h!n# n!n N^NuNVB n h-h`R n ( f0Jg n"n"i!i` n h"n"i!i n-h n-hJg" n f nJg n h gN^NuNV n h-h`& n ( f n (`8 n h-hJg" n f nJg n h gBN^NuNV>/<߆aX#>N / y!_ y h!y.ߏa^#.ߙaN# y!yN^NuNVB/N/|X-@.P?<N0T-@Jg.PNJfB@`p`p=@Jg.PNJfB@`p`B@=@.N>?. n/(Ns\J@g 9D`B-@# .N^NuNV.NN"BN^NuNVJg.P?<N0T @ (`p=@.NBn`N$J@gRn0.nm0n.N! N^NuNV.P?<N0T @ (=@.N=yf3f0n.N! N^NuNV.NN&BBN^NuNV.PN-@fB`x nH`V 9Ԭ`d 9԰`\ 9Դ`T 9Ը`L 9Լ`D 9`< 9`4 9`, 9`$.N`S@|b@0@ߤ PNN^NuNVJg.P?<N0T @ (`p=@.N>N >BN^NuNV.NNN^NuNV.P?<N0T @-h.N n0H.N! N^NuNV.P?<N0T @-h.P?<N0T-@.N n ("n2 .N^NuNV.PN-@.N.N! N^NuNV.N//.NX/NzPN^NuNVaN^NuNV <8g.N`09SyJ@g0y"|0HRy`Byax=@`V.F?< alT0y RyBySy0y"|0HRy`(JygZSy`0.F?<aT.F?< aT.F?<aTJyg0y"|00ym` n g n mH nl@0."|4y0y0.F?.axTRy`Fa2 nfN`, nfN?` nfN@` nfp`(0.`"`|g| g|g`F`N^NuNV <F g. ?.N`T` n fBy> a> a` n f.F?< aT09|f`Z nfSy>a`B n m4 nl,>avRy09ڰ|Pm.F?< aHT`>aJN^NuNVB@33.F?< aT3`N^NuNV>NN^NuNV>?<NTN^NuNV>?<NTN^Nu#^NN/9^Nu#^NM/9^Nu#^NA/9^NuNVH*nBBF`RHHм& @f +fR` -fRRF`/< /NP.H|Hހ 0m 9oJFg D. JL N^NuNVH>Np*@ fB`>Bg/ N\ JL N^NuNVHB>. B@0.H@B@H@//NP. >aJLN^NuNVH*n(n BG`|lRG0&@80+|f|mB` wg Wf>?</ N\<`p ag Af>>?</ N\<l>?</ N\<`>B?N\`$ rg Rf>Bg/ N\<`B`@JFlB`8Bk 6B'@'@ rg Rf7|`7|Jnfk JL8N^NuNVBW/. /.aPN^NuNVBW/. /.aPN^NuNV>/. /.aPN^NuNVHNpBW/<ǹNX>/<ǹNX>/<ǹNX n2n B*n`&HHм& @g H| `HRJf> /.N@XJL N^NuNV. /./<FNPN^NuNV./. /.NPN^NuNVH*nSm m mH|R` `.N2JL N^NuNVH*n-fp`-g m p`Jf&-f>Np+@fm`m-g0Hмb+@8f9Ig .FN-g>`>/-?N(\;@ Jm n m fm0`m p`Sm +m mH|RJL N^NuNVH>N*@ fp`b-gB@`V-g3 "3$p`8-gB0../. / NP``B0../. / NPJL N^NuNVH *n(n ..-G`> ?/ /-/ N@=@Bn` L2n gRnB@0.neJng L2n f =nU >/ aPX=@B0.ѭB0.B0.Jo -g` -o+m .JL0N^NuNVH *n-M B2. Ё-@(M`  gRe JL0N^NuNVH *n(n ..> ?/ /-/ N@=@JnfU B0.ѭ -o+mB@0.JL0N^NuNVH BWN"#t#xByr.ǯa*n`N`RJgHHм& @fJg2 "g 'fFH>/ RNX(@ f./ aVX H> M2GBRG.Ra`BG`RG M2GJg5pHHм& @gJ5pg M2GBRGH`BWNrBW/ RNXJ@g.R/<aX`l>Nr ->f@>/ TNX|f>B?<N\|f.R/<a|X`$BW/ RNX|g.R/< aVX`>?/ NXJf>*/ NXJg-|0.8?<NT>/ ?<N\<f./ aX`^.H?/.aZ\.N>RWN^(@./ NX.a>/ ?<N\<f`.a`|g`JfBaSyr.xN|f.3/<$a*XB/9t?9rN=\>NJL0N^NuNV|./NX. /N0X.4/N0X.?< NT>NN^NuNVH*n yx XxRyrJL N^NuNVH*n. (nGVfJL8N^NuNVHN >|fp`>N08*@JnfU.ǹ/.NXJ@f U0`R`.Ǿ/.NXJ@fU0`2>/.?N\J@g3#"3$p`U0JL N^NuNVBW?. /.a:\N^NuNVBW?. /.a"\N^NuNV>?. /.a\N^NuNVN>NN^NuNVHBG`0м8.NRG|mJLN^NuNVH*n0-|g*.N-g .NB@H+@+@Bm m>NrJL N^NuNVH>.>N*@ f3 "3$p`NBF0|f>?<>NT<l|>N>NTJFf0``3"3$pJL N^NuNVN^NuNVH*n0-| |f, -<o >/-?N\>Gg mp`J-gJg-g;| `;| `>0- D@H/?N\Bm +mB@JL N^NuNVHN >|fp`>N08*@Jn fUJnfU.ǹ/.NXJ@fU;n 0``.Ǿ/.NXJ@fU0`d>/.?N\J@g>NT3"3$p`0U>B-H?N\BWB-H?N\0JL N^NuNVBW?. /.a\N^NuNVBW?. /.a\N^NuNV>?. /.a\N^NuNVH>N*@ f3 "3$p`$>?-/. ?<BNP+@U -JL N^NuNV>B?.a\N^NuNVHK;| .+@+@;|:./. / NP>.BgN`T0JL N^NuNVH*nBnJ gh``BE-n `RRE nJg n %fJEo.?/. N\-n n n %@R DfBn n H|-@R Df n R Rn| <0fG n R =|<*f-M n=PT n R `8`*JnlBnH2. A|=@ n R <0m<9o|<.f BF n R <*f-M n<T n R `*`H2 A<| n R <0m<9oBn<lg<LfRn n R A-HH` RnJng <` <#|.|?<?< // N Jngp`pH`RnJng <` <#|.|Bg?< // N Jngp`pH`zRnJng <` <#|.|Bg?<// N Jngp`pH`&RnJng <` <#|.|Bg?<// N Jngp`pH`-M n-PX`-M n0|@B.T`H>?// Nn X|`~H>?// N6 X|`XH>?// N X|`4.H?N`TRn``|C|5b@0@ PN.N:ElJFm:0.E=@JnfX .0f* n -f SE. nH?N`TRRn`..H?N`TRn0.SnJ@n.?/.N\n`..H?N`TRn0.SnJ@n`0.JL N^NuNVJnlp`0.=@ n -@>/. /.NPN^NuNVJnlp`0.=@ n -@>/. /.NPN^NuNV>/. /.a~P-@. N2.^AAo>/. /.aP-@ .N^NuNVH *n>. (n,g$Bl >/ ?N\Gg lp`*B@`&`.H?N`T|fp` 0SGJ@fB@JL0N^NuNVH. *n Sm mH"m|R``.H?NTJL N^NuNVH. *n BF:-fp`$JfV-fN>Np+@+@fm`2m>NJ@gm@`;| H"mR`-gA+H +@ mR-gz>/-?N\<Bm `n-g>< g -мb" -:>/-?N\<+mBm `( -:>/-?N\<;| +mFg mp`H|JL N^NuNVH>N*@ fB@`-fB@`pJL N^NuNVH>N*@ fB@`0|JL N^NuNV>aJ@g <ǹ`BN^NuNVH>.^GORG>a*@ fB` >/ aXJL N^NuNVH (y*T`ZB@0-BA2-@F@J@g>NB`:B@0-ne `*f>a*@ f>NB`(M*U`JL0N^NuNVH n*PB@0. X@me n `F(MB@0. HH@B@H@B@0-n 9@B@0,F@9@( n ;n B@0-F@;@# PJL0N^NuNVH >.|?GG0@>N"*@fB`* R*@(M9GB@0,F@9@.Pa 9JL0N^NuNVH *nQB@0-BA2-@F@J@g>Np`(yeeecd(T`e2 BA2-IHABAHAЁ" BB4,JHBBBHB҂b #B@`n BA2-IHABAHAЁf T0(mB@0-F@;@ T*`* BA2,IHABAHAЁfB@0-lB@0,F@9@(`(#B@JL0N^NuNVH *n.a>. ^GORG>a-@fB`J n(PPg2d`Sn Jn f`B0. B0. `%Sn Jn f>/.aXJL0N^NuNVN^NuNVN^NuNVH /?.?./ /. nN*@ мfB(n `%H|0|9o^G мfB JL0N^NuNVH-|*n<.H n. nfz` |SEJgJEf`h nf$z ` |SEJgJEfJEf-`*n<.JngJGlB@0D@> n P-"n R`B0H@B0>JGf JL N^NuNVH >.HμgR*y(G.N|f3 "3$p`>Bg/ N\ JL0N^NuNVH>N*@ fp`XJnfB@`N-g3 "3$p`0-g>/. / NbP``>/. / NrPJL N^NuNVH|BG` f 0`RG|m3"3$pJLN^NuNVp2.`F@HB@N^NuNVHBG`>aRG|mJLN^NuNVH 0.8*@0.@BUB-+| BB> Bg/ N\> ?< / N\JL0N^NuNVH>.|e3 "3$B`0B@08*@-f3 "3$B` JL N^NuNVH *n(n >.B@=@=@``Rnnc L2n  fB@0.ncf>?.B@0.W B2.Ё//-/ N|=@B0.ѭJnf3"3$p`^=n`8Rn>?</</-/ N|=@B0.ѭnb4 -o+mB@0.JL0N^NuNVH*n>?./. /-/ N|=@Jnf3"3$p` B0.ѭ -o+mB@0.JL N^NuNVH*n 0.8м-@~.a&M`RJg :fJgc .Am .On*K`K0.`BW/ ?<o n1GBG`BW/ ?<NN\JgB@`0<>`d>ONJgB@`0<>`J.?<=NT>o n1GBG`,.?<ANT>``||b@0@ PN0JL8N^NuNV n am n zn n nHRJfN^NuNVH *n (n`RJff .JL0N^NuNVH *n(n `op`lp`JgJfHHAJL0N^NuNVH *n (nf .JL0N^NuNVH *n(M`RJf HJL0N^NuNVN^NuNVH *n(n `$H>a0H>a&op`lp` JfJfB@JL0N^NuNVH>.|am |zn|0JLN^Nu _B0Z"yCCbNC N o H n -R 0H |0"n R 0H H@|0"n R n BR .JLN^NuNVH KIBnBn`R n  g n  g n -gB@`p=@ n -g n +fR`$ n .fRn` nJngRnR nJg n eg n EfB n eg n EfDR n -gB@`p=@ n -g n +fR` nR nJfB.a-@.N2=@Jng 0.D@n`0.ܐn=@/.?.a:T/NBP-@.N@-@Jng .JL0N^NuNVJnl,-|A`/<D/.NzP-@RnJnm`*-|A`/<D/.NBP-@SnJnn .N^NuNV-|`D/<D/.NBP-@/. nH|H/N*X/N.Nf<<XDxB묈<΄,<CNf,.N$(< .BJk<FD<c~䯾o$`<D<c~DDl`z,k^g>k^g2k8<d,&B<ރeNuRid~S<Nu.NuJNu:ڼ.gNu<Jj~`~<L~Nu.<AOJNuH~?g<$,<;ANfi<`D<o< l",0JL N^NuStack Overflow$C runtimeCON:LST:not a functionbad comma expressionbad comma-at expressionbad place formbad place formbad argument type%s%d**BREAK**bad bindingbreak%s: %s - if continued: %s errorthis error can't be continuedquit from break loopinsufficient memory%%%%%%%%%%%%%%%%%%insufficient node spaceinsufficient string spacebad node type (%d) found during left scan bad node type (%d) found during right scan Nodes: %d Free nodes: %d Segments: %d Allocate: %d Total: %ld Collections: %d bad functionbad function typebad functionbad functionbad function typebad functionbad argument listtry evaluating symbol againunbound variablebad function definitionbad formal argument listsymbol missing after &resttoo few argumentstoo many argumentsrwfile not openΜΡVΧί^εξ$d2  \ n  . ^% ) 1 :9A=BBB(GAKB>PBTUBZCD_CfDnE6sL,wL@~EυFPϋG6ϑHϘJϟLϦMϫMϲMϷMϿOPPbPRR>R~RS S S:St [[[[$[)S,S0S6 ; ? dBRFfK N(S<YP_deknu4xH|ЃЋnБЗ\НФ&Ъгм@EVALAPPLYFUNCALLQUOTEFUNCTIONBACKQUOTESETSETQSETFDEFUNDEFMACROGENSYMMAKE-SYMBOLINTERNSYMBOL-NAMESYMBOL-VALUESYMBOL-PLISTGETPUTPROPREMPROPCARCAARCADRCDRCDARCDDRCONSLISTAPPENDREVERSELASTNTHNTHCDRMEMBERASSOCSUBSTSUBLISREMOVELENGTHMAPCMAPCARMAPLMAPLISTRPLACARPLACDNCONCDELETEATOMSYMBOLPNUMBERPBOUNDPNULLNOTLISTPCONSPMINUSPZEROPPLUSPEVENPODDPEQEQLEQUALCONDANDORLETLET*IFPROGPROG*PROG1PROG2PROGNGORETURNDODO*DOLISTDOTIMESCATCHTHROWERRORCERRORBREAKCLEAN-UPCONTINUEERRSETBAKTRACEEVALHOOKYdYxT<!TR#Th%T~'X*X-T1T5T9X=XAYEY(ITNY<RYPWT_TgUoXw]y]|]~]Ӂ]ӄ^ӆ}Ӎ~LӔӛ$Ӡ/ӥ0^ӫ0xӱ0ӷ0Ӿ1n112223<34< J!).38$TRUNCATEFLOAT+-*/1+1-REMMINMAXABSSINCOSTANEXPTEXPSQRTBIT-ANDBIT-IORBIT-XORBIT-NOT<<==/=>=>STRCATSUBSTRSTRINGCHARREADPRINTPRIN1PRINCTERPRIFLATSIZEFLATCOPENIOPENOCLOSEREAD-CHARPEEK-CHARWRITE-CHARREAD-LINELOADGCEXPANDALLOCMEMTYPE-OFEXITPEEKPOKEADDRESS-OFGTQUOTEFUNCTIONBACKQUOTECOMMACOMMA-ATLAMBDAMACROEQLCARCDRGETSYMBOL-VALUESYMBOL-PLIST:TEST:TEST-NOT&OPTIONAL&REST&AUX*STANDARD-INPUT**STANDARD-OUTPUT**EVALHOOK**APPLYHOOK**TRACENABLE**TRACELIMIT**BREAKENABLE***Copyright-1985-by-David-Betz**:SUBR:FSUBR:CONS:SYMBOL:FIXNUM:FLONUM:STRING:OBJECT:FILEbad stream%d:%d> input abortedbad stream%s XLISP version 1.5b, Copyright (c) 1985, by David Betzfatal initialization error init.lsp%s.lspcan't load filenot in a break loopnot in a break loopno target for GOno target for RETURNno target for THROWerrorno target for erroradaadaadddbad argumentbad argumentbad argumentbad argument typebad argumentbad argument%&*+-/M^m|VWVVnVzVVWVW W*+-/EMmWvWFW^WWWWW+-AFI~YYYYYYZ+-ACEFIRSTZZZlZ[[>[([ZZ[@+-EOZ\P\&\d\z\<\#<=>GL`__`.`_`Z#<=>GL``f`a``aPbad argument typebad argument typedivision by zerodivision by zerosquare root of a negative numberbad argument typebad argument typeexpecting strings, integers or floatsbad integer operationbad floating point operationno method for this messageObject is , Class is = no method for this messagebad methodno method for the isnew messagebad value for instance variable countbad instance variable listbad class variable listSELFMSGCLASS:NEW:ISNEWCLASSOBJECTIVARTOTALIVARCNTSUPERCLASSCVALSCVARSIVARSMESSAGES:NEW:ISNEW:ANSWER:ISNEW:CLASS:SHOW:SENDSUPERqBooopppq,qp \rDr r2r rVrhNILSubrFSubr . FileObjectFreeFoo#<%s: #%lx%ld%f%03o'<X\xuuuuuu"#'(),.;`u4vuluDvvv.vvvv; loading "%s" runreadable atomunknown character after #extra right parenmisplaced dotinvalid characterinvalid dotted pairinvalid dotted pairunexpected EOFindex out of rangetoo few argumentsbad argument typebad argument typebad argument typebad argument typeexpecting :test or :test-notno value for keyword argumentfile not openbad argument typetoo many argumentsNIL*OBLIST**KEYLIST**UNBOUND*bad node type: unmatched quoteCannot open Cannot append Cannot create : No matchStack Overflow $   H6666666666666F6666666666L6666666666666J lJ!!!!"CP/M-68K(tm), Version 1.2, Copyright (c) 1983, Digital Research XXXX-0000-654321R X $$$ $4 6,8.$,""(    $  04   @" "$$ ,  JJ  H  b" @<" L 4"   @ $$   L 4\ &8D$6>"*8( `    0 : &     .  p  ( dn4 B  @<28 nP0, >  J VT" $n&^TF ,4 & 0` "B 6&  & " $"       rT   r8,@ "      &  46l8F*,V D$:4$X$ DR L, h4 (ZZ 4 $fR  &R&H ^T ",*" $ *| &   R,4(08 X( &   ` @  xJ $ " :6D :*$$$""L 6&2"d   T  :(* 4 p.D"*^&, F <:  , 6 NBV&                $L 8v $&&*(  (2" 0  " 4Bh20. < h>JR (&z$$,"$:H*:R" 8",&(.LD 4DH6" .$&: n @    "     $        ( D"( "",D2>2$   ," 4P& \& DN ,D( 0 <    >  h 0HN&  jj`^***`&$ D"V8*R$ZF \@(B4.J".86 Jp $""@2&"fHR"P<@* h$f FT0^06D,6 :"P  : X$ fBL, ((T *6pL$ 0  V\0V   :000AFOR N=0 TO 300 :0014POKE 34038+N,PEEK(25846+N) :001ENEXT N :0028POKE 1644,0 :0032POKE 1645,12 :003CPOKE 25955,34 :0046POKE 25980,97 :0050POKE 25981,0 :005APOKE 25982,31 :0064POKE 25983,120 :006EPOKE 25986,2 :0078POKE 25987,24 :0082POKE 34081,1 :008CPOKE 34127,111 :0096POKE 34163,108 :00A0POKE 34166,78 :00AAPOKE 34167,117 :00B4END @ The Assembler A68 looks for an Assembler file with an extention of '.A68'. When the command line appears you must NOT type in the extention '.A68'. So if you have an assembler file called 'FRED.A68' you must only type in 'FRED' when the command line appears. Do NOT type in 'FRED.A68' or 'FRED.', but only 'FRED'. This is the only problem that anyone has ever been it touch with me about, when it comes to using this assembler, so I suppose it must be OK. Andrew Bishop, ST UK, 10.12.1987