art ov noisecomposed by whiskas @IFFBLANK?@IFFEXIT^@IFFEXIT@IFFSTOPB@PLAY.REXX@PLAY.REXX@RIFFSPLICER-i@-iBALL3@DOS.BMAP@EXEC.BMAP@GRAPHICS.BMAP5@LOADACBM@MUSIC@SCREEN@FED_TEMP_FONT.FONT@COMPACTL.FONT@COURIER.FONT@FRANKLINC.FONT@GILL.FONT @GOUDYB.FONT@NTV-COLORSHADE.ANIM@)NTV-BINGO.ANIM.@% NTV-TING_SOM_IKKE....J@ >NTV-LOGO-BLANK.BRUSH )0 )00-OUTTRO 13@00-BARNDP 2@TEMAUKE0EHOTELLET BTERIET1!!Sman tager hvad man@haver. M.K.  , 0 @< L `P @\ aL 0  < , @ 0L < P 0\ <    , 0 @< L P @\ L  ,   0, < @ PL \ @ 0L <  ,  0 @< L    ,  0 <  @, L 0  < , @  L , 0  < , 0   , @ 0֐< @ L @ P \ @0L  0<  @, ֐ @ L 0< 0 P \ 0@<  ֐  0,  0@< @0L P֐\ @L  @,   0  , 0֐< @ @ L P0\  @@L 0֐< 0  , 0 @ 0֐< @L ֐    0, ֐  0 < @  ֐, @@L  0֐<  0,  @@L  0, 0֐<  , 0@  , 0 @< L P @\ L 0  < , @ 0L < P 0\ <    , 0 @< L P @\ L  ,   0, < @ PL \ @ 0L <  ,  0 @< L    ,  0 <  @, L 0  < , @  L , 0  < , 0   , @ 0֐< @ L @ P \ @0L  0<  @, ֐ @ L 0< 0 P \ (0@<  ( ֐  0, (  0@< ( @0L ( P֐\ @L (   @,   0  , 0֐< @ @ L P0\  @@L 0֐< 0  , 0 @ 0֐< @L ֐    0, ֐  0 < @  ֐, @@L  0֐<  0,  @@L  0, 0֐<  , 0@ ., @>< ֐NL  @^\ NL 0 >< ., @֐NL >< 0^\ | >< @| ֐., 0| >< @|NL 0 |^\ ֐NL | ., @  0., >< ֐@NL ^\ 0NL @>< ֐0.,  0@>< ֐NL ֐ ., 0֐ >< @., ֐NL @>< ֐., 0NL @., 0 >< ֐.,  >< @` , @0֐ @pL @P @0L 0  @ , ֐@ 0~< .P 0< ֐ 0, p0@ @0L P֐@ L  @  0 0֐ < `  @  P0 \  @@ 0֐  < 0    @ 0֐ @ L ֐   p , ֐  0 < @  ֐ P@ \  0֐  0 ,  @@  , 0֐   , p 0@ ` , @ 0֐ @pL @ P @0L  0  @ , ֐.@  0~ .P 0 <  ֐   0, p0@  @0L P֐ @ L  @.  0 0֐  < ` @  P0 \ @@0֐  < 0   @0֐@.L ֐   p, ֐ 0 < @  ֐P@\  0֐ 0,  @@ , .0֐  , p0@@!:: >n =. <N ;֞ :~ 9N 8. 7> 6 5 4N 3֞ 2. 1~ 0 / . - , + *֞ ) (> ' &~ % $N # "> ! .  ֞      N  .  >    ֞  n . >   N  ֞  >  .֬֬   ` , @ְ0֐ @pL @P @0L 0  @ , ֐@ 0~< .P ְ0< ֐ְ 0, p0@ @0L P֐@ L  @  0 0֐ ְ< ` @  P0ְ\ @@0֐ < 0  @0֐@L ֐  p, ֐ְ0 < @ְ ֐P@\ 0֐ 0, @@֐ , 0֐ , p0@ְ0`,  @ְ0֐, p @@ , 0֠ ּ 0`\ @P֐ < ~0.ְ,  ֐ְL 0@p0@ 0 ֠ ֐ּ < `0@@\ `P0@< ֐ְ0`  0ְ @L ֐@0P ֠L ּ @@`0֐,  ֐ < p0֐ְP֠< 0@ְ@֐, @ 0֐֠L 0@ּ P@֐L @ ֠0֐,  p@ְP`P ְ@ְP֐Ppְ@P ֠P0ְ֠PP@֐P P~.PְPְP֐ְP0pְP@P0֠ ְP֐֠PP@P 0PP֐ְ`P ְP0ְP@ְP֐0֠P ְP֠@P֐P֐P Pp֐ְPP ְ@ְP֐P@ְP֐֠P0ְր֠P@։P։ ։$P֐PS$pP@ְ` ְ@ְ֐pְ@ ֠0ְ֠@֐ ~.ְְ֐ְ0pְ@0֠ ְ֐֠@ 0֐ְ` ְ0ְ@ְ֐0֠ ְ֠@֐֐ p֐ְ ְ@ְ֐@ְ֐֠0ְր֠@։։ ։$֐S$p@ey A rx Record RMvILBMBMHD  CAMGCMAPBODY4RMILBMBMHDZ @CMAP @@@GRABCRNG CRNG CRNG CRNG CRNGCRNGCAMGBODRMILBMBMHDZ @CMAP @@@GRABCRNG CRNG CRNG CRNG CRNGCRNGCAMGBO ~? ~???1&@ x`11~ ~~8<~8~|~fZlfs=wpf88|~`gopfl`?<><8x Rev 7.26.90 */ /* PLAY.REXX */ /* Plays Back keystrokes To Performer Recorded By RECORD.REXX*/ x = RemLib("rexxsupport.library") x = RemLib("rexxarplib.library") If addlib("rexxsupport.library",0,-30,0) then Do ARG FileName If FileName = '' then do Say "" Say 'Enter directory and name of script to play back:' PULL FileName end If Open('RecFile',FileName,'R g Elan Player 2.0 with" PicEnv "..." do for 60 while ~show('Ports','PERFORMER') call delay 25 /* 0.5 sec */ end ca Rev 7.26.90 */ /* PLAY.REXX */ /* Plays Back keystrokes To Performer Recorded By RECORD.REXX*/ x = RemLib("rexxsupport.library") x = RemLib("rexxarplib.library") If addlib("j\nnikggfhj)b_YgXgn(+'(-+'+$h\YaB;;6QTNKJ4NQK!4NOJ9GPJ <TKIP1QV+;HEHMN:GF1JLGT*9FBEJK8ED0GID6GC.IO(6C@CGH6BA.EGA?AAJAII?GEE>F@GIE2BF1A=*CG2;I1:H-A9;=??;;?8F%:9@9AA-'.',-+&-%6;;.9;7-$;.8895B$)%*43$684#573)31)20267(10"341$0:%84''(%& 01.%.-!-6%./,$%&!#-.+#+* # "  '/ (*'-  &,&(%&(%# *  * (   &" # ""  %  #! $                         88Q`6888888@888888Q`F6888888@888888@888888Q`6888888@888888@888888@888888Q`6888888@888888@888888@888888@888888Q|`6888888@888888@888888@888888@888888@888888Qb`R6888888@888888@888888@888888@888888@888888@888888QH`6a0@a,Q`6a @a@a@aQ`l6aQ``888888@888888@888888@888888@888888@888888@888888@888888Nu2z:t4 gZd eg e8gh g<`P eg g*` gX`638587898;8=8Q`638587898;8=8@38587898;8=8Q`638587898;8=8@38587898;8=8@38587898;8=8Q`638587898;8=8@38587898;8=8@38587898;8=8@38587898;8=8Q`638587898;8=8@38587898;8=8@38587898;8=8@38587898;8=8@38587898;8=8Q|`638587898;8=8@38587898;8=8@38587898;8=8@38587898;8=8@38587898;8=8@38587898;8=8Qb`638587898;8=8@38587898;8=8@38587898;8=8@38587898;8=8@38587898;8=8@38587898;8=8@38587898;8=8QH`*6a0@a,Q`6a @a@a@aQ`6aQ`38587898;8=8@38587898;8=8@38587898;8=8@38587898;8=8@38587898;8=8@38587898;8=8@38587898;8=8@38587898;8=8Nu eg e8gh g<`P eg g*` gX`6#8%8'8)8+8-8Q`6#8%8'8)8+8-8@#8%8'8)8+8-8Q`6#8%8'8)8+8-8@#8%8'8)8+8-8@#8%8'8)8+8-8Q`26#8%8'8)8+8-8@#8%8'8)8+8-8@#8%8'8)8+8-8@#8%8'8)8+8-8Q`6#8%8'8)8+8-8@#8%8'8)8+8-8@#8%8'8)8+8-8@#8%8'8)8+8-8@#8%8'8)8+8-8Q|`86#8%8'8)8+8-8@#8%8'8)8+8-8@#8%8'8)8+8-8@#8%8'8)8+8-8@#8%8'8)8+8-8@#8%8'8)8+8-8Qb`6#8%8'8)8+8-8@#8%8'8)8+8-8@#8%8'8)8+8-8@#8%8'8)8+8-8@#8%8'8)8+8-8@#8%8'8)8+8-8@#8%8'8)8+8-8QH`6a0@a,Q`6a @a@a@aQ`6aQ`#8%8'8)8+8-8@#8%8'8)8+8-8@#8%8'8)8+8-8@#8%8'8)8+8-8@#8%8'8)8+8-8@#8%8'8)8+8-8@#8%8'8)8+8-8@#8%8'8)8+8-8Nu eg| eg g` egT g` g`26#838%858'878)898+8;8-8=8Q`V6#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8Q`6#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8Qh`L6#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8Q6`|6#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8Q`z6#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8Q`F6#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8Q`6a0@a,Q`6a @a@a@aQ`6aQ`#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8@#838%858'878)898+8;8-8=8Nu g g`@2t4 eg~ eg g` eg g`d g|`&6182838485868Q`6182838485868@182838485868Q`B6182838485868@182838485868@182838485868Q`6182838485868@182838485868@182838485868@182838485868Qf`(6182838485868@182838485868@182838485868@182838485868@182838485868Q@`b6182838485868@182838485868@182838485868@182838485868@182838485868@182838485868Q`v6182838485868@182838485868@182838485868@182838485868@182838485868@182838485868@182838485868Q`d6a0@a,Q`T6a @a@a@aQ`<6aQ`0182838485868@182838485868@182838485868@182838485868@182838485868@182838485868@182838485868@182838485868Nu2z:t4 g d eg~ eg g` eg g`d g|`&68q88r88s88t88u88v8Q`|68q88r88s88t88u88v8@8q88r88s88t88u88v8Q`(68q88r88s88t88u88v8@8q88r88s88t88u88v8@8q88r88s88t88u88v8Q`68q88r88s88t88u88v8@8q88r88s88t88u88v8@8q88r88s88t88u88v8@8q88r88s88t88u88v8Qf`68q88r88s88t88u88v8@8q88r88s88t88u88v8@8q88r88s88t88u88v8@8q88r88s88t88u88v8@8q88r88s88t88u88v8Q@`H68q88r88s88t88u88v8@8q88r88s88t88u88v8@8q88r88s88t88u88v8@8q88r88s88t88u88v8@8q88r88s88t88u88v8@8q88r88s88t88u88v8Q`\68q88r88s88t88u88v8@8q88r88s88t88u88v8@8q88r88s88t88u88v8@8q88r88s88t88u88v8@8q88r88s88t88u88v8@8q88r88s88t88u88v8@8q88r88s88t88u88v8Q`J6a0@a,Q`:6a @a@a@aQ`"6aQ`8q88r88s88t88u88v8@8q88r88s88t88u88v8@8q88r88s88t88u88v8@8q88r88s88t88u88v8@8q88r88s88t88u88v8@8q88r88s88t88u88v8@8q88r88s88t88u88v8@8q88r88s88t88u88v8Nu eg~ eg g` eg g`d g|`&6(8(8(8(8(8(8Q`x6(8(8(8(8(8(8@(8(8(8(8(8(8Q`$6(8(8(8(8(8(8@(8(8(8(8(8(8@(8(8(8(8(8(8Q`ݪ6(8(8(8(8(8(8@(8(8(8(8(8(8@(8(8(8(8(8(8@(8(8(8(8(8(8Qf` 6(8(8(8(8(8(8@(8(8(8(8(8(8@(8(8(8(8(8(8@(8(8(8(8(8(8@(8(8(8(8(8(8Q@`D6(8(8(8(8(8(8@(8(8(8(8(8(8@(8(8(8(8(8(8@(8(8(8(8(8(8@(8(8(8(8(8(8@(8(8(8(8(8(8Q`X6(8(8(8(8(8(8@(8(8(8(8(8(8@(8(8(8(8(8(8@(8(8(8(8(8(8@(8(8(8(8(8(8@(8(8(8(8(8(8@(8(8(8(8(8(8Q`F6a0@a,Q`66a @a@a@aQ`6aQ`(8(8(8(8(8(8@(8(8(8(8(8(8@(8(8(8(8(8(8@(8(8(8(8(8(8@(8(8(8(8(8(8@(8(8(8(8(8(8@(8(8(8(8(8(8@(8(8(8(8(8(8Nu egt ezg g~` eg g ` g`J6(88q8(88r8(88s8(88t8(88u8(88v8Q`N6(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8Qj`ײ6(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8Q `6(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8Q`՜6(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8Q`"6(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8QB`^6(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8Q`P6a0@a,Q`@6a @a@a@aQ`(6aQ`(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8@(88q8(88r8(88s8(88t8(88u8(88v8NuL>NuH o"o /aLNuHC*a(a&a$a"arv2JXf g g`+&2t4 eg2 eg g` eg g`x gL`688888RQ`688888@88888Q`P688888@88888@88888RQ`688888@88888@88888@88888Q`688888@88888@88888@88888@88888RQ`,688888@88888@88888@88888@88888@88888Qz`688888@88888@88888@88888@88888@88888@88888RQb`6a0@a,Q`6a @a@a@aQ`6aQ`88888@88888@88888@88888@88888@88888@88888@88888Nu2z:t4 gd eg. eg g` eg g`t gL`638587898;8Q`638587898;8@38587898;8Q`p638587898;8@38587898;8@38587898;8Q`&638587898;8@38587898;8@38587898;8@38587898;8Q`638587898;8@38587898;8@38587898;8@38587898;8@38587898;8Q`P638587898;8@38587898;8@38587898;8@38587898;8@38587898;8@38587898;8Qz`638587898;8@38587898;8@38587898;8@38587898;8@38587898;8@38587898;8@38587898;8Qd`"6a0@a,Q`6a @a@a@aQ`6aQ`38587898;8@38587898;8@38587898;8@38587898;8@38587898;8@38587898;8@38587898;8@38587898;8Nu eg. eg g` eg g`t gL`6#8%8'8)8+8Q`6#8%8'8)8+8@#8%8'8)8+8Q`6#8%8'8)8+8@#8%8'8)8+8@#8%8'8)8+8Q`b6#8%8'8)8+8@#8%8'8)8+8@#8%8'8)8+8@#8%8'8)8+8Q`6#8%8'8)8+8@#8%8'8)8+8@#8%8'8)8+8@#8%8'8)8+8@#8%8'8)8+8Q`6#8%8'8)8+8@#8%8'8)8+8@#8%8'8)8+8@#8%8'8)8+8@#8%8'8)8+8@#8%8'8)8+8Qz`6#8%8'8)8+8@#8%8'8)8+8@#8%8'8)8+8@#8%8'8)8+8@#8%8'8)8+8@#8%8'8)8+8@#8%8'8)8+8Qd`^6a0@a,Q`N6a @a@a@aQ`66aQ`*#8%8'8)8+8@#8%8'8)8+8@#8%8'8)8+8@#8%8'8)8+8@#8%8'8)8+8@#8%8'8)8+8@#8%8'8)8+8@#8%8'8)8+8Nu eg eg* g` eg$ g` g`*6#838%858'878)898+8;8Q`6#838%858'878)898+8;8@#838%858'878)898+8;8Q`6#838%858'878)898+8;8@#838%858'878)898+8;8@#838%858'878)898+8;8Q`$6#838%858'878)898+8;8@#838%858'878)898+8;8@#838%858'878)898+8;8@#838%858'878)898+8;8QV`t6#838%858'878)898+8;8@#838%858'878)898+8;8@#838%858'878)898+8;8@#838%858'878)898+8;8@#838%858'878)898+8;8Q,`6#838%858'878)898+8;8@#838%858'878)898+8;8@#838%858'878)898+8;8@#838%858'878)898+8;8@#838%858'878)898+8;8@#838%858'878)898+8;8Q`6#838%858'878)898+8;8@#838%858'878)898+8;8@#838%858'878)898+8;8@#838%858'878)898+8;8@#838%858'878)898+8;8@#838%858'878)898+8;8@#838%858'878)898+8;8Q`h6a0@a,Q`X6a @a@a@aQ`@6aQ`4#838%858'878)898+8;8@#838%858'878)898+8;8@#838%858'878)898+8;8@#838%858'878)898+8;8@#838%858'878)898+8;8@#838%858'878)898+8;8@#838%858'878)898+8;8@#838%858'878)898+8;8Nu g g@`2t4 eg eg g` eg gj` gl`"61828384858RQ`b61828384858@1828384858Q`61828384858@1828384858@1828384858RQ`61828384858@1828384858@1828384858@1828384858Q~`(61828384858@1828384858@1828384858@1828384858@1828384858RQ\`~61828384858@1828384858@1828384858@1828384858@1828384858@1828384858Q>`61828384858@1828384858@1828384858@1828384858@1828384858@1828384858@1828384858RQ`6a0@a,Q`6a @a@a@aQ`6aQ`1828384858@1828384858@1828384858@1828384858@1828384858@1828384858@1828384858@1828384858Nu2z:t4 g2d Z eg eg g` eg gf` gj` 68q88r88s88t88u8Q`68q88r88s88t88u8@8q88r88s88t88u8Q`68q88r88s88t88u8@8q88r88s88t88u8@8q88r88s88t88u8Q`j68q88r88s88t88u8@8q88r88s88t88u8@8q88r88s88t88u8@8q88r88s88t88u8Q~`68q88r88s88t88u8@8q88r88s88t88u8@8q88r88s88t88u8@8q88r88s88t88u8@8q88r88s88t88u8Q^`:68q88r88s88t88u8@8q88r88s88t88u8@8q88r88s88t88u8@8q88r88s88t88u8@8q88r88s88t88u8@8q88r88s88t88u8Q>`r68q88r88s88t88u8@8q88r88s88t88u8@8q88r88s88t88u8@8q88r88s88t88u8@8q88r88s88t88u8@8q88r88s88t88u8@8q88r88s88t88u8Q`6a0@a,Q`z6a @a@a@aQ`b6aQ`V8q88r88s88t88u8@8q88r88s88t88u8@8q88r88s88t88u8@8q88r88s88t88u8@8q88r88s88t88u8@8q88r88s88t88u8@8q88r88s88t88u8@8q88r88s88t88u8Nu eg eg g` eg gf` gj` 6(8(8(8(8(8Q`6(8(8(8(8(8@(8(8(8(8(8Q`6(8(8(8(8(8@(8(8(8(8(8@(8(8(8(8(8Q`>6(8(8(8(8(8@(8(8(8(8(8@(8(8(8(8(8@(8(8(8(8(8Q~`6(8(8(8(8(8@(8(8(8(8(8@(8(8(8(8(8@(8(8(8(8(8@(8(8(8(8(8Q^`6(8(8(8(8(8@(8(8(8(8(8@(8(8(8(8(8@(8(8(8(8(8@(8(8(8(8(8@(8(8(8(8(8Q>`F6(8(8(8(8(8@(8(8(8(8(8@(8(8(8(8(8@(8(8(8(8(8@(8(8(8(8(8@(8(8(8(8(8@(8(8(8(8(8Q`^6a0@a,Q`N6a @a@a@aQ`66aQ`*(8(8(8(8(8@(8(8(8(8(8@(8(8(8(8(8@(8(8(8(8(8@(8(8(8(8(8@(8(8(8(8(8@(8(8(8(8(8@(8(8(8(8(8Nu egx e*gZ g.`B eg g` g`>6(88q8(88r8(88s8(88t8(88u8Q`ݢ6(88q8(88r8(88s8(88t8(88u8@(88q8(88r8(88s8(88t8(88u8Q`6(88q8(88r8(88s8(88t8(88u8@(88q8(88r8(88s8(88t8(88u8@(88q8(88r8(88s8(88t8(88u8QD`\6(88q8(88r8(88s8(88t8(88u8@(88q8(88r8(88s8(88t8(88u8@(88q8(88r8(88s8(88t8(88u8@(88q8(88r8(88s8(88t8(88u8Q`\6(88q8(88r8(88s8(88t8(88u8@(88q8(88r8(88s8(88t8(88u8@(88q8(88r8(88s8(88t8(88u8@(88q8(88r8(88s8(88t8(88u8@(88q8(88r8(88s8(88t8(88u8Q`6(88q8(88r8(88s8(88t8(88u8@(88q8(88r8(88s8(88t8(88u8@(88q8(88r8(88s8(88t8(88u8@(88q8(88r8(88s8(88t8(88u8@(88q8(88r8(88s8(88t8(88u8@(88q8(88r8(88s8(88t8(88u8Q`آ6(88q8(88r8(88s8(88t8(88u8@(88q8(88r8(88s8(88t8(88u8@(88q8(88r8(88s8(88t8(88u8@(88q8(88r8(88s8(88t8(88u8@(88q8(88r8(88s8(88t8(88u8@(88q8(88r8(88s8(88t8(88u8@( ??penxClosexReadxWritexInputxOutputSeekDeleteFileRenameLockUnLockDupLockExamineExNextInfoCreateDirCurrentDirIoErr|CreateProcvxExitpLoadSegjUnLoadSegdGetPacket^QueuePacketXDeviceProcRSetCommentLSetProtectionFDateStamp@Delay:WaitForChar4ParentDir.IsInteractive(Execute"pervisorExitIntrScheduleRescheduleSwitchDispatchExceptionInitCodeInitStruct MakeLibrary MakeFunctions FindResident InitResident DebugDisableEnableForbid|PermitvSetSRpSuperStatejUserStatedSetIntVector^ AddIntServerX RemIntServerR CauseL AllocateF Deallocate@ AllocMem:AllocAbs4 FreeMem. AvailMem(AllocEntry" FreeEntry Insert AddHead AddTail Remove RemHead RemTail Enqueue FindName AddTask RemTask FindTask SetTaskPri SetSignalSetExceptxWaitSignal AllocSignalFreeSignalAllocTrapFreeTrapAddPort RemPort PutMsg GetMsg ReplyMsg WaitPort FindPortz AddLibraryt RemLibraryn OldOpenLibraryh CloseLibraryb SetFunction\ SumLibraryV AddDeviceP RemDeviceJ OpenDeviceD  CloseDevice> DoIO8 SendIO2 CheckIO, WaitIO& AbortIO AddResource RemResource OpenResource RawIOInitRawMayGetCharRawPutCharRawDoFmt GetCCTypeOfMem Procure Vacate OpenLibrary InitSemaphore ObtainSemaphore ReleaseSemaphore AttemptSemaphore ObtainSemaphoreList ReleaseSemaphoreList FindSemaphore AddSemaphore RemSemaphore SumKickDataAddMemList CopyMem CopyMemQuick tBitMap   BltTemplate  ClearEOL ClearScreen TextLength Text SetFont OpenFont CloseFont AskSoftStyle SetSoftStyle AddBob AddVSprite DoCollision DrawGList InitGels InitMasks RemIBob| RemVSpritev SetCollisionp SortGListj AddAnimObd Animate^ GetGBuffersX InitGMasksR DrawEllipseL AreaEllipseF LoadRGB4@ InitRastPort: InitVPort4 MrgCop. MakeVPort( LoadView" WaitBlitSetRast Move Draw AreaMove AreaDraw AreaEnd WaitTOFQBlit InitArea SetRGB4 QBSBlit BltClear RectFill BltPattern ReadPixel WritePixel Flood PolyDraw  SetAPen SetBPen SetDrMd InitView CBump CMove CWait VBeamPosInitBitMapz ScrollRastert WaitBOVPn GetSpriteh FreeSpritebChangeSprite\ MoveSpriteV SyncSBitMapD CopySBitMap> OwnBlitter8DisownBlitter2InitTmpRas, AskFont& AddFont RemFont AllocRasterFreeRaster AndRectRegion OrRectRegion NewRegionClearRectRegion ClearRegion DisposeRegion FreeVPortCopLists FreeCopList ClipBlit  XorRectRegion FreeCprList GetColorMapFreeColorMap GetRGB4 ScrollVPort UCopperListInit FreeGBuffers BltBitMapRastPort  OrRegionRegion XorRegionRegion AndRegionRegion SetRGB4CM BltMaskBitMapRastPort   GraphicsReserved1~GraphicsReserved2xM - LoadACBM REM - by Carolyn Scheppner CBM 04/86 REM - Modified for PAL/NTSC 07/87 REM - NOTE: Only PAL ACBMs will be REM - displayed in a PAL height REM - screen. PAL ACBM's contain REM - a PAL screenheight in their REM - BMHD pageHeight field REM - This program loads an ACBM file REM - (Amiga Contiguous BitMap) REM - into a custom screen/window REM - using DOS library calls REM - REM - Note that the only special chunk REM - handled by this loader is the REM - CCRT Graphicraft color cycling REM - chunk. The loader is an IFF REM - chunk-oriented loader and REM - can be easily modified to REM - handle additional chunks. REM - Requires exec, graphics and dos REM - .bmaps (Use new ConvertFD) REM REM - Format of ACBM file: REM - LONG "FORM" REM - LONG size of rest of file REM - LONG "ACBM" (form type) REM REM - LONG "BMHD" (std IFF BitMap header) REM - LONG size of BMHD chunk = 20 REM - UWORD w (bitmap width in pixels) REM - UWORD h (bitmap height) REM - WORD x (nw corner) = 0 REM - WORD y (nw corner) = 0 REM - UBYTE nPlanes REM - UBYTE masking = 0 REM - UBYTE compression = 0 REM - UBYTE pad1 = 0 REM - UWORD transparentColor = 0 REM - UBYTE xAspect (pixel) = 10 REM - UBYTE yAspect (pixel) = 11 REM - WORD pageWidth (screen width in pixels) REM - WORD pageHeight (screen height in pixels) REM REM - LONG "CMAP" (std IFF ColorMap chunk) REM - LONG size of CMAP chunk REM - UBYTE Sets of 3 UBYTES (red, green, blue) REM - (2^nPlanes sets) REM - (rgb values LEFT justified in each UBYTE) REM REM - LONG "CAMG" (Amiga ViewPort Modes) REM - LONG size of CAMG chunk REM - LONG ViewModes REM REM - LONG "CCRT" (Graphicraft color cycle info) REM - WORD direction (1,-1, or 0 = none) REM - UBYTE start (low cycle reg) REM - UBYTE end (high cycle reg) REM - LONG seconds (cycle time) REM - LONG microseconds (cycle time) REM - WORD pad = 0 REM REM - LONG "ABIT" (Amiga BitPlanes) REM - LONG size of ABIT chunk REM - BitPlanes 0 thru nPlanes - 1 REM - (each is h * (w/8) bytes) Main: PRINT "LoadACBM - ACBM pic file loader" PRINT PRINT " This program loads and displays an ACBM pic file." PRINT "ACBM pic files can be loaded more quickly than ILBMs." PRINT "IFF ILBM pic files can be converted to ACBM format" PRINT "with the LoadILBM-SaveACBM program." PRINT DIM bPlane&(5), cTabWork%(32), cTabSave%(32) REM - Functions from dos.library DECLARE FUNCTION xOpen& LIBRARY DECLARE FUNCTION xRead& LIBRARY DECLARE FUNCTION xWrite& LIBRARY REM - xClose returns no value REM - Functions from exec.library DECLARE FUNCTION AllocMem&() LIBRARY REM - FreeMem returns no value PRINT:PRINT "Looking for bmaps ... "; LIBRARY "dos.library" LIBRARY "exec.library" LIBRARY "graphics.library" PRINT "found them." PRINT:PRINT "ENTER FILESPEC:" PRINT "( Note: You can create an ACBM file with LoadILBM-SaveACBM )" PRINT GetNames: INPUT " ACBM filespec";ACBMname$ IF (ACBMname$ = "") GOTO Mcleanup2 PRINT REM - Load the ACBM pic loadError$ = "" GOSUB LoadACBM IF loadError$ <> "" THEN GOTO Mcleanup REM - Demo Graphicraft color cycling IF foundCCRT AND ccrtDir% THEN REM - Save colors FOR kk = 0 TO nColors% -1 cTabSave%(kk) = PEEKW(colorTab&+(kk*2)) cTabWork%(kk) = cTabSave%(kk) NEXT REM - Cycle colors FOR kk = 0 TO 80 IF ccrtDir% = 1 THEN GOSUB Fcycle ELSE GOSUB Bcycle END IF CALL LoadRGB4&(sViewPort&,VARPTR(cTabWork%(0)),nColors%) REM - Delays approximated FOR de1 = 0 TO ccrtSecs& * 3000 FOR de2 = 0 TO ccrtMics& / 500 NEXT NEXT NEXT REM - Restore colors CALL LoadRGB4&(sViewPort&,VARPTR(cTabSave%(0)),nColors%) END IF Mcleanup: FOR de = 1 TO 20000:NEXT WINDOW CLOSE 2 SCREEN CLOSE 2 Mcleanup2: LIBRARY CLOSE IF loadError$ <> "" THEN PRINT loadError$ END Bcycle: 'Backward color cycle cTemp% = cTabWork%(ccrtEnd%) FOR jj = ccrtEnd%-1 TO ccrtStart% STEP -1 cTabWork%(jj+1) = cTabWork%(jj) NEXT cTabWork%(ccrtStart%) = cTemp% RETURN Fcycle: 'Forward color cycle cTemp% = cTabWork%(ccrtStart%) FOR jj = ccrtStart%+1 TO ccrtEnd% cTabWork%(jj-1) = cTabWork%(jj) NEXT cTabWork%(ccrtEnd%) = cTemp% RETURN LoadACBM: REM - Requires the following variables REM - to have been initialized: REM - ACBMname$ (ACBM filespec) REM - init variables f$ = ACBMname$ fHandle& = 0 mybuf& = 0 foundBMHD = 0 foundCMAP = 0 foundCamg = 0 foundCCRT = 0 foundABIT = 0 REM - From include/libraries/dos.h REM - MODE_NEWFILE = 1006 REM - MODE_OLDFILE = 1005 filename$ = f$ + CHR$(0) fHandle& = xOpen&(SADD(filename$),1005) IF fHandle& = 0 THEN loadError$ = "Can't open/find pic file" GOTO Lcleanup END IF REM - Alloc ram for work buffers ClearPublic& = 65537& mybufsize& = 360 mybuf& = AllocMem&(mybufsize&,ClearPublic&) IF mybuf& = 0 THEN loadError$ = "Can't alloc buffer" GOTO Lcleanup END IF inbuf& = mybuf& cbuf& = mybuf& + 120 ctab& = mybuf& + 240 REM - Should read FORMnnnnACBM rLen& = xRead&(fHandle&,inbuf&,12) tt$ = "" FOR kk = 8 TO 11 tt% = PEEK(inbuf& + kk) tt$ = tt$ + CHR$(tt%) NEXT IF tt$ <> "ACBM" THEN loadError$ = "Not an ACBM pic file" GOTO Lcleanup END IF REM - Read ACBM chunks ChunkLoop: REM - Get Chunk name/length rLen& = xRead&(fHandle&,inbuf&,8) icLen& = PEEKL(inbuf& + 4) tt$ = "" FOR kk = 0 TO 3 tt% = PEEK(inbuf& + kk) tt$ = tt$ + CHR$(tt%) NEXT IF tt$ = "BMHD" THEN 'BitMap header foundBMHD = 1 rLen& = xRead&(fHandle&,inbuf&,icLen&) iWidth% = PEEKW(inbuf&) iHeight% = PEEKW(inbuf& + 2) iDepth% = PEEK(inbuf& + 8) iCompr% = PEEK(inbuf& + 10) scrWidth% = PEEKW(inbuf& + 16) scrHeight% = PEEKW(inbuf& + 18) iRowBytes% = iWidth% /8 scrRowBytes% = scrWidth% / 8 nColors% = 2^(iDepth%) REM - Enough free ram to display ? AvailRam& = FRE(-1) NeededRam& = ((scrWidth%/8)*scrHeight%*(iDepth%+1))+5000 IF AvailRam& < NeededRam& THEN loadError$ = "Not enough free ram." GOTO Lcleanup END IF hires& = &H8000 lace& = &H4 kk = 1 IF foundCamg THEN IF (camgModes& AND hires&) THEN kk = kk+1 IF (camgModes& AND lace&) THEN kk = kk+2 ELSE IF scrWidth% >= 640 THEN kk = kk + 1 IF scrHeight% >= 400 THEN kk = kk + 2 END IF SCREEN 2,scrWidth%,scrHeight%,iDepth%,kk WINDOW 2,"LoadACBM",,7,2 REM - Get addresses of structures GOSUB GetScrAddrs REM - Black out screen CALL LoadRGB4&(sViewPort&,ctab&,nColors%) ELSEIF tt$ = "CMAP" THEN 'ColorMap foundCMAP = 1 rLen& = xRead&(fHandle&,cbuf&,icLen&) REM - Build Color Table FOR kk = 0 TO nColors% - 1 red% = PEEK(cbuf&+(kk*3)) gre% = PEEK(cbuf&+(kk*3)+1) blu% = PEEK(cbuf&+(kk*3)+2) regTemp% = (red%*16)+(gre%)+(blu%/16) POKEW(ctab&+(2*kk)),regTemp% NEXT ELSEIF tt$ = "CAMG" THEN 'Amiga ViewPort Modes foundCamg = 1 rLen& = xRead&(fHandle&,inbuf&,icLen&) camgModes& = PEEKL(inbuf&) ELSEIF tt$ = "CCRT" THEN 'Graphicraft color cycle info foundCCRT = 1 rLen& = xRead&(fHandle&,inbuf&,icLen&) ccrtDir% = PEEKW(inbuf&) ccrtStart% = PEEK(inbuf& + 2) ccrtEnd% = PEEK(inbuf& + 3) ccrtSecs& = PEEKL(inbuf& + 4) ccrtMics& = PEEKL(inbuf& + 8) ELSEIF tt$ = "ABIT" THEN 'Contiguous BitMap foundABIT = 1 REM - This only handles full size BitMaps, not brushes REM - Very fast - reads in entire BitPlanes plSize& = (scrWidth%/8) * scrHeight% FOR pp = 0 TO iDepth% -1 rLen& = xRead&(fHandle&,bPlane&(pp),plSize&) NEXT ELSE REM - Reading unknown chunk FOR kk = 1 TO icLen& rLen& = xRead&(fHandle&,inbuf&,1) NEXT REM - If odd length, read 1 more byte IF (icLen& OR 1) = icLen& THEN rLen& = xRead&(fHandle&,inbuf&,1) END IF END IF REM - Done if got all chunks IF foundBMHD AND foundCMAP AND foundABIT THEN GOTO GoodLoad END IF REM - Good read, get next chunk IF rLen& > 0 THEN GOTO ChunkLoop IF rLen& < 0 THEN 'Read error loadError$ = "Read error" GOTO Lcleanup END IF REM - rLen& = 0 means EOF IF (foundBMHD=0) OR (foundABIT=0) OR (foundCMAP=0) THEN loadError$ = "Needed ILBM chunks not found" GOTO Lcleanup END IF GoodLoad: loadError$ ="" REM Load proper Colors IF foundCMAP THEN CALL LoadRGB4&(sViewPort&,ctab&,nColors%) END IF Lcleanup: IF fHandle& <> 0 THEN CALL xClose&(fHandle&) IF mybuf& <> 0 THEN CALL FreeMem&(mybuf&,mybufsize&) RETURN GetScrAddrs: REM - Get addresses of screen structures sWindow& = WINDOW(7) sScreen& = PEEKL(sWindow& + 46) sViewPort& = sScreen& + 44 sRastPort& = sScreen& + 84 sColorMap& = PEEKL(sViewPort& + 4) colorTab& = PEEKL(sColorMap& + 4) sBitMap& = PEEKL(sRastPort& + 4) REM - Get screen parameters scrWidth% = PEEKW(sScreen& + 12) scrHeight% = PEEKW(sScreen& + 14) scrDepth% = PEEK(sBitMap& + 5) nColors% = 2^scrDepth% REM - Get addresses of Bit Planes FOR kk = 0 TO scrDepth% - 1 bPlane&(kk) = PEEKL(sBitMap&+8+(kk*4)) NEXT RETURN @ --- Music - Amiga BASIC Sound/Graphics demo --- 20-July-85    :       :     ()    :1:See if user closed window with go-away-box ()      ,  ,     ( ,  )  () () ( ) <! ( )!( )!!" ! ,,,  :$(!,)(,!), :&(,!)(!,), :$(!,)(,!), :"(,!)(!,),  :: --- Array VO contains the default octave for a voice   ()() ()   :    ##()   $ $"x"   ($) ($,($,,))  8   #(),#,!,: ##(),   : "()()"    :# or -"()'   8 :1 through 8###()"   x :< or >()()"()  :ln   ($,($,,))#()##()  ##()  (   #(),#,!,     :C --- F#() contains frequencies for notes in the diatonic scale+ --- octave 0, note A = F#(12) = 55 Hz  #(X)$$# (@;)(@) % X( #(%) ($# %@()  %% --- Build fundamental wave form+ --- Controls the quality of the sound &()   &()  D:These DATA statements were created with the following formulaA:Reading these is much faster than executing SIN 1024 times: K#=2*3.14159265/256: FOR I=0 TO 255I: Timbre(I)=31*(SIN(I*K#)+SIN(2*I*K#)+SIN(3*I*K#)+SIN(4*I*K#)): NEXT IB 0, 8, 15, 23, 30, 37, 44, 51, 57, 63, 69, 74, 79, 83, 87, 91G 93, 96, 98, 99, 100, 100, 100, 99, 98, 97, 95, 92, 89, 86, 83, 79D 75, 71, 66, 62, 57, 52, 48, 43, 39, 34, 30, 25, 21, 18, 14, 114 8, 5, 3, 0,-1,-3,-4,-5,-5,-6,-6,-5,-5,-4,-3,-1> 0, 2, 3, 5, 7, 9, 11, 13, 15, 17, 18, 20, 21, 23, 24, 25D 26, 26, 27, 27, 27, 27, 27, 26, 25, 24, 23, 22, 20, 18, 17, 159 13, 11, 9, 7, 5, 3, 1,-1,-3,-5,-6,-8,-9,-10,-11,-12? -12,-13,-13,-13,-13,-13,-12,-11,-11,-10,-8,-7,-6,-4,-3,-2= 0, 2, 3, 4, 6, 7, 8, 10, 11, 11, 12, 13, 13, 13, 13, 139 12, 12, 11, 10, 9, 8, 6, 5, 3, 1,-1,-3,-5,-7,-9,-11E -13,-15,-17,-18,-20,-22,-23,-24,-25,-26,-27,-27,-27,-27,-27,-26@ -26,-25,-24,-23,-21,-20,-18,-17,-15,-13,-11,-9,-7,-5,-3,-24 0, 1, 3, 4, 5, 5, 6, 6, 5, 5, 4, 3, 1, 0,-3,-5D -8,-11,-14,-18,-21,-25,-30,-34,-39,-43,-48,-52,-57,-62,-66,-71H -75,-79,-83,-86,-89,-92,-95,-97,-98,-99,-100,-100,-100,-99,-98,-96D -93,-91,-87,-83,-79,-74,-69,-63,-57,-51,-44,-37,-30,-23,-15,-8  ,&  ,&  ,&  ,& ! d9 --- Array CF maps MML commands to frequency indices $ "cdefgabp#-123468<>l" "()   "()  2 0,2,4,5,7,9,11,0,1,-1, 0,0,0,0,0,0, -12,12,08 --- Array CT# maps MML commands to duration values ##()   ##()  B --- p1,p2,p3,p4,p6,p8 correspond to 36.4 ... 4.55 time unitsH 0,0,0,0,0,0,0,0,0,0, 36.4,18.2,12.133333,9.1,6.0666667,4.55, 0,0,0C --- 1st 4 numbers are the default octave for each voice (0-7)E --- ln changes the duration for subsequent notes in this voice.A --- l1 = full note, l2 = half note, l4 = quarter notes etc.0 --- > increments the octave for this voice0 --- < decrements the octave for this voice& --- a through g plays that note.7 --- They may be followed by # (sharp) or -(flat).> --- They may also be followed by a digit which specifies% --- the duration for that note.$ --- p causes a pause, or rest.: 1,3,3,32 l2g>ge, l2p2de, l2p2l6g3f#g3a, l6p6gab>dcced* ec, a>dc, e3f#g3de3cdedcf#, a3>da3ga3f#, f#gadf#a>ce, d3f#g3f#g3a, bgab>dcced) ed, geced, a3f#g3ec, e>dcg6d3gb3>dg3d, gb>dgdd" g>f#e, dc f#ed, agf#, a1b, d1d ef#g, gag, bag, c1d3d6, al6d3ef#3g, l6adef#aga>cp3d6d3d6, f#3a6f#3d6d6, a3>cccdcced* be, gdcdcdcge, b>de, dg3f#g3a, gbab>dcced* ec, a>dc, e3f#g3de3cdedcf#, a3>f#a3ga3f#, f#gadf#a>ce, d3f#g3f#g3a, bgab>dcced) ed, geced, a3f#g3ec, e>dcf#e, dc, l2g1g f#ed, agf#, d1d, a1b ef#g, gag, c1d3d, al6d3ef#3g, l6ddef#aga>cd6d3d6, f#3af#3dd, a3>cccc, bgab>dcced$ be, gdcdcc8dcge, l2b>de, l6g3dg3f#g3a, gbab>dcced* ec, a>dc, e3f#g3de3cdedcf#, a3>da3ga3f#, f#gadf#a>ce, d3f#g3f#g3a, bgab>dcced) ed, geced, a3f#g3ec, e>dcg6f#3e6, dp3g6d3e6, gb3>dg3dgdc#& dca4g4f4e4, ea, >c1c, a>cce, aag#, c8d8dcdfd, ef#, al6a3g#a3b, a>cceddfe+ cfe, afc, >c3c3c, dd#e, df#e, a3g#a3f#d, fedcab, cl2c1d, a>ceap3l2d$ >ccag, e1e, l6ecdegfgb-a( fdg, df#g, dd4e8f8d, a>ccc3d, a>ccd6, gp3d6d3d6, c3c3d3ge, dde, l2b1>c, bgab>dcced$ ec, a>dc, ccdedcd3d, l6a3c#d3ef#3g, f#def#aga>cd6d3d6, f#3af#3dd, a3>cccc, bgab>dcced$ be, gdcdcc8dcg6d3g6, gl6dg3d, gb>dgda0 g1g2, dp3g6e3c6, d3b>c2, fddedd6e6, c3cda6f#3d6, a2a3f#d3f#, >ccge, dde, g3dg3f#g3a, bgab>dcced* ec, a>dcdedcf#, a3>da3ga3f#, f#gadf#a>ce, d3f#g3f#g3a, bgab>dcced) ed, gec, e>dcqRy}}6:<qRy}}6B>oqIrxg|C0591bIrxg|C034dRM`PANIMFORM ILBMBMHD@ @CMAP`p@@@@@P@PP`pЀp`P@DPPSnh@ZDRNGH$  CRNG$DPAN= CAMGBODY ٻ٪u٪٪@ٿU٪وwU٪ٻDU٪٪w٪U٪"QQٮUU٪٪٪UUU٪"٪U٪*U٪"U٪U٪ٻ٪٪DDDٻUUU٪٪٪٪UUUU٪uuuيٻ٪w٪٪U٪وwU٪ٺEU٪"٪w٪U٪"UU٪٪٪UUU٪"٪]٪٪T٫ U٪U٪ٻ٪Q٪وDDDDٻUUUU٪ييييuUUUU٪UUUU٪ٿ٪w٪D٪U٪وwU٪٪UU٪"ٮ٪U٪"UU٪٪٪UUU٪*٪٪٪DٻU٪U٪ٻ٪U٪يDDDٻUUU٪وووwUUU٪UUU٪٪w٪E٪"U٪وwU٪٪UU٪"٪U٪"UU٪٢٢]UU٪UU٪٫٪٪DٻU٪ٮQU٪QٮU٪U٪ۈw~UZ۪U۪UUZUZ۪UۮuQZUZ۪UۻDB"URUURުJk*)TURUURުJwURUURުJ" D۵UUR"$JWP ?FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORMILBMANHD(@DLTA@s#{X! VFORMILBMANHD(@DLTA@s#{X! VFORMILBMANHD(@DLTA@z1J2wK0J1ppJFORMILBMANHD(@DLTA@z1J2wK0J1ppJFORMILBMANHD(@DLTA@quܟuc !FORMILBMANHD(@DLTA@quܟuc !FORMILBMANHD(@DLTA@pwt``puFORMILBMANHD(@DLTA@pwt``puFORMILBMANHD(@DLTA@pw}v,08̄FORMILBMANHD(@DLTA@pw}v,08̄FORMILBMANHD(@DLTA@wff` 9 0`@ddFORMILBMANHD(@DLTA@wff` 9 0`@ddFORMILBMANHD(@DLTA@zgu޿v  `s `@`sFORMILBMANHD(@DLTA@zgu޿v  `s `@`sFORMILBMANHD(@DLTA@n uC"4f€qFORMILBMANHD(@DLTA@n uC"4f€qFORMILBMANHD(@DLTA@w$[$gX#\$v4bVFORMILBMANHD(@DLTA@w$[$gX#\$v4bVFORMILBMANHD(@DLTA@wͭwx  t tFORMILBMANHD(@DLTA@wͭwx  t tFORMILBMANHD(@DLTA@vkhedFORMILBMANHD(@DLTA@vkhedFORMILBMANHD(@DLTA@wuxy  0 rsFORMILBMANHD(@DLTA@wuxy  0 rsFORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM ILBMANHD(@DLTA@N\FORMDILBMANHD(@DLTA@^v~~~~?~?~???~~~~~~FORMILBMANHD(@DLTA@S}U}U}U}}U}~UUy??UyjyUU*yyyyUUyyʀyy**y<y++y??y**yy{yyUUy~~~UUy?yyUUyyyyUUyyʀyy**y<y++y??y**yy{yyUUy~~~UUy?yyUUyyyyUUyyʀyy**y<y++y??y**yy{yyUUy~~~UUy?yyUUyyyy~}|՟y??yTT~~}<ySS{{|yUUyOOy{SSy}**y~~~y|yyyyFORMILBMANHD(@DLTA@5vXwsWU UsUs*ݏ!Tsn~:~v*\ws5UUsIs+Us**sQ*@osO  J s Ηp\v?Us*vUsUJ*s<={k}:~*yStU@gs*7spsᪿ; u_߯\tt ssUss~ϕs~sUs<s+s?s*srus~sUs=}{{}~~xtUs??sr￿;t߂sssUss~ϕs~sUs<s+s?s*srus~sUs=}{{}~~xtUs??sr￿;t߂sssUss~ϕs~sUs<s+s?s*srus~sUs=}{{}~~xtUs??sr￿;t߂srsC#rrЪ>>s~s!~~r<s# S{ssUsOru??Ys~r*s<|xx|~~xsrsDTt?srFORM ILBMANHD(@DLTA L@Yjih-*ڕŠbUsUl_ Mr٪ Ul)UuUl?/oS T)$>"Tlp]uT*lOWW*QRT Ult\tTIlJK GRUlRժՀbRqT*l{k\%Q*lO MJ Jl5JeZ% ?Wo?o;*w*jUlUlU*DU?;UJl\*4)*T*q)T~NU!QR}V"k lT"kqU_mTWMJtj@zlWOۿ*w*wl@_s۫l"l??W}~l~lWUl<l NOSl*?lxx;8*lOl%Zm ok~lFߊUlPf~oV}Vl?llߝl Sk߿ll߿?w?l s۫l}?l??}~l~lUl<lSl?l{{*ll m ok~l?ߊUl澼~o~~}Vl?llߝl߿ll߿?w?l s۫l}?l??}~l~lUl<lSl?l{{*ll m ok~l?ߊUl澼~o~~}Vl?llߝl߿l{l߿?wl#Snn??>l~l!o<l '{{nlxx88UlOl m ?il ~o*l><~oDl ?nlTl ?ll?wFORMILBMANHD(@DLTA@/) {jKsTp*U(ZU5 Dc5p]u*pUDcr~(HQ:!UDcߢv]u@T|:*TDcRN?J Dc8:w*] UAJbP(TUDcj@KbR ADc[ ՂV`JBRUDc5%RVJ"i?p[qQ@!*DcC Ee!J@DcpH5J5JuZ%  g -݊*U***`TUDcH*w]uUDcp\uZ+7U@Dc}r^@"hp[JR.TR P* DcTU***d w]u d v] DcJ5YIJ*Ph;? *U*(%xdGR`@l>zjJ? r{?pW dJwd_~~EdOW}*d+?d8>_OUd ߇<d OWd?'R5c:8*d ߅OoOdH5 %ZdRߟ oUd ?~d)bߟUdYwPfʅP**d?_???dj dd ɴ)Sc ?_>}{{dߚR_?j?r{p?{Q?dwd}d}*d d8>??Ud <d Z Wd?oc *d o dj7Jd oUd ?~d?ߟUd澼fպ~~*d ??d dd֋~c ??<}{d?_?jOv{?p?dwd~~}d}*d ?d8>Ud ߄<dWdc?*d d dߟ oUd ?~d?ߟUd}w澼f~~*d??d  dd߿~c ?߾}{{d߿?_?j>v{p?d?SedT>d d 8>??Af <d 'e ??c88 UdOd d ?d ?~e *d><<>fDUd ??e eZd ?c ??><|xdj?rFORM "ILBMANHD(@DLTA@YdW` T_w]uU @?P]w]uU U]w R,T]w]uU O`w]uU jK'P]w]uU U)]w]uU R#T]w]uU VU]w]uU %E]w]uU ?Q#]w]uU e]w]uU 5 ]w]uU \  `w]uU UB]w]uU}U]w]uU" ~] O_U" `w]uU U!P]w]u+]w] @!O]wQ?^`a_ 豈] ]  *~^ ] Щ] 8?J] ة]  U] "] X] j] 5] *_^   ު] ] ] ]  ` a ܧ] ]  (ݠ] ^aa_ Y]  \  ?] ?] ] 8 ?] ] ]   ] {] ] J] ]   ] ] ] ~]  ?_ a ] ]  =] ^?`a_ ]  \  ?~] ?] ] 8?] ] ]   ] {] ] ] ]   ] ] }] ~]  _ a ] ]  =] ^aa_ ] ]  ?] ?] ] 8 ?] ] ] ] x] ] ] ?]  ] ] <] ]  ?_a ] ]  <] ^?`FORM&ILBMANHD(@DLTA @;y {w]uU$H w]uUD TPSիPII w"D *?L w]uU"D ūH w "D >I?[Hw]uU"D TT~UրI ]uU"D UCGH w]uU"D TH w]uU"D K'EMIH uU"o⪪IO;K w]uU"D P@*Hw]uU"D MOOˏHw]uU"T?RZJHI w]uUD @DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@FORM|ILBMANHD(@DLTA@RMJILBMBMHD8 @CMAP`ЀАp``P@00` @0P`࠰p`P@0 GRAB`CRNG$CAMG@BODY|#<<@@@  @@ @@ @@ @@? @@ ?@ @ ???????????????????x?? ?  ? ??    @ ?????? ? ??@ ? ?     ?@        @  @     @? @   @@~@ RMILBMBMHD@ @CMAP`Ѐ`pp` P P 000@@@PPP```pppDPPSnh@ZXttCRNG$CAMG@BODY~π~π π π π π π π     σ σ Ϗ Ϗ Ϗ Ϗ ϟ ϟ ϟ ϟ ϟ ϟ ϟ ϟ ϟ ϟ ϟ ϟ ϟ ϟϟϟϟϟϟϟϟϟϟϟ ϟ ϟ Ϗ Ϗ Ϗ Ϗ σ σ?~?~? ? ? ? ? ? >~ >~ > > >#}π>q>x>#}π>q>x>#}߇>>>#}߇>>>#}??>#}??>"߀ߟ?Ϗ?~>"߀ߟ?Ϗ?~%>|<|ϏϏ?χ>>%>|<|ϏϏ?χ>>%?<|ϏϏ>χ>>%?<|ϏϏ>χ>>%?ϏϏ>>>%?ϏϏ>>>?}ϏϏ>>>?}ϏϏ>>>?}ϏϏ>>>?}ϏϏ>>>>~?|}ϏϏ>>>>~?|}ϏϏ>>>>|}Ϗ>>>>|}Ϗ>>>>|!?Ϗ>?>>>|!?Ϗ>?>>>|?ϏϏ>>>|?ϏϏ>>>|!?ϏϏ>>>>|!?ϏϏ>>>>|!ϏϏ>>>>|!ϏϏ>>>>#~߀Ϗ>Ϗ>>>#~߀Ϗ>Ϗ>>>ߏ>>>>ߏ>>>>?>>>>?>>>%><π>>>>%><π>>>>ππ ><| ><| ~} ~}   ߟ?~ߏ ߟ?~ߏ >>~ >>~ >>| >>| >>| >>| ?| ?| ?| ?| ?| ?| ϟ>|π ϟ>|π>|>|>>|>>| Ϗ>>| Ϗ>>| Ϗ>>| Ϗ>>| ߟ?~|ߏ ߟ?~|ߏ|||| ǟ|Ǐ ǟ|Ǐ | | | | | | | | | | | |||||||Ͽ|߀Ͽ|߀Ϗ|ϏϏ|ϏϏϏϏϏϏϏϏϏϏϏϏϏϏϏϏϏϏϏϏϏϏ?Ϗ?ϏϏϏϏϏϏϏϏϏϏϏϏϏϏϏϏϏϏ||||RM8ILBMBMHD@ @CMAP`Ѐ`pp` P P 000@@@PPP```pppDPPSnh@Z>>|?>>|?>>?>>?>>?>>?>>?>>??>>~?>>~ϟ>>>ϟ>>>ϟ>>>ϟ>>>ϟ>>>ϟ>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>??>>>??>>>>>>>>>?>>>?>>>?>>>?>>>?>>>?>>>>>~>>>~>??>??>??>??>??>??>???>???>||||||||||||}|?}|? }|߀ }|߀}|}||>|>|><||><||><||><||||}|}|}|}|}?|?|}?|?|}>||}>||?|||?|||?||?||?<>|||?<>|||?<>|||?<>|||>>~|>>~|||?||?||x<|?|x<|?RMILBMBMHD@ @CMAP`Ѐ`pp` P P 000@@@PPP```pppDPPSnh@ZHppCRNG$CAMG@BODY?>?>??????>~|ߟ>~|ߟ>|Ϗ>|Ϗ>|Ϗ>|Ϗ>|Ϗ>|Ϗ>|Ϗ>|Ϗ>|π>|π>|π>|π?ϟ?ϟ?ϟ?ϟ?ϟ?ϟ?|ϟ?|ϟ>~|Ϗ>~|Ϗ>|Ϗ>|Ϗ>|Ϗ>|Ϗ>|Ϗ>|Ϗ>|Ϗ>|Ϗ>|ߟ>|ߟ>>>>>>>}|>}| |?π |?π |π |π |π |π |π |π ?|| ?||||}σ|}σ|}Ϗ}}Ϗ}}Ϗ}Ϗ?~}ϟ?~~?~}ϟ?~~>| ϟ>>||>| ϟ>>||>>||ϟ>>||>>||ϟ>>||>>||Ϗ>>||>>||Ϗ>>||>>||Ϗ?||>>||Ϗ?||>>||χ?||>>||χ?||?>>||σ?||?>>||σ?||>| ρ>||>| ρ>||>| π~>||>| π~>||>|π>|>|π>|>| Ϟ>>||>| Ϟ>>||>| Ϟ>>||>| Ϟ>>||?~||ϟ?~||?~||ϟ?~||||Ϗ||||Ϗ||||Ϗ||||Ϗ||||σ||||σ||?>|?>|?>?|?>?|?>?|?>?|>|>|>~|>~|?>|||?>|||?>||||?>||||?>||||?>||||=>||||=>||||=>||||=>||||}>||||}>||||}>||}>||}>||}>||xǀ>||xǀ>||xǀ?>||xǀ?>||>||>||χ>||χ>||χχ>||χχ>||χχ>||χχ>||χχ>||χχ>||Ϗ>~|Ϗ>~|}㏏|}㏏|}㏏?|}㏏?|}㏏?||}㏏?||㏟||㏟|| > > >? >? >? >? >? >? >> >> >> >>>>x>>x>>>>>?>?>Ϗ?~>Ϗ?~>>χ>>>>χ>>>>χ>>>>χ>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>?>>>>?>> >>> >>>>>>>>>>>>>>>>>>>>>Ϗ>>>>Ϗ>>>>>>>>>>>>>>>>>>>>>>>>>>RM"bILBMBMHD@ @CMAP`Ѐ`pp` P P 000@@@PPP```pppDPPSnh@ZttCRNG$CAMG@BODY!@?|>?|>?|?>?|?>?|??|??|??|?>~|??~>~|??~>>|?>>>>|?>>>>|?>>>|?>>>|?>>>|?>>>|?>>>|?>>>|?>>>>|?>>>>|?>>>>|?>>>>|?>~>>|?>~>>|?>~>>|?>~>>|?>~>>|?>~>>|>>~>>|>>~>>|>>>>>|>>>>>|>>>>>|>>>>>|>>>>>|>>>>>|>>>>>|>>>>>|>>>>>|>>>>~|>??~>>~|>??~>?|Ϗ>??>?|Ϗ>??>?|Ϗ>?>?|Ϗ>?>?|Ϗ>>?|Ϗ>>?|9χ>>?|9χ>>??????????????~?~?|>|>|~|~|||||||||||||||||||?|?|?|?||||||~~???p?p8>p8>p??      ? ?   #>?8<#>?8<#>߇y~#>߇y~#>#>"~||ߟߟ"~||ߟߟ%>>||ϏϏ%>>||ϏϏ%>||ϏϏ%>||ϏϏ%~||Ϗ%~||Ϗ>?>?>>?>?>>π>π>!π>!π>!Ϗ>!Ϗ>!ϏϏ>!ϏϏ>!ϏϏ>!ϏϏ#?~ߟߟ#?~ߟߟ??ǿǿ??~~?>|?>|?>?|?>?|?>?|?>?|>|>|>~|>~|?>|||?>|||?>||||?>||||?>||||?>||||=>||||=>||||=>||||=>||||}>||||}>||||}>||}>||}>||}>||xǀ>||xǀ>||xǀ?>||xǀ?>||>||>||χ>||χ>||χχ>||χχ>||χχ>||χχ>||χχ>||χχ>||Ϗ>~|Ϗ>~|}㏏|}㏏|}㏏?|}㏏?|}㏏?||}㏏?||㏟||㏟|| > > >? >? >? >? >? >? >> >> >> >>>>x>>x>>>>>?>?>Ϗ?~>Ϗ?~>>χ>>>>χ>>>>χ>>>>χ>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>?>>>>?>> >>> >>>>>>>>>>>>>>>>>>>>>Ϗ>>>>Ϗ>>>>>>>>>>>>>>>>>>>>>>>>>>RMlILBMBMHD@ @CMAP`Ѐ`pp` P P 000@@@PPP```pppDPPSnh@ZVVCRNG$CAMG@BODYJ??????? ????????????????σσσσπ|π|π||π||π||π||π||π||π||π||π||π||||πππ|π|π||π||π||π||π||π||π||π||π||π||||||||||σ||σ||?σ|>?σ|> ?? ?? ?? ?? ?? ?? ?? ?? ?> ?> > > > > > > {> {>{>{> ? ? ? ? ? ? ? ?>>>> > > > > > > > > > > > > > > > > > > > > > RM&ILBMBMHD@ @CMAP`Ѐ`pp` P P 000@@@PPP```pppDPPSnh@Z*ffCRNG$CAMG@BODY `7?|?`????????<???????????????>?|???????????????????? o? ? ?#??$?$??">?"~>??"?|???"??> ? 0p< ??p| ??x ??? ???? ??? ?? ???? ?????????<??8??8 ?p p ??                                                    M2 STAT &+* * # <8  O;'*%&)( $  2 ")( 1 #($  =46,5()  '&#"'1'&&&6:    /!'"4")"/&$")<'4        &!'"5")#/&$') :4      #)#"..$#4+%)) 8    /)#"..$#4+%%*:'      *#&'0+%!6+%.*<;5   )('#'%&6$'*;=6    /('#'%&6$'*8'=6   ()("6+")*'*;>6     /)("6+")*'*8'>6     #!+"6+")*'*27?#   /+"6+")*'*8'?#    ,... '*6>@9  /   #"'&  #"'(38=#''))  +."$5=>A=  0499- 555- 421) 311) 311) 311):9 68*1 "(048;>CK&399<  & "% 0>030| 201|     `s0 p| ? ? ?? ? @c0 ~ ?>?? ??? ?>???? ??? 0@@? ~?? ~?? ~???? ~?? 0`@? ? ? ? ?? 0`@? ? ? ? ? 0 0 o o o o @00ggg?g  0p'''' 0`080h8`0x0dp&`????? 0&6?????????@06?6? ??? ??? ?? ??? ?@?0 ? ???? ?0 > ?`0 >  ? ? ? ? ~?p0 ?` ϟ? ϟ? ϟ? ϟ? ϟ?  ?0` ǟ? ǟ? ǟ? ǟ? ǟ`8 ?0` ? ? ? ? 0`p xp? ?? ?? ? ??  @ xp.?? ?? ?? ? ?? ` @ p ? 8 ?  8 ~ @@? w`G^? 88 8? 8 88 ~`@@? `g 8? 8? 8? 8? 8`@? G?>` ??x1 ??x1 ??x1 ??x1 ?x1@@> sx> ??xq ??xq ??xq ??xq?x1 @>{x>N? ?ys? ?ys? ?ys ?ys???yq~>??s??s??s?s??s0~>?s?s?s?s??s~>?x~??x~??x~?x~??8|?`< ~?~?~?~?|?0a<?x??x??x??x??x?0<@~?@~?@~?@~?@~?<<?????8 <8 ??????<8????? @88P0Ox>0Ox>0Ox>0Op>0?pxp @ >p>p>p>p>pppp /?}|?>/?}|?>>/?}|?>?`X`<?ț?|?>?ț?|?>?ț?|?>>?ț?|?>X7dx_ں/|?~_ں/|?~_ں/|?~~_ں/|?~PA@%E_ں|~_ں|~_ں|~~_ں|~PA@%EP_״?_״?_״??_״?A@(KPO // // // // @C@h  O ?_|-k_ ?_|-k_ ?_|-k_ ?_|-k_ Ҕ ?.}=k_ ?.}=k_ ?.}=k_ ?.}=k_  ”` ?_>]}]__ ?_>]}]__ ?_>]}]__  ?_>]}]__ @>^]}_>^]}_>^]}_>^]}_&= @߀x]&x]&x]&x]&qG} [.[.[.[.GFy` `x ~&x ~&x ~&x ~&:MF px6:;~g_x6:;~g_x6:;~g_x6:;~g_z#ā@ sf:z^gu_f:z^gu_f:z^gu_f:z^gu_g A f:zŀu0_f:zŀu0_f:zŀu0_f:zŀu0_G cA: Ϡx`xx`xx`xx`xJB CC2Mox-|=ox-|=ox-|=ox-|= r I@x |=x |=x |=x |=  Y@]{}=]{}=]{}=]{}=4 2 0 P@{<{<{<{<,& 00 P@b;s b;s b;s b;s FČdG4b@`8p3C`8p3C`8p3C`8p3C@GǏG0xapw85xapw85xapw85xapw85G0xapo8exapo8exapo8exapo8e04x?lx?lx?lx?l@  0 <4xx3<3:8<2lZ2>)j5 K R]8%F@@ +4ZQ82lx#xƿ!.ƾH  A%#MB 9&  5B:8 52:R 33>ADS     adWM42-HG&%:( T]P L +B*'&&[]HU.3U)#)/ _`QW44V*&*0^^P94 [+(3`R : ]+(1 *f  3 g  1d  1f  3Qd' O f( R 4fL 0dL>fL& <dL& < f?-- 6 dJ + < d - fiP04'PQ /2 ((ʾPT 7'( IT 7"(HU 7 "(DT 7!(ьLV Q(`5Z` S.n6 Xa پU/n6 U` ھQ.l5 V݈] 0پQرӑj5'݄jPȔiW'߀]LŒ^L!߄]Lǔ]K-&߄]L`L /&]O]K ,&[^ -F^  ,F` ߢ-Fݵ^ ߣ.BմزӘ^ 喐-XشՙYα +ԮWW ز[V̰ 햐 ӬXV ̴YSԳ׮߈XR ʰ[U ߄[T ʱ]S߇\R̺İ`X1^N,\X 1VL!)V] VN )X\$!L 7#X4߱+$ /#$2!#( 2 !") &8 #"( >~6cm /8wy98{}=8{{<8y{:89+)+'+()4/ 8486898<8:, $2 33898:8<2$+#%$%$*G)UA+4 Q*D  LT3"@>:'0TK3-gqp!+E  >#"J)KA$$ 2?84 3/8L00:>@  Z+Q4&T )O%R 'TO' 'L %d%/J) Q+)ZG+T] Rg VY TXUD-_>/E ZC8O- Y'E'Q/ "\'E''Q- "pZ&O,X- Z- Ur-8WC3Q-"YE'Q-"ZC&O, XC&Q\"Z\'Q- &6W *N '[4-)Q & QU X+ ,+++++++++++++@ +* +iI^ 2$-n W 5 '+ p+X 5+[B٬X + +V(]*F#֛-#r[]6F+/ۢ/[$ C,0  2]iڹI,% 4  - b20d-O ,$2 e 281I ,&  607$0  ,', , +T< W/+ T ;  1I/ Q  ' - C  W W (X Z +^W ,W -+Z+, r[  8+*  o,ǯL 6$& p+ 5 6K$  K R%% O-W P%&     I     H E!P$   X  +(   Z  O H& -Z P * 0,ZO P, 2 &,, PR  0'6 X% PP, ,C(%P!,T, )b! 5N)O (+4  HOXR$ ' B,[ #!TO &J2 ,[C ,K Z!)* "J  > %IB>$  " E =!%T>( A(Z *S  @'aEQ@'\ CR  4'1E^ 'a%/-kC*7 S/Hv( :9^+D-  [)T -   aZR .*   1 X * 7 Z ,