Hallo,
'>>> PowerBASIC 3.x Source,    Created by PostIt! 7.2pb Release 2
'>>> Info: _Load Mail(s) into your PowerBASIC-IDE, then press F9_
'>>> Page 6 of PQSYNT14.ZIP begins here.
U"dbX5X;46K80[kK?mMh=*c
U",XoTSjo$8G?s:475tR*eenfb%jp3_9%]&&&V7J3z[z*[[Vs
U"=[[Q^F9yOoe?gLx:C3
U"Ok(%7dRpB>oMp&kj/[ti*d4/6Muh180n_:5?$f^2>Jl_2W4oZw2q+=yeX;yp8V%
U"+B?444^4_xXz7oV8l^;q/s6xEUr#_xD(m=tRV]^2r87P?_i[f-(NGiNpTEr0QMfhyDSt_wHgGyz;Gpk_$OyT$q=
U"c>oFUPT6byfW&rN-ndmP4\V>0'Xm=z]R3Uz(6^I1y..Pxo$Lk2P&(=ytAebDvo.
U"&^1y\o(ytALeDJu9SNU9Wx?vX#Au\jRg%Jah=E=
U"CaaeyO,-O.wNQWGzc7AgyL3cqA#BWi'EkRY8'9rH4,)LcvJHBql=$$D
U"LOGv>BX%O<.QqU/uT6VlVu7Z4r02+FsdjtTC2%hlXtC(&E4=7tgq^E*=fDrPg6O
U"W&6lF,QG+GO+R/U./;E=D]BH5XB$Im8)qWb'2ZW=4%QF%gNuB$SXwm3lem>OfJm
U"*,IGkteT\:5Z^(H1mI;GvZLU2N-?ge3;H.iPP^1kZ^FHJ*.=>)]%jRxJL32UC&h
U"A9QPa[1,L,\8+bscU+vQ.ghjHa2?z^C07-s%rsk7i5SmBA5o)R%s[XGJ*'T3:3,#'m^q;QBb8jr)j6I
U":2aDYeAvXZ<^Epc$*pi??&S+#&
U"QerCC$qcuXWLu5J3'xpfG79Fm#Dvl'1C.AoG=4oNI5\uTD-fjqA5r.0lrMVWpHM
U"M,WjsJ=%xFd\uj%Tr7C.eI4r0^#UprqbE\B%>=[BbI)bGXmNgG2CLqAnjhp5;L,
U"qGY:;/L2+;eX5JF^_S
U"o6UKT:2?j*FS1m$2mUivA+)P6^3gq/IG?T)1BawPe;2d_0gabzm#de(jJ-'PVnj
U"$I7#)c)6REgcyf.w_)BY$]]S*DL(NN9\ai9YVIKJeW6%>uVi[bct.0a3D$b,5?j
U"'W*slI6k'D)C5*4S'7:2C51ap'RhWYEb$8i'/r%6&SHq*6O2p&4Q\8b6x;u]k&#\^r(:^Kn.NBW;^LY5s7i,&9fQ
U"Tap;fsBKt<8'&$1W$n1R.A5yyIRcLFjZCDnSCS-YO2J(yrYy8%8pFznaIENBB7B
U"TMfocZlrjf)1UgDJpA;yRY9c,\=x7JXd8>Z+QC_JUTnMhAKk;=jO._,5#u136eO
U"D=TY.peKS?[=1q'Y^eFP8La/c-cOdz/(u$[q/>xFYT^j9cx8X.Y6b-[0DBj\MHQ
U"n&g=Za$iOJ$<7':
U"t,\RWWQontIe4i&0$QJbm7[z#xg7iDoiBB[SnVElfXS9mpbQa\mwMW&_xf18LS:
U"4r'ChmKLWm8b%,H?ei.A-i=>2nKLJmvz_QJ,Q>EoAemfhT7Ve#,$bH+FSF(cJb0
U"J.3>WcT55f_5Pa;tK-ZGc$s,Dpjid;.lg)Pa'LX6-Pr1=gu;4p5Oz/;;m8\&>$/H4a3kGjygRGqrZHY]?WiF/J?XxtXT#HA#qNeicq0Ob$g
U"j5^d9pC/t6kepdKVXgSZIwlC1az8tY177BfBG*sB(Ie-.%al$iR^=>'4BB#U[C3w,#I-UpLm0mrj(YE#8j?]'FGlg'
U"Do2.2*b+4,'Ul-m.*=r1An(:2qE7c3hy(%+GG,V4AibWM/SOBF#6xdOMOGW*-(_
U"eICJdp^NHJUA0bH$i7Upuk_7su-Z*Y7Vd17z.]ek/R%25yC.Hy1A/4Ui*]';=;2
U"SRhnDw5H3j?9,i1#?WuT=9%ZrYaX[Igeb7DuJk:a/vvKGOi.VD(%[.gd&HS/^CF
U"hTAj48Am2D0jxa98D674q(+>e))Ehd/)6grD9t1=c1D:1&a7i.^9$m*VHuIJQCr
U"YqB$[fm#7mK]='ZANJ4j1Pk30tHMmkPi\\xM4SAJ#Wm:*(qU)XH
U",_\+tj/ezb%*Vy0,mgeG*'m/4[>Mn[V.xc,s,yd+:I^SERqYoYc^/1uS]J'K/.V
U"#k.K%_S^/JY-eae>)^$q>nWJ/FgoO)t-,n2KN&KK=_Emkm98u79Q.Dgq$3BY0tW
U"&eypr;6'Xkh_l(X>y,7z;6KGVlt,od.fA8&395O1Ugp4CcgA-HFt#47.e^i0AMb
U"A+p$G=(obg272oBJR1aLP1)yV?wV/VU/j4J:?kChbVT$CY,EQ
U"I=OJQ(quOhx_f%+'KH/0,?,/;gGs/jxg,/?h:4YLoW)QmQJx=dZgHLL;OzO(\TY
U"f3p[Fu#T\%hs-wbFK'tWP3;;Ph$zgORc:N+[-HSDM9eQvStGLI)hvSp)tfJJMY.
U"t)'r0up%&'9%%9%%%d-%2'%]FyB=Nn?%7%%Z%%%%0%%%%%%%%%&%%E%%%%%%%%%
U"knqj&.niS.in)u%p&'9%%9%%[%-%e\%\F#R>fs+[2%%5%_%%1%%%%%%%%%%%%E%
U"%+%h%%%%uvx&(syfA'Sj'%jup&%'9%9%%%%-1%+iY^F&lH&vH/%+%d:%%%1%%%%
U"%%%%%&%E#%%%D%3%%u.vx(s.yf'S.ug&u%p&'9%%9%%#%-%9&bYF.8DCZD[/%%e
U"%:%%1%%%%%%%%%&%%E%%+%;=%%%uvx&(syf&'Sug%hup&%'9%9%%%%-1%LcYaFY
U"\>&?Y,%%%u4%%%1%%%%%%%%%&%E%%%%0%H%%u.vx(s.yf'S%vggu%p&'9%%9%%#
U"%-%'&cYFy?PnNY%,%%v%4%%1%%%%%%%%%&%%E%%(%8O%%%uvx&(syf&'Svg%hup
U"&%'9%9%%%%-4%PbYUF1SV&^1,%%%'4%%%1%%%%%%%%%&%E[%%%#%V%%u.vx(s.y
U"f'S%vpgu%p&'9%%9%%[%-%YAbYFh5*l61%,%%(%4%%1%%%%%%%%%&%%E%%+%v]%
U"%%uvx&(syf&'Svp%hup&%'9%9%%%%-1%Tu]pF*ux+OEG%.%70%%%1%%%%%%%%%&
U"%E%%%%X%e%%u.vx(s.yf'S%ithu%p&'9%%9%%#%-%p&iYFy;z:&5%,%%'%4%%1%
U"%%%%%%%%&%%E%%.%N2%%%uvx&(syf&'Svp&&up&%'9%9%%%%-1%RiYCF[K/&'[,
U"%%%t4%%%1%%%%%%%%%&%E#%%%2&9%%u.vx(s.yf'S.vg&u%p&'9%%9%%%%-%F&$
U"YFu\lX&V#,%%m%5%%1%%%%%%%%%&%%E%%4%<#%%%uvx&(syf&'Sui%gup&%'9%9
U"%%%%-4%:iY[Fnh$-FY,%(%m5%%%1%%%%%%%%%&%E[%%%C&H%%u.vx(s.yf'S.ui
U"&u%p&'9%%9%%%%-%7&bYFA*hJlG[/%%d%:%%1%%%%%%%%%&%%E%%4%MP%%%uvx&
U"(syf&'Sug%gup&%'9%9%%%%-4%-aY^FW&B-JU,%(%n5%%%1%%%%%%%%%&%E%%%%
U"E&[%%u.vx(s.yf'S%uihu%p&'9%%9%%#%-%Z&iwD5Lm*V[%%%%$%&%%/%%%%%%%
U"%%&%%E%%.%Kc%%%ugf1x.&S%htqu%p*+%%%%%5#%5%l[(%%S&c%%%%%
END SUB
V2
V3
V4
CLOSE:IF S=220AND B&=Z&THEN?" :) Ok!"ELSE?" :( Bad!
SUB U(A$):FOR A=1TO LEN(A$):C=ASC(MID$(A$,A))-37:IF C<0THEN C=91+C*32
IF K<4THEN K=C+243ELSE?#1,CHR$(C+(K MOD 3)*86);:K=K\3:B&=B&+1
S=(S+C)AND 255:NEXT:LOCATE,1:?STRING$(B&*50\Z&,219);:END SUB
'>>> Page 6 of PQSYNT14.ZIP ends here. Last page. TCHK:220
----------------------- finished ---------------------------------
Andras
--- CrossPoint v3.11 R
---------------