'=========================================================================== ' Subject: HOT TRACKING ARROW WITH BEVEL Date: 09-29-99 (01:19) ' Author: Peter Scheutz Code: RAPIDQ ' Origin: scheutz@image.dk Packet: RAPIDQ.ABC '=========================================================================== ' Rapid-Q Component, hot tracking arrow with bevel ' To extract QARROW.ZIP, run this code under QBasic, or download DEPOST DEFINT A-Z:DIM SHARED K,S,B&,Z&:V1 'Created by PostIt! 7.2 SUB V1:OPEN "O",1,"QARROW.ZIP",4^6:Z&=3394:?STRING$(50,177); U"%up()%9%'%7-%;(mbL)S9HQN(.%%C0%%%3%I%%#0MAA>FLi4<>LS10BE&%pB\rk U"57Z4CxpSZo&a.b5SR0#c?eImOx%De3p]):^E+%h*V/tRO4t-dLbXLE-z;\y'<_Q U"d#CN?LV<%,/#i&r#k8^Bw&GmiSna9*q3=$+5m\g%C:&bt3r,tD==.?-KFm\ID]8?qR&b< U"vGZ;hP3whLU1b7YL0DRh;rvH-q-Jkmk+9=co,\kCqF^0I%e/:K<.UBBu$3j5)c8 U"M..,.uv+t5VhIlx9p.OPe+S%W*k4W*?\RVQ[KtK'.2=7;CsQv9eX=OY&_9(]Vk_ U"(Oru0e1upRwBhLM-8Mi2F::=D8ZPkovFAaAe=IU)&7i?:wVYZWmqZ06aw/\Gb,, U"XJl.CFv7)$(E/S4Gx;>es7-3c\bwZY-EoNj*uz=r^1E8YeBYx/m'tg(0OjyU>gk U"RPT)Z(;uskvq8iLE.4wc_c)Dt%1PN5v9Gi%):xH+domUltB]r4(>W:J\VL0M4C/ U"c%d0*YaI(MRRpcR7%HI^n^_XtCB U"[-)H\a3BY&R6UqA[C$o+Z?=?e0mpBNKecQ4RlEO=gOa58=Zv#6-B7KFi,o;m(qB U"e5>/3w)1XqbIr%#fZ;R/dE6dX0n'L/E]e34eJV6:bT)HHwKXn_(Ar=U8%,%%b%D%%/#%%%#M0A U"A>JFS10kBN(h&>?l8]wApw7Dkaz)Pe5edo#*6^o]2.et);\(Y>dS?)96^Y=bfmY U";PMa47O87FsC(2XcWf-p&145]r1UrZ2#_5R&R7.Uw/; U"H61,G+mefL=PkM9JiK3MWQ.w.uG,kFxKY4'lGcMB.m/Z)C2e)&g=LAZ;EP117o& U"3r/4l>e_6E_&kI=]-c%R9W,/M1X6qZQUR:v_$$:ixe)k5LDQX)\A;wrudG-E*h8 U"w0>1HxfZ_U*n,myX+L1p[kbP*[hC*VE'huVE\9XzgOIEktcF:+rAl:wTjzj-(-N U"RZo*56&TM]B>'Hw+oRqzDw\-\6_N2Ahd?pZ\R/<1GK&]9Vn4._'?k;la6',Ff?2 U"EjHTGjbM$'Hn3vh(GiEGx[//kC-*6ex(-VlCk=&6lScE]?^.pQ1Y5xAEM6PK.QJ U"\p_VLSXkpDY%GG1z6uYS6kZ#t'3gm\YhINA_Pe=Au/zqAqA=Yd;(lrC6U<;?AWJ U"[F63+f%ix9t[2^vU8p5CL_[MS[r97A:2,xvU^dc-AaJkC^FD5gvi%L\e0YZ$eWv U"o_BUW1lVWCWeC/&BO)>[=mMxhM9'7/PHW/tbm*ZG8P63RQt4 U"Vl7i2R5[Uf8C7>E20r1\1+%oUVp5G98pnQ$la4Zt6tJ6 U"0O2nb)xr*1?fqPxRJVK=p*XA4\>ncFWUJkek54?';?S>wZqq4z.6S3:YT^ku(R U",C\)*t?^(Yt-G3>rJnjog>e[8141h??G9mO;/I^U'6/=qK%'wC)UoW8bEC+cuZ0 U"jn?6\a'u^kFn>/I:tp8ot6f.rangO;ji-GSVzD7d\8;ulo7)nXzTo$Y\,K$zhu> U"Lo/SJJjfeaU(f*tLTa7_uI\8nrzXkD&=6->akDP>;O4Z:[qkzO.B-Rt8V&Z_SZp U"eOGTX<#LyTxOR/?2PKv0&UwGPsmf$cCHRvCasAbBF_xmk1F\\.+Rj'T6T.k$p'* U"C8jUunT-Tm(3:Cf%ZHbzjwEb?#M*^.b+VgZuj6Yh4mamL3M>1%n:Ikh*t71e::oo/R: U"%IOmouJ.9y#.k2n$Gq2$/0TpB#e#z\w%ggeQpX5>uoJa0todKTvd/U0wjE[vtzQ U"Lwp(VT1N%s2K:N;>j4UijR^:I>bGei^a/n)b'>8^VNv9,ekC<$eW_dIK4&]$q'x>-% U"#zK^EMMQ#FyG'q<[fgI#nO)]pS0>:2u?NtCXzMN$[.XgxPf_#(R7lo'-[?/=>f1 U"Nvda4ccx%rBzUV3w;>W\(Ti&Nh\]p74jm4Gab&=H8kC'?;ljC334cDV=u[=\ic& U"IUM.#boVVkWT7'WF<)2'4>kdk,pWF3Dd=<]%qh7/(;E=mr=m(J#oHRQ-lY2Z8-i U"XXoP4L:ufX74I0VWF90V>/wQHibVamu'Zp>M=hB6go7Q/ba,GVF[30/NizeIJmK U")U(3w5&vaHkLxfwri0tS&zb/xXT6+TZRKl$uwqiXX;ih.Y*IZnlE\8/NVidvomh U"^Ut*>5:p[XU4>P[BDT84(;EcKfN_ZPvA8Jl_J#ov^4Edg-J>iGNZ5bW^dsJ$mK0 U"K;gMF$JDqSqW>;r%nO>*k5BDZg4UZ2WL$BgImRsnwC^x:jDn/N6GRZ=4\fVF_v? U"sr-au?I>XJ0G\x/PftjmgWx;hvT(x=nMm+]U<\Vttef4rtN=EFJ#p+O)sWvkW6D U"8JMr5ypYYjdpl)MvUt?]J]zJ6uk3Ww7/;ZG6-v9rXwIj[o5h4fh_Udb5Gd/3 U"oe5TbtjIAak$\v.AvLi-/$Xmf,Qb4E&Edbb'r(up%()9%%'%-%'o5$L-;2'\&9% U"%%'/%%%%/%%%%vfww(t&Sn%shxt7QOCTb&ATC+qFPnsQBEHZ,[^A-op037vmE4? U"AHEP9jx)Z#e8/&')Zi88Az)Z#g8/%o)Z_^H[^wV&'v1YFc.=0PI*.M1v=13>aZ> U"C'rJm+X<4]fK$Fh)Nea(kMgcbi)1:1%%up&'%9%9%%'%-%';(bL?)SHQ'N(%%&C U"0%%%3%%%%%%%%%&%E%*/P%%I%%#0MAA>FLi4<>LS10B%up&'%9%9%%'%-%'+'bL U"iO#&X'>,%%%bD%%%/%%%%%%%%%&%E%*/P&)I%%#0MAA>FLS10B%up&'%9%9%%'% U"-%'o5$L-;2'\&9%%%'/%%%%/%%%%%%%%%&%E%