'=========================================================================== ' Subject: 9 DOS SCREEN SAVERS Date: 11-24-99 (19:55) ' Author: Ken Sims Code: PB, FB ' Origin: mrken@megsinet.net Packet: PB.ABC '=========================================================================== ' 9 DOS Screen Savers for PB or FirstBASIC ' To extract PBSAVER.ZIP, run this code under PowerBASIC DEFINT A-Z:SHARED K,S,B&,Z&:V1 'Created by PostIt! 7.2 SUB V1:OPEN "O",1,"PBSAVER.ZIP",4^6:Z&=3625:?STRING$(50,177); U"%up()%9%'%#-%qfeGLbv:d*A%.%%_&%%%0%%%%xh%wjjs%VSgf1xT_V,:?J7/=b5Qf;*P'N6^lg9%CS'G'&ABlw6Z8Ybg/BsoYdB]kB9DgCtMD2LdJ)) U"l5dsqG)j0&NDSG%^8FUWESnaY,EqR4;SAVfp1Cb2EclfXkc]AH6n#s2J+g#fpDoS6_U,Ldazn0/$^%4up(%)9%'%%-%( U"_gGLFdg1pZ%%%%u%'%%0%%%%x%hwjj%sWSg.fx\v:b:3bI3XsudJ%o(FN3?M)CTpcI#pj8<9I;2$P^y0U(j#e25s U"f;NA_GQX5l+nYiMYkTP+yq4b\V[pSHU,X)^j?0Xhk.I'P?iT\frqk'8wnj%:NSa U"VXD(EGASA-C'0&Z5_7>(RpeO0^X:WjaPZluyrXHmGiuDS,XBVR\9dQ.FgIVGCJn U"mnaAen1T^HDfeU4f2 U"s?4p23pBN;yu>KB?XYK\RNt).lu%f7vfJ4awaA$dU:[v,o^Z$GrH-M1;iZhTH6/ U"pZ).hX1\B9xBUePt1SgFl,5Ug4=)sLe7c5as4(LP%b>DP5cY*utsrlDG),?;tpH U"kVaNGM+6\NG'6p_KMLk5KfI1>NgF38Z8HM>DBRUN6c(?Gsq(L(P,.>bR U"sM[DlXbD3#DSX9=9baF(itN&8%up()%9%'%R-%&g8GL*n;*zT%7%%n&%%%0%%%% U"xh%wjjs%YSgf1xT$V,:uNd2Fh+sEgL'7%%up()%9%'%R-%DgSGLP0:wes%7%%h&%%%0%% U"%%xh%wjjs%[Sgf1x<$V+t7Hj9<>:gS U"fOiJQ&(,O]>bGb8Od$NZ+F9L9$JVSi1do[x;B\JFWF7H#^k?k>XhQct>v7G-g'b U"0Q;tvTYA+]6vf&vJvkPt-n5o'pfT->F.*Qe+Z\JZ;BrpI8R\KbbaStsa4UoMAyl U"O1p#S+vuQ2vz.u%p()9%%'%-O%QgGjLP8]&K=&%(%p'%%%0%%%%xhw%jjs\%Sgf U"xDL$f:ARe5TNhQNoDvVyy7rwUz%hTR9K4Fa3,tcF^eVeAb[FR=v$nlBK>w*FCtU U"Z6H?RR$QlD*FjC'PWRC-;P(+;/zI'2w?g3Se_]m>EPh;-h'ylg\$9AOu6q*g(=f U"bCe-NB.R$E>[_S3/*$lFoN0.2XL=r?=uGFgIx[7pe&qrY#Qo;:4HCZ=r+'nB5W> U"utc?fq;[,H#0)lGY0$LAK/'9jIgGj'=ydPrAI U"T,-cp^,*ulrnLtc^K(xVQW)hr(Y._^6-]pXW7dW=bED0+]dw:fS'H7gA U"-E=zh&aYhC-\)JWE-hWY?-CMCE9SC4tBX_%JL49$CyHJB-XNs_Z*2aGnC-k*[Y_ U"/Q16,/I0s>/AYv)R0.kO1g<4Y^:;%3ozmIb>-Qu,y\s#^KB_/.r>*m%-slX1p%h U"eq#E-[)vK#Zj*s?]\CbeuXTYY^&&)Ab),lp'=381GAgIoq>Di4YtvvISmxvqfsS U"&P>P*lXaElk;z.-+e)t?*jxP1Tezg4n92A,?;'B,qQe/68T*Yin&KcEC1+tz&*0 U"\uGC8mK/WpPA0)LR2D^+kI'r8J+ah4U7F'b4R++s;DDl0%up()%9%'%#-%Eh8GL U"$x+HWp&.%%m'%%%0%%%%xh%wjjs%^Sgf^x,wD+sU)*Ex][a\[6thZHl#%j%dGw_7n&X<=f/bA&>w(i_RP U"o;]4'WNcPN2eL-vJ0rOa)5+.M#]*0Gvxa5A]uH_bLWdQATLA8yP1mC.zFTn??XR U"Xn9;_1j'2)JHH1;&,Fi9I\<8*>9B_R(S/Cz8'le[0HzgcVg??O U":cX%5v1jER-3?DNx6W8p;G-4M,eqt,DHjTJKTjtnTgI7(*Hnpa/UhJVU?_J_54Q U"F;#Ek4%up()%9%'%R-%blAGLaM&2zc&.%%p'%%%/%%%%xh.wx%w%Sgfx5==N&/ U"Y4<8:)$70V3HF?:8b^jq(0sO3L>g,P<1?b5aU<\U>^E;w0?3LX=gXB