'===========================================================================
' Subject: Sonic Update                       Date: 06-16-02 (  :  )       
'  Author: /\/\ | |< 3                        Code: Qbasic, QB, PDS        
'  Origin: mstechcae@webcity.ca             Packet: DEMOS.ABC
'===========================================================================
'>>> Page 1 of SONICUPD.ZIP begins here. TYPE:BINAA TLEN:5473
'-------------------------------------------------------------
'                  INSTRUCTIONS FOR DECODING
'If there are multiple parts to this file, merge them into one
'file using  COPY PART1.EXT+PART2.EXT FILENAME.EXT  Remove all
'message header and footer information (everything outside the
'">>> Page x of..." lines),  load the result into your version
'of Basic (QBASIC, QuickBASIC, etc.) then RUN it. The original
'file will be decoded into the current directory on your disk.
'-------------------------------------------------------------
DEFINT A-Z:DIM SHARED K,S,B&:V1 'Created by PostIt! 7.4
SUB V1:OPEN "O",1,"SONICUPD.ZIP",4^6:?STRING$(50,177);
U"%up()%9%%%I-%pA0FQjJ.V[b,7%%Z5%%%0%%%%xh%wtqq%WSgfLxl&<,BSm7cw5
U"yjmD_%6^eQ:9K?n+#9cUAV9.=2el74+^'DE2U*/sFX^HByf>^8g>6j[fIo0v2)g
U"YrM3?tb0vunuP'DAx/GbT;Iu%1KW8C6W1'V3SEOAvqI6V_9<r=j=qd)%K?.H,oG
U"5m*Lrm&]l+*.HJbiM3BWH#O6U5O+jilYro4rk5T8b$_5FNs>5vs9oPu*MNLS2NQ
U"-$[sv9ix>i?0N'wVRGjL/3J#blBLKx_gG$VZC'?ZG($-u\<%W?k>/m;g<^&/a.&
U"MMWEbD?u^3&aA3n_Y+&6A/n'r(ESN,9>8](.fJsWE\:p#E/U:*\JsK^4QLW[8do
U"B:C68v5.w&R>f$2g_D:);u^&i$'3bm4V\7.WlWoc\NSci1h3[KNH81>RX/b^YVp
U"(zNC[h$RT$mQ<BTMh2?Q:+J'QDU)O0x:o)5&SocXyfvI1%-u6Kj+?fq:R=D,K7U
U"E\6S+b4?Vl^:dB.yUgrw3TVeh0=JN6K/*SA7o]U>A^RhW=7%bH7j6VB^]:%WgL'
U"oGk=luJStxht6q0Fe<H]o'SKCXw4)VDicEaN>DT(,6Anx\m4h2wue)mbJAe37rB
U"'A8OxCad4wM/u3YK:qt)B<qE.F-WD+c<]/:Wt/K4lt)EUr=zW)XtqQ#LtAIVk*f
U"Fo50>SVsG^(I/S,u)AjKA1Ic8ho*Csy^YIZ;4)vq3l#m>UtfQ?AfV+^]A:2xM*H
U"2aksF]H/pmDoJTC.n>C#YWQjB$.x]$bvuO.2'qzDVcw+evA]T'aNm*.0V.u(y=0
U":CG,oS8q=#gdT8c*$&Wg4M4qO+#WY19GAsE3i'bDVjKH:3LeBuqkTF(>-8^gv7i
U"i;Z6QvANH1jlW\/;,i#+OpeV?21f*AH*S/RV+1=kVj<oasYpb%2)j:Fk<U?1%.u
U"j.mU:E=F#R=pSt-K&KS&iww+sZfH:?BqWU=EW[,r[5O\4(z9<j::q&VjpRk#4Cm
U"'kU#$E[WAAg$T)dcrakuj&#tBuH,u5]nb-+cwY2Hql<f3sD.dUL0Q2,Jkh62)sK
U"4k>;tE:rR0.2rP^rhI'14u;rB2Hx0MwTYhA<pPe1>?1#8E:P?aOahhD9Ku:>nMB
U"Bnjx4>h]*s%k-);GIfxi8oIpG\BC8QN$Kr\8E^QwB#rn-;551Aw$9epGGco[Ajt
U"=x:cXlZgEoRX[^i?(0Dr?USc:atxfD&Kup)dCxlDGB'sK6*h2^oD1-N2I$*Tlx1
U"LgQphOP/+ot*^K'YGG::hEoy2M:c(m+sJ6^FPcn3/o^UUquESpUT0[NLkhNE$#G
U"x,sZV%PfZ$&n#P1^J$),::g7$#m(d$>T/fSUfH0xgM7Z-uK[Ad((W7tmAj9(3_u
U"35pLKSB[=e=hfuFuVyNK2i*$/pg=g#=Enl)A8]=ur>t890?93R/D?j>m*D4Z5,V
U"\]_Cxj4CBT&s=mgId4hn-8_t<?1$wb8\);sahT+8AAfiWPmNflFnq5T\EgwD+=4
U"w\h=]1o\+8?Qi4[Pou0(qpKYfMo(mwT%(J\lLG7rB.&Zg/V;NO^--8=]TS^Spo*
U"QOXAu#Me?u4Q3nP>*KtO=kw8h/af4f<(Z7F=pfG>$mQFK/XAmf5$cn(/g)rf[4c
U",(5-6ye5d>CCan2bCmb'Vn)oMuSGLohwhpd3m=.;0c,KQsiYwG2#-\?sP.?3CA/
U"LW9QT=nT0aA0ce\R9=aH_,.dmvWYH1#7lv=L#Tt;?;4FcQ6KS]SB3f(VOs&^ut-
U"3_/epSHIM$FB:_(yHf4(KSEzvwEI,a^39XK_0XrDe4?hY;:%E=f/m>$e?E.DeA9
U"[0[I5tg-5AT#>9.84].jl/nV,U#-K2iX+5:8JtCq;];c9F)rSxSln.W.CwGt#:*
U"n>7W_oa+32L(MS:q.K?iU+Q-IlTJ;H_ACOT;deNMd1ZHd>=JSKZwIhTHIdsKN]W
U"1P4\/L\Y<p7ybkf62Ftc6Gmr<LVKSl?R$g$mlX^cFFXvX5Ofs.)HCv**yUdkq=f
U"s^&w)M^l7MQ*imtr)/Lfi?)ofYmhT3=gGRhw9*4BAPBiAG1QYDsYRt9k><C-Nl[
U"$t<O3*-q'3z/]]z*;U^?Cs&3mSm3?]eM.RMGj*hjM=1/<S#iJM*_phYo6(Z/7&E
U"h_T[d^nhAVZ$SEcYo<f.5Uh)Dp+q44Hv.dcd)E43HfG=W2[*B>r1e+RNX9OEc*l
U"6L60it.-]tnpBxqB?(pA]'\,JC'szOi-^*fs'$q]-m6(&.e=*]2E]HU>?F4dFAS
U"H4/r%8<dELvfeb'sl<gL,%VHZ8QBGn?gAqVGxH1BMhXJd6K%Nusd(An;M$hjDSn
U"E=[^i?yjR<SM=NV=cY=c[K<TYM/RiM<l1gV)lfVc>c5hc3q;J828<waTf,5(H5f
U"8r5QhQOxLF?DuS8[Vl4ob0Dk:D>6CbH/q7[0GkXC.Fz$5DFj<xmm>2P0O8tl;%,
U"IXE^z;dD<%&0<;c)x(%up()%9%%%%-%-e[K%HF=xOn.#%%+O%%%-%%%%wz%swSi
U"Rqqf*=f+^Mp3S.P?7:=Qp^\pf+Hq%T,1'U6P>:<K>U7A$(gVl7[-I&xP&P5y_5c
U"6V-jDNU//(xYch(dwsB;l(F5x6mVYr\h#HJI.H(PWUUG-&e%Y.m,iw&QKjYYK8:
U"FQgW[0]UYh,jpqPIXCm'Mo/URA(A,Njt8G8&OroTU)LGXQ48oP0ruN'a+KCVOcp
U"Lu#8lI]6w1rf5BjZ]rClZkbY:$e)HO80opcd+&(7%^HS:et6W/?378+4a?ZBwt#
U"Xhp3/,lcllt\F&u&S]t*^ip_M.$U[6(o=;HY4h<RK\r)>;'[bu*V?o$]H4Bk<EN
U"g%l]Q?%tC\#E(0FL&MzCB?kF_6H$d&/J%m'5O7]qT\g0L1,w/4fZ8X#0[]3&Txl
U"VSo86*j2FHe,1*k'6KkUEd$#OihI'dPLVVzENkAw;caFW\i2*<-9\,JetZhQr[4
U":%H-,OWkBs5*jTcL#Lc4%Bf;9a%>x%%c)6Iw,vVEPW;s-qk1r7:;D5aVDwSZp$R
U"FZ5To;<q;Yro*JYvnOChpXr&Uo5<i)16N[:)XBHmoC[I/I;k:M:PXRwy0V1cC,O
U"kq[L$iuVq430N5'AoZf/DW:-)&,*>V<jX7%B=5^O06%bCI_[EN9nbO%&R5#&o,\
U"(&),n29uR1a\aEV*-X3We\DCIKIbrR,Ug>BP346DY_bVoVRIJT:39egL,DIuVR)
U"^B7BIgc9JffRSZVEC(uv<_5wK:B+iu<_ew;.cYo;(D4uZ(,'Jhu_;WGKf9cF+3F
U"O06,1JClx_i^:%KruC_I3Mj3Ha\8DbO]hN[fWej)pxA>*)XSN%ByTn'7ahxZ>)O
U"KLDaaMQxp0MEa8YhC*1^G6&_Q/b)F-.-)YP$&l<W-5.DKre6l^;m^u;mjAJogF(
U"G(*#+fu1e;<S:bc=EcrYh(t03L2&4<(bk4'cQM)GnLvIl>Li=GZ5;^vxQlK)im'
U"jX7z/e0USMcS+=7=ME/CQW7[B9oOHaAd]kl(To*p(yyv=(LQcZ(M=\24MkD2H^)
U"th:>*?\YG4hZDR9\9[jYbYM-h6YG'rvjSVu.HY7SUCq)8l9TSaQwAh[42XyP_pG
U"7lUlXt%FpNfEUjh(&5t3/iKW;7\f,t1C,vjcafLgf2A/1YS'gU=n=GXB(3c-J.F
U"'2FzFOa_a>vemyTIcHqf.\XxdA\ggeWJeTff&MuT$EnR3mDwBdW?b(vE'44mdoA
U"1kaj,J<??.8tZ^]9D;K=4InQj<Wr%D9$0=8Gsf+vL8d=m)jGRa_R5%W;BI#_kxc
U"+nMftIkJsHCiy_W'%%r\H0k9Ls''kVoG9&g'5[a*s^i]$7Zcw=QX6X*?KU)Mp1]
U"4HkWO=_UH]CL=4V'&U#,BA9EC\d1E^W8WX5ti3gK(vIlT3bX5P<>8Od<dDR(+CQ
U"$Sy1HFk[p\#n^&:r-Phk'J]:.DtDNeKDRxVm]C'iDi%8MAl)1NS+ig8$o^_g\gf
U"50\z,t?,Qf>*xMiGWOf2[PB[_zq*.YKP5#Pf$/J8&'_?XSV9\:%j:_K\tIp7cN%
U"v=vC_l.DUBro4*%tVL0XGlM=fhvOSZ<HBq)zWA/+\-zTlDwTV9?8/N:KULX+.bj
U"*O0nI2-PpqJey4-1mlYn\tFT5I$SM^akj3K(m/>wGWH%/su2HoEH&G<^^2[269m
U"4.nW-H^%C-=v%oHLK1PuA8Xlm;v1d2YMK5v=]EG7J[?*7N:R,ThYQS])S6>$zu2
U"*XsDgI<V>eAEDII<n)L0\^J=QK6uRZ;ap'jBmFuYoS=xCD3qp)uRY$fJf2Zo2D-
U"KpfUwS:4iaE?Tv(X$ZD35]MfqH;D_-1dK_w*%xB9K,CLff.L[R3>a-OfhPC__et
U"3q-spLF&%azSD=PXfqMlp&-1#mQA?qI,rjE\^j1G>fYI\QY3HkgXqW.jryhRU=P
U"&OOy)VzA<X[3/H8;sRNf9:g&c$,(PoWh/$:uX8DnuRw&\H^wBeitF'gWX57Xrv*
U"-S6eX<7,]t\8u\wFvc0t\Xt1Q84Y#'p>gVmAxmCl3hBX8\WQphP8Zt0oUtQQ8<i
U"iDogiX0/C]wB+ifwb(pHdwb2[[^VsYC[vJUEGxmd=V4xsCd[vbJmmS9wb3L>1x/
U"x=jeXHuLohruervu>eXA4cklfLih1uj?8irE9E&7]sDmwceK5c9W.b7ZJpsikg4
U"Y$82Zln?GqH,lEu,1Cd7kwEa/g5^/FVl7qc]Bh\1KEB<h1],CjbyW<h1>4_aU-v
U"t$CG=PLcK(kKSUpmY,Ek:O/$x[GQ%qM4TOAB?j9^cK9_Y?,S$0acZh9M0cMgfaO
U"];d,BG^Dfx%C<^>bA^Nmy^1Bd4KolNc34AU7G3?S]<'g?X$m#8\m8S577ekUB_e
U"]D0bI*;h5qHBHsQn$eXQo:.1+Tu'Ilc'q\hc>A4U<>fvLV*99Hw?Ts6B%Bn/sXU
U"%?2.Z,]RN&[.D_sWe5I9[N3ZVB&,$_TNN.b2(3lPH%zJL4^#3,iO2f=XUU<RkFm
U"\c+Tveq)Md:L*9Fa1/*q;yDM,0ANXMqn52>T/+Qp,5*/:CMQ<CkCU->^XzXs^aQ
U"+qG^(k)TV8qd>ai0lfMc6a8KcOMED_imRe$)Re_M--[xBX9=roRv,B]grC_G[wL
U"_AU=4%RFgLfE*YsDIR26srNboE$R2:&R:gB9Qf('Ew4GXD5eFKclL)qGc:+%Pf>
U"B7bEibVX'd[Bsu%W:e_#m_lYB(_m(&5WTR%_m;Ug621USDuv6I=EC_4n$(L5wEk
U"*+)b)neos/xOn/XCkQ)uo,lhp_SpJUs.8]0LblIs.W]M_s*cSwjKN.\p6B>X_]c
U")S=#_FYzVO>TDI'x+-9a)3E1rOu8;QTt'13Vn4-klfdeDc7rYJ*'Rbu8<<W.GvJ
U"6*+'TeNT%a,^MfWt:(-OsfRIOj4KKnUG6$Reil0uhoPNC1f9Jcpms]BiG\$P0]\
U"KQruQ'u0l>[8QfBKi#0I1cLMKf9uJ9QfA(^X^ey3nIBvN'<7a%=$OWUqM)rK1tm
U"6EHestH7jqRQ<ZG?uGM__n4s\N]D-?u6QgC,XD6EECu6&6_m9LCC_7*m+,>HSsf
U"ir(-]e8KulM\[DYifn,4oPKIv*X3BG\>$P]\qK[v0dVH,r<9KpET-Ll8[S53'1W
U".Q-%M_m^%Xfz\$aoUi[o,*<&:B9+FQuEV6<Z?]dA3V<*Z?]Ap3V<Z&?]A3YV<Z?
U"#]A3V6<Z?]dA3V<*Z?]Ap3V<Z&?]A3>V<jd,Tx%u%p()9%%%%-.%r[KC%#y*)+r
U"'%(%[/%%%0%%%%ufq%jyyj%SqtljjO(+'\U-*ZIx'IbJA7=O1d.(S22Un3]c1Hq
U"SW^Xusvvt1.NnnkD7hn-t_zfH?<ar0-qCxWAAr2Ptr5xT&jt)^<YB9ki$uAFWS<
U"EsEoEFUTch+<AqOnMw63-;6%jYmr)VP;Ae_n2)cxTHSmy,hHBXGEjr_XZe%UQ5Q
U"Gg]<hJU<hn.XNaPvW;6a].BJ94y%-qB_mFhvI4LQ#q6_HkV^i.m7=mH>bA%s:MN
U"-GK\.&3ue*lff-jGx;KPI1/wobl[Rk%ECWM_oQ+sq0LT[%h+*yTIeX[jGZ,F=s4
U"AsSd_wIeYv]cONPW-8,$-3R(q)Uf+eIv:tFx\R(q)UK2eID%R3CK/'h(EtPucSO
U"0p0Q+ZE*7ZAh8v)EuE[c3x'o_m0bB[ml[kXv5CEA?B/w_oP3?bz%/$%ue*2JCU=
U"4>hknK&N$^YcI:%laz/<g#h*2CsU9tIN)+AnS.fUZ]TnkHW)mcx*OWka;a&R3u'
U"<bG]K*7AYo5CI1sFIsDFIR_7e+^z5%^DL/zS_em+*54oIN_dOsfdR[)WMYrRTh8
U"d;Ll(_+HSYTa>ObD\K9rXAN&;)D?B?3a/O.3Oz;,3ApP3g+g/6ECIrFAI^=/bQ,
U"0*3Oz;T*UV3+>gYeg5fD>_Iv\DX$^CPT+X%L?'jmk_tI$Pp(;oh'[>9u:_JM6j>
U"IVRI&_f&:GK$<fLrFE\%f&:Yiil.SF0pFRd'O7Y]R*[HhJsFUi5V[QrrE3Db-p*
U"Y8JjZ0eNdl'Bfr^zc+L\pjYSn$r_j7o,-W<],63bt1;Kn%^j0Y3tJmvec1b)uFg
U"6l3qDo3#G>>bwup4Yb^VfB#Eb;sr0GP%4ZU\k2]CBz6L4R^4-Nu4u%p&'9%%9%%
U"#%-%pGAFQj#JV[b[,%%Z%5%%0%%%%%%%%%&%%E%%%%%%%%%xhw%tqqW%Sgfx%up
U"&'%9%9%%%%-%%-eK%aHFxO'n.%%(+O%%%-%%%%%%%%%%%E%7%%5,%%%wz%swSi%
U"qqup%&'9%%9%%%#-%r[.K%#y2*+r'.%%[/%%%0%%%%%%%%%&%%E%%%'P6%%%ufq
U"j%yyjS%qtlu%p*+%%%%%(#%(%w#%%%r%9%%%%%
END SUB
CLOSE:IF S=144AND B&=5473THEN?" :) 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\5473,219);:END SUB
'>>> Page 1 of SONICUPD.ZIP ends here. Last page. TCHK:144
