'=========================================================================== ' Subject: SINUS SCREEN Date: 07-22-97 (10:17) ' Author: Davey W. Taylor Code: QB, QBasic, PDS ' Origin: audio.squad@mailbox.swipnet.se Packet: GRAPHICS.ABC '=========================================================================== DEFINT A-Z:DIM SHARED K,S,B&,Z&:V1 'Created by PostIt! 7.2 SUB V1:OPEN "O",1,"SIN-SCRN.ZIP",4^6:Z&=11507:?STRING$(50,177); U"%up()%9%%%#-%_hTlGeB'rG6).%%5/%%%1%%%%xn%sRxh%wsSgIfxd%*:v7Oz:EWTy)QFg1[jB0f?2Czs>%L<2L&\ME4rkYuXX'Kb7E1 U";;bNtfImmGkgcLJ$,%NiQj'Y$W.h;'LV0fiht8UUU/;LYKW?k=0u63jXW7Ot:S8 U"xNe.u(4a9K&nGf>8M/Flm_Q:$pXS1vXn4^1X5vQ^^ap24,RA+eXH$i:u.Q44q?C U"c;]9]QZ5)#$+wLecR/:6VY&DAhfUOlb2_/OLL9m/7?)GW^a5]J6'uu6oq>Li6p? U">g5,0&SlY04q]W5_$$)GXFB_B_m_bSYLHCFYR%lW[*F)BBHjiSB=Wd_Y6Bp[ur8 U"Kb.qcnJED/FGqIUw6K8-x-LPX9F\88lk)Xbd29q*3Rg]/8bFHky-7(;BqAs/O(\ U"?qU[_KQ(P:[c3t7m(t0;SPYnUh>fk2Iv?7^3U$*I(ac2ix4d-$v)e&aq\c0O9Hd1U/^[H/ U"nj2HrGn/YUEvgz>.;%laX5Dw8E?5.x14XsmN4Uhl.jjr5p[2N=ci?]qKD_]+p2F U"w(FfD#-Js]tKBd#A5*4('E]eBrFA;MtMZRW;xfKHSGy.E#(M/&SOm];VZ_P1?lF U"Z03#\oE*;]yBMS U"=j9Ruud[#M9]7P8ciLIhYn^Ctq1Mo%sMLv/4t[GlK^:N&8rfngt4 U"M>?Wa'$eIN/6c3naE_/E^?1[w9Hwlq8LGQq+cj\b.w'91FW]1_g+I,02Z%t8Q0d U"Uybcj4&?%0(1._EKxNh+:_qz+j>WSZ-=rZ\H9%Ku^? U"-X%:dR5-%pcv>UhL10?ZDJkru\Y&Z.*F&cOm(pJXQm+_,5vgK(&LW.86f9mm&'2 U"/)rJlrp]ToN7#hofH?>ll&ql-g4>S]*qIz;\SqqUi?CfAZFT]Q%:iUuF7*Ku2iG U"Qy'Ql2ie&=Jnz[QR3_A^NIPN8A4KddJSPDa79T^zDj.60ks-q7lGZe7YU(>FoI' U"uTrFspkrpqq'4Q3$*lNmoEdc.4(x2(&\9xnZ399b=FkAuLdg49:SrXDug3vHI+M U"c\E]AlA:zgQ7=9O/ij%#\TR(f'=UIp\>)&+_31(RM[Y8,0[j>3Y15ofq'XX?F-W-+Iq[xLGFkY:$-58j'* U"Mu'P4ej_GM+F>Ugil]]J:NI,fN2OWg\S,Kdkv#s9j98zduUpQ]p1BLOA<_U28Bb U"91S,rLqf1Q')dnD%TZQC3cn]bH^nQrS+e7#B5gQUdKQK.*DI&?R5u(BwX5uqrq6 U"Lo%[Q+?gHVf72?C-YxP(Zuyqf*W3/-b7*ACWx+&.NBbS4_,Yrb%?##5_9cV:<,C U"NfR]HlfjZUEoWitXFUjU2t>&JQI#$%[Hc2yd>ZB]t/)A[>gPuG<1krBFM0X'epg U"g??,)+fR[5%+=U;nAQJzNhhX2mNu] U"=fhRH(MfL;L;Y5waE'WVNMZJ0HIB)q7%Me*f]6[FKze:=uaKgR(DpI\wn7ed6sR U".XPwNn9ukVKJawP1bg+VIrJYgN-;+h1JFWaOkZCqlFE*gw1AJBn[QYDbf1rUs/1 U"pkjYqdAb<]0nX^C_Js9-dUcC*C5PJz^R/\l\5-1Mu]a7Ld-J/CmWQqhJ]xw^hso U"baSkqPuU2M[Vy>-FJXDaglFWfOm6<[eC:,m%.0;R:a3b;7rUj]brR9Trtrlc)HFI&;Z8*Hub7^4WNB=I U"u,uJh].QpaA5=e;n8,jXzhBF*movwe?fn%n%&J7=7o=[DIeMxnFcJCD5VbxTpA5 U"U)()]CynKJu6ZAx/h6>C&Nrju3-sWJ*hO61%*4t0V3&q:F7l3OjQfK*82p5Xc.0 U"ntD66P4fiDe9NylOsHM5o2ie)&Y?3OcSt/PdDsbh8uicy,4bN U"*';ZgV4E?6sw,N/AR1d\:i%HwNu>ul5wcl#4Ehi?A%'t595rVkmS?f>SpJBRG(o U"hj7]D1vZ7mSr<dbNO)f-P'L5]u[D%#^O U"N1wD8W>7c)2j^s[Fgd$[McHO9O8o/.n_Hzf&I&THpDvhY4QhfE<$0Nc1_ U"O4QN[oDq:%f4ZMZlL4_J=bLP24n8-(nXOEdMF]fZ^t^.X'7l8vKKUz(tr3 U"?743>0k[Fb6%>oJY+(yOuSk4,:^x96Ne,5JP+$^iCwCUJR8e/6*?3NE%slt0PJ4gS/0nistu(F/:MtG%YV3Iiqs7YuKDUT0e#H,K30TRQEhYVKW5z U",;;,zF/Rf7SJ8rN5H)e)Q%Dt(6&.^C*is/2se)h&%(o)-l2>i%egeZt<$E\;eR[ U"r+3n'YL.7ipd5)2R6%q,j[M/.$B_H#A=6*g=aYbCuHB-ZS37AiFuO U"gjRQr/)?vI_0O[Z[](0nEFktHuZq1RaI7^O-n;adMp'KV$&BN8at*\AalSoRjE^ U"O%n.A__=q*-,_l;7Jq9s:T](UasuzqOfKvjl&oH]DPN&5=)*n5J1T-=6b1B>yg= U"v[AGg6G-c.zK.FabblNERjRFa%M6wm/U$F39+Wn[Rk**3BuCVR.pZN-K_e?$E17 U"')UTUn>%UN10OV]S/O?5=+b.I9=Ia)]bLECr&fR5#,;CcQKV/*M/6(KsaG#le?3 U"_bxlQP;&w:EAAwsJ?>R1dInOw4o&%FR1hR/7:BCG%Elw0<&fGv0S7$-D8S1lL75 U":dfo0QPcT^J-][MyK#vxjx08zoF1n9v)0-//:/^6)DD$)mv_]Z\RU_6QHq9K;.H4%GffPe_FHdD5o:WI8p3si(-QG/7gxS)G;+9qdIKloF5a( U"O:DfTQRoY#T0TK,QMP'WjET(PeZ*m3--C0#Kk+4$9 U"vZ#J'R7.hNy9&RMsu2$CUMlJ=OD#vm4rW&dBe.zQ^YXXvS7Y+licYESA#C^PNq: U"VkO=pSoST&iNb:(xv350'qU0V'L%v^vk8).^ubmWdpXvL(,Dna-mMYYA3_o0hU[ U"mS_aWKIq.4YM'MWAZ&>I]r]3:vOkKM]'9xIoC+Q2WT:2ZgZ0dPZV-/1Kpgw(3t\ U"Z[J[CvLh/zD#6TRx(^X'-$G&CY&GauShbKEK%:55T2:ZcV0G-%RHSIE>Pwbt;S%NAa)Djk8_; U"A&EfWm0'O=%uT;pG-;pf>Pk4:T&a'T9]'-19qDR U"&v.Q65A$x-IskK]3%%[('2Z9c<^C,3RHC'7S5R'WfXCM'IeYnJ+9+;IOSMUjp=U U"f1kHXYO[?2o\qmy#r^9D28'1S6Q[1OFIGO*7IU?TYGy:w7Rc>aQ9RNiLF/1y.%a U"0Xc0A,e':tf\wP]cW,;9b=J>g?[V+Y6#f'u*Rh3u+*1^IUyNXAV4J*?%H3-0#.GSl8oorWLX7_fhz<;f+>]?(9[FXjE7c]&1xB[uEJYX2j%]t., U"usQS#[Qo\'f/Su+2Qv%B&cv&)PwiIX=bqO'TiR(Rz;3vZ6.tEi(M0J$HisSDcDp U"'e=:cO:f*MsPT]wwgI7$mBakBfV2q[7_0Et=/ag+9D+inWH\K/O*)E(SAv-1u15 U"*O,E\K;2Q1]'()p#2OZO;.&BP\nRV-GTH.E4%eh U"v^uSE)eU)S.7.(SdAGDE+ujSE_:CI#v%b^*]EL]\7](lhvTE#pm[s)&#OCrYLU' U"ZWfa+,DQY18rl1XT7EYQ0s:KN.,DPES]HD#;O+9+ODH6r1\>C)pGaGCZQRY8%ca U"HNMzpBi+0HJTSC:=GCkzT/mfU+<9t(HHlNz:;EO9q0%0k]q%D3?ZP?LT\d:&-T- U"6CZ50o7aUCYjt8Y;FDFQ-k=#2\Ol)QI$y]*Z^YG[gQDuv=x_gdq;V;sGg=:SVeg U"JklxmXP/EaYt<7R6.ROpY,Y;fncs'jfOA=9QT%'(h(;U.TNHx0_)]Ow-;1^(;.9 U"/zrR.W2#;)+Oi:tfpA/lzz_a]Tv\cJNDHG(2fK?Zy[2)f4hOn0Qq#t7Z U"l8R^f?5.XgO-2=Pt:UR(3rytmLS,[Y#:Tc[5\Q>+s U"Y7Tfn[LM=%r0tgXX/4u,8hdmNr5?biB=%ElTpr;csRIPL-MHUv2'''ZBI_Nc:W< U"t:v2P(csP#DS^f_iN&ug[OU4ae>CMxHagI,.#X\Xq>.MF9m#M+5lzf%]nr?j7'T U"gb%uN>W(ow->>u$VjUNs,UkzlYZRVt?4&m1k)U+_s?V*sd*e5R$kLD8Hu(C*r6a U"'>HekW+3dfy4F1,M$)w;-ZdT&a0J&yNmN:Lu>%NV\K]etb%GfBI#:._5BRl1T]9C4l;[Ix)ZE1q;QtUS%(l6*6NH'^rDCL U":$]FBd%nZD*CIoNP%Nn/M8>py?IYBO2+\F>m]D:XNV7?io'kH(_$>DN3vj2=Cx# U"f'2f?TWOHndr^A+QOf5&nfI3pAXvnzk9:g&ZqF0Mr.BFCBVTVl+=i']HtDvcFwO U"e[7:Ih-SgXa#7A=Q]Fvp,/tvf2+N]Cu:JBZuy:w>%1dI=Fd/[*#o[As;H<<;J*F U"ojaR;Tu\ybYbaji^?'4*RW#-oXFngl'+f5e=.[usjDoguVp1vs(dY<>aqwJ?U&4 U"A(o1\#'0(PO[*#eTVq.8MlBod4qFLuc9DD5GJu&e-[4(3i7V4?HOq*bYf)MJJZd U"Pf'<.9H#c(8WhTk),.1QVP8exSj.*JnxY?)$svNS'QK^Xn(,/<5]M7Jd^Y$6+EV U"dle[ht^eo]fTUKx56S^1)\_Ho=hwuw1W:UB=U?jc[il7.]p>4\dHo&]:-zj9BbU U"bqCyKJ]1aj^MUNc?0LZa_4u4-=90+BiXdyMtxcu[?]7v2,H=oU38[[=tJWm66a' U"-QZR%HngmYpNWIJ64r2m&W<$;Wa+?q7mtJ0T.66Ntu+WH?Uwf#:kO&C7z]T:b)u U"KmHwv[tTfdPaP(Z1BkHn(n%EDd<E6I+I\otfOO>_q;Tv^ObYq.?PXrw^H]>U/s_dPehzk5oW*xY&MEwBq4J,d U"kVB*Lgzmd8u\K\86U6AZ4D\Ld_+s8#\cR-k;*J%g*RchAVQVj,*,ep->Zs9Z-&U(J>Tu,B'Dj^cT$uNmKlqZ-Q752nybhJ-n U"TiU13l5i.vff.WNl.6E]jp6PXO(GZIO5l0AOe&Gz1?&F9G/%p1):J^^Eig(>$Ng U"-?><55bs%t42SWIwXL5=0)PJ9(D[FM27Lmv>axThcayJd:_4a('?km5d00UG(]_ U"Fo^o5d:#(=e9n[M)uqs(=^L[1[RQK71+gZqKg.ZgD U"3C7CM3/O*0,2N[UC-6'')^\#qI&T18v6j^/Iu*Vpw(Ox)YrPp?saMqa^a?L.Rmp U"8-oeZ,Hh-]7TPlYK>Rm3HYs#5f<.-$m'X+fpe33E)rMz(jho'9'3jD?ECggqE>L=).F&vr1r33H$ U",G8l?>N1#.-0P.pe$Eef',R$9$ae'nVKst[h4#a=v8rg$ak=qa4tmd[oOR3ij:M U"/A#3d)0cR[fC7(>2;^iVDEPqv,c]hog?8z7Fyd2KGEYX_>)U,+h\V;[k=/RKP]D U"(N0FLO0A;:&FPXMI:-6WtLi^+dNp6$S%>dqm4'ROJkGl6Oz))aSK<)323FF-r]; U"+b:]m$miY0DauBL9=;q\Zn.AA U"BZC)CxT04L^spv>ceiHWD*=u0eYE,OG-6x+AV*/vm/dgQMBDmVx/f3,X_8qb<=+ U"eax_qhJD.+wR*NQjM^C%3QgDsR?zCEXz[49lzW/OPCScposh[iQD$J<&0^dPz8[k:))$U%+-Ytv'h U"+6xDf;M8AY0G+$kZ#/hB,S%&c-272B+_hHOMF,Z6$5Y0M_fO$kISV]:HTn0GCZ- U"_1)Q$[D^tvaAP5.;8.E4?b(+/6%=iC.&Ufm&4)&WSWwX%1.EWV^R47Bt4&W8yF0s*#t(md'R0G&y51m,dr+A^1 U"aEs#iJggzdi=$7V['YM8l#=a^ax6\#:+K+Uc)JsBC'8YaXuE%1V/O;,ATtah8'G U"#=Nxf#D^&FE(=&>*H=%=7e8,r^>q.Dd2LPo.mtJf^%er&UDi+fi5pem'[$m,d+D U"Ar6^Jv77zW+COQnxt>R%N7XpVejEV4K;c)6HV>JAp)7YnhzeD/1Y,&6r=ad07fe/x#hRS4O#WIR9ZgangECkU44\(')54pYlOCG)MAR U"lB1r*]_?57]7$Xt+asK--E U"L.:s&Q\EEaSA?q3tNLjaA=Spt#l_fRbDh<=/9j2G08B^EMk'$XkS&1K+l$;U1;D U"7k3+o=F'Dir&Pm%SH'k'69$_V>4*n&80atF' U"S6pA[gS]vEI:AoXT=0XeP%+YsI>9sert U"TtaA,3I,s%X$7XQR2oMAb0'8HnTChk)fjWjS39Ab^A+?f&(+]QStcc9$cj;3mRv U"2f&kcqe2Ckpb)p0ZaOsIk%go2z18:N'+i*$?>>AJNN-t)jA4bd:o[VBfC;G4BS% U"iQ^O4fpJCpX3rtTecRIYIh',;ZrW6^V6m8GCKhazkJqdQIyQ(lij2zBLm[Uf6.J_Lc?y=P.8Mw8(3S;B6ka U"ej/cm#Le=5Z+1uGh&a(LX;kKr5:^cbDd,u$w_fQ)q.4,5EJn/aCVIkQ%7Rw,/M2 U"p2es1-MvsG8;S._T:,T;<+8=m[aK[P(ZhR,E?F3p+ls7h:iRq.lu[(9xUSEHaWN U"146NBa3U\?\9(>mq/o?++$c5It&$$Pi\lqV5(U01j^9ZJxXv/9,^J$TBn>r)(wH U"%hr^nkGJ48H/a,\+JTpn-u>pKiOB^h#YDL%1JWJLBWYG*-E_S2%lu<9Wx;8mxolb)L^Eh1h2+>6s)aU-ANjnPZUqBV^*RxkKI&bU0(MdJ+1J6W:jv U"vPmokH^HAuU-k)7qMK$tC]5kBIufO(Lxji$WsY'P^Y\KdcJs^%FW4fwYw98cJ^6 U"C7I\;GnaAEw.nKXtJ6f^\v3Yd8$r_Dzih%?QAs/KdENqkBMK.eF-dNsmsCl,'si U"EJ.47^)HoKl=/_;-Wxs]o)gwNbJfH(+C+8n2bCJ2Sh1:g%.,S2-_Oeo#i[KG&s, U"s$N+i;rDnk^?ptloCn9bJNeoBg6Mq;oCk5Z+H0YM7^hF7oC%qKf=K;6Mstmtj#Xv;&TTKtiJg[ie.sMRCphbs[Gb9I^HkbPQ%Ny,a]8VdlJ# U"MuH=;Lnu;i];eaLMuWQr,IG:6wgqz/SPFDw^[sGE7w$6TtG,N[Ld%r9/Ak=p\'(VVmIUIm;?.Rk0KN+g.5H[C^(BTue8AkO\.BX2K6WM+wP/78osed.3 U"d/K*&r/+0D54,)Qj4UDXlE8TXoO,$E5hr,6_Qz49^e4x=?huiLgE;Bw>&Gx)pq6 U"wvj4gGq-gT1G5XfD$UMc_CIr8k=jvE2p0qrvC.y.E0)exxjsVXf]Wa8pdTT3am[ U"NMnYT$Roji?vS;7mg[; U"GSe:CN1S\myngn5vrr)=Fc6EUYo10*Se;,N2/0jU2*Bt4Eaw5)?3j;1geMC://K U"IM9o%hQZ6OnUIUGUz9FV_3=LFJFgjvVNRK>YfJtZEw5CHr1w1q68XHCg3i^&Jnkl=90M]tB U"2VC_e^44KHjRjj,6 U"RcqD5-UV$SYFH1,\oiEp6vTE0*Rqa-BRg>j+j?MOhe0MpS\2?Am.1L6Ij6?*2,L?W]+]45d+0cA1U>kL66+i U">1#X>In=1_zg4N;1jUqH62jpe&nfX.j*g82JH>NH5ZVBP2[:L U"Ql_TH&Don.eCgx0N-uPW_P:_L^[%StF^Nijbl6XiN2z<%a*d]D5Es?VLQ)apNVo U"^UNcP0&VE5Q'OLK^_Kh4GO1IUN?q4E4>i0Ummp_Seen.x.DeA6Ay?$T;\_.^-sN U"Ag'LEfl:+'90]leTN/O*Qeoju)XY1w'Aq0VL>cDR_LAcueEuA.XsB.)*l=9/HMjkkO\Tu10&SFC;c-aOmy3_G'q+O^4 U"o8&Yi$pH-lewJwl*P\;$+vD69\&kmoJasY.xjN,u)wq*%$-jVhp;WkZJhCr^q9/ U"*D4O0[R5glo;#=eGr9Q8Y)NPeA\OiFLs.re2<,H;g4BI'fAkK7VPR]09[Q60:T$ U"/8/A7_MPP#D:1NR=PV^4Y1>^->V.c:^<3V(?,DIOak8s'ub9sv]YsISD*AnRrA< U"554uF:U]bX)5X'm0AhBC$+W4x*F;UhJIXJZdjjB6&x'yXYl73ftQ8B'rtdyY?rZkqqJbVAFa_:=+o#RBKgu,Cs U"%4W&Zh6PGG]+^L#99^MF$Q5b#v].RDj,K,X#Y7y6+a U"[AYUw[6y=(ho;/)+ejA<+*-mF=#6r/CSH5lL$\((0Gg-a0axLbS_3T(?bK] U"9+[qsQD\Ph'caHe[A^.ZgFZ(U[9cU)S:6xMp#SISP\1):D:0_t2]jfDkE0GOCqc U"tsBplu]XRWpNxJW,5FIYCou6kIk9kN[7$?8viab=%Vv3[%m*-0Fz U"8JlT>+Q3:t*)9UMJO\%y+++tqpl];#]&%rXb8rx.KO0-;irB6+WEN%=%C2u1)aC U"oIVuLxD%=Dvm>A+Mfg7(PACr5i>UF$*5ePidniXd8]huxlan&%^P((U)N7/J->._AxP69b+t8PN/Xl,2mPpLc$ U"J(em16/)At9rF(mSsoR&wnqV&u+vhSR.l9SeQ=F=bpuG'OC3<164(iBL:-jjyL' U":Q96ixd3M U"TICKWD-6i0aXBT_Rs$-#2AqOG40cUI;J^,SF:?ro\&#)m-aCXU54p?QaOS%PC4ah[E6x3^UN,%up()%9%%%R-%rd]lGTY>9xr&%% U"%%(%%%1%%%%ht%ijRi&&ySu#fq2a+6ISVd1jR:<[9)=e[;R>J7V'[g;ZZNu>>>N U"B>4DM?s\hU,>_XoOO;Y5Q$2]PWe%)Gu/)gP$iE U"9kUF0i\k=70j:L9sq>ukzE6,c*NmS-0rJdi0G7VTZ U"A0nE;Fn4r\^gp<[>^DN\.2d0*K%g*H8:10ob?/<]c72QhS%/aFu=A85la:q/('G U"hno>Yh4?jHq7JQe0[zvx/0.rOWFNPgnLmn]J6>