'=========================================================================== ' Subject: GRAPHICAL USER INTERFACE V1.1 Date: 05-02-97 (22:28) ' Author: Denny R. VandenBerg Code: QB, PDS ' Origin: dennyv@juno.com Packet: GRAPHICS.ABC '=========================================================================== DEFINT A-Z:DIM SHARED K,S,B&,Z&:V1 'Created by PostIt! 7.2 SUB V1:OPEN "O",1,"TGUI.ZIP",4^6:Z&=12628:?STRING$(50,177); U"%up()%9%%%%-%gYAMG?x+$tN)%%%%-%%%,%#%%]'%]Sks[yrz6&9Il5%SIXs1+8 U"lZ\7^^Im(Y/RMjo(PH19T?KBj\3]S/+,uJ3:f;$cd&-5Z*s%A$:1.-K9[#a3k-: U"[a+hQJWOV^C&zpMk+rlqiy'wQc0*_tw3rl3_=Dx[zh$U%d2z>:g?>)LKT2-E1Q9 U"=%7:3e#MJ%UcZbCfm,u_e]EM=gM&FFzutZidu2ctw=bpAvwSmE0&<&%< U"4Ik<(0h8/C_,2JW).IvN0Wc99zTNwECCO)lZq.Q0>^3Oy1$ U"RY#Q-1-o&j^&Xa]TAecoUJ(PDLB_lgE:k%T;,0-91]j^I*&d7IVc4BA/(+KoY_' U"/H/Ve\k:Tjfdif5SM)pa&q8qU2/MoR1&C-0C6k;2oN#KsFDJ3o7+P%+ U"\4l,JAF$I])cT-S^a#C;vymFeN*LV]^I<3ug)%I&J)eAnZ'Bq5A2'UQoxMif5uK U"eXCxijRa87oqK,,Rh;9Zr5JXJ4T6VGgOCTXD36nLgT(v7uknb/S/Rw U"zT1Qx,8U,HhE:0Vu/x/f+?_)U:Xxhp^%t U":>jjv?UGN'%A->rH\2duDSa%brGEok]-^)Xhe+$=/uSNwX2)lPPect1'irFjq5] U"vPcx]u?Dj1g,IX5nF5$-uF5EmUDn4,[nHfFmkSrTT4iZ4^Zs.9a7wV$dT=?mXVc U"2d6M^dgnJk[tGFq(9^Nh_8dvwA?fjv^H&,C4cO\_dT>MH5brvUs%pNUSur\n\OT U"jkuTnF[W+VWVT]/#7jUr^mkBaUv+YQju#;.Cep\Ah(?[W2EBUYO%vTF(H. U"r[wXc#]dYOa$]_Bd3,_qI?,?\YKGl6G?GAmhzb#7Qa3qzhh=8u#c]_I2hS^DFat23Q5R,7NmAQIWDo U"07JYQ1UWGIj9$b.XiIB8O*?TZmmxbd:(4oM3^-maq+25QYD58aSiE<8As5?D]%G U"7aQnB-V7lsxy[t>+eul_6IxQcNzYqFOqmZ>oPzg<&v*Z]-4)G>4R\8dkS&&7q9L U"qo1Jq+nPbF.V72SgysI#$*,Q/9[\ZW#bbr2gH.+6VKH._ikV>6+ha'e8T*o$#J) U"cQp4QZTPR:/M)nB_Gtbbm6tF8up\;]21P>+u#XCyKCX/3*1J0p('5sK&_*m4us:jIG U"eDA4>)Qo0z.#kAANHS+MWQaZ;XO'w0Q(ov U"furqS<)E90xj7nktf]%,fLO[c%95#p2t2C7v0ZphVCqai8I+-x[uhs9ak+r[*Ud U"X.2'&L5Z#bcB=49%Lg-,'G:u;Zjc2v?cTk7MheqK.0JVohcq4.dAoG,+xkNiM)o U"M&HodwCl1/N'nj$;n:Yke==,HI%5;xTabAs*i[4Y%->O_+jM#K5N\?0]j8x8.6p U"25Ol:3_td-YL-UZMkSxYV.x1tZPVoZMA,WSsVrt2o%JM&Jg1X U"JeA9gBUDS;b_?[;U0[bVog$^0gC1MAm6(3oP63&*)ag\kdZkSyg$$M.qdVc2(3\N U"$Nlvd>AVN-pX+l2UvzD\N6OUCCiDm3Pn4rkbF[.\;[CHXWgYjt$v\vlYvUxkLpx U"vahwDp7,ywj97;hwin;cruQUN8rlL6;/USVJO,v%lU3]OM9FVtC&U8T^H+nn6,8 U"\psQcTFm?P2d4WM^%IP+Q(,dInXVJdn18_;$,bt=d%8u9nb-$7-Tn2DIeaYDkfC U"H?c4xt\KGpd-z_:E]z7A3O:JK4C4PaX#3Wl4(lu4NYdk]0o^vngH^UQ0;>j^BV\[V^)C^D[vdFuL>WHgD=oFPt+,x&u%p()9%%%%-#%hYMdGajV+_%*%%%%5%%%*%% U"%%ySkIsyD&*H:#lC9-Gr4-3$jL44wSVcRxOa*Lpn>b$-Uy4SRD9Z?Qt7= U"1b\nuM>$mkhH-6m75^>',+(mce60%u,1*OtuveRPWIZoFHlO>.n;?DX7\Y>_vg= U"\,W3qqb$D:2i+uR)J%e6>$jl U"un6e>riD\1WM\5=lfwz)AII]-=>Y,(YW&fhOGIYBDT(KDtVF(*Q,Gfs$D0eU7&c U"8PNCJMj*NQ#QjjgBJ%pCiiVxIkm#vX$99ajvnvyKna,n7[Pz>L(Qs U"T)\6$pUa';.am_aCM#Fx_#GgB7HXr%6YBi[8(d*Dd#3mpS#,T.fq_,.O/^Nli1(/GVp0_(8bO_9v.fXuy]=\BuDPiE&YN#2U-+lirgR>/r9pam U";I:h;N\MYeJwO_Dld U"?7UC.zK5>VO+hHxAT\M;gtiU)PZ3Xl(r6m&>'k'26k_j#uL]wpYH8#0/i]:[=u_ U"#K*k,]AOoNY7$\?t<_L,bD4c;ZI[% U"ka1W-6:>IZ6$s5a5hUy4L6>d>cemL59Lt5oqtHm> U"6dP>mStGGZeG2n1=lEwf]m6NsKT_,sHtNb:^d-tFTru2#%c2w7M>e* U"8=Rz2P8sK2,rhA2N<:g[Z?DcCHn[dIK14(jiu'MMdO]muBI6_=ExOZT? U"vR%DX;_s0o6Cors1XOet^p6ptbrtVc#o,vF4O[*#PCn;Q]0)QrF,vFjkB,A$J]A U"1636zL$O<3enJ[ensGM+ma6CBvQUNF1Yk4\\C.sgiA$?Q8.TM$a)4d,0'lY$T4P>RG8(4Q#lEeb:t2:$p30?i<,i<9*qn]nVX6#>6IYAWN&jumms U"o]FvcvvTT(/i3llLdZNkzhV6J8go+*/xt7W'/u6 U"pe+3NVbler6k,YPr9H_MA2jd_VK9:kP7CU#8)m6ZiofAUzj&1 U"yPX2cT)dIfTInQ==lb/O%P<<]d&+:;7kU79 U"\vpHV^UZu/EJjc7\.>frvu-vc6A5iT9;s_X]&',tMFi$e&3hnHL+1,pU--Tv:H4 U")svb+Qpk>-Tcb[7.um5F*/#]JY\pJ^g=0HArs#dtSG8Sm*[w?g*<:pU,xS7nHh] U"K3DZyQBho*nMn5KiTOy8?9RBqX+rN7?p_4MK\_'SwDHcTOg4ZTCa%#(v4S=DIG. U"49?3ot%sWk&F>dL(25k=?r.t]#9B>RqT9Qi$41=W9T(3;kUnXuxaebpC<\WXV&e U"UJKn8H4o3jf9hi;?P=bp+s'8'Ad7uBpn+Heq^XghYPv)C#5t+l+]A4=7t^-#9Cz U"p4u#tuB3NI)DKFL.PCth7]6aP+e*up$o\rhZ)*E]A:+jekTfu*2&,)kMK^8b4ZLr U"jbrbwc6rVu?)HYF/34e2Yemj3U%,ovJ1F,PwIie7T24lZf U"^J*dqcOQ[j$^34GM]_IF\kT#])N#aC,zR&4],V?LN>s*ju9UdM5j;^A-SPa U"N58G9=]QTfeTgh6pdE9?FX)LEGvIS-NPjE:;:Uj'qOgaX4hq?jb8H^ucluhSBMJ U"::xRIO3jQ4l^d9c9qTU89oS9IKEYIQKTxa6*m'Kww9'vo'BrP U"^0zvVSnzP:fu0Z3mx$WXNRXQv;jzXdpM:avA,ZnNaGd8k\BTPw=,86ToM#EkjLt U"M4Xy*YM$]C3ou&bUSaEr9w%,up(%)9%%%%-%g(YMG9[68np\hFGjpt>hmR*YsL U"H/H^Tmb4+]Zi0>H*UoB2:i6[wf-G.>(aV3GT?CQo-6om/C] U"3/yyR'7naV[$^^B61^&<2fffFeT,>\[.k#j,v7iY08Xn0Vq$A?+j U"VtrgMuf^d.3o.HY6NQ1]1xu>Lb%15qgr%xWMABeD.#B-d-\B&gWSL9/C5PoWON' U"7)aBU&OW^l\R975Lu?d2Y5uWS]])UrN9to%r:l\$H7cDn(^g[kDDtOB60d U"G1QY]L(fDB_tcV+A/)IZrBUQs\Jm%c9KU&u7)t=2>J:7I^HAj8NQBW/:2rh(Eh1 U"+2l#kM3.)eh3.,Ht.7UM2Dmoy%WX.5^y-zN#0H;vm:OVNj6\0(iPzwwr?2Gl358 U"399fH8QlD0jC3kH%(o&em''O+M=]v>a%4aAmCopK37k\^]KsXT*e7kksbr[1viu U"8?bLbrH4x/K9u1a?Q)<6\-uo(e*vJFfZ*J7o(x%(_4?2XAvWZo U"Pn5ZlsnIgbn:v(=.LD,73%*KPSNH%J]iyllNHRm#B(+:9_x/BdhSLGJd;7ITBt) U"Mc=^wI#ExN>w3D8\TaLtLuij=kOnudr.uq#L;G-(>y]\lp81#[e$*vhg^zQx#&) U"Q5X%HIkfM_ax7AjXENK8x<9kM&Op&r'M+HT_,)mngG1oTf0p U"WrxG[RQ(un]4h6N=*#>VBO4?U.5F[PyQWo+y1%8*?DeOOO$GM6*28/Is-%ld%Ct U"vxGC3CXC)=^EEm3nZ_o,zI>C5iCx?l7$UUQo:Jiozb6hKyIk9c('fqf%V?,r#OQ U",m5xdjvApxYIsZKqf%fDr$zlUKs%J+a?]B3Y)sv[RBC[QVt2ToXKoKGtDxwr>1* U"q+WW^8QfTsyd*d^PBO$8MAYnOo)j?uB\:.K(cZcSFFq,jV-l8^il*Y1w\rg1*=8 U"$LBDbtM(xelx#J.YICfTUMDjYjkp59VYQE[+HkLPa;1YMi#7YJ\*k4k0>GNU=WSYBuOYvtbpx\l U"+?.hcWVdXStpVZu\MpcmYrHVu\GLM5bQEKI_.BOZ8xM\mt$xQrv)W3Z$j,]Q8KI;[;WD$-78,sm U")&&8W?pGMtz(.#UTo9Vt\0e9k)%#V$:-,V_LWLIUHin2nJ^'YAKsIrvMvBgD=l6MB9mj?4f8Sh\jB4Wx;wEjv1xc=r>u]LYsKB)mr;mU?r. U"b=)uFl.f#;GlXzbc-0WnWmCn+W9PP:\Ljptk7iC\vE U")h*=Nup%()9%(%O-%0$NqGgK.*x%<:%%*3/%%%-%%%%ylzn%SgfxKfa:BZ[?+nR U"h:xpHP.3_K>QWVQf&GBO1A:9+Vq'c*BM9E+#CE6pIQn^-wo$b+TFmH,;hKL4^2( U"Tu/MLVZL(bh)8\MeZPn5wj59v4XCu_=;Rthff&wR[$Ml^4i9T?Z2=,'+EYGc-Rp U"QHn-sl-'q6.C$F/Yd%.O)hE>axd-d8YY.M?&jnP/,AlZ9&9A+swGG9[s)$^G3%6H:=C\*g=L&[)ciwe]U U"^CW).'%O:i+Fh]kQIA83[>5?g2-;j^sC182dCv?^iK]tJ U"Y+;r-mWM#aV:62Q'.0j?s9][WqD&iYNtB?ufwSsV/c]jCr%KxJ%JrF]?i)RSJXU U"*QH.mU/m.YiPu'hj)nz5J$CmV[+4FGC>-;?.hbFd&LI.(kD\V6;4O?DMXq*'o4q#/6]6)cE3+#g0gg']57ExX)JKEOC8%XN$^>P)\.idZI]l-B U"WC2b<5EKBf+*ul-NpMTA]b6c8B2M&\_t?#*Cv[nXhx-075-h50/3[KIpb/+SPbw U"J4eyi^WoEV2i0eh,kY,2o$GdeAjYd)[8/Z%%]9E%GD[=\/kST9]H?hqa&)jU.$puO1: U"#q6RXTY.vmet:;-YTAN8SLi($satorTw.8FxFA9rHqfGFN#6gCl6o^uA>tAoa2U U"fyhjuDHoHf6fFqOXkIR-5WETQ5;.bfd\+>a)ZaT[1K8Us1h?oPD(:vfen\\,U42 U"9O\GRjF9)rrN5Zp1OuOWK*0H&OqEjgjWc=Ih$mU(altGkcSPVhT2g>bOtDso^b7 U"U>Rfo%Y,Vc0bO#tOppOH#J?Z(26n0%\h]ExUGDUlc;0TO06fqvNP.mdeZP;843Q=5eW2G[(.Mpn+nr-uGV&7aArnI\oaLWzpl? U"NIJ?k54VhiW-$HD;URj)e=SNbTT(1OE,y'9]XrK]2iO:rm&CUV&+2,8U/c1 U",upWR&f;PkX1To$%2F?)HD?Xc,+^,l:d5Qk2?8#g*l]Wh2c]wyUCTe4ZO:rSigU U"b41,AT3Wo0)eCn(*'CtK+VZrv/AT#9*dL6d/;_IeMxxIKb)&g U"9wbGHC&jX?o>xB$LK.=<:=>uUqnJSq>P_^Mp.'2W=h1Ie)wm+-Mr\M^EP+dO;Di?jah&lE2*'gc9JRVXX;W(-+N^SsWqC6JAyUrVoAhT U"IlQ]WRKJ1WE$gG>IR.=4isBCoDCuv(R.OJmAs0Zy)IQOYHKEYiLkQ552s(:YTF) U"F)iI?*NFU4MB;5\UOC^e5&E%5cv:s$NW?-c$OHeX-:&k/=s,=&k:$WRj956mQYD U"XX2B:X^Aw5T_c0)wl[:P/=O%E.y%H;=02p1g8In$97k2DOrSzs(IFBHEpDfM=?s U"oQJuAPj?#cJ&Ueyvrg([0:9_A5L_cthd0]$uLQxlqSWJ.:&yUj^s:E.,pygIgWS U",&KuqRX'B_loB#wPp7BNuE+(PXy\MX)fqQ?Gxj+j&#i]&LjVq:qOLGqOxqHOL37 U"/gi'O_e#Q/:12*:kZSEVa2qC1=tDimn8tCSRo2;%d_+)?4fQY,q U"pcYMksN8%7zh>9$+MvkR)&,4SVG\8,)exF/EpPIB>cZYeL?ZFC<#1M857vQ+;6z U"zSOgmP)Nsex2antJ#dpnMqeeuEOMr(Uc]$KBrH2BH&y/umqMRtw(HtFJiuH)qrl U"ci$Y8ZH\3;n6-).z?L_ty98-'EozHl)jG,9UGusMtl;%.0&Pr9IGScvbm>go8]9 U"*M;z:N3nyoH])kgk8;aYgkax)do/7JecJp_fB$m6Hdj)&3Lv>25m/bWqR^ U"$[\;o##pYdPKE?XLBLr)b#;95\MQ,5UzU?Vf6Ba_:&&-llVAOS9^H_4Z_G^Mn(J U"_0JmO[rRRAQMaVP'/EQ[5-g)Pk'+-b6]z>)4OjzR8lgZpkk$MP%bbur*(]l_exv U"1$A%83VY_mX+k%tlJ9xA8tq/>7by+R7.wMzzZDmLycL.Mrq4$HJQHg9UYtWIV:. U"L;zUh0^-Uhh&7i.ZCTOB_BqcM;<-%1(#0f6P_=1dMSO=q'f&T)*17uA$s<9ZRU2 U"+K6cP_N+e$YIm/72le/],Y0gR[ U"%iGId2;IM7^L,GdHb(^-N_G0$GI:;$z7eX:NCK&=k#^]H8YcEN?)lcdD6;?bg'tmMB5 U"41AFY\?6gTGLs;n,;'73PN/'z$1i0CQ*Ikt[8S\8FR,?fS]o^Y4vr U"X#5nyZi4VrCA*(OfLz$bo6)+*o#DSIf,(:PUr=.)^VZTEM6*q4>V U"/k9q#rZ:Zhj5keh%9$)=4:>_dE#o0h2J19_]tx5P:m<5V<,j;O&3*6mtDX-)8$w U"9VpY,)ub8DjnYOP+2G)kZ1w9?3Q+hA+);LcYd9yt\#N;LyU(YE1mQT^Av4+>3yHgq)f,A\HRj1o$lxJtrtgFW4Xp U"eR1:S_1huMu10M1>&3G3iv>JU6ok$v75kriTl)T[gpH^%2\+<>]3LMbu#0SqUa2 U"ro:aL>$C4>v=Q2CxMAOxbj;b U"d_I)4yps_DRqXEJvs8/D]mOp)fd.Nc3#I96_U/Ay_nh-=s:bSEEpvYmkdJ/okdc END SUB SUB V2 U"GGYp#9.WKgR099-5>;W;RpC U">(tXbgwlWVQ$#_FQEDZnw;Nhn^Se[%w66M^<)S[T4,C30s9&*7Q_eIr3UZSo$1_ U"ji6T;#pk276xaQ<-_:,<8SqwGSEZE.YUS1%0ZK1_DyNCBww6eqYO1Q*<:ZQnwY5 U"$n]EZn3vAT*N(z$,33B<#ic?%Q*:YQW#G(? U"-:j^pXKU:cWk8GF%1$5Kgbbq$KCY_dh=r/+#V/-rns%fIU#;QfmV2S*7k-dSi$d U"YB(X^/tkz9)uGn)\ckfgV[n)gQ)+Mu%2XdSZPJ:G\mRcG\5MkAf>T.qGupXA+>F U"V10Tadnc?oKR1tAHqo:,S>Rwj'k3=)Y%4KPSeXAcJThNe;CCVQfd7([s[ U"Lny9f]_BH\6epmgLXb4e+ru$VWmaoYt1NK:Sq299h?rA)nz8./)bPzQ_#%cE<)J U"n4Y&*ad-:0&.l U":>=gCUu+4]psLUfZP='N6Y2uV-uofB=SuP:%i,(>:a4%2$8_KWV1/AZ1=we,t;: U"z.fHn2%zfqXdc3mm-6+2'S$YE3;yn&:aNK2%l6M%o7BdhRe8tRLEA#wp3#,H]qR U"lsil.))3sCi$F-X%2wI/Oj U"3&97%vMZh8&Z:1,(AWiDgd6iQ?:qcAxWD,LA[P6V,wm_Ai$?K^0[pQ%QtPJphPT U"M2yCh:9IkS]h6y<=ICI$v2i)$w]Bz,[$*h3#+xLMVO37us\xd\EcHLY$pKi$Dt\ U"e9?^)Z-+FsMd5dj-%c+Mlwh:a&kn(scsn2nL-=$RBtj6s=QliG[dn?N+.G5Qw5y U"KhoJF4KWrL,omg$QJV]p2oB88RvZk^=LN>U>EM[l0co>T\Ibq=JJRJK U"][UYkcVL=P+VM'U$vnCc=h*cTf>5&/xcSyTarHo3cc#x_zH13WCqAZidM$=YHfO U"i5bg,w;=tWoGk'+9nID;VChP+6i5=BX&p'pi0%+ntF;4iqml_C7dm\8%jmq]OuA)yB79CvsmV*uGfuP9s6gZ_ob;#K]RT_dNq=r5DY1At0WUphF#T9Qn>R\pv>;7e?n U"d6P'[Z^mK&;gtjDRWp%;LwNta,oQG+?Mk2,_eRZLd/)Y6BR*0FkMEau.(HiX5qg U"_dIOwSaOb#(L(CFRL+'(Q=;NofZBFqdqhdUrQ,;Mk'&O+f0FNpD41coK9/hZrJp U"yj,RXO?'9P^-NN>v>vH+yb\h\m?$gLotHWW$-NYWNc;.XjRxt\?^cxaFr]X$MphvsP8nM1K8nv9UAfDyZ6dT0Jn1X/ui U"?VRmWR);XI;bZ$ZF)wJ#Xy[8hPaR]oDDB(DwYV:.OKL*^M\$L?%F7fhTl7;olae U"uVR;7686PaF.1aeYj>n=W7;let$ESY\GP,'ek,rcH,nubB>fQpfIiZ#/+S7kYQF U"HSoJga7(hqN#NGoToHg$_8&)Em-W$:fDA9t&Go\+QX#2)Y2Xs0Ns3'Gt]l3N8mhrmarZNmxSe.AM3_^D U"vW;#28M:_bvBmEs?d2XAE:FJPd#KY47:BYmRDb2/Xtzsg=$y(CN$Dn:ozq U"?$SNwb0XTdK+gb*VXB'uh[?,aZ6Z\:0RbR7^F'jo9fOA]Q_d'WhQ&muu3:^r8B6 U"=hy8'c0U076R$LvZ=/(RHS5GKsjV>/p#[*65lZui%2;*m2g&Bjk6ER(LQroZ^,s U"HKJVLl[Gm-Q\nQmc_