Author Topic: Solar Flare  (Read 4322 times)

0 Members and 1 Guest are viewing this topic.

Offline bplus

  • Global Moderator
  • Forum Resident
  • Posts: 8053
  • b = b + ...
Re: Solar Flare
« Reply #30 on: December 13, 2020, 09:43:00 pm »
Well I tried to use _CLEARCOLOR on that image and I poked some holes in it but something stubborn about the dark background, maybe because _MEM was used in making it???

Code: QB64: [Select]
  1. SCREEN _NEWIMAGE(1000, 800, 32)
  2. 'SCREEN _NEWIMAGE(800, 600, 32)
  3. 'SCREEN _NEWIMAGE(600, 600, 32)
  4. DIM starx(1000), stary(1000)
  5. DIM sz(1000) AS DOUBLE
  6. DIM speed(1000) AS DOUBLE
  7. DIM x(1000) AS DOUBLE
  8. DIM y(1000) AS DOUBLE
  9. pi = 3.14159265358
  10.  
  11. pic& = BASIMAGE1& ': _PUTIMAGE (0, 0), pic&
  12. FOR i = 0 TO 120
  13.     _CLEARCOLOR _RGB32(i, 0, 0), pic&
  14.     _CLEARCOLOR _RGB32(0, i, 0), pic&
  15.     _CLEARCOLOR _RGB32(0, 0, i), pic&
  16.  
  17.     _CLEARCOLOR _RGB32(i, i, 0), pic&
  18.     _CLEARCOLOR _RGB32(0, i, i), pic&
  19.     _CLEARCOLOR _RGB32(i, 0, i), pic&
  20.  
  21.     _CLEARCOLOR _RGB32(i, 120 - i, 0), pic&
  22.     _CLEARCOLOR _RGB32(i, 0, 120 - i), pic&
  23.  
  24.     _CLEARCOLOR _RGB32(i, i, i), pic&
  25.  
  26.     ' _LIMIT 10000
  27.     a$ = INKEY$
  28.     IF a$ = CHR$(27) THEN END
  29.  
  30.     'toggle full screen mode
  31.     IF a$ = " " AND f = 0 THEN _FULLSCREEN: f = 1: a$ = ""
  32.     IF a$ = " " AND f = 1 THEN _FULLSCREEN OFF: f = 0: a$ = ""
  33.  
  34.     stars = INT(RND * 100) + 1
  35.     IF stars > 80 THEN
  36.         s = s + 1
  37.         IF s > 950 THEN s = 1
  38.  
  39.         rad = RND * (pi * 2)
  40.         x = SIN(rad) 'get direction
  41.         y = COS(rad) 'get direction
  42.  
  43.         starx(s) = x
  44.         stary(s) = y
  45.         x(s) = x
  46.         y(s) = y
  47.  
  48.         'Set size and speed
  49.         rr = RND
  50.  
  51.         'large photon
  52.         IF rr >= .5 AND rr < 1 THEN
  53.             sz(s) = 1.4
  54.             speed(s) = 1 + rr / 170
  55.         END IF
  56.  
  57.         'small photon
  58.         IF rr < .5 THEN
  59.             sz(s) = 0 'returns the smallest photon
  60.             speed(s) = 1 + (rr / 100) + .0016
  61.             '1.0016 'slowest value
  62.         END IF
  63.  
  64.     END IF
  65.  
  66.     FOR t = 1 TO 950
  67.  
  68.         stary(t) = stary(t) * speed(t) 'accelerate photons
  69.         starx(t) = starx(t) * speed(t) 'accelerate photons
  70.  
  71.         cx = starx(t) + 500 + x(t) * 50 'used to adjust origin of photons to size of sun
  72.         cy = stary(t) + 400 + y(t) * 50 'used to adjust origin of photons to size of sun
  73.  
  74.         IF f = 1 THEN 'fix aspect ratio of photons when in full screen mode
  75.             cx = starx(t) + 500 + (x(t) * 50 * .7)
  76.         END IF
  77.  
  78.         r = sz(t)
  79.  
  80.         c = _RGB32(255, 255 - (starx(t) ^ 2 + stary(t) ^ 2) ^ .5 / 2, 0) ' <<<< yellow
  81.         'the square root stuff gets magnitude of position so the photons go from yellow to red
  82.  
  83.         fillCircle cx, cy, r, c
  84.  
  85.     NEXT t
  86.  
  87.     LINE (0, 0)-(_WIDTH, _HEIGHT), _RGB32(0, 0, 0, 20), BF
  88.  
  89.     IF f = 1 THEN ra = 1.428 'fix aspect ratio of sun when in full screen mode
  90.     IF f = 0 THEN ra = 1
  91.  
  92.     FOR b = 0 TO 55 STEP .25
  93.         CIRCLE (500, 400), b, Ink~&(&HFFFFFFFF, &HFFFFFF00, b / 55), , , ra ' <<< adjust to shift color over 50 instead of 500
  94.     NEXT
  95.  
  96.     ' _PUTIMAGE (500, 400)-(700, 520), img&, 0
  97.     ' _DISPLAY ' <<<<  moved to here so sun is draw over photon formation circle
  98.     ' DO
  99.     ' i$ = INKEY$
  100.     ' IF i$ <> "" THEN EXIT DO
  101.  
  102.  
  103.     _PUTIMAGE (500, 400)-(700, 520), pic&, 0
  104.     _DISPLAY ' <<<<  moved to here so sun is draw over photon formation circle
  105.  
  106. 'from Steve Gold standard
  107. SUB fillCircle (CX AS INTEGER, CY AS INTEGER, R AS INTEGER, C AS _UNSIGNED LONG)
  108.     DIM Radius AS INTEGER, RadiusError AS INTEGER
  109.     DIM X AS INTEGER, Y AS INTEGER
  110.     Radius = ABS(R): RadiusError = -Radius: X = Radius: Y = 0
  111.     IF Radius = 0 THEN PSET (CX, CY), C: EXIT SUB
  112.     LINE (CX - X, CY)-(CX + X, CY), C, BF
  113.     WHILE X > Y
  114.         RadiusError = RadiusError + Y * 2 + 1
  115.         IF RadiusError >= 0 THEN
  116.             IF X <> Y + 1 THEN
  117.                 LINE (CX - Y, CY - X)-(CX + Y, CY - X), C, BF
  118.                 LINE (CX - Y, CY + X)-(CX + Y, CY + X), C, BF
  119.             END IF
  120.             X = X - 1
  121.             RadiusError = RadiusError - X * 2
  122.         END IF
  123.         Y = Y + 1
  124.         LINE (CX - X, CY - Y)-(CX + X, CY - Y), C, BF
  125.         LINE (CX - X, CY + Y)-(CX + X, CY + Y), C, BF
  126.     WEND
  127.  
  128. SUB cAnalysis (c AS _UNSIGNED LONG, outRed, outGrn, outBlu, outAlp)
  129.     outRed = _RED32(c): outGrn = _GREEN32(c): outBlu = _BLUE32(c): outAlp = _ALPHA32(c)
  130.  
  131. FUNCTION Ink~& (c1 AS _UNSIGNED LONG, c2 AS _UNSIGNED LONG, fr##)
  132.     DIM R1, G1, B1, A1, R2, G2, B2, A2
  133.     cAnalysis c1, R1, G1, B1, A1
  134.     cAnalysis c2, R2, G2, B2, A2
  135.     Ink~& = _RGB32(R1 + (R2 - R1) * fr##, G1 + (G2 - G1) * fr##, B1 + (B2 - B1) * fr##, A1 + (A2 - A1) * fr##)
  136.  
  137. '*********************
  138. 'EXAMPLE USAGE OF BASIMAGE1&
  139. '===========================
  140. 'SCREEN _NEWIMAGE(600, 600, 32)
  141. 'pic& = BASIMAGE1&: _PUTIMAGE (0, 0), pic&
  142.  
  143. FUNCTION BASIMAGE1& 'ss.jpg
  144.     v& = _NEWIMAGE(293, 108, 32)
  145.     DIM m AS _MEM: m = _MEMIMAGE(v&)
  146.     A$ = ""
  147.     A$ = A$ + "ha9]mN7MMUMMWV<12260H6<C2B`8H>W3P8B#TciL>W80A>`L^H>ET59[L>XB"
  148.     A$ = A$ + "BUT:U:YB1K[DKIIIkF>KIgMKk^M?fNFSmJfcnKoNW7AA5ldmJVoh\^gg=m^_"
  149.     A$ = A$ + "kkLn>ofQci>aa<FIBSMLB0SN<bT7WORoSJDb4e]5hhmGFcBGVEHolIf>kO:n"
  150.     A$ = A$ + "=nWN>SN\bD6ch\?CI2jah:1`a<ZaJU9i]<UAiWE2dGIlFIbSNLN:SI<N:SMD"
  151.     A$ = A$ + "FIBSKdFIRjjS\h>^Y<faJ;WPNO5`XeSCGW2[kigRkcSan=`f\kcAiMoSF??n"
  152.     A$ = A$ + "=YGWYi_obTdcS?7TOnIKSSUW;^Ocn[GWa[Wkh7eHdcGgohlGV\OC#Vbh3#2J"
  153.     A$ = A$ + "2Cb:\^khiIVkkJTgSlm<AmcfmPnk9PahIMkh6]W??bU^ScM<c:`9I;WfT6_N"
  154.     A$ = A$ + "?YO>X9:CLLja[7c4dc9Xa[?K6WWUcHRSGVKPCDFhd3DFd<2bGIacLZb2dUcM"
  155.     A$ = A$ + "ZCFFX^>U#WO`bRVedTU=_IK[_hI?MIm;?49Ti<CKKDFn2VS\b5=?KibGdlU#"
  156.     A$ = A$ + "Ghl\U[Ha;#gnle[cdTPe__E\`iJ7oVGmbUe^\5K[_YE\D9\U\0I9jga>FkZT"
  157.     A$ = A$ + "M^jE8Q]Pi:[C?_]_b#U3]i=8[NN1;[L>cbn<kWeGclWS<Ko7W\ZiZgGcJjb6"
  158.     A$ = A$ + "3IAb6Fb2UE5l<UEXON3ji_LmkMMjeJSjm1[_XY<AInCD[7[W3[?=mie2Vd4T"
  159.     A$ = A$ + "YZ;GhT3#VYn\JjjcXYY;WZn<KecOFnFO11>198mijdlKdb<WPFoGgfTYNaHm"
  160.     A$ = A$ + "DHM:CcO?U9Y7k2WaT]jC1jWWj#C?0]n]OjoeSaCm`Y>Q9h[>9eYVlHej8n=A"
  161.     A$ = A$ + "mo;o]jBDWJ6CJbb\VBPFm7:^j[D?Rj`cIJcDVJ0Cf>W9kO0NK7jY>E#JmgYY"
  162.     A$ = A$ + "oN3DO>iZC=5o7S<c03#Vlh7]Wj51<>KMZc<5mn>0]]5U9#mVanIK3AI2SmcF"
  163.     A$ = A$ + "lGONAa?olD6?WWnkMRn=>KoL?>A]mlD6e4dfkdffO[<IJSK]c7[ENjgaHoeF"
  164.     A$ = A$ + "Ll4gjllReWo<VYL`M^;[]\_f`NKSAa>fo3HBCLdN:>VSS15TgboA<YWU5=BV"
  165.     A$ = A$ + "Ta<dWQCbe>7ndh6W]dgcDkoD?o>ioH^_ii6[c_[PeffCAo?IZSGo<W[GFQS="
  166.     A$ = A$ + "iSChmlhgU7^dH4ohiPN?Cm9:\N0SAOfYee\jLNO>JWWGVT[4Pg2lfY<naJeS"
  167.     A$ = A$ + "V<eOe?cBf6UY[]QVQfnI^C?8IQcN6FkoUX]aP14RffM5;InbRWk<]blWeDUU"
  168.     A$ = A$ + "<_I9Q<O?\3H;`=PW\dPWQ\LMK[=T5:KDI<[GI4`6Pg0_8\U^8K9\6>gU>gII"
  169.     A$ = A$ + "WkZFllUM\ne8[A??>6gaAaffbGR\V#e?_R#\b6DV3W3l\]Y<7^nKI=[#fnjG"
  170.     A$ = A$ + "Y\ie\<Ik[MibFeU`V>`FgXaLfeJFYaO>hVF_Lh]^9KinFOHBLkMGB<kJkbNG"
  171.     A$ = A$ + "gJT8ffVU]]RU9A^m]8Q_U=:9LPm:9N`m9AYK?fM^=[4Q^mBB>1Y`4RcF?BmJ"
  172.     A$ = A$ + "5_N=J\PLU<R<LIc:7K?jgeVDF6[_g`FUdDYi:i4OTBB7N?BUiTR\i#GT\\I5"
  173.     A$ = A$ + "T\UU_HIC;KQbNf#HBhKOcbLVlhU5=m9KLXYZ]93DKC?W95P<[9AMF?<9:cGi"
  174.     A$ = A$ + "nFOYSaCQe3`;7J6CJBbdWh4=f4e=XmROSJLJM9o\jCNjWcCM=7?:8oWP_jPL"
  175.     A$ = A$ + ">^jLCaOU;=FolMLNd:hW?N4UPVPOFoD`RP1AQ??9o6U_]kHA^b8iA>VD0SK\"
  176.     A$ = A$ + "F1^C0JOL`P6oho\<9focbTV\GNdo[bT\[aH6[?=Bl<HTli3\SMJkcaTLJ=L<"
  177.     A$ = A$ + "YAbdn]aTnEICN:nHAN_GM<YOC\XWmIfcFPc?bRSCi_G=:^e3LlNn=BM\9Iec"
  178.     A$ = A$ + "D>PnOfDeoCMUPDVP?mBL^FoKSc>GN>#aaMLLJO??mZ5RU`jVN0SghOcGI;;6"
  179.     A$ = A$ + "fbLV]\bi?GI9:[060J:P7#Ie:[Pfl[;dU8KJEQJ]cgJH[dF^me]JOJ>X]oZF"
  180.     A$ = A$ + "RZ;HEQ8;OQcf:[LacAFaR2FF]^<\#Dm;cOVBXcCo>2NJB8JK]U<c0U5?SYH5"
  181.     A$ = A$ + "JSAQ]]`Y=9kHVkDlGVO#1H]1iHF`DWX4fRW[M<;O^c#FalVY\Z5<KIe;<HKi"
  182.     A$ = A$ + ":e_cEYOOlM]^UY<^#GXmI>^M4fb]cM;[<4I[[>4IM;MN:?LQb62M1b6de?`V"
  183.     A$ = A$ + "GS\iU>OiPKLeb>FiBT3\QEI;SLK[Gf_b`>b^gRLh]\FIO[K5B<kLCb^EFF4K"
  184.     A$ = A$ + "MMfWSN7KDRMGKFRBol^eOoA[WcQdcOo:cS2[7YN^7#?fhgcFU4fkfTHfn6TS"
  185.     A$ = A$ + "beLC[afFBkO7BjA]?9gSNH9Y3]CYTD?RTlQf]M]c8Z38EVIBBcUUWDE^Y:IO"
  186.     A$ = A$ + "d8THfcFT]_ZU:a\k]:A^S=95VLLB5jnRMoKGi[[ERBgoQekYMYOglL1mC1Ze"
  187.     A$ = A$ + "IW2jC6kXUY?na9c:0o]eYN7J_Lm?>9U7=k9=5I^15TWj>Sbci<EZ_AMKZSj]"
  188.     A$ = A$ + ">;W3m1Bk[Y[l=ZOiJghj;ehPVF]aK\AjgUjcFoPNeAcj?U7iQol\\2GmI7G2"
  189.     A$ = A$ + "n35d:1?jGQ9YgGd>O:SN4LXAXihY\WOkjTL?G<K12HRN\Aak_m5<cIiSKo[L"
  190.     A$ = A$ + "OjMioo9CbIkV?kgN6fSCC4[kC3b8d=A16RkhMjWM\9ZS#MSi5hT]UlOWkoDW"
  191.     A$ = A$ + "=MCfKM2:CA_6^bTmbbVVOSEeg[f7=U9Y]SEkN2NF:c8H[\:e>ReXm9_NEOa6"
  192.     A$ = A$ + "DF2;GWZ_HMjBdZ\1]_h=Zm=CIm;M1FKHJ__V5=7[4jLV^\dI?ESG0oPeQI0k"
  193.     A$ = A$ + "`a?VWJWA`Cb?[0;IF1<F[oki6d4T5Y<U#Df2W7<UWU[4f2VQ\f5>Cef8e6]5"
  194.     A$ = A$ + "[<Vi4TEFA`1JkSb^3KYZ]BcAeb\8ECC8bNFkbDM<;Ge_4Z\g=^2[\o=_:Ki^"
  195.     A$ = A$ + "FgbdOCj_Qi==kh?hVFUTFTkE>bNgX\ge_DiXkGi8k4>C8B^aM09Q3Bkk`TM_"
  196.     A$ = A$ + "fU8I6kn\?7afGS\7fOl7BbiX7dnl1fdbE=<ca>G>V\>bn]S?nm]9iXje>i3]"
  197.     A$ = A$ + "=[DMfa;EUeAU\RI_BNjiFDBA8]DB6B194^TBhKG:?mHEVCHBVA_7YfLCDRJG"
  198.     A$ = A$ + "Q95UJTBJA_;9jM_FY0mhC9RM:I[gKY5e^U\d[AL7H;BljeVU94n>Ubc>A9W4"
  199.     A$ = A$ + "R#ZYPdTbc:99[h>\TK2A95VbATcecaTQJ[1Ykj[Dj\Vb\U7_fbUV:9?YR\BA"
  200.     A$ = A$ + ":?cTekm8dW3kdHKKJi;Co?L:FMYY<ZAHCXFGO^joWc#[?6\Zg1]I^jKCbKMC"
  201.     A$ = A$ + "HAD?LJJoVCG[S3oRUcFeR=S02`ZkjZ7?CE_mL2Jb6G2]KHCicbTP[lDK<ldn"
  202.     A$ = A$ + "fe6oI]McaTHi8IBnJW?BNdoK`T6YFaY>Q0lY54ndCe5>NOkcY=hI]mcYKJRo"
  203.     A$ = A$ + "JlWdcjG9GamknY5_\6_5N^jh2OVRG6fC]UJdfBW]W>KhlaE6[7O7Qn7cFO]?"
  204.     A$ = A$ + "[Ih_O6;1F4OVo[Y?]YjgX=o8<Kl3cTWX\`Y6XfVNVV^V`FTZQIa;dGISZF67"
  205.     A$ = A$ + "[aaK2Ce_\JE_cZD]?H[4Ue1[IncB2EI3;AI;XoPbRVF0FIQCM2b22BI<1>NI"
  206.     A$ = A$ + "NCa?K9KKYcJ:bbVMPFIicIZF9dP3Bfj:G\]Lm;M>jmiXDFC#:SI6bfGcBTM^"
  207.     A$ = A$ + "fU:k#I3K;\#<^1<5H57L[[A>bngZThQgUef:^3\=9e3_39A]]6]GYTQf>Tff"
  208.     A$ = A$ + "YY];IMJkFFJah[=n_BAK[CQfb^eCG?7^65VhQ=^CS5VZZih8B>7IO:_8>YdD"
  209.     A$ = A$ + "SBb>jM;]DT^mdSA:=i8TlSKoBSiWTDO^98UUBTfWK^`DTV:8IYLmhYTnQg^T"
  210.     A$ = A$ + "C<kAb:ZM956o1UBBj`faaeb]mf:9MYeRCcfFBkOCfeJXV:EZFonSKG[EB;l]"
  211.     A$ = A$ + "9Q=g9kKmNZ=GI`V:bF6efF^ZWJ3b6GddTLSM_fnk\flUceKS:ciPBGeGXbAF"
  212.     A$ = A$ + "_Z?B_odOK=DDJB7EEXDAV98EVERB]iUZnk=2mgM<jcV8E>Hdjc^hUf:;OYSb"
  213.     A$ = A$ + ";#o]UVDKfYXgOi83d#UbUjYMiJ3g[dOSE;G\gS9ghTm9MECYba[^4YR<BDB#"
  214.     A$ = A$ + "ea]=e6bEXeIVUoSflcUcfaYY\YYZjX2J<N\SdadHK\_0mZebS?`6[?mFCN4K"
  215.     A$ = A$ + "3nU_nnmfo=nQQfEXKSb8m=SY?K<SnYJV<>fXmFlJOWSUiE_4faI5W^ToG#WT"
  216.     A$ = A$ + "kkLTfW>k03jYLB]=odWhTlaT69Kjg6CjgT>YOE^iWmNmGQ1m<5N>AaO_nham"
  217.     A$ = A$ + "mmDo:kU[j_oVVGW_\MfT17RnLLJZImPWD0BXcMFVOFP[#1];VF6MiJEM;[De"
  218.     A$ = A$ + "I0GaEFldWXEP[0C1N25Fg]=H;Q<m0TU=c99;OfCAFeLWZ?m9KHac#FoRV^\a"
  219.     A$ = A$ + "U<C]ngLEkCFTJgbBU3Yj2>lFFYY389EG057o81E[AYY6]4gNfPTGlA87Jc[f"
  220.     A$ = A$ + "\o8Wh2g\oPBiI4_DFj7E:<YX]S9?MOi[7C997SDV^oBC9FYHMOUWBdBa9LHY"
  221.     A$ = A$ + "RDSa:=TKBBUY5[DGf9HUJblXBkUTY]=F_j<RcF_Zd?R]^CG2;[9W4TVdfYDP"
  222.     A$ = A$ + "W<#35KlVZb8FYQlBdh2`PXDN:7FZ=[HU:c8:YQlSGZ?_S:eVcAT6;81kceTM"
  223.     A$ = A$ + "\ff::a3H7C7ETQdDQ9jKO]DLbBgeTSM<UWF4fWMWca:?MY[ZcF>NEI9ETNTB"
  224.     A$ = A$ + "KUVZEJ^XT\U9\_eI[ciag97oEj_AS=mP;f[mMbaage#=G\LQ^[EBiPKahRQ>"
  225.     A$ = A$ + "Mo<^EA9L8il7_>ij3fYdXbRZEIB5Z?O_cYjF^`aEMBEU_m\]i2BE6XnBT1eB"
  226.     A$ = A$ + "_EGPdJQY9MGINFYoJ;BJ:odTRdoO:;iXT>;?7kiOGjn6ZabT[=#kbC^bY]bm"
  227.     A$ = A$ + "?o#bSO^c8glDm;3dDeJO57B]eMebbVN#b\E=?hgnIXeaWYb<Hm0Ym[fWkLEM"
  228.     A$ = A$ + "51ko4<6dTmZcgi_R9=ZOEORhcN5WOOdfmNloS76`h7mC]cSeMn7oo_T9ihAS"
  229.     A$ = A$ + "LmAJ77[kH#XCJT<ZOK<YWMkoV:^O;>>]?N]gB#SX4h8HB>MD`TNFF45dV>=E"
  230.     A$ = A$ + "ckDlf72fe?Mo7[ZWHFbFGEXVMAKKe;cnlVGaB]UXg1fc62InbJDKKF^J_dBV"
  231.     A$ = A$ + "aT<VcBVJ0bREKQ2IJCDFn\2DFmLW^\f5<;S[P=?HK3;Mfk\QU4\\iU=?cF7d"
  232.     A$ = A$ + "Y0W9l=_2c^1\e063jB:hX7`jC>?E3Aa96^DAJAk[M;[SN0f>]]AGPCc0j7#3"
  233.     A$ = A$ + "#35TRa4J_l\=KA`f4\C1KF:Fk?_R<D>#VaIlTAFZ=[hm`MdUeX\UJe]iF_L]"
  234.     A$ = A$ + "mAI9YW[fVZBUCeRf^Zd4S`F_:hAJQS_NmlK:oDTjcAe8TmA=V3jLHM^7Q;EG"
  235.     A$ = A$ + "flM5WdBQ9Y]g>ZbcRDonSaGYalRGIKA[l`8df_9J7GY9M8UCN0U5VZ]=f7<\"
  236.     A$ = A$ + "2RK_:;<:kj`fK]XT][1[CY\T3G>FY:C<o4\cW]aabeQ_G>gN[9GkjcjlMai3"
  237.     A$ = A$ + "KTcIX6;Bnl?ijbijX:USDPMnMDFjfeX^\?Rb<b`n>HK\T]gVZ9;_Hin:6[`W"
  238.     A$ = A$ + "KFo_Y4mo\<DMMUZoWeAII:MEFFB3joCA^QU99[mUdXb`_eP];GYgVTcN\ZUc"
  239.     A$ = A$ + "gI]b[NSc8W^]:Un[[#iBMgPNODSLRV:GjZRLUS[5hE3fDUb9J]6iNWM8i5_j"
  240.     A$ = A$ + "ieci:b[Lm;;_le^RLocN:YWZ[#ROgk#2IZCa7WRUCg?eNNeV0dEQFZI#<N`W"
  241.     A$ = A$ + "`Sicj?NJSI]gdnkWjHmcSO]de3DGgiKJW=8F<_l6[GOnI1KC<OWha7e?[VTA"
  242.     A$ = A$ + "jKW9lK#STC_SWH3iiJid3iaGJ?=FT^H5<B^doA<9GlWn=En?R9QnB\G6]W1i"
  243.     A$ = A$ + "eGcCL4nka?H#No^LnQWh?\PI<EI5;LNZ]<[BfgVfP4a^fV\[e_6enm#<64nV"
  244.     A$ = A$ + "Ic[H9bl2LR6;J^CAea4l<Ti<aa917`HUi?5oU5?]9If:]Ri>=9\iSVVi8KII"
  245.     A$ = A$ + ";#fJX;dh=V?FFe2Tm_a#UXgej<oLTLhkBb<V385THDV>5h3HS3f``B\WYTDR"
  246.     A$ = A$ + "b\7R2\6H>D#?1]YM][Mj:Xm=;Y_I>67_Z6]]N9:[PjZ`H#kR[P66F2?bn^D>"
  247.     A$ = A$ + "3jKhhX#Oh5Nd3Il77WYAmjhFW]3g1>Dc:g1V4K_JmJ2gRSUnl=N4\<mNQ2fO"
  248.     A$ = A$ + "am>lC^oYmia:=3[m=L5h?`1HMh0`6PI`jV^9UMDO>aI<07caaQH973kS?3CQ"
  249.     A$ = A$ + "?3OPc7nFK5WR]?hH\?HD>V5W7KWmcaC1>3W3gG\O>>>?HGLmilijbfIMgibi"
  250.     A$ = A$ + "hIO9ZgS7an=fZJ;JkZ]SDPoLlBcDJG]KmHXKDI#mXLY2SIGBej_mjdO;mEIF"
  251.     A$ = A$ + "jcGe^gS\;Yk:bDNa;?PDTbM?^blNWkLAYL]^b5kZNUcTWliOl]TGh23:?hl3"
  252.     A$ = A$ + "HjXNbE>YbbZE_?bBiWU9W]m6TcgACb]6^7i]^cEU_l[mHi[mF_\l6gk6b5ji"
  253.     A$ = A$ + "HBc5W[LTM_EI6nkAWd<lO\OVLJ`S6:UoX]]WZfNJVSMlF9#U3=MolGVm4VX<"
  254.     A$ = A$ + "ca?1mllGVE01HnXelS[gL?Ql>`aTlh;G?JKnO7VTSah:nd_<jW6GbWeGfo7U"
  255.     A$ = A$ + "?1>nVSAhhK\o5=Wi:C1]TZ6<olbDlgk_Y9ke_K1<2O?3C7n>5\C6>oDl6c2>"
  256.     A$ = A$ + "VP3:8I1cTH;=?IE;RhD_4I3[HIFl^a?bhcHlYkBWIPF9h9>6SaP=h[K9caH#"
  257.     A$ = A$ + "KKUQHfG]V5>;IG[NYZ=D;bRa3a1:R]]F9ZM\Ni8kJSBLkVH;_59EUkPoEb>F"
  258.     A$ = A$ + "EK3jGDm:52GAG7f3JC#k25Jkkh6HK4JCX=<<2\IZ8E7DCiSmBAKJ:Z?7d=4["
  259.     A$ = A$ + "]mbd[7[kfF1a]OOm7Ck0f6L3H4=UGbBA:SY1UAhdc0o0]>\O7S:oSL0]]FJf"
  260.     A$ = A$ + "jL_EKV`QRG?7]=N1I:]EDf:?B]o;QX]BCiU^dIIi[jVDF#F9K;[9S4mEZ:Ce"
  261.     A$ = A$ + "n^\CbhNlkVUeWObZ=A9KKW_7nm2W5Om0?5F5\EHGdVVOgl<X1>VRCcnmbfZ8"
  262.     A$ = A$ + "eX<=FlIFbnJAeN1WSm33Pcaamhhhcl\TeIk\T_3FWcemmi^^LN^[9kSWYllU"
  263.     A$ = A$ + "SQ[5J7Q9gRnl]<mo[nDKbjXh<\?gZ^Mh>MFRbLE=ZXm16TED6faEFkaD^6[C"
  264.     A$ = A$ + "QeK=khTn;?CYkRCEjZXDTfDk3Y<8fQZfXf\bSihjGIRUUh1UZE6MC:7Lhj;f"
  265.     A$ = A$ + "hLLOMPe^HI#e^hgj^GD^oIjE^JO]JU?neNPlJghLbceK;Z^[6ENFcbY?Fmbe"
  266.     A$ = A$ + "7^;i3NdMUgjNGGNgWL?i]OdMTGhJWG>Fe5;k8\EjcF2lOJPN]kK6SN<N]1Ld"
  267.     A$ = A$ + "FIfSgOIVTWN>nUbO<k#DMBc9X9IiRedV`h<OY?GES6JUl`]6[5;O\aJTjI2`"
  268.     A$ = A$ + "Kl`69kITf^ih7?Kn9m\agngVoXNf[kWan<_l8S=IiTQnKE_7mc[OoW8\8Ua#"
  269.     A$ = A$ + "Nh<_Y>E?n0bKl5P1Q^cI<naIi3bBWmdE6c\=on\Ri7\USND#CDXcO>:_9HEK"
  270.     A$ = A$ + "c\]laQl2ThOC\[FQF`7cQ<c9K\8H#kJ]QJn4j#KIMb>FcBU3_me[fC]79e3_"
  271.     A$ = A$ + "G;F`I6m1U\?bQTlC8Bco;h7VbC;>Yb<lh35dPP_K[1V1ecej`X1R]kJOFZJ3"
  272.     A$ = A$ + "DNa^O9c8fU?of0O2V45dfCK=7GR2]GXhJSDWgf^`QHki[fiQ]1FK>_fO1;2k"
  273.     A$ = A$ + "]Po`f<>Tb3HOUXO_LODDlQKOoH_5<:d9A<bYDLRa8MGM9B>aXoNS;2E7FlZm"
  274.     A$ = A$ + "T7FemX]oD>E6A\?9c8g_]TmQoJK#iEhO:lCEA:oZJU_afZ<m4\]SoZ#75nD1"
  275.     A$ = A$ + "oV#Y2mIHMIWTioUJDNF]ITPd#f:?8WD\UEWVnL=USH5F_YLCEJ]P<\mEAb:O"
  276.     A$ = A$ + ">;EkBaI;]EHVBMIVXM<eT^b=b;=KkLlL]H95>>Fj>7nnLOV[Ei95SM]K_X\\"
  277.     A$ = A$ + "[1KSekYb2U^:?OYMUo`c`VdO7mGM1:g91S7eP^=FgaRZE]I^>molFb;9S9eQ"
  278.     A$ = A$ + "Za[CdBiU9eRbEJEeK1C2ND_UZ\n2BBj^\dTn[:;mHB#:;nm9W#]ITS[AU=1G"
  279.     A$ = A$ + "ZgZbF6\^l=VDOEUWLRV;cnoWn\j[f2<MUXK3K=oTgmAZ=NI;_`57#nj_mST?"
  280.     A$ = A$ + "jE^[L]Q?Vl:gjLbKoP[:gjdM;gi\m:G^oFUKNZ^TKOVNT?i3NC[l1?iiem?X"
  281.     A$ = A$ + "4eFfX\jI?3IjJK_5<1o=oC=[a>6IfZ]<`X2NRC`J;>E_ic0a2JF:?bb;DbaD"
  282.     A$ = A$ + "RAXoScG>2k\Oai[7W=IFlX6A\lOFNbW9_JNVLmkGGicLnSPgm\<<^O8gBQG6"
  283.     A$ = A$ + "d4EmN1<1S3Q_aVR^nhlbTVnDVXYkcUGeF\5dU;H:CblQ7iQ;nGVHG]nU<?cG"
  284.     A$ = A$ + "?`GHK`N2AiDTG``PF:f\5<a8KFFl^gn:F\\GbIU=\2i`K=<CcC27HkVVWLRm"
  285.     A$ = A$ + "PBlkOKVMFH_55l5<]UP1EQJk5UZ9V:Nkg7N4K3f4<:WMH\T2aY2ke`7d`]`g"
  286.     A$ = A$ + "=`0XmHWUWWeF\<]mJ9jgIeI#Oh9K\:\[R2l[\SJ?VNV2RkPV6;:`DL77KWUh"
  287.     A$ = A$ + "CDh?>MA`QHmA^=OfPQ^9Moh_Elo:GCl]JS5Z]7:_#YeBcGjZVbTRBBi^Y[J9"
  288.     A$ = A$ + "b;3MOIKKWmWOlZ^YD>Z]o:cDOFTCJ:7Vh<5Yi_EfG]iV^M\ETABF\WbBiKTS"
  289.     A$ = A$ + "?eYL:HE`a:GeSE5j[b8ASQEWN\=[WGmjeTBA792E?RZiBoNJBo>HO=TE:BEj"
  290.     A$ = A$ + "e?[`g[J?C\ffKG_gHKXU[0UMRF_nZYDC[Ge:C4mL\lhUGPYckHUT[nL95C?8"
  291.     A$ = A$ + "Johc=TCZZ>bh<MQ\_f;>7kjfJnIJ;kXHH25IlY>;=GSIeBnYK<b>D^EW`elZ"
  292.     A$ = A$ + "3SnE`_A\4mK]ZJ5K:W4<]=nd>YUFE6Fm:oZMMo\\5\iDi?MRO`D^EgUW]M^L"
  293.     A$ = A$ + "]XO:d`AOAMFNFfe^1enB>7>NFFOfa83e#n:g<JYoJcalE6lYS[f2VETKGfi:"
  294.     A$ = A$ + "3Fj[nlU_d[N?SAm^?hiTgnnGFn6_cSUgii_RlJgnbbUj]=iQGlDb=?A_bgjM"
  295.     A$ = A$ + "NMiCO_gDn>_gk8?oY?YTj1gW<KJS2S:PaKiB?jXVWZ7J1JkfI?QaHONbHggh"
  296.     A$ = A$ + "NZ_c9_X`oDdng=>:LiVn8mMm_^bcV72>Fbc^n8IGSlH7YMQoje:=Fco>T3X>"
  297.     A$ = A$ + "V4aCd?mg`hlJkF#CdO?JTDN2fN]Se\:I7[J5bFGnb\L^Ua?`2WXObllO<bRV"
  298.     A$ = A$ + "n4DM?4Kn9KUe^hP]l_Sl^UlISlYSL^;a3^39SXg_Yg9kH3GB=RmH<WREF3aT"
  299.     A$ = A$ + "ZB_5F_Jh=iVR]>\8:5ZJSP=Aom^]i:`S`V5SEYeaP9UOl7bh#hGId9aBlO4\"
  300.     A$ = A$ + "4d3AkOR;CE:?SeQ9URb6SOgK#RKW[cd`L\BcbHD\N:7H[6K2k\J]Xd=kOb9j"
  301.     A$ = A$ + "mJk3N2f0bfA;DQ:S2Kd`63h?>FTCc4[khHi6cn\[5lYbC9F;NeI5ChjbH<FC"
  302.     A$ = A$ + "a97W?nCZ7NOj_QX\]aa032F4<[bB;1O\YZPIXUBC=NK9<YZ`>?UCDJZ7e3GB"
  303.     A$ = A$ + "KoSV[Jd]S>;HC\]Jd[3L9h;EZO?5[<>FbfP=0oYJmjB1>E]jg=W3l;fFA7Ee"
  304.     A$ = A$ + "`Zl?7[1>TSCihB=WO6n\k4KEihP7A1F6K_AUGfCE5K\XBeOoi[LFhS`QjXTL"
  305.     A$ = A$ + "<]HI6n^=]FffDV45dZ2oHX6;a:h;9H9]E#:VV9W=S`^Hk7[T<==]7Gk?Qok#"
  306.     A$ = A$ + "G3W_cNDnoWhLRfBdd2;RcS2JTkZl<DMLZ]ZZ6<FfG=I[onhg^^_:Bgl36nl2"
  307.     A$ = A$ + "V4nZ_eBBaRQ8a\ThGFBb7bRihS^b0F<6A?eKM_;9OSgjabgl]ORl=O[GBNcK"
  308.     A$ = A$ + "MIiM^ceUgkNgDnNO`K9o\_aGFndgo=TWo\39[>hY:Q>m9I]7]hlYLXI<F?fk"
  309.     A$ = A$ + "=CeN76[0cNBnKl8\_3oQ3G2kgLlQA6g\oOSoOLl;gHlJTS]]AbTL5omFLaRO"
  310.     A$ = A$ + "Tn_fI_6L9W_S6WgbH#7h\VY4bRV[=^8Fn2`_?cAFldWZ\TY5T=NUHL<5fLVQ"
  311.     A$ = A$ + "\i5??IWQ^#I7VoUWS5clM5fRU`gjZlh[Wm\I9a3\C;7LCk`kFbBIAh;I\OZ>"
  312.     A$ = A$ + "]N1L3H4^]AQHG33Qmi>>;^fT[947ME34<7WN87?2VFA:WRH\Sn:\[SeIKhCK"
  313.     A$ = A$ + "dNQF;\U1]0df[D]OhdEk19_Qa7<dgm#eGUF??9cgD=XJXJ[dLTNZ]4Yc:;#Z"
  314.     A$ = A$ + "?_DU<SJOVN<fNgeX]E:;GY8mkcYQ3=KLNUVPbkRk`Vm:>K?`N6HOX33fG3:_"
  315.     A$ = A$ + "5]I6?Do<JnLfQ2S0m;UYj5hnULW1VAQa7UI?GCZ^3f6o>hhXPn6:LL`Y#C5\"
  316.     A$ = A$ + "9d91[2VTK9GOd81oQcaUS>lManH9OgL]X0gR_C\GTeMjYJFecQ]U\?OOgIVT"
  317.     A$ = A$ + "M]8gOhHiNV_7>Fn<[cnikT?kdZAQ_K7GT]cg7;Q_1?3^6L>N6bc]lEKhQQ3C"
  318.     A$ = A$ + "RWe`Xhi<<4jK0]W^HSA1kohH[?7HBIHf`j9o:Bb^N3eH5V_YilX_8H#WXi:D"
  319.     A$ = A$ + "6Bffo[lO3oggAII;mXf<beTnAP=Q^\NZ87CgeYJ]<cf=h#4?#d8A<38N03gD"
  320.     A$ = A$ + "aV?lkYjL<odS?iihicmX\\V:8NOaVljmeRl#e^^<?dfUkMb^ToVO`gEnWnSn"
  321.     A$ = A$ + "mUOhGlMU_dC^WlJGo2b[N]c;oAOW_Zl3nb__LWCfWTYf?O816P4<i;eXmDLn"
  322.     A$ = A$ + "=7OmRoG2`K<`Il#h;?Tm67?boYOMjH69?biC9h9<^9LScTAJ;g_ROTNfLgnI"
  323.     A$ = A$ + "HF`SVMP1:CMBCDVI#1:cNjCcCIVc#fgNf]\_M_=I1cNJF>V2CJ=;LnBH;HNb"
  324.     A$ = A$ + ":IlGP^9UG]e#FPLP`2EeD\9;_k`ObiV`nULDk_9VgHc4a07f2L6gfhc\>5d\"
  325.     A$ = A$ + "P?Yaf::X[Q]QVVAj38J_2GbIg65c6=_jUPm#^0Q^;\1<5U12CZ>lGBaI9iZe"
  326.     A$ = A$ + "Mc8bmJ]?X]1]Gj[^bmhk5]ohLSj#6;ZaLdndCSLJ9J[ToARD[cQMLaZL4enX"
  327.     A$ = A$ + "d86h9XjRRagfHmJc:EU_LDkcUVTZY9V3:EUJLFOihO5F7^4f8BK8lI3L9HBU"
  328.     A$ = A$ + "kEo7<gVdf9`>QEVhnf^a#k]fbTLE=Uh?9h4ho877Q]S_VHklIn]1G0Kg#S5j"
  329.     A$ = A$ + "Z8f>`XP7af#c4l\f;=?S=`e5F0l1n\S32cfaThhM<3^WX`fiiGKZmFL\h_:H"
  330.     A$ = A$ + "9`WL57K[7bi`:;b^>L?fI55JOGlMBQo3hJkbQaAbm<OTiEoD[jiRmMTkAMYm"
  331.     A$ = A$ + "C`cCH9hS9WOX:9n8=>1j>anL?n=ccb6;8M?nhGOncjHo:J7iiBfaNHYQ2DVE"
  332.     A$ = A$ + "I5X?cDmBIWRUSTW_kfTQK_A;?`KF]I^W6ZbffP=GSan6^Yb=MHX[JPJ:`\aS"
  333.     A$ = A$ + "H5B<3QodG]iI\WCfBY6KRm172]C`[HMHDDj]FNnXJ]eBk5WT<LS58W^eB<O\"
  334.     A$ = A$ + "gUNL?hTM;OogkEToZ_oW8bo`_D;o=bo]Oj_WleOSW8Oh;LKi3OlMTOhGi3T_"
  335.     A$ = A$ + "k7n^bS^dIE=1kBF`T7_5??bYcI?a9HL9OiH0i\9i#`Xl`YH9LYOC<YA^mAZA"
  336.     A$ = A$ + "2^d8e9=bmkK\^Yk?PA<NiIK^LnVL:HncH6B8cM^bBGh2T#GlRTE\\5;;OY;B"
  337.     A$ = A$ + "FJ8;D>hnfULXm]CK\KbHlRaJaFFib\a6ITKN3B>AXfD4cQ=]dlo?nf;kHfYZ"
  338.     A$ = A$ + "3J7Bfa];YhD?TUO?T;_\ThYC<X9ViTG?\dU??^hSk\U2Ma>olR]#NlgLTF>7"
  339.     A$ = A$ + "C>oPF5j[2]B`RbGI<5YeWaFTBdjnHc3i\;fW#M=ZKeG3E:]Z]oX>FQ96[7KP"
  340.     A$ = A$ + "Df1<4h7UWRZohX4GWDDV3ai9KmjW^D#l7AbW]WYZk9U4]a;J]iTYbgRFom6Y"
  341.     A$ = A$ + "ZUj0ff::aS:]DL1jmEbjcP8TdSh#FojHK2a;3kBhcHW2maCQfddV469]WM]G"
  342.     A$ = A$ + "AS0K3fDc5UYe^ihEEX7oE[<<hFlKWW3\?f6l<NVh\MU]17P[SCG8l3Jg3?]e"
  343.     A$ = A$ + "Rdf2jc3JKSn0\I5M3dnVRYOK4J#IMW6E^fXid]?Go4`licLOC1k]9>4D8OZK"
  344.     A$ = A$ + "#gFE47#li7nnCg6;Y_T\ReC<;Ho7Ci<7GeOboU^o7?Vb_#CJ;JO;eYgKdo4J"
  345.     A$ = A$ + "G_#g]HjE#[3LQ1KXD]MNQBK5WQeG6aITWAl\bml46D=H_ZbfXn#YZ=WEZljb"
  346.     A$ = A$ + "c#]9CoO^Hmoi\eoOSNGKAZFeGbfYDDJ99iVHLB679:YgV[ghB=Z\Nd\BNOkb"
  347.     A$ = A$ + "10lIe5>NMF^GfYN_A>TA\G9_<k#eMA<3Y#>>Q]SH[g`=DXdCUJoTZ>:\c3ND"
  348.     A$ = A$ + "WUTTdEIY8MFLb:;:EIXZbA>I]i;3Xj`^fa[Gj_\LT;fBEbKOSc;oaOc_Xl_n"
  349.     A$ = A$ + "Wo78bo]oLiOFGnGl3n4ikoiO7i;nT78Oj7lfbO`WlEU^Z[2IVC`ClY2NbChY"
  350.     A$ = A$ + "SODlY<SMdahQ;=UA=F9XAkg_1o9i6?m?eN[Aj?YWESTSGi>fWMoCKlC#VG#C"
  351.     A$ = A$ + "CFVbQLaVWhQ]<ef\55l<Ui7ld]b\VnDT5_PPU#GblU=_fE:7NgKGRMoZ]Ga4"
  352.     A$ = A$ + "Qe><Ym]K9k3O8YhhRb7CRH=A^gFJ:Q[JCDVSJK<L7bg`W=W3Q3A>52[1^3;Q"
  353.     A$ = A$ + "1E\gH#QOE`ObF>lTF\BjQ_39f]7VYYRl?TjQG\WFU^Z^8C;]Kl2`bReff^2e"
  354.     A$ = A$ + "WMKWnjbAemC1O`#OQ`QbFe6AKDHCUUL2BF:O9kX>\ZQ9=9i3^?]>LnZ=Ia;a"
  355.     A$ = A$ + "\S]JeECj#kGe`GXdGmeXJIRaHF`QZGIHmDKEfhL_B]n;<<lMna:=7[olVef5"
  356.     A$ = A$ + "X5Rfo5[l3f6]_Y]E<Z=^9YjjLl6H?\Mn\_H9j]M?W3[SMR^fV`1X=Wm\#_f^"
  357.     A$ = A$ + "no[4^=j^b?=Sa`BWMS\?bO6?k;9cf5J7CO0lL_oj:fJWkbkBdGhdL#1oZPod"
  358.     A$ = A$ + "ho=FbfhJ`WiH]lo<W4lUGX^ai6[C^TS]h\nP=G^?kQAkBmNO^P]A`R`OG`?P"
  359.     A$ = A$ + "?UM<7`hNll`Ye1=b7MG[gnnYN4<9:L?`_;hElkdRU8ne6O9Q=geEZ_aL2LUF"
  360.     A$ = A$ + ";_#U7ZfaYooEC^ZmUjok]EAAB]iWY]=:5WNbF9oTSGRo#kCB=b3Hl<doQmUl"
  361.     A$ = A$ + "<=Kmg1i;6nTj63eQbMZcNFMUNKabQL?aa8GcWhT[3MEI>nlM>a94KnH9nlZS"
  362.     A$ = A$ + "RBbRi7af3OEMVV:C6BePeOUi:MZ?3k^T\\BoETWd[bW^BG=:gIh>U_aKnlbO"
  363.     A$ = A$ + "k?iCUomOiOZl_mGoW:ol_mGEn:_jST?o;nlbOd_ggFNb]N>?i2eXmT[b<F9\"
  364.     A$ = A$ + "l7WaWWon;cHl<_1<JcGcDlicWa>N;g4LSmDdIiVK?H>1Ri28Vk=lK4cG#Tch"
  365.     A$ = A$ + "C?P9Kcc;F\m9G#e]]Z5^H9lM^CISQ6ZJ3fl\heC^A7B`Ce:;K1c#FE8cAFiB"
  366.     A$ = A$ + "EFebVW\^`2Afaf2CRLoKC>RJoCNd>8gDmX3AkWUnh9V8`S8><hc4d;Sn6;nD"
  367.     A$ = A$ + "N7_EdNQnUX?MlS4ekLa>cicT4e_3RQ=GgSEFnFojI5e1TD>h^\jRGo4mJSe8"
  368.     A$ = A$ + "jC3m?T?0hGLdlP=2>=0XcPea6VbmZ1Q[_KLJP_QhJSm#LnL]CBo>hJV]JS35"
  369.     A$ = A$ + "jg[ZLDFdQgWEG;_T>RD_FOUBEiUQf?I2JOTAHSWcj:<Ccn7lE3<?bA1^7hgR"
  370.     A$ = A$ + "cO?^aj1iJ0]?XM:]KY]3;Y]?K__J;bGNCbfLL1Hg`a9OQHMbIXj8g6lV_V^l"
  371.     A$ = A$ + "daiSFjOfU_2^LEPl8RScUOES<768O1;E]CVh?AQe9WVkXHEOXb?8g9kBkkVl"
  372.     A$ = A$ + "CTLUTlETle^Xhg_iW4f>iW8a#bUWT^lhfbcJ]?Oba`f8gOd?ce0okF^fO4iJ"
  373.     A$ = A$ + "8iB>S[UAV;Z\]nZ[#C;=jJ:#e_Q6AHE`F<o7YooeKeUHlm4gkF\l#0o8ANRB"
  374.     A$ = A$ + "n1`c1GlfHMGN^cc#jO\LmIg9K_:YM]]McUVYD[JGhY>FSbM?g9d]gXZ9[8i4"
  375.     A$ = A$ + "Z=JH39fTRmW\>mSAl>KZ8USDKiV^FHADO[0jkCoO7kAA[[UK6A^GSKBmo>Z8"
  376.     A$ = A$ + "OmJG]N]cA[kVYaRkBi;hcDGM0nmPo]8>RDP[Q>;dFIUbbejS[mBbf:7_\l\l"
  377.     A$ = A$ + "Vhhjn8G8>ES5i]DXLJeNaK=haT_l;MGi_Be<Qn9iOl_Bnf_o[8Od[n#imNQK"
  378.     A$ = A$ + "9?hi>[UW=Tc0CfKnTkbaYIio4\h\CIf1=IIL:7IZC<8K<G4XKnCK<SjYcc7N"
  379.     A$ = A$ + "W7PX0?Ri^\0mWaTkX]2fVaL6`^Gk6U]_Ze:[L^cGFf\V]4b<W^US#^LD<\U<"
  380.     A$ = A$ + "7I7[=D9Rm\99>6gWA^K9nXg[TRZM93E_BFJO#I[]YcFKCWL4kelE=?k9N85Z"
  381.     A$ = A$ + "J#bFKkF#<:SiXAHnDTHGAo4`NLjlYOk2mV3A9\_]:7M?Kfd1`oA>OG`e4o8`"
  382.     A$ = A$ + "omGY_>TCdB]V?:`V<l=NLkI[V^7jc4^8L9h9DGPc7nScG4h?3hB6SBeI`g;l"
  383.     A$ = A$ + "#HBI7m1=OC`ei\7_5K<EbeSa5N=:ca]Tn<Q9EB699U[Jj[De_WeAEkEDnK]J"
  384.     A$ = A$ + "MblEn;L9dQamB_=D^d\F7QOGlKfICUEo7KCE60S9;H9HoZ;?`Y`HGUfSdfTl"
  385.     A$ = A$ + "67mSL<L>\TaY2J<Mj;MWGSS8Fd`PP91[YHEKZ;73[9mX\hBGOFaJ5RE=mgbj"
  386.     A$ = A$ + "`:PI#<^IMbo?nLci5_57kcdJIJkQDef2Y8=V[nMTIDF\]_n0=ZfR4_]mN[>;"
  387.     A$ = A$ + "c63FB<VX<#MiZf\TQ5kkFbEI#UXLW<SF>I358mDUJcKdKG^HWEKg3>^6gg`?"
  388.     A$ = A$ + "X`_7b;<Ri5aVTaR6a:PlDRfTh3^1Z[LS;e\bQ>CcEKm7FhA2gh_lk6f;W?J?"
  389.     A$ = A$ + "8oT86KTSB4O;6KNUCn?ZgG5WVnOC^aKa3QooB;RmIecZ:MEOB9:3Y]JUSENN"
  390.     A$ = A$ + "FMecdA3be6\;[^9mMRo`La6PjZh__^Z4=#UZg3IJj^aVD^^=Zm;gUJWI;:__"
  391.     A$ = A$ + "Bmn1mnhSEWOBkAekoLme^UWg3e#UFl59VVTO:h_<f?57ST_K;F35VQ]o1ENF"
  392.     A$ = A$ + "?ET[U_ED>A]i:GYS:UQ[]#iTeG\lLZMN_`IjAnV_cSUoYodOR8oOng;oQOk_"
  393.     A$ = A$ + "Tlf?lVbKnlGG::US:ccVc:Njhmbbc9E35iM9cCHScVGk6oWQ9QFYW>_OhYhl"
  394.     A$ = A$ + "e];fMH;hB3N^bFGcJ\bZVglU#Va<U=^T#TM^jEJi\`RWjDT=_l5JlaXfm6UD"
  395.     A$ = A$ + "RJ_BF9XlU4E6TFb9iXULCAIA9Y]1efGYXjJbTH_3cAkk7oYB\?:Fi5TK:XE2"
  396.     A$ = A$ + "KBbAKg3W?GEO=]=Q3#NESM9`T`N;l70fG0[0=gW\ej\aP=nIUiJ7^fa^S=Jl"
  397.     A$ = A$ + "5N^CNAF^bH`W#df7==hg8daCne`L`37;JWMl=HB>OdPn8cGaA\7Cc4OgXm7]"
  398.     A$ = A$ + "Bh[5lU0JV`61^^DWTeik4NHN96]E:;c4URB=>Y0]oHVo;BGk34K2MaI3]NHk"
  399.     A$ = A$ + "5LHn]Al5ik2^BZ7J[NddX]C`FFh;<fhQY0cZ[ZbeHASL<c1G2^UKk^L[6=C\"
  400.     A$ = A$ + "?FbeRa;2j:8gVQ;iJKkhCE`hj0M;:W1ndKMkc:gmT7ch?mEM>nbSVQ8N#5U\"
  401.     A$ = A$ + "=6:HlClX;d[lMNoWHKKPJcclg17;LZ\SHKbIK[LCk3\<HLGXSZT?mmN\M]hh"
  402.     A$ = A$ + "Q]MWCd^L^f[#NmKL:kjC>6NZV;A^FO=JWcYKYDibmD_5CLbkIba`cXJGPU`_"
  403.     A$ = A$ + "QN[9OilZ^RcdB5bIK]:;_\7B]W\=\;DIEmECQBG5[];c>A[M7fcd#VaHi09n"
  404.     A$ = A$ + "1VeaW`eWAdV6=haUTh1m<6ib?NS?E=Sag:cdlC9am5==FoWJmLb;:H7H_7JK"
  405.     A$ = A$ + "\H1k=>44WEhET7f3gBeB_ZMPm[m;1[R2L3d#1;S[9aE6kE9_D`g3DHKX76K;"
  406.     A$ = A$ + "PcBK7JGALO_NOM:?h<39WE_nmY\\F;:CcfOlo7i415b[;hD7Go>#;5nZ2KkX"
  407.     A$ = A$ + "d]nKTOgMXo^JDiNmZ?K6DiCTk2gHXfUgo5^Vlh[<\l]nL_Zlgn7nk:OSgkeU"
  408.     A$ = A$ + "WoRWblY6SM2bK0;gaWToflb9c5M<7e5`HW`WQ9A<kl=7Oh=NL^L8H>16X\b5"
  409.     A$ = A$ + "^#cf\e5B8fL44ck;HS6SG\m\fE;A_c]9kOC[FfcjGQUCdIZm[TIL7bV[IP9U"
  410.     A$ = A$ + "Il7fHB`SbAiAILDMoJK>d9USb?HnnSfQFN2C<Le2i[2i9BNaN#S;U^Z5Qlj1"
  411.     A$ = A$ + "oILkCgWU_GXI0n4nn0oCJogAn9Zfe1K`YaQnJ`6<HA`C8NC=Xm50o1N4<8:M"
  412.     A$ = A$ + "[m7Qo>cgK\UMmC=DCEk;7WA_4G7Z3132>1nRQk;d;AO<X]V[AC5iYoAn^PAa"
  413.     A$ = A$ + "_An>Q3RN8VoMB9bmI?_X?Df?W7nUR[?nj5mOhK[T?h><k=6ZiZT3]aEJl4h7"
  414.     A$ = A$ + ">k^`GolIWn9:OQGjfbkm`[JcW7>^3W7k365\;F2CSeAG5On8k<<S]IJVD]1Y"
  415.     A$ = A$ + "Zj`LS9SFl>nJ[CKGRN4lMJEY6QlGn3nJbWoAGEb<l]H]AY]:73k7NDi<nJ?j"
  416.     A$ = A$ + "nTOi?iCT_o7nbfWQaPoGQQAn3VeQgZaVhLPe`nn^O`;:ObKo#S5MeNK#NkkL"
  417.     A$ = A$ + ">i?ogmSUglFWAnQOYg`nNHk`Qn7oSnM<^hOc?nK:W#IDHKhceGcboi_o7KL9"
  418.     A$ = A$ + "6W[G^W6]LRVH=QN\CXfSLU^[cdGag9fWllWZ3ESD9b#jmgM7^EIhjbCKgU]L"
  419.     A$ = A$ + "a>:G^DWEXl\BUNeOC3GGnfm:o>ILlJSIgL9>0AKJUZ<[HliS;n?Tn=kGI<ho"
  420.     A$ = A$ + "9h#V?b]icUh<]_^l1`i32Z;3CZ?bM0eNb1K\:[?FZ3BMNbOTnK\DcF=HA7_j"
  421.     A$ = A$ + "l=67igR;gf`?DT?3`J8O\:<f3K][Pi<XfNid:ok<]GWL2]>>J4kGK3<HmEXJ"
  422.     A$ = A$ + "b:DIg5KliNZ:OYKeV`>6ANZOZ6:A>AM5Il8\97kHI<4gAiIIUcZjWNo7OCco"
  423.     A$ = A$ + "8OW_`k:_m;LGiE_ke]LRNbnl3nH]LV>`0VT4D01jc?BD\l8PiLEbe9_jVHL`"
  424.     A$ = A$ + ">[9=9I9Z=IfLEf\WY=f=HN3JoKNmbQgf6TT2O_JK^mKic;\1JObcC[T#hfLc"
  425.     A$ = A$ + "55F7nDf:K2FE67iPB:Jk=d8USZEP2]9[`K\IY#O9H37??cfK>khbM8GnEcoO"
  426.     A$ = A$ + "\T?3C0m:hS0;GQdfe`OPU0O2m=9[f7NTM^9cWBXGiLMeZLU1>^a;ZGe2EVUg"
  427.     A$ = A$ + "=YH\4lM377JNP[i:LM`^>j_2^5m]ag7jghn1MCdo5jIHK`DHK`[\H<A>>YKo"
  428.     A$ = A$ + "XjfI>?3]m4G8dfac=>6lE0W3fYBmggEe0oa_nSTQKZBi_mWnkJSC3lC?il]K"
  429.     A$ = A$ + "LeQ?TbB]?VRK>0hjZ=oo?ocnYnlY_;6SL>TO4DgUaY7i41eO9o:MG3bEL>NZ"
  430.     A$ = A$ + "Kcg3Sc2be?b=cF=o?7[a[`GZhWY?neONinW]79c8fQWLl[bL\hGCoW`abEiR"
  431.     A$ = A$ + "hOZOfgj;Hl1f?nmQSQUHC5iN8[?#m5IL3RmmolOa?efnYJ]2[NooGobo8i^W"
  432.     A$ = A$ + "^;iWoYOTY1263\B\KhFWX3iojOh_SlVgi2ff9nDo;oUon:GZAcF^[?H;V>\J"
  433.     A$ = A$ + "enichP[gH;W^i2UW[kZ]aMfGj9GCn?mUNMYOe6\1D=>GmhE;W[URTK?#3Z=:"
  434.     A$ = A$ + "U;3EC6B?UUTLYSERLg1KF^Nge:GlHE8G[7JCGXLZF:F>ga:g\alhZ]TmFWWi"
  435.     A$ = A$ + "XY1J\#OSGj^eW[mFYZ9AeZeNYIHm7P=d<WBM<mg;fIS6ER93?k97V8n0Ln?U"
  436.     A$ = A$ + "c4[mO8aQkZmgVigMFWLN2]]mFK1F>CQOThoAbW0lE6fWBn^SF=\mPjRXA2m#"
  437.     A$ = A$ + "`PX0[2mC`>an>le4LYCYJT>QbQ8oX`GQlO?<XQKZDko;HbWmHEJf;CO13fH9"
  438.     A$ = A$ + "f_;b=HRIh?okm=UghNGGnZ_m[Jic4i=0cG#FN2PO_mKRnHBhW9F7^45RO7SW"
  439.     A$ = A$ + "^U>[I8[K9;b677<?57flWU\_e]BKN7UiLZD>d>]fMdVRH<#k9G^lH<1U3alO"
  440.     A$ = A$ + "55F7FDjaN09;ESDnZ=LhKklQQXf]TKBNlS;c_YaYGOdgLKU_n6gj:b]?I?FK"
  441.     A$ = A$ + "AR;2mMPf4Gn<27be6VflHS3kWn#LiH7<96GGXgi6Z=egnDmkAWCZN\G4k[#g"
  442.     A$ = A$ + "2fGAadXXk3kehn0KnHMF2S:=EG5\>:`Vhg<lB\U4F4jILacVk9VO9`WO\>5b"
  443.     A$ = A$ + "IX<dWKXiS2a\RHUkb_9NVb_EgHIQj>Xonoa_hWJj\oIO[_\liObM]j\YN`]i"
  444.     A$ = A$ + "cWe`T\h76OhFLRHo`HnL?jVn6_MD?6>3aj2O>#1^4f#hR=973L;geTf0`d`o"
  445.     A$ = A$ + "^4cIb=lF\HOM4c^>ghM5kQLnLaaRPGi6K4`GX`Ld1nURjaDOVSQU^h51_b\]"
  446.     A$ = A$ + "ZcJ=66cM7`hPE13j1W_?ii?G_be6XEKK`^8^g_mm^TlX;=XleNc7JSQIn^n:"
  447.     A$ = A$ + "_fmUkXJN^`a[A^HGeJfcMN]MSIOIEI8GnhE:gIhVUn[>Ci7mA_Vl3oR_ZDHD"
  448.     A$ = A$ + "ZFl4?PlZG^OiVmF_bRZD]O;GYR4f]DfAgYZE8>mcIKnDYKE;4nlmQWYCi2MF"
  449.     A$ = A$ + "YlQ?j:bKNkC;?nBm:GYWJU7MaNTKZL#n>_No=9GF_7#k7j6IL9g9fBZ;M\8K"
  450.     A$ = A$ + ">NQaQ\F8NJ`R8fN4?=ReWKlKcoO`Iho<Fbfih9?5>A;UKnaWHKB1f4o72SQh"
  451.     A$ = A$ + "aB>HISg6]_L\oPnlY?BZSQ?^Q9Qn8G^MjCWTZ33Nd#Zf8\imT]h9WYLoOkV_"
  452.     A$ = A$ + "48F5H3Kojo_GX[j=VhIJ_6;G:`?hoWnJOAi^WKHK^Be6G[TCUSKlB0SaO?n#"
  453.     A$ = A$ + "b[__AKddhmLa46WJGfT\i^3NOB`k=RE<kP\iX3H5YNXMKmMKSm2_f[BLOX>["
  454.     A$ = A$ + "[>?iU8eeMc?7Hg<S3<bkIb5jB9NEJ1]A9Yf]P]Na]o]KajjZ3e]L[CfWi;Jb"
  455.     A$ = A$ + "e6\16Kg:eK\YY]>jPP9aWin0mI`3Q1#1m5d^6^cij\ImiB[fjh[KH:XO2]?`"
  456.     A$ = A$ + "R#K6l767:h?9:HK55>>h#4S;>?Fbe0OIclj<cGdhk7f>a2iKm1_^Y=o_h7oM"
  457.     A$ = A$ + "=oLAo3<V#RIK[An`7O;i[oV?bRACBkKSVV1dJTiQgYTAhk#Bm0Ke6C9X7QLT"
  458.     A$ = A$ + "]0dIRMKkIcF\eImcM\6]jC<n8jB]_4M><g^jV;8a72Y7i^lU[XD`V0n_PSQe"
  459.     A$ = A$ + "MS1VA^ToKLS9VV;>M;^jXog=G60KRjEDWgbS[lBfC1o:YL9\aci?[^E6aUEV"
  460.     A$ = A$ + "3m?BOmH_877]eX>:J1X=877GOJ[AQf=X7PlFVfA<_VafXN<c?7dO?k7m0d>U"
  461.     A$ = A$ + "?g]Jc0gW43LZccm8kW__QE>5<=hL<75QV<bW#j;oT=E\a86^alU;SnXjcc\S"
  462.     A$ = A$ + "k;lT[Ji#8i[cEEm?mZJU`V][dEEBnA_=e^cMXWK^bej[JeF_:<NDCZ=JW^Q2"
  463.     A$ = A$ + "TWo4]9O_?hAbWlFgCNnCg^M>54m>\lni\]DRa\^e0=9_ae?Ql:GI0ifZ6[[d"
  464.     A$ = A$ + "GmbM>ma<V9\b1a6fJcc:mG7jFbfkl`BRf_3glW0\Fd<Bo2iZe_H^SYAK^W8:"
  465.     A$ = A$ + "Ko<NMMcS0`[_Lg=YlaV=]#Xo1oFcjDP1Q>9ZSAK<d=1KRLhPh#2OJPJen;Z`"
  466.     A$ = A$ + "C^?iRC7eMioMHYTSVHW<ggToV>okaH86KbMJN_Jo]HSAHbQPOa_ggBZ^P<li"
  467.     A$ = A$ + "Wk9ck6Ya>NOc9\1hMn70NdLl>G2alh:cG#d^Sa\:UdDMAdN1Mm`PLc3YT3#D"
  468.     A$ = A$ + "XmWI7QJ70\8bGJZWCQjmXWRlNVlPVa4;c_jeELfbU7Z;ifWOHiT]gPYCQaQQ"
  469.     A$ = A$ + "a>8^kH?WZ72]2`K#;QSk0;2K`aof<GlQ_1Mii8<;G\kML4d;1S1k_PgPOK`G"
  470.     A$ = A$ + "B\THg3SRh`AloHNY7m#HO67OhKLe6?Vk=W>>>?>>lM4kk6WXKi7menlV?]nI"
  471.     A$ = A$ + "Oj7K]Ub#I><Vf#?cKNk;Jfo`l>BJ7J[6OZ0U15o^F_TMTkfHBN6_]AJ?WI9e"
  472.     A$ = A$ + "AbBe>UlngVTSn<aE`VFN^j63`\4]>`C>eaZaH<`W8OI`f<no0fT;V<^ieF^6"
  473.     A$ = A$ + "hG3f6lXonocoHkjl?l;n9V]2Xg2nconOg_`GOcHoPY3;a`maNHMVOjniOW_T"
  474.     A$ = A$ + "i3;h>hC1Zgbahla>USS=MZf8H>`A`6ChCWZeZ<nT;g49_aP7NbFZdgcBj74]"
  475.     A$ = A$ + "OlIlS2gk\>G3KLMXLC\92Ok?Bo71Cj<]GQicKHBhglce9c1]eJfKMVf:EN^N"
  476.     A$ = A$ + "[C^JONdAQmM`Y^Fo=HfUMcnKD^J?eHJZ^J_EY]kbbd9MFVO:?IkbOfgi;8_e"
  477.     A$ = A$ + "]>YLoCeVJG6S[HU_WcA\an?<Y;Y7k?h;l:b_k7nBFi3O`UT[>#Sb#ZmNdNnJ"
  478.     A$ = A$ + "3d\ljgj<b;MeQef]mYfVfYZW\1KlPPVAl=?l6nM`_;dNjh33X<LVkg`nHdCb"
  479.     A$ = A$ + "L_4cC1^aR2S1B6WMH7f9KYJmk[:[`WM5HC7c6?;iJf_i\M3o=1?RhB23T_;:"
  480.     A$ = A$ + "]Ye1<]H:_1f95hXmjU51CbaU`n>dgRFFdenh;?TlGnCnNb?jKoafkj2kMJ`h"
  481.     A$ = A$ + "llnKam^N1mAXQbm^ZPiH8RMFhKJEfL74e=P3UCDkAi4kcbYJJGE#lkcCiX7`"
  482.     A$ = A$ + "G\OPAali<]3<^0S;<EG8<T]5jl=KB8N2gm\38GmTm:Mg#5B9Y7_4o1gY?]:f"
  483.     A$ = A$ + "hcDe8ibU8h#X=:j]_>CS6JAXm?ni6Oo132KRhjbjlMHi]QJg6<9l;=a;3V4l"
  484.     A$ = A$ + "5\g2O5Q_WMJSP7A>1LDe6?b30R97nP2mEOd[l2bYJ[NIOQ5ZI38<>lA>n47O"
  485.     A$ = A$ + "B3S2F7JcP;Bn^Hjidf>`I#[MTKNUfhU==U=UETkdV72ILfV`NfXYk6]VDPOQ"
  486.     A$ = A$ + "NJ\_ci7=\mWaC:<JF7N:o^LiV<_g=`_D<>SI<_l5O]G#n:_e;JJAI\8clQ;7"
  487.     A$ = A$ + "3ig<JEa>KgWilicL\4KioQodo0;N>bodOWmK0o[RNdoUojo4;N2eh=7G\hhT"
  488.     A$ = A$ + "#h6C0og2c3nggo;mfb;OccI[CNbP?LiH#c\SMfG3U8]EFFfc:n_dYiUo;aW]"
  489.     A$ = A$ + "^L>3O3`jL?#m7d4S?naVMf>g?D_P]S=k3YfCPoRYOAgLW`YK[JS;Q=QlLWf\"
  490.     A$ = A$ + "d_=aP[GE34cK^<oaQ]6XSR2k3k5Q7POXXOOSSY<<hFWZURTK<HSbiJ]DC_3l"
  491.     A$ = A$ + "Zk<D;V_`__bW>_bPJ8m8UW[cZTKeG3b[YjRnIOegFnaOd[8OWgiiUglj39WY"
  492.     A$ = A$ + "Y2DkWBb^F_eM>]l]O_7:OiGiVb;Oe1UKORF=OBMi^[A^oIj#N`i>^a:9FS>o"
  493.     A$ = A$ + "`SOea>:b71l_\i[7dWPf4MO4K`SaHB#k[Y4mI?L:Hfh_9h<D`n<WV9b79HA>"
  494.     A$ = A$ + "f4OVoSaV>lW9L;bI;6_04C^;Yj0hi[C?:<B^_8nY3DMfV_iL;k[b<ek]l]Lc"
  495.     A$ = A$ + "TkORO:nkk?i7mYbYjYM?c5n<V#6eHmi;kI6POFQg?6<?X]Y#GP\_=jQ7AKM\"
  496.     A$ = A$ + "W0OD`l66][<NTF:>Y3jIl6[mm1GbUO;DgSj[D?9BE?4L4Z317RiHZcMlV\h9"
  497.     A$ = A$ + "#\VP5AQh^Q6YRmVKR`?hMN3J#X>7iioUk[M;FKX=RjRXCRUhSKG>:IS1GMMh"
  498.     A$ = A$ + "P`>\LKdkLT1iO6L6NGk`Bd4M8e6<VofH>5`UGB`6IOkM=;cb7P8fLHbCN^c9"
  499.     A$ = A$ + "_de^P\cE\HCC4\=NOo033oVC>HB\`hg:]aPOBno2C2=T9^g=97IkQ99__=K<"
  500.     A$ = A$ + "m?m3NIcV^XgjZ=m7`_PAm7oMoHcoBhcXGjZWedDW<l?UOB>cT]nlPW9`[I^f"
  501.     A$ = A$ + "6F4l4hC<WLcLL#o=EYlGo7lkIc5;][egLSIH\KVSQi21FbiIc?DjB676\n[L"
  502.     A$ = A$ + "k;K]ko`GlNF<PXM?lRGiVGdFWHKBmEl;1\6H0DLf:NaNKfHDXA6k:IMR7473"
  503.     A$ = A$ + "[Cnb`WQEAl0XN0?_Xn1j;Qo#>Fk6o:d?c0=FQmo<<<f7oOcB^?iHLanl4]EU"
  504.     A$ = A$ + "?V4Ji#[5f2Rn1glS7mEClZYM4j1ci8kg^_QONYnJadNam4m_PVCZ;On>[g\?"
  505.     A$ = A$ + "lgoKnQb5EFe5EMCgA]5kco`;KfS1;RfLgC]Ok6:3jf:Sj5?OgbmD>5l9l;5n"
  506.     A$ = A$ + ":o=^fPbm?A;bYJ8?IXJbB^i#=9Ol[M;ikniN\ZQnDbIK_<i>W\=i^WZMCS6i"
  507.     A$ = A$ + "Q5n=7>8nW2OAQ_Y^WJ[gSE]D<oiN>mg\cWcfl6GNaKi[#?UWQUCfmYkSLDeV"
  508.     A$ = A$ + "oDD]]NlIN>NlMMINlY4oO2KR2f\IiTTnO1n`eIC7n>Pn5a^5bW0lcT=gS[jN"
  509.     A$ = A$ + "#37LLhT47Eh#DH^Q2O]=D]iJf1SMLXoTLe0]C_o;OOi;lF_\=?WhI>KK<VMK"
  510.     A$ = A$ + "4[=N7Ybl#dFGaBTm]QEKfE5gNgRe_=]E`OQTK\<n>`gTn:jWMS]3lK0n:5K1"
  511.     A$ = A$ + "H\Ybl0;n?VhGMj>JB^Pb39GYIK`K\a9UgLb1oi#^^R^3d^HSaOMiYEKi`gB?"
  512.     A$ = A$ + "hRW`HAF>ihM\kk6Ol>o;ibMBJg#mKhHXO1m<Hg6LSE>[0=MGXKRH_5^bJBe;"
  513.     A$ = A$ + "KR2nG7^Dlji0[1f3LA^Gim36f_1S3O91WR[?<;l;M\kL3fm6<ARc6gO`U#c6"
  514.     A$ = A$ + "j=iNdioO\5SnInd?l==oQS_`87ThN5ni_lWn3<VgOg?k7I\Dd4AQk7Nfin<L"
  515.     A$ = A$ + "5HAH;<L7d3A\lHkXmQlYcaPhHP9ajL\`OHL?`i0CRSWocPMQf:6[a`gPiidY"
  516.     A$ = A$ + "jN^kK\0VJdnV[5Ln[2>4]aIOXERl86K2Q7Qf8h0`T\gU0joCXC2f2l6F27Te"
  517.     A$ = A$ + "IO>MDXKS2c7eD70^5jY#?:i_3mGAnALZf[cRg>GoCgA]FK6ghCS2f0RmQ^ae"
  518.     A$ = A$ + "2S?^Fik#_N3eJ=b`]E[dSfFcYoUWIW^c6UGn6G#nTgoeTKLbSK<gKOV^UOng"
  519.     A$ = A$ + "k[8gG]_RL#PLYRlDPiLbCZ<]kOR>]i8YkdOcbkOkcI<ZGj2mHjYN`Yk#NSK<"
  520.     A$ = A$ + "\I3h=j_NcgC\n5>FIbS>oaUcf:cI:<?b5SLQf;gdOQMOTOX>oLQF\[X<^cgJ"
  521.     A$ = A$ + "Ub3?MgbS>GgbeekS;dBIBOUUQdBF7aVohjYTd\?3G2oAQ^6HB^i13hATW0<W"
  522.     A$ = A$ + "#QmIWXa:]bPeEV=ggQOVP=ALj`g^9_oMISSAV38XM\YMBO^R?`I\gagc0EY<"
  523.     A$ = A$ + "Y:cf6kL3YjT6FICTSUDPCQoe#O9nPZgV[Dnb_g[;cOZCfglJ[WgU`SaN_o`k"
  524.     A$ = A$ + "VdHgcf\2e=YN9m_kI>k9LK^]S2[3SRhfjVojagVTo;dW3jSXM2f6#kJn_e=f"
  525.     A$ = A$ + "Wim:CYNcCNl;<i7H6aN8C_1aaSj2l^TQg]<GZ_>\L2260]IY>:]iA72jhaWB"
  526.     A$ = A$ + ">=Bd6ad55O4FK6f?JlX=>iRoS^lI\iEmW[o>=mAXeQLXT_?RQ8\XXDV3nARg"
  527.     A$ = A$ + "iP`Z\g]QKKmV]JLMhmG8l7hBmGO5VmCT_8LM?lVG]aOX];<6Ro6<6;o9mN_b"
  528.     A$ = A$ + "Bf6gW<770Gj;nV?f6KDXg1k^Ll#\GTaY>?W`nCW?f]i`AUE1SU2fYin_Ri\5"
  529.     A$ = A$ + "j71VbVFjLme_Bd:[L[;O1fkJ=f>_kDfaZF\m^<Pg1K\T]_]E\#kM[2_[ghM["
  530.     A$ = A$ + "RkM\2_k3FmL2B2M6CDFWN\;LbSEFfd3#FY^o#VVObbWU^N`CBFa\WX\Vi5X\"
  531.     A$ = A$ + "^5>=IecM:n:;K6n;Q>c98;MjSgf?7[kHhJ\Amj_FmkLcQ<7IE17XIOo1g`:\"
  532.     A$ = A$ + "2\l]^\i9kK];clW9\nm_^#=>?i[_;g:XO0\WcUSJ`0AgSK^0Qi14RGnM?M?f"
  533.     A$ = A$ + "h33kiP==8l<U11;jTZN<lW9eA9o#87lO`U?UL>]_SGmFGbd92Cje_kUT_iko"
  534.     A$ = A$ + "Bbe?A7F<nc;^mHil9<9R5e`Nc_b7O^nTOh7n:bC>KgbGh1GBnB?jiD^Am6C2"
  535.     A$ = A$ + "fcS_#Gb3?K76?2O#mfZ>9nl=7X1iJmF[l2W[CCc5l8bAMJ;Onf:C>]nMRoYX"
  536.     A$ = A$ + "MmK[f8o=N]WGnhGnFb[nL39?n<M9_`YD>IWeHLQQ[>GK^f]GUAS?XLj6=]TY"
  537.     A$ = A$ + "kao0TO0<^IH>hTaABoeDRLjFZA]3cS]MFN1X?;X`hfTaC>cm3FLZS?2kjM:U"
  538.     A$ = A$ + "eSO]hgmPEW_aShkoDH_VZE2f4[S=LEWBhNdAe#QBkEGXLUCe_=?EkI^FKlnV"
  539.     A$ = A$ + "GMIK7JkKFR?L?jChoHGLeP9Q]6lnIX#en<HAhKfRe]S?S\hYaHnPiYaS6YUK"
  540.     A$ = A$ + "PlNfSggNeGLnBbAN89SHD^Vnk8cH?\TFD7dVK;H\ccHW0o4CN2i6W[lIbA8l"
  541.     A$ = A$ + "a3KcFgKn61k1]6>]jX;b5oLZO27JGJk=^o_eYjE>caJd\Y2]7`>Ni[OAi5^d"
  542.     A$ = A$ + "Y]lb6M?K:TiIc1LH[6<A:`UP;`kWEli4\;NoYn^?hFVmKhSKh2_mm_QI;jS^"
  543.     A$ = A$ + "bY]h]Qn<JWH\7mlQS#\k#o5o6`oDHG8L7F7M>l^R=ghSfNV4e>EKjdW9kHe;"
  544.     A$ = A$ + "CfiJ2EfcjFY_iFChSl>:8Ho7Uf6Obfk>5R5:;iMZ2KKA1j_<_9>FkmY2_SEF"
  545.     A$ = A$ + "g2W]<g06Sb0VZmkTgi:DhhihHk<G0K_[WdUlnIQ[9W7kKS;I^b\lKDfWimd2"
  546.     A$ = A$ + "_cJg\^]e[GoM\l59kIe;eh5DfmZGRaBFo2WY\5U_1gH7:SS]]MU7^CUm1kQS"
  547.     A$ = A$ + "Um_YU4\agfbb2f:^gUD\L7[D?WE<?IEcIbnfn^Fm2U`VO#j_SII_oYhHP_]n"
  548.     A$ = A$ + "i?EIK;=HS_i^FL<lM`gUkkUkSm6fB=^VKl8COKXA4mQ<FPXN[S7ANcBlOI^N"
  549.     A$ = A$ + "PUX?3=HT?RGGe0=\Z?Qh8LV>[C^f`MHal3F7_OT^n0];OjknBZFXc9?lDm8O"
  550.     A$ = A$ + "SGm1b7L?e6_nKEnj_fM\lOj=^e9UWGi?H77iI`UD=B3FMV:7[Ci>3fX]lU_D"
  551.     A$ = A$ + "?b[LYn<Kn`WD_oM>[LOe6AWoYnF_amT_cKm#i3_g5Uk>#;6kYWRCE^J7E[L`"
  552.     A$ = A$ + "S;?4oJeLY6OPlKTLR7^4nT^CE;3JFMc9a<^]HL^C\k8gc`Gf3Yl;bUBc6?_c"
  553.     A$ = A$ + "i><>mH^l[b\Bg6;h=WGVfL_7ciVGXmjUNen1>3iAYb27bd:Yf^EGNV69hBHO"
  554.     A$ = A$ + ";fcIcg_:3Wa<E1:;8di<CKlSHcK0<Gk?i0\g;R<^lim;\=GDSOE]Lk;:O<9g"
  555.     A$ = A$ + "l0\Y?Bg6nj6oJbkV#WF0lC<n4Z^2bBjXjBUF[\DYjlcFBWi7EU9AK?J36onf"
  556.     A$ = A$ + "Q=?6j\ESfXD\h_S6ZA<fk]l5B_ffHYEI?`nP5iVk:P5Q_#AW2f?1GReY^8\Q"
  557.     A$ = A$ + "cZf=R^V]Z]Y`^7dj\M_ie0l7l[=l7dZQN9H8H?7l#67:df3=9LnTOCOk?h=="
  558.     A$ = A$ + "]KXQj>WYOc_\X=2OTAmM^7AK5l<d9beU[?a_4=Il>8Pg3:ln:PgM:1?UaK_c"
  559.     A$ = A$ + "iGRb3hMIk\Whh\gI:<nPHNnUL3Si2Ih4[OA1KLU#WiD\RkMj4l:F2O5OSaBn"
  560.     A$ = A$ + "]PV?nNiI;a74>_;>2`n9?banIN?^B^TSNFgh[abME_O6V:]Iig_aJemC^OQM"
  561.     A$ = A$ + "DloPcf;GN8SoH`f>d]`faN:>6f?jMMfXI];lj_9JWd1S7M_;aOC\MC_C]5Jf"
  562.     A$ = A$ + "lQmQH;XKNj3o:#Li`>AjOTgiMa\ceJm=#Qj1h?CdI1W265lCF2WRgiEXATg9"
  563.     A$ = A$ + "hlNQPi:INFR>IfVcgRHc:jaQ3ahLmlMgXEH>]ffVZCPaXoi?F3b3>kPb0EG\"
  564.     A$ = A$ + "Z7ZOiCNmG#^B7e;G_WV<m<_fE7bd9QOT6X^LTfbk8Z=NaIiTicObFUGh<7cl"
  565.     A$ = A$ + "id7L_c:_nE7#N1mH9VN`PN_KO6cn_WL^^Tg#_>_c=?UY9RiF4VO__DKE8?nd"
  566.     A$ = A$ + "7Gn2goBbWX\__f;M3i5?G?bc?LkbelVCFTgYF<?eW[T354K=l[=aDSal7iN6"
  567.     A$ = A$ + "S[6VgBI>:5o>QF9HBMal`Ii5JcAbeUO>fLCAGUGTdBNIHS;`nZ\#EKD^flLB"
  568.     A$ = A$ + "oZmR`U6De5MJU3MBU;1Cj<lnbC]7Ul[`VKidf>a\g]Ki>YoNWcg`f=V?ehm<"
  569.     A$ = A$ + "D\kKGbA?Pb:RbC^nHcG>Nc?Hl[Mna^O[>0<:\YSL10k]iM^^SYTG2ahInXZY"
  570.     A$ = A$ + "jDMIU;iWLRBZA7YTILA;9Nh38i47c9J:[;ST\gAad_D?eE^YCVjlDgWlm1]4"
  571.     A$ = A$ + "^idIhBHgO5NW;=#[Ti[8]??j?6=o\4o;CM]3\nUK<2h3H_5nc6]>lNT763[O"
  572.     A$ = A$ + "`e_Bc6<W^8:k9\#mI37e5Ym<jS`F?^>\4O;Qn6H>h?:jk5kfPQCMLhFKAeT#"
  573.     A$ = A$ + "MKH6cNlSbdZ0SQgUYl>JRg3^cDg>_?;9g;2AkSHacNjBHZFeM_Q`\iAZm\QE"
  574.     A$ = A$ + ";7H;[Cfb:3AO^]?kmh<niSLiTWA`aQK0CQHFbhCYjlBcRE#JA[JIEMh9MhmH"
  575.     A$ = A$ + "l6f7aBX2]N7kSaG7Kg=6khlIK4S1>6FBNAPf1la7oOhb]MbO<gl8E;NWcc8G"
  576.     A$ = A$ + "F\aJ^gh9C<LHKX[g=>dIkdO<ik977l8?aJfCnlAlom<WOTaWIn:QHlSOOLcg"
  577.     A$ = A$ + "R\=?a=ZDkL7ilI45hIG#KoSV6la4mGP?b7ZUJUnK\:YG]_9Z_Am>KNO#_WZG"
  578.     A$ = A$ + "iTh?=d<ibK=j_RoSYn4e[hoFHJKH1CCfAXZ6\U>;]NeB=kQ9^U`O?VghBaHL"
  579.     A$ = A$ + "mnWX?UcDWLoCf[lBGjDb3Df5nIjB7_6i5>O?F^DB<Yj]lDUKZ[o6?g0b;Mn^"
  580.     A$ = A$ + "TO`Wk9b_g7lHikm>?#nR?hRb[MinU7LRfD^B[bMj_AiEEMCXoQU_ee6FNm[<"
  581.     A$ = A$ + "TLknJB^oP]:Od3^RlSoL_TlMOSk;_cE7F^K_=8gB]El^3dTL?Mo<>097Q87="
  582.     A$ = A$ + "Q7e[JS9l8lW=cA0flCZgieMb=F;?386bjoWHG1m7eCmeHcY:=FTnOAQi9EYf"
  583.     A$ = A$ + "be2SUGlgTnLk4Z]HmFBFb`<?<ECN:_<Gi4elDo:=#=I97_dT]LUPLPX3EgiN"
  584.     A$ = A$ + "gdZUY?N?i=Ym>hEkONNC;#eV]m;A_WMHe=Q9Ao2X1QL6ad:Y<8b=;bo8R1Wc"
  585.     A$ = A$ + "?ChoClK4miBMd>Z\HKNU7]M`OB=:ef\TB`VWZb91N7]VTb`>\=71EDb9HcK7"
  586.     A$ = A$ + "MFKYV__an=Wf8hLijmmfJ9NW[Iic`:a?3dgWKN216dNFC8V>:hDD7R]I5UU#"
  587.     A$ = A$ + "lkQo`BH:`BXTTGKePkQn>HZX[aY]aiSKZK27S[1UEYjI`nUeYJM`7;cM2jc`"
  588.     A$ = A$ + "0DM>1YjJVcdTe>_IHf>Q]?H_3;A_c^Gk:T8fn6=Kc`^\SN#mJ[?gSAk;8jm^"
  589.     A$ = A$ + "C9iX2Gig7FB?f8ebQee?TTBDlnZOG6o6=V`7P71_f6_bJOK<fUio\dSiP6SQ"
  590.     A$ = A$ + "o3a7M<_2TmAS`3gB[_0?cd`Ze]HY=fSIlKjMnc4V??SaODL<`T#c8jFMW3;i"
  591.     A$ = A$ + "JAo7XS2oS2[Qj^h?DRG8l7?_o3BehA6;ZP<li7EVcmM_[#L_kGMcIJX9RHMQ"
  592.     A$ = A$ + "69:>=B<o9A><CQcQ?3_Rg5]T3D^iO4HJ`XPmamTU_O:G2OQS?`a6<Gn6#^eC"
  593.     A$ = A$ + "1n5fRQMHH[2S;EbQ7d7hlm4fVAQ[]a9c=1K^4THi4[gn6aFe=Ze;f\ZUM;cO"
  594.     A$ = A$ + "FBdJO8IMXM9U5OTF><NEUEBNLOkQKcNG^m`ce]lb:c1kcNdIjddolY_ec;Od"
  595.     A$ = A$ + ";L5iaZ]GgX7mnZJ?foL]SkaN\;[J<^NGeHLYGhD7CiHm:_c=>]lNgl<bKXlY"
  596.     A$ = A$ + "GldM:gZ[J]b[XGo_bS_ZlaZ]ROd3O>ie^n9]k1b?8N6B>WNbVZblUTkMe2L8"
  597.     A$ = A$ + "bS9\M[B;OICB>Un<RiT0RIMkEDZ<#c=8=ELQZnPDT2?BTfL94jTjBgoPEXm9"
  598.     A$ = A$ + "dB5bEJ_BS7eOiY[JhBe6S>Ho6J3I^PhlMDQLf>[b6G7Cc??Sa4Vgg\g_eZ>9"
  599.     A$ = A$ + "6;]`S2OkKF]]H;fhFSnmaN8G^A232nTS7ANc#N6SOG9NF<o5C^Zcl_#c5#m["
  600.     A$ = A$ + "d=OQaLUHV:3:_S4[DHl7Eo?l#BbQ[jYB<NYl\b`\][^RbC:ViB8VWT\L18BO"
  601.     A$ = A$ + "iP9OW`nhNPUX91V3]_XO^QK]>;NN<oPBOgHg25N?]InPIYccb[Q`gfj<KCH<"
  602.     A$ = A$ + "2_g=\B96e6EJ7SO^B#I3X3Qil?nm7Ub=>dV2c63=kEi8[Ei9Q>c0Ui<Qa8[J"
  603.     A$ = A$ + "FZmCcOfb22HLfBdiS6oeXL8nNAo?iF05dKQ]JH75[kV_gPm1;4k39geAKSK9"
  604.     A$ = A$ + "gSXE5k9Io`;aWKDHM\S`=FQ]eEKJcbKNTboIX]eYae6gQNc98R;_;W^9gPjY"
  605.     A$ = A$ + "^R<kV`69Ro2aQQhDakK7\;RoW9g3AcRkm_4ik3]7ml>d=9;7OMc_fdnWh9cf"
  606.     A$ = A$ + "<FDnYkiMFDAYkmmPFFfbfb=IYY<SGKWUW=nb]g[;Z]KH74Oo3XeWI^fX;mN\"
  607.     A$ = A$ + "KEG1[cHU<SHgSWio8K<PiInHRL2<j=_<YbD>\J;DcFLc97RagY^aK2aWVa\2"
  608.     A$ = A$ + "n61o`B>dhbYHbQ?R55i3=775f6SS^K<D[F>9ckla[?HKFN3HicTnlj^WXCin"
  609.     A$ = A$ + "WZK]mMcF>2#QaDhUe?SF=N6A\]X>KBkKcb1GgBU]\TI9KLQCgF^gE_8K^LPO"
  610.     A$ = A$ + ";L_ahSiNWlhbC^hPfeVi6kKXJJ`We_l5jCN^>ZF]oY#E_ANfhL1kh`OiOhm_"
  611.     A$ = A$ + "PI[gm6^IUAeVZWZECod[SMNgjd:[jTbSDKo>_J_didRU[iWZ3;oU8VmT?S<?"
  612.     A$ = A$ + "8`k9Z^DF4c?BT[4hgHbiD6W;=bhVCONAO33g<i9?<nZdOSUIc?QUXU^[ZLmj"
  613.     A$ = A$ + "DYiCY^:93c?BW\j\DMBI8W_9UAeLnbIK^#K\:C^PeOcU;MDKafLc3ajWlhf="
  614.     A$ = A$ + "_MKSeFVWU6oh\gmL`THnA<7]?IGmKV?6MfZAa=o<2?bbeH\cB]c1V4coZ]2?"
  615.     A$ = A$ + ":[D==M`#c;fXD]EAH<YLSEe=51aT;Jef]<UJb;OYNUgFEnI[fh5WiokL>RWL"
  616.     A$ = A$ + "oVl^dN7aV`Q\hlA>9#^n#oA`U`6[M^Z#<60fHAoih_4n<\8:h7U8gi6]b1f\"
  617.     A$ = A$ + "b9fjJU3^U`THgkF]egIH;CfEHZF:UoPnU3^ieZfL]4K<mAIS;AiIQ<OKKKII"
  618.     A$ = A$ + ";DelX\]=\6Ik;KABTKNMB2kIkfm1O?`LHMlK4o6P5ibmBH;^gQ1`JHMf>JN<"
  619.     A$ = A$ + "OM[7?jdX`jLlhSMgkI>7?RcQ[QCC7L=dXV]GomcoI4[1glG;a5`Ucf^gg9Xi"
  620.     A$ = A$ + "5>`3_`PbobOiOXl?lWl3UCeFUF>VlOoGlS]l_idJK?baCga3ORaDUKn_gCn8"
  621.     A$ = A$ + "6WY12kL8n1X?RR?KiDV4mobk0=ZcOlRb`:X[_]\CDj<_TUSCN=Y;O`E>Q8bo"
  622.     A$ = A$ + "\8oOo?9o9oX_UlOiGlC4iOmoRlgoGmcT_nWkE5iOkODTomo1Kn_#n_oG:bOo"
  623.     A$ = A$ + "OVef=f]\Be>S8]a52cUB<7;A>kALi_Xbg8WMX`LG=SKDFR?EHn<QU?G?e;gX"
  624.     A$ = A$ + "oF==<\=n<aeWaQV;WPX];cA1X_Qi55R[6_W97F]e4VdUj^9C;5U;kUAQOU^e"
  625.     A$ = A$ + "9>^mI:<o?bnaVCgh6l8kH]6KJ[Q<K]>EXfh;2M9`=_haK`^_8gSNPZkQbm7Z"
  626.     A$ = A$ + "=UkdQlEOYK8O`M?Wli^giU_okm8iKmVgENgKSOUJg\o3KeP;Q6:dF1?jE^H_"
  627.     A$ = A$ + "b;[5bilGiRmKnm^=NO<aHC;oDUn:?GKl03G2V=<9hoXo4VdP:oVn_`OB]ELN"
  628.     A$ = A$ + "jokiHcOCeTI:fLT:c7Zl>_XWbcgRk6jS>]noaIK87iB]Z\XZBCjY\D\oG8g_"
  629.     A$ = A$ + ">K?]Yj#baR[6S[FN_;=S9jIL^5Pm>je?KNVTaBbQgaFTnJZ6K^63KF`7]T[D"
  630.     A$ = A$ + "X9RhFcHkPH7blGTKloC^;cabBRC=c?T<G8DJ2aJ<Y2R;6K>X^`4RcV7GCG]U"
  631.     A$ = A$ + ";gSZf`UNZBYITVDBVYJU2Q5ND?i0XIoPgg]I`T8FOYMX]KiGXc>=l19JAH\_"
  632.     A$ = A$ + "`k_=\eJo[OUVOLX0OPfleckkVbbc\W1F4\Y8fa6\UDP9]9Ug`k;>\_Reaf:f"
  633.     A$ = A$ + ">5d<5aFG_bMFWYQReIn#?jM\9c7mSdF?HS`RPWPo`HMH8\TkG>6n\;nK^L6g"
  634.     A$ = A$ + "GLhDN4\7f>7?o6Ho``Li[07;f<QmCVO`>h><kJ979L_cDLie\=GGhM<mhN7a"
  635.     A$ = A$ + "QF7h:dFi3NQK8OeglQVo5HN>QflgjTMJf1aa37b=V?X]4W7fG1_RlWSLK1Kd"
  636.     A$ = A$ + "Lcg^>KeHkfLH8cAQ5VYLlBbaN_3eJNYIeokYd\U^EnDW5jaOhOUgmU5ioiOW"
  637.     A$ = A$ + "loh_n?FNn[MFU?m_Z8Zo[bWlA_S7NTb[nio>O=SQ:bo7bof_l?A>McE8UZLF"
  638.     A$ = A$ + "bm>RW4miCNFOFe6<h?lnZm<JkK6omWZYbU;L\J<f3L9VG=`_>hO5RK?io<iF"
  639.     A$ = A$ + "<i8m]DmA`VH\V`lV?So4VSWH>ORi7:bm`:8g[d_Kn>P1aHagaB<NRZIjV:Gj"
  640.     A$ = A$ + "^ZF:Fof:ORHaM1bkB]L]nKcNGeNjF[b\ERh55_bXfebVS\[U??Ig[HnFnVch"
  641.     A$ = A$ + "B6K]^m#7CNlika:hcj?ie^WleOUKIaOSlaTiV0H>\n7m`;[7CGFin3eR53^F"
  642.     A$ = A$ + "b<F;fK`SNIeVAbUBb[BbeK6C]flnIIIJcg2lO?j1`^IbW2Rc8jZMi:;njfV["
  643.     A$ = A$ + "NlnngQiH>bG9VChiJaLlRWicKE_4c92UWZaS8NKT;mHc<naLoJooCg[n8Rk?"
  644.     A$ = A$ + "SgO7C2=BDHnOKC;?4Yl<Cf\W1>3Se;W=JD74^4eo\emVod^i04ghCULld6OJ"
  645.     A$ = A$ + "9ODYlT#WML6GRiHKVWkC;BEC`AH>D<9S;UO:ZNZdBbHB4?>bS_LR;lAH_HDf"
  646.     A$ = A$ + "HEULPVlM6=BhCK\=3m9DHMhA`W#W25JCcf#;DdkNcVoNao^<FOgnZ3aN_`]a"
  647.     A$ = A$ + "U=OIEcKVFL]hm3gNGoZ<mBH7W[L`=^6[0C2kifiZFZm^>Sgmj`X#33L6\Oca"
  648.     A$ = A$ + "OP9AaIo5\8:>m?>F3L5gHoeI;7<9HY^eaW?^gi5>knL_O2n=aT#WTS9Q]K4?"
  649.     A$ = A$ + ":HA`I#SSKna5]WY5nf\L<SL_?nm\N;gG;`bgS8mm>6SSg=_USoJ\iCPDRel="
  650.     A$ = A$ + ":n]QeaWA^g]]XQRgO:F>gUC:6GZn<d]WD<B75TV=?YeJ>9I_;I]aQCmUJi>G"
  651.     A$ = A$ + "^9Z<C]OkbdmE\JOG[EGXLZ^J#ZUgK3ZmMToS<_RMNEc1j_`N#h9Tob`MP1Ic"
  652.     A$ = A$ + "5RZMC\n9K\<SKP60\i2m=e[f^RF7V[T#34c=e`YP3An7C>6SVYGBeL`hkWi;"
  653.     A$ = A$ + ">V;inR?ijfl1e>2IFB^A^;il]GS=gDC>?IjPD^4f7N2mnPUWY]Z]gGf>n3;Q"
  654.     A$ = A$ + "=akBKHE`\HKG_kV]2G;:h;WHenNGol3D]eKZB<KN5B>A\CK>DkVZF=HBh_Jb"
  655.     A$ = A$ + "90\Q3o#MV6;dlE3<:d9mbGX7i]ILnZLZGl\MKnIj3^ciUgmVWA^mP]Hf^ak="
  656.     A$ = A$ + "LFfOeiK?K871H\g`h3Sj34[0hAH7?[CLCaWL\=le<fVBl58>24KEZC`L50J9"
  657.     A$ = A$ + "kekeOPZcaSVc6m<g?<PnO5j82=hP<kcH^j6MBnNgVhWWaj6JThMNbT]ajfd<"
  658.     A$ = A$ + "kgHNjWL7:SXlHOPUS#YN4;No^aN_=nE9ORScSO^Q9AlQ9onHLZAabe?___2A"
  659.     A$ = A$ + "KA2kOWfL]4i5#N9YmoVC6flnJY:7TLiVH3Q_A8oo`Gj^HlIagkPKc\=WL8T_"
  660.     A$ = A$ + "KJ7SmB`S#G4nb1O9c_IJgCLRH^#RH8Q_Tfj:G\m^h6>4nHRac7iU3_g^gTbS"
  661.     A$ = A$ + "86GAYL6bAX`E]#H77_c^I9\:f6nK2F4f`A^<4gNfVa4Q_`c8lK4\#W=KXY1^"
  662.     A$ = A$ + "4L:^OQo0;1K<QiPORiNTmaah\WcYQRRcn>l[]kJjlUTS9A^FBo3T32lo3nF2"
  663.     A$ = A$ + "k^]LK?a3KjTLfOSf7\oVW_HG6ii:caK<>j9_GILabWiHMcI9`TLSO<>GFRMk"
  664.     A$ = A$ + "H[6L8R_6nBRa55K7]Bfkn<U7Q=Lh?KNoebk;b>;9?KNG]^dB`ckcfZ:BkCjX"
  665.     A$ = A$ + "BCZ^oBc:9YKliZZ_RB[jn8>P<N8?caKbli<id7c5]WYQ:UN;=?c78`MJ:KN_"
  666.     A$ = A$ + "KT[L^F[E>]N=j]2VGfZdR?=5>>:l^Y5MB`M#O5cI]`eP7al17]ONbUjg6OIg"
  667.     A$ = A$ + "kd7cVch`g`X1[Thg_Lc1JC^c`MHc;UlmBn8ah]oAGL8i>W\;iQWO0K<h37bd"
  668.     A$ = A$ + ";YjS^8ffY<:FBN1LQF[F^Dke:gXWFTkfOkbm7\3iVmfZLW1>VL9U;A1kVHnn"
  669.     A$ = A$ + "<l=\DI?[JnBh[KAB\KOUV=TFNAZfaMnV:abYBbgY_gkn2bKN]QU_j;NC;fo4"
  670.     A$ = A$ + ";>l55i^dKM]C:?i2mJl8gL_6J6]i5b:BG6De3bk:gf]iDVLlhokj;ch=^gmP"
  671.     A$ = A$ + "`U#k4c10hKLR]0c=BH?:nMTl;P?SohH<2chOV?cLj6f[1W8b]_>I6n=:;6Kf"
  672.     A$ = A$ + "kjjaiASTm^EJ<NFgV[TdeWkDVT=_:1KJYcNj6GRg3#D`g5FLYdjm`RLcMAT_"
  673.     A$ = A$ + ">fLUVF7462JZ86iflk_gi6FkM7_bKLl]dSl06?Ri7Ob;0b?0HBEXe=9fe4O8"
  674.     A$ = A$ + "\Mc6GYA]7On^bS]2kgch0Va3?ci\4K>]m:f]Q65d61K2>U[`n`n<l[=nA2Vd"
  675.     A$ = A$ + "lVRO6;JmQ<GK^iMOZfWM[<W]_V#U]Yf\A\a`oB`Rfo6mHK7<9cogk1kdf^I?"
  676.     A$ = A$ + "7_W^hg5JG#_3iF7a=We9oS`OFSdV;HkX_QH\SOlQchdEibm0R_5?_QkhbA:7"
  677.     A$ = A$ + ";bUc2Fn\Z?WilIo^gYhlo3mIP6YAZG2oKKcG<NSC:?;ao#>=CX;2OI2?2oga"
  678.     A$ = A$ + "ll#fA_KCW4fZAl]J`V3<lln8H]c=#i#[G]]M5Z=^Tk3ZVe]_\iIcSnKH1c`n"
  679.     A$ = A$ + "<c5X7E]?>JmIOIZ=c9ZjD?Xnl=ARObQfSTZbcCSg?3JoFloNFJo6EY\[ldnU"
  680.     A$ = A$ + "V_nOCnYL49cS6QUo^9Z5dj6nFFSWgoB:k9aM^AYJ]?PR8n:je6n3nbXl4RB6"
  681.     A$ = A$ + "^>67ZU;3FC9F>2e_beP9Qn9dEQ69d6POW#KdUj\>[oMHDXMR]aLKdo?TggML"
  682.     A$ = A$ + "BEmEk?k\UIgIfN_g0f2eUb2kB_gk`B_3B_g1A###:R505\[ADSU#d4kmF4k6"
  683.     A$ = A$ + "kmH\T4eTXafKJ_Z?o>?Wkm<LILaHNS6ckk_ohkWkMVi>]kmnmikciLN>Wc>F"
  684.     A$ = A$ + "a<dlOUf^A\:eGB[J>QOoKWj9D\OTh7\NNCK`H?^ULQ^dm\5U;4]SKO2ndi:l"
  685.     A$ = A$ + "U>OJ;7i9MJK#\eJMhl5\8R3M`=^L\oe^H5OJoKHI:o9R]MYkM;hLgfJ`Z5<P"
  686.     A$ = A$ + "ngaZeN\Mk:9EdnRC1;[Q1XaIkf_TcF[i9<7CfkZV]F3jX_R8G:b;j0KHAZ_a"
  687.     A$ = A$ + "?_CFnO:o?HmbTnGSl59gB^obVj#5LVaPCC\kK7[J^ZV<dnbbbWWZ]1R7AN#d"
  688.     A$ = A$ + "7gDCC4WIkbge>Gk9QCNQRMO;`IXilVP5]1FO[Fa9QCM5cGkGE<V`m_nfRVUG"
  689.     A$ = A$ + "6Z^k8>4keBd^\<L]MSLSXoTh`boFZIBjGY4MkW04WZMED^6CjY=b1SAgg^[a"
  690.     A$ = A$ + "VRa5SH1LNXE_XiPcAhlXahf_>X^0VUK]XfjcE<6e4cQ36cJ6K96WY9;c[I<g"
  691.     A$ = A$ + "H>V#MbHi8:mGk4M[kf6>8eN;aMHleYMITC4O\iC9^eh=a]D_AlnIRm`JL#[:"
  692.     A$ = A$ + "=GDJ6Q#;:>Kdn::F]QSjX^nFEY><L9^?]g]g2f3aU8Fd8TiBcL<33kMc[7?l"
  693.     A$ = A$ + "]mc`U]_c#eHe]LEG:^hm^3EOE\N3cn20ig`_OcOeV_Yicc]4OQLi8FTjWJGM"
  694.     A$ = A$ + "iaSUHDlhhiC>h[ccell:?6N\L`7[j;MH>LE]LGQLS<l8><Kg<MVA^V4KRh<4"
  695.     A$ = A$ + "gaZkA<7ZI=_Ufbae;]GWHHFoWRnSVnVea?O>e#5^^1icBo9=6QcF3bedi9H:"
  696.     A$ = A$ + "DC`C#\GVjYSe_hA;o?H==PmLcY>`nXmm>Zo>6kUi:gS\V59ljkD=Hdba\li>"
  697.     A$ = A$ + "M]g9#N[dVKjo2j_2f_\;#^WM12gkI9L_[_Tl`BTkMVQ\O;c<I\ii>3<Aijd\"
  698.     A$ = A$ + "HOOA>fa:[O<=aNma;oV6NM]2C\?eYL38V2cMMRm\CIn3mY4c=DR;An#T;bI^"
  699.     A$ = A$ + "QikDCU4l8]VU8KI^_bSWn?Wf5Bk5Im1ajaJL#oGIe#BRIA>ATK4aKfgjG:>G"
  700.     A$ = A$ + "Iki;HALLN2NdU_eeS;HS2?[MLbJONTHGJLlf^llknD`nfnJa65LUQgmfR>GI"
  701.     A$ = A$ + "nXSUVYVWo<_fHlhh_Ij;\m]a5Q;Jk[Ack=^Ui0g]OiW;^[3O8L`=_B7^P\?E"
  702.     A$ = A$ + ">Sa4^GRCoE]TY`n]kXaNH]blDFQ36T<OUm3CZ=Bj;ke>kYYiM:eme^Gg2aj4"
  703.     A$ = A$ + "^E[LV37[ONS5KA>7Mb;H22ndTDkjHNB]XYgPFO67#Gk0:<MQ_C\>fYU4i25K"
  704.     A$ = A$ + "d>e00F7glkFSTR>JTNla[J1PmJ9R=UP;F4kMUUTQS]NDS0EGDN:F4mc3kk0d"
  705.     A$ = A$ + "W?LMJ;Vffl4;NA4Oble1O<]WQHBJ=_F`KXMDd6=[6DC]c#mg`Ne1eB3ONjOK"
  706.     A$ = A$ + "bkblG5W[IfQ#\9c_;lkUcMY]C43RaKShDVoV=kXjL[JVb?Rh#EE#6XIiVZ^?"
  707.     A$ = A$ + "mW4aTj#EU76;RJZVfaa7C=;BL9bIZOMZ]:o9cV>JOgjU[GWg>gZV72kJm[#h"
  708.     A$ = A$ + "f>CUO4mc=aJ<=QKH<47Qf\In2gR37gbWS_VICWQUcc[V^A]lMa`m]e1hiZak"
  709.     A$ = A$ + "6c1ZWM;GTYV^<]0`jn6ed1aE879Jg6mU4aVhJSd>QGiXg1^U3O#ES?dV1Re#"
  710.     A$ = A$ + "NAdn>j;9CC6d^=7=Qhd[Z]JiZ5_=f;NYMK\GaB\Y5;H;4GRi`9e:bR6gXdhb"
  711.     A$ = A$ + "bN^1iJBNb43J9RMH4KJaba<OJC[KoUJM2O7FkYImQNSblT=8?77KB\1lD5<X"
  712.     A$ = A$ + "=9?gY8HKKM1cFOn]<_IRU9Lc9>eD5NiC^_MEi?]HFcoWoDEoOclXgZm8LN:c"
  713.     A$ = A$ + "KFR?YicnRWZ^UHB<7m9g83CR7?WKcg?mm3kS#NmG=]QSaFgja7dWC4;j\5N#"
  714.     A$ = A$ + "WiZGXJ_f14L9R7M9KKmRmG2>dFF;>djGVbERf^M0icjl5NBkK[[A]ki\fZHC"
  715.     A$ = A$ + "gNg\6o[bCa_`g\H<GaFLV?Kd6^ckDGQREbHcMQWVHGifF5^:afc3O6K1kQa8"
  716.     A$ = A$ + "LV=XijVeoZX69HmDReQ9FCV>Mioh>Fm\enH0i1AKfH^FBO^\ni?;\_=_1LNK"
  717.     A$ = A$ + "kDLjc?CKdjjEKJACB`U63f`lK#kagTW5[i;D3Vd^YJTiSI6b1G9Hd>mT4fCg"
  718.     A$ = A$ + "Lj3^>hBY:fUA<9ZCBR3aARnm[3[Ngj]NLCOPC=;e^:TiVedBdnZJZJ?g47fP"
  719.     A$ = A$ + "dnA6eb7e_7ea7eV7mM<7DK=Tkc`kEm:VSQc#L8Z58kHhnLnXRO9g_XmBP1gK"
  720.     A$ = A$ + "MObaRHJLN6e8>mARf3B4>1CeeV=>oTnK^kR=EV_K8f4ck23KRHBleH\f8^4e"
  721.     A$ = A$ + "X4aQb=DdXj2cDkS1\F\#\7Jk6aVX?U8VDG5^A4?J0^iSL?MaVj8?6I;aYWk4"
  722.     A$ = A$ + "6]f36ljkJR9AL5;nK4KblWTQ=aOkV]IVOS<oRcg[M\WjbG0^VcOOJ=EP7_5C"
  723.     A$ = A$ + ">^_5[>nn==[B]TacE4KRK3_Ook\VGddfGF?d8G7J77]=VlKX>DfcjG4ne?em"
  724.     A$ = A$ + "Sgha_WScOB4[aZKg4GRlU8V4m_TQ1iU;5O=R5Ym6LaV\5:[3]`a>L\R9g0FV"
  725.     A$ = A$ + "KO_ViS2ed4me8aMG^PY\0I>`LTcWD?8;HZS7;LJC#SGj25kiX>LIObVO6<_Z"
  726.     A$ = A$ + "fXP5A<X=Cmo?;7<8nLWl\5lV5;fG]l5ZKic[7W[oT8_6jgKR9ANA<NM\W6<Z"
  727.     A$ = A$ + "^d6<^Nf1eGAdoBTc1e90e20aT<\8nLd>>R9Yn8G`T>Kaf\cfen<nhm^f5YlL"
  728.     A$ = A$ + "DoE;LS>P`3RLS8FdY]`IXnfOccNRHg;M>h\5<ZcANncF\AJ?\6l8lY8f5aa8"
  729.     A$ = A$ + "?Ym\A7N97LGK2kD`V6KOkTHGLVHXM\iJ=7i\Fk2aI;leXnYHm?We2HFWdn97"
  730.     A$ = A$ + "L?Z>2864S36mQ6mi?e09kUKlj5]?cd[0i7anH`BWiHdLUPnEPmHmmLb[7kJ3"
  731.     A$ = A$ + "[5[I>cD\McYWcaJWPf_hV:e<k#4<X9YhI[NfSAhbG7J_H;ON96SR55?i59H9"
  732.     A$ = A$ + "IUJ:8mTBDkmA\7eV4cY=IT:k?]lan?fPJhV3nnc9i#Zo_9ND8GnD4?[IiU3b"
  733.     A$ = A$ + ":HLJ<kH?SSlVHN><F6g9QGl`jAm:>2aN8V2iIKH;dn<Ro`Nf6O<i8Al9f75Y"
  734.     A$ = A$ + "?42?gB>6bGR3R_A>04CRmCIJ?:So8mc_io5=O:4\97o_GWR3`llRfYaidL;7"
  735.     A$ = A$ + "4GRfhInfVhBd6^bc:9U[4]USJDRfYAkg8?9FgXZCh3ANB6^4mc=]Ocle=i<A"
  736.     A$ = A$ + "L:noWij1e:9e95ma>m[Ugl<SoNhnL[Qm`7CnK6G:noRhAVo[ikWHe6ODf;<Y"
  737.     A$ = A$ + "N#=O>A<=N>R_^ZYKFk^MaOXm]CeE[kF]hdZgf4_PlLH\dX]GFm`bjUB\V0AM"
  738.     A$ = A$ + "9AOM[md4gja=?FcgCFmlfQkd#eJoY5?>>866aS8G9R9YS6HoFM2ZfeXmGd7S"
  739.     A$ = A$ + "d?B\n[#okcnJg99HDJL>4^h\_KB<YU?k9SU=[9YL\Gc<WTbAjT5<6Rmh`CJb"
  740.     A$ = A$ + "Z?^iS=^BLO>D\8Q357d?CZoU4^;dNZY>P^Xmjb9e_>RY<PjDONComBn#4gQn"
  741.     A$ = A$ + "=Rh#D70KKYCeQKT[mALHHJd^=RcA<8j_XcRJ2HEcGONj;KjO8jc8J?6aUfnR"
  742.     A$ = A$ + "4>IcKZJO^VhAL\?13j\FfLELYe>9ilfH6TZi9F;mEkT4\XcFh;=Znd9DI>15"
  743.     A$ = A$ + "kVK^jk;jWM]nT8ffAmMN`CK]hRfe9[ehLb5Rn]WhALO6KCfKX8?>jW:Z5Mc_"
  744.     A$ = A$ + "d<6ZdOE[OnC6KDnLg\lKQiN3i7]RI=MMLb;LNH;;MAZML\NM#K:_Q;Koh7]o"
  745.     A$ = A$ + "]97odA]EU?:>eHDom#mHWNl>acWi^F\b8>]OejdGfH_#RhA9;LQ8V476>Tg1"
  746.     A$ = A$ + "i6A=;UG:YhP_i>BAhJa?GbU:1gLSSHF\NDfRB;DS=g9=a6dl5Qi71c52f3GW"
  747.     A$ = A$ + "XHW7]7ShFL;mGiXLck1[>BbhKcL_Sm[MRCANCLXl\TiWL^VecehmTL;SSVSN"
  748.     A$ = A$ + ":7PH?BoM[E2>eo4>GVlThLMZ[Jc7cdOCT;4e]=aV8V4]GSLVJNAIiDgj4N?4"
  749.     A$ = A$ + "oQh#4CJX2>7aM8>D]EFVZG9^UiY?mg=Sk6a2Y>UX>:YO\<L7;Gih_53GRh#V"
  750.     A$ = A$ + "mL3b=WOi_G^UHbdgllo\gL1VOFdF#VOFTK4SG7c?;niJ_?>dNd#Oj\CmUd]?"
  751.     A$ = A$ + "LJLTX_U8g9JgVbEB\GSlT<=#Bl5^?[E]FmXUngVJUSjCaj]96?8cODL[3NFO"
  752.     A$ = A$ + "MkogSB]OcZ?g<Ff<_bY]B;QJ8#h8_8aF>bIRnWfZUHd_5J=BJ>C1KD`<>eE]"
  753.     A$ = A$ + "8\f5<C]F6aldWe5;jKe`mUEQg47d?edO=DWCL`H]InbVj8V3nHZYaCMQ>aKS"
  754.     A$ = A$ + "H7<Ng\GDcNl4eJdRW`0DMOci^4Wa`L8G8eGgWbReJ:9aXH\hh`la=cK=nKPj"
  755.     A$ = A$ + "AHlM_3H:mYN]7`ANATC4]CSOolkVKY=NGb>gTbYj:fkFaE;H>Gj^>55kJg;A"
  756.     A$ = A$ + "hI<QQS]<W9YnNRjLPH7T73S_eH4l8FC4HMMOO2f7OMJ[8eI`NLkA9<VlDWmd"
  757.     A$ = A$ + "FKjK[E`JB\\N3caONl<nO<7KD=K8LQH^4C]S#kd>W]]F\O1WidUOkWbbW_P="
  758.     A$ = A$ + "=G=OEWoDV0Fj\4>1cN6jHicLJJNPAO5DOc;CaQBe_C<db8P?]V\aNbFj94;b"
  759.     A$ = A$ + "9eT#J9621l7EHL9R7aJfF:2OXT5LWD8f3[c]=2VT57^Pbf<36dCokfY?_Ao?"
  760.     A$ = A$ + "UA29XhFZ^_SbQ35mONaYW<jGmeZibVICgh7BoDoFB<9^oH4\X9jJO6aT\l[E"
  761.     A$ = A$ + "[CHbJjln`E;L[YoV8?9bARL0hlHbSPL3hlBjWLR?]HIMD6_[9:HPDO1F>LA^"
  762.     A$ = A$ + "5dOFlcVcY]L_WfYA\7bCRJUdd50mYTnlTkCm]G]KShBeDNQZf9[<_<#kJJaQ"
  763.     A$ = A$ + "S37gBKgH<g6E_XMCMFS17ie`O[Vo[8VRUK9la6W8cV>R[`SQlZhFbCbZkMdN"
  764.     A$ = A$ + "=VgOd>ERYAl>NnR3nHJS8OoFmVSl6IMTTf^Ie61^ULVVX[?V8NdXkM7E<9J_"
  765.     A$ = A$ + "6i6iEKnSXKeXhADC0<6LLO=6L2F4_7Wh?d6?[GW`WcA3US#e6YYgKC[0\?;a"
  766.     A$ = A$ + "LhT[?CmKcHd_da?25CRLXXNVX^1hL3]fkahn;lQFeLWVR=]oCKShLgaV`ngj"
  767.     A$ = A$ + "ja^Gob2G;FI^bAM5#k#DLYI=1eF8JS2aKXoKX>TE=I;fGiP3=5eo><6Id7#4"
  768.     A$ = A$ + ";QH;Do<\?7aNZ;mU4eX4]KS??]YSK979N<d_CdoBD;C\7bAmBBNFCVe1jnF_"
  769.     A$ = A$ + "JCVi[XM:fT]ei?=e^=J3fj5^8lg1e107dOF6W:J_7e90aaXOTX6UX_W8F3]c"
  770.     A$ = A$ + "RJaSJ4Ve4XM;OF<gE^0V?;b[OJbW9[EA\?R`hfC^_<O19g7VGoTC4mc5OM^n"
  771.     A$ = A$ + "0_N#\MFK]Y6Shie3\]=Xijg:4>XT_jBWaTL^F8L#I_JNicI6J>OA]3fWjj0J"
  772.     A$ = A$ + "B^IjH_TPk#\8R1UVP75::gQOgjWM<A5VSDR14<3f_JS;PFGTX]K4?b`Th`[]"
  773.     A$ = A$ + "KfX`<BEc1g0^l]8>T^?aeR9F]7LCl]0^lWX_VXOa9VHZajXO0jcZZ:<Od[JK"
  774.     A$ = A$ + "_nkWiCJ33F\GC`ZVPPE<<I^TUOXTWdTLef4eU9eG3WCaiQlL3eSblVdXalWl"
  775.     A$ = A$ + "HLli]K]5R3Z]Y9:hL\VW\JQG>ad9>5aT8^5WWbinT;1afhLIRcaHABo7EKEU"
  776.     A$ = A$ + "Zh#<nKL#^BDcTT7TiW8JOV=X=J\_eANID73DSTDkTm#\I[CbkQiLREG#h`ZQ"
  777.     A$ = A$ + "^6F4aL8FREGMi[CLFcOeV?W<<;c7hZ_iKNC2[?9njlmB<=RGcgoTLeX5cMFV"
  778.     A$ = A$ + "?kFn8Ke0B[>CajRnXjE]:VTe;hXo^9n4el5SeVQ7AKfHLg8^4aODm;=P^ZHG"
  779.     A$ = A$ + "4cQK]WWjgVJSTe>4]nBJf_9HBTO4cY=>Xm8;Jd34cWeQkQgK=_5hPjbSe9ia"
  780.     A$ = A$ + "CNLdFZ1gMUCWe?Y9g;>GSJMQe8ERW#KVH=<LC2>47Z_KMea=aVH\]]jB?gWh"
  781.     A$ = A$ + "=f`lM=mA4c15fW9GjT6TJ;4S3WiSKFKfhPhAdn=nnhW?k[V\oH^#io:SU>mM"
  782.     A$ = A$ + "d59lIX?P8FdfF`dEkc8Nd^FVSMMlHX]L4GTJmTaUSH:4cPj7P3RM#n>TC7aO"
  783.     A$ = A$ + "6CgJ7VY\60em4eG9c[>nm`SUeU3F35<kUee3Tc[<WU9?9R;Ie`>RmKekOZWE"
  784.     A$ = A$ + "6KOFojILa8GDfCEijl;JZSGaPfPHSf6Gdl5kVWTZC7Vg7\FH7Y?M\HcKmGKc"
  785.     A$ = A$ + "7e\f7Yk7G\:o8>26K<QifXik_`;:9OTOT`a:ZHAJnSk4j?9nMB<WBc=GTV`9"
  786.     A$ = A$ + "ROn4W;I1?RHK1L]U;[TB:l_=R9JLVX>2\HlanJIKJJY:^dD6U`mAh^<iA=He"
  787.     A$ = A$ + "f<eGC^aTSjIRJIRe8AZ7Y`amNPm<L_ZV[MBlKV[;dOjdoE4GRfGAoi#K\hkQ"
  788.     A$ = A$ + "cS=kOdjZ[[_`Y=?VO]Xoe7LgZEeY4i<IfceVb:#c[4ZSKniA]KcnX9]MSiH2"
  789.     A$ = A$ + "e`=]CSnC_FiH\LQSiU;e>9mK5a<8N1aMhSi`h1a]VMKVVcYOW86SI36o]CL8"
  790.     A$ = A$ + "6o#noQn3SK965Oo4GRaRch4BM#IiX?[S]\nebjB4iNHl?X?hHL:eJnY<WWh#"
  791.     A$ = A$ + "df=Za;[O?`7cjElhkGM>iFXPC#NCJM<^Q17f_CV]KQ[9kd?D^iL4S537d^=Z"
  792.     A$ = A$ + "=LR7aab6g#aBKH8jf5>Z1hV?6mBaSH=hB[Cb\g;9cYVh#jQnKThB<GPiW7WS"
  793.     A$ = A$ + "A]1cn^Q6ojIfPc#hd`J:;[mm[WJ\InSG]1Sh<47QLLHmNT7;];SLXH\eD^A2"
  794.     A$ = A$ + "V3?6SS4cO4Jg6S_?];ch4amYfT>[=^0=VKFM_WJBVf^A>Gd^\e=caYn8RHBW"
  795.     A$ = A$ + "a:W?fmbW[Zi8R9AKk8?9Re#o<AL7b_a`P865]aRLHij64WWm14J[7e#0i1Bk"
  796.     A$ = A$ + "19^n:4KkhWg>TWWj5SlQXMMLOZK8V38dg#F_XRaPPLH]N>2[e1FM<Wf5_\Ih"
  797.     A$ = A$ + "h?46oPU>mY8[Y=:DGeEPLR?FaF<o:N3W;CO9CM<B=3A<Rl4Kb:<]<4nB94fO"
  798.     A$ = A$ + ">186CPPj81o\7]9LOR?P^=F?n2RhAL#l8>BaMdHf^EDVYYOf4?JKKLSQ]oSL"
  799.     A$ = A$ + "^hn98HBIVL::V4o\9^9o=bOcI6OLboQh4khRAeMIn9WHhnbTS>XR3EDHFX3b"
  800.     A$ = A$ + "Jn3ZKMBeRTeS7Yn:I>YHJTdZgTZF^7BOD<8Z98_i\?aSFbdWXRCA]9XjVBVk"
  801.     A$ = A$ + "Bn26o;Ck1lL^>WM:SEiLAo`Co]Cl>boRHDd>>6OOSGT6_ofeB]N0`]<Wf8o8"
  802.     A$ = A$ + "jo8[>1dnB;0eGQ`[ZUE:L[[A[OS\_gIjTRlUlJKVEW2l>lJ?WigJC3TTGUYc"
  803.     A$ = A$ + "1b9RncVfTbSWfZIe0?nLll8[k?<N0dg;lN>V30[g=f0Jo1Nb>mEBJoUIofTe"
  804.     A$ = A$ + "n>C?LZa32n0cAMV?9D[TS^W]Gi>A<8><nEVOU8FUCOXLTZO^Y>aiJeFOmSe2"
  805.     A$ = A$ + "<R5]Z9><\6ikNUbJh;TeS0QSalLk;gcI4dOE4K[kbem^;_onYnFWmK9V3X\o"
  806.     A$ = A$ + "EbNGh64<0R3#N:4WQlGH_hPm3K=_8X]FcM\H3WdH4LY64LV9XhCT3TFC5G`T"
  807.     A$ = A$ + "D\4bURe73nJ4;JScEnlVmXdlfUH#T[4?FNLL;aP2WG_\71aN39[mnR]K4SS7"
  808.     A$ = A$ + "?a>HLlH<dfVP;AOKAkf8O9^?]EkbfmVEmCBMMcJoTYmDVkVSZk]GGGH52Vb:"
  809.     A$ = A$ + "5>NDSdJM;B`IH^:_LiL8cEIZQYc#`jVo8jWbMRHe<^LDGe\N:#n`\o9LVKJE"
  810.     A$ = A$ + "ZoQHMIPil3mOTE[Z8G9f?`H<n]jg>eBLaY:H9T7Q<G?9Gn?dn<JoSiC76k\D"
  811.     A$ = A$ + "4L9SKB0R=4SHKDL9;7GB26A\861K9#DaYmEkDB8XJS5ie#n=47#ad4^Bj#h7"
  812.     A$ = A$ + "A<YTTg77QHO:9ZH2?Bb_S^^Y_R<^#4?ROV6VTmHb1SO?9hR;aLTShB1MelTR"
  813.     A$ = A$ + "CiA?1F^[TT[MVZ>bUo[d>9b7Idm^[Jm7PaSCe3`PjSRaHe18ZgKKXJ>Pn<GN"
  814.     A$ = A$ + "MZCA63NR=ajH9m5<aNX?`9V6i<AO;AOT[emO17JACKLZ?;8^4gb1Sc<]CTf6"
  815.     A$ = A$ + "Jj2M8M[CZORX?SXMIdn<b5Rkg?Qk4eCcD6DOahkK?4kmK3jFcMdY97<fK43b"
  816.     A$ = A$ + "bO=SGTI7WigK[>2HfiANCL[E3k8F4ae8>5OOVf:]l;adGPEg^I=hNPeGSFo_"
  817.     A$ = A$ + "Y_]I\fX_^Y=a\G1<h>C=ADSf_VX]JFm_Rc7X6UXMKd?gdofL;7S[_^m=;gjU"
  818.     A$ = A$ + "5gWHJdf=F?7IMK`dVYech<o<anS;]ESHA4CJ5\W18kclORH9LNmbW<eB``Te"
  819.     A$ = A$ + "c7XbGRiJ7m]>i=an;2kag4cR3R5A<Q=kVkDNk;7<_fGaD5kFVb#T]3Ak;A4_"
  820.     A$ = A$ + "A72n274cQi#k:Wf`DoJcj8f65^EKFh:AmnanV4c=DfcTfY`9R?VHQlmbh_ah"
  821.     A$ = A$ + "Z__CNI:O:e6?FgCFf\D]BbH[C>B7Jc[FmQ=SIf:4L7jOOJ7f4Tc_S\[]EkWX"
  822.     A$ = A$ + "TC:?GbcATCSU;QTW8aTH=RB]GE`LXmN4OSL<G1kAmbm5;K2SDikHija6Gd\`"
  823.     A$ = A$ + "ZI=dC\1K=WdddJM5Sgc6Vg<dj??cS26OC^^?[iGTKON9#<1O:>4SC6i3IHA<"
  824.     A$ = A$ + "?>h8T[MIL>^f;JSfMh?JM`NMTc8>I^?S36kCT1Aln38HCA[h5dW?dWd1mk?L"
  825.     A$ = A$ + "m7QaJCe1P[]KY4E0Mh5;:iX5L=1_cn^n^OhG74;;X[FXD]AYW?l;hCaZKY6="
  826.     A$ = A$ + "I^oBm?ajf=mYf\W`HehiAkJYf3X_bYN=Y>b7S`KQf`aQVS:2V3c=QY;[[<3i"
  827.     A$ = A$ + "JhZU[U;LJR]=RMoCMDmC73]WM#hYeN<lNGWJC8[EAT_d>FobEolahVcJ17m9"
  828.     A$ = A$ + "\YoiYifW\]jm?OMF7EI]Kbj59dnXCBVc=1aVSAd[J5nL]F[Yn\nkggJKYjoI"
  829.     A$ = A$ + "FOnkOWLle4a]hFb[RiV7iF=^ndMI>O?eJ`0[gLdgo4;I0e;HGeF=jEk[DgO0"
  830.     A$ = A$ + "MY]boS>6>nTJ=FZkM<LLnX=Y<GSijOFmIQ3nLlh<]3<L[G\8HV=#<k^f1<Ai"
  831.     A$ = A$ + "L8k_CC#k_LMB]]B[GI2W9Z;6bUQmEMjg7nORHP3\[]C^6dN1c_Sbj^eSY?l^"
  832.     A$ = A$ + "[mD;fk8Hl]X_NX_OX=>dn5j35cG:<7i_RcNkhj>dNeNY=eE3WgCo5A<Y5jRA"
  833.     A$ = A$ + "A\:ZG:V[jTo4]SK^SY_RM93aQcd9AkD7ZZ?6]f>_`9[afWnkQlILdf8[gn[0"
  834.     A$ = A$ + "7Jk[CkUg<W=^HIkQH]lH[[Fe14[U]\WkbjF9ic#<3f[NI>KaWWaeRJjQ_^e3"
  835.     A$ = A$ + "IiPm]JFog>KQS2[5S\NI#]\cN5:cCmijfc2h`ja>F?SgjOM4;Qe1<j;EFgGX"
  836.     A$ = A$ + "6ZGkLVZbcU77[UJDcXFOmQ[_BMB#oAc1m3m\6gXeldRe9f>fl:#cb;;TKR15"
  837.     A$ = A$ + "N0>m\A;g<Bf=FFLHJDd\Y:\_LLm=47>cQ?1c_S:V`S#nMhAm]Ihmc`N\mJ9Z"
  838.     A$ = A$ + "HIam_<fClA<RleigC#o7c7G1miD7`C9VhLO>7mSCknXob9ga2C;9dQZJ:6F_"
  839.     A$ = A$ + "jVZS>63?R1Akh8O9b]QnjVnmNL\^^Bm=9LK7o`4\4I=jAdWjah4LR5bnhcd7"
  840.     A$ = A$ + "3F1WO\j5RmNZ[EaTX?_YfTXmKFo=QL<hJ#<^4<g3iFjK6Rk`j];SM:_7Rn=V"
  841.     A$ = A$ + "LAH<^dn2Lok\>GMZ2OQU8OG\>Z^>FOSUg;[QST[<[?Z\>hbjh_iWJcNCbeJX"
  842.     A$ = A$ + "eg1egJ\gNcnX1eVfRUOkCC\iITm^S:NGOjD[#gJKUZmV\f6`H8B\6;GEX_bh"
  843.     A$ = A$ + "cA\9N<3DNl#kEm:?AZQEN<TO5[GV4GJ8b_Sa8LaH^P#<9FoN8V4e0c#[_UHX"
  844.     A$ = A$ + "M^EJM2Pid`dIOZIL3FoObO7M_MEQ^e1QWG]]#`65>_mSeZc^XS9:l]X?YJXg"
  845.     A$ = A$ + "eZmN;j7463:VWl\NN`hBchCKjSQeV=V_74gPj^QeK=f?YIOeUiX>]WSHC;e]"
  846.     A$ = A$ + "N^=o6j_baRm\`U9HC4_RfmaNE?m7>m=4aR867o<InbbJ]4aTXnMff:IMFNZ2"
  847.     A$ = A$ + "oR9:l;VPJkd2Wb8Eo4CkLYoIH>BHebBJoSEOHI>7ce[Hm<U[i`L`S[=YH;bm"
  848.     A$ = A$ + "9DolLORWHnfSg7aja2OMnlln8;?bhcAo<CN>dg>d73D[Xd?ZDSFDcF[hTV>F"
  849.     A$ = A$ + "f\WZVCX<VHDKYDS=<NaEGD>:^3ie#l6KOcnU4Lm1=cI3>dJ;[klA3;P?f6AR"
  850.     A$ = A$ + "Il?khK;NTY;0nLfnNomlm=VTmmJh`4C:iXUcCa6`1KBh;ZJ=?6ojF>\c[<NS"
  851.     A$ = A$ + "LKa2G:FcijE]]5m\3eXKYVXdjY;e10]KC\[Nl\6d=b1RA;H=S\oR=83]gH:2"
  852.     A$ = A$ + "6eH6D?``kCGdGSjjVf;BkoF3ejkBV[CMIF\oSLOYmCFO9`hFHm]K7]8dP6gN"
  853.     A$ = A$ + "VOKDo#<66<F6dW>JNa8h<F]6Qn8S7oj4ndKII;#n^V7fdRW[Z[:6;?ZeZU>="
  854.     A$ = A$ + "7=bbLEVahcd[4ad>3Img;n<g>^lm];LQWefai_g]Ym_l=]\iYlUXf[Hl3IM>"
  855.     A$ = A$ + "PJ_RaFTh#L#<Y^9LVjYP?e;13SlU8^UY_2S_dhINl:3f;;Ion^?2?`^g2FkG"
  856.     A$ = A$ + ":G`?KQ6CD>H=:M1CM<He;HVH=;LFHYbJi;DVS=CQOjD7e0Do2bNZ;[CZLN8]"
  857.     A$ = A$ + "9Sa_KARMM\nP#]BgkFF:Vi#jQj_K63>nl;WnKB\OQnoVe=Bj;9>HmLRfEblL"
  858.     A$ = A$ + "QnNWHDL`HeAKlHnAhTS4>ed97lS6dhCA=j#K[H>abNJ?[]dleDoi<>Wn9`\4"
  859.     A$ = A$ + "NdTS;m77SA`bUo;lg?GSRmJBbIVKI?W#cS`Qf?MM3NOPNobd7_VOYlN3[?QA"
  860.     A$ = A$ + "O6<?GmYckQhm2lhiSiPe1LnNYo6hm4ln86g[e>oIYiZ4aOHnd#\8Jc0eI3__"
  861.     A$ = A$ + "_5UD0b<nHdLFe`O\h;UT7K?XOMiFMOGL8VC7jnbl=U7P7l7=fla5#eHMb^a["
  862.     A$ = A$ + "ok2<Q_YA2Z_VJLnGOC_fgWHBZ_g5<YdR;N5C:W#9X36k>R?acgQlM<<9jkO^"
  863.     A$ = A$ + "eR1IRnLl;E^96?:<e4AeUF8J[`YRmhPN8hESPmn=1KP[U<<jSlnfI<f1gCen"
  864.     A$ = A$ + ">bYRn?Wfn#oUcQaIajE:dghDc6;CciW17^>cBl5;_m]jl8iXHiK6c36jk#ba"
  865.     A$ = A$ + "VnfRKikWOn>eIbje1[[`4;RH#\^U_TY>NE;oDW\kH=;CGcT_O^><kcJ\O[EC"
  866.     A$ = A$ + "Ii:[;fDefCZC2jG<bEbd1:aJ<Mb?S66VZ9<foIj^`IZ==]#DG[JVb=DckI1_"
  867.     A$ = A$ + "C[a0bFFcRioMjK:nOSa8Pmj3fK5hPkKn[RHiDWndFJ]>RccKll1mc^<WTi]6"
  868.     A$ = A$ + "SQ1[Yg\^f#\4bcQH=:>TP1=WQfC\8aFJ>F0[Q:m]><m1d5<O1SRhADoaT;4["
  869.     A$ = A$ + "IFlmBMBa?WYk6W>>8V4a[8_9>X_a<o_c]\GF`j6?mQ3k[>\?Xc1Se8mO6eK0"
  870.     A$ = A$ + "c9i9j>H]WRG3iHZ^lL\J54oO#^?dV;VC<JM<#^^BL6Jo476_6RAA=faHZ`7C"
  871.     A$ = A$ + "OFBoEbmical[R73mS97lall9e57cMP:;8;=_i=K\XoG96DU5T3:=cDUi6ndQ"
  872.     A$ = A$ + "I76m3]CnE4[jkHR7UZKnTIlT2k[GoNVo51gX8aTnGU[DSQc49VSG\W_[onnf"
  873.     A$ = A$ + "bWkhhWiR9IlT2iFGiXmK6gCEk3AkhW=N>Ui^7iMZl#inliLmAG2nMdE5m77S"
  874.     A$ = A$ + "KIj1SF>7kCeFAYIU6JCEUPjKGeHXD;UbLAF7nY>5X_Z\ja?gbeU6IOkY^?[]"
  875.     A$ = A$ + "CCO<S#gb1m]57<OohaC=\?JicIXm\[:N0ahX>Xh`d1^j_nnajUMo5<[nYm51"
  876.     A$ = A$ + "Kk`j^L_H=]2egl:AWZX9XS=[LdQVF\F_hH^ZXmC]2cDcIh:b?EQSN6X9iTTL"
  877.     A$ = A$ + "_I#DInY[jZR3FK3X=Xd_ATCTb7B`>6THCGm2WYf:_NWHNedV:3GG=iPl[<O^"
  878.     A$ = A$ + "cjBNOLiAamYmMFmXSnJgZ;MF<06Lgk\noWW78GeQeGioLOj96DgjRN>NTbiR"
  879.     A$ = A$ + "IBN84;IXblong9<j^dB<iNg>LB3][H2M[=HJmYF<7F?14L2REaa<4K]9g9j?"
  880.     A$ = A$ + ":j?9j3H]?e:f`BoXc1[IVdOjlih[AO4cnI`dM[K4d7PCTmF2ZGdneE]F4B];"
  881.     A$ = A$ + "Coj#>#Zn`5k_hHNCNDRm#SDm?3a<8W5>hJBd_=LMR5:f;MB=<2=ODWkh6YZG"
  882.     A$ = A$ + "G6cGZW7V3<<gaY]D;EN<7<?IhS9?7nJ3GFcS[;fgjJ7ZA^nbjeQgJ7DF94MH"
  883.     A$ = A$ + "Md`kmEn?NdoSZ=IQS3e\\YMIR_HfUYagfef3cO8VoQhnfjnNScna`TRaMle]"
  884.     A$ = A$ + "Mkk2n:=6nc9ji<L23Sl7B<9N>Rj9Pj8PK=oaYHCDchAkh;>kJPVc`aJnd?j`"
  885.     A$ = A$ + "j5Ua5<nXm[Jd:f`?WLlailIXa:D^G8k4SEiLiXecH3S[aeOhm8Y4mal58iRU"
  886.     A$ = A$ + "]`ASJE_U2G<bSNL3^oZ_4=<<R[A<6[?\<UQ=h`njRKYo_6Koj]\6LOaXjM?`"
  887.     A$ = A$ + "#jJmXK]^5X;]\J5CJ0eE;6VlL3XS]GeN0eK0eV4e_=[a:<?HJOU5Qff\2TO3"
  888.     A$ = A$ + "I;[IVVV[N\>maJB7aU:>]4L`^TA;;;?DYPUe:aF>b?RHAL#L9bYRHHlcUJ7U"
  889.     A$ = A$ + "JYRalSi28O>[f]Ha:ThADWElg2aXXOlXf<h_Ino#kSXbiSY<bA:HeRM[SHHH"
  890.     A$ = A$ + ">2o163eY=:fkCX^Vj1Fl4j?VoXk9Vk`j6Fnh5nQ3]kHAS\gHa2WVE>^QP5;f"
  891.     A$ = A$ + "#AkgFf47VjKLZ59jK8Zo?Zi96SLFCaYN38N4cC>bIIICMLJ\U8V1S7:k75;J"
  892.     A$ = A$ + "2RmeCVm9U9XmX2Fk1HOKM1SKD:nb2H]jB`FHN9Ia_ULIHMbAeb\K_HQa\UmN"
  893.     A$ = A$ + "JR1AN\lmbj7=][J:SN8HT2gb18L<kIM]5MB^Nf^Z[0EDDnZNR=\263JC;OVn"
  894.     A$ = A$ + "Hh[C=n`J34G_E?Fo>i[:eo<Sk>7YV#LJ^dWRKm>ShAfmofSc<Q#8_TCmHn09"
  895.     A$ = A$ + "Vh2?WBeVX[>4iL=><\YSQ=HnbnhaNR4chk;<Y8a8ljWkoMS9amel3Fh9Zon<"
  896.     A$ = A$ + "]58G7D=4#\KgHda]Jo3gOdQabYmQ43RJeRSHTG?T\N#RDS5aW0Rc_L]=Qh5<"
  897.     A$ = A$ + ":7\9kj<olc>YPQ_OiHH?A[ldl^>UaoU?WS6\RA`VBE`6J2jFKKSP?An2MEh9"
  898.     A$ = A$ + "eMMK33J0XoM^>I=AiNEIKoZChIdMjKiNXKkE7JW<OGVOgVFQ^;_o1ee>[7C?"
  899.     A$ = A$ + "KOKE]ZaAWKAEX[]ZiQe;5e<1c]5j[8RmHeZGZ3MRO#<6j;YZ;>K57Z:iH8FD"
  900.     A$ = A$ + "cUSSkc1O=>8FE[ImeDN_e:fjaSSK[YI59[OW_JG8kMgeEMYQ[]`FobSmECfO"
  901.     A$ = A$ + "l8nTC_HX;JNm<mA><]OI=o9:cS7_<o_QA[c]Y_RG`T6\PK<<]NF\d9gO1SHP"
  902.     A$ = A$ + "H]cHhJMPNKcMbHkcOZHW;JVJ^`cjTmI\V5Xe<Fj7LFK[iPmm86K:jW>ZEMb]"
  903.     A$ = A$ + "Qa?PnRSh54[PnRSo6HoiJ1bfE?kIPCJ\SBk5RcI<SDkI>\6`?=I]RY>lQXmf"
  904.     A$ = A$ + ";b_U[U#>aLoAKm_:geEjOWjP^NAgKC;e]LmXlB:Q`nE`dNWRGhbAWjfS[CVJ"
  905.     A$ = A$ + "la7>_\BVm58IO=WAU77_KNBHShMON^>JL2VT=deCmk4?mHM?Fc^Z\B:Ie>;M"
  906.     A$ = A$ + "NP?o>J5::QGQ?WhYcHYCmn4Di:i\eh7IHBa7a_1;gHonb^ZC4VGTHAWXSoOW"
  907.     A$ = A$ + "HB>WGSBi35^F4hgGhh3HeDU_f_Ini9ShU[1aahh9[=4#>O73G?B^^a]14>C9"
  908.     A$ = A$ + "#=A`LdSeN51;bF[RfgYe0HO>hANi9Km`5c?kNO=^U_VQIak?YmVla=9W\dg3"
  909.     A$ = A$ + "[M`ETG>26B1X55;caKAeX;]^U:fCOkD]HXmXK:nDOjH74kWJ=jL[JQR3Yf`E"
  910.     A$ = A$ + "Ec4LQbej?0ceg`mWKa6<33Reb0Jk6][SHE<WmJQP;e<ii<l8^OaI4BaQJWlN"
  911.     A$ = A$ + ":DhAA<;R7a1aV:;kTeSW_GJCHM]\L]>C#<9f3=;<TODCAIZnj^fBb3mSmY\n"
  912.     A$ = A$ + "f=<GQS0[i8[KfCASAmfF>a#FQFSMfk6GUFSC?WCIYh<gd2`^F7[;?c4kO;;4"
  913.     A$ = A$ + "We9?GL`CMYh<Fm9Q]_hIP]>_IPcN=;3WeZGZ6C>6W<R9ahban\6[Kc<fUdgD"
  914.     A$ = A$ + "d6[I<f1[f:A^:cKbSG[IbcF`NVf86:V8kEGR=aTkf#kFWA:<_2heNg]YakYR"
  915.     A$ = A$ + "bITV[OJ<>afeHb9f>fdSfihhWSnI4hHgS`eXDN:lc?PS62I^DXjhSgO5CdQc"
  916.     A$ = A$ + "kD^ULgiPimUU_5Lohek?M>f48gNim6_lHM8_F:1C0Y5:AWeOmi;\=1LN0WcX"
  917.     A$ = A$ + "c7R:6EW#9k?n`HBDK?DW?f8T?glIe3_96OO;>o>HUOM^BNWkn]InMS5Wo_9<"
  918.     A$ = A$ + "YoInloObgig4G]_=3[>>ISPQ77og?aPJ\A<nTk9R:>iN2ZUMobPGkM^fJgO`"
  919.     A$ = A$ + "[oiWNj8c4C<\f?=ma7igOT3R;B^bVo2]gC8glkQ?OnYVja]ES1;cOInm4FWk"
  920.     A$ = A$ + "9YSa=`1QQfMQ?EmM6M^U]2MZiEiP=EC;Ek3iffGICD=V`NX>k3^\>Z#n>UVE"
  921.     A$ = A$ + "BX9R]K4gYiR]LEGR3OXRB?8:9c4e1aM8oW<RgWR7aN<jBWmTA7KQcWACY=O2"
  922.     A$ = A$ + "f5aTZZh<ejPAe5V\H[FEXZL3QR3i3M^b2A?JAYXj\2ZmCSI=dNYiBk>FjLai"
  923.     A$ = A$ + "]ieRObiMVh6^PcB7oTcMGh6?omRKhlg=^i;i\`5]ceP3OFK0Gl^G=^PCO5h0"
  924.     A$ = A$ + "KKI:f4e4=SC?c;dM^R59lSFQP7]LLZ;JfZ>1YNSI<g7BGK_`AY2=oO8^;oMB"
  925.     A$ = A$ + "lEVoELXj5Q[K#kkmi;l8iXLZKQN7fcaSUe#\TSb\EgAOPF<\BfoGom6nc`=>"
  926.     A$ = A$ + "FZO3R>J=g]hPgCiP[l=?RWgkj>hSSCVKH3nhHSfI4#^G:NiNU4R9f`_?^6KR"
  927.     A$ = A$ + "aBKh2YgGWM:Y[i_A\^JY>1U;DL>3?j5jHjJl[?_<bk_mbC:bik6O2_k7iSon"
  928.     A$ = A$ + "VCcg6NHOChNo?Il]1CRKoV`T24Ml:O9WALj`kJFiVAjQc]HbY>NGL3JWmo8<"
  929.     A$ = A$ + "9_fAjMKB^e<1nh\25:LME`loUYKE7K0?F<AbDhQW\?fS^C6EGP`MYlBELYjK"
  930.     A$ = A$ + "5[]L=G`OJVH?EYXZ2cE[GEUUE:Xd<CFmG47Tc3WSBlTb4>>iULL:FUmJ43Ra"
  931.     A$ = A$ + "LSe86RGenZ:ES57aR:?WD2K;7gfJa^]^fjbaH7#m8W0n#=UVQV[D7n\g^FcM"
  932.     A$ = A$ + "jLCcCcERI=XNPM]dIQKoBg?n5GgUZS7lJ^#LOGeQdnBoCMC76?a?kbUm?OL["
  933.     A$ = A$ + "GjN`A>oC3Wo>F>>Se?K\_]\DLNKOehPKOM2OZePCMYc3kLe[0[O>c6CN0m7M"
  934.     A$ = A$ + "]jVRBCF`ITioI6SC]_Pe[IfcbE^[^e<e4I]S?#<Q]k``C26eaK;^U;3F_``f"
  935.     A$ = A$ + "JnWd`T<kd]HZLR`T\LR`^FKgOJLPlRoh5[Ya`VJ\W;>in23GR3kcP_FXh2Xn"
  936.     A$ = A$ + "W#GWEf6B`QhmlQ<l8R1m_8Vdo<lBnO3HBZ=HAToLOOmM7YV3\1i75_P]HfdA"
  937.     A$ = A$ + "kciPHBT?=aP:8S<dkSI>4[hPNdWagVoc6_IM^#\aY[]`?3mJ\[O^RljSi[AC"
  938.     A$ = A$ + "S\QegPKLK]7ch^DFFI8h?RmNUD4jTH_GM]D`VZRf\eD5KRmN?R=ELj9Zh:4o"
  939.     A$ = A$ + "Yh<3RVVOZ:?2FGmY__Y_^Yf0^Pm^M=NP<VLi4d_Jk7i6=]a<4<TNFWbIZbRc"
  940.     A$ = A$ + "2UTE81;\<aFbZ#GKIYXfVU7jHCb5M\d\#_[^4<WQd;=_#>ke\0lLgfeRGknn"
  941.     A$ = A$ + "IhU_kOZ>NQkljda[O?o4l:gieRWh6^DLGoXcA`Tf;>bQf1na7HKh:goFaQgo"
  942.     A$ = A$ + "f`>ghRa<KH#J_J8_T2P<Uoc4KVeI#f7;H]_Pe03Vg3<7^CfCN:In:VGC=LPH"
  943.     A$ = A$ + "m`_E[W>^aTE]iWLJMON>RG]maOhWghk4>_2lPSid7OlOLSCdLh8_?DmaYWQg"
  944.     A$ = A$ + "Gc^gDmi#4_?Jk6]ISnKP3R7A<8nJQTkeDOR68N=?bLbe;o:g9N<Q>1iQASiO"
  945.     A$ = A$ + "X`HBfLe`Won7??h4M<o#Q9MRdgIHoTO2`Tn^BoCoS`T\e]HNfhe^NSWTiC_I"
  946.     A$ = A$ + "<Q9PQdWnXOFla6FcgZ_KGKhikQnKdl7VmH7oH6Kh??mLS;FTI7?aRb:1Z3[0"
  947.     A$ = A$ + "8KQ?UUK=>hD>el5ZC[FEF9X==Y<dJI;m;5aTJCC:Ai:UOba[h?I9h<iUB\XK"
  948.     A$ = A$ + "]_J=noDGTd7C\O\DVHo6]AQcoYm?<6MD[0TW4]iSfgUO:1#C;8M<hNfAQCF^"
  949.     A$ = A$ + "Zf1KFF9P>ddLE<YfEHJX>a^#Fk=^VcJKhN_bc7_cSL7hSNn76Of[nHh]>j]R"
  950.     A$ = A$ + "Gl^^NlkNbk6o^7mf`_h7Onhn_j3R7iWNYh>^R3PKk:??L4a^^]_ji[fQAlcT"
  951.     A$ = A$ + "Ra9o>9>S5KZ4Lo_Ka2Gck:gJ9XiC6NmTKYOKheDF[`djbCl1LfbcSaM\7WP["
  952.     A$ = A$ + "?I<OfHkKHD95a`;NDSQ95f_V^3_g?j5WYa`TlR5AOFgH7[i79R=5Dn?BnAaj"
  953.     A$ = A$ + "FK6i[WQ`WfbmDFW>HngC\8R=mM1VdgVko?AhAo#Q9m?27eh24:RJ6ggF\U_m"
  954.     A$ = A$ + "oFlOL3_eCLSSN#GM=URK\f8OO>H\E?jmN_Xc][MQ?ObHF`ldiKki03oQH?F]"
  955.     A$ = A$ + "5Fa\MGcRg_XeV1koV;>VQYcnb0eD[jC2j;ZXS>L^?V\[O;hS;<eD5n#YSVV;"
  956.     A$ = A$ + "SmONZoc97Zbc>EES;dV;R;AkfjH;;GeE4mm=[OMEUKJJ=9Wec^lB`_63oZc;"
  957.     A$ = A$ + "M=WhXo`INW#L9jkk<265JC55Q1d]f[f`]\I?Adnbc3mF`#JU`iJ<M]3hjggN"
  958.     A$ = A$ + "`E^k]PGmN_Ili_bCQo[GmYa7lTg3nM?fMRgmA^EllgaeRWlWMHl<gn?1gmEO"
  959.     A$ = A$ + "Ah>_b;0GnILJJO6YTDB`a_`aN\JQ:SCUQQTL2a[h8Jn>h6Sk#^e8W0^L5hPa"
  960.     A$ = A$ + "\86M]6ojfTR?XPe4WJW>i7Kcmmj_6M>M4f#imn=_aMVaPGS3_kmAQ__b]^AK"
  961.     A$ = A$ + "3c^m_Yk;?nl4kH33?<bSS3kkWgWbkIEOEimcaEO;ll5aL=]^#OP[g_5]o_f#"
  962.     A$ = A$ + "mMNDA>R0C:Ln]ehH;oSNnO8aTnV6Z]UnlgXhBW8\\_[aTRd?2Jmi=nHe[_<O"
  963.     A$ = A$ + "VYf?VcDW4nYGmE7>fW4K9iHSgaVl_=o7M]Kch2IKSgUo<GcbhFK[3j5CBmS5"
  964.     A$ = A$ + "S?\<X_WdH;6MdQSWGR^nLb\[SLXHnoEJVY;HAIRVGLQZNOINoAOHCOGG#J1#"
  965.     A$ = A$ + "nY6WZ?Y2B>>DAfYXHADcU5UDLQc=GR9A=?aLS[6?aL[]EE263eIhX7ZZY?Fo"
  966.     A$ = A$ + "jH^SGH2aPFWK6HnSL`2VdIPGj>_9lA?gCPGi^oih=^oKAaSN_7o^Tm_1lhgh"
  967.     A$ = A$ + "US7jj^L1;jBa1gf9SI<TnS\Sf9NEJ]==J7lHefSPQLleK<A76Wa_>o::e79L"
  968.     A$ = A$ + "mo<C:EEK7<>ZabHY6US_OYOF2cO8:7mOHad`hK4Y_L<o:76SbeN8_GKS4CBa"
  969.     A$ = A$ + "UR0C:BKhRlNS8__lOd`;VURE9OWQcmnXm5nHH\H8WAN?EfYU:JO[KEH^BQ_7"
  970.     A$ = A$ + "cOdo;S9MR^W?QX>V>LR4oi7JlX8m9OTi;3eZ57Vn7<\YCdWgGcn;cOeW0<Z_"
  971.     A$ = A$ + "V?Wm`cVg35>^^nM6>eTCoZ]2Tg4?VKiWL]XQQ=<Hn>GaER>>U[doXooAR]Ja"
  972.     A$ = A$ + "Y8lFIN7WO#=BaiBL=kSSK^KmAgRIG8gjm2O<i84f66IObSbbM96_>^UlUjL["
  973.     A$ = A$ + "KYf3lHNIBo1A]Jg^Z:6MXiUZHA54:6]>3`L6YfVDX6WnZc9Ed7fokJJAZ?TY"
  974.     A$ = A$ + "nTI>0KjDRiM2iKeJa^`Z::?=Vg5UFBXU5U?bB>?^]U<Ol`g`eQ7hJ?<nTGnI"
  975.     A$ = A$ + "aOo=OIlOmJ?3nC?kAa[M?oDlRgfERGiNoYh87JOH<mZW>aPGm?D0QKDlboIR"
  976.     A$ = A$ + "S;gW4K#]6FhWea2iLE1iU7b=W<#ZY42a9hC9WPH;FLQTcKa[eP76cRhSAhL6"
  977.     A$ = A$ + "Cl8:ic`WL^SSXUkYhkg_\?7:79Ih4?SH?VOVUib47clML<bi`XSb9F\lhX?J"
  978.     A$ = A$ + "B`[nllR7hQWDHOKkR;56[beFl`aVboak7M_lfiP[AJe^7Cg;Ajgm8m9_>LeK"
  979.     A$ = A$ + "#69V0F`\V>faY^5ES0ZoUR?#HnCD7NA>2#]ele`TL6OKleRgLd_al]]G<mOX"
  980.     A$ = A$ + "`T\_OnKdKna`AF1C4I8lY?F^RhTkofLa__`T\[o<n<JM0fS6WBfeV=^oPkI?"
  981.     A$ = A$ + "aCo;n5Zm21M]APon\J\#Sa1ckPeU:^NEjbjlVMKlm`]L#l8R5aQ>7aS^>See"
  982.     A$ = A$ + "Whji:GNBVV#mZgg`Jc=H#MN#Cb97DEQ5ZfaIe>?V?D<_X>Y9=J\c=]JdWjK3"
  983.     A$ = A$ + "jD[JRfcFH]ZTeP9FcUJWP=EF:aSLSc7:B`ZZ<[TAc4\8FK;iPaX[_egF=fKW"
  984.     A$ = A$ + "fjG^RWcLl<o#a[ai[bLc2CM`30koDF?N`Ob?6On_j5a7l;ODlQ?gSRgkGn#h"
  985.     A$ = A$ + "3On71_U`EjWNXMQI<hNPLH?;En?B\8Wjn^<WWh:n28gk4_FOMB`O28XPk#N?"
  986.     A$ = A$ + "QTcWA;oWSAnNm7UCmi:X\n0Sa=a^H<D9^DdnSCNM^eQc4S1EJ9VTb]:6o7K]"
  987.     A$ = A$ + "0b?UekI7<YHDL[HTADbmQ4;c?iEAKDhjVbmY<^j9jJ3^jC#o>fDJHBVOVl6["
  988.     A$ = A$ + "d4mM\JkQYIJknO;^O=6V4O=FWXYNMYVhljcn8aP\NJ6O>nnRg]f5A]IZnYde"
  989.     A$ = A$ + "7oFmKlHn:kOM<Y4l\f9O<_WUelJN?OTH#6OT_[Z[8o?Mh=fONaIhn]^R:AVb"
  990.     A$ = A$ + "m:EGFiQoOU6[eLNdhUmHkmkmoeG33bjW:A<lV3_:W<gLS9EgjAGl^J59mDB3"
  991.     A$ = A$ + "94W3F1]=Kc[MMH6=<NegbJmlDVCTIP4DNBQRfA3]1Se_keIQg5c?0I[YiO>h"
  992.     A$ = A$ + "jE4KbdA0m9B6RmlDG]fo1Nmcla]aQBiAjjcFNo#f9WLh7CNkDg_T?4o]Ao=a"
  993.     A$ = A$ + "kikL=ePFFNiX`dCgagCnLjMj\^h`l<[YIW:b9QXelkUlR>]E_8E3f==[4ejf"
  994.     A$ = A$ + "4]Oc\QSeW9JgFZbWAmEg4Eoc5VHL8oPaXeagVVIbJNFdiVgD<]1?8TVLLEUE"
  995.     A$ = A$ + "jHhMYShJfoNaSO;71_gcn`h]Nbk2_o;l#h3NiSRWnNoiJOGVa1ThIi9cI:;Y"
  996.     A$ = A$ + "4AaQB6YcJcULm9=1;:5O4?:65K:aH2QPbiL7k`Tcea:h:2VIlajXGaDSbI>?"
  997.     A$ = A$ + "GK:JG\4R5UH2QlhW8OQmURcWQSNNdceZ_ZTkY2T426<E4OXDAP4BCn>BFhKA"
  998.     A$ = A$ + "L<Rc9gCXHUaX[UT^Poc[9DcJfeW<4kZ]e^\j8MS]>UG]#[eQj01d]1L_g`d_"
  999.     A$ = A$ + "=O^TLS5XFCZMo<3k;YXonK^JSa]h4YGk8aU\ihlcaVkJ[5K_^gHAcGckcI?o"
  1000.     A$ = A$ + "gGi^f9BcD6^Bf9WRNL]X9=53X7mDo]`o7LnZmI`OKNWcJogJ\hN59V4_7?IG"
  1001.     A$ = A$ + "\8[nQKn[BmiLPHLFO8>7NmTc_?ZYSXRC]MX\L:BF_;XlnSBV;WTlnSBaZhlT"
  1002.     A$ = A$ + "45k:8GN_g_ceSH<NhmZlNDR5ak3=]hckSh[Ijlgdm_YA0CO0le>fec0jmjfm"
  1003.     A$ = A$ + "XLn0_o<P_SE_9:9[\#_[[>e6>bGRfaamI>]hXQLoZV0H]<Pi0:[A64kYE5WU"
  1004.     A$ = A$ + "V3ZLK9Y6#mQ4[EC<?NIOURe=5JOGYY64UWNRRmK9YnOVe>CRCajUIK;>?DXH"
  1005.     A$ = A$ + "?#WJBi2fBlH=cJZhf_R;6ggeOi0ObkP?n=NLlb?d?3?j]MeJ=DZT\B>\odBd"
  1006.     A$ = A$ + "RAED>m9WTLkE>ZFRMeA3ao9G87]KhGco7>8^OZZ=O^jHTa0#hM7D`R28[[`["
  1007.     A$ = A$ + "Wdf>U7]kJITS3];Ciohge7V^n3Wfl5ED1P_Xim01#DaT8liG\M<ZPbgW<_A^"
  1008.     A$ = A$ + "WPLSigSQS`HafRVdTSkj\QGHG_DObk><<7ki=\93_abI4N=VgWh5oabkTSg_"
  1009.     A$ = A$ + "BOgI;SQSdHJMiK:FLWXl:ah5Il9\GSgGkE;<V_CimlNW7lm57Y8cm5;Gel>?"
  1010.     A$ = A$ + "To^hLd5<cIYLn\[CiUFjQaMh_G3kdhhdHhiO=^U^il\EgU2coB>FjkDcVKWN"
  1011.     A$ = A$ + "gBljj\iTIfR]g2^A:IZh>1de\Y?_BDV[WQ<bDFgD`SlWR<_AF;e7oMTP>BB\"
  1012.     A$ = A$ + "a8i09:l_BFVc4#mmJ\^fja_kFe\VYjLbhkhml#hnZWlHNMSW;<\7NoW]V9_G"
  1013.     A$ = A$ + "Vc1hn5UFJX_2Fd0kNgElFZ5Lc^>bCbjm2\ni#>5ETKjQc5>V7Y\fWbh[ALW2"
  1014.     A$ = A$ + "C<F1g94Z<WD3?JMaiR225[b=Z=UT7::Y0:FD52O;F;DKF>YQ\28O^2oXBB=9"
  1015.     A$ = A$ + "DOE=3;KB=PKk7MAh9_e[7oaGlXhGoXg>nXGka#gKI9:W6=WUYOj5kPl9G7d1"
  1016.     A$ = A$ + "mM]lk;>>L]Q#]OfeO<JOmB^6`A:biN>BEf_#ilK>ai43B=OYS9F7OO7]S?Xd"
  1017.     A$ = A$ + "Jm\J?HLba8GSla[e2NS\NCLbeWdUeP:<iDEN[d_iZoWh_71ScWlKUKijE94W"
  1018.     A$ = A$ + "OeVVPf_;QS67EFB9Z6o]e<\JJ_=lVKJQkY?^3N=]4a>k2c<CDFNiYK]SSHB6"
  1019.     A$ = A$ + "VElN^nKg3L\H[mM;7YCDmIkK2oa[oAK\?3>g=WDBE]7bhF`S]dL5Km;YDmH<"
  1020.     A$ = A$ + "^8fkad8cgGhB=foKK^8o]Ih=m][MCFgY_Qo]<j1?4DEYU5nem63[CTnPR4Cb"
  1021.     A$ = A$ + "ZS0L;mIU5g;jWB63R`mb5gkCH<CMbWAo:FCRAcjH>cmfdU?S\US97I>EIbWM"
  1022.     A$ = A$ + "ibni9?G>b8CTAL5ZSPbaUP_dTG;Aik=3im:HoAW2:?WB#OkBgAKZ\BDT`Y9P"
  1023.     A$ = A$ + "K^LKHd6g?S?IZ^ml5KmBcNPLB9U`[EFAa5S1dU^Pbc>k`H#L^^E?:lJkFR^h"
  1024.     A$ = A$ + "BI7_O<EFWRHMQKh3DkA1F_AQii?e2=gJml46;=RodllcDk1D\_7DMNIXiBK^"
  1025.     A$ = A$ + "bW5ild\2b4]^lRAaYT8V`0j;Fj47;N`ObESgmYN#lA_dSS_lgnZR]LW>bTJJ"
  1026.     A$ = A$ + "D`_Bg5WTHenTokA9l9S>D#h;>nHiL_li6#>^H]lM?J7>DY:H9Y7U`odG:8CO"
  1027.     A$ = A$ + "YR\lUT\=JTSlJY;H7DoXakjW9jg9FciC?n\#>aG4b9VR4K;cCh=WS<:#F?Y#"
  1028.     A$ = A$ + "iJK^8SX4l4ijKRA5B`TTcM9T^P;5S;FID8:Rm4D^?=>WO?aCO]4]c8U4nj[G"
  1029.     A$ = A$ + "HfPILO<\5njL]8f;=JFA5YHAlJYQCi]>?cSU[i`]akQgESK?hg]c=mb?ZaRE"
  1030.     A$ = A$ + "FTS8?F_nDQg?C\NKn[aYP73_o^iUg4eg=lnOKNYIgWmNng5VTGmMHle<k:Wk"
  1031.     A$ = A$ + "dV^^?aE7o869f`:FIH<H_nOa\iiO4VDHL\Xl7>GY=mX#NBI6G#TA\9Xe^1jK"
  1032.     A$ = A$ + "`LC?95_PaXPlLB:jDUkIcEn=EPL_LE8[X[CV7d5TMdm6i5K?A99dIDNXj#>n"
  1033.     A$ = A$ + "J5:8VfR\me2I>Be26An8cXKZRI5#V3UE`lAkKAk2[ETT39W;2hgmN]H3O=`>"
  1034.     A$ = A$ + "G`[IloH^YVJHK0=>CJnfiREIe6:R5IaUScQYoU\j4XRGiV;`\Og#^:\f1#n="
  1035.     A$ = A$ + "F>jbj<2e40kIV\OD`n3Ufk`;<KDNV9[aWWL\:C\MSLSbCh>EAnT79[M2nDL9"
  1036.     A$ = A$ + "NLS]GM5KI1c1Go1>ClLgi=S?o=ONlA_hCPb2i354`=>oDoW1B2IUL6`_lk?6"
  1037.     A$ = A$ + "ilA<940n5\:Oba4[`oRhBAcin2o4=>GR=E97E28=5C:9GLY4UcgaRBR=TP]h"
  1038.     A$ = A$ + "X?;N]Sh7YVH847m5U_<4>E58hA2N[_Z5L\f8K[E`gjP<J=beGc#nn:CN^Rde"
  1039.     A$ = A$ + "LB#6AkShB993a^LiN3Z31E?UAhGid86Ob9[G7<l3]^fcLDD>oKf_cl0PHAT?"
  1040.     A$ = A$ + "Ui[83cb\QchmXfO6K\Qi7i]7^6Y6Vn^bOBAJceo<HB=6?9KMEknIKobb;o`h"
  1041.     A$ = A$ + "BV_G\noX>geeN>_jPik;<X8oo59W9eGc^f\eQFfZ`nj9odc0GmUNI776kahm"
  1042.     A$ = A$ + "fhOVW`h2h?j`JKEkE;^aeUmSU<5K^\JQE6J=2=F=NP9i;TLOJ62>DEb[E=JB"
  1043.     A$ = A$ + "B34S_GK3cOT74KO9g6^Y;j]aSnComhMNd_B7oZ7j_QSLP75[HRk6]8WN;WKU"
  1044.     A$ = A$ + "eRUAl2?Z4UA\J<T2XnK:k<4LVTRge72A56Cb^N`c743VH?4G:\oSL]McFKUH"
  1045.     A$ = A$ + "BFm9UhAI;c3bAF?VHBV=LTc4]QSeQ0Vcj<6Idn=R;UOBaZe\T\RgWZKKfWGH"
  1046.     A$ = A$ + "?l]55USf3Z8>DAYT0JMYi[e09V374_RHCi8hB\Vg=b1eC]N\ajA`27oXa27k"
  1047.     A$ = A$ + "8`CLC71OnKlBh?n2?=^a;lLA>bk;Ga>iLUig\VHTHDd6ZXMFWPnSSj]VeM3i"
  1048.     A$ = A$ + "LODd^;o>nQ>VHLjc>dG>99L>CE6Y;H5LTS<:?jPXDiLJ1bk=khHM[aaV:j;Z"
  1049.     A$ = A$ + "<R>CiH:C`LJ1JFDM3eVlXAo:M>HRMJcHMCjb`1g`]SOl>_7IL[H?;mRaR6kY"
  1050.     A$ = A$ + "RJ:N0X`DkPL?C92Gi\U1?gW\J3?m[U5gC[>iKg?b[CTkCC;\#DNni[h?4?RH"
  1051.     A$ = A$ + "<N]Ic[_VlR=Ifmimh==6aQM<fWagEHBW8O1m]eOBNm[MTakW?Vf[ak]Ym>cO"
  1052.     A$ = A$ + "6clHaKdmce[O]mbk:Lm;hk9<Y8eWPGm1HLfhcCNNV_U<n2Woi\?dm>f9mo6]"
  1053.     A$ = A$ + "gdd\hgJOP9ONFoIQLDH<QYMI1Ui\libAh9U3kgDdG<947JF6Y;fH8f89fKUV"
  1054.     A$ = A$ + "P7EAB]7eFh`aR7mIQm]fK5GaYo4hJfkcRklbO;l82Nd;MgO:N]kkC`;NgO4n"
  1055.     A$ = A$ + "=?aGROcCn5ha_Yg2WoF?26L]CaImiH5KmlUULoLJbo[43W7;QR;j`fRJaHTk"
  1056.     A$ = A$ + "ConcoS5TAV:NTaKW[mJ[1ci01MeQ^ZQ5G]:A=EJlVhF>7b[OUX_^ImlQLUJJ"
  1057.     A$ = A$ + "FY[LN8n3el8[c9doglaUTF8dg>FSbKZ`TSGSG7ONFKDHm6:_Pb__D2QRb>9D"
  1058.     A$ = A$ + "LNYRLC9>T[`mSe9]3L:[3?dAnahGm8?0n;_mKPE=S9[f<jPi7DaR25SSOgH>"
  1059.     A$ = A$ + "[URkj1d_f1Sf96GA9SH5>AnehMiTWXYjG`QRf?bEn]GTP]F^PmD>kakbS;Ah"
  1060.     A$ = A$ + "QUU67>OJnoeY:J?6G?V<V#Mc3;KPW>fkd_6L9;k^aeL:75glIolhXGckRGn>"
  1061.     A$ = A$ + "n8ljgi7RWhZNEL;7la`eOF?<fh\?46C_F>Z:on:oVJZ^V2]=?9O2GAo9SDR:"
  1062.     A$ = A$ + "AU_FRZ?ZR2]]jV[fRE\Ho<i<5_7\7c><_a;;n8`DJ<OPK7WMMgn<lnn?V=Lo"
  1063.     A$ = A$ + "[=o\alMdoC`TRd?if`RC3OnNFGmN`QS=<NUi?Ekh<M=eHJ1jk;<9_W?lRGb]"
  1064.     A$ = A$ + "VOD\GK43HPHe;N9Q?6c6?KNloX_OJOVfOiRcAC[T7>S=LBbLGbCRfBDZ`O87"
  1065.     A$ = A$ + "iNlQdafRFVMFXhH5k:4k2Z9mJa:7efaFWaUPKn0_4>jEmnhM>:`OnePH?2`7"
  1066.     A$ = A$ + "nRO9n3?gO5Oh;m5hSOMPod[i<n`Gi[`OiM0niGfmS5=i=RBC[UbmaiXn6?HD"
  1067.     A$ = A$ + "QdiT<?TLbSZSQ9IL5KB15ZGG:>kL2G?_<>kNG[E__eoah2ae_]h]A\8CC<la"
  1068.     A$ = A$ + "<GhH>Qaj#Nn9kd[0YoO8g6f3OY=JTk4gB>Ad7h]ZTlD<;J;GCb:5UK4[cUm]"
  1069.     A$ = A$ + "ffQ>FICaRVnTAM\WZDBfX41KRi;G7:_0LZ;L>hN_V[0_kCm8heNT7dYN4iZi"
  1070.     A$ = A$ + "5EcQ2W3onRCeCDZ\6J8lICSaGSn_SfK9cmY=c98G3XF08Gf\4lZ2S;6d4Q?G"
  1071.     A$ = A$ + "cTA;Cd7JKZn#Wb;>dcVU6JXW]0S_OM#[5fGnI_O\cUOjH13JUhLGdePS\i71"
  1072.     A$ = A$ + "gkIljhQ?`KSGijo#lY?=`OmG1lY_lO5_oAo8ln?lWP?ni1n]?nGPo[g4h?nZ"
  1073.     A$ = A$ + "07n0?T`7\OR]m=G>GEPPKV5B;V<5\LI]ZXCF7\^3M\[OA[lR<o:IH;NSIVGl"
  1074.     A$ = A$ + "93_aReQIcWG\<_h?66dacAjOM<9N?WEWgnVV?m?B;0=V62\7Kl;hn6O2cV>_"
  1075.     A$ = A$ + "iiYi?9;^Go?5_iOec9Na2Sd6Ekg:]QcQOLXS;7j]oKNaY=ogKim4aTBENO\G"
  1076.     A$ = A$ + "lJifTC<k3XaL[\d2:f^iC[Gl\olUWlJ5j;1d4in`3^T;4Wf4>?LO7le`CLhO"
  1077.     A$ = A$ + "?Nckh_0lkP08aaOG0WnBi6k_4om?#Nn?EN^?cmenC0o=ihnXghc`3NC?:JGC"
  1078.     A$ = A$ + "ZChWT[L?LBZo^Y>GX=L9h9^4N]QVo?]oolNFkne8inKJhDe<W[Fm>fj_>jFc"
  1079.     A$ = A$ + "li]E71<KD9?9RE`jPHM]\:d^::GgbLf]\\BCe=0[_l]Z\R#c;>OEGT\6XTCX"
  1080.     A$ = A$ + "0J=AY7]_=XfVG1b?cT4n11dl=YTD4\Man9fWi?b5\OlQ_n;PSN[gX`Ob1[=H"
  1081.     A$ = A$ + "l1P?OnLe?DL>aZ?J7mBVKlYXm#`dSFhi9Woc9:icEh8U5Gc#VkfDQ?DEbWMk"
  1082.     A$ = A$ + "4\X>WV?<Z:3RU?hZ4k_6;^o[NKha^ic5glU]KlXgb?1GfN>06C]C0KHdk6?a"
  1083.     A$ = A$ + "5oKa7L[0_iemGaKOSO>P\f1n3lJdO3h_;Gonh_B6#_^ngUeAnL1[jm4lYGjQ"
  1084.     A$ = A$ + "nL<SALbXdTkTL^Z<a>#j?aD5>_IXa_c9>Nai^FBl`Rk_Gn=W8m9eHibFS=>A"
  1085.     A$ = A$ + "iFBTf^eHlJl>o<bHNkU3RYMGcg\A6Wl8ca9_ncmOGnPnOg3_aLRK=]9i5oak"
  1086.     A$ = A$ + "oo8eUUG]SjE;4:^SKle2kGKo>JHUhC<GWhLibB=0:<P?\oCNaX?EF8Z>#DXI"
  1087.     A$ = A$ + "bmJ;^GC1Gf:^<LMWlMR7l0_>Nn[jC`GnLbm^_Q3V34H8l7oHlUoQ?5Oe7:hC"
  1088.     A$ = A$ + "o9iNKiFNmnK1Gj_mnO9NoGn?RohKnaHTmN\8_T;Fi95[[60SSj78jSY30;_L"
  1089.     A$ = A$ + "]e:<LZhEO3V7fnVfTS?]MaV2kcQX?F>bWP[?8ha4>nT^S`mZcHL64?:cHm[h"
  1090.     A$ = A$ + ">\6`a]UWMjj``O\jf:cI4RAEAnI[lMhF>::mT5nN\VZ6WF[0JFF9SB5KhHoM"
  1091.     A$ = A$ + "n<FgbacMog1fe6G]b?C[i2\n_`Hnk?:EK#Y;GWc=YDEKbBFh9U]PCGD\9P25"
  1092.     A$ = A$ + "KW;B>nbUAEbo_FC\XPn#O;86<g^G6>SIe;L3kNVh9_f=S?kU^F1SiNaWnFg1"
  1093.     A$ = A$ + "NiOaeROkcmHH_[nDa8JmH`1F`QaKM3oghM?2`[Mh?5OlmhNmSGSnLijeWmO9"
  1094.     A$ = A$ + "G[nc0oNijgk9?g_Gh?mfb;;LMOnkoc`:VfIS:bXk2>ICTOOI[J2Qf^iDo5S:"
  1095.     A$ = A$ + "\oT<M95VkZ7<U_9<WoI`Rnn4CbRWRGoZhmmh=6oV??onDCSo#?Rd_JNk?;f`"
  1096.     A$ = A$ + "`Z<<j8?GKHC9h6K=;6Kd_=Q[Q<^L5==8`GSJbV[3?bJK1VMok4JQLOOMI63>"
  1097.     A$ = A$ + "]9?>LMKI?h#cOghbFb?67mLO3lTWoO0ofOV\FjC8gk:ggRgE6__Wa7B<:GNB"
  1098.     A$ = A$ + "OXcJa?cMm2hEOTg4;LB;FFC=5QWD#E[<dg8\N04<VSe[2lZk:nkSaMTnGclO"
  1099.     A$ = A$ + "ZG=GjPihXSK;6#AZ;V`LPMmeO:AkdgLHLh]JV87IW#0DMQi[SVUKfXnFfL]f"
  1100.     A$ = A$ + "jbj2>[i^\73cnL0aU8O9foYLZ_d>JX>?iai;_6OMFC1HlnIoXo>oaG:nm_nc"
  1101.     A$ = A$ + "YiXK:aAl7Q?ZH[HBa7[jo[#^ml:FOjbBV[WS\6Aia5[`?e7ZA\=[m2>DG4>A"
  1102.     A$ = A$ + "3^0OHaM_4L>c]?h:>i6`Afc\`3NEK0_cSM9h[N_k#0oU;8OnSPo`[LCbhN`K"
  1103.     A$ = A$ + "lHg;ffRG16Hc70fj4g;Nn[lma[N5O2NQ;h3a[LiO8n`kDh6mR>lR`_QG;5nB"
  1104.     A$ = A$ + "_mO7Oi_6h[T[[Ob;3l1?SHgm5obHTMIUXb<k1BcOibe<ZcCWH_TF8QKGbRm`"
  1105.     A$ = A$ + "YWPZE9CofVFF]HTIhEOG>n^2Cb[^olbCbkWWmjNmCRM?ZYQWOXa?nnHHlJBd"
  1106.     A$ = A$ + "clCkLPaM`VcBlL33c`Z=kP37K>jC6b]b]fOTNR9Q2b:k`foAo7[i[BLa[nDY"
  1107.     A$ = A$ + "0I<S^E?j#6AS^GD<HGcZ_hi^fmSGm6^6LPi^FLi;kR`QGn=Q[NU75gc>OKlf"
  1108.     A$ = A$ + "bJ^_g=9;aNO2EY7EFJmAo;h]_o?4ofOa7Sgh^N?lY_hGP?h9o<ln?cWRWk^O"
  1109.     A$ = A$ + "5lF?m_5cN<W4BaOZZ6HBd_keHgj`\mod[=efo5jKOCg:<F>TWDl^HDQi;IaW"
  1110.     A$ = A$ + ">ReV=KgX?UioE[?NaJOXeSgE=;58FDIniRJJBIjFF;h8fD9YW::8i4eJX;i8"
  1111.     A$ = A$ + "A\8Z_9>hcA<8j_LZAcZ:^HWNdRH3GY9i7gdUONhi^_K5Od_nUdn]JbD30^eL"
  1112.     A$ = A$ + "4e?gdGF1S6]<cT5\8jWjXAE9j7eTT`7B`S6DAn`RjBNHgC\6lSFEOa=_k9PO"
  1113.     A$ = A$ + "aU]4lHGcJaCMcK3_cCOYh_o7_;1?jaTaCR_j?n#hgoJg:n;O`CQ?heNLLfWb"
  1114.     A$ = A$ + "V`PZY_HESNMhJfl]QkJG?9^c]n<h6GgAacO9oNlFodo<Nokl;`kOOoIlVgiK"
  1115.     A$ = A$ + "RgjNO;lZgn_1?o=m1hGL=o6LTmo2H=CkRAA9dMTM<]B`Sb599fBJhA9;[M58"
  1116.     A$ = A$ + "6WLKaiNC7o0IiEBhjKKSDgAnQ4CR33kaVgIa1cVo5YOOS<?#J<o0moe66g#_"
  1117.     A$ = A$ + "mG43kVcY<n?VoT\c?NeUeaUKOV_\C`9_?<<M=giS9>QG#8=OCHn4`lBXRX3P"
  1118.     A$ = A$ + ">UL8dk2R5KOJM1_a]Njh=_]mPgk1><^QM^=L:SLQHcSL7hdKh`HOCnfae]ZG"
  1119.     A$ = A$ + "0ol=mZhY>hO0_n?nca_nFnchGO[O6NWklca[Oco1lN?lWS7m7olh8kkF`Clc"
  1120.     A$ = A$ + "OJl9_iWQ23FPj3R#\>kjc]Vg4[[FJLioco7V?^Y_]i`\7`ZcUF>VHnEBkc5a"
  1121.     A$ = A$ + "iF_:Lmi4a]Ld<CBQiT[WOlkZ9JJGHD>eGJ>86A9bW?[5L<?DH]Z\`DCFeI9g"
  1122.     A$ = A$ + "bj:#;;]HDQHK7kiM\6>bn:L1Yjd;dYFk;;kLAN96DSkEI2oQ[n0k2?k3L;h;"
  1123.     A$ = A$ + "nXgAk3gY;h<Y7SCNP#kT7Ak[6KLl33KJl32c]W]63XXPXNjSX:R5KJ4EScO9"
  1124.     A$ = A$ + "M5gjI>>lDGe2akL_K6_c3NZhMNTMRgiG^OlA_k?6hon152>?5nboV\X`OkG2"
  1125.     A$ = A$ + "lWOFl9of72_`SM4lGn`G7Gi5\?d[JZ7M_YM5c_o;5KYQmR3=W[1oX5Mkh6gh"
  1126.     A$ = A$ + "CQKM[_2>jnomh=_a_0o^kiSa;NS_6NaOf_E^f1LoGakRaee=QFVm8AjnZA>o"
  1127.     A$ = A$ + "DTLn>E7oo5;m3YL=Ano4DnOTA:aXWkie5S3[GMGORbSe6Klm=VT]Fng4VTgi"
  1128.     A$ = A$ + "Q6nT5WKK>WQ=m3E>mo_;<Y6KO_f`IcE=<9SoYMNdkiNR3Ii=B8Gom[iFOdaj"
  1129.     A$ = A$ + "`IPmGHNN>:ZoG7K5jPHW`LkA9hXGnbaGmZG4`[OAhGOGW1NeKjR`<[__HBe<"
  1130.     A$ = A$ + "A<YF]L<_j?3\bnL1H7SoJaE^Vk5gknN1lbg`7Pgjfn8la?jGPoj;8V]mDoIl"
  1131.     A$ = A$ + "5_YHJgSok`OmMn_`;l#?[P38f86<9U_BheGRa1CbK\CheOnOd^_`AK4ahZ]\"
  1132.     A$ = A$ + "hoJjCAaY4KQB;H0en1ZCH>LhA58lmEjiCo>e5QDUmCGn=TALa4F?e\6`A<YL"
  1133.     A$ = A$ + "5L5F_U::=1c9UTd7cQf[XH_3>Y4DLYlC9TZS;N<5VE^jieZ:8?=oLkBEUPKi"
  1134.     A$ = A$ + ":>4N]7oNakmZ?5JGCb75THdH#M\EH]COlHcCK<Hi3\[H2ET?jGjn#mQlQaDU"
  1135.     A$ = A$ + "H_gd[1gfI>1lLoTERWm6F2NmkI]h]O\C1_gc\MlGn=G0`Om65L8QK4N0ILDI"
  1136.     A$ = A$ + "l82fT\m[XCnNIlOoI?=NSGj>`OlmN>LGgbeQ9>lARJ:^5RMiS0=d^aSIGo2`"
  1137.     A$ = A$ + ":jkYPYfVEP==\c37Lng<^aMlXh1^X76?lELDl`GicPkmbOF\cULHD#\e;WGZ"
  1138.     A$ = A$ + "#FkRJh8KijA#EOh94`9WGB;D<8_<B4EgTRecgD_6V>Rl6SD_koOZHBAJkVgh"
  1139.     A$ = A$ + "5IlQlJ[Rg__o_^oTRd6\6cn=kL\icK_i`WmHjS66W=coflhGlL>9defdFWlC"
  1140.     A$ = A$ + "#6I8H3<OJCGN?=G`SVA]5RSLjC4O`3^MPO[P9mIG;ndWil`_oQ?<^\=]1<lF"
  1141.     A$ = A$ + "d?d]l6XL_mR`8Jc9Q9f]iSE?YeS]<[C6KMVK2kJnW6fkB>MLV;Okh<GeYQWh"
  1142.     A$ = A$ + "V^?l<gk3SGiAN2\Q5]HUKREoe<mFKn4b[FchnTOS]^USmo>aDfboLWh:JHd1"
  1143.     A$ = A$ + "MjmLQRo[YWH_iV]R_kfg0ImcPeB0R;A]1aOG\VVd^:4KfbcY6WddLcEeh3[9"
  1144.     A$ = A$ + "LE8fcaWWncVlSH_>_b2cE[ke4S;_<c6]]i]23^7MaYVifZVRKj7M^h5OXK5o"
  1145.     A$ = A$ + "iOc;SE=kaSi<ZnSQ8lUZ#hHd2iHjUP3=l#nab[97LhEfILO7J4hU_YUPGifG"
  1146.     A$ = A$ + "1NakMUhMO^C3oe?D^>lUG7nZone:H>RabOi=3lig8nZ?E`Vn4iaoUkDNn73O"
  1147.     A$ = A$ + "eOSLVNAlIOnSSGnE^Ml0?dA`KoF_4^Tco2#o[_GXEiF9Z:Yb#g:ZFd#]3G6S"
  1148.     A$ = A$ + "4;Kd;6;O\[0cOXc6KLJ;2Wm:f4F`XV=JAF]BhbEPL^=;TJP2L[70R=fbj795"
  1149.     A$ = A$ + "BF_8EIm\hSfao0<gkR;9G^6a5>Wf<^]AV3oo[R5mm5VTiOE_lN\LobkL;NOY"
  1150.     A$ = A$ + "MoW5Koo_Z]KNeN^Mn`KN9Kh?V6:XoP<O3i=OM]iNF]dSn`>IgGoj^R3SbTi>"
  1151.     A$ = A$ + "9;f\U_PGU6]MANn:C>X6GiCOL]3O`M_KPGk2aOmIg9nZGiL0N[[6_eMO#LKG"
  1152.     A$ = A$ + "`IQcLUK2cH0c4eTGmXcEfKdkfeG<Vn=4<fn?#<Y1=<\^I]#<oa>A<e1>4Lj["
  1153.     A$ = A$ + "N=hj?d1a=OEG1Ni7mQel:;Egn2FfQ24Fc#V>>=^N6OH_l0M`[Rjhb3GCO_Q_"
  1154.     A$ = A$ + "og]>3j=o?MN?7;W2Eni\7[hj[KR9UYP;W1OMV3JR][]_RZ#[;SaO[0eV=JKF"
  1155.     A$ = A$ + "cb?K]o3A<XRc<9en=ZaMbU:;Q[#><NKIV5JMcZ2CNHS0i7O0<0Q?dmmC_Dlf"
  1156.     A$ = A$ + "?cmS?iGoLhb?c]SZH]\DnMeY\R7]EF3H\UV2fG3m0gg^V9NfS<?l>?fZ`Wm6"
  1157.     A$ = A$ + "k4hgOQ0OlU8lO^>QGT<n_XMJ7AgnQ_enaKodW6N[7OKhe__=SOeM]5l>?lNa"
  1158.     A$ = A$ + "Gmag:n[OjmP_l_bP?l[`MM7o8L^Wc>`UN174ge=OKhb?g;4kL]K1kJ=K6KLN"
  1159.     A$ = A$ + ";7KMU[5KIi[67H7k6GoULIhZ?g3PE?SYSFEH92nL<ZOS25Mb2ND<Z^J34WO4"
  1160.     A$ = A$ + "KLDSi>f\5WV3N>iaK#O9ZfRK[3h=oBh`knoc<nVR1ggeHBN]c`>F[VD`1O>>"
  1161.     A$ = A$ + "WK`m^?QWO6iWioY>RllBSUSNOKn?4Y6gmnik=FT6NTEW#<o#ahEaWgZS\dFX"
  1162.     A$ = A$ + "cNkW^FKZY?]c?^HEoZFF<1#kB>><eV74Ge2k6n3ol]P?i>f6Nj;LJhi>l2a;"
  1163.     A$ = A$ + "NTC1_emNQhQ^^3RciDF?fd:F5fbJ?E\YE_5LZ[OKHc[KCH[KHSH7KMChDFg:"
  1164.     A$ = A$ + "a9_VUSm]cC57HWK5gneL5h5NPk6_g;l;E]QWM\neL4Ujd9AgJV5cMm0^eI;_"
  1165.     A$ = A$ + "f_MR7^g_6cal75g68JWnV3c=S45<1VCmdo[FmLb`\2g7Wli4_[\34bYf;U\H"
  1166.     A$ = A$ + ";F>YPfEE[Ae5GQR7AlWJZ\HdYFg<dT2c0UTK:Xl2CC\A91d^VF5:G`Qb<1Ob"
  1167.     A$ = A$ + "[9fT:_ol2U2Z<]V8l>3P5=^QSKn`W3Nf7hW2lWN7lV?jSPE=a9RV8fmd4igE"
  1168.     A$ = A$ + "]Ii3KLLeQ7lbF5n]?fIRgie>Clao9af\obQ5lX;C`EH`=5N#OXlnOk[2OncN"
  1169.     A$ = A$ + "VhMOPePGiVW1NckJ>ha>l8`CN5C47mPC1ggi<El;_nePWiV>EllgaN`;Lo72"
  1170.     A$ = A$ + "?nMN9HYcN4Hh3\KHVCKBHa;HAH3[OCH7Wf^aNgciPm__c3WeN>K\bU\<<bQ<"
  1171.     A$ = A$ + "<TOFI6F[8iU^`?:DBZ>ALZIga5^OA4^f`johk;Go#?_kkbQgiNF<B<KAZYZZ"
  1172.     A$ = A$ + "?^e=mjCG_cEK\LQkKkLooCM49VDTJnd\[QW_<]AVEZYLLf0ih_6gjo^lLSIP"
  1173.     A$ = A$ + "3fYG3:h254Kd:VD9bagU\2Qeg[BaM\YARgl:G5NXM?1Li;ZNLPIe1\_5d3L`"
  1174.     A$ = A$ + "e=>\aI?<a6PFPfFMiXkegADK=]5SH`353[o32SJX31cHj=P6JH#HH3YWHjCL"
  1175.     A$ = A$ + "hhDGkRai_[]ZHB4;;?af:F;H972Z;867LM>PP75`mnloI`T\jIXQ9YeA8Zk1"
  1176.     A$ = A$ + "fSEXfO86]OOQ[eLQiAAKmH>Y4K0eWJY6E\:fDlD;REDX`7ZiXYIGVf[CH?NS"
  1177.     A$ = A$ + "eMKZiXVgdl#KZ^HDKK:7eeVFP\R;ITA<aS<3BNZRMT2FCA9V::dONX\XcFko"
  1178.     A$ = A$ + "S?l]NahGo\g6ndgiGRgoiOJl\gn]RSLPMRCmT69Vk#Z1G`Y<9l2gkN`knlk3"
  1179.     A$ = A$ + "o5Q3domG9fWaQP9mi_fIQ?j9f=nmgg^`kOKW6Ne[MIhY^lYRkj\k=^aMF7^R"
  1180.     A$ = A$ + "eg:LMKZ[h7]dNR3<3ia[M0hLGJga5\nQPcHY32Wbl62JXO]33ZGM0m]GM5m_"
  1181.     A$ = A$ + "om7CNJc2;H9[4SObc0]]SeS<cY0]6;5WL^8AangX9O3J[2So9[5SbeV43hdk"
  1182.     A$ = A$ + "6>Am`Xoi[7lo_SASUOoLnD^YVfaQ5596coK0C:B^T=6gb_]HBVn1ii2;Wh\l"
  1183.     A$ = A$ + "RSg_dW^eMDDFI76GB[OelmhgIn?i>aiT\WPaJ#?eTD12_Qjb9I\T^g4lCGoH"
  1184.     A$ = A$ + "`]_SYRcN6M0WjHZ4[H05QE>lZ`:7GW`DkO=H`ee2=W:jH;K9JECJ26Hgj16M"
  1185.     A$ = A$ + "o60VI3S1[NAc2kIkK#[Y\cK:S5;KjC0GP`GjV^d;0=;e#8Knm;h3\VWA<AjS"
  1186.     A$ = A$ + "iPNROlGWknoLHCJn4CLHfSheiBaXJ1bZmU:n\;VTZ;8GNBY;hB59LRJFaIQf"
  1187.     A$ = A$ + "fR:#gKKmXU5dDdZR:6]^T2AEiU=jB;5\9QS4kU0M#[K09RlR?3TI<Q#AY4]H"
  1188.     A$ = A$ + "3G<JmDZPh39WC3Qb3T:^a;N?h^?bIRGi9_>lGnPW4_nSO7hN^n;4gdUMjhf?"
  1189.     A$ = A$ + "lfaSMSW3Nk7n`h_mfg6`OhVaWn^G4nM_hfaKmHK#h=]9lLo\iSWjZV3^[cIl"
  1190.     A$ = A$ + "hjflP`U^lNR3]\^PM=SFPe=VR`RkOfH^m<G<cj;2cZcUQC^QfQU<dVQIeWba"
  1191.     A$ = A$ + "R6I]HZm[]H2m_N<V1d;M=TnfkNSnegnSFejfQ0aWHhjc=c]GZYLVWA<783Zj"
  1192.     A$ = A$ + "HcYf^AlXTD]TloOP9eHH6Nc?O_nheh84Y_TnO3HBNo_59Vdgd__6cf=[f6Hf"
  1193.     A$ = A$ + "jJ7CB^aHKVCN:X>QoRICWN>;:o7KnZ?7KGXOMYOT8>1cSlZ357VD=5QcI>m3"
  1194.     A$ = A$ + "kIVm4;\OUPIf]L`XJKBHdM<C<d>T;6AWJ6jO==5M[iERfGFYXO]_MXk]\5XW"
  1195.     A$ = A$ + "]]=Xoee><dNd9L^kJcH:3]OHNSOTHScOVhJ?diPe<S9S<miPoU7]KCh`TK21"
  1196.     A$ = A$ + "Lb[3nOb_o`i2bo<HBQm?ZKMP>>gi=NkUhN[]bF]Rgdc=e9JYIVYfG_7F?k>j"
  1197.     A$ = A$ + "OG[5m]nJA_KOW#oJK7AC5>WM]Z:ACB9IDA6YRjKEC#9IW0B=FO>a[;ZTeLZP"
  1198.     A$ = A$ + "en]dican?[OZeXBa^FjZa;mPo<l;_g[4?imLHlWNc73_`3N;hJ_`mP;l<FQL"
  1199.     A$ = A$ + "NImhXo\mQWnF>0NWWhZ`Gl>g4nRgn7Q?m5?3lZga:amLA=P;OSeS;NEeR3^X"
  1200.     A$ = A$ + ">PM=mFSe=RVQ5dWBa<jLnHJM_<<SNF=6Mk:13Zj2A3MXIHjm\Bd]BR1C\[ER"
  1201.     A$ = A$ + "6jB;`4kCW`XjAMXgefNdW^d5TG6IZiATOgJ7:[3U9;fWAnA\6;IenO[?:Im1"
  1202.     A$ = A$ + "I[gFoo?Q9iMNYGOLJaGcK=69blfoo4aT>AnCZan_n=mK<B<9_jR`R3Pgl=Qc"
  1203.     A$ = A$ + "1kEGjZVOfVO_iajdc?SB__Re?#bQ#[aZTS0m[TPA#o^FG>aSIgcFRYfS:`Hj"
  1204.     A$ = A$ + "BAXOeT:jM[B23Yn2aPjDYXKET=JK^9Sj:=O<XJJ=VH_k96F7kPNOo0kHK`Xk"
  1205.     A$ = A$ + "EMh<gdZ`hkCGaBWdH`i^U=RCInc6E8L#H^mV[PC#NB<?C;<H81Cd_V_Y9AMK"
  1206.     A$ = A$ + "6CLAd?amL>aC_B>X7oFL\cO^eK7gJBWY]BRo4d]VSaj?6]a;ePaZJ]^ZB:#h"
  1207.     A$ = A$ + "?d?<UA>L<ka=F<QQ>#=GKINf>`>e1<nn:L;Z^YXl43R\UOg=;mDDocWE#j7L"
  1208.     A$ = A$ + "G]Ok;8b=^<dnaD_kLeJOMk#kJ7h:>cc3?m]MOh87JohF_R;2GnNf5^gOleRk"
  1209.     A$ = A$ + "iJ^AlLgo3PGnA^CLool;4?f]MQRM]G>Nc7k`h=OX3Qof[NUh_olG<nC?nna;"
  1210.     A$ = A$ + "NTeS[O[35;^G9SAFQ?<VF45VD]IPQeR<A?;=3DO12g]R:4eUGnXc5;G[JN5H"
  1211.     A$ = A$ + "`]\<<f>E=>cE>O\Yi<==?Z;?SdD=Hah<VN29jf3fmiDK^SfY?_M\NBYCM[Ak"
  1212.     A$ = A$ + "OenMd#RU?BQn6`TnQ67ikbi]L[G=0hMN<gBObbQQ=eHiono9R95ioUoAoF?A"
  1213.     A$ = A$ + "S63CRkKheV=LF\9]j5YJOV[oTlVS9FOjRnYTcIYOUH]a8CinAbGZEY543Bh2"
  1214.     A$ = A$ + "dkFE<jY`IZibJ^EGLdX^FT5jF[b7m]eUS^edla0JNcTkm5>BbLhE=i6`ZVnH"
  1215.     A$ = A$ + "a#[_eHiCM\H3cMZHZ3ZgH;;J>HQ=<BDCAiZlaHm_?WHSAg?CJ[I\dOg>j7WJ"
  1216.     A$ = A$ + "BPJChOF<YS=L>NR95dgajOdD_BZ>nB86TIb9P2c>=db::3mYcM43]?m0CId3"
  1217.     A$ = A$ + "13\kM2M[]]#kc8iWHL2fX?<XjK5>Y664bPi0HBaQf:cmY_ic99O8STXVLlQ>"
  1218.     A$ = A$ + "gfFSa=XaS]_n]S[A`M>h1f1feFG?FnlV36o#656Ko7:JXom5M_e]1=??1cXM"
  1219.     A$ = A$ + "M1m_Sm2CJHS0;J>=P]_UiRkkF??lQojk2OaOhGP_hM_;l7NR[0O\P?m7?jQa"
  1220.     A$ = A$ + "km#G6N_7hBa=\WiP5dgRA]Ih3M]hX#]i5?JEj9SZB>CIT;Z[X:#7;^DDYPkG"
  1221.     A$ = A$ + "BLaPj4\f5<jAR^FAc#FbejLRC^O8Q#Z=Z<_dH_Ib\gPf<cJ<K>YWVR9Al9J["
  1222.     A$ = A$ + "F#]^ZkDo8h8bnRmoG7C:biMVoADoPhj_KSKTYSB_j[lod`TJ<>Afo9_aef[F"
  1223.     A$ = A$ + "]?AnFZa\Mc`I\?C_mT8CgfLOEC5^igEB^[aaenD>h^e^O]W=jg97;8^DcB:9"
  1224.     A$ = A$ + "daB;1][l2AKJF1Xi=;KdR:c2MXE5R>DM1XmUT9JOQb8WDAkb:IddhSBh2\G\"
  1225.     A$ = A$ + "ke>?<R^E3Fo9=5<_a<D<mQdG\P66>Z>k<dlKUncVjTVafRc=8W8R1AO<[?Vj"
  1226.     A$ = A$ + "5bGS5;h67C:a`SX?^Nf=]5Ti5[EOTD]?5KDX5U;H\MZmXQQeO<IiggT7k#`X"
  1227.     A$ = A$ + "7B_eHYEDVQdNcFAY7DmS=[3JY6W?TKbR=]YjG?g`jA9SgOkKK9H9;KbHkkLm"
  1228.     A$ = A$ + "h2>d1a:Gj6`<Vbl#;KMEXbVG6JA[K9ZXi]#ff>D#n5Rlb=CD#^IPlc`9nW<o"
  1229.     A$ = A$ + ";RAnlS9A1K[0OXTV8h<eV<Fo2j=^o[Mgh;O7VP>_<nC?g_0?jeMIhIoi76o^"
  1230.     A$ = A$ + "7mF`A_^mR]_XQPfEX?dl<mSJb?GdiVd2aVkd#A1B4EVFRXZdC4==m<4nM3#\"
  1231.     A$ = A$ + "IN12NJ\:N_N>A>gBm>T[HW6k[;AfC]2[kdXLb39[Vf`kI<mf6o9HMfo_j8bi"
  1232.     A$ = A$ + "_Afg:<O8ieVUoC6C:Bk<io7CSXN[;:f[IHEOK`TlZAB3_f>oHjA:liBZ1WHL"
  1233.     A$ = A$ + "c5<genX?<35`YoRlo[m^>S>Z^^F?RA]ITdXN1ek0ZST#2e0Q45AGP04EQXgA"
  1234.     A$ = A$ + "6<M#2901H#0RRYG]1CaVPXJ\Yh2fD<4S=f6LN^TRmc>9nUG:_TEbjmN[egk\"
  1235.     A$ = A$ + "?gkNdQi=RRSC`a9oH_VfM^cM^gcik^gkcNomi^^6Y9ea=Z^Y5F8>K11JfMhW"
  1236.     A$ = A$ + "7VA2]=BTDRAQf5G`8R0L7Y4Zo8gh23i5A#81Qo3a9RSi\?gVad6N?Agb:N<Z"
  1237.     A$ = A$ + "nD<jE7K?b?Yh#`V=:WC#eE8aS^B]kB_>CHokhjQUe]P7G<96;R=Bkf8<9?ei"
  1238.     A$ = A$ + "SjTS=B9FDOkJQXGMY0TKjJ[I8U;kdC<J4^o^SFkU;8#gM4Qk[KB^HcO?5WG5"
  1239.     A$ = A$ + "n1i[5]j;?bPl6E>dQQU_dJ`JgDmX^eF3:KDUSRjMo`lZI]H5[MWH_7nHhTGj"
  1240.     A$ = A$ + "Bhd_i=a9N]KQmMZ;Q]M`G2GjM^5>i5^0>n9?5>baOA\CQoDcI5?=b_d<#hYk"
  1241.     A$ = A$ + "9l=B1^GXDo\H095X1dSdR4[O1c6Oa=_=`Oh?SOkmn4liGo:hS_b?2OdEN1LZ"
  1242.     A$ = A$ + "3^:dW>g>IMD5]O1Q0Le22a=1FTG>9R]d54Z5?a6ZKEB<OI?m:^nCLO2iW4Q;"
  1243.     A$ = A$ + "9en:GMeJ<^BMBAY7IO#n2aJ;i?TaT\M^VJ=l`n>`i^UnL>^]_?W?9eeOWN<R"
  1244.     A$ = A$ + "03Bf[FfF[Wbn1EW_`i[c]4GBmh<>`J^\eo?K[>SB[?>KT_BbeVBO<9eS9nJ`"
  1245.     A$ = A$ + "5h_3N0oLaChSKFPGN;Vgh_W8X04SmmeM4Whii6GTXm4O`:Rc;kX20ghl71iU"
  1246.     A$ = A$ + "JH8odS2a5TGJLL]H^\?^X[E]>KdJN:8>i#JTF#g:7]SncOoe3GcLaB[Tj847"
  1247.     A$ = A$ + "k1[k:dn?0amnYjaVkSFJn:aiS4G7eaTK7jS0;:_fW06\`g]<4hAY5O48QX22"
  1248.     A$ = A$ + "];b0AD1j12e7GAT2lf0]hTTCYMWlA:07A<ah=6m8;7eDC=He[ICH>;LIHVE_"
  1249.     A$ = A$ + "D\mGjhh\Goma[nSog`AOeKSWo<g0Kj0W4em\_0ViZ><VA377c^aG4cO;75C\"
  1250.     A$ = A$ + "^W5cNUK7ef`NaZflN`N?NCHgWjhh`_eIa1N]SQ=MX6`#7MG5hT2oL2b1ai>3"
  1251.     A$ = A$ + "BO:S=PXad[hY`GlAO=n;ojO7niOhEam^EChWNgcPCOR=Q9?iQ8iIKO]h6RVj"
  1252.     A$ = A$ + ";Ho4n`5C0HLU?H<VQ>2IOk#Ln;c9i\V[CnlYM>BCoCTeC_D_8XcYJSI\7GB["
  1253.     A$ = A$ + "FKM?\aofKnf3KNh?dajNBJLlVle#:_>D]<#i4Si`ENkh[5ZGcNHlKg3M<Qnm"
  1254.     A$ = A$ + "hhm]DO`<fLMPCh#TAHBV5a^ALm>Y=aB>7eP8F:9o>kV6_hHd\\VELeT`_:J^"
  1255.     A$ = A$ + ":U?5gLA<ga7dFol0]c?gAB]f2^n5NAhU93RhCLd:WK#c]YnGSZ7BZ^5UJ8Vh"
  1256.     A$ = A$ + "mYJOAJ]BCCa8NVVN]CjF;Q9YQ7IDh?SWBL9>N]Pl`C]jJ#L_OZ?e8>ST`RjN"
  1257.     A$ = A$ + "^I9iI]QdkNP1dmR`0jAQXKiU9jH:]AR;5K8n8]h3e79VD#FL41hQS2\Y0#7C"
  1258.     A$ = A$ + ";=<ZA>#\n=D?Fic\>Dk:f0fkANELUgk[`MnUogXYKlIHikmlHnKjhH^KhhXj"
  1259.     A$ = A$ + "]N>\T=f4Vo6?;VjjN=<VWibXREOF<n6>7ZX^SSI\bCQi]bV`lFmQaDZI;HZe"
  1260.     A$ = A$ + "_IDI][3CJe[5;OGK3_c7N=L^C\KDAY5PPmbP\Va]h\g2o130Y4KNH[=\MPo["
  1261.     A$ = A$ + "O5`ocGP_lWM9l5OiKRcNYG0SKjSFZS8]>#?AXnIDFgVkJ;K41ZGGoBM0AWW4"
  1262.     A$ = A$ + "8o69\JR34XNkSROS`aI=oSh09b_CKaPn[1CbN[acCjiWocXa[16mLN]3ISl;"
  1263.     A$ = A$ + "Rim8E^GSk5I^WJJYjHjAiJ:[[eBn]EGg2UJGXA]n>Ul;B[>LMDCG0Xhh8cAa"
  1264.     A$ = A$ + "__3^8e8<B[`\8i>#Z>iLBF7_\6BBJRL8NJ2A:Rc9B_<1oMc1LicN4IL>Bmda"
  1265.     A$ = A$ + "5QoAVLBFG#D=1Y]6O>;e9>G4aChX^F?K;VTAQ_1>;eNgkGk0]>O`PVAh?T6#"
  1266.     A$ = A$ + "agSWVKaJb;=_;[4R5M:mTTL`F_kLNbee_;IU>b_m9S\CZ]HPM_#ifdmlb#F;"
  1267.     A$ = A$ + "TagJ_AdnkQDgKc?]4`PjIO`2NZiSZGlRaJFk6`>gKCh7oQo6lio6PGiFoNDo"
  1268.     A$ = A$ + "n^6VlZ?=VASG4eLPO<VlJ?]0Oi5aDG^03Zf;RbFlE#o[ijX\j_66f:_16d2_"
  1269.     A$ = A$ + "2ZLAG5?eb^6FdcL=<WWiRHZ[hDXRJ>1Vjcd46mlf0JLG??Nm;MFLiC]O<WY>"
  1270.     A$ = A$ + "#QOe>9_6jWiPQ5WJ=6IYSDFG5gkVDO^mYhgoW^3nZohWR6gg6aRGcbP1aim#"
  1271.     A$ = A$ + "2a3<Qa>8DK=cCFWXDM?hS5CJJ>S9]kEh[I]NWQR_eMmjbR`TlBV;?SB^TCVC"
  1272.     A$ = A$ + ">KcAW=J<ag5VmjoSo5VeOK<elMaaYaefPZ?aZLRP][aogVJ[T=B3]9C5CR6c"
  1273.     A$ = A$ + "aLS_\?8E`TdjG0WTLlXW6=9e0Jf<[cYY4W[A[O\4_P6[KfX<7<4WCkY8FS;M"
  1274.     A$ = A$ + "VG4UDDf8#akAiOQ<J>1aGIB=JB4WZSTo>RS3Wde[NkQ9iTN=5eBHBdo7b_8:"
  1275.     A$ = A$ + "^=>n3ZWiLWhgoP20M]SIQ^UC6BNCKVS]2d_RjTd?Y>9lGZg5V?R`?_#BA6<B"
  1276.     A$ = A$ + "9j#5k7WTFBA4XDgTjGWc2CH`m7;MFc7KOMK37iP73=ed5amndo4nio70_e?1"
  1277.     A$ = A$ + "XV]OE<aEL9DeV_=Vhj^96i:^<Vd6_<Vc>O7<]EM=DnLOCdkil>XC?eeAnci="
  1278.     A$ = A$ + "#gFhEAoG`kRA^XkP98`YVJe_>ZLaW6S]fG1U=gG6mNZ763Kfk6CMQK0?onO>"
  1279.     A$ = A$ + "LZ3_3<oYG:b=]P#H1jSho=aSDVaT7fH#3;HFHdm;?\aE>EleOm=`WlEg1_`;"
  1280.     A$ = A$ + "O<lKaO1=mZW1]BLnnX7Ng8j832FLcIhUkRkaHBcGEomd\<?oT_[D]A#mX<iS"
  1281.     A$ = A$ + "4S99_WU1SBoT]EWK\W^glP<kEW;]d[]GmblTNnk?4=[i]a#cJhZ:?I#h><Of"
  1282.     A$ = A$ + "bjDPjjYeBiBjA5KRVgCgSeEInOMBR7AikTh`<_daU8<YV[5>=oPX]WhjA2Gb"
  1283.     A$ = A$ + "B[LEjcTkjL\\TWUKU6O^CaRAh=dHnX2;8IOH^Ye\L\ZU\0InS8N2aEmJ5GVo"
  1284.     A$ = A$ + "JMM_eRSVUHK^8i<9Wd`=9l9SJHAD_VCmUV]J\\eHJe__]d?9WMFF33dmkMC<"
  1285.     A$ = A$ + "W;c4R1UeSRUf`jGgUn05CPN;i?=R7A8\8R_eR=8oTLI;aC]4OoCJRDb1k?VH"
  1286.     A$ = A$ + "Im3=FclanJHEH[e_J\[e]ILnCNNLm[M?lknc0O`?7HWWiC5n6mVRHcNO<lj^"
  1287.     A$ = A$ + "56DM_36iJ_16ej_86jb?3ZH9G1SKYg3mK1O<:Jng1MNaG3M]j[S1DkkSb5hA"
  1288.     A$ = A$ + "S\fcQaDg;QYehi`TgdU4OWg43JAG0cJ32LZI_ADOm[5kXaUQ9=R2#f9jQhlW"
  1289.     A$ = A$ + "6_hgfP37;oYNJ\fI=Ed`\7;>djF8fLmc67jXk17j475oAloRSOZV#m;KAXQj"
  1290.     A$ = A$ + "GR\n[2`;gT[OQ5C>[[WaJe#:k[;g?TbL<X_fTbL>BLX]H\PZag;hA5KjA1Cb"
  1291.     A$ = A$ + "fHknGiAj_]F;5g<k74gGJ\FCc[5WmRMkKce>>f=GeGG:>f=ZogUak#L>4e;H"
  1292.     A$ = A$ + "jeY4Q7An`h<=nSROCOMOehb3W4n;AL3]V_mbNkFP7i8Q9iUI4Nh197gGD>IQ"
  1293.     A$ = A$ + "kMSg1n;if9GUHGQjWoJa\jPSblohWc^;eAJ6SSGo<[mbYNMFKkj]YV[N;jnk"
  1294.     A$ = A$ + "IFFoeJa[ei>T2:>Wda8:]4YE#j98Go\P]hZ<?kAj_gBN4Qh5BRO8Yl=UE2a;"
  1295.     A$ = A$ + "e3BBGTZ\_UPE=WZ`5?fcSgob_2^jYK2_lQ?2>iQ?>>IC_>^mMo]hFoDPeoS^"
  1296.     A$ = A$ + "3Vb6OK<U=mIHjKoK4aWMKD#EW4SLSG4E\Q;Q1?gG73M^_7jiCoQXK;j3AgGa"
  1297.     A$ = A$ + "kQ^_lKRBGn7P1DmKQ:FaI`TFW8F]eN<<2A\O5>ccRL6c9`0Ve;Qa_XmPI?o5"
  1298.     A$ = A$ + "Q:7F98_Tm21i6ao:J[ggd7e`afZKYhbkI;h=gkF`5ffj`AKLUHbSY2<ZA?J\"
  1299.     A$ = A$ + "`JZ6_jiOIAlc_TDgTXo[4W]8kK#WL\InGGL]dGgm41hY?Je39k3_1=mMa;mJ"
  1300.     A$ = A$ + "KW`Q8OWJ>?C=S9Ynl7dhOek;c[7UejTkk1cAoWASmAB=V=El:nmi?CUOF\Ug"
  1301.     A$ = A$ + "=OL_>J=f=mLFba^An8iY>?f8i2=mJ?Q`^LFjWT>WHKBC;hUeIXhkj]1B_aJU"
  1302.     A$ = A$ + "\>[YaRDofk0YClF<QP39#4I81S`leGLmGn2X^I<KihHCbj=b54K01;e?j0Lf"
  1303.     A$ = A$ + "3mlDYYWUn:R9QjiE?M`XeL`BakYY=gf7OWegFbg8^fSlFLLVGJ]5a5\?R?g0"
  1304.     A$ = A$ + "lE<?>4O<QTR9HT#T]FJ477enhSFb_oiWFBXh<C7M9md#gkPhadB65VHlX[YV"
  1305.     A$ = A$ + "06DWc5cJD31WIo?;nh[MIl^_eKQm__SRE_a3QV^j_0Kjlg5CL;G1E\f?2UEg"
  1306.     A$ = A$ + "7SN]Tg5MMA_26DSW13MMW5EFk=a`GhMA9cAPE=g[S>^PG3i^P;SnGg7PBGdK"
  1307.     A$ = A$ + "SQEcY`XZkXXRWY9<TElZXXIN=QM3Db<>96aLg16`X:7iVC48^P<P43c8b>SX"
  1308.     A$ = A$ + "#]EG5>hfG?NQ=\:LlEE=NYZW;fg<W>JH2C2;H\C2mY;m4E<\APWK[K1M;eH#"
  1309.     A$ = A$ + "86edEGJ]0\hT[BN3Qd6BRC8mb\W8YhC49gVT4nAi_F?l;`\XJ:UFk2jJPF^`"
  1310.     A$ = A$ + "eb_T<NOM\9?ecYTI5n<o1Q=ai?EMMKhadZL_S]c9nkaLCK[M`7Gk9=fbg6cf"
  1311.     A$ = A$ + "jZBbIajn4an:YZSflfal79caMlmEDagNDnmIoTXk;:eU7WM5niR9=nogT9[J"
  1312.     A$ = A$ + "J=]^kDmEBaFiQcV4VK`;C^3WMb1ijTiZ3jgcDZcH>H5CbEMMf`X0388QO7]="
  1313.     A$ = A$ + "VX5a650b]M9SOo?k;A1YU^4kPn>Aj[oB<=;BNee82bX`o5a_C#>JBF?OT6d:"
  1314.     A$ = A$ + "G;8bLTZ]AV[LJNl:SWCHBD<K4??Bn85]hgV`KR]eNS<JKTXG5V5jBf9SLB[="
  1315.     A$ = A$ + "JFZ]5Y6GhX`\B5IUDLXS95_<F^B4ndAFAYW4b:n8AQ9gFD#2aQT3bGTFXnSl"
  1316.     A$ = A$ + "JG#H23Z[HoKYAl1gj3`Y>kKQ]MX;Q5_mCSIfh5Ta^=feNGQo>g13Zn;QA^UC"
  1317.     A$ = A$ + "SA^QCPaDoKPAFmE5admfXdjO;DjZO3d[jNE<hJOKdoWndXliO4<^UMDDf\f9"
  1318.     A$ = A$ + "6bl?:6d\O=Dj<_0:J4K6]_h:A4a75R?6;H`UT>Fc2W<fo>F3>jc_E\UE_4\V"
  1319.     A$ = A$ + "i==\nY>F\kI?3\]Y=MldmKPHdmX?Xni^4LUcoZXo5E82FLn;2CJJLPT?Q5WO"
  1320.     A$ = A$ + "9Sd>?b8mZb\hl>IT>jjT1]NDVReVecUPmfR^^9hRd8\X7G<9>GYZL\?Wo2e?"
  1321.     A$ = A$ + "CMl]mdYaoFIZoNfcnQ8V4GGBfFceZeDUJo4ceb4[mfDNHH^SB]gSOD?WXV[L"
  1322.     A$ = A$ + "e[1dciN#AmHQNTnmHNiGZ1L^jRejI<D_mEF[;VE`IMG?oHD>aXe0;iXS5];d"
  1323.     A$ = A$ + "`aD[X2lkogo2DiP6Xd?6NmMXeOfObo67KUliDORiY\^6=8icJ?9^YVb1[`_7"
  1324.     A$ = A$ + "J]c\XSEA?Wl9R<JkTjaV3JaSai]^cIVV0C:FTEbaR2b<ADBnYS^faD#9M:CY"
  1325.     A$ = A$ + "EDfYRB:X3XoM=OdSleN=eCoIYKY4A08ch255VZ0c:Q`AVah;B=<_4hEAPLB:"
  1326.     A$ = A$ + "5\_Wm0hBWkVhbGnCac^k[PY_XG4SN>76E\TSSa_ZCPbGj^5n=]3<ljg_d6aZ"
  1327.     A$ = A$ + "N1<PJf76jb?8:KQk2E\dG0U?k]Q9]hmRYEm^AUC_1DiDF36#i;2mZ?c4A4Af"
  1328.     A$ = A$ + "8W<;6E=iIPmo\K47N7[3k\QJa:GdCQ5Ge4`BVahA]E=A<_:7>6Oo:1;NlS57"
  1329.     A$ = A$ + "OKK5_mi?7NggleALQ4RlLU\>SHmfD_Go\eWCN\4cmSlS4?1cl8LBa6WTCaYa"
  1330.     A$ = A$ + "VdH5Z6FD7G[bcNL]kBKCba5_E>lRf>F;eiejQg?DmjI;o<Z>giQQ3l``<\5K"
  1331.     A$ = A$ + "AMNQm<KWodBeF5_?nk=NRm>?dB7o]da777=OnEmJB2A73b<YTA\Q6VE=jEUC"
  1332.     A$ = A$ + "KiL=mPdk^7fo1E]2PO]J=Wbe<>oKcLj=mKASGHMbFU?RI^nT73B7WVUlGK[#"
  1333.     A$ = A$ + "`NBnYTPT3ZS=hPad[\2l9_g]`kmf_Q\F5UHCVLZI=Nd1=SVoXJ4V3Q;aeP]5"
  1334.     A$ = A$ + "mJkSoN4N5]6K4g>VHTDO^4W\N8c=e4AaM<CDJgk<:__M73^WMF4SFl8Sf51b"
  1335.     A$ = A$ + "ElHF9Ae8IXbGWI2AR>TX07:fPA6]9<d1akenh21I;N_R5hI5WAK#7Re?TORQ"
  1336.     A$ = A$ + "PLJGH8_4S3aiGP8_4b6cM:ESGkL_?N_gko4_bUo<\kSM=l\7i:XY[oih`GmS"
  1337.     A$ = A$ + "`F?oUA3WhDXnWk`HnKI7HNKH7H1=\=d`n>6fdnO9\[3N:\SmL2\Qe_Gl<eg8"
  1338.     A$ = A$ + "FiBG1FDEc2KL5;Cfc^7HcK1[[VUPWNREPU<m9PS_W]RkNeG3Oj]NKlC_meag"
  1339.     A$ = A$ + "lIg3Oe7O7L_KN=Lb3M0<lngK=>FaTcBo;9nHQ<^nGI]hTh4KF3cI^WEZU2>i"
  1340.     A$ = A$ + "T4;RifLJM9X]]f5\#DNo;EF;MfSCGE[m>N<5=6QijDekobS5Y_CD]>HI>6cY"
  1341.     A$ = A$ + "mYOOL\^J><hm]]h2Zc1E[]6eeYV]FZ^JNL`[\=nbWTfg5HBZ[e6KlWAh>T>C"
  1342.     A$ = A$ + "CGOXk5I[o\le5kEgJ]46^m`4ESiA]_EDa0Y7ik7BSWH<B:7g4OF`S?haJda>"
  1343.     A$ = A$ + "GcW^ZG3e\ok96Id8[4CFj_4aWndJbGkLV=nlklNh=?gI4cQNN\QUG7Ve467Z"
  1344.     A$ = A$ + "HPURQegNS1d]RA?;8?dmLkX`gVLAOkBWU_g#kC_`#jE9XlNgCIoj?jb6PLk9"
  1345.     A$ = A$ + "n]^PdC1iTB2BL8ZNS8SN_^WGfb?WN<WDRGVSYRkHJ2OXB2Y8l1:aXK=b<aXU"
  1346.     A$ = A$ + "nBUGj2L\fgFQOF9:mIZKR][X>8fGYf696EAI6=b;iPA:AJ1I6KP8Oag9e833"
  1347.     A$ = A$ + "A:>?4OXASRc[KHIef0>iY_<NWKMGLSKOGl9OiGS?oGmehGo7n6l7nSoBl=Oc"
  1348.     A$ = A$ + "WQOa_h^hcodg7o\?o3aWlC^=^ckL5lFGl\hd7k0HW=^B\YE]#\^U=7Dk\[4;"
  1349.     A$ = A$ + "N637=^\Z`jGJEH[[YFL\M_ELR3\;\ke_J\_=^Fd#=;0CKT33m<g\UJ9>]6RT"
  1350.     A$ = A$ + "^E:icLGXJmd\L=ne^WSVFHCHCD^^I=B#5[BEgkX]Wk5G=]afEIMdamEZ]c]]"
  1351.     A$ = A$ + "=Oe\OClmfDe:DN<[6WYKnn`^HM4U^oVZfXn`REB]VJhS7eiKZmEZZVJ#onLo"
  1352.     A$ = A$ + "lc6_FCL^EHM]A5Gk9=^dgUHBZn:K;7CCGc9C=7hdi3Vo3n[97gZ7cZk3nJ7?"
  1353.     A$ = A$ + ">R`Sb;S<A?kBAFo=9ogH=YTfnh2;L<TneokCGD\nOgP3F[OAbOY`meOdQ4B2"
  1354.     A$ = A$ + "iTLRBmkPdK82cIR3OXHY?m\#S2o1>jNfU4OR\V>hcQOdc]OikM`]_E\o]\9\"
  1355.     A$ = A$ + "g=eXLkFkB[6;KNcAhKbT`h7j##YM]8I\JYgVH#2TVd6GDBL9jmH\YlB;9YfH"
  1356.     A$ = A$ + "CHBdJ_AF7B8J9FDgbWjg=1VE1IR<B8:9f4]M4VDo;:Gdk>U5:#PSUIK5a^5_"
  1357.     A$ = A$ + "OXPD35m<ohA?cClNaj]4WZgM:5dIQOD95C[A:RhjJCDQ:kU^a=lQPZV#5X^5"
  1358.     A$ = A$ + "DUho`ZaY>#ShR_hFa5>ff`i>dV`QfbbaNGgB`VFjCQe\`YPE?o9QJWeH#eE="
  1359.     A$ = A$ + ":\R5<AA\J[4kJm;0[NaC0CKdm5I;>VSeOO#4NkV<OeN[WgjP<i\To6Ho7I=D"
  1360.     A$ = A$ + "A6[V3Jioc;C>OOh?LlK=k[C[\nJ^ofXJmFc?hVe46FK6DmABML<?>CM=IXaC"
  1361.     A$ = A$ + "Zn]#SIHOniLTZ^oDWCXfKX?\HchaQlnUaJXSGbXkKb6G_=\ae\\mFcK63j7R"
  1362.     A$ = A$ + "HBZW[E_?2O_4jl2W_KKceSZV9l]mLQZ_Efj_UZNMCG_:\SiPB:\;F?Fc=m<#"
  1363.     A$ = A$ + "Im]O`Kaa8mi;Jf?=jCGkfmYSLlmLhj5R`RT[W\heAjOPBmmXMQ52R`G_Aja7"
  1364.     A$ = A$ + "[Tol9Mn8UXSDZEJdSdkgaT4h6]?EDHVYSRb:C[6mJjmc;eTUFnYAH1]Gnn\A"
  1365.     A$ = A$ + "_VZ?Kb_8:^=jiD^Uj?eW]2oU8<Z<C\=2oQBFfo]M>[dU??KQ?FYCalYkW5mm"
  1366.     A$ = A$ + "6B_j>6NojU8V_^QQeW^RAd_2aPjNVXGi57jA>AQ2KOP8Sh<QDRb9TKbNSlc8"
  1367.     A$ = A$ + "8TDD^QTS`MDBf]1M:a#A9I4;jAJAQNVJDXllC1S]7iPag[>QZ6L?a<6D_`l["
  1368.     A$ = A$ + "H#Hj3^_HLm[kbef[^ZV<FilN:\iUG=jM1I;l9;Hh[;6UnmHEk;ME[omXL]Aa"
  1369.     A$ = A$ + "XALG>Y7VFkA4mL8A[K9YY1B>fdPQk3oQlAZeNk]EmKQaShhhhgG5_R7kcl<Q"
  1370.     A$ = A$ + "J<lL<IZSahgSR;C5cQmIRnLJ<?[AZdWASOhl0H?LZ7dL`7F>ZEW7`_W]l2Y]"
  1371.     A$ = A$ + "kKEO[\=f`WThAOGQ9YRUcmI[jiOnj;OMWm=BmN5ZHDf[NUN#V]h#<V?7_6_="
  1372.     A$ = A$ + "dcYl7YjoT7jn8aLA9kc7W3NE^FQ[e>b792KRbWT<N>mlo#j>4YISiVBB8EBC"
  1373.     A$ = A$ + "I3YeBlX\BX]8Sf4Wli94NXX]Q6\lAje]?^H^_?SN\3][=b_3mI4F7Q[5CPn;"
  1374.     A$ = A$ + "ccMD1hSDCSXn3SNM\]fOYV[eJ;VA<17P4oQ\h2=84K82LAQoE4^DWj#kUalA"
  1375.     A$ = A$ + "iS:K1f5e7:D?bUILA;`PJ;jCnYQY<dNPZZ\GXjI<4\eE?=Q?Lc6;JFURaDN>"
  1376.     A$ = A$ + "H<3]0<YAD<:[hd`P;>M<lRc0CM0M1CZ_M6SYT>QYdoB`h4hKEfc^PQEL1XZQ"
  1377.     A$ = A$ + "E6Fi\V>fNmeRe]`5PQdS^Q`mbKiiZ#]hShlUFolAm1;]fRNhXV?XDMH5Uon;"
  1378.     A$ = A$ + "[GMif:loT`cYc5TncAW[Xe:;QX27A5LP8V#9OhR796ShcS;>dQT5h`YV:B:f"
  1379.     A$ = A$ + "HUJ^VeNogPF]YBhA=kKTfhCbo2Ke;66OQ7;J_e[94AlnZlPQ:?abSQDWOaa<"
  1380.     A$ = A$ + "`l^_mb_TjLaF:OBfVK9Ko>fZG=f>GafmYmVOoTLmfn^0CR[g86SQG[;jN3Zi"
  1381.     A$ = A$ + "dAmJTeekf6MJka5?BmhRg7ZidRaFhefScG]jh0F_LIoQi?CUCDX_?5cVII?j"
  1382.     A$ = A$ + "k2lcTKFeEGIo`Jf\E<;ZNllVd[F7K67SkEMZVb9cR>OY#e#0]]4gmC?:[iLU"
  1383.     A$ = A$ + "_3=GUW_Bn7#?WNTi15NK8NfVZi69oBf:]hJTWG5??\0l5a5N8RH`RDPA5]L>"
  1384.     A$ = A$ + ">=gVlK[;T?J2<dnTOFXOiU>6Co;2m]c9S:;[0<[9F:feFF<fcfZ5E?oaSY<Q"
  1385.     A$ = A$ + "b`T7c0AImZ0<j1d=<iQf7<fbj5VaH61VfH6^dVkd6?VcdW0VP`gXl5aI6R0o"
  1386.     A$ = A$ + "T>>YLB;i]8ZOM<#eJU[2<MO4Hj^9io0Jn?egfBoYUm\_;F?WBmJ<]Nm<VUO^"
  1387.     A$ = A$ + "iZLO:Wkk\AInZI\7NMe8\7EMWBmA:F?Zn#h_7U[CJ<4iW<?FT_OUjmdD__7m"
  1388.     A$ = A$ + "8QUYjK2OO#>oDL\Fba>:[?W]iBbNceNLFG=Kca=omEke;emY]nBIknfF<^oA"
  1389.     A$ = A$ + "4CbNi]W?G`mBRjjPYN^`fLgaHLZm9gSbo3EO\DacH<:6[D=6C>7HFicJMLBJ"
  1390.     A$ = A$ + "\6Q?YN?7GdaOXjBR`UXJ5PlERNDFKBjLb3cA?bn\Sh63mNKQ=FO\E=IO2K3^"
  1391.     A$ = A$ + "UlkAj=R36\FKObJIBO]_UejWc6]R?AO6Qo8o_AK_n[Il9CjhINkZCB]BRlQS"
  1392.     A$ = A$ + "`VbCP7EDVIQLC8ATKkRGFoBbeV;nP#J]9H4O<nSfWJ\XcM:C<#1nCiU?0<\Q"
  1393.     A$ = A$ + "<0<jQ9R=KLS6cLbS1U?`nS2;874CTQ0?MGho[cRS1Gehb=GdeG5?LYEbS3jl"
  1394.     A$ = A$ + "[_Vm#fg=NkX8VNW5cMMdUV[;3mccL?e#W?mAfG=V\N>UaRYL9IfHce1PJ>]i"
  1395.     A$ = A$ + "ePSe7=el=ahBL<Mlm>7eP7R4GR7oX>7#e_O[[=RB^:EOO>W>dSL>N8lF2WRN"
  1396.     A$ = A$ + "=W;3nnTd[il?[F[NfNLH_iTfRQlhHZa6fBiJoOTaT\gi6E\H>V8>?K<f>_64"
  1397.     A$ = A$ + "f;?hZ[e1oNZ[mZLl]nfC?W7Gc_V__e3jJXlgPf65OH]M=khaO\_;lL6:^=Io"
  1398.     A$ = A$ + "j[kc3S9acMHlV_c<S6\[I;W`eL_[d\Amk7?oT?fHn4:<_l1AkOP8Q#33Y:RM"
  1399.     A$ = A$ + "<eHR199lW:QhR5]E4GDKKCk#Da4;2>\X#8Q73R>VfP`39<h]HN7a[1DmVBmU"
  1400.     A$ = A$ + "?ekN^iZH>Z9anf\0SfMQIbP\WU9NMaCWdZ92;:i#bRN=8jR\>7M#Fg[lJ4AW"
  1401.     A$ = A$ + "K9SaZMGGC5\Z=DjH^?>j6;IL^]K^F1d6;#[?\Z_<?^c]OLoLKmKi_Ge#igg]"
  1402.     A$ = A$ + "7dJ#n]ah[W<N2kO2k_RmdULjN7dJH#n#CL1WJlLfFOBZ[]1WoI>nLJOXVo:k"
  1403.     A$ = A$ + "Yg;f3CBb[JfP9Yb;V4^77k6Q5iYT?3K^7IEm5b:G4lm<<9bHo6hSEZgKlfYV"
  1404.     A$ = A$ + "G?2[ck5n]#j^XoN70J]oA2Om><hVK1236\8<C`ASRhK=JbJ?5;c5W3]BG7WL"
  1405.     A$ = A$ + "FjS65CU7^Xeo<NhT6O^8?FM#[^\l#WcYTn=JD[6lYNoPjo#>OSlm0Xl=A6M^"
  1406.     A$ = A$ + "EbI]<FT^V\lhP9A?Ba]YnJEoODSgAmnK?^cU\G\Gf[^YODZo^oIcn^4CB=F7"
  1407.     A$ = A$ + "KSQR<e?cfhJY?W_o8?NPgOZ7OdHE[SIER]Wfnf4AToodZk77<9ehcE[U=[n\"
  1408.     A$ = A$ + "9cWQ3Fi\Ff?9em]mbkhgNk1?G[U<KaRdjohk7CbR>N45oW[>iPTo6=iT6OdA"
  1409.     A$ = A$ + "loTS2oFLd0igY7`MW3D\=n3S68<O?5OO?QG6MCb_\TFjJa1Q_^2\:jA?KUI9"
  1410.     A$ = A$ + "o:8]FiTT77K>6L=]ZFj_VA==3AbG36MF[GXemSVReQGWCjl\_2<4Odi^F?<J"
  1411.     A$ = A$ + "ln`HhHbNDekJjkajZ77O7W?H^N0XcmljWa[5gSbLX7eiHf^VGZ[mlgGZKaO8"
  1412.     A$ = A$ + "Q9IK^UDG;CelH[nKKkJGJ;ODbK[jjca_VN>ECJDljUFB?A7B>5[i7#]N^O#H"
  1413.     A$ = A$ + "BbkakHcJe47K9_m<V4_FKTYfghZ7KfF?2OO0CBe?9KSMcMmh^LFh7SKRH^Lg"
  1414.     A$ = A$ + "T6oBAm76Q9IDPeH`PK`1Q?B>J`KagcK1FTg`77<;eR5_8\I3jHB6<3?=hVle"
  1415.     A$ = A$ + "NI#3[b\1bOCRC#dd14fO:c\60CanIXEBS_fK=O:jmJ6SQBHBNZ_nnf;V\7V_"
  1416.     A$ = A$ + "B<n5_fKdnQlIRk?C>G#lhDNleSkhOK=eehRck=kOO;aC6?Ya5nn4Vd3:GJ]T"
  1417.     A$ = A$ + "moae%%L2"
  1418.     btemp$ = ""
  1419.     FOR i& = 1 TO LEN(A$) STEP 4
  1420.         B$ = MID$(A$, i&, 4)
  1421.         IF INSTR(1, B$, "%") THEN
  1422.  
  1423.             FOR C% = 1 TO LEN(B$)
  1424.                 F$ = MID$(B$, C%, 1)
  1425.  
  1426.                 IF F$ <> "%" THEN C$ = C$ + F$
  1427.             NEXT: B$ = C$
  1428.         END IF
  1429.  
  1430.         FOR j = 1 TO LEN(B$)
  1431.             IF MID$(B$, j, 1) = "#" THEN
  1432.                 MID$(B$, j) = "@"
  1433.             END IF
  1434.         NEXT
  1435.  
  1436.         FOR t% = LEN(B$) TO 1 STEP -1
  1437.             B& = B& * 64 + ASC(MID$(B$, t%)) - 48
  1438.         NEXT
  1439.         X$ = ""
  1440.  
  1441.         FOR t% = 1 TO LEN(B$) - 1
  1442.             X$ = X$ + CHR$(B& AND 255)
  1443.             B& = B& \ 256
  1444.         NEXT
  1445.         btemp$ = btemp$ + X$
  1446.     NEXT
  1447.     btemp$ = _INFLATE$(btemp$)
  1448.     _MEMPUT m, m.OFFSET, btemp$: _MEMFREE m
  1449.     BASIMAGE1& = _COPYIMAGE(v&): _FREEIMAGE v&
  1450.  

Offline Dav

  • Forum Resident
  • Posts: 792
Re: Solar Flare
« Reply #31 on: December 13, 2020, 09:51:52 pm »
The ship background was rather dirty, many variations of color, so I took the liberty of cleaning it up, making the background a solid red _rgb(255,0,0) color, and re-encoded the image to bas code.  Then I added_CLEARCOLOR _RGB(255, 0, 0), pic& to make that red color rtransparent, and it seems to look OK now.

- Dav

Code: QB64: [Select]
  1. SCREEN _NEWIMAGE(1000, 800, 32)
  2. 'SCREEN _NEWIMAGE(800, 600, 32)
  3. 'SCREEN _NEWIMAGE(600, 600, 32)
  4. DIM starx(1000), stary(1000)
  5. DIM sz(1000) AS DOUBLE
  6. DIM speed(1000) AS DOUBLE
  7. DIM x(1000) AS DOUBLE
  8. DIM y(1000) AS DOUBLE
  9. pi = 3.14159265358
  10.  
  11. pic& = BASIMAGE1& ': _PUTIMAGE (0, 0), pic&
  12.  
  13.  
  14. _CLEARCOLOR _RGB(255, 0, 0), pic&
  15.  
  16.     ' _LIMIT 10000
  17.     a$ = INKEY$
  18.     IF a$ = CHR$(27) THEN END
  19.  
  20.     'toggle full screen mode
  21.     IF a$ = " " AND f = 0 THEN _FULLSCREEN: f = 1: a$ = ""
  22.     IF a$ = " " AND f = 1 THEN _FULLSCREEN OFF: f = 0: a$ = ""
  23.  
  24.     stars = INT(RND * 100) + 1
  25.     IF stars > 80 THEN
  26.         s = s + 1
  27.         IF s > 950 THEN s = 1
  28.  
  29.         rad = RND * (pi * 2)
  30.         x = SIN(rad) 'get direction
  31.         y = COS(rad) 'get direction
  32.  
  33.         starx(s) = x
  34.         stary(s) = y
  35.         x(s) = x
  36.         y(s) = y
  37.  
  38.         'Set size and speed
  39.         rr = RND
  40.  
  41.         'large photon
  42.         IF rr >= .5 AND rr < 1 THEN
  43.             sz(s) = 1.4
  44.             speed(s) = 1 + rr / 170
  45.         END IF
  46.  
  47.         'small photon
  48.         IF rr < .5 THEN
  49.             sz(s) = 0 'returns the smallest photon
  50.             speed(s) = 1 + (rr / 100) + .0016
  51.             '1.0016 'slowest value
  52.         END IF
  53.  
  54.     END IF
  55.  
  56.     FOR t = 1 TO 950
  57.  
  58.         stary(t) = stary(t) * speed(t) 'accelerate photons
  59.         starx(t) = starx(t) * speed(t) 'accelerate photons
  60.  
  61.         cx = starx(t) + 500 + x(t) * 50 'used to adjust origin of photons to size of sun
  62.         cy = stary(t) + 400 + y(t) * 50 'used to adjust origin of photons to size of sun
  63.  
  64.         IF f = 1 THEN 'fix aspect ratio of photons when in full screen mode
  65.             cx = starx(t) + 500 + (x(t) * 50 * .7)
  66.         END IF
  67.  
  68.         r = sz(t)
  69.  
  70.         c = _RGB32(255, 255 - (starx(t) ^ 2 + stary(t) ^ 2) ^ .5 / 2, 0) ' <<<< yellow
  71.         'the square root stuff gets magnitude of position so the photons go from yellow to red
  72.  
  73.         fillCircle cx, cy, r, c
  74.  
  75.     NEXT t
  76.  
  77.     LINE (0, 0)-(_WIDTH, _HEIGHT), _RGB32(0, 0, 0, 20), BF
  78.  
  79.     IF f = 1 THEN ra = 1.428 'fix aspect ratio of sun when in full screen mode
  80.     IF f = 0 THEN ra = 1
  81.  
  82.     'FOR b = 0 TO 55 STEP .25
  83.     ' CIRCLE (500, 400), b, Ink~&(&HFFFFFFFF, &HFFFFFF00, b / 55), , , ra ' <<< adjust to shift color over 50 instead of 500
  84.     ' NEXT
  85.  
  86.     ' _PUTIMAGE (500, 400)-(700, 520), img&, 0
  87.     ' _DISPLAY ' <<<<  moved to here so sun is draw over photon formation circle
  88.     ' DO
  89.     ' i$ = INKEY$
  90.     ' IF i$ <> "" THEN EXIT DO
  91.  
  92.  
  93.     _PUTIMAGE (500, 400)-(700, 520), pic&, 0
  94.     _DISPLAY ' <<<<  moved to here so sun is draw over photon formation circle
  95.  
  96. 'from Steve Gold standard
  97. SUB fillCircle (CX AS INTEGER, CY AS INTEGER, R AS INTEGER, C AS _UNSIGNED LONG)
  98.     DIM Radius AS INTEGER, RadiusError AS INTEGER
  99.     DIM X AS INTEGER, Y AS INTEGER
  100.     Radius = ABS(R): RadiusError = -Radius: X = Radius: Y = 0
  101.     IF Radius = 0 THEN PSET (CX, CY), C: EXIT SUB
  102.     LINE (CX - X, CY)-(CX + X, CY), C, BF
  103.     WHILE X > Y
  104.         RadiusError = RadiusError + Y * 2 + 1
  105.         IF RadiusError >= 0 THEN
  106.             IF X <> Y + 1 THEN
  107.                 LINE (CX - Y, CY - X)-(CX + Y, CY - X), C, BF
  108.                 LINE (CX - Y, CY + X)-(CX + Y, CY + X), C, BF
  109.             END IF
  110.             X = X - 1
  111.             RadiusError = RadiusError - X * 2
  112.         END IF
  113.         Y = Y + 1
  114.         LINE (CX - X, CY - Y)-(CX + X, CY - Y), C, BF
  115.         LINE (CX - X, CY + Y)-(CX + X, CY + Y), C, BF
  116.     WEND
  117.  
  118. SUB cAnalysis (c AS _UNSIGNED LONG, outRed, outGrn, outBlu, outAlp)
  119.     outRed = _RED32(c): outGrn = _GREEN32(c): outBlu = _BLUE32(c): outAlp = _ALPHA32(c)
  120.  
  121. FUNCTION Ink~& (c1 AS _UNSIGNED LONG, c2 AS _UNSIGNED LONG, fr##)
  122.     DIM R1, G1, B1, A1, R2, G2, B2, A2
  123.     cAnalysis c1, R1, G1, B1, A1
  124.     cAnalysis c2, R2, G2, B2, A2
  125.     Ink~& = _RGB32(R1 + (R2 - R1) * fr##, G1 + (G2 - G1) * fr##, B1 + (B2 - B1) * fr##, A1 + (A2 - A1) * fr##)
  126.  
  127. FUNCTION BASIMAGE1& 'ss.bmp
  128.     v& = _NEWIMAGE(200, 120, 32)
  129.     DIM m AS _MEM: m = _MEMIMAGE(v&)
  130.     A$ = ""
  131.     A$ = A$ + "ha9kmN7OMMML__<FfZ;f[Xg88018189010;XgkmN_gk=R218H_g[BRRBDmZU"
  132.     A$ = A$ + "TU]T\USSU]TKa]4G_>fgHW47OOa>UKJ_g=ggLW_c1KN]ML:f>F<5l7[?kcIO"
  133.     A$ = A$ + "Jkci<oFc_Oc<[I]X59bRFH\`HQa2Sg36N^l5;N]RUH3_GiB5?dSNZ7IheZFV"
  134.     A$ = A$ + "h_K[FlNe;Gfljme^=S=hUKbjmH]B0NZ7mbM9#_m#On;cNohagJ`[g>^U0mCl"
  135.     A$ = A$ + "AO?R:dPT#lHMbVdWK2K=<9HgFS\m=4P4M`1:KH][bNM1]^E;Qk[GBHnhY4hZ"
  136.     A$ = A$ + "F^4VnLgTnJ2GO_mj1^Gamkm^\SlLmhn^KackoN^]oKg2SocoH1la2So[h0KG"
  137.     A$ = A$ + "ODK>OEKa0maMake]BamE]DaGgMISSm]_[MUbjeK7Z_N:Q[foQhS76>84olB2"
  138.     A$ = A$ + "eO_]WWO[KEB#Nk^4eVgXMNW7KSj[IS1h]4JPnJ3N>1hnJ\GoffHPbFgXobf3"
  139.     A$ = A$ + "Mm669^82GRISK``495aFThgbVU\fE<Bja\MIGKJSBT1j_TbfgVTKLkBb;nM;"
  140.     A$ = A$ + "I4MTfXa2bEZ;g\TDdGC>jc_dDBDfZRQfYnNaaM5B#BUiTRTOBkDfJ0N9n_ZU"
  141.     A$ = A$ + "8KaO?UM6F8f_1N]lkoGh_=^[c9LknoW56oKo`mU[ca_jE8K`me9n\VE81jij"
  142.     A$ = A$ + "\ib3F][aVM;15P4VJ?6A8Z]hV2f>7f]1icjTekiZ]APN]69H_G[\NgGY4PK["
  143.     A$ = A$ + "#lE]YlIU;FlN5?PI?a`cUMORo[IIRk;iNTeNogYhaB_G94_egSeYOV^]B9H?"
  144.     A$ = A$ + "GS4T7[F2BO_2aGgT=i_7f]iahi]]=h[\9oLCaLN:QY7SK[KDR?lPUXfP?f8U"
  145.     A$ = A$ + "8g\Ti>fVTdf2EfmV2DfQRUB>R=9Y5EhB6a\EI71i[TVnLREaG<BAONaY?_Lg"
  146.     A$ = A$ + "ETBjK?<9KmeVc>S#b?fXTZb>99o4RF:8QMH_nf:;OIPV[FZ8kTUdgifTdgA4"
  147.     A$ = A$ + "B:A]5YeZ:Bb8f][He#UTd?SH2;XKkoO^`hGmQg[0^=[a6KDW[LcniJ\9MNk="
  148.     A$ = A$ + "[fmQYcC6N0L>?<ke=jUbgI];GlKe;e\]i8fg[k1^;khJ^_?P=FemL7bZ^_g_"
  149.     A$ = A$ + "hUJck[R9`VoWf^?4?FQ\AgEnDN[lXFkBT0GcR]c]S#lCWog;e?P_b^gljeim"
  150.     A$ = A$ + "3#fEh1:a^eP\SQiojDNC;Cm=4TDL:kBfeVmCb>f]Zfon:EUELZ=J8b>2e79g"
  151.     A$ = A$ + "hS#BNkKDZ:W4T:c>NkfK=Pe:Y6MXBiI6[DF6kFbNGQ[fkA:MDA>BkUW]D]nl"
  152.     A$ = A$ + "Z?oTUJc=AY`4g^dB9I8UUf>U^Z:?YnRBA:>]HTJe7_`TSF:>eM8U[?oLdGOF"
  153.     A$ = A$ + "a]=YU:bCZ<gTUF:?OYl\BBZ:gDUS=eXbL3g[<NW=;CfCKBo=F]dJi5ZOn9[G"
  154.     A$ = A$ + "cA;KImn[oVm0gf]1n_b3?GjREKHMnF_dinmfCK4N0nlcP32Fm=4TjS0n?KBW"
  155.     A$ = A$ + "G>0eVg7MnMV?g[UM?jkaM;N\TkBLk1n0Rk;n>5oFe38n_j5KSe_fU:1\VUHS"
  156.     A$ = A$ + "=kWj_HM;A]oGQ4MXn9A]9o=kK\iS?R=:I6K4BN95SJ?5YDDBAIfP<`6]HeV3"
  157.     A$ = A$ + "KaV;>Mc>mWIXf[HGbaBdW3?O`2mEGABUI^Kef>;YRdfQ<Hm59=E#bB=I5[dC"
  158.     A$ = A$ + "Ei:=GH:b0eEXdO]58]DDZB99]MYbdgYDG>a;=VOBf[Qk?LSU83e#aZOR]H_V"
  159.     A$ = A$ + ">:;C9[H2E:>a8_eameOmbDMEUjK9<9L_FVM^akZ6574_<A?e9eE#:B=iUT<F"
  160.     A$ = A$ + "ke9]FF^BKUWWN=V\DGNY[h]dd_Gi8SeB]jeEajWEUb\mfVLnm?]<COM8GlPk"
  161.     A$ = A$ + "EVXcVTF;=?9GeGET[gkKkf=oWiA0:Gn#Dn><\ioeingP>g=fm<lNi^\kM\ii"
  162.     A$ = A$ + "X3>`gUO?bjGm3XjHGZ4ZW[D2ckE8Qkc:eocFW4[>GM2KImB>kN;Bnjlc<bCW"
  163.     A$ = A$ + "k<GMnk\fIHBeiT\a3Yb\BDJ\X<UF:=7Y^lCc>O=jiK\PdUVecgPN^F:<=YeR"
  164.     A$ = A$ + "Bg6]EL6BgET[dIII;SdHIfa>:=;YmBbdeAM^MVS_c:cEj_nR=KN`1]GJ6V]L"
  165.     A$ = A$ + "KUT^nnUTdEiI8mFC>B?EW]dG]iN[KGONa9]EJZBoeUWM^1KX0Ib>[DJYhT]K"
  166.     A$ = A$ + "ccIdF:AfCkU;]FB:b`=ET<#miO[Sllha?c<m9GoTCK_Oln<g0=856of<\7hV"
  167.     A$ = A$ + "jc=1i2kKLY_Z;B_FbC^jQVD>aNjen^>#]59k[W6UYkXFIbfZf6mGCaBmj_=S"
  168.     A$ = A$ + "gBUB_EU_<GO=;WOfATKNV3;?daWCN\cN4Ifnk#Wg81aOUck]KkZoSfHm:>82"
  169.     A$ = A$ + "E;0LNhfKEe44Vb92l`6ENk[Gio0F`WUN?R_;kNUe_Z5;QjaZ<kn`mM]6g6hd"
  170.     A$ = A$ + "4V?[AfZo^Icc368=US2L?H^mJc>>YJM>j6b;Ac>T1cobma65K36<_K_eFX<B"
  171.     A$ = A$ + ";EHlAPS2LEJ]Den]\\<KNW1HQ^;?7Y;^]N\U2dGOnY8]YHU1Ek8>f^RIhakA"
  172.     A$ = A$ + "O^mDINBGET]Q5h8ONM[7kBmKdKEI[h[Ddggd]A7U2^C]k[;OYYlC#aKZ=N]i"
  173.     A$ = A$ + "IW[f\fURiBe^o#eGPMTaX=E\J[V[MKWg?NNCgIEfAN_0kaci3Oc;87K\f]Wk"
  174.     A$ = A$ + "H=GRNMTYJOGZMkV;8AIHe?DeI`WCjf]7#mMEZjgZ9eOe4=G^d[Re;#W;Y?5_"
  175.     A$ = A$ + "OVYkG>jXM8?m5?RLhQKC>eTmZ_gM:7XoFTmdJE6Vi03eYlP7M>miL6iY^`YU"
  176.     A$ = A$ + "7jX7BVZSF5OGj2lbni7N\RUZJUMCfmF2CB>V8En[nJH2djjfR_G3Kh_ZWN]g"
  177.     A$ = A$ + "kkGLGe3h]Zo=`e]<94ESlfD]]A4PW6^Hk1iQTF<KbhXG#R:WjlDkcBLao6N;"
  178.     A$ = A$ + "eYl4J\`D=^>P10;`Le`I1kCKnJe6USLN>fYJ[fHN9[fAiHckk<g?H3NO`71?"
  179.     A$ = A$ + "6Sjb>13C06X?e6PSLO`53DCQfmk#OmlH3EGaf[QgO6li3g8\k6]YB=o6P9h8"
  180.     A$ = A$ + "f_P7h8fhmDIF6>0L3fi<<O<:60KN\Wii>L35JWS73\2fnHg3VR7gii`W3?6?"
  181.     A$ = A$ + "?Nm>?G7l5?WnZ>?mc;CkJK4Ug6SmdDIb8:G`1D<aD:6Y3mJ]kBhk[bK<cHT7"
  182.     A$ = A$ + "odc:e[HgGjZWDJAo]oTCdSlQO\;;gh4kCV#mcLccL#mm^LIfNJF>nHm;GNoC"
  183.     A$ = A$ + "9OdWiaTOkGh9UCXJL6XQZT<gA4gf]?_]P9Fi:UPlRHMjS5Kd=YJ6#S[O[Lab"
  184.     A$ = A$ + "J^ggWIo_hO[5IHR8gP_b6mLEB<1kW5[Vh2;89eXf\TI<Q;i\[]95YHQ:DMY="
  185.     A$ = A$ + "D0lRCd>2N0n;<`nVi\HnM\9K8gTDooa[fJYIcGgQR5hnL\W:ca>blT<hf<OO"
  186.     A$ = A$ + "oEGPD_Jokh3XEUKAWccEZV<SC][:fhKdEIi[?7e>]fbD\AVBS:7mn[^4IlV["
  187.     A$ = A$ + "AmYDPj?93meUW[A5iKH<l5eC=58MEI1fk7GSXM`1W2fQ[cn[9OK^K^6K]XD="
  188.     A$ = A$ + "o<LK>gP:g<N>3EOAg2SeKEiJO7inllh8??\eMN]LO>_cgIN=hkK#mkKcj_CS"
  189.     A$ = A$ + "e#Yf]1;<NSU:3Xn#1C`H?:VMD5?=2H9mh<]DV<I3593[LdHdSbmK05;?Sj_Z"
  190.     A$ = A$ + "ildOOE\mnkY1cGCLQj]\_NK#NXS<]L^m>TlF?ceUWiR7C>nhmYhX1T;\o9TG"
  191.     A$ = A$ + "mA_Vl2?h5TGlA_ZLScOL9Z#f`]MkfOC>2d]EKJ8fPG^KS0LO]:>H=ROZ_1b_"
  192.     A$ = A$ + "6a?:#Mhk:_OICn\FCg0j:BHKKBBJkKFi5]CYdDSCi]6_DC^Y8=EX>oLajLiZ"
  193.     A$ = A$ + "N0V?_=Mn]>PORnO<n9`^cd5WA\BI97SY90LBcjLj`;0k=\O`FQ1f8HSiHoDS"
  194.     A$ = A$ + "bob\]DLE_:G8h:a]1GP=DS6>;Akm]Oeo0n?86Z=XJGW\S6Emd:?<EoJOeXfH"
  195.     A$ = A$ + "eGQDF:a:UVl^=]\mZH6d^D_ROj0<E9iJjHPc5LjQ3O[5UYag_CEGL_EDPdGU"
  196.     A$ = A$ + "jLm5[ni:<CkHoEET<D]U:]FPR[;Ga>eEVdMIjc_45;DMafSc[QSlHSf#5fa^"
  197.     A$ = A$ + ":=GkflJhmMTj;g^=7WXUJTAD<Aojea<ZV2`6mZOG1G0gY^:AmaDMn6nHLe_2"
  198.     A$ = A$ + "hR1EOD3EM>6fHjV:AV\iRUID=?=Wc^U3dC]jeP;<bd]GQQ?fKkEKofjJ>ZD<"
  199.     A$ = A$ + "OD_m7lAE^GE8ORGlAUghY^VlDGnHb;Nmc9Gn`C:WNVQT;MX9TgnEONKLi3_?"
  200.     A$ = A$ + "9e]5^[iI_kkjf^Mm2hS5`7;P?ngnQ7?`m9KLM[F2EeIClEAKM`^_:3?hkZG^"
  201.     A$ = A$ + "Q9lCeN\1mLT_\MAn\2;#SkD^a]M9[M\59WHSddADFjZNj\Bd`4]ZJ:j#]KP?"
  202.     A$ = A$ + "2H3^?a?2<QcPHZfDAYIl[`f5k=\eJ^0h<Yf\jokXMPA5Y^CSS4l`Hd4JZecG"
  203.     A$ = A$ + "KFaKaP1<1LZ0G`]QS5j:jJnhA=K?=:CfN=F<Kj[^bUQJZ6IR>KFJY4U_OeUJ"
  204.     A$ = A$ + "gOTFZC_^bFefWYdIU5[hhR\hg`ijZZBD\LnF<C9oLM[H7`#]XldJGiQ1nI0m"
  205.     A$ = A$ + "idCI:7_<CFimXhAmmPce;iM8aMYlkc#]I[#JGOoZ=cTd[gL<>NMXh>6kYUJU"
  206.     A$ = A$ + "AK\:mj_#So7g^g:;bh0bihe>D=UYlY`>^NIlVZb`HPo63lCUiHcK0G>6`S[o"
  207.     A$ = A$ + ":ceh:i`gZ75k<RbCL#eN7<Ao:^IbFZ#ehGV=G4Li6_UbMa7DO>S[jKjYRdUi"
  208.     A$ = A$ + "j]6IV^ZdRk`NJ]<YlDf^\gNZANcWn1=\b;n#WFnMNY7CNV[LJiDC?\LY3<]l"
  209.     A$ = A$ + "YNYWENgGnUT7n`7lGPMgmNKgfoOZQKZm>J:R:X0U8F_oB#[IURWgk7#Lk^NO"
  210.     A$ = A$ + "Zo1bIam;QjmJ\l2_mPlcboKNa7UDJJaZJ8BD::iM:=PO1l9X3>fQR3h8HSjD"
  211.     A$ = A$ + "o647E^]c0O86NAWS[VLB``5=D#:f0]ih_0KgfEL47;DaNi\S`\in7]Yb]S56"
  212.     A$ = A$ + "G4V6RQZ_4So?W3\2g7=eXg`AS=H3`9VfKmnEUn^]GC;je2i4XfLa>_0mJ9=c"
  213.     A$ = A$ + "n_j\CE_Fbb`4P=J^hL]7_MefVAC5USQ?JGeWdTJk261O>MFN166YKe>^KNLm"
  214.     A$ = A$ + "mZQ\D\[nNQ]<HT>heZH^^D\8h7^OCPcdG7h2doPV7^]Sn7d81fP1g_?5;2nX"
  215.     A$ = A$ + "9mj5l7h2l1EFRk`^=h3lSRMnLmeXY=g\gEo8>JKhnhSM?jl9h7PW[;Oa5Hn3"
  216.     A$ = A$ + "a7;H3NNhKNTjE=BZoWmfI5j_[I;CdJ9FLe0O#Ld86d4gJRO=aRnA?c\V_UGh"
  217.     A$ = A$ + "1?Ul9OaK:ObGh9DMoG#Ni7lBbghgiS:_c[lLB`[IYB0;onn7ICB=0Mk6Gh[G"
  218.     A$ = A$ + "[cZAY0MK]Rg;OYbjGib\jTK[NkV4M0N:Ai_7F^6R94_MY]NWKeZYQRCJ7FLU"
  219.     A$ = A$ + "P;4fgHCc]I#^1hL>g^MUW1n90;`A`6PUZGm9P?6hLa]9VEEVAl6g5Vo]9M>b"
  220.     A$ = A$ + "BBJGVVHV7]cBbgdd?LCE:CeESB?E[cUWj^]k?IW=8SdLEg23f[jgYYLCehYP"
  221.     A$ = A$ + "]2lJ0WeXnieKE5j2cYg6OIPCaV^i2cbnLQKEMiTZd_>?>i>3O2<`O0?6nF0_"
  222.     A$ = A$ + "hho0L3_NhNacQW;_?>_W>LehmSS>nFP;7WS7WkCnjha1G=Pj?SSMYn8hLm>_"
  223.     A$ = A$ + "_97\7g7^OPY`_SQ[diRZ9c4<l>O_1[PM>cEPOBhXb0^JmDI16W#Rm1oF<GO]"
  224.     A$ = A$ + "J?7Vgi03dZ<DSEHo^`_]SeL5f[3O^h;JZF[D>d#=Kl[8>bcZLa8FLk_o6TYj"
  225.     A$ = A$ + "XBmiTS53=^mDPSV?>e?bAWF:;Q];o9Oa?SlGm]omUglV?Xl<Gh4bgnMohbGl"
  226.     A$ = A$ + "Sn::GjM:n^homEmG^kM4YhaZGVQ?fXWZnRE_290eGB4njQ4G81XcG_5;fBEU"
  227.     A$ = A$ + "K\Fn3Ld7`Lm>gVcclm`=R1n2#GQcSS=8LY^5O:5;0NPLg1O\2E\FgZmLo=D^"
  228.     A$ = A$ + "DUno;fVHO\g^Ka\3Z:e4<\A75WWZE8=e685moZ2DKm<Eo0iYn<BGJ8g<\kgE"
  229.     A$ = A$ + "ijL[5T]jcGeQTNlbH=FYa]7Nj>J20Sdblnd`G7lo072^Lj^JfdOPM]S]NUYW"
  230.     A$ = A$ + "PMO^V`F6o<hOQhH2fPk3>JTVZfN]H3SM=_6`hlJL`IlI`Pc=\bER77L0h46P"
  231.     A$ = A$ + "MVZcVTmdFmfWgh]FWQ?HdXjc`9Wg>H<7o9`kb9?PH_cggFb?McV6OT^hZFXi"
  232.     A$ = A$ + "CPh_aLF`74OOETABB_eZnJd[a>d[kS?i`bn7Y?I0UOiDmf^MO`Ik_oF<o;cf"
  233.     A$ = A$ + "I]FlV9nbk][Z=l0H4>7nB0c0nPl`<]boJXjbEe6U_LhQJdR;fe?hTbWkUO:A"
  234.     A$ = A$ + "n9o#MlW8ORWkVb[MS[8OY?f[:OVGk3:?jY>ZhamOW_WS5LO5[#lcC?T0lf;I"
  235.     A$ = A$ + "mniUhW_N:9\kX]j#UJKJKK`O9U]6VDIb9Jn\K<WD<mHUWFDB5I5SUK>ZE2bo"
  236.     A$ = A$ + "0alWlbA>J9g34OCho3W8l9SVG7=1Dg5<G?c7aLkeXfo`7YAenQJNPJMPoKfK"
  237.     A$ = A$ + "_]YLn[FaSIHLLL\c[;KRQ9ag\2e74jSekGFaFM]fEUU9ETN:ZOUh\k?H3eZO"
  238.     A$ = A$ + ">58UTL2fL[3[ca2_4hX`L\HKR];fUH3RM[i[X>e6\FbIMMVO5`=L=ci07ae>"
  239.     A$ = A$ + "fDlHllMlaQ=K[5YcSZGgHS2?#VK6kDlCi`UTg?VK0oS>WSi;Hn0n\IDQNK6m"
  240.     A$ = A$ + "Zg^Me66^YDK8<GBij[S7KdfZEfSj[dig=lK>X>_2c1Q?EV[7o2k[gVDKej\i"
  241.     A$ = A$ + "Y86dlmP?S1Z_<egGAVN[VD^M]YL7KEo]\Q2cCB;V]9MXn4KYdRTj;>OYd<CE"
  242.     A$ = A$ + "VNPN<<2a^hDC=RLdAkbd`#nf7Go\8niT3NR_<3dZ0o[mgKMjLC5Il_6_alU9"
  243.     A$ = A$ + "J^#I2UkeL]GY<[joilkY7iT3f^lRGlhbOgOhGGTo\o#iko5OKicmQO9ie_ie"
  244.     A$ = A$ + "U_nKoaU9j^egKdF\TUM[LFh_7[ClBeFhnJF^\ZUo0B0nh^\e#gPTA\:WYdCF"
  245.     A$ = A$ + "bOgk#Z8Y4^5nXAb;MQ9:eU_;\PC^[K]hd^ENZ1;0^PlC0N0NmPGPSO6K?4co"
  246.     A$ = A$ + "b9VL#iTC=Tak1m\<J#]AIhDG#D_?EZL5Pc?cWEQjg0K_V;8GEkGRjLo5;54_"
  247.     A$ = A$ + "niWO>BjA5QTO2aZl0ZCWoGiHTCV6^HZ^JG]5Zb`?X]WiD7XFb[LnjeG:V=:f"
  248.     A$ = A$ + "Bi[n]L`1LOWKk`5dVOE]_ia0W`e=W3k<ha`k]3?=^?i;Sc1OUQKXDkko<MgP"
  249.     A$ = A$ + "=W]U_miW3WjE1mB<_>gWW_=WNIIO[LkGNjkb>2gDcnNNNTFNGd[=hlPF7\c["
  250.     A$ = A$ + "8mh<<6GGlhI7cV]gG`7<PG4H6^nXNHXV2V\kV\jaZ?eog#]DWdSnkEWEYj_K"
  251.     A$ = A$ + "]NY;EO4g_QBDMH5TSTC2kF::Uh<OJ`W[2mjX9MN_;>gHZNS^Uc<mPF=[<IkE"
  252.     A$ = A$ + "IjgWX]:=]m3YHB;7T:?kaZWL]T[<Qj?i8mg\<CKE9SGOabT=F^<C[E;WIRnT"
  253.     A$ = A$ + "[^oaUod_jk8o3o`_Wloj?nk9O\WnAU?lSo`b=_lIo=6^8aXSF2?P0D^C^Iek"
  254.     A$ = A$ + "Q_Z>8omH5B#n^F98oMCfD8n:Y4KTBV:oVf[Z8GJ<eA[jlj4[Ujc:9c7=fi`O"
  255.     A$ = A$ + "2K5VoYLEC>oO1GOno:?mmPhO>JceHc]FNZaIogMQ3<]=?5JOA3?n6LVgUS`K"
  256.     A$ = A$ + "QS<g<_GX]PG??GNmf[CeeblG][lmIn^ZE=]mXo_f^Z1XDECJM5VYYE6m0Pa`"
  257.     A$ = A$ + "_0G;<O7fP4OHWL<266kFWH5cg;WL[Kn0;=3Ge:2iJ\\<=MZ<W8JCI>CdW2ok"
  258.     A$ = A$ + "FW_NBLRY<aGNDmokVDNU4G8>>F3U8eZfiCdFigZN#XNBPc>gg97iLKWj:I?:"
  259.     A$ = A$ + "_TQekCNfA_kDMD]EKGDW0>e:`Nk^>c_M]ZO:leQM?HdYE]<<70a<6]74[G^V"
  260.     A$ = A$ + "MRI5fdlMSig>h8];SXfXMYld>dXmYg_?ID5K0g=hlaAVOZojEKm^JalcRVWJ"
  261.     A$ = A$ + "c>5S_7nL;=UMIhaaJ]6megQnOKIbn6X5Cg9on^g^ZGo^EZ5?=dnS_VaD]=SY"
  262.     A$ = A$ + "J47Aef`PHE_7mL7Z_j]aQEm;GNOS:OdWhJVo4i?o?BNSWnATGn6GFRJSnm_I"
  263.     A$ = A$ + "hRM4Jhbf3:DaoE]JagE^LGiZHU;F2aWe:9_c]8IUHdB>Y];Y#MNobEOgEXnj"
  264.     A$ = A$ + ";8iM9i5GdFl5[CW?_fdCDJ8kT=M]<W1h1`2e=On;bMgAHi1POOP_2of1oic\"
  265.     A$ = A$ + "gaT3<HG67:daSo1V[SLPTOlaH?G`4`AWL7Pm<cM3VcbWNJaK?oS^W1=l:eP="
  266.     A$ = A$ + "S>El0hS6Em`]YL0:?KEKMME8eXhGlo`kodmfRM=ae9cWR]0flDcN`7dYVYX^"
  267.     A$ = A$ + "Ik]jl\JE1oOlLhaMZY;N><P[0eV1h3`04c7`3Fl=;?3K`LRL4^44GDbe<gVh"
  268.     A$ = A$ + "PN4E3kH=Yl2[:C;NXGHfn\k?M7UKLb96#<V\]B]hT^W6E<CIY9CeNIBEY]Mk"
  269.     A$ = A$ + "m5l4Of>aWUlo#LVXf29n3H_QVZJdiD6#a5<OFMIVXMMBlYHNLbo1a\Rh:=F["
  270.     A$ = A$ + ":7;mcYQRCeR=b0ZM:o7e^Z_kP3gU<J;E;7I\NUc__9\ikLRC0j0AKfT]gTnN"
  271.     A$ = A$ + "GVaiSGk4:W^1K^LSS0eO?n0WZSjUc^gATiDnb4O]aegc9DNQLN`NlNR]2WKO"
  272.     A$ = A$ + ":>RLa`h<SeV\o^ZC>H?=8gh8C9ObGja4i_o7;Oc?mK:?o3O1YNEcg_>h2oFc"
  273.     A$ = A$ + "jT8fh6UPLcMagE\B9jPgP5CI_Gj3Hh_DgAhBiiV\DANY8EF#JBE5V^DYJ;EX"
  274.     A$ = A$ + "Z?]157Dgla2Y1d7TCJV6f:EkfZDOhHgA=QTNDKfh:1_G\[A[=e6=JC[Bo?:S"
  275.     A$ = A$ + "X2ghTC^0KA]oa^5o0XeXLeO1?6nZ1W0n0o5hkXTTgYi71N<XE6]]h71>f5[n"
  276.     A$ = A$ + "3h8H^ZcCmIE6[oQ\\ef#9Y4k]RI5naPS4GG6OXi[5;l7P]?e<>HV9J_:3K0V"
  277.     A$ = A$ + "PiD1g`m1C`[1<3l7YnZHnKWL#jPC07<PZ9]cBBE^f17e`4PI0C#l?WDWkoA?"
  278.     A$ = A$ + "adbkn:gDVEe_2OL`:ETLTVo1lC0^jMNi7cN=PW^j16ANf;N8I>EWkQ6XAilk"
  279.     A$ = A$ + "]?i`3fTLjYjaZWSmfE]bAdim1S<MWe87I`FUS>DkbL:7^QEnIkEeJ<A3UIfF"
  280.     A$ = A$ + "`OQJ7I2Z7;eGD?Z>jQdkgHNaKJW1WdAUIJj296TfLNjomHS37<hea_W4?#`<"
  281.     A$ = A$ + "7NdNTYE>IcXco0ValaXc;Ro3ZOIbU;e1Z53cRBg`[h;SH>NQm>^ZIY7mj_AS"
  282.     A$ = A$ + "W;jdVZm6\jfI?jk1nEPc53^>7C_VjCiD^?5W#LUOUKLNia>cnUod_iG#nMNi"
  283.     A$ = A$ + "Wed;]0nH1la2hSo]5O\1?mDfT_n:n_VEIe32e>KJA7Y4kF2FfiV3D:CmiFFF"
  284.     A$ = A$ + "9HhSbb99GHSlCE:C]]PO5[WiZc>5;W\<8OCEWAl66QlbQfDb1:J5Ag:a<1Oa"
  285.     A$ = A$ + "VfF\oEkNdEP_C\ikEmOjP9H<ZbK5kK;VTDS6cG37llio2\Y9N>liP_GZYSnE"
  286.     A$ = A$ + "mPP=8VSL]A\8Q?EQY\Kkk3WcR56Goje:Ln:8nX\hdT#hKhFek>foH_3fPkoA"
  287.     A$ = A$ + "NR[H[39`2>aI0\23`B`oRK3N2<CA:o<`8>eB8lNVBeEdNA9;Oh7mLBI9^=cn"
  288.     A$ = A$ + "[kbBg`6]TO2b?l[nfbWkeNB3O#\L8_dUWD4f[3<0Wk]Oa7a`6_hE?Vl7n5N;"
  289.     A$ = A$ + "i;mV?Wmn0^h?oKoiUoT_bWD>PRE>kN7#n3nL_UQA>mDmYWc5_]3XLf?ihMH_"
  290.     A$ = A$ + "O?lQ6C>RnL_fn7BfOgE;WL\FTC=N[bdjecnk^6GO^jc7=?][LhPS5JoanVij"
  291.     A$ = A$ + "VA]o1G#\^hl`?UiH8fg<o3hSmfCcbnj[MK^#\167nAZV3`6SfJUBgEW_57Rf"
  292.     A$ = A$ + ":>;;?<T3cjb89SGenD\eA6YKi0mgQbUDOOjA_fd?G`eCZJG6KnjNi#mfXLP^"
  293.     A$ = A$ + "[gZmNd==VRAHl:?fU<m\_h=^VldGk2oBQ=lAeH0^Hm[MefJa;Y83Cb?aMIe1"
  294.     A$ = A$ + "1ljafS_W\NgHmMba:D<2hU2EkZbdi?Z<_d<NXHob0=8lM\RieMhDG8lK6g6k"
  295.     A$ = A$ + "Hd8RM9h1\gaW#1Z6V<SN;V_SS=a#V]M?eDZM4kMd^S_1`C<#g7c7aLHlNQO:"
  296.     A$ = A$ + "lU`LCLK\iAGRU3NmnI[g7Nc4_CWjFQW?jS8VZ_ecnXbnk_=[6XXn]XfL9>cU"
  297.     A$ = A$ + "Wb>\1a9j2Z6#N<dUS>MN>D7aDk`Tc6Z?5N^DS:lhD3;>[?4Z_MhfCMfB=Pm#"
  298.     A$ = A$ + "7M:Y\TSbRK3iW6<DE:fkKlYn8Vm<J\ilXKPLH?K?ekbnNnLJOXQJEnok7n]U"
  299.     A$ = A$ + "[Mh9<o4HooGmmnZbU?`HbcOeCHgo_m7lk[HTn<]87MHE3\>?ka7Y9i`3DW\_"
  300.     A$ = A$ + ">[DNcKNNI6EGa\]EVL\1[G^b\m:ceIYbD=W_L]m=PLQ9kB>iX]ZfVe97J`6T"
  301.     A$ = A$ + "IkFe<[JLH=8>KOeIfdCf2ib[6ef_DKm=bJO4=Jh3UhBBN37fdlGbleL#JF\N"
  302.     A$ = A$ + "96IL4o\C[OOAG>o^AnB#K4e:3L#XnP`OaT]GWQG`O2jB#cnQDO77#a54S3n]"
  303.     A$ = A$ + "MV^[cnM2l<a_PHL`e4e>agjcn9UWk1oG?n`_E]2[>YX7F\k=]1KMnGH2AKig"
  304.     A$ = A$ + "VHhQ=4LP`f3L1[iBKMQVALZ6G5cXfAeXhmZdiU;BieTUnjaO`cMic8GiPCIf"
  305.     A$ = A$ + "J<o1a#d9^W4k2\IiL<?2h9`7hGhRkO:i:7J6CK=leH>ojEL0a]]Yico0l`H0"
  306.     A$ = A$ + "F1\53^6ao1Lh`70HJn<Hmh`A6UZOW`G6aEUl<`eQmmLnJiRo7n;o^O=mo`bT"
  307.     A$ = A$ + "?l=_Vmo:H3`1FLVc9AkLHocAh2`oc4oEdFblO`_P7Scc[ShN1FRh1AMY`jUR"
  308.     A$ = A$ + "j9gYn<8FFVVMM>>`<`o1KOF[A=TK2j_O=IWg9nW`=jhSgU5G<l91nij7O_b3"
  309.     A$ = A$ + "O\Y]K3fi5O`C9?jYfWJCU\mNMEeg`9fCWb9WX;ihSfVaWkdkY=iZkO0i;o6?"
  310.     A$ = A$ + "SlUNmWFJ?_hTWndc8WE?o1kY:Yi\SFWC>;CckTZ_R3YhPC<NKb[mXWAN\C=]"
  311.     A$ = A$ + "LVYjB^dn6dNo>]nnRo<Z=oaE]oSZOVP=`G:3R9=a8VjEc9>nHoCl1inlh7H`"
  312.     A$ = A$ + "F\H[A<]I]D16RH[C^;9O#]<olK`m2l1n>HmSHn?Do?TCNh<N#mmaIMZ#<n8^"
  313.     A$ = A$ + "O`9l4CdSQk87U4G[[M\mo_8fPeN4mFY0GmB\eJDA9\3KND\9hoNnOea6Pooo"
  314.     A$ = A$ + "YG_oDO7=Yh2lKT_bG9[Hg^5oe;O`mJaP2M8`_Z95KP]:n:0;0F1<7h=Vg6kc"
  315.     A$ = A$ + "S=n0jeo#F<\`V_JmeRf1l7AMkjXo`b78WWLOPF7miWdFfXe??hn4g`?e[n\b"
  316.     A$ = A$ + "go[lI<M>EVf^TdSLSbWhiOD;nT<_<cOGJRA955G4fljDC2LMVk>gZU7RS=JO"
  317.     A$ = A$ + "fo9CXli`W0LS9O2UTB<fgM6gJ=BY7Y>0LZk;nMQc=#3UHe79of1nPoG`60K2"
  318.     A$ = A$ + "c^#iL1g;\MVD]Y?]R5HNFh[alXcXcmQ]6?6fD<HngYjXFK=[Rm3o?cL]>c;K"
  319.     A$ = A$ + "gF]A8G2lialbkGa:PUH=mQoY3Zl^>Ho=hbVNb>D>:E;OTKN>;gdWCmA<]j3i"
  320.     A$ = A$ + "<Cd^DCJAZ?_ZD=<MHHSnEnD7^gJU?k[nXbKo2?XmLZ=]XTS>HSbSLTaUWk27"
  321.     A$ = A$ + "#NZc<[noN?bE?lXc[iY>;ghcd=ciGQ=70HL`ePIINRZdoOH=SaL4DK_4KK`g"
  322.     A$ = A$ + "WNbnElg0V?2RA5n=6]Y:]oO`N2<2i:2Lb\MeTi31M8lO;o^2n4NUli3gAZQh"
  323.     A$ = A$ + "mfAUV?Uc=cPb=>i\bgmgmC9MDKYocR?XG6`j`SjUU1f:6?RDSaRA>i]3K<`7"
  324.     A$ = A$ + "X3Sjn`a>PeQ=eD8mnU^KX2i:7Oob17YG[gaP=>e7:LD<miZO2`3`E3NY\FTA"
  325.     A$ = A$ + "kVC=6BN<`F7O8Ho3_9d5PfL;7Fji8faY[l^P;5?>HIn\`O2?GdK`i^h1Vdd1"
  326.     A$ = A$ + "n=NWgBmG4]TEdKBNn[LBSOCa94QQCb9V=;EXO?9GTTc?;_OTSIeOBUje>3h7"
  327.     A$ = A$ + "bgEWeM8fk7Jd>=L2i8SO?H>3`;>mQ1hOcinao1O5GiBCo_WL]m?lSn^V?6hF"
  328.     A$ = A$ + "HeYQjk`hMXJnoF_kKJjIPS<ogjXkO?`gBmKP]>Lj>TZU6L2fmUXhKl=aJaS_"
  329.     A$ = A$ + "Sh?SKcW?7ic5l8aA`Ac1hSS<B[6nh4Se^L:MnOh:MfYkF>WJG3_;ZOSc?Egb"
  330.     A$ = A$ + "UVY?cgbiV^McoaAENDGoPS8_`U?Xl#7Be#FF:Z^m<=laYd7o;lJ?Q=>g\m9c"
  331.     A$ = A$ + "YL`>o\38?kU?RJ7^GUgghZ_`N=oN4GI^>hJb9O6CXHMhDbj<\kBcd`AD;XDc"
  332.     A$ = A$ + "S7L`>Dklf=ND<0S`0>FPM#CbT]F[QeVUh<XonJnPDL0HB`VDKm>eH?l^HmnR"
  333.     A$ = A$ + "OfO`Gmc:Oi?mKm;4G#?KRNiaFG_WBRK98kgK`5EWn^]j1YfLL=LRM3H5hFS]"
  334.     A$ = A$ + "\3oNbk:aUhL7LJIbNKEb9nX]ij9FgTK2`8P;`_1nT#3gE>lN==J`eQG;_7XC"
  335.     A$ = A$ + "0l1J]1OhXY0Me>i5<;jICa7S5C;dSo6?e=TM7B0fJ^8_M_MCo>lj0KQo8WJl"
  336.     A$ = A$ + "PJc5OieYf?57OTfjVVJJ7OjTg?`>hgfAW4aPYjdMEG9L=Q65jADdgMX>_NmW"
  337.     A$ = A$ + "i6V?CZiH>?e39e6Yc]Q?:?n?ikme]hc`e0jBoKoSo>FL98OG4G6\SAG;H\?g"
  338.     A$ = A$ + "KnRbCNYSIi73]]hS6<iNEnd3[J<ig=nMWOg#?;JgPo;iIUo7Lba:gWO[incY"
  339.     A$ = A$ + "l<8fBToB`G\F`QKFiY4]=7:aaRnh0[EGcWR>H]RC=3bl]PQ0gL8E;ba6Z9i:"
  340.     A$ = A$ + "Z64`<XMoQDLB_UTRLfaKGN6eWaghSoRbknB?\llGH>Id6cgN=OjGnAT?jCM9"
  341.     A$ = A$ + "i:7H8eOL;ZoP>U[O\mHh#Wh10O8b]RYM#_oNE=24_<ZEn6eO30_#m>260^Dh"
  342.     A$ = A$ + "7QL22f0<2g6nFXITLKB=0MZ97d57:e74lEicIf>Z`dHaH_ZnZmYH6^6#Kfgi"
  343.     A$ = A$ + ";o>oC`[JIFo8KgQ7T]FEQW1L[a>ZFZ?ZlSgZ_HZG:R=3l1`W1eD1fjlO1[3b"
  344.     A$ = A$ + "S]Wn]h01fPhGQ>1KnLe>_\iSK:ed3a]2o6hoPo3MbA87MF[#P9Xn38f\94F#"
  345.     A$ = A$ + "F^1C#i>AM`k\nXhLdccBN[Q8?ai?Q4MPNKh9jIJX[_#53ALW`N:]]_93OP?`"
  346.     A$ = A$ + "<E]35\k]:_c[nT6O;V;WiLo_mIN;C;bCL^SJn^;#aJTW\:d[Mdd#O:1kM`9M"
  347.     A$ = A$ + "Z?_ID]D\^D6A]mAS?L<YgV`PW73ZgYWj:WfR16e`:hRWjBWd>boY`Y6KG6hk"
  348.     A$ = A$ + "iTC?PQE6\aB]SLN>B<M0_#<nhk3n41[iD3G<o2oFROHRk1e<2WWiT>``]K_?"
  349.     A$ = A$ + "h_2o=<o\cJ8nRc=RaiZb<ME_XWJ_3:cdGCfl:hSlhSgSaAkT:NiTZ_T?lSLJ"
  350.     A$ = A$ + "ibcf_Q=N`3<\Lamf[lh7OBi1WK#C_bifC7b3MP1U3eKebUV[Oi]NV;[n[?TL"
  351.     A$ = A$ + "dAJF^fQ6al9An;1_Q^5d\lPZNX;__ATSYGWXYfI]j>E;:?A5g#]30fQ[oA]j"
  352.     A$ = A$ + "o]:C32H4W1h67nFD3o`G1m8F]ZXn7H>0RiV3f0mCceU;NFh[4O9_bCn#oS`6"
  353.     A$ = A$ + "dgHS8#OTM7F`BFZFFV75ML]DH:VN#KXnmMbM<J>QW1mm0d;OhajG>aDSHg6L"
  354.     A$ = A$ + "0iAXf2b`Ze0V7gZMMM^OdQLmCN03K`oYX16O5FmiYh26Pc03Q?0bkm6FeR=o"
  355.     A$ = A$ + ">h;9A53PNONoX71VSnLbFmG#oo3Kg43?H3G1F1O7Xe>SX3cn\8VEPo`o4n7A"
  356.     A$ = A$ + "k>gWiGNWGki=m?T[3`To`_fGDnAOS_\5KIlI07=nNa]a^7>T`UThNam9W_>W"
  357.     A$ = A$ + "7l1[A5lQdUJg3n0O8PM`73H:lmPM\]VFVOmZhD7o`93L1fY`ISJ[0\1n=0Oh"
  358.     A$ = A$ + "4kDWj?4l6oV1VPcS?ZmYHF`=hKIo:O4V?j#Sd]<Qb=o`SeUI_#M6bhP3fVYo"
  359.     A$ = A$ + "ehjakQnjfo`M9CYfE4[Kn>mTGl4bKo:?SQK_bAVDN8UOdiDnATg5F7j7DaB\"
  360.     A$ = A$ + "FX^j<jS[nDNRC<ULm3?VlLGLob5WY7iQ?l8b96]IiA?nNTAZCmCFIjb96Y5S"
  361.     A$ = A$ + "7fPEUUYc1O#7OXfT7i`C:G#O_?aP=;3F^Z9[2e?Ic^`8XE1l1fOP=8V_`Uj0"
  362.     A$ = A$ + "meVj3XIK]A26QhKE#\aX?gZ<KBhQagEZoANOfGKEHedhnE<b1Dl1H5ZcAZGh"
  363.     A$ = A$ + "Y7X=amUncf;EY_YUa>Sd6lOX[jT=AK=?baVW_oN0?HRa?ccHn>DOjHOBLFY>"
  364.     A$ = A$ + "0KJnjYQL\EJ69Hm1<`7WLjAeiT6c\Ma>To?aW3L1`>Qij`W1gVcQo;Z9W7md"
  365.     A$ = A$ + "7A>k<SKn?`_0_G4;]DgNHVf3`;kNnNU9h9lS061]l\>8BJ[1Kn<HnCRQ5fol"
  366.     A$ = A$ + "nS^7^=OVX_heOn7cl;`jB4<7lehk1a#3=nfjMEm91N5>ElK4[I5\igRO[cVC"
  367.     A$ = A$ + "9=57Bo>TkC_eRN:4m8A^OT1jYe75YOKaPN>D0[hNU=Y?7oGnm8K#On[OEjae"
  368.     A$ = A$ + "LOBP[F?_W;C2NM?P=lO5gUhgb_CIS^]hKMn`eGOXln]V5;A6PkBlQ5XQiS`O"
  369.     A$ = A$ + "g<=S<G0c3T]N=bL0hSf9oB`I3>:\N<>g<3[J1VBiJeQYU1<1H3d<>LceHmc]"
  370.     A$ = A$ + "[Oj39?mU?Ui_kI_fYT?i[l4F<L[>[Mj:7U:_=FW\?faf[lUN]WBn8GoDbKnX"
  371.     A$ = A$ + "We`7P7NTS>VYKi5Eo7Lkc?MGb=>fhV?W3Zjka^l`jk7jFNAUCi_ccl`bCOfi"
  372.     A$ = A$ + "T7k8C8WKl>=KIje3C[c=h:ffeJn1Im4#=Ri\nP?lPMZLWJaELNY?dED^FMJK"
  373.     A$ = A$ + "ajDo_UG7JK8?WP=hmMO][l]D^F`aZS2CdRO`8MDWeO#F0O\0nH1laoj`7LoL"
  374.     A$ = A$ + "Bd578hf#\LAC>m0<b1U57d\Rc`4lk>nM9Gfd_EkYQJTBC?AYaRcE:>eh]eh3"
  375.     A$ = A$ + "ef7a?2OKlLKfFo?^joT>io3n=fjFBiQ`AdW3^Po;_lQVfd=0GWWl2WD^aY>\"
  376.     A$ = A$ + "Eo8KaGg\na<h>6H;C_J>EU[5mIiKNfSIa_j5OX;:GkXcJae5>nHW0n1KMhVa"
  377.     A$ = A$ + "e1JkA33LVR:TeKGkY6mFUX2fO9j=6P]6ig\?^Ih_eLG;B]C_O;VgdoihfN]h"
  378.     A$ = A$ + "kbj3MN_TkFFgmlnDKkUJmW>6d[j\k_bkg6dojfTW[f>gZn0;b^mFmcMI[n\>"
  379.     A$ = A$ + "9ZekU\cPmc\]gA`nHfkKCaDa^Y0\K_mekQQ7hagR?[a`DKcoeHmkA6A]1gUP"
  380.     A$ = A$ + "FkmO[noH8^_4mgYEIW7<ETn]63Ca[QcckCd:^UgkM5RO6NbA39l0Y>>1K#NH"
  381.     A$ = A$ + "?gLCJ[O6h[1o\;LPaUm[LP>bhM;WOoSYlikDVY[jU;<k8:GZS9?bQVBNe7De"
  382.     A$ = A$ + "V<c#Fn5O>R]UZ3QlW\_>:Ca#SKSWlDC9?eYf[LI5Sl:GmXfAdeo^_`S8_f3N"
  383.     A$ = A$ + "B3?<E359glX:nBiMQm<i1WJXQh#=Nk^j;S<HmB#lP9NEcYjZ\l3bj[_ej]e]"
  384.     A$ = A$ + "<[;Q1Z^<K=8ORAjAVFWOh0MXH45OLX^[fhGMPNZajQ4dGaXND3H][lW1O#?Y"
  385.     A$ = A$ + "=eM^=C_;cgh:o^^RK5hS6#WNN9Y?n><KKRO4j^7[SVTQJ[9Y4j]0:nXZLBC]"
  386.     A$ = A$ + "IMic0\6aFRlCh\V<\Lj=oLgPcnYa6<??J5h8f37Eed<C?]Jlna_`f3`CcW1a"
  387.     A$ = A$ + "]2]gXo0]8P1anRif9GROjGmi]nEnE?b<F>19N1Tg3la#=Zc[5<5nQRD]=YoJ"
  388.     A$ = A$ + "]EEkemonFThSJo_jkmmKmL>jO4TSdUZo0]I_FSIg7`:I>mU;QimJ=\1mN;`["
  389.     A$ = A$ + "d[c9O;4[IV7PO7In1[>Pc=E[fEhllm7O]LKVOQ[Gl;I[7FM^#dCP>2dDP6LV"
  390.     A$ = A$ + "cWkk\>[LdKhXEO<Fc3Z]2JfinhKPH8S66WeW\]6c::=[gXVNdQJcE`_ak>Do"
  391.     A$ = A$ + "=L8H57l2njXW`_MeG=O7if<?RcjIQJ>ohCfWZ1I:;^fXMihSf[LmS^?eOa<b"
  392.     A$ = A$ + "Ko\g#^`DmKn0`o1Jc7^j<E]9I9?l17B^aA6Ea?7ENfc=[L3ma1ClbGi8b=?f"
  393.     A$ = A$ + "4bcM^iTKLXaU3fE=bY6^Eia>lNTgnI^ZlKo4GDNhm?RLnYjabAS5SKcGBSFL"
  394.     A$ = A$ + "[XNSImDA?1Pn00ae2l1m03j;6]EJAb4]D_<HeZ6VfZCmKDU<SZW1<bQELa1E"
  395.     A$ = A$ + "<bA6X1C?T]fMEOXoljcSIcKDb>^XTRB=FG[[=b]AFa;eTA\^RQUbg2MJUTZ;"
  396.     A$ = A$ + "KnZc=MKMB>B7]8eD#NBIIYjYC:>YZ\E\EY^VoI:F7[jok<G=cCk\fUHM\AlL"
  397.     A$ = A$ + "LFO6<?iFmM]F<Vho9\YaNVhEQO1Z=A>6oVgPic0<b>3903O`oMHK2o;jIoXC"
  398.     A$ = A$ + "7o1D;:<g8c9bokAXcEcoiHOcLmHoC_GTnC=m\mELg_OKO[QmS3FcSk<\P]mE"
  399.     A$ = A$ + "PlBJgF?mWldcg3\_aVWNGN7EG\DLJjl9ZoMR71W[e::`>g?Mm>b]9>N<8_=4"
  400.     A$ = A$ + "c2ZoA`9TkDhT>HS^ZWLK]=Xh2bmUCmhaiHNBbO?H3\;8GPTg3b1XcJTRLLP6"
  401.     A$ = A$ + "KhAh\FV#g]cJn3Ld9DKGdZCLQWK`^TIj[MIJM>8noR[UND<8aC0nYD_><WR3"
  402.     A$ = A$ + "f1\DD1\>mgbEIl8IM7falaAUJ>oH3f]ZaNJij:f1mjghhCIiCOjF:B^TNl9>"
  403.     A$ = A$ + "n4bGl3MCicnBGGNm[OBiI>m<ZMo#ZVnn<O4?]j?iI?cLbEfKobKLmc8OU?dC"
  404.     A$ = A$ + "8_dif_L=E[neV]Oi1gg#FmEJiR_EGikPHFIm0PRc`Z51bO2of1GSYjYCK=Ie"
  405.     A$ = A$ + "OME;][L]6\bRU^e_C7#i?]OeOd1kDmMXjbQOe\MF^\WV:`bCcHMDc?3f`]U]"
  406.     A$ = A$ + "HUKE\foSP?HnLba;m7#bU9ai5l1aL1m6lOiH]ePeWJZ<[deGSbm:_\T:c=C5"
  407.     A$ = A$ + "oTT]nkHM7=NG=Ie;5H2`EE=O_KVhn`]QcL:A4Ri_:^=_NcW2njif<8G6XU0K"
  408.     A$ = A$ + "N\gIhXW1<:jN`G07ioA`#ll3Bm1\9f?>Dnm^M?Z?QUXLgGkb<N#Q[lIHP_QT"
  409.     A$ = A$ + "gNh6GZ\SO7B^jgodfEdB1YB=bTR>BB:DiKUELaHmYO\WaO8HLl7`_CUTNlf_"
  410.     A$ = A$ + "IXcRm73`=PS03aJ`V_k\NFI==`l1XEQc3o>hLjllH>4d^16PHFBmXjTGhKQ="
  411.     A$ = A$ + "Z]D;>=>mW:We_7n;8n[ho`dEdEMfj6T1[W#`<TSAbo>H9`:lI07Mb7dL3d^a"
  412.     A$ = A$ + "MRhLA=g07:h?MhQkbZ?FV;Vec7lXHHH`ZbeFKoIXoGaLKQ[nAgZjO==M>UbC"
  413.     A$ = A$ + "86;WgWCaQGIo3KmDdWDa1`U2O4_c;l`bSYLV^hDjWSJGNnmdQaQj2CdYQANR"
  414.     A$ = A$ + "S?]lBGl`bcYhT7o`S;GNR^TWjHC:_UbEk=NTc:?c5>XU7?bWa1k_MK=K=UjC"
  415.     A$ = A$ + "0LQC?=n#jg3FC9SdJCb\3d[jG^#Y^<CaFKNCD_ZiPeFh8]YnYZBiJETEOIcf"
  416.     A$ = A$ + "=[eZRTS>NkFm3nCS?H_I8]M6UbgHKF]7BNV8_PP9LFcgT[<Ra:iCPe3m8=FS"
  417.     A$ = A$ + "nO#5VnWZbTJH=3Y^LbF:8A\IbahLeMmEKnI`>Pg36h;Zjim9Qo2\Wfo#MKa6"
  418.     A$ = A$ + "ViAQ_2m=Dhl_U0l#B<b=Ie:l^2K3fnc2jLbE]WI==ceK2K94[n`2E]g3HU;F"
  419.     A$ = A$ + "2JEZfGgG]=PO`6MK5fk9mQDbK2jjQ?47ic6LVEOHa^MK#>K`?:Lh07R>:6`G"
  420.     A$ = A$ + "RkK7EnQ<72nV8F3h_e9oM>eIRCNlPo3aRTHZJmK8M^6V_gYO^Sm6n8HmjAMH"
  421.     A$ = A$ + "j\>h8O83FSRCZWHnGX=6^:Mn=efSJf6nE`cIFEKLKETS<Y>O=7Y>AkInJ`Rj"
  422.     A$ = A$ + "bPL?gFQ9YlL6`j38XoTJePl00Gm3YlS8WIL>ZSAZ[AN<^=ef8eR1m9Gb=2Wo"
  423.     A$ = A$ + "JZnS7j#CJi3Q1eT9nVhk1o_Vo^gZ\=OFU4^W;GfE`N95U#4F]RMnI7B^i9gW"
  424.     A$ = A$ + "mj_Xj30mg?i9f[b_A_NdiaQW5JjQoe3ZJi_n16blWlbGn`:NiPbaEn?7C7D?"
  425.     A$ = A$ + ";cdN5^ZKHFWacggj87>D7TDOGC[jCH^RaE>EcfCkfjXVm>[9K_5E3C5b44?j"
  426.     A$ = A$ + ">:GmODZLR1ZA>j0eIi5MV1JaFOLd;fniiGA_<UeWMUIj:?M\F_M\YikM]ZM0"
  427.     A$ = A$ + "if3=cdK26ZFjgN5IhbZc8E3ODE6\NoEN5UFVZI_>YmJZ#:CW76k#be^ES4iU"
  428.     A$ = A$ + "XUK5F?c4K9h8Q];LTPk>g6\1LiC9j`M]G9]]#T<fE4B2A4Z4SZS>>5C4oFEm"
  429.     A$ = A$ + "8ZVQ#LGo_#e#c]gVoN:96f6U]k_GB^kLkfk=h0>jXg0O=P7Lda`Al=0>1=EF"
  430.     A$ = A$ + "?gBOLdm3F0\QCnKha`o5n#9O=P?\lHVGZgJM^AL=#k6enaOk?hK:oT_cGbb;"
  431.     A$ = A$ + "eOagm[87F]_8_m>e^[COaQHhSO2[ojDEQf`hJYhSnDndH3\Wj;EV^abUaYgg"
  432.     A$ = A$ + "FGAbe?c14AnKT_cGnC9o?n^OEi7o7m=T?a7jY5ioeO^]f6ToROPI;VaffPE?"
  433.     A$ = A$ + "E\>29_aT_2bA=3Z]EjI8`YWaIEnm<g?[C4b]1eD?i_3Ka;<Coba6YE[_k^OU"
  434.     A$ = A$ + "GgYV\Oc_23`9\^a?mD3H3>7a73kV<S:D92OG]noB0^VKGaSGDe^CN0_^jOhQ"
  435.     A$ = A$ + "VKHe_aHb[N]S9OX7lhbWji_Vl1_bQTWk\c:GNjNDm8SJnHNZC>]lTjPjJih3"
  436.     A$ = A$ + "dT<L=i:SFCAbNKY:IRV[``h<_0n:gWReI^YQKXJmgEZ3W2U1Z_6UCIWbD]DS"
  437.     A$ = A$ + "5oZ3[oNLdN[DiIE\<Ec5Ji2mXC=loXhFmCGCRk]o>]eJ:JH9oSFM7=ojHRH:"
  438.     A$ = A$ + "AMJ#Nb8FW\Nb]j`Ga7eZL\HO]SnI#EIWYdH959=FV[AUIk:OcTGJ\MZ;khTR"
  439.     A$ = A$ + "CHkFnZgi6meR?;ejUe[4Em5XA0kI\IIOm2n;PAB>Z`\SP?H?a3nALTkc8i8D"
  440.     A$ = A$ + "lfffTM<?UCDA9]kKaobIO63=#LT1O^Hc3^0L2?G^=HI^??>W3lSc[5>#LOjO"
  441.     A$ = A$ + "MT_ARcPC]KhDoI>mJA\kOeKLAiSol?R]>A`V5>>lKPec4V_gVRN1Z3BWJA5O"
  442.     A$ = A$ + "9hkPkcJ\Ndj:CfCSE:3YJM`FHB5W<NMU8O\?hC:bocOTl`WoX:>i_CNkghU<"
  443.     A$ = A$ + "\1H6`URlG;7NPFUVDodF<Oj\:iX:_9`47A]AY^c?QZ_6l0HTC]W>=^mDG7DW"
  444.     A$ = A$ + "5GN^Q<lbnk[F[^\X_[cjfZEMN0N?1C#mWSmn9gC_b5Eo8GCm[`ARUe9d7olc"
  445.     A$ = A$ + "<\R_6dhn#lMRaoe:a\Ng\jIQJ?6>H?VZAQaKo<?Xl9NZ;;7O`6]JWWS_aSLJ"
  446.     A$ = A$ + "iaE>I?dL3:3FF6F<\NZC>SU?M[oUZJdMF?7fjYGiHB=PR_KRI9Jd9Wb\NZVX"
  447.     A$ = A$ + "]6]L5b[QeTn\]FZnnEVQ=8fE`_4mRocEGR]DF16oURCLW6O:nO3<BecG3Q47"
  448.     A$ = A$ + "9d1C<B9_mf8OZSo\\NQ3m1W:bDa:5V_DCQi:eELnFl\8?b<G2nRXFIcKGKAB"
  449.     A$ = A$ + ";RP==i`U2O5L4L2ccS]9HUdfaF]m:Bje^K?HO]n\H#^]B;VBkJc1Ij7#k<Sh"
  450.     A$ = A$ + "3OS6n8jPlCW_?ASk5cmClG07P=>n4LRm53^?HAR_6Lk`g0n>0KbAd?hd;W0k"
  451.     A$ = A$ + "#<Wnia7ho`Zmhigc4`nWHK060oT\o;AMhTc>g\EG>POL]Fhbf`AX90L1j<iX"
  452.     A$ = A$ + "CO?5O:][JkI]O36Y=EKcHeZj#Z<O[og^WNJbbcKKjLX=[WK8EciQVXGY;egR"
  453.     A$ = A$ + "UKLbAPjkQnD0eZaQj_5eWAE6O]3fGc:^X6IJMNDl7dSb7l<Cjb?1H5`5D[5h"
  454.     A$ = A$ + "7QjFWeOh[Oc;XJObDZ:UHTS[j#8_9dSA>VRAHOl0^Jdge1C`h:7H?6NiBZOU"
  455.     A$ = A$ + ";<i0fPn92eGhVMOa:o[U:Y_e0U9E\kUVaUfk7BeZoX7ILi8mEW5_GlOlRD3`"
  456.     A$ = A$ + "ZO3dSlZGmhb7lB7ahGA_ROV>LmMPJ8SJ2Th?\7mLLTj4PKCLgXVV9V44;`ij"
  457.     A$ = A$ + "^NGn1eGo\MDY]F`Po7L_I_1kO>lARKO[F_hYDEG:f:DOK>iBShI#mCP6MR79"
  458.     A$ = A$ + "i=Sj=dbOVb;Si\c=fX]hlFMnI;]DAABC:NSj`2njD__h31LBAa7YaCUgCh`0"
  459.     A$ = A$ + "f0o6XKV[CRC4[m9dN4a6dck_kFo7Umh0jIeKImN;YZH2bE1l\XOE3N9a8f\]"
  460.     A$ = A$ + "o#\Eol#a1AJh>dCSN3`L>ik0\R3g9hdQnHnlhllLH0>bQg5jbie1?;7lA]c_"
  461.     A$ = A$ + ">ALbO3anfZOIM>0Fo2`?5NDT;enZ9O[76aJ:dfC#V7ohd;BY>QMFk9>eG7l]"
  462.     A$ = A$ + "8^<`a2=id_#7_AE[BaiJmAdjXOD[L5V4=ZZOfQJ_N;fIDCXXYVlUMTNKCeOF"
  463.     A$ = A$ + "]Q5jGO\S=DGbQeWoQj[=;>W`KW1m=G`2hW1o7\f4a^iVWJ6i1?lXbcOiSHeV"
  464.     A$ = A$ + "HSi4[Lem?V]nK9W7D[i?j9WCNTS?[EkihkhBcBmCeQLBUSe96Z3iDSdUL]I6"
  465.     A$ = A$ + "ANXm=VLeI7E>URAP34[eh43c?9a=iUTafgPU;`KXl\8WQTgTWolkGnh?nU\H"
  466.     A$ = A$ + "IQ>UGhl7D^i9VF^bn6dlIPO_aK]4IOZo=WjIVHb1>PJ>3<2ec>egonjcEo#V"
  467.     A$ = A$ + "JGVKSf:ZQI^=lZ`^nO=[9Z5`7;P?F0Ol?cJ6De]36QN<XYEEeMDilaZYRig3"
  468.     A$ = A$ + "1X^:ZLnnQ0j#8oFTSB`DUTBLB1:_Ob32hSFeo79VWXoPj7gU]#B66QJWgjQ2"
  469.     A$ = A$ + ":7=dNhTC:dCc`dS\UP=]i\g1bNK`VmMMb^E]ik#a2A6\ob>2=#3O4[b]2l1a"
  470.     A$ = A$ + "d:kM]Mme7^e[4A;1inUl=07:[gG[fg`Y2l?iRPH[i`o2L1aM5\PCmDbihib]"
  471.     A$ = A$ + "1O0_;Z15n]iFcM`JY\`DM]>aVO]4RnK`1D?WP=8f4\?I2o:RkZCOW=de]H9V"
  472.     A$ = A$ + "0mDRRlTk_K:gc]9Qia:dOORAbFeLe\Zo:?UWIN4Ka4fYD\NmH[CPLBAJGa>^"
  473.     A$ = A$ + "[o^DCQIJen#Nj8j#lgE?FDa3M#_A#W7HjF[edU^o^YVaKAiEdPbAYNS_5l_X"
  474.     A$ = A$ + "n##k>lZPo1H5CkA_eIeP>j?PC2m22hdL0U;5fid;P#K1LY^naVadQLF5WL5U"
  475.     A$ = A$ + "CeePOUR9^RR=^d4m;WKd^Uc]Wn<nFGo4c8GH^AD=dU9A_Qe8KekU:mEBJb;["
  476.     A$ = A$ + "LW\eCUZ7Wee;j`QCeigCGb5W\7iDjeaL:f5>QfJV]V\E<#Ab17ZEG[1VnKkF"
  477.     A$ = A$ + "iDejKFZmo16Z9Ib>EM:MhJ#^5g3[_\1JgjITY6cF\mKhOIFgi4ooJc?C;>Z4"
  478.     A$ = A$ + "OF\cH^D\ML\A0oHm5Q::dhXCN`0;#>18nXEYfW=#OUZTL\jIUHmP=UcJZUjI"
  479.     A$ = A$ + "Pj[`AC>J?HP_46To?j=:\FDlI5gW4RG[FfFPNIe1B<KBO=K<03S4[R?BDa3D"
  480.     A$ = A$ + "gHiYf?WH_S;Oj?b;KiXleNR[Ke?d3Ob3Imm:NOik2flHoc0KO`SL4O:F\NEO"
  481.     A$ = A$ + "7PAhLlmV_[>nE0WEmle73h3`6X1iWFo1n61W0FPef4[[9j=3SHkQCiKh7WeB"
  482.     A$ = A$ + ":agaIMHQoEdWGTjORmd3ZK2bi;mXMFo9d_PYG0CNQKEo=OT^JF:D?Oo]FWi?"
  483.     A$ = A$ + "5]JfjUAmQknM\8YAE7F<N_>YNmHX[LaB5j_?=VIbBajL8eVFLB^A_9YRTRfE"
  484.     A$ = A$ + "?mXYR=lP]OLdAUVo2RI5anRnj03Z1mC>FGVn5FoB>m2DdjcPh1P?3`1WMlNU"
  485.     A$ = A$ + "[<m#fh6kKLiZC<PeOL1k#=ZLeS>]Lf3<ZnKlFTM\1g\eg1e[;HCR?`3NPAT7"
  486.     A$ = A$ + "mHCJebk[OS;8GJ_3jbgVZ?bI=fgCedW[;dZYHlI<LceJi;OdVZE>l8m:7M\>"
  487.     A$ = A$ + "UaX?TfFab<jgS9kXLCCbPjcUemMJkjG^mZ=_GQ;m91kij<\1m=[j\Hnj:6]H"
  488.     A$ = A$ + "oP]2h4dZjdo>1O0>Pl3kTKIb]FU:fbZ_2Z1`OZehQC<O`FTgCh1161\2a<bQ"
  489.     A$ = A$ + "?D<Q6PQ;H_EVSX??2Eo=H3Z74hIAN^1S`NF_So4hMMa3_?[nQ6_m6\J8QHHi"
  490.     A$ = A$ + "DC:>[[:WHK1>aIM8b`1ccg=7>E>c9H[i4mkRCOWS_?TcC`7\^K1CP_3hC26Q"
  491.     A$ = A$ + "ifnV_cK8_f=_TaY`Qg5el1?>L\Lj=j>[]JR];L[XG#cnH0H4biDGUFPekPY_"
  492.     A$ = A$ + "E3VX7jg7jiK7nQ=DU<FW=Jm0T9DkTmXgO:U?f\]F_<]RWfG7=9cdF3BO\?;X"
  493.     A$ = A$ + "ni[:iMY_gIIL_8VF>[o9ZEM`9\NQPW5[G3lKLhiG3^\f<#W]C\Y>llm28j7K"
  494.     A$ = A$ + "V^M5KLbQkdhE1fhQWKLijc<ZLiakchGMNmeLfm=R>OUj?#eTgGM5:n]TgWdZ"
  495.     A$ = A$ + "b=UJAlRc>PQ3_fn7F^jL39glhc87Cm_=mlaZRe02[U#F?^7B_f>h`=iZFCD^"
  496.     A$ = A$ + "E`cOlfKD^hLCKmB#V?J:j?N]GRe_gaGcd:n7N#obP;ni7K=`0TM6NX6G[:b9"
  497.     A$ = A$ + "3Y8Mn8ZM?bC<e>1eB4iA;g4Raj3WP18OblHL4k=ba<J?hX]>GEO7DO:F_]BW"
  498.     A$ = A$ + "3VcQM7ig3<1f[DSCTo3`7L^M\YeKi8L]ggM81ka:]n94h1hG5WZi0l1HSdDO"
  499.     A$ = A$ + "7P;8_8<0KCo<b96EP?`^gY^OMRa;On>mOA`<lLMNN\O3COAaZOAM^1>jLMR6"
  500.     A$ = A$ + "<bQ:j?^ePjB;cH]ee:n5#W1n38WEO_Og?QlMnL_e]dO062^Gh31lQ3V`a_2W"
  501.     A$ = A$ + "cj;lUV[dYZg`fgKV_G\galkG>MDWbQ_l2U>ZY<YcJ;GjDiJAM=<4k7?jiV#a"
  502.     A$ = A$ + "6kUJlA?7gNbVZA>BoM:7XkF=l2j?`?0aj5l1m=;j[#U6O4V>3V3WLR0n0\1g"
  503.     A$ = A$ + "6NF`53laYWW;5g6O26VAiAQOSmgImF?cjXmf\LJ5[LJUgcaDM1WFiH16jHCd"
  504.     A$ = A$ + "[EW;Gj8CYlFSBR`gEJ[kYC=JWF^8Yg]lHWN>ii_da<<1aTUh^AnaYWR2G:[?"
  505.     A$ = A$ + "m>IGFo4RjE2Nb7KbaUS\WAEnEU[h>5?YnJjZV\D<AU6>Rm#T]YlHoe1K`Hm["
  506.     A$ = A$ + "K=gjfh;YHeoLVZ?I\e1?POL7KO`:d3AMlM#]8Q]4WWJ^`Zm2MNGjIh`gSh]Q"
  507.     A$ = A$ + "VG`#PA#g2f_D[OHK2_:lS0g;lO06a_Em0V?4hJ1g:hHajL<JeOa^D]7a>_6T"
  508.     A$ = A$ + "hWg?2L]HMNiTkLdfhD3Q>n80?P_4lC1>R[97mkhK4m6\Of__1jlFeB?O?\j<"
  509.     A$ = A$ + "Aa3U?ojW7nELTL3J[kLeW0ef1l\<>FZ^3FcMTK#[_I=OO1RQC_>QJdVeT_cn"
  510.     A$ = A$ + "G5nAH_C0l1jb7Vm8Pig[>HmJA\4JAeDAl?XO13nX_6[dRc`8=0GWj<l0H3dW"
  511.     A$ = A$ + "?Uj?Iji?WQ=DO:X7QilWFi8ECJjL0Y\MYjdRfdmRo2dK0^Pmb9lK0NQ1l_8F"
  512.     A$ = A$ + "a6?Ym>TLZaka^?jaA[1LX>#G=8cfF=^`6h;Y_F=<Bg5UQL>EC?H3lOLJe?b6"
  513.     A$ = A$ + "FcmZL<gXZ[OHS;5i\oBkOD[?]P_2KoVB?B_Z3OEGmPCL;]fXOILF;mjk?e#f"
  514.     A$ = A$ + "0=FW=VYg^<NF`SkUNTcY?NMBT1iVheBOooJS=n5=2a7?\hJAmEAM:E_>WF5Z"
  515.     A$ = A$ + "6Nh#a0mQXk0O:Tc0ZoA7O:V_6MNI[FT:_0K#lYH>If7UHO^Pl^QM9fZDC8XS"
  516.     A$ = A$ + "VhHA=U#l[8g7h7Qm\FdW3V0lAfa6]Q;Ho\U1eT>a_RhXA^dAS?HQOjlX36QQ"
  517.     A$ = A$ + "S=_SO1bkRC>eie0_<hFANAXfmha\jlBeT#]7Eflm>HlMH[kNUK5n#`oQCnai"
  518.     A$ = A$ + "HEI\;CoQC_]`eNMH:gZ711NQhFi:6FiO[NIR]WYcnQ;[1CU[5j]YV\PW=eck"
  519.     A$ = A$ + "4XcNX^\ek7eT>JBYfD\ePMmUKj^9OR<LdSC]E`]W]CGa^bbM#]5JmQ^^;?=K"
  520.     A$ = A$ + "m^R_4`1h[PLR#_k1\2ac2L3eM8J=:;f8TZC:6I`:bchB1W:N?9gj?lQWbl_l"
  521.     A$ = A$ + "TWiPbe?bdbAkAWk^lL=]97GaA<g?aEZXTRbjmDWEaI`ESlWP]?i[PHGPn6b["
  522.     A$ = A$ + "8e^>a6SJ6chQbnj[j_m<c=ZL>53<Mo]KkI1]GMiB_=F[Z_XNYo6Zeh17c6mm"
  523.     A$ = A$ + "g8HROASDR9B[>4Q_EIZVAZE5>FTR=LF_iH_al[SZo?<\j37o7XCaQo?fL4g8"
  524.     A$ = A$ + "V[SH<EaleO2n7MRM4nCH_<7<1n?LRc;J#PKE:a\=C3BhniQ\Qe]2I[1hUa[2"
  525.     A$ = A$ + "m74kZ2BHWFL\`WQSF6\o1ca]1K060M?LN6ho0nD`[2nO>i`W1gVW;hLlkaJ="
  526.     A$ = A$ + "7]7FMZan0WbM4\AQ9jZ??PO3Wjc9_M7^5SgK57[ieW0g;`:^fWIbcbG^3NY]"
  527.     A$ = A$ + "igK39?P4GfNWOOhQjgUjKgfo#8Wj]F[L^m?QLQ3>ULDUO_C?:`Y^]X?o3?7`"
  528.     A$ = A$ + "14[:[fAD=^hc0=3XU0kM\mYg^A?]ffWVW_?UB_mPcKm=Qf:gj1Sdkh[:UMHL"
  529.     A$ = A$ + "XLdI\_f[E>cHmXJG:ch\AlMAG3nFP36l^#k1JC03#^QYn9H=5AmKMe3=Y\on"
  530.     A$ = A$ + "JfEohAaNho5o3DcjXcI:mmRO?0oCoHT_[WO^mHk];h;Uj\PmDQnK^N[VoB:j"
  531.     A$ = A$ + "84ooiFo6_G>B8b]IG3D_[EZhUbEn8hoPHHQ]>iIWL4#M:ae?aUWmi0lYP>66"
  532.     A$ = A$ + "d76ImR`N31H5`7<o<f]PW`^TH_QV3`9\oebPlWS_2dH#<MI0O:l5AlU97jaY"
  533.     A$ = A$ + "L[XN\LFK6P;hf>h4^=nX0_jDo8>H66ll#7TM=XWWG?l]hiBl4XNLMfCNh8SR"
  534.     A$ = A$ + "C>J5k4Y5kJ\oYn>9??4g:`6>mW7;W8ZfMWJKc56aE_cdjMFccaZ7fSe;;7SC"
  535.     A$ = A$ + "BG5V^dL^9J[E=F3WdK<:E]CA_3Lj\N[UJCA?bQn;0LPV]MhEE^Y[e\geKC=V"
  536.     A$ = A$ + "`0=h<nYePCO5]g:c`RO;jcIM1Jk7=mE[mlXgWBo=UH[NRAkbdBLHEOaLMDWQ"
  537.     A$ = A$ + "=>BO]HW7^FTkNR[5lQ86`HSCNf1?Dd^gZUk4fWcY>7ia[InN>9O_9>iD?bDK"
  538.     A$ = A$ + "bh;Qi40cCM5#lKY?=Q?Cj[\\WR#?hOR^JGiHFioTe>e][AH1hSDM1i8UbJhG"
  539.     A$ = A$ + "iBQ?4`7DO:dg68_PF<BE\3ef2cgAmMAmRWCLaHlS#G3?77KEWe82lJPK6Jn9"
  540.     A$ = A$ + "78h71nFQi[kfNN;j<X^BPO5eX>eME\:FQjET1i8dZA5e_5H1^=h2K]6>_6MR"
  541.     A$ = A$ + "g;JC0Gb0L1aA3=#L=acgIMJ0nUlXHJS[loknV4cUSV:b=8m;>hGA^MH`]YGF"
  542.     A$ = A$ + "ddl[=I[gFXf1POLbAR[h0WV53;j53`]RN77hSn:eeXc2Bcfk?0OHm6S:cAZ8"
  543.     A$ = A$ + "[h\??Z=HNMD7G>kW8`GWn>kXji]m;6Ug4km1h?Pnb;LjaWRiO#a7>n>X_GMh"
  544.     A$ = A$ + "1JahAaiihYVX3[FC8n_D_Rhc1NDX_0laa7\MiBC?TQ?`o1Lg0;Po0>2F1oZ<"
  545.     A$ = A$ + "o1mQ:hOQO=hU1n7^J7LPF=o5`iRlF#=DajKQNL7nEaW1eK?l:QOIOeGVaC_g"
  546.     A$ = A$ + "jZFJ\X2^]S3F0O\0nH1laoj7^]hOfNOBPN\:9SMk:WPe=O?DSLX1n`R];eHR"
  547.     A$ = A$ + "R98oMHCCN^QOE_eGYUS5WLc1fbYN0]S:W<RG6e`[a=Ca:D39`Y2]69B^19n^"
  548.     A$ = A$ + "A]5CC>a:NKnh^4CPnZlK3gF[j>iN4NF>h3>j<0C0W:Wn<WC>I#W^C^N0?i\N"
  549.     A$ = A$ + "Q]mB:U;4jQ]jHX]JM]?mEU[N];LWLZE0KMUaNbDfaIi>7^FX_PW3l`0ShZGl"
  550.     A$ = A$ + "V_[m0g2CmFm]eN;9;I8foID^6MbJ:Aifd#fTk4jI6aZ?gD\jFQjjVNf;k;DH"
  551.     A$ = A$ + "o2G:h5A?ESjhcZU_FHOm[43W0?:bo7fk\NPhLP=6[Y2LE3lMG_mh<\N`YN>`"
  552.     A$ = A$ + "ADGlXoP77KLRMkL:61mo`aRS?bAg[U7mY\m=`l]jd^PHgV<PJccNM3J86Y^R"
  553.     A$ = A$ + "Une_K3[hS;ZjBJ?_D<nFD?`DC8`EMfnJebW1[96dT37;dN#?bTnV1fED;gg^"
  554.     A$ = A$ + "a1oZ<HNm2CdElN]hoVL\^F[MZVN6PCX6QilTSRNHO0Zm6<l0H9lS#\^#7LGe"
  555.     A$ = A$ + "FZY3eI#<nYNP9gnIYhalE=8Xc8:E?27C9b`Dk^TUbB>>IgKLm6^8jPle`4h?"
  556.     A$ = A$ + "2O6Xc6<17MdMk\V\LF3`PU`G6ja1K0^QS>i8QnF2m25RM5a`2]FI^3bIChVV"
  557.     A$ = A$ + "S:WO=GBmkRfLRM5aaZdTMe?:iaMFoI\^`9OY4WH`GXG7<2J>0K<PZ]PS\O2P"
  558.     A$ = A$ + "m9kY[MFV[mRZNVOO[Tnm>h6cg`lh4WN[6mdPn[FeWDCFfNJY=D]ghOH`JcaR"
  559.     A$ = A$ + "K5[YdmZn#87cdC5YO9B_C4<7ahUe[1ae2]9TgJbM>n>^lN7fREe0\?cYGgU["
  560.     A$ = A$ + "OOcOGKalKbgAZ=Id5E_Rk1O0VQm<NdcSOa1HOM_ll=O3<G3kIDX[H4Z;Mfk]"
  561.     A$ = A$ + "K[NK=SAmd`j25N1g^]_o=aPjLWH3CMIAl^8WlDg:`aRAN9_;[NRZGo=KHmg^"
  562.     A$ = A$ + "jEMZeD#:Bfa7QjGJK6g<FKOh7Qe0:iK`Zgnik7#>m^7FK^\V4Yg3HmM=ef:?"
  563.     A$ = A$ + "EcLjZ];mDWTS<D;fC\O[SVK6do]a7CY95[]^GH]lB?O;]HfTT`ffPM<]M^UK"
  564.     A$ = A$ + "5[J^>0[0W?ZoNF3G<hflH`7Sej;[CVBX6FfE4F?J4K7jEB\?mB>aZB?R6K^N"
  565.     A$ = A$ + "BOG:N;^]Yc;BnhSejAU4gEdFKLID>;4g7dknHWn0bcNiCHi?k\Cfg]f[f0_#"
  566.     A$ = A$ + "nRIM#0?[F;:IGnAD\0i5Snb1eQ8j[MU3lN]mj0j_kD?DGVeQdn6fjo2d[[a7"
  567.     A$ = A$ + "0fgD7OLOb97[UMWnD8[mfC?e#fJmVjQQNd<i`YkigKMYWoa]Y?>Ao#Qef>[W"
  568.     A$ = A$ + "Mjc\h_U7Se0;cK1_enKZ:;>D4oY6;]#momHT]_a0_]KknNe8RP2`fcB9GSP9"
  569.     A$ = A$ + "8nCh;Pm9cBc:9Y\\M]ojD[>_IYI6[dYJO<PJO<k`MJh3RU5[O#WNS5kG8\nY"
  570.     A$ = A$ + "IP>0Wm07WmL1`:5Wj>\mMQNHOPVmUUigOSYg2#OJ0]9`I2nDh_QJ^TNm>m?`"
  571.     A$ = A$ + "^e?olENcP_B:Z=IaHVeQ2H0l]Ui^SdFcFLndeKC>BYN2`73[3N3S`JC<nXUb"
  572.     A$ = A$ + "diC;gFcTQ:I_S=IeL4kmkP?hmNgA\A9^83AaO\fjgY=8^`UTHT6oLbi\]^kf"
  573.     A$ = A$ + "gX^b;6[Sl^ZC>od3Hm=GfKMHm?#o]6L2[]ff;9EK?TRm?7hQAOm7]5P=heAM"
  574.     A$ = A$ + "h2nPl`=gP]XcKGQ>_]b1Bec#lS#7PE[BeiZ_#0VPJ<VN40cc#<]Yg<`l#L4K"
  575.     A$ = A$ + "NnOPo?hL>kcAhGPhiS?1h;gCmUKicTLK>#;eIe`:aVUlXA\k_MKWNkNhe:FR"
  576.     A$ = A$ + "]FNC8b]H3bgHUZMI]5WS]Oj#MSUOZ:GT\CD::ShTLCJWfJ[5nJ`7SlTbLAho"
  577.     A$ = A$ + "]^lL]ffa67^Ilo0ld8?6dG>8>PTgNZo;WJ?TH7?VjgNVnj#VRL:ENQFm:cnZ"
  578.     A$ = A$ + ":eQLa:_?h#1FjQ>i1TKLfS8GkD7`j3mCeGKF_9Vh<C]CB\WcFa4P?RGa99Xh"
  579.     A$ = A$ + "7`=`A4m<fn2QnIB_kUNoN\QhW4kVmcRk=S>ZY8Ih>J#j]iJT>EkYJDMhXKSN"
  580.     A$ = A$ + "J=fIX5_[Bb`FoB96Z?B3ZVLRc;g_c2Ced\Sf36`SSjkRh0#?P_Uigo#L]OJV"
  581.     A$ = A$ + "WIWC\D9WKSZH<[Wo[jUQc3mdd6EOfh_UnQJojeRcN<13jiBd[l\i?XV_Z[\K"
  582.     A$ = A$ + "EKZlo#KcGc;lK\co1dkJPg<oFCLH7]m6=l0e9F1YTPU;=\3^MK?nO461kS7b"
  583.     A$ = A$ + "FDo;a5AhBN:ONV;97ZUk<SghMIekXb]1=m>cgKk=Z:_DfWWif>mB1We#>caC"
  584.     A$ = A$ + "nCYV_#?7naI`ceej??6[GD0fPn`B?DcBMf\]W4CnmI>BoGim9QkkJeie2#J["
  585.     A$ = A$ + "b2]H5#N:1KhD?=TKDjKHQ5PZeIC[gZMI`G4cQ2V?O9XaWH?#?;R1jGBGm1BM"
  586.     A$ = A$ + "j#o3:Gn>Y?WVDk=FG04W3Fk=H_36``5\?H[L>kPeIBbA;][JfYg;P_2fW<8g"
  587.     A$ = A$ + "SfN6_bQcIoTVJhSQCnjYO=AoXQna?m]NRa6JT8go4?<6lK63l9`J`cI_5VJo"
  588.     A$ = A$ + "2M0Ho3G8l3#l81[#O>RKCN^h8mMI>?j5ifD[LD;#olo__1gGckifJoWUQ?[J"
  589.     A$ = A$ + "IB<K=H9KRELZ9JiR4m;Dkm5UFBBn97_M\^RbcF?FX_aj_#jSC]`TMlkbV;Wl"
  590.     A$ = A$ + "gcPH9Ka:85E3DjYHmQ86i4k>UHfh6TX2dOE;RGfjcUNK8e3IP^]D9H?GQhoJ"
  591.     A$ = A$ + "N0I3^]L[nFX6kQWg^gj6=o5\?W4Sj79:ZE\`fP5G56hW1modcE#K27MFO_<\"
  592.     A$ = A$ + "jXOgZ^nHgQM=SOd\C:NUgm>]_c=DDJF<ZZ:eXT2gIXB;I[JdfMHBcZ]M]ZM="
  593.     A$ = A$ + "ekJmI6[egGAo1n8LfoAH]`SFO>WeoIVO=5`Ne0mB0je6DW6>km2d_\K[Z2D^"
  594.     A$ = A$ + ">iKfjhoUiN#G0kok]D2m>KlADZU?>Zi;Z=bNeKcPK3OYLei_HN]`eO7oUM=E"
  595.     A$ = A$ + "\`hg\S#EO#hcVnD7h63;=O_hZjLbddj`0M?UVFbB19ZJ>fL8b>3=HKo6=WM5"
  596.     A$ = A$ + "S5[HRA<e]5[cX]]1?U]\NgegKGeH?[?I`8N]\kA2dmE8QjkjT=iWKV_3`6PA"
  597.     A$ = A$ + "0o`[=bPlaeJIIncA=TALc8fHln3FQhMcW=l=:=cDU:bAi2VG>BcjLdeFPjW8"
  598.     A$ = A$ + "?fO2CEJ_`h]mZYfb>FYKFOEUVUd_ZAPmOLbg1J;8_9dO2LjS:D7SmECY^f3i"
  599.     A$ = A$ + "c=M[?<eKEd;]:gZANj=]Hkg1[S=efWe;3lGY_9Kel#Yi=oj__DcgJgeGYa=:"
  600.     A$ = A$ + "oDSCBCm;6UnKgF3>#9#?Mkfnom;<F0O\0nHQa_^3_FnBUM_U`DLBD:oZHE^;"
  601.     A$ = A$ + "kBBM7A[nleoCeSI5;aH:>UOdFEke=8aZ?g<fe>ThgfFTXeo[gA819kJC^F[^"
  602.     A$ = A$ + "DSG\Vg1?`jbRJ03kLdV7\G[F2B??H3>bPc1N1\BTZn4N\`G_W:G3gT8F_Z=9"
  603.     A$ = A$ + "HO\ne2mK#j=`dkDM]f\HO497UWC9B[UERbiY#c6UmAln[=7eV>EeV>M[Wf<7"
  604.     A$ = A$ + "iMX[6TCCM`>B7FO3QN\S]?_FOIF\8Xf`8FM4g1\[9^3=FTnnY_o]DL1F_Xej"
  605.     A$ = A$ + "WOIU^DC^IImob2En[`GUS<g2c[TJDA8a5nV\1cmLknof56oVKhm:FV4hjFS4"
  606.     A$ = A$ + "RGZMJ81KhQTS:B3WTdfS#faV2a`5A5djEKIo\nY5e\2aW2<1JbAo1JBX6R3Q"
  607.     A$ = A$ + "JU4\SRKlJ5gWQ;l#mY\1ma1O\IoMGlMe;fNNXMQeT3h3?^_gW4^W[DRdke9Y"
  608.     A$ = A$ + "4F`B[5VUdWbaWl0<GoM8WM_kaf?BYW1LbYj#>bH=;WKV>UC=I[ba7^5Koknd"
  609.     A$ = A$ + "SdWLZQkeRC;h3j5XcfOcFo;5=4eGLVfLm]EEIBC:NXflbfdKUUjOlfmo3;<n"
  610.     A$ = A$ + "gW3gFjBo5NnBC?3EgNLb>2MCBDKDmM4NX67]]]1oEmU[bj?e\6gagPo:oZe3"
  611.     A$ = A$ + "6aKGn;lVm\0MP?RELg;BfeF2Fj]YZ\WK0[KI6f98_FYD#BAYLZ2B2J]gW\S="
  612.     A$ = A$ + "hQ4G8n8i4EXBSIWPL`NKE^hN7ENY[N:Kl1_b9TGj:7En#?lYTKNZm8?dA7F>"
  613.     A$ = A$ + "oLm97LHGe55eim96M0egAoFNXY?Fcn>B\Q5Xi[3<[;>Ook[jHMQaoaN4\kNX"
  614.     A$ = A$ + "fGZNQ=aJgMS:W8OTPlH]R_[J9R?[LaVF3l=P]W_ZoPe]hklFWSHkbj3KKZNS"
  615.     A$ = A$ + "j;97a?ESR3G[=[L[feVmcfk#2gWE8gld7`F7LD_B=VALb[Omc9OZWmjbWlY_"
  616.     A$ = A$ + "VlKo4GFnMOeK:OnGn6bKo<GANQ[\Oi:7\Oi\cd[La3<\jKI4IfNKC6_iVTZB"
  617.     A$ = A$ + ";EaW5OGgfoMKQaoeJ4\W^;Qh]WBdQ^AEOMP66Qn^:h4\k1C4PK;eVW6mj1Yg"
  618.     A$ = A$ + "oZWh0FLTI?41^HeFDFBFa7]\MES^g[jnD<W_ZNLO\m]V]kcZT43fK[NZ>]ZO"
  619.     A$ = A$ + "hKoKobbghSmRb_oKn\fhKnV?SliOY[;Od7m<fNVlCMniTKN^iT3?AgF_>jfm"
  620.     A$ = A$ + "_?;<FH`8<omEf\_NKhS`lgKc72mIZEYHPM_]P]lNPF4j9G;ngJAV];afRj`2"
  621.     A$ = A$ + ">H`kb]ULGBVa_MeGdJ]m=]8dSKeSU9A[lcNjC=WlaOl[8oTO_?]lolKmIU_f"
  622.     A$ = A$ + "7miToT_`7CnD?eET?aCN9iMOa[;OT7oRb;XL^PkTG[lN_]oKb2S56>3_FnbU"
  623.     A$ = A$ + "0F[ZiH=[blYhgZGZaI2<bf3e?;OO\nO3J];cF;`\Ok`N:UCM;26I[K`K9\0m"
  624.     A$ = A$ + "DBKgKCj[Y:\mFV=YnL:JGA8?nAWAnFOl?Tlgl]nRb?j;lFb?hMo`b_gKl<bG"
  625.     A$ = A$ + "neONiSmT?XlV?nE]nHUg;iN^]oKa2S56oR6\6GlKe[DfXGNHe71aURHDifB_"
  626.     A$ = A$ + "CGioHe;a`6Nn0gYQ;0O`jZ:liSM5L`::c4TJ;<KKmoB]I_ie^2YmlcDnj_i["
  627.     A$ = A$ + ":oT_jWGn>ORGCnCn\_YNlUT?g7l6:^hjbUVKBYn\Bmfngo56;<nGJP?TM\i#"
  628.     A$ = A$ + "]n09J:XOk5a6ma`6d[PY6[8f\1_VUJk=RXIVm]CR_;h9lg`Nef:^[k#lLI?P"
  629.     A$ = A$ + "\ZggRTijYMigiI^YlGn=n:bOcgn;;oiOUgAnJOT7GnVOlGD::Qh_]oMNQa2S"
  630.     A$ = A$ + "oe>F0O\`HQaobS=XLSJYb2U3?e`BDKboK]_ebJ<dgULgbJ_c59KHE;FF_R=H"
  631.     A$ = A$ + "m\kcZN09iHfR\oakGFbM\8a]kk^]n\G=IVVL^Y7Gn[o3nJb?j;mITOhGj]UO"
  632.     A$ = A$ + "l_gk:_hU?RDOVaMKoki2S56oZ<HM\5PZAO=gcMHn<fo`M91\:5;4TgV64jCS"
  633.     A$ = A$ + "XmPm1j^ZZ4aSko>5g^gg_]O8Bo_[f<c#FVnH\W_mdWk4b?l[lYUokOQ?ZlSn"
  634.     A$ = A$ + "6_Sl5oh_R5oHnLlm1^oK[O?GH\`hGe1[m4Z]K`3Kb[EI3_GjMI[3AZ7NFG]`"
  635.     A$ = A$ + "kb_UOo:7[7`RmD<1k_TF4Q9NLggU4UonIkYY_nSm#RlGnmUoR_cWCn<OTWdF"
  636.     A$ = A$ + "3Qg^o^]`HQa_^S0Gkb]JFTjLUN80H1?^o?P\1Ek1S=keJ5g__?P4Vg[Cll1^"
  637.     A$ = A$ + ";3K\>eOcjGcbT0GebE\d38mEI9b7iAO#i?k[m>bgkcljB\Qjmk9GkN\hOaeG"
  638.     A$ = A$ + "c2SoccH9gQ_bmoKig]^o:^cgk[YdJb;3[_B#O3RHjj\GU#o1Rhg6Xb1SNg8m"
  639.     A$ = A$ + "KXPGg:TeNg_?aKEGbVmc;a[ULoB_ED\l9OnWDn9Om?Wlon?nKmKT[aeLgNN["
  640.     A$ = A$ + "KOO__5Zkfocnh^FTkbZ^SXUE^XM:[n>BDlnNfQhgm5]hnkO;bZGD8bm\8gTE"
  641.     A$ = A$ + "N71lNje4ee;[W3gGlM:N]dkejGM\Ojj7eZUjWaGUOUig`]E:go7HAbjMOUfS"
  642.     A$ = A$ + "=C7=;?gi?YlGoMomTObGkc;^OG;jGi[1_o0gg_`c_4mg[E^XPUE]X`Dm#AXS"
  643.     A$ = A$ + "=;^]8Oecii_bOF;<ngWSEM719g_nOMI9<WdNnGB>#?O4iclRo?T_oWioOi?h"
  644.     A$ = A$ + "]ooENQcoIT#FCRbM_XgKVWTh#aJ3Qmk]EMg;bjYSdO\3aceHh2?E=7dK_FfM"
  645.     A$ = A$ + "\83c\6hKYJhImbB=cgIai9OnGm5To\Oo_Xl1_f5nejJaWggM9^o1nIkGo[Aa"
  646.     A$ = A$ + "1^YcI4iR;DBaWVUaZlAT;]WGGNZ3oQUSek39QkEJR7;mG^m<Y56okWQKgcM:"
  647.     A$ = A$ + "[O5;oFg?B?bEj^`C9?fQnlbCOR_RlVgho^leoHoEbgngn_DnSnlo_UoX_`oP"
  648.     A$ = A$ + "LUmm2BVAF]\b?`k=man0D]4hK8SigCN0Khmb^?[GbkaR_Kkn\FBH=9inB^?a"
  649.     A$ = A$ + "cEo0bJGbMJka?WOjaTgn5N:i_k?lkHk5goZlikikKAROZ?9_n]FThmmiboS_"
  650.     A$ = A$ + "[J5BYaEUDNd]9mUnQT7^_?VldCo>bkldo0iKl6o4ico4O;ie^dWEVXY;;5U#"
  651.     A$ = A$ + "ojL>1XS5hNmOT6nL_g]TefgR4jZMeSl2OiA:k[n7Fn#Wo[;OogATof_]XLB4"
  652.     A$ = A$ + "ioW_jO_lSojo3bO^NO6oMOOANU7iC8n\\#o=neXK;nN=M4h;0nDXGOcnhV]o"
  653.     A$ = A$ + ":0V1^F`]Re]KbA^EY[jZBRN;19N[H4ZUaIk\IiSod?Vl]Og?i_dOfNLW_OaO"
  654.     A$ = A$ + "eWEXgoRT]\d59a_nU9U4O8F?6i6WnLB7I<XLQ^NJi5fkk:Ojco7:OcWk7;om"
  655.     A$ = A$ + "o1RlGm=nkUod?mOYlGlk9bOcgETo\o?]giMLEaifNODA5A1YgfKjmN_GDA01"
  656.     A$ = A$ + "a>R8XRPm2:2F0EDA5DDQ8R:4;a6J\T#454;8H;RRUH_5=6;97=J<5SWC<Vbg"
  657.     A$ = A$ + "gWIllNOolniN_WkiVLDC>Io7OIVm\ic<?kiIn=[eJVWWej6BSWoXaPfl7clc"
  658.     A$ = A$ + "iOFAUnhO<Zd7oi5[eEC<#hgPDnHeDa6\E4SIiCHeLXboH>MU?2n;847Bl2A7"
  659.     A$ = A$ + "n?c;nR_7n^G^]O#lMOe]n>lafPN]eNUV?fnhP=4TK>9l]AGii8RkFK>^HQIb"
  660.     A$ = A$ + "c]:SKOKUWWEnkR3HVdk7a6c`b>ZQLM\XZEE6=EGeo_jhIUjZSC]A=lAX=j[S"
  661.     A$ = A$ + "JbTj^CLhgMNdL][PC^WgWe_hUcdkgRhd[mci;Z3^Ke?3^YhlcGo3`;nIhK#n"
  662.     A$ = A$ + "Lhc4jU78d9YekIREJ78jgZOkeR?ElZ7[eY]X\]ZAGMD9>gfF#6MI`\n\F?7M"
  663.     A$ = A$ + "igT;]U_5^UDO]0Q\hWOlCiGNR#W8^4#ZOo7Nh?c3_fGBOR\o_fJ_Bie<9TZG"
  664.     A$ = A$ + "l^JY2I=QYJe>iaHU3VI4J;djB;=G?]AO]JSlL1aN3eF>OT_TLV45=SYloha#"
  665.     A$ = A$ + "I;D7c5[hT8FO?4JSXDX>S:2[IW;:M>cfW]`#JSldk\Onl;f<5?UlIiS]B^c>"
  666.     A$ = A$ + "oA^OERC;=`;?Wm\OALOTo:l8ai[70?o^R_CHc=[DG:>XO4_akgEaold7oM5G"
  667.     A$ = A$ + "eD=2b0eI7cIaDaHF4=]RKaINk7c;>]X_Fdgbm5l`o>OiOgVbSQcGoUILYTa["
  668.     A$ = A$ + "ef[c:UV3Q69WO7Tb=:NK_eHQ#?8I3AY>M#F_XK[K1V:FGBg8EKNUbQo7H[[C"
  669.     A$ = A$ + "N<_o?JOKCKJ=N9lUbGQ^Xk:DS<R`Bfd<CTZFl`hN=o>l;?HoR[m?1?nje`]J"
  670.     A$ = A$ + "^AVG6IaLC^H^dVO8gHCO;GO3?QWLPOnUfMo<YcM_POnCQ_mJ`GLNaij#c67="
  671.     A$ = A$ + "XC_akcEaoLX#lWd2?HR`LeYXQ55gHWKSU?ZYAUCZ6Ng\KRk:^Wh3ZAL[`39^"
  672.     A$ = A$ + "Eh9oN^kQO2gZn7`C_b?a3?oCiR7lj<l46i[ef\GfJ=>JV9bJ4;eC7iliPTOF"
  673.     A$ = A$ + "6XQjb8mImJC;Uc=46YIK`2]K;e\QEb5?DMoWb3cFXI[`=3d6KD_EhD7J9NYU"
  674.     A$ = A$ + "J4WiZah3eDfhTSRJGd0Yi]==>K]cSGlUe;<Jf<obGN<Nd7G7Oa7O:Fj\bS9g"
  675.     A$ = A$ + "_LHKcN_DOAWQZcY9^dkl8Nh14WO>dOSkdhMh6kkch3gfWAEUMI<_MAPAZknK"
  676.     A$ = A$ + "lnMEl?7>dZfBPJgN:8e#iFe]0N`AZTM^`ia\kCQ\P4[TM<i;c^ck6LfbO<Oj"
  677.     A$ = A$ + "NnKlYemMLcJO<?hh?SZFfNhdknS#YV_NmUfM[]D>OKYD7]5f:J_lHQg=[\03"
  678.     A$ = A$ + "JG[AKQ?ABiQK3KGKaDMe3CkPVHH[ESgMi5a5>bN82OnoY?Tl[L69eCb;YhXK"
  679.     A$ = A$ + "V[91[[8637J=_m42Sj:I0L_6W=gkXicm>GIlEgO[2S1WUOn7>9lg^0OkWO<n"
  680.     A$ = A$ + "nWLCflZF6AHGH<VHV8c9aRISSOODm<>;=EfShfEoCLUZoH^b^nL>lV^?38\l"
  681.     A$ = A$ + "#?elR>Xjm5n76\El7o4nBdd6V4ob=F3OJm;QKDcJ85_BVDLOBTMGG55VdfIc"
  682.     A$ = A$ + "C]A^f>o2^cNo:NnUQWLfo6goDo5Nnmn[_fKcBj3C4GgK^^M45MD;iee[=ZS9"
  683.     A$ = A$ + "2oZTd8Veaf;_MU6J2>Y`DiadkNfD5laWZAlaFc#A7J5CKX9a\C=16X3VAdjY"
  684.     A$ = A$ + "69hTJ\TQj5k]T1b5fi4hV=<=N`i;P_ocFU#G8\K`A4L2h7KB\lJlSOg7aGnP"
  685.     A$ = A$ + ";BmkI7hU5^:lA]gTX?9AFA=;6RWIAiSYFZ^`CbagDCLl=ONFh4Z45]>HdB]G"
  686.     A$ = A$ + "OelHElK7G4JSdlG9OaA;0nle`C?o:iA7_BjU[AChV6;mfcABbQ?6VB:ibLC?"
  687.     A$ = A$ + "?:J<cWBVD1DbTW?W_aSce?aYO]gVma174n#I\`^Q9b_O>7TlebDSOYM3QoD>"
  688.     A$ = A$ + "Zd4j#;K9VJPAdm>5ZLNLXV=^2^baZC^fJ8EgJM#HCaEafkEkK9Cb;Si#EdK^"
  689.     A$ = A$ + "F=CP[__\hnGLnllW\6nUG\MQF#hLicZVOiYE3Oo14O^I1GQ_kIWRSL\Zh^gi"
  690.     A$ = A$ + "Z4C`M1g=aALB;[9AokUPn`TjOF<VN<LFJFiaHkk`A7eDmlZnS8Q8lYH13`7h"
  691.     A$ = A$ + "SG=?o2;4^ckbM>HiDBfiAJM;M2aa89BORR4R>NB9^NB>3KL<THSW5<UYB]KI"
  692.     A$ = A$ + "CL]CNlGk]IOM`9l`JKUm_BQ86LYLbVTV`156Sn]]ebcMMSUNfE6H83ZWm6cd"
  693.     A$ = A$ + "X]LX?HMLgcOHf#95PCjf>2d#=`Kam6FFRMR3EDjRH_W<Og]4onOdZ5f8f1lL"
  694.     A$ = A$ + "1oX8h[ojFi^Odli>WJNl9e?7^ga;VWod6hWOnYYnm_AFAY5Bme^Gf`:F=;LJ"
  695.     A$ = A$ + "cQI<j9aLcNJ\l2G4_gk\NVBJ35gEJiKlnIEloN\Fmfb#LACfbh2W_MocS?Je"
  696.     A$ = A$ + "YbEZJFRH:G=U>[L9_\V<i=Ui#ni:R79WlX`iV7c:W\II;<OFn2W;Gn87T7Li"
  697.     A$ = A$ + "cmJ_MkSCNPcF8UkMd2_Ld2\EYnHY9M4CdYMhSM>Q=2MQ]:K76ZM[aAM]EhcO"
  698.     A$ = A$ + "KYf:;E4oa7`]?i9Hb9W<fZ^Jh_QZaAGoTicK^4nV_Fh7egG9l=[7NQ`VaCn0"
  699.     A$ = A$ + "Nf5:QkOTYb][O4dLUmVV:O`LXB72W_VliBkOaLZ3l><aQgKB?eD8Sa>NVN^i"
  700.     A$ = A$ + "Aa;^D:KI[T\W#VdWhkiKlnHEl[7Ej3Ej3ElO?FZF;8g^H5k?_n`aFd0I3S?H"
  701.     A$ = A$ + "FfHk4UWc04nDk:Nk\=h_GNC_kN?XWa47Y=d49a4SSQVL_8oYUQ\n#B7mj^Mk"
  702.     A$ = A$ + "^=^PM6I]LNgE:OnhRMVRW>K11iY[HHKd6mEG3dA3e#gfZ6:KYYHM[<RSGgJi"
  703.     A$ = A$ + "C_`NiQGjSh2k[>bOTmQA5_GLi6G<goB;SOlG4aJ8Q#OlEWNAlX3E4gHkIbIg"
  704.     A$ = A$ + "`#Xj564K:GgISC\c\ld2RE<a8HEi6?cJdaCRAk3AeU`8VHRQ1Uj`8Y1U6N7P"
  705.     A$ = A$ + "ZlAmo>PRFd2V#4fb7TK2\ddlSlC`Ab^G>Af38#jN#^:?FVLgFK9f`k4m;j^a"
  706.     A$ = A$ + "D6o`Ha5<M6mPk_L]E[Ve]:\GWo[W;4_:`LAl6fKQQ4Qg1SK:\3?\D9>IZAH]"
  707.     A$ = A$ + "`fQD^aBQfM0Ce#O<#mf;R1AMiiBXQZ9F_]j`1[Z4^nIf1glDkW6N_EcnZ\0J"
  708.     A$ = A$ + "^jBi7^kNQ7G;oU[D0gYiY;\UT7WM;SPj;=9FgTj<ETIXTC2VC6aH4Y7\i<\#"
  709.     A$ = A$ + "\V9d3kIHMe66BdN;GoXS8h08Z8STXSBE^cjOW#J><TRGVCYS8J6GdFBjQK<m"
  710.     A$ = A$ + ";03X7nI2ahUM4^;>Bdnj3AhV[dI_mD^nn]RRV]L=QL6S9MVj_ba9n_6\b03X"
  711.     A$ = A$ + "WM>2R9<o9BO3TXm>02c97af>Z=1k^]HYA]3mD_eXO;dV>XFK#_F[6jeBe`=3"
  712.     A$ = A$ + "\RRVhDhL=^I>C3EbU?jNHk[Na\m:bUVfebhNWN;lCg[6NjEF2gHoIC3[9AFk"
  713.     A$ = A$ + "TmWb7_OTC_]WafE[8e8\Vdj\c4Wc:9Ao\W`]DMB><79i^nbjLHG3=dghmUZh"
  714.     A$ = A$ + "OmHVj]RP<F36NWMS42eLRf;M8nPEBL1J5NKRf4TEVAbAfIjI0n9OM#ojB#DB"
  715.     A$ = A$ + "NCV9VB2\Ri<3L#LoLYank[dfX^JA2M;J6LOj53\7a:?NMS=#o8YXj2fd1=aX"
  716.     A$ = A$ + "Ff2dAX3<DCeTO>^J[VVHBKdW83aIiL;jV:IUlAkm#DgVF3KHa5A3K[J^hQ?2"
  717.     A$ = A$ + "7Ng[VVgkZif=G9gnHE`;^dJi[?EIRh_bU<jRfd77DSDlGOjY[6#`:<R#=G9Q"
  718.     A$ = A$ + "HQhLT;>#o3dI:9ka8?VW]AOMOSg?ZRGMh^^JBLRkofIQM4G4gG<8G=T`Mg<2"
  719.     A$ = A$ + "g>cXK^H?A8^NLb3:AiJBlTTZkiSJ8<Wa?26GRmiEJkBYAjRK>H=M=T0H`m;N"
  720.     A$ = A$ + "R=R0UcSEVeQf#L1k^LM<cJ]J3N;^^eH]D3m54RgN`0R;9:8g2XlUG85=gL9Y"
  721.     A$ = A$ + "hk;m?VN#4Nh9^HZi4C0MQDjI_YPi<:>DM[TOjaO8odm[W_AXCnbVZT7L\ec>"
  722.     A$ = A$ + "Gl8H\AI1QIA;`OCe0Wdf01V#0FH5>:^W##FZPaf_G]onEa_?`N]dR0\bBldN"
  723.     A$ = A$ + "5hRm6QO^[4oLF1nZd0leHM`>=J1EEAa\XY=JiJ2cXCX7<f4k5>Kd[^JTZ[fH"
  724.     A$ = A$ + "19fCAl^RSePjOl4X7fSi6dN<G?=U7?^jd6e`4]ES>:\KH\6]6OmfBV#V3REE"
  725.     A$ = A$ + "AiTm4W>Y=hASS^H=^jQK2l15VY45VX?VY_>XQ`_;e5a][_2e`BKESL7KTLh]"
  726.     A$ = A$ + "_8hAGS_nRO8WL7[Wob9g3=]SRa7UZQ;6dB2aFG5nRZ;>ZK7`9mjP`fEg4nG>"
  727.     A$ = A$ + "fghmMZhe3:JSfb;Ma9[`Ik=Ch;O784k=W#]d4\GhgbNfdbIlY473Y7ME4g^g"
  728.     A$ = A$ + "HVV]jEFKYc1j;m<Z>C8nlbWOVDlhFHX8^KMJ[LmDCJnbZCk5GO;d7FIR^Tf0"
  729.     A$ = A$ + "CVUDFQ<gU<KR<nNadVmBXPU\JfE3=#=7md\nMg0E\igWMEOmDe^f=[FhWeD:"
  730.     A$ = A$ + "HbHQ?M4m]BXAdG4SRaZaKUKfLoCO>hYO?gnT7S[O\?PM_i5:RibI\a0C`8=d"
  731.     A$ = A$ + "6kdYeH_N]UU>g5n6_?C5_i#QnBj3A<8VZ?1J]Adlnf6QjYibeUVGI7c>fNii"
  732.     A$ = A$ + "iD?jBh4Zg^P_2]QG>H9^H]9be=:UjY16[M[AG=D7C<BM\eFMIfcNfDdR;S9>"
  733.     A$ = A$ + "[i`KonEa1>k7cf?`iXbJKVi^bgU9^`]BfUnNTc:f>I_PgVl;NM\^ZZVe^kZH"
  734.     A$ = A$ + "S7J7DfF:FX15f4<Y5X[j]4k<b6b8e9acOdg`M_LClYG]FZIWUAkJC;4jafS]"
  735.     A$ = A$ + "6X>nJ[ATn0OmmL9Da_?a9Cd3W<#;LcD]iTeoN_b>>Bek3Yi>K<Rh<jT_NBOS"
  736.     A$ = A$ + "9BjKgj<1iQSbJ4kDX7>XD?ImQAJY>FITA<T1g?N[UF8iG`BIMKk0La7n2Z^i"
  737.     A$ = A$ + "?QL:[:VjB[RIENMTcbf3S[T3AZ5]76Aaea4F`^IJ;XJ6k\G1S[`UcX;J9<oe"
  738.     A$ = A$ + "D1e]ceBZm9LiaYRf]AGd\56Ai5of`gm5lIgY1^oWMD6N63UF8l;CY1_j\KZR"
  739.     A$ = A$ + "oHQ:mQ:mQ:n_75M\MHUn_lMoehNff[dSE0^HWllT=n>5:M90O8<_MWn5CWUg"
  740.     A$ = A$ + "^D=hd1Ce5K<D;2c;GXoae3Ve<W9;N9;UcNiW`]O2Dhj?1SYXJHfKl\<VUD3Y"
  741.     A$ = A$ + "Uoka8boPT`<?69Dh98i5d<Y=SVHBck4<U5M#6G1kVa]XZIXCKYLh6f3=^k=P"
  742.     A$ = A$ + "56eJJK;E73dd<6LO6\lkhQOnFl]oe;BY[OI<c5??DX#;6i`Nm=GREaO<XQJO"
  743.     A$ = A$ + "?R=b0OU\_S:X08jPmU9>\DYGA61A8\Q4OW33g\b<l`6UHRF]6g\dHiLVh8C\"
  744.     A$ = A$ + "g<W\bQ]]iM#eEO#^kG2Oh=PAE#3Tib?73^P6Id;[AVbZ?59=eSBlCiD4fD>2"
  745.     A$ = A$ + "A?mVH`chR<bIOBBKVe``bOo4ohf:9WmJYb=\9fmFG5QhU9H^ajAkJQ6<VTCW"
  746.     A$ = A$ + "Rc=;Ff267?h1=ck^gM`GccYU]B=fnFGkKln3Elk;:KacW5Vgoj7WEniR]T#g"
  747.     A$ = A$ + "j:9g[H`FSeEN^_JY1j8?gHUbo2BiI1g]dDLg<3ID9d;FOa;Tb;\8fg^f7Wl4"
  748.     A$ = A$ + "GS;MGHeeN;QODGPDVkIH`;YI6bKM#6hl[UQ?W[A_bmjdYIN2RJFWTT4JS1WO"
  749.     A$ = A$ + "M<nB[SaDF3doID?I]d3CQ5^4FEYcS0ME;<^S]4]JM[InCJb\T\67KYTYcb;<"
  750.     A$ = A$ + "Kfb>g>?SOR2Wg<Xh2ck=NoQ:nm5A6L0L]V?eoBgWMbO?X[1k33Z?aBhnhR86"
  751.     A$ = A$ + "4=#7eE3SkP6biH1YHBTZm7Bi>gdjI\\`YT9GXamCCeD=kJ[Ea^Zn`LV?5N[?"
  752.     A$ = A$ + "hR<fbn4bh]O<QWi^H`;kPTjBKP1>ecCLCnb4C1WWHVoYY_cj39e2ZUQ^TM`P"
  753.     A$ = A$ + "4nR5LjkTnVekCfi<3B;iHaTf[6jf^Gn<S[H^cQ6OWE#mED2K_d5`#6j#IjcN"
  754.     A$ = A$ + "F2o<Ooghm5ZhgGHU2c`LmeWC^gjo?fVM6If_imKXNiTL]VEOaeT:d[MhREV:"
  755.     A$ = A$ + "Sg>HSL>^Z[ni3Ma7_86omQ>kZ34UW^#F3I0Dk6F9Od7nQ\Qe_MZ^YkAIkkZT"
  756.     A$ = A$ + "jB^29<g[CDcHodoB[U1FbN8UYOERM:WSPbm#4B^=BOVaa9iI_KBE4ga0:h04"
  757.     A$ = A$ + "i4KVHW`^X_39929H;aEcK51j[eTo\bTgMY;TZFh\HmC<3:NTSVNdUh8eT74A"
  758.     A$ = A$ + "kY]XXEojc[eZhOo`9K]AhcSA4Rc^ChNiSlf\BO3o=]?]aHma>A<gnjTEdU0M"
  759.     A$ = A$ + "WPmbA2fCW`Ck]P0LcN2b=78FQ=;9Rd7gXc^k4QkRmhUB39DW=Q=\RBiBWiBD"
  760.     A$ = A$ + "aFJPInfe8kOe`FbEYo5f03N5e`PGj>I`cZ9joL?>mYXS#gWk1XgC^6B:W]A2"
  761.     A$ = A$ + "I]J6#>KWn<aj9b1]L\d1[a1KeV5?ma`6FeRIkEF>;NJSWgJL3S:6O6<iNe?:"
  762.     A$ = A$ + "LZiaafg1`<Qm=;KW:mQ:no7g]a>LFY5l]Onm9]ng_OCk;[<DGiH`kTON9d7f"
  763.     A$ = A$ + "Ahni:a6V?4K4nmB2gOjMDQAT1j9n9R9G:^L?\d8lcNU4R;FPOfZ?1hPU4\KN"
  764.     A$ = A$ + "#3eMJJ\aKA6chmHXCI[<R5^CBJ>[EH;IETBQKP1]`gE4;bV9QY_6B:k:HdcL"
  765.     A$ = A$ + "MTF65CJSMadmN<A\db09ca<1f`:G6[^hlI1cHB<c<79iWiXHJYU2cL43SZZX"
  766.     A$ = A$ + "LnXSNH\GQZi?^:n?SIMDjnl^PnJX9ITFZLccO6igam_fmW[F9=n^\W#ldEjJ"
  767.     A$ = A$ + "#nABm<6B<^>Q_>K9QhU3hU3:UGgOG5j2k<3OMdLlfN5RhW]V^j[Sh_M6#`>K"
  768.     A$ = A$ + ">QjZm4Z;1bD7k\hlWo[Ho=n9\b]M<ZnTgV]fdEXhM^K:LCKUY]dEA^5G1U]Q"
  769.     A$ = A$ + "gWe\iMcBO[eaR:\DVAVIab:HN\aU_2:IfiANI<BZjM:W[fdQhC?g9iaObehJ"
  770.     A$ = A$ + "Wn4\[]\aghm1ZhgghZEf#0^j^LndAjiaNk;NN>JMebBWoL9[A>LB^WaCOS^["
  771.     A$ = A$ + "4C819\54Rlj3\7MWTR?>iaUn#CX_biAT`ma3IMQdkg#JmH2=#I2f374J5_4f"
  772.     A$ = A$ + "DL3G]aDlcEK8DOLV#lf9Q]6G9Jag5Yo^So2MCTnI3NHUfhWM6SWFI>FYWnde"
  773.     A$ = A$ + "#SViUOaLZcLEJnLGUKnI?P7md7cCOf3iNgkZLkKM1^i=>7GlD7SJfa6IeRH^"
  774.     A$ = A$ + ";INCQlc>=:MNIbK=W<I7[]Lfi6G3[m]:RRWM^<n1WlKlckZh?6XBOX2El?6;"
  775.     A$ = A$ + "4aT7\k^:WgeR;l#IDY<#:EhObfOWe8l1YBZNcKBNm=ofUcj:[Di_KNCK:2oO"
  776.     A$ = A$ + "6=SHP3#>V3OLdFlbN[o?d8B8UWeUd7B?SGoMa6R><Ya_KXh[;RH?Lg>i_[gA"
  777.     A$ = A$ + "62a7A0hWCRh?L`0R;<78^#MBF[4O4NPKfJ:N8R9aMk\RQWb08cAVZ86nRHgK"
  778.     A$ = A$ + "\DZO7E#MKY<FG9iAIcIBDD>SVlc:M:8gAaFGe2XXI>B6o#kYL]gAZFklVnl\"
  779.     A$ = A$ + ":nS;BiR=W=G1nhPMbiH:?\a:LeBcUoL#^i2Mf?O8b0lC6Ye3eCgU9<_l#ncB"
  780.     A$ = A$ + "d9OmVX2fOiH?TFfkXj\\]5oLeAQm2gYC1hSlBO4aX4dOG7=P^73Yd[^Cbm8:"
  781.     A$ = A$ + "6D_4ooQJ?M;H[aGkK7NHM[9<O=1g\^m4KP>B4^ZTHme>RcC[9Y`lPAdm88c4"
  782.     A$ = A$ + "SSLB]oTARmDnI4?g<73;OncRh3oEcH2#5oi6YLOK8Nh6>Z`DI=R_>J_lBWDJ"
  783.     A$ = A$ + "6^HQBAldf:_=YeUf^o>kXlfTdFfJ\Qb?3;Yj?PdH2d>COic:fFc<BFCH_BC`"
  784.     A$ = A$ + ">56CPNh2Ah_gbnQ5X#k8=n\lcNKXc2O^6k0k6IVFgYlR6_`FEfTNB1Cj3<LB"
  785.     A$ = A$ + "X[NARMe7BY[nbXkIW8mHSPQ;dDY5GG8cTCP5TE6DbdcU1d]XU?V:eF_gHW3E"
  786.     A$ = A$ + "Q:n]Pi6Y?fKQ2Q_CF9KOBB_e5QmW`5jbN5Z?TN_STdB8LbJDmQgYRlIFi<26"
  787.     A$ = A$ + "CjmS4jNh<dn6=3;Q^c4BO#<ndCQY>nA`85f=2ChSgKjOGZ#5o[6Yl8ZT]Z#5"
  788.     A$ = A$ + "JS8m;02aI7807\2_M`4lbAc`K?]S>5QOTDBmUT7#OIX9gOVhHBWTjG_aF[Dm"
  789.     A$ = A$ + "N;DaON`LMd3GDJ>N:lKc=QoF^H_MhTS>SefJ7:\`F\aF7a25ZZO0Z#5oOAOM"
  790.     A$ = A$ + "EY7DQ:DaO^ho3<B9%%h1"
  791.     btemp$ = ""
  792.     FOR i& = 1 TO LEN(A$) STEP 4: B$ = MID$(A$, i&, 4)
  793.         IF INSTR(1, B$, "%") THEN
  794.             FOR C% = 1 TO LEN(B$): F$ = MID$(B$, C%, 1)
  795.                 IF F$ <> "%" THEN C$ = C$ + F$
  796.             NEXT: B$ = C$: END IF: FOR j = 1 TO LEN(B$)
  797.             IF MID$(B$, j, 1) = "#" THEN
  798.         MID$(B$, j) = "@": END IF: NEXT
  799.         FOR t% = LEN(B$) TO 1 STEP -1
  800.             B& = B& * 64 + ASC(MID$(B$, t%)) - 48
  801.             NEXT: X$ = "": FOR t% = 1 TO LEN(B$) - 1
  802.             X$ = X$ + CHR$(B& AND 255): B& = B& \ 256
  803.     NEXT: btemp$ = btemp$ + X$: NEXT
  804.     btemp$ = _INFLATE$(btemp$)
  805.     _MEMPUT m, m.OFFSET, btemp$: _MEMFREE m
  806.     BASIMAGE1& = _COPYIMAGE(v&): _FREEIMAGE v&
  807.  

Offline NOVARSEG

  • Forum Resident
  • Posts: 509
Re: Solar Flare
« Reply #32 on: December 13, 2020, 10:12:30 pm »
Dav

IT WORKS  THANKYOU. 

Did you use photoshop to make a red border?
****

Warp drive Mr Scott
Ahead warp 1 Mr Zulu
Accelerating to warp 1 sir.
Warp .7
.8
.9

Offline Dav

  • Forum Resident
  • Posts: 792
Re: Solar Flare
« Reply #33 on: December 13, 2020, 10:25:59 pm »
IT WORKS  THANKYOU. 

Did you use photoshop to make a red border?

You're welcome. No, i used another image program I like called PaintShop Pro (v4.1x from the 1990's). But about any image program could do it.

 - Dav

Offline NOVARSEG

  • Forum Resident
  • Posts: 509
Re: Solar Flare
« Reply #34 on: December 13, 2020, 10:29:14 pm »
How did you get the original?

Offline Dav

  • Forum Resident
  • Posts: 792
Re: Solar Flare
« Reply #35 on: December 13, 2020, 10:39:10 pm »
I ran your program here, caputured a screenshot of it, pasted it in paintshop pro, edited the color, saved the new ship image, and ran it through basimage to get the new Bas code.

- Dav

Offline NOVARSEG

  • Forum Resident
  • Posts: 509
Re: Solar Flare
« Reply #36 on: December 13, 2020, 11:04:11 pm »
Thanks
Do the screen captures produce bmp images?

Is it possible to capture you tube video images?

« Last Edit: December 13, 2020, 11:07:22 pm by NOVARSEG »

Offline NOVARSEG

  • Forum Resident
  • Posts: 509
Re: Solar Flare
« Reply #37 on: December 14, 2020, 03:15:45 am »
Warp speed


Code: QB64: [Select]
  1. SCREEN _NEWIMAGE(1000, 800, 32)
  2. 'SCREEN _NEWIMAGE(800, 600, 32)
  3. 'SCREEN _NEWIMAGE(600, 600, 32)
  4. DIM starx(1000), stary(1000)
  5. DIM sz(1000) AS DOUBLE
  6. DIM speed(1000) AS DOUBLE
  7. DIM x(1000) AS DOUBLE
  8. DIM y(1000) AS DOUBLE
  9. pi = 3.14159265358
  10.  
  11. pic& = BASIMAGE1& ': _PUTIMAGE (0, 0), pic&
  12.  
  13.  
  14. _CLEARCOLOR _RGB(255, 0, 0), pic&
  15.  
  16.  
  17. '_PUTIMAGE (xcenter% - wide%, ycenter% - high%)-(xcenter% + wide%, ycenter% + high%), pic&, 0
  18.  
  19. wide! = 400 'half ship width     '100
  20. high! = 240 'half ship high      '60
  21. xoffset! = 400 'offset from true center
  22. yoffset! = 240 'offset from true center
  23.  
  24.     ' _LIMIT 10000
  25.     a$ = INKEY$
  26.     IF a$ = CHR$(27) THEN END
  27.  
  28.     'toggle full screen mode
  29.     'IF a$ = " " AND f = 0 THEN _FULLSCREEN: f = 1: a$ = ""
  30.     'IF a$ = " " AND f = 1 THEN _FULLSCREEN OFF: f = 0: a$ = ""
  31.     _FULLSCREEN: f = 1
  32.     stars = INT(RND * 100) + 1
  33.     IF stars > 80 THEN
  34.         s = s + 1
  35.         IF s > 950 THEN s = 1
  36.  
  37.         rad = RND * (pi * 2)
  38.         x = SIN(rad) 'get direction
  39.         y = COS(rad) 'get direction
  40.  
  41.         starx(s) = x
  42.         stary(s) = y
  43.         x(s) = x
  44.         y(s) = y
  45.  
  46.         'Set size and speed
  47.         rr = RND
  48.  
  49.         'large photon
  50.         IF rr >= .5 AND rr < 1 THEN
  51.             sz(s) = 1.4
  52.             speed(s) = 1 + rr / 170
  53.         END IF
  54.  
  55.         'small photon
  56.         IF rr < .5 THEN
  57.             sz(s) = 0 'returns the smallest photon
  58.             speed(s) = 1 + (rr / 100) + .0016
  59.             '1.0016 'slowest value
  60.         END IF
  61.  
  62.     END IF
  63.  
  64.     FOR t = 1 TO 950
  65.  
  66.         stary(t) = stary(t) * speed(t) 'accelerate photons
  67.         starx(t) = starx(t) * speed(t) 'accelerate photons
  68.  
  69.         cx = starx(t) + 500 + x(t) * 50 'used to adjust radius of center hole in starfield
  70.         cy = stary(t) + 400 + y(t) * 50 'used to adjust radius of center hole in starfield
  71.  
  72.         IF f = 1 THEN 'fix aspect ratio of photons when in full screen mode
  73.             cx = starx(t) + 500 + (x(t) * 50 * .7)
  74.         END IF
  75.  
  76.         r = sz(t)
  77.  
  78.         c = _RGB32(255, 255 - (starx(t) ^ 2 + stary(t) ^ 2) ^ .5 / 2, 0) ' <<<< yellow
  79.         'the square root stuff gets magnitude of position so the photons go from yellow to red
  80.  
  81.         fillCircle cx, cy, r, c
  82.  
  83.         ' _PUTIMAGE (xcenter% - wide!, ycenter% - high!)-(xcenter% + wide!, ycenter% + high!), pic&, 0
  84.  
  85.  
  86.  
  87.  
  88.     NEXT t
  89.  
  90.     LINE (0, 0)-(_WIDTH, _HEIGHT), _RGB32(0, 0, 0, 20), BF
  91.  
  92.     IF f = 1 THEN ra = 1.428 'fix aspect ratio of sun when in full screen mode
  93.     IF f = 0 THEN ra = 1
  94.  
  95.     'FOR b = 0 TO 55 STEP .25
  96.     ' CIRCLE (500, 400), b, Ink~&(&HFFFFFFFF, &HFFFFFF00, b / 55), , , ra ' <<< adjust to shift color over 50 instead of 500
  97.     ' NEXT
  98.  
  99.  
  100.     xcenter! = 500 + xoffset!
  101.     ycenter! = 400 + yoffset!
  102.  
  103.     _PUTIMAGE (xcenter! - wide!, ycenter! - high!)-(xcenter! + wide!, ycenter! + high!), pic&, 0
  104.     wide! = wide! * .9995
  105.     high! = high! * .9995
  106.     xoffset! = xoffset! * .9995
  107.     yoffset! = yoffset! * .9995
  108.  
  109.     ' _PUTIMAGE (500, 400)-(700, 520), pic&, 0
  110.     _DISPLAY ' <<<<  moved to here so sun is draw over photon formation circle
  111.  
  112. 'from Steve Gold standard
  113. SUB fillCircle (CX AS INTEGER, CY AS INTEGER, R AS INTEGER, C AS _UNSIGNED LONG)
  114.     DIM Radius AS INTEGER, RadiusError AS INTEGER
  115.     DIM X AS INTEGER, Y AS INTEGER
  116.     Radius = ABS(R): RadiusError = -Radius: X = Radius: Y = 0
  117.     IF Radius = 0 THEN PSET (CX, CY), C: EXIT SUB
  118.     LINE (CX - X, CY)-(CX + X, CY), C, BF
  119.     WHILE X > Y
  120.         RadiusError = RadiusError + Y * 2 + 1
  121.         IF RadiusError >= 0 THEN
  122.             IF X <> Y + 1 THEN
  123.                 LINE (CX - Y, CY - X)-(CX + Y, CY - X), C, BF
  124.                 LINE (CX - Y, CY + X)-(CX + Y, CY + X), C, BF
  125.             END IF
  126.             X = X - 1
  127.             RadiusError = RadiusError - X * 2
  128.         END IF
  129.         Y = Y + 1
  130.         LINE (CX - X, CY - Y)-(CX + X, CY - Y), C, BF
  131.         LINE (CX - X, CY + Y)-(CX + X, CY + Y), C, BF
  132.     WEND
  133.  
  134. SUB cAnalysis (c AS _UNSIGNED LONG, outRed, outGrn, outBlu, outAlp)
  135.     outRed = _RED32(c): outGrn = _GREEN32(c): outBlu = _BLUE32(c): outAlp = _ALPHA32(c)
  136.  
  137. FUNCTION Ink~& (c1 AS _UNSIGNED LONG, c2 AS _UNSIGNED LONG, fr##)
  138.     DIM R1, G1, B1, A1, R2, G2, B2, A2
  139.     cAnalysis c1, R1, G1, B1, A1
  140.     cAnalysis c2, R2, G2, B2, A2
  141.     Ink~& = _RGB32(R1 + (R2 - R1) * fr##, G1 + (G2 - G1) * fr##, B1 + (B2 - B1) * fr##, A1 + (A2 - A1) * fr##)
  142.  
  143. FUNCTION BASIMAGE1& 'ss.bmp
  144.     v& = _NEWIMAGE(200, 120, 32)
  145.     DIM m AS _MEM: m = _MEMIMAGE(v&)
  146.     A$ = ""
  147.     A$ = A$ + "ha9kmN7OMMML__<FfZ;f[Xg88018189010;XgkmN_gk=R218H_g[BRRBDmZU"
  148.     A$ = A$ + "TU]T\USSU]TKa]4G_>fgHW47OOa>UKJ_g=ggLW_c1KN]ML:f>F<5l7[?kcIO"
  149.     A$ = A$ + "Jkci<oFc_Oc<[I]X59bRFH\`HQa2Sg36N^l5;N]RUH3_GiB5?dSNZ7IheZFV"
  150.     A$ = A$ + "h_K[FlNe;Gfljme^=S=hUKbjmH]B0NZ7mbM9#_m#On;cNohagJ`[g>^U0mCl"
  151.     A$ = A$ + "AO?R:dPT#lHMbVdWK2K=<9HgFS\m=4P4M`1:KH][bNM1]^E;Qk[GBHnhY4hZ"
  152.     A$ = A$ + "F^4VnLgTnJ2GO_mj1^Gamkm^\SlLmhn^KackoN^]oKg2SocoH1la2So[h0KG"
  153.     A$ = A$ + "ODK>OEKa0maMake]BamE]DaGgMISSm]_[MUbjeK7Z_N:Q[foQhS76>84olB2"
  154.     A$ = A$ + "eO_]WWO[KEB#Nk^4eVgXMNW7KSj[IS1h]4JPnJ3N>1hnJ\GoffHPbFgXobf3"
  155.     A$ = A$ + "Mm669^82GRISK``495aFThgbVU\fE<Bja\MIGKJSBT1j_TbfgVTKLkBb;nM;"
  156.     A$ = A$ + "I4MTfXa2bEZ;g\TDdGC>jc_dDBDfZRQfYnNaaM5B#BUiTRTOBkDfJ0N9n_ZU"
  157.     A$ = A$ + "8KaO?UM6F8f_1N]lkoGh_=^[c9LknoW56oKo`mU[ca_jE8K`me9n\VE81jij"
  158.     A$ = A$ + "\ib3F][aVM;15P4VJ?6A8Z]hV2f>7f]1icjTekiZ]APN]69H_G[\NgGY4PK["
  159.     A$ = A$ + "#lE]YlIU;FlN5?PI?a`cUMORo[IIRk;iNTeNogYhaB_G94_egSeYOV^]B9H?"
  160.     A$ = A$ + "GS4T7[F2BO_2aGgT=i_7f]iahi]]=h[\9oLCaLN:QY7SK[KDR?lPUXfP?f8U"
  161.     A$ = A$ + "8g\Ti>fVTdf2EfmV2DfQRUB>R=9Y5EhB6a\EI71i[TVnLREaG<BAONaY?_Lg"
  162.     A$ = A$ + "ETBjK?<9KmeVc>S#b?fXTZb>99o4RF:8QMH_nf:;OIPV[FZ8kTUdgifTdgA4"
  163.     A$ = A$ + "B:A]5YeZ:Bb8f][He#UTd?SH2;XKkoO^`hGmQg[0^=[a6KDW[LcniJ\9MNk="
  164.     A$ = A$ + "[fmQYcC6N0L>?<ke=jUbgI];GlKe;e\]i8fg[k1^;khJ^_?P=FemL7bZ^_g_"
  165.     A$ = A$ + "hUJck[R9`VoWf^?4?FQ\AgEnDN[lXFkBT0GcR]c]S#lCWog;e?P_b^gljeim"
  166.     A$ = A$ + "3#fEh1:a^eP\SQiojDNC;Cm=4TDL:kBfeVmCb>f]Zfon:EUELZ=J8b>2e79g"
  167.     A$ = A$ + "hS#BNkKDZ:W4T:c>NkfK=Pe:Y6MXBiI6[DF6kFbNGQ[fkA:MDA>BkUW]D]nl"
  168.     A$ = A$ + "Z?oTUJc=AY`4g^dB9I8UUf>U^Z:?YnRBA:>]HTJe7_`TSF:>eM8U[?oLdGOF"
  169.     A$ = A$ + "a]=YU:bCZ<gTUF:?OYl\BBZ:gDUS=eXbL3g[<NW=;CfCKBo=F]dJi5ZOn9[G"
  170.     A$ = A$ + "cA;KImn[oVm0gf]1n_b3?GjREKHMnF_dinmfCK4N0nlcP32Fm=4TjS0n?KBW"
  171.     A$ = A$ + "G>0eVg7MnMV?g[UM?jkaM;N\TkBLk1n0Rk;n>5oFe38n_j5KSe_fU:1\VUHS"
  172.     A$ = A$ + "=kWj_HM;A]oGQ4MXn9A]9o=kK\iS?R=:I6K4BN95SJ?5YDDBAIfP<`6]HeV3"
  173.     A$ = A$ + "KaV;>Mc>mWIXf[HGbaBdW3?O`2mEGABUI^Kef>;YRdfQ<Hm59=E#bB=I5[dC"
  174.     A$ = A$ + "Ei:=GH:b0eEXdO]58]DDZB99]MYbdgYDG>a;=VOBf[Qk?LSU83e#aZOR]H_V"
  175.     A$ = A$ + ">:;C9[H2E:>a8_eameOmbDMEUjK9<9L_FVM^akZ6574_<A?e9eE#:B=iUT<F"
  176.     A$ = A$ + "ke9]FF^BKUWWN=V\DGNY[h]dd_Gi8SeB]jeEajWEUb\mfVLnm?]<COM8GlPk"
  177.     A$ = A$ + "EVXcVTF;=?9GeGET[gkKkf=oWiA0:Gn#Dn><\ioeingP>g=fm<lNi^\kM\ii"
  178.     A$ = A$ + "X3>`gUO?bjGm3XjHGZ4ZW[D2ckE8Qkc:eocFW4[>GM2KImB>kN;Bnjlc<bCW"
  179.     A$ = A$ + "k<GMnk\fIHBeiT\a3Yb\BDJ\X<UF:=7Y^lCc>O=jiK\PdUVecgPN^F:<=YeR"
  180.     A$ = A$ + "Bg6]EL6BgET[dIII;SdHIfa>:=;YmBbdeAM^MVS_c:cEj_nR=KN`1]GJ6V]L"
  181.     A$ = A$ + "KUT^nnUTdEiI8mFC>B?EW]dG]iN[KGONa9]EJZBoeUWM^1KX0Ib>[DJYhT]K"
  182.     A$ = A$ + "ccIdF:AfCkU;]FB:b`=ET<#miO[Sllha?c<m9GoTCK_Oln<g0=856of<\7hV"
  183.     A$ = A$ + "jc=1i2kKLY_Z;B_FbC^jQVD>aNjen^>#]59k[W6UYkXFIbfZf6mGCaBmj_=S"
  184.     A$ = A$ + "gBUB_EU_<GO=;WOfATKNV3;?daWCN\cN4Ifnk#Wg81aOUck]KkZoSfHm:>82"
  185.     A$ = A$ + "E;0LNhfKEe44Vb92l`6ENk[Gio0F`WUN?R_;kNUe_Z5;QjaZ<kn`mM]6g6hd"
  186.     A$ = A$ + "4V?[AfZo^Icc368=US2L?H^mJc>>YJM>j6b;Ac>T1cobma65K36<_K_eFX<B"
  187.     A$ = A$ + ";EHlAPS2LEJ]Den]\\<KNW1HQ^;?7Y;^]N\U2dGOnY8]YHU1Ek8>f^RIhakA"
  188.     A$ = A$ + "O^mDINBGET]Q5h8ONM[7kBmKdKEI[h[Ddggd]A7U2^C]k[;OYYlC#aKZ=N]i"
  189.     A$ = A$ + "IW[f\fURiBe^o#eGPMTaX=E\J[V[MKWg?NNCgIEfAN_0kaci3Oc;87K\f]Wk"
  190.     A$ = A$ + "H=GRNMTYJOGZMkV;8AIHe?DeI`WCjf]7#mMEZjgZ9eOe4=G^d[Re;#W;Y?5_"
  191.     A$ = A$ + "OVYkG>jXM8?m5?RLhQKC>eTmZ_gM:7XoFTmdJE6Vi03eYlP7M>miL6iY^`YU"
  192.     A$ = A$ + "7jX7BVZSF5OGj2lbni7N\RUZJUMCfmF2CB>V8En[nJH2djjfR_G3Kh_ZWN]g"
  193.     A$ = A$ + "kkGLGe3h]Zo=`e]<94ESlfD]]A4PW6^Hk1iQTF<KbhXG#R:WjlDkcBLao6N;"
  194.     A$ = A$ + "eYl4J\`D=^>P10;`Le`I1kCKnJe6USLN>fYJ[fHN9[fAiHckk<g?H3NO`71?"
  195.     A$ = A$ + "6Sjb>13C06X?e6PSLO`53DCQfmk#OmlH3EGaf[QgO6li3g8\k6]YB=o6P9h8"
  196.     A$ = A$ + "f_P7h8fhmDIF6>0L3fi<<O<:60KN\Wii>L35JWS73\2fnHg3VR7gii`W3?6?"
  197.     A$ = A$ + "?Nm>?G7l5?WnZ>?mc;CkJK4Ug6SmdDIb8:G`1D<aD:6Y3mJ]kBhk[bK<cHT7"
  198.     A$ = A$ + "odc:e[HgGjZWDJAo]oTCdSlQO\;;gh4kCV#mcLccL#mm^LIfNJF>nHm;GNoC"
  199.     A$ = A$ + "9OdWiaTOkGh9UCXJL6XQZT<gA4gf]?_]P9Fi:UPlRHMjS5Kd=YJ6#S[O[Lab"
  200.     A$ = A$ + "J^ggWIo_hO[5IHR8gP_b6mLEB<1kW5[Vh2;89eXf\TI<Q;i\[]95YHQ:DMY="
  201.     A$ = A$ + "D0lRCd>2N0n;<`nVi\HnM\9K8gTDooa[fJYIcGgQR5hnL\W:ca>blT<hf<OO"
  202.     A$ = A$ + "oEGPD_Jokh3XEUKAWccEZV<SC][:fhKdEIi[?7e>]fbD\AVBS:7mn[^4IlV["
  203.     A$ = A$ + "AmYDPj?93meUW[A5iKH<l5eC=58MEI1fk7GSXM`1W2fQ[cn[9OK^K^6K]XD="
  204.     A$ = A$ + "o<LK>gP:g<N>3EOAg2SeKEiJO7inllh8??\eMN]LO>_cgIN=hkK#mkKcj_CS"
  205.     A$ = A$ + "e#Yf]1;<NSU:3Xn#1C`H?:VMD5?=2H9mh<]DV<I3593[LdHdSbmK05;?Sj_Z"
  206.     A$ = A$ + "ildOOE\mnkY1cGCLQj]\_NK#NXS<]L^m>TlF?ceUWiR7C>nhmYhX1T;\o9TG"
  207.     A$ = A$ + "mA_Vl2?h5TGlA_ZLScOL9Z#f`]MkfOC>2d]EKJ8fPG^KS0LO]:>H=ROZ_1b_"
  208.     A$ = A$ + "6a?:#Mhk:_OICn\FCg0j:BHKKBBJkKFi5]CYdDSCi]6_DC^Y8=EX>oLajLiZ"
  209.     A$ = A$ + "N0V?_=Mn]>PORnO<n9`^cd5WA\BI97SY90LBcjLj`;0k=\O`FQ1f8HSiHoDS"
  210.     A$ = A$ + "bob\]DLE_:G8h:a]1GP=DS6>;Akm]Oeo0n?86Z=XJGW\S6Emd:?<EoJOeXfH"
  211.     A$ = A$ + "eGQDF:a:UVl^=]\mZH6d^D_ROj0<E9iJjHPc5LjQ3O[5UYag_CEGL_EDPdGU"
  212.     A$ = A$ + "jLm5[ni:<CkHoEET<D]U:]FPR[;Ga>eEVdMIjc_45;DMafSc[QSlHSf#5fa^"
  213.     A$ = A$ + ":=GkflJhmMTj;g^=7WXUJTAD<Aojea<ZV2`6mZOG1G0gY^:AmaDMn6nHLe_2"
  214.     A$ = A$ + "hR1EOD3EM>6fHjV:AV\iRUID=?=Wc^U3dC]jeP;<bd]GQQ?fKkEKofjJ>ZD<"
  215.     A$ = A$ + "OD_m7lAE^GE8ORGlAUghY^VlDGnHb;Nmc9Gn`C:WNVQT;MX9TgnEONKLi3_?"
  216.     A$ = A$ + "9e]5^[iI_kkjf^Mm2hS5`7;P?ngnQ7?`m9KLM[F2EeIClEAKM`^_:3?hkZG^"
  217.     A$ = A$ + "Q9lCeN\1mLT_\MAn\2;#SkD^a]M9[M\59WHSddADFjZNj\Bd`4]ZJ:j#]KP?"
  218.     A$ = A$ + "2H3^?a?2<QcPHZfDAYIl[`f5k=\eJ^0h<Yf\jokXMPA5Y^CSS4l`Hd4JZecG"
  219.     A$ = A$ + "KFaKaP1<1LZ0G`]QS5j:jJnhA=K?=:CfN=F<Kj[^bUQJZ6IR>KFJY4U_OeUJ"
  220.     A$ = A$ + "gOTFZC_^bFefWYdIU5[hhR\hg`ijZZBD\LnF<C9oLM[H7`#]XldJGiQ1nI0m"
  221.     A$ = A$ + "idCI:7_<CFimXhAmmPce;iM8aMYlkc#]I[#JGOoZ=cTd[gL<>NMXh>6kYUJU"
  222.     A$ = A$ + "AK\:mj_#So7g^g:;bh0bihe>D=UYlY`>^NIlVZb`HPo63lCUiHcK0G>6`S[o"
  223.     A$ = A$ + ":ceh:i`gZ75k<RbCL#eN7<Ao:^IbFZ#ehGV=G4Li6_UbMa7DO>S[jKjYRdUi"
  224.     A$ = A$ + "j]6IV^ZdRk`NJ]<YlDf^\gNZANcWn1=\b;n#WFnMNY7CNV[LJiDC?\LY3<]l"
  225.     A$ = A$ + "YNYWENgGnUT7n`7lGPMgmNKgfoOZQKZm>J:R:X0U8F_oB#[IURWgk7#Lk^NO"
  226.     A$ = A$ + "Zo1bIam;QjmJ\l2_mPlcboKNa7UDJJaZJ8BD::iM:=PO1l9X3>fQR3h8HSjD"
  227.     A$ = A$ + "o647E^]c0O86NAWS[VLB``5=D#:f0]ih_0KgfEL47;DaNi\S`\in7]Yb]S56"
  228.     A$ = A$ + "G4V6RQZ_4So?W3\2g7=eXg`AS=H3`9VfKmnEUn^]GC;je2i4XfLa>_0mJ9=c"
  229.     A$ = A$ + "n_j\CE_Fbb`4P=J^hL]7_MefVAC5USQ?JGeWdTJk261O>MFN166YKe>^KNLm"
  230.     A$ = A$ + "mZQ\D\[nNQ]<HT>heZH^^D\8h7^OCPcdG7h2doPV7^]Sn7d81fP1g_?5;2nX"
  231.     A$ = A$ + "9mj5l7h2l1EFRk`^=h3lSRMnLmeXY=g\gEo8>JKhnhSM?jl9h7PW[;Oa5Hn3"
  232.     A$ = A$ + "a7;H3NNhKNTjE=BZoWmfI5j_[I;CdJ9FLe0O#Ld86d4gJRO=aRnA?c\V_UGh"
  233.     A$ = A$ + "1?Ul9OaK:ObGh9DMoG#Ni7lBbghgiS:_c[lLB`[IYB0;onn7ICB=0Mk6Gh[G"
  234.     A$ = A$ + "[cZAY0MK]Rg;OYbjGib\jTK[NkV4M0N:Ai_7F^6R94_MY]NWKeZYQRCJ7FLU"
  235.     A$ = A$ + "P;4fgHCc]I#^1hL>g^MUW1n90;`A`6PUZGm9P?6hLa]9VEEVAl6g5Vo]9M>b"
  236.     A$ = A$ + "BBJGVVHV7]cBbgdd?LCE:CeESB?E[cUWj^]k?IW=8SdLEg23f[jgYYLCehYP"
  237.     A$ = A$ + "]2lJ0WeXnieKE5j2cYg6OIPCaV^i2cbnLQKEMiTZd_>?>i>3O2<`O0?6nF0_"
  238.     A$ = A$ + "hho0L3_NhNacQW;_?>_W>LehmSS>nFP;7WS7WkCnjha1G=Pj?SSMYn8hLm>_"
  239.     A$ = A$ + "_97\7g7^OPY`_SQ[diRZ9c4<l>O_1[PM>cEPOBhXb0^JmDI16W#Rm1oF<GO]"
  240.     A$ = A$ + "J?7Vgi03dZ<DSEHo^`_]SeL5f[3O^h;JZF[D>d#=Kl[8>bcZLa8FLk_o6TYj"
  241.     A$ = A$ + "XBmiTS53=^mDPSV?>e?bAWF:;Q];o9Oa?SlGm]omUglV?Xl<Gh4bgnMohbGl"
  242.     A$ = A$ + "Sn::GjM:n^homEmG^kM4YhaZGVQ?fXWZnRE_290eGB4njQ4G81XcG_5;fBEU"
  243.     A$ = A$ + "K\Fn3Ld7`Lm>gVcclm`=R1n2#GQcSS=8LY^5O:5;0NPLg1O\2E\FgZmLo=D^"
  244.     A$ = A$ + "DUno;fVHO\g^Ka\3Z:e4<\A75WWZE8=e685moZ2DKm<Eo0iYn<BGJ8g<\kgE"
  245.     A$ = A$ + "ijL[5T]jcGeQTNlbH=FYa]7Nj>J20Sdblnd`G7lo072^Lj^JfdOPM]S]NUYW"
  246.     A$ = A$ + "PMO^V`F6o<hOQhH2fPk3>JTVZfN]H3SM=_6`hlJL`IlI`Pc=\bER77L0h46P"
  247.     A$ = A$ + "MVZcVTmdFmfWgh]FWQ?HdXjc`9Wg>H<7o9`kb9?PH_cggFb?McV6OT^hZFXi"
  248.     A$ = A$ + "CPh_aLF`74OOETABB_eZnJd[a>d[kS?i`bn7Y?I0UOiDmf^MO`Ik_oF<o;cf"
  249.     A$ = A$ + "I]FlV9nbk][Z=l0H4>7nB0c0nPl`<]boJXjbEe6U_LhQJdR;fe?hTbWkUO:A"
  250.     A$ = A$ + "n9o#MlW8ORWkVb[MS[8OY?f[:OVGk3:?jY>ZhamOW_WS5LO5[#lcC?T0lf;I"
  251.     A$ = A$ + "mniUhW_N:9\kX]j#UJKJKK`O9U]6VDIb9Jn\K<WD<mHUWFDB5I5SUK>ZE2bo"
  252.     A$ = A$ + "0alWlbA>J9g34OCho3W8l9SVG7=1Dg5<G?c7aLkeXfo`7YAenQJNPJMPoKfK"
  253.     A$ = A$ + "_]YLn[FaSIHLLL\c[;KRQ9ag\2e74jSekGFaFM]fEUU9ETN:ZOUh\k?H3eZO"
  254.     A$ = A$ + ">58UTL2fL[3[ca2_4hX`L\HKR];fUH3RM[i[X>e6\FbIMMVO5`=L=ci07ae>"
  255.     A$ = A$ + "fDlHllMlaQ=K[5YcSZGgHS2?#VK6kDlCi`UTg?VK0oS>WSi;Hn0n\IDQNK6m"
  256.     A$ = A$ + "Zg^Me66^YDK8<GBij[S7KdfZEfSj[dig=lK>X>_2c1Q?EV[7o2k[gVDKej\i"
  257.     A$ = A$ + "Y86dlmP?S1Z_<egGAVN[VD^M]YL7KEo]\Q2cCB;V]9MXn4KYdRTj;>OYd<CE"
  258.     A$ = A$ + "VNPN<<2a^hDC=RLdAkbd`#nf7Go\8niT3NR_<3dZ0o[mgKMjLC5Il_6_alU9"
  259.     A$ = A$ + "J^#I2UkeL]GY<[joilkY7iT3f^lRGlhbOgOhGGTo\o#iko5OKicmQO9ie_ie"
  260.     A$ = A$ + "U_nKoaU9j^egKdF\TUM[LFh_7[ClBeFhnJF^\ZUo0B0nh^\e#gPTA\:WYdCF"
  261.     A$ = A$ + "bOgk#Z8Y4^5nXAb;MQ9:eU_;\PC^[K]hd^ENZ1;0^PlC0N0NmPGPSO6K?4co"
  262.     A$ = A$ + "b9VL#iTC=Tak1m\<J#]AIhDG#D_?EZL5Pc?cWEQjg0K_V;8GEkGRjLo5;54_"
  263.     A$ = A$ + "niWO>BjA5QTO2aZl0ZCWoGiHTCV6^HZ^JG]5Zb`?X]WiD7XFb[LnjeG:V=:f"
  264.     A$ = A$ + "Bi[n]L`1LOWKk`5dVOE]_ia0W`e=W3k<ha`k]3?=^?i;Sc1OUQKXDkko<MgP"
  265.     A$ = A$ + "=W]U_miW3WjE1mB<_>gWW_=WNIIO[LkGNjkb>2gDcnNNNTFNGd[=hlPF7\c["
  266.     A$ = A$ + "8mh<<6GGlhI7cV]gG`7<PG4H6^nXNHXV2V\kV\jaZ?eog#]DWdSnkEWEYj_K"
  267.     A$ = A$ + "]NY;EO4g_QBDMH5TSTC2kF::Uh<OJ`W[2mjX9MN_;>gHZNS^Uc<mPF=[<IkE"
  268.     A$ = A$ + "IjgWX]:=]m3YHB;7T:?kaZWL]T[<Qj?i8mg\<CKE9SGOabT=F^<C[E;WIRnT"
  269.     A$ = A$ + "[^oaUod_jk8o3o`_Wloj?nk9O\WnAU?lSo`b=_lIo=6^8aXSF2?P0D^C^Iek"
  270.     A$ = A$ + "Q_Z>8omH5B#n^F98oMCfD8n:Y4KTBV:oVf[Z8GJ<eA[jlj4[Ujc:9c7=fi`O"
  271.     A$ = A$ + "2K5VoYLEC>oO1GOno:?mmPhO>JceHc]FNZaIogMQ3<]=?5JOA3?n6LVgUS`K"
  272.     A$ = A$ + "QS<g<_GX]PG??GNmf[CeeblG][lmIn^ZE=]mXo_f^Z1XDECJM5VYYE6m0Pa`"
  273.     A$ = A$ + "_0G;<O7fP4OHWL<266kFWH5cg;WL[Kn0;=3Ge:2iJ\\<=MZ<W8JCI>CdW2ok"
  274.     A$ = A$ + "FW_NBLRY<aGNDmokVDNU4G8>>F3U8eZfiCdFigZN#XNBPc>gg97iLKWj:I?:"
  275.     A$ = A$ + "_TQekCNfA_kDMD]EKGDW0>e:`Nk^>c_M]ZO:leQM?HdYE]<<70a<6]74[G^V"
  276.     A$ = A$ + "MRI5fdlMSig>h8];SXfXMYld>dXmYg_?ID5K0g=hlaAVOZojEKm^JalcRVWJ"
  277.     A$ = A$ + "c>5S_7nL;=UMIhaaJ]6megQnOKIbn6X5Cg9on^g^ZGo^EZ5?=dnS_VaD]=SY"
  278.     A$ = A$ + "J47Aef`PHE_7mL7Z_j]aQEm;GNOS:OdWhJVo4i?o?BNSWnATGn6GFRJSnm_I"
  279.     A$ = A$ + "hRM4Jhbf3:DaoE]JagE^LGiZHU;F2aWe:9_c]8IUHdB>Y];Y#MNobEOgEXnj"
  280.     A$ = A$ + ";8iM9i5GdFl5[CW?_fdCDJ8kT=M]<W1h1`2e=On;bMgAHi1POOP_2of1oic\"
  281.     A$ = A$ + "gaT3<HG67:daSo1V[SLPTOlaH?G`4`AWL7Pm<cM3VcbWNJaK?oS^W1=l:eP="
  282.     A$ = A$ + "S>El0hS6Em`]YL0:?KEKMME8eXhGlo`kodmfRM=ae9cWR]0flDcN`7dYVYX^"
  283.     A$ = A$ + "Ik]jl\JE1oOlLhaMZY;N><P[0eV1h3`04c7`3Fl=;?3K`LRL4^44GDbe<gVh"
  284.     A$ = A$ + "PN4E3kH=Yl2[:C;NXGHfn\k?M7UKLb96#<V\]B]hT^W6E<CIY9CeNIBEY]Mk"
  285.     A$ = A$ + "m5l4Of>aWUlo#LVXf29n3H_QVZJdiD6#a5<OFMIVXMMBlYHNLbo1a\Rh:=F["
  286.     A$ = A$ + ":7;mcYQRCeR=b0ZM:o7e^Z_kP3gU<J;E;7I\NUc__9\ikLRC0j0AKfT]gTnN"
  287.     A$ = A$ + "GVaiSGk4:W^1K^LSS0eO?n0WZSjUc^gATiDnb4O]aegc9DNQLN`NlNR]2WKO"
  288.     A$ = A$ + ":>RLa`h<SeV\o^ZC>H?=8gh8C9ObGja4i_o7;Oc?mK:?o3O1YNEcg_>h2oFc"
  289.     A$ = A$ + "jT8fh6UPLcMagE\B9jPgP5CI_Gj3Hh_DgAhBiiV\DANY8EF#JBE5V^DYJ;EX"
  290.     A$ = A$ + "Z?]157Dgla2Y1d7TCJV6f:EkfZDOhHgA=QTNDKfh:1_G\[A[=e6=JC[Bo?:S"
  291.     A$ = A$ + "X2ghTC^0KA]oa^5o0XeXLeO1?6nZ1W0n0o5hkXTTgYi71N<XE6]]h71>f5[n"
  292.     A$ = A$ + "3h8H^ZcCmIE6[oQ\\ef#9Y4k]RI5naPS4GG6OXi[5;l7P]?e<>HV9J_:3K0V"
  293.     A$ = A$ + "PiD1g`m1C`[1<3l7YnZHnKWL#jPC07<PZ9]cBBE^f17e`4PI0C#l?WDWkoA?"
  294.     A$ = A$ + "adbkn:gDVEe_2OL`:ETLTVo1lC0^jMNi7cN=PW^j16ANf;N8I>EWkQ6XAilk"
  295.     A$ = A$ + "]?i`3fTLjYjaZWSmfE]bAdim1S<MWe87I`FUS>DkbL:7^QEnIkEeJ<A3UIfF"
  296.     A$ = A$ + "`OQJ7I2Z7;eGD?Z>jQdkgHNaKJW1WdAUIJj296TfLNjomHS37<hea_W4?#`<"
  297.     A$ = A$ + "7NdNTYE>IcXco0ValaXc;Ro3ZOIbU;e1Z53cRBg`[h;SH>NQm>^ZIY7mj_AS"
  298.     A$ = A$ + "W;jdVZm6\jfI?jk1nEPc53^>7C_VjCiD^?5W#LUOUKLNia>cnUod_iG#nMNi"
  299.     A$ = A$ + "Wed;]0nH1la2hSo]5O\1?mDfT_n:n_VEIe32e>KJA7Y4kF2FfiV3D:CmiFFF"
  300.     A$ = A$ + "9HhSbb99GHSlCE:C]]PO5[WiZc>5;W\<8OCEWAl66QlbQfDb1:J5Ag:a<1Oa"
  301.     A$ = A$ + "VfF\oEkNdEP_C\ikEmOjP9H<ZbK5kK;VTDS6cG37llio2\Y9N>liP_GZYSnE"
  302.     A$ = A$ + "mPP=8VSL]A\8Q?EQY\Kkk3WcR56Goje:Ln:8nX\hdT#hKhFek>foH_3fPkoA"
  303.     A$ = A$ + "NR[H[39`2>aI0\23`B`oRK3N2<CA:o<`8>eB8lNVBeEdNA9;Oh7mLBI9^=cn"
  304.     A$ = A$ + "[kbBg`6]TO2b?l[nfbWkeNB3O#\L8_dUWD4f[3<0Wk]Oa7a`6_hE?Vl7n5N;"
  305.     A$ = A$ + "i;mV?Wmn0^h?oKoiUoT_bWD>PRE>kN7#n3nL_UQA>mDmYWc5_]3XLf?ihMH_"
  306.     A$ = A$ + "O?lQ6C>RnL_fn7BfOgE;WL\FTC=N[bdjecnk^6GO^jc7=?][LhPS5JoanVij"
  307.     A$ = A$ + "VA]o1G#\^hl`?UiH8fg<o3hSmfCcbnj[MK^#\167nAZV3`6SfJUBgEW_57Rf"
  308.     A$ = A$ + ":>;;?<T3cjb89SGenD\eA6YKi0mgQbUDOOjA_fd?G`eCZJG6KnjNi#mfXLP^"
  309.     A$ = A$ + "[gZmNd==VRAHl:?fU<m\_h=^VldGk2oBQ=lAeH0^Hm[MefJa;Y83Cb?aMIe1"
  310.     A$ = A$ + "1ljafS_W\NgHmMba:D<2hU2EkZbdi?Z<_d<NXHob0=8lM\RieMhDG8lK6g6k"
  311.     A$ = A$ + "Hd8RM9h1\gaW#1Z6V<SN;V_SS=a#V]M?eDZM4kMd^S_1`C<#g7c7aLHlNQO:"
  312.     A$ = A$ + "lU`LCLK\iAGRU3NmnI[g7Nc4_CWjFQW?jS8VZ_ecnXbnk_=[6XXn]XfL9>cU"
  313.     A$ = A$ + "Wb>\1a9j2Z6#N<dUS>MN>D7aDk`Tc6Z?5N^DS:lhD3;>[?4Z_MhfCMfB=Pm#"
  314.     A$ = A$ + "7M:Y\TSbRK3iW6<DE:fkKlYn8Vm<J\ilXKPLH?K?ekbnNnLJOXQJEnok7n]U"
  315.     A$ = A$ + "[Mh9<o4HooGmmnZbU?`HbcOeCHgo_m7lk[HTn<]87MHE3\>?ka7Y9i`3DW\_"
  316.     A$ = A$ + ">[DNcKNNI6EGa\]EVL\1[G^b\m:ceIYbD=W_L]m=PLQ9kB>iX]ZfVe97J`6T"
  317.     A$ = A$ + "IkFe<[JLH=8>KOeIfdCf2ib[6ef_DKm=bJO4=Jh3UhBBN37fdlGbleL#JF\N"
  318.     A$ = A$ + "96IL4o\C[OOAG>o^AnB#K4e:3L#XnP`OaT]GWQG`O2jB#cnQDO77#a54S3n]"
  319.     A$ = A$ + "MV^[cnM2l<a_PHL`e4e>agjcn9UWk1oG?n`_E]2[>YX7F\k=]1KMnGH2AKig"
  320.     A$ = A$ + "VHhQ=4LP`f3L1[iBKMQVALZ6G5cXfAeXhmZdiU;BieTUnjaO`cMic8GiPCIf"
  321.     A$ = A$ + "J<o1a#d9^W4k2\IiL<?2h9`7hGhRkO:i:7J6CK=leH>ojEL0a]]Yico0l`H0"
  322.     A$ = A$ + "F1\53^6ao1Lh`70HJn<Hmh`A6UZOW`G6aEUl<`eQmmLnJiRo7n;o^O=mo`bT"
  323.     A$ = A$ + "?l=_Vmo:H3`1FLVc9AkLHocAh2`oc4oEdFblO`_P7Scc[ShN1FRh1AMY`jUR"
  324.     A$ = A$ + "j9gYn<8FFVVMM>>`<`o1KOF[A=TK2j_O=IWg9nW`=jhSgU5G<l91nij7O_b3"
  325.     A$ = A$ + "O\Y]K3fi5O`C9?jYfWJCU\mNMEeg`9fCWb9WX;ihSfVaWkdkY=iZkO0i;o6?"
  326.     A$ = A$ + "SlUNmWFJ?_hTWndc8WE?o1kY:Yi\SFWC>;CckTZ_R3YhPC<NKb[mXWAN\C=]"
  327.     A$ = A$ + "LVYjB^dn6dNo>]nnRo<Z=oaE]oSZOVP=`G:3R9=a8VjEc9>nHoCl1inlh7H`"
  328.     A$ = A$ + "F\H[A<]I]D16RH[C^;9O#]<olK`m2l1n>HmSHn?Do?TCNh<N#mmaIMZ#<n8^"
  329.     A$ = A$ + "O`9l4CdSQk87U4G[[M\mo_8fPeN4mFY0GmB\eJDA9\3KND\9hoNnOea6Pooo"
  330.     A$ = A$ + "YG_oDO7=Yh2lKT_bG9[Hg^5oe;O`mJaP2M8`_Z95KP]:n:0;0F1<7h=Vg6kc"
  331.     A$ = A$ + "S=n0jeo#F<\`V_JmeRf1l7AMkjXo`b78WWLOPF7miWdFfXe??hn4g`?e[n\b"
  332.     A$ = A$ + "go[lI<M>EVf^TdSLSbWhiOD;nT<_<cOGJRA955G4fljDC2LMVk>gZU7RS=JO"
  333.     A$ = A$ + "fo9CXli`W0LS9O2UTB<fgM6gJ=BY7Y>0LZk;nMQc=#3UHe79of1nPoG`60K2"
  334.     A$ = A$ + "c^#iL1g;\MVD]Y?]R5HNFh[alXcXcmQ]6?6fD<HngYjXFK=[Rm3o?cL]>c;K"
  335.     A$ = A$ + "gF]A8G2lialbkGa:PUH=mQoY3Zl^>Ho=hbVNb>D>:E;OTKN>;gdWCmA<]j3i"
  336.     A$ = A$ + "<Cd^DCJAZ?_ZD=<MHHSnEnD7^gJU?k[nXbKo2?XmLZ=]XTS>HSbSLTaUWk27"
  337.     A$ = A$ + "#NZc<[noN?bE?lXc[iY>;ghcd=ciGQ=70HL`ePIINRZdoOH=SaL4DK_4KK`g"
  338.     A$ = A$ + "WNbnElg0V?2RA5n=6]Y:]oO`N2<2i:2Lb\MeTi31M8lO;o^2n4NUli3gAZQh"
  339.     A$ = A$ + "mfAUV?Uc=cPb=>i\bgmgmC9MDKYocR?XG6`j`SjUU1f:6?RDSaRA>i]3K<`7"
  340.     A$ = A$ + "X3Sjn`a>PeQ=eD8mnU^KX2i:7Oob17YG[gaP=>e7:LD<miZO2`3`E3NY\FTA"
  341.     A$ = A$ + "kVC=6BN<`F7O8Ho3_9d5PfL;7Fji8faY[l^P;5?>HIn\`O2?GdK`i^h1Vdd1"
  342.     A$ = A$ + "n=NWgBmG4]TEdKBNn[LBSOCa94QQCb9V=;EXO?9GTTc?;_OTSIeOBUje>3h7"
  343.     A$ = A$ + "bgEWeM8fk7Jd>=L2i8SO?H>3`;>mQ1hOcinao1O5GiBCo_WL]m?lSn^V?6hF"
  344.     A$ = A$ + "HeYQjk`hMXJnoF_kKJjIPS<ogjXkO?`gBmKP]>Lj>TZU6L2fmUXhKl=aJaS_"
  345.     A$ = A$ + "Sh?SKcW?7ic5l8aA`Ac1hSS<B[6nh4Se^L:MnOh:MfYkF>WJG3_;ZOSc?Egb"
  346.     A$ = A$ + "UVY?cgbiV^McoaAENDGoPS8_`U?Xl#7Be#FF:Z^m<=laYd7o;lJ?Q=>g\m9c"
  347.     A$ = A$ + "YL`>o\38?kU?RJ7^GUgghZ_`N=oN4GI^>hJb9O6CXHMhDbj<\kBcd`AD;XDc"
  348.     A$ = A$ + "S7L`>Dklf=ND<0S`0>FPM#CbT]F[QeVUh<XonJnPDL0HB`VDKm>eH?l^HmnR"
  349.     A$ = A$ + "OfO`Gmc:Oi?mKm;4G#?KRNiaFG_WBRK98kgK`5EWn^]j1YfLL=LRM3H5hFS]"
  350.     A$ = A$ + "\3oNbk:aUhL7LJIbNKEb9nX]ij9FgTK2`8P;`_1nT#3gE>lN==J`eQG;_7XC"
  351.     A$ = A$ + "0l1J]1OhXY0Me>i5<;jICa7S5C;dSo6?e=TM7B0fJ^8_M_MCo>lj0KQo8WJl"
  352.     A$ = A$ + "PJc5OieYf?57OTfjVVJJ7OjTg?`>hgfAW4aPYjdMEG9L=Q65jADdgMX>_NmW"
  353.     A$ = A$ + "i6V?CZiH>?e39e6Yc]Q?:?n?ikme]hc`e0jBoKoSo>FL98OG4G6\SAG;H\?g"
  354.     A$ = A$ + "KnRbCNYSIi73]]hS6<iNEnd3[J<ig=nMWOg#?;JgPo;iIUo7Lba:gWO[incY"
  355.     A$ = A$ + "l<8fBToB`G\F`QKFiY4]=7:aaRnh0[EGcWR>H]RC=3bl]PQ0gL8E;ba6Z9i:"
  356.     A$ = A$ + "Z64`<XMoQDLB_UTRLfaKGN6eWaghSoRbknB?\llGH>Id6cgN=OjGnAT?jCM9"
  357.     A$ = A$ + "i:7H8eOL;ZoP>U[O\mHh#Wh10O8b]RYM#_oNE=24_<ZEn6eO30_#m>260^Dh"
  358.     A$ = A$ + "7QL22f0<2g6nFXITLKB=0MZ97d57:e74lEicIf>Z`dHaH_ZnZmYH6^6#Kfgi"
  359.     A$ = A$ + ";o>oC`[JIFo8KgQ7T]FEQW1L[a>ZFZ?ZlSgZ_HZG:R=3l1`W1eD1fjlO1[3b"
  360.     A$ = A$ + "S]Wn]h01fPhGQ>1KnLe>_\iSK:ed3a]2o6hoPo3MbA87MF[#P9Xn38f\94F#"
  361.     A$ = A$ + "F^1C#i>AM`k\nXhLdccBN[Q8?ai?Q4MPNKh9jIJX[_#53ALW`N:]]_93OP?`"
  362.     A$ = A$ + "<E]35\k]:_c[nT6O;V;WiLo_mIN;C;bCL^SJn^;#aJTW\:d[Mdd#O:1kM`9M"
  363.     A$ = A$ + "Z?_ID]D\^D6A]mAS?L<YgV`PW73ZgYWj:WfR16e`:hRWjBWd>boY`Y6KG6hk"
  364.     A$ = A$ + "iTC?PQE6\aB]SLN>B<M0_#<nhk3n41[iD3G<o2oFROHRk1e<2WWiT>``]K_?"
  365.     A$ = A$ + "h_2o=<o\cJ8nRc=RaiZb<ME_XWJ_3:cdGCfl:hSlhSgSaAkT:NiTZ_T?lSLJ"
  366.     A$ = A$ + "ibcf_Q=N`3<\Lamf[lh7OBi1WK#C_bifC7b3MP1U3eKebUV[Oi]NV;[n[?TL"
  367.     A$ = A$ + "dAJF^fQ6al9An;1_Q^5d\lPZNX;__ATSYGWXYfI]j>E;:?A5g#]30fQ[oA]j"
  368.     A$ = A$ + "o]:C32H4W1h67nFD3o`G1m8F]ZXn7H>0RiV3f0mCceU;NFh[4O9_bCn#oS`6"
  369.     A$ = A$ + "dgHS8#OTM7F`BFZFFV75ML]DH:VN#KXnmMbM<J>QW1mm0d;OhajG>aDSHg6L"
  370.     A$ = A$ + "0iAXf2b`Ze0V7gZMMM^OdQLmCN03K`oYX16O5FmiYh26Pc03Q?0bkm6FeR=o"
  371.     A$ = A$ + ">h;9A53PNONoX71VSnLbFmG#oo3Kg43?H3G1F1O7Xe>SX3cn\8VEPo`o4n7A"
  372.     A$ = A$ + "k>gWiGNWGki=m?T[3`To`_fGDnAOS_\5KIlI07=nNa]a^7>T`UThNam9W_>W"
  373.     A$ = A$ + "7l1[A5lQdUJg3n0O8PM`73H:lmPM\]VFVOmZhD7o`93L1fY`ISJ[0\1n=0Oh"
  374.     A$ = A$ + "4kDWj?4l6oV1VPcS?ZmYHF`=hKIo:O4V?j#Sd]<Qb=o`SeUI_#M6bhP3fVYo"
  375.     A$ = A$ + "ehjakQnjfo`M9CYfE4[Kn>mTGl4bKo:?SQK_bAVDN8UOdiDnATg5F7j7DaB\"
  376.     A$ = A$ + "FX^j<jS[nDNRC<ULm3?VlLGLob5WY7iQ?l8b96]IiA?nNTAZCmCFIjb96Y5S"
  377.     A$ = A$ + "7fPEUUYc1O#7OXfT7i`C:G#O_?aP=;3F^Z9[2e?Ic^`8XE1l1fOP=8V_`Uj0"
  378.     A$ = A$ + "meVj3XIK]A26QhKE#\aX?gZ<KBhQagEZoANOfGKEHedhnE<b1Dl1H5ZcAZGh"
  379.     A$ = A$ + "Y7X=amUncf;EY_YUa>Sd6lOX[jT=AK=?baVW_oN0?HRa?ccHn>DOjHOBLFY>"
  380.     A$ = A$ + "0KJnjYQL\EJ69Hm1<`7WLjAeiT6c\Ma>To?aW3L1`>Qij`W1gVcQo;Z9W7md"
  381.     A$ = A$ + "7A>k<SKn?`_0_G4;]DgNHVf3`;kNnNU9h9lS061]l\>8BJ[1Kn<HnCRQ5fol"
  382.     A$ = A$ + "nS^7^=OVX_heOn7cl;`jB4<7lehk1a#3=nfjMEm91N5>ElK4[I5\igRO[cVC"
  383.     A$ = A$ + "9=57Bo>TkC_eRN:4m8A^OT1jYe75YOKaPN>D0[hNU=Y?7oGnm8K#On[OEjae"
  384.     A$ = A$ + "LOBP[F?_W;C2NM?P=lO5gUhgb_CIS^]hKMn`eGOXln]V5;A6PkBlQ5XQiS`O"
  385.     A$ = A$ + "g<=S<G0c3T]N=bL0hSf9oB`I3>:\N<>g<3[J1VBiJeQYU1<1H3d<>LceHmc]"
  386.     A$ = A$ + "[Oj39?mU?Ui_kI_fYT?i[l4F<L[>[Mj:7U:_=FW\?faf[lUN]WBn8GoDbKnX"
  387.     A$ = A$ + "We`7P7NTS>VYKi5Eo7Lkc?MGb=>fhV?W3Zjka^l`jk7jFNAUCi_ccl`bCOfi"
  388.     A$ = A$ + "T7k8C8WKl>=KIje3C[c=h:ffeJn1Im4#=Ri\nP?lPMZLWJaELNY?dED^FMJK"
  389.     A$ = A$ + "ajDo_UG7JK8?WP=hmMO][l]D^F`aZS2CdRO`8MDWeO#F0O\0nH1laoj`7LoL"
  390.     A$ = A$ + "Bd578hf#\LAC>m0<b1U57d\Rc`4lk>nM9Gfd_EkYQJTBC?AYaRcE:>eh]eh3"
  391.     A$ = A$ + "ef7a?2OKlLKfFo?^joT>io3n=fjFBiQ`AdW3^Po;_lQVfd=0GWWl2WD^aY>\"
  392.     A$ = A$ + "Eo8KaGg\na<h>6H;C_J>EU[5mIiKNfSIa_j5OX;:GkXcJae5>nHW0n1KMhVa"
  393.     A$ = A$ + "e1JkA33LVR:TeKGkY6mFUX2fO9j=6P]6ig\?^Ih_eLG;B]C_O;VgdoihfN]h"
  394.     A$ = A$ + "kbj3MN_TkFFgmlnDKkUJmW>6d[j\k_bkg6dojfTW[f>gZn0;b^mFmcMI[n\>"
  395.     A$ = A$ + "9ZekU\cPmc\]gA`nHfkKCaDa^Y0\K_mekQQ7hagR?[a`DKcoeHmkA6A]1gUP"
  396.     A$ = A$ + "FkmO[noH8^_4mgYEIW7<ETn]63Ca[QcckCd:^UgkM5RO6NbA39l0Y>>1K#NH"
  397.     A$ = A$ + "?gLCJ[O6h[1o\;LPaUm[LP>bhM;WOoSYlikDVY[jU;<k8:GZS9?bQVBNe7De"
  398.     A$ = A$ + "V<c#Fn5O>R]UZ3QlW\_>:Ca#SKSWlDC9?eYf[LI5Sl:GmXfAdeo^_`S8_f3N"
  399.     A$ = A$ + "B3?<E359glX:nBiMQm<i1WJXQh#=Nk^j;S<HmB#lP9NEcYjZ\l3bj[_ej]e]"
  400.     A$ = A$ + "<[;Q1Z^<K=8ORAjAVFWOh0MXH45OLX^[fhGMPNZajQ4dGaXND3H][lW1O#?Y"
  401.     A$ = A$ + "=eM^=C_;cgh:o^^RK5hS6#WNN9Y?n><KKRO4j^7[SVTQJ[9Y4j]0:nXZLBC]"
  402.     A$ = A$ + "IMic0\6aFRlCh\V<\Lj=oLgPcnYa6<??J5h8f37Eed<C?]Jlna_`f3`CcW1a"
  403.     A$ = A$ + "]2]gXo0]8P1anRif9GROjGmi]nEnE?b<F>19N1Tg3la#=Zc[5<5nQRD]=YoJ"
  404.     A$ = A$ + "]EEkemonFThSJo_jkmmKmL>jO4TSdUZo0]I_FSIg7`:I>mU;QimJ=\1mN;`["
  405.     A$ = A$ + "d[c9O;4[IV7PO7In1[>Pc=E[fEhllm7O]LKVOQ[Gl;I[7FM^#dCP>2dDP6LV"
  406.     A$ = A$ + "cWkk\>[LdKhXEO<Fc3Z]2JfinhKPH8S66WeW\]6c::=[gXVNdQJcE`_ak>Do"
  407.     A$ = A$ + "=L8H57l2njXW`_MeG=O7if<?RcjIQJ>ohCfWZ1I:;^fXMihSf[LmS^?eOa<b"
  408.     A$ = A$ + "Ko\g#^`DmKn0`o1Jc7^j<E]9I9?l17B^aA6Ea?7ENfc=[L3ma1ClbGi8b=?f"
  409.     A$ = A$ + "4bcM^iTKLXaU3fE=bY6^Eia>lNTgnI^ZlKo4GDNhm?RLnYjabAS5SKcGBSFL"
  410.     A$ = A$ + "[XNSImDA?1Pn00ae2l1m03j;6]EJAb4]D_<HeZ6VfZCmKDU<SZW1<bQELa1E"
  411.     A$ = A$ + "<bA6X1C?T]fMEOXoljcSIcKDb>^XTRB=FG[[=b]AFa;eTA\^RQUbg2MJUTZ;"
  412.     A$ = A$ + "KnZc=MKMB>B7]8eD#NBIIYjYC:>YZ\E\EY^VoI:F7[jok<G=cCk\fUHM\AlL"
  413.     A$ = A$ + "LFO6<?iFmM]F<Vho9\YaNVhEQO1Z=A>6oVgPic0<b>3903O`oMHK2o;jIoXC"
  414.     A$ = A$ + "7o1D;:<g8c9bokAXcEcoiHOcLmHoC_GTnC=m\mELg_OKO[QmS3FcSk<\P]mE"
  415.     A$ = A$ + "PlBJgF?mWldcg3\_aVWNGN7EG\DLJjl9ZoMR71W[e::`>g?Mm>b]9>N<8_=4"
  416.     A$ = A$ + "c2ZoA`9TkDhT>HS^ZWLK]=Xh2bmUCmhaiHNBbO?H3\;8GPTg3b1XcJTRLLP6"
  417.     A$ = A$ + "KhAh\FV#g]cJn3Ld9DKGdZCLQWK`^TIj[MIJM>8noR[UND<8aC0nYD_><WR3"
  418.     A$ = A$ + "f1\DD1\>mgbEIl8IM7falaAUJ>oH3f]ZaNJij:f1mjghhCIiCOjF:B^TNl9>"
  419.     A$ = A$ + "n4bGl3MCicnBGGNm[OBiI>m<ZMo#ZVnn<O4?]j?iI?cLbEfKobKLmc8OU?dC"
  420.     A$ = A$ + "8_dif_L=E[neV]Oi1gg#FmEJiR_EGikPHFIm0PRc`Z51bO2of1GSYjYCK=Ie"
  421.     A$ = A$ + "OME;][L]6\bRU^e_C7#i?]OeOd1kDmMXjbQOe\MF^\WV:`bCcHMDc?3f`]U]"
  422.     A$ = A$ + "HUKE\foSP?HnLba;m7#bU9ai5l1aL1m6lOiH]ePeWJZ<[deGSbm:_\T:c=C5"
  423.     A$ = A$ + "oTT]nkHM7=NG=Ie;5H2`EE=O_KVhn`]QcL:A4Ri_:^=_NcW2njif<8G6XU0K"
  424.     A$ = A$ + "N\gIhXW1<:jN`G07ioA`#ll3Bm1\9f?>Dnm^M?Z?QUXLgGkb<N#Q[lIHP_QT"
  425.     A$ = A$ + "gNh6GZ\SO7B^jgodfEdB1YB=bTR>BB:DiKUELaHmYO\WaO8HLl7`_CUTNlf_"
  426.     A$ = A$ + "IXcRm73`=PS03aJ`V_k\NFI==`l1XEQc3o>hLjllH>4d^16PHFBmXjTGhKQ="
  427.     A$ = A$ + "Z]D;>=>mW:We_7n;8n[ho`dEdEMfj6T1[W#`<TSAbo>H9`:lI07Mb7dL3d^a"
  428.     A$ = A$ + "MRhLA=g07:h?MhQkbZ?FV;Vec7lXHHH`ZbeFKoIXoGaLKQ[nAgZjO==M>UbC"
  429.     A$ = A$ + "86;WgWCaQGIo3KmDdWDa1`U2O4_c;l`bSYLV^hDjWSJGNnmdQaQj2CdYQANR"
  430.     A$ = A$ + "S?]lBGl`bcYhT7o`S;GNR^TWjHC:_UbEk=NTc:?c5>XU7?bWa1k_MK=K=UjC"
  431.     A$ = A$ + "0LQC?=n#jg3FC9SdJCb\3d[jG^#Y^<CaFKNCD_ZiPeFh8]YnYZBiJETEOIcf"
  432.     A$ = A$ + "=[eZRTS>NkFm3nCS?H_I8]M6UbgHKF]7BNV8_PP9LFcgT[<Ra:iCPe3m8=FS"
  433.     A$ = A$ + "nO#5VnWZbTJH=3Y^LbF:8A\IbahLeMmEKnI`>Pg36h;Zjim9Qo2\Wfo#MKa6"
  434.     A$ = A$ + "ViAQ_2m=Dhl_U0l#B<b=Ie:l^2K3fnc2jLbE]WI==ceK2K94[n`2E]g3HU;F"
  435.     A$ = A$ + "2JEZfGgG]=PO`6MK5fk9mQDbK2jjQ?47ic6LVEOHa^MK#>K`?:Lh07R>:6`G"
  436.     A$ = A$ + "RkK7EnQ<72nV8F3h_e9oM>eIRCNlPo3aRTHZJmK8M^6V_gYO^Sm6n8HmjAMH"
  437.     A$ = A$ + "j\>h8O83FSRCZWHnGX=6^:Mn=efSJf6nE`cIFEKLKETS<Y>O=7Y>AkInJ`Rj"
  438.     A$ = A$ + "bPL?gFQ9YlL6`j38XoTJePl00Gm3YlS8WIL>ZSAZ[AN<^=ef8eR1m9Gb=2Wo"
  439.     A$ = A$ + "JZnS7j#CJi3Q1eT9nVhk1o_Vo^gZ\=OFU4^W;GfE`N95U#4F]RMnI7B^i9gW"
  440.     A$ = A$ + "mj_Xj30mg?i9f[b_A_NdiaQW5JjQoe3ZJi_n16blWlbGn`:NiPbaEn?7C7D?"
  441.     A$ = A$ + ";cdN5^ZKHFWacggj87>D7TDOGC[jCH^RaE>EcfCkfjXVm>[9K_5E3C5b44?j"
  442.     A$ = A$ + ">:GmODZLR1ZA>j0eIi5MV1JaFOLd;fniiGA_<UeWMUIj:?M\F_M\YikM]ZM0"
  443.     A$ = A$ + "if3=cdK26ZFjgN5IhbZc8E3ODE6\NoEN5UFVZI_>YmJZ#:CW76k#be^ES4iU"
  444.     A$ = A$ + "XUK5F?c4K9h8Q];LTPk>g6\1LiC9j`M]G9]]#T<fE4B2A4Z4SZS>>5C4oFEm"
  445.     A$ = A$ + "8ZVQ#LGo_#e#c]gVoN:96f6U]k_GB^kLkfk=h0>jXg0O=P7Lda`Al=0>1=EF"
  446.     A$ = A$ + "?gBOLdm3F0\QCnKha`o5n#9O=P?\lHVGZgJM^AL=#k6enaOk?hK:oT_cGbb;"
  447.     A$ = A$ + "eOagm[87F]_8_m>e^[COaQHhSO2[ojDEQf`hJYhSnDndH3\Wj;EV^abUaYgg"
  448.     A$ = A$ + "FGAbe?c14AnKT_cGnC9o?n^OEi7o7m=T?a7jY5ioeO^]f6ToROPI;VaffPE?"
  449.     A$ = A$ + "E\>29_aT_2bA=3Z]EjI8`YWaIEnm<g?[C4b]1eD?i_3Ka;<Coba6YE[_k^OU"
  450.     A$ = A$ + "GgYV\Oc_23`9\^a?mD3H3>7a73kV<S:D92OG]noB0^VKGaSGDe^CN0_^jOhQ"
  451.     A$ = A$ + "VKHe_aHb[N]S9OX7lhbWji_Vl1_bQTWk\c:GNjNDm8SJnHNZC>]lTjPjJih3"
  452.     A$ = A$ + "dT<L=i:SFCAbNKY:IRV[``h<_0n:gWReI^YQKXJmgEZ3W2U1Z_6UCIWbD]DS"
  453.     A$ = A$ + "5oZ3[oNLdN[DiIE\<Ec5Ji2mXC=loXhFmCGCRk]o>]eJ:JH9oSFM7=ojHRH:"
  454.     A$ = A$ + "AMJ#Nb8FW\Nb]j`Ga7eZL\HO]SnI#EIWYdH959=FV[AUIk:OcTGJ\MZ;khTR"
  455.     A$ = A$ + "CHkFnZgi6meR?;ejUe[4Em5XA0kI\IIOm2n;PAB>Z`\SP?H?a3nALTkc8i8D"
  456.     A$ = A$ + "lfffTM<?UCDA9]kKaobIO63=#LT1O^Hc3^0L2?G^=HI^??>W3lSc[5>#LOjO"
  457.     A$ = A$ + "MT_ARcPC]KhDoI>mJA\kOeKLAiSol?R]>A`V5>>lKPec4V_gVRN1Z3BWJA5O"
  458.     A$ = A$ + "9hkPkcJ\Ndj:CfCSE:3YJM`FHB5W<NMU8O\?hC:bocOTl`WoX:>i_CNkghU<"
  459.     A$ = A$ + "\1H6`URlG;7NPFUVDodF<Oj\:iX:_9`47A]AY^c?QZ_6l0HTC]W>=^mDG7DW"
  460.     A$ = A$ + "5GN^Q<lbnk[F[^\X_[cjfZEMN0N?1C#mWSmn9gC_b5Eo8GCm[`ARUe9d7olc"
  461.     A$ = A$ + "<\R_6dhn#lMRaoe:a\Ng\jIQJ?6>H?VZAQaKo<?Xl9NZ;;7O`6]JWWS_aSLJ"
  462.     A$ = A$ + "iaE>I?dL3:3FF6F<\NZC>SU?M[oUZJdMF?7fjYGiHB=PR_KRI9Jd9Wb\NZVX"
  463.     A$ = A$ + "]6]L5b[QeTn\]FZnnEVQ=8fE`_4mRocEGR]DF16oURCLW6O:nO3<BecG3Q47"
  464.     A$ = A$ + "9d1C<B9_mf8OZSo\\NQ3m1W:bDa:5V_DCQi:eELnFl\8?b<G2nRXFIcKGKAB"
  465.     A$ = A$ + ";RP==i`U2O5L4L2ccS]9HUdfaF]m:Bje^K?HO]n\H#^]B;VBkJc1Ij7#k<Sh"
  466.     A$ = A$ + "3OS6n8jPlCW_?ASk5cmClG07P=>n4LRm53^?HAR_6Lk`g0n>0KbAd?hd;W0k"
  467.     A$ = A$ + "#<Wnia7ho`Zmhigc4`nWHK060oT\o;AMhTc>g\EG>POL]Fhbf`AX90L1j<iX"
  468.     A$ = A$ + "CO?5O:][JkI]O36Y=EKcHeZj#Z<O[og^WNJbbcKKjLX=[WK8EciQVXGY;egR"
  469.     A$ = A$ + "UKLbAPjkQnD0eZaQj_5eWAE6O]3fGc:^X6IJMNDl7dSb7l<Cjb?1H5`5D[5h"
  470.     A$ = A$ + "7QjFWeOh[Oc;XJObDZ:UHTS[j#8_9dSA>VRAHOl0^Jdge1C`h:7H?6NiBZOU"
  471.     A$ = A$ + ";<i0fPn92eGhVMOa:o[U:Y_e0U9E\kUVaUfk7BeZoX7ILi8mEW5_GlOlRD3`"
  472.     A$ = A$ + "ZO3dSlZGmhb7lB7ahGA_ROV>LmMPJ8SJ2Th?\7mLLTj4PKCLgXVV9V44;`ij"
  473.     A$ = A$ + "^NGn1eGo\MDY]F`Po7L_I_1kO>lARKO[F_hYDEG:f:DOK>iBShI#mCP6MR79"
  474.     A$ = A$ + "i=Sj=dbOVb;Si\c=fX]hlFMnI;]DAABC:NSj`2njD__h31LBAa7YaCUgCh`0"
  475.     A$ = A$ + "f0o6XKV[CRC4[m9dN4a6dck_kFo7Umh0jIeKImN;YZH2bE1l\XOE3N9a8f\]"
  476.     A$ = A$ + "o#\Eol#a1AJh>dCSN3`L>ik0\R3g9hdQnHnlhllLH0>bQg5jbie1?;7lA]c_"
  477.     A$ = A$ + ">ALbO3anfZOIM>0Fo2`?5NDT;enZ9O[76aJ:dfC#V7ohd;BY>QMFk9>eG7l]"
  478.     A$ = A$ + "8^<`a2=id_#7_AE[BaiJmAdjXOD[L5V4=ZZOfQJ_N;fIDCXXYVlUMTNKCeOF"
  479.     A$ = A$ + "]Q5jGO\S=DGbQeWoQj[=;>W`KW1m=G`2hW1o7\f4a^iVWJ6i1?lXbcOiSHeV"
  480.     A$ = A$ + "HSi4[Lem?V]nK9W7D[i?j9WCNTS?[EkihkhBcBmCeQLBUSe96Z3iDSdUL]I6"
  481.     A$ = A$ + "ANXm=VLeI7E>URAP34[eh43c?9a=iUTafgPU;`KXl\8WQTgTWolkGnh?nU\H"
  482.     A$ = A$ + "IQ>UGhl7D^i9VF^bn6dlIPO_aK]4IOZo=WjIVHb1>PJ>3<2ec>egonjcEo#V"
  483.     A$ = A$ + "JGVKSf:ZQI^=lZ`^nO=[9Z5`7;P?F0Ol?cJ6De]36QN<XYEEeMDilaZYRig3"
  484.     A$ = A$ + "1X^:ZLnnQ0j#8oFTSB`DUTBLB1:_Ob32hSFeo79VWXoPj7gU]#B66QJWgjQ2"
  485.     A$ = A$ + ":7=dNhTC:dCc`dS\UP=]i\g1bNK`VmMMb^E]ik#a2A6\ob>2=#3O4[b]2l1a"
  486.     A$ = A$ + "d:kM]Mme7^e[4A;1inUl=07:[gG[fg`Y2l?iRPH[i`o2L1aM5\PCmDbihib]"
  487.     A$ = A$ + "1O0_;Z15n]iFcM`JY\`DM]>aVO]4RnK`1D?WP=8f4\?I2o:RkZCOW=de]H9V"
  488.     A$ = A$ + "0mDRRlTk_K:gc]9Qia:dOORAbFeLe\Zo:?UWIN4Ka4fYD\NmH[CPLBAJGa>^"
  489.     A$ = A$ + "[o^DCQIJen#Nj8j#lgE?FDa3M#_A#W7HjF[edU^o^YVaKAiEdPbAYNS_5l_X"
  490.     A$ = A$ + "n##k>lZPo1H5CkA_eIeP>j?PC2m22hdL0U;5fid;P#K1LY^naVadQLF5WL5U"
  491.     A$ = A$ + "CeePOUR9^RR=^d4m;WKd^Uc]Wn<nFGo4c8GH^AD=dU9A_Qe8KekU:mEBJb;["
  492.     A$ = A$ + "LW\eCUZ7Wee;j`QCeigCGb5W\7iDjeaL:f5>QfJV]V\E<#Ab17ZEG[1VnKkF"
  493.     A$ = A$ + "iDejKFZmo16Z9Ib>EM:MhJ#^5g3[_\1JgjITY6cF\mKhOIFgi4ooJc?C;>Z4"
  494.     A$ = A$ + "OF\cH^D\ML\A0oHm5Q::dhXCN`0;#>18nXEYfW=#OUZTL\jIUHmP=UcJZUjI"
  495.     A$ = A$ + "Pj[`AC>J?HP_46To?j=:\FDlI5gW4RG[FfFPNIe1B<KBO=K<03S4[R?BDa3D"
  496.     A$ = A$ + "gHiYf?WH_S;Oj?b;KiXleNR[Ke?d3Ob3Imm:NOik2flHoc0KO`SL4O:F\NEO"
  497.     A$ = A$ + "7PAhLlmV_[>nE0WEmle73h3`6X1iWFo1n61W0FPef4[[9j=3SHkQCiKh7WeB"
  498.     A$ = A$ + ":agaIMHQoEdWGTjORmd3ZK2bi;mXMFo9d_PYG0CNQKEo=OT^JF:D?Oo]FWi?"
  499.     A$ = A$ + "5]JfjUAmQknM\8YAE7F<N_>YNmHX[LaB5j_?=VIbBajL8eVFLB^A_9YRTRfE"
  500.     A$ = A$ + "?mXYR=lP]OLdAUVo2RI5anRnj03Z1mC>FGVn5FoB>m2DdjcPh1P?3`1WMlNU"
  501.     A$ = A$ + "[<m#fh6kKLiZC<PeOL1k#=ZLeS>]Lf3<ZnKlFTM\1g\eg1e[;HCR?`3NPAT7"
  502.     A$ = A$ + "mHCJebk[OS;8GJ_3jbgVZ?bI=fgCedW[;dZYHlI<LceJi;OdVZE>l8m:7M\>"
  503.     A$ = A$ + "UaX?TfFab<jgS9kXLCCbPjcUemMJkjG^mZ=_GQ;m91kij<\1m=[j\Hnj:6]H"
  504.     A$ = A$ + "oP]2h4dZjdo>1O0>Pl3kTKIb]FU:fbZ_2Z1`OZehQC<O`FTgCh1161\2a<bQ"
  505.     A$ = A$ + "?D<Q6PQ;H_EVSX??2Eo=H3Z74hIAN^1S`NF_So4hMMa3_?[nQ6_m6\J8QHHi"
  506.     A$ = A$ + "DC:>[[:WHK1>aIM8b`1ccg=7>E>c9H[i4mkRCOWS_?TcC`7\^K1CP_3hC26Q"
  507.     A$ = A$ + "ifnV_cK8_f=_TaY`Qg5el1?>L\Lj=j>[]JR];L[XG#cnH0H4biDGUFPekPY_"
  508.     A$ = A$ + "E3VX7jg7jiK7nQ=DU<FW=Jm0T9DkTmXgO:U?f\]F_<]RWfG7=9cdF3BO\?;X"
  509.     A$ = A$ + "ni[:iMY_gIIL_8VF>[o9ZEM`9\NQPW5[G3lKLhiG3^\f<#W]C\Y>llm28j7K"
  510.     A$ = A$ + "V^M5KLbQkdhE1fhQWKLijc<ZLiakchGMNmeLfm=R>OUj?#eTgGM5:n]TgWdZ"
  511.     A$ = A$ + "b=UJAlRc>PQ3_fn7F^jL39glhc87Cm_=mlaZRe02[U#F?^7B_f>h`=iZFCD^"
  512.     A$ = A$ + "E`cOlfKD^hLCKmB#V?J:j?N]GRe_gaGcd:n7N#obP;ni7K=`0TM6NX6G[:b9"
  513.     A$ = A$ + "3Y8Mn8ZM?bC<e>1eB4iA;g4Raj3WP18OblHL4k=ba<J?hX]>GEO7DO:F_]BW"
  514.     A$ = A$ + "3VcQM7ig3<1f[DSCTo3`7L^M\YeKi8L]ggM81ka:]n94h1hG5WZi0l1HSdDO"
  515.     A$ = A$ + "7P;8_8<0KCo<b96EP?`^gY^OMRa;On>mOA`<lLMNN\O3COAaZOAM^1>jLMR6"
  516.     A$ = A$ + "<bQ:j?^ePjB;cH]ee:n5#W1n38WEO_Og?QlMnL_e]dO062^Gh31lQ3V`a_2W"
  517.     A$ = A$ + "cj;lUV[dYZg`fgKV_G\galkG>MDWbQ_l2U>ZY<YcJ;GjDiJAM=<4k7?jiV#a"
  518.     A$ = A$ + "6kUJlA?7gNbVZA>BoM:7XkF=l2j?`?0aj5l1m=;j[#U6O4V>3V3WLR0n0\1g"
  519.     A$ = A$ + "6NF`53laYWW;5g6O26VAiAQOSmgImF?cjXmf\LJ5[LJUgcaDM1WFiH16jHCd"
  520.     A$ = A$ + "[EW;Gj8CYlFSBR`gEJ[kYC=JWF^8Yg]lHWN>ii_da<<1aTUh^AnaYWR2G:[?"
  521.     A$ = A$ + "m>IGFo4RjE2Nb7KbaUS\WAEnEU[h>5?YnJjZV\D<AU6>Rm#T]YlHoe1K`Hm["
  522.     A$ = A$ + "K=gjfh;YHeoLVZ?I\e1?POL7KO`:d3AMlM#]8Q]4WWJ^`Zm2MNGjIh`gSh]Q"
  523.     A$ = A$ + "VG`#PA#g2f_D[OHK2_:lS0g;lO06a_Em0V?4hJ1g:hHajL<JeOa^D]7a>_6T"
  524.     A$ = A$ + "hWg?2L]HMNiTkLdfhD3Q>n80?P_4lC1>R[97mkhK4m6\Of__1jlFeB?O?\j<"
  525.     A$ = A$ + "Aa3U?ojW7nELTL3J[kLeW0ef1l\<>FZ^3FcMTK#[_I=OO1RQC_>QJdVeT_cn"
  526.     A$ = A$ + "G5nAH_C0l1jb7Vm8Pig[>HmJA\4JAeDAl?XO13nX_6[dRc`8=0GWj<l0H3dW"
  527.     A$ = A$ + "?Uj?Iji?WQ=DO:X7QilWFi8ECJjL0Y\MYjdRfdmRo2dK0^Pmb9lK0NQ1l_8F"
  528.     A$ = A$ + "a6?Ym>TLZaka^?jaA[1LX>#G=8cfF=^`6h;Y_F=<Bg5UQL>EC?H3lOLJe?b6"
  529.     A$ = A$ + "FcmZL<gXZ[OHS;5i\oBkOD[?]P_2KoVB?B_Z3OEGmPCL;]fXOILF;mjk?e#f"
  530.     A$ = A$ + "0=FW=VYg^<NF`SkUNTcY?NMBT1iVheBOooJS=n5=2a7?\hJAmEAM:E_>WF5Z"
  531.     A$ = A$ + "6Nh#a0mQXk0O:Tc0ZoA7O:V_6MNI[FT:_0K#lYH>If7UHO^Pl^QM9fZDC8XS"
  532.     A$ = A$ + "VhHA=U#l[8g7h7Qm\FdW3V0lAfa6]Q;Ho\U1eT>a_RhXA^dAS?HQOjlX36QQ"
  533.     A$ = A$ + "S=_SO1bkRC>eie0_<hFANAXfmha\jlBeT#]7Eflm>HlMH[kNUK5n#`oQCnai"
  534.     A$ = A$ + "HEI\;CoQC_]`eNMH:gZ711NQhFi:6FiO[NIR]WYcnQ;[1CU[5j]YV\PW=eck"
  535.     A$ = A$ + "4XcNX^\ek7eT>JBYfD\ePMmUKj^9OR<LdSC]E`]W]CGa^bbM#]5JmQ^^;?=K"
  536.     A$ = A$ + "m^R_4`1h[PLR#_k1\2ac2L3eM8J=:;f8TZC:6I`:bchB1W:N?9gj?lQWbl_l"
  537.     A$ = A$ + "TWiPbe?bdbAkAWk^lL=]97GaA<g?aEZXTRbjmDWEaI`ESlWP]?i[PHGPn6b["
  538.     A$ = A$ + "8e^>a6SJ6chQbnj[j_m<c=ZL>53<Mo]KkI1]GMiB_=F[Z_XNYo6Zeh17c6mm"
  539.     A$ = A$ + "g8HROASDR9B[>4Q_EIZVAZE5>FTR=LF_iH_al[SZo?<\j37o7XCaQo?fL4g8"
  540.     A$ = A$ + "V[SH<EaleO2n7MRM4nCH_<7<1n?LRc;J#PKE:a\=C3BhniQ\Qe]2I[1hUa[2"
  541.     A$ = A$ + "m74kZ2BHWFL\`WQSF6\o1ca]1K060M?LN6ho0nD`[2nO>i`W1gVW;hLlkaJ="
  542.     A$ = A$ + "7]7FMZan0WbM4\AQ9jZ??PO3Wjc9_M7^5SgK57[ieW0g;`:^fWIbcbG^3NY]"
  543.     A$ = A$ + "igK39?P4GfNWOOhQjgUjKgfo#8Wj]F[L^m?QLQ3>ULDUO_C?:`Y^]X?o3?7`"
  544.     A$ = A$ + "14[:[fAD=^hc0=3XU0kM\mYg^A?]ffWVW_?UB_mPcKm=Qf:gj1Sdkh[:UMHL"
  545.     A$ = A$ + "XLdI\_f[E>cHmXJG:ch\AlMAG3nFP36l^#k1JC03#^QYn9H=5AmKMe3=Y\on"
  546.     A$ = A$ + "JfEohAaNho5o3DcjXcI:mmRO?0oCoHT_[WO^mHk];h;Uj\PmDQnK^N[VoB:j"
  547.     A$ = A$ + "84ooiFo6_G>B8b]IG3D_[EZhUbEn8hoPHHQ]>iIWL4#M:ae?aUWmi0lYP>66"
  548.     A$ = A$ + "d76ImR`N31H5`7<o<f]PW`^TH_QV3`9\oebPlWS_2dH#<MI0O:l5AlU97jaY"
  549.     A$ = A$ + "L[XN\LFK6P;hf>h4^=nX0_jDo8>H66ll#7TM=XWWG?l]hiBl4XNLMfCNh8SR"
  550.     A$ = A$ + "C>J5k4Y5kJ\oYn>9??4g:`6>mW7;W8ZfMWJKc56aE_cdjMFccaZ7fSe;;7SC"
  551.     A$ = A$ + "BG5V^dL^9J[E=F3WdK<:E]CA_3Lj\N[UJCA?bQn;0LPV]MhEE^Y[e\geKC=V"
  552.     A$ = A$ + "`0=h<nYePCO5]g:c`RO;jcIM1Jk7=mE[mlXgWBo=UH[NRAkbdBLHEOaLMDWQ"
  553.     A$ = A$ + "=>BO]HW7^FTkNR[5lQ86`HSCNf1?Dd^gZUk4fWcY>7ia[InN>9O_9>iD?bDK"
  554.     A$ = A$ + "bh;Qi40cCM5#lKY?=Q?Cj[\\WR#?hOR^JGiHFioTe>e][AH1hSDM1i8UbJhG"
  555.     A$ = A$ + "iBQ?4`7DO:dg68_PF<BE\3ef2cgAmMAmRWCLaHlS#G3?77KEWe82lJPK6Jn9"
  556.     A$ = A$ + "78h71nFQi[kfNN;j<X^BPO5eX>eME\:FQjET1i8dZA5e_5H1^=h2K]6>_6MR"
  557.     A$ = A$ + "g;JC0Gb0L1aA3=#L=acgIMJ0nUlXHJS[loknV4cUSV:b=8m;>hGA^MH`]YGF"
  558.     A$ = A$ + "ddl[=I[gFXf1POLbAR[h0WV53;j53`]RN77hSn:eeXc2Bcfk?0OHm6S:cAZ8"
  559.     A$ = A$ + "[h\??Z=HNMD7G>kW8`GWn>kXji]m;6Ug4km1h?Pnb;LjaWRiO#a7>n>X_GMh"
  560.     A$ = A$ + "1JahAaiihYVX3[FC8n_D_Rhc1NDX_0laa7\MiBC?TQ?`o1Lg0;Po0>2F1oZ<"
  561.     A$ = A$ + "o1mQ:hOQO=hU1n7^J7LPF=o5`iRlF#=DajKQNL7nEaW1eK?l:QOIOeGVaC_g"
  562.     A$ = A$ + "jZFJ\X2^]S3F0O\0nH1laoj7^]hOfNOBPN\:9SMk:WPe=O?DSLX1n`R];eHR"
  563.     A$ = A$ + "R98oMHCCN^QOE_eGYUS5WLc1fbYN0]S:W<RG6e`[a=Ca:D39`Y2]69B^19n^"
  564.     A$ = A$ + "A]5CC>a:NKnh^4CPnZlK3gF[j>iN4NF>h3>j<0C0W:Wn<WC>I#W^C^N0?i\N"
  565.     A$ = A$ + "Q]mB:U;4jQ]jHX]JM]?mEU[N];LWLZE0KMUaNbDfaIi>7^FX_PW3l`0ShZGl"
  566.     A$ = A$ + "V_[m0g2CmFm]eN;9;I8foID^6MbJ:Aifd#fTk4jI6aZ?gD\jFQjjVNf;k;DH"
  567.     A$ = A$ + "o2G:h5A?ESjhcZU_FHOm[43W0?:bo7fk\NPhLP=6[Y2LE3lMG_mh<\N`YN>`"
  568.     A$ = A$ + "ADGlXoP77KLRMkL:61mo`aRS?bAg[U7mY\m=`l]jd^PHgV<PJccNM3J86Y^R"
  569.     A$ = A$ + "Une_K3[hS;ZjBJ?_D<nFD?`DC8`EMfnJebW1[96dT37;dN#?bTnV1fED;gg^"
  570.     A$ = A$ + "a1oZ<HNm2CdElN]hoVL\^F[MZVN6PCX6QilTSRNHO0Zm6<l0H9lS#\^#7LGe"
  571.     A$ = A$ + "FZY3eI#<nYNP9gnIYhalE=8Xc8:E?27C9b`Dk^TUbB>>IgKLm6^8jPle`4h?"
  572.     A$ = A$ + "2O6Xc6<17MdMk\V\LF3`PU`G6ja1K0^QS>i8QnF2m25RM5a`2]FI^3bIChVV"
  573.     A$ = A$ + "S:WO=GBmkRfLRM5aaZdTMe?:iaMFoI\^`9OY4WH`GXG7<2J>0K<PZ]PS\O2P"
  574.     A$ = A$ + "m9kY[MFV[mRZNVOO[Tnm>h6cg`lh4WN[6mdPn[FeWDCFfNJY=D]ghOH`JcaR"
  575.     A$ = A$ + "K5[YdmZn#87cdC5YO9B_C4<7ahUe[1ae2]9TgJbM>n>^lN7fREe0\?cYGgU["
  576.     A$ = A$ + "OOcOGKalKbgAZ=Id5E_Rk1O0VQm<NdcSOa1HOM_ll=O3<G3kIDX[H4Z;Mfk]"
  577.     A$ = A$ + "K[NK=SAmd`j25N1g^]_o=aPjLWH3CMIAl^8WlDg:`aRAN9_;[NRZGo=KHmg^"
  578.     A$ = A$ + "jEMZeD#:Bfa7QjGJK6g<FKOh7Qe0:iK`Zgnik7#>m^7FK^\V4Yg3HmM=ef:?"
  579.     A$ = A$ + "EcLjZ];mDWTS<D;fC\O[SVK6do]a7CY95[]^GH]lB?O;]HfTT`ffPM<]M^UK"
  580.     A$ = A$ + "5[J^>0[0W?ZoNF3G<hflH`7Sej;[CVBX6FfE4F?J4K7jEB\?mB>aZB?R6K^N"
  581.     A$ = A$ + "BOG:N;^]Yc;BnhSejAU4gEdFKLID>;4g7dknHWn0bcNiCHi?k\Cfg]f[f0_#"
  582.     A$ = A$ + "nRIM#0?[F;:IGnAD\0i5Snb1eQ8j[MU3lN]mj0j_kD?DGVeQdn6fjo2d[[a7"
  583.     A$ = A$ + "0fgD7OLOb97[UMWnD8[mfC?e#fJmVjQQNd<i`YkigKMYWoa]Y?>Ao#Qef>[W"
  584.     A$ = A$ + "Mjc\h_U7Se0;cK1_enKZ:;>D4oY6;]#momHT]_a0_]KknNe8RP2`fcB9GSP9"
  585.     A$ = A$ + "8nCh;Pm9cBc:9Y\\M]ojD[>_IYI6[dYJO<PJO<k`MJh3RU5[O#WNS5kG8\nY"
  586.     A$ = A$ + "IP>0Wm07WmL1`:5Wj>\mMQNHOPVmUUigOSYg2#OJ0]9`I2nDh_QJ^TNm>m?`"
  587.     A$ = A$ + "^e?olENcP_B:Z=IaHVeQ2H0l]Ui^SdFcFLndeKC>BYN2`73[3N3S`JC<nXUb"
  588.     A$ = A$ + "diC;gFcTQ:I_S=IeL4kmkP?hmNgA\A9^83AaO\fjgY=8^`UTHT6oLbi\]^kf"
  589.     A$ = A$ + "gX^b;6[Sl^ZC>od3Hm=GfKMHm?#o]6L2[]ff;9EK?TRm?7hQAOm7]5P=heAM"
  590.     A$ = A$ + "h2nPl`=gP]XcKGQ>_]b1Bec#lS#7PE[BeiZ_#0VPJ<VN40cc#<]Yg<`l#L4K"
  591.     A$ = A$ + "NnOPo?hL>kcAhGPhiS?1h;gCmUKicTLK>#;eIe`:aVUlXA\k_MKWNkNhe:FR"
  592.     A$ = A$ + "]FNC8b]H3bgHUZMI]5WS]Oj#MSUOZ:GT\CD::ShTLCJWfJ[5nJ`7SlTbLAho"
  593.     A$ = A$ + "]^lL]ffa67^Ilo0ld8?6dG>8>PTgNZo;WJ?TH7?VjgNVnj#VRL:ENQFm:cnZ"
  594.     A$ = A$ + ":eQLa:_?h#1FjQ>i1TKLfS8GkD7`j3mCeGKF_9Vh<C]CB\WcFa4P?RGa99Xh"
  595.     A$ = A$ + "7`=`A4m<fn2QnIB_kUNoN\QhW4kVmcRk=S>ZY8Ih>J#j]iJT>EkYJDMhXKSN"
  596.     A$ = A$ + "J=fIX5_[Bb`FoB96Z?B3ZVLRc;g_c2Ced\Sf36`SSjkRh0#?P_Uigo#L]OJV"
  597.     A$ = A$ + "WIWC\D9WKSZH<[Wo[jUQc3mdd6EOfh_UnQJojeRcN<13jiBd[l\i?XV_Z[\K"
  598.     A$ = A$ + "EKZlo#KcGc;lK\co1dkJPg<oFCLH7]m6=l0e9F1YTPU;=\3^MK?nO461kS7b"
  599.     A$ = A$ + "FDo;a5AhBN:ONV;97ZUk<SghMIekXb]1=m>cgKk=Z:_DfWWif>mB1We#>caC"
  600.     A$ = A$ + "nCYV_#?7naI`ceej??6[GD0fPn`B?DcBMf\]W4CnmI>BoGim9QkkJeie2#J["
  601.     A$ = A$ + "b2]H5#N:1KhD?=TKDjKHQ5PZeIC[gZMI`G4cQ2V?O9XaWH?#?;R1jGBGm1BM"
  602.     A$ = A$ + "j#o3:Gn>Y?WVDk=FG04W3Fk=H_36``5\?H[L>kPeIBbA;][JfYg;P_2fW<8g"
  603.     A$ = A$ + "SfN6_bQcIoTVJhSQCnjYO=AoXQna?m]NRa6JT8go4?<6lK63l9`J`cI_5VJo"
  604.     A$ = A$ + "2M0Ho3G8l3#l81[#O>RKCN^h8mMI>?j5ifD[LD;#olo__1gGckifJoWUQ?[J"
  605.     A$ = A$ + "IB<K=H9KRELZ9JiR4m;Dkm5UFBBn97_M\^RbcF?FX_aj_#jSC]`TMlkbV;Wl"
  606.     A$ = A$ + "gcPH9Ka:85E3DjYHmQ86i4k>UHfh6TX2dOE;RGfjcUNK8e3IP^]D9H?GQhoJ"
  607.     A$ = A$ + "N0I3^]L[nFX6kQWg^gj6=o5\?W4Sj79:ZE\`fP5G56hW1modcE#K27MFO_<\"
  608.     A$ = A$ + "jXOgZ^nHgQM=SOd\C:NUgm>]_c=DDJF<ZZ:eXT2gIXB;I[JdfMHBcZ]M]ZM="
  609.     A$ = A$ + "ekJmI6[egGAo1n8LfoAH]`SFO>WeoIVO=5`Ne0mB0je6DW6>km2d_\K[Z2D^"
  610.     A$ = A$ + ">iKfjhoUiN#G0kok]D2m>KlADZU?>Zi;Z=bNeKcPK3OYLei_HN]`eO7oUM=E"
  611.     A$ = A$ + "\`hg\S#EO#hcVnD7h63;=O_hZjLbddj`0M?UVFbB19ZJ>fL8b>3=HKo6=WM5"
  612.     A$ = A$ + "S5[HRA<e]5[cX]]1?U]\NgegKGeH?[?I`8N]\kA2dmE8QjkjT=iWKV_3`6PA"
  613.     A$ = A$ + "0o`[=bPlaeJIIncA=TALc8fHln3FQhMcW=l=:=cDU:bAi2VG>BcjLdeFPjW8"
  614.     A$ = A$ + "?fO2CEJ_`h]mZYfb>FYKFOEUVUd_ZAPmOLbg1J;8_9dO2LjS:D7SmECY^f3i"
  615.     A$ = A$ + "c=M[?<eKEd;]:gZANj=]Hkg1[S=efWe;3lGY_9Kel#Yi=oj__DcgJgeGYa=:"
  616.     A$ = A$ + "oDSCBCm;6UnKgF3>#9#?Mkfnom;<F0O\0nHQa_^3_FnBUM_U`DLBD:oZHE^;"
  617.     A$ = A$ + "kBBM7A[nleoCeSI5;aH:>UOdFEke=8aZ?g<fe>ThgfFTXeo[gA819kJC^F[^"
  618.     A$ = A$ + "DSG\Vg1?`jbRJ03kLdV7\G[F2B??H3>bPc1N1\BTZn4N\`G_W:G3gT8F_Z=9"
  619.     A$ = A$ + "HO\ne2mK#j=`dkDM]f\HO497UWC9B[UERbiY#c6UmAln[=7eV>EeV>M[Wf<7"
  620.     A$ = A$ + "iMX[6TCCM`>B7FO3QN\S]?_FOIF\8Xf`8FM4g1\[9^3=FTnnY_o]DL1F_Xej"
  621.     A$ = A$ + "WOIU^DC^IImob2En[`GUS<g2c[TJDA8a5nV\1cmLknof56oVKhm:FV4hjFS4"
  622.     A$ = A$ + "RGZMJ81KhQTS:B3WTdfS#faV2a`5A5djEKIo\nY5e\2aW2<1JbAo1JBX6R3Q"
  623.     A$ = A$ + "JU4\SRKlJ5gWQ;l#mY\1ma1O\IoMGlMe;fNNXMQeT3h3?^_gW4^W[DRdke9Y"
  624.     A$ = A$ + "4F`B[5VUdWbaWl0<GoM8WM_kaf?BYW1LbYj#>bH=;WKV>UC=I[ba7^5Koknd"
  625.     A$ = A$ + "SdWLZQkeRC;h3j5XcfOcFo;5=4eGLVfLm]EEIBC:NXflbfdKUUjOlfmo3;<n"
  626.     A$ = A$ + "gW3gFjBo5NnBC?3EgNLb>2MCBDKDmM4NX67]]]1oEmU[bj?e\6gagPo:oZe3"
  627.     A$ = A$ + "6aKGn;lVm\0MP?RELg;BfeF2Fj]YZ\WK0[KI6f98_FYD#BAYLZ2B2J]gW\S="
  628.     A$ = A$ + "hQ4G8n8i4EXBSIWPL`NKE^hN7ENY[N:Kl1_b9TGj:7En#?lYTKNZm8?dA7F>"
  629.     A$ = A$ + "oLm97LHGe55eim96M0egAoFNXY?Fcn>B\Q5Xi[3<[;>Ook[jHMQaoaN4\kNX"
  630.     A$ = A$ + "fGZNQ=aJgMS:W8OTPlH]R_[J9R?[LaVF3l=P]W_ZoPe]hklFWSHkbj3KKZNS"
  631.     A$ = A$ + "j;97a?ESR3G[=[L[feVmcfk#2gWE8gld7`F7LD_B=VALb[Omc9OZWmjbWlY_"
  632.     A$ = A$ + "VlKo4GFnMOeK:OnGn6bKo<GANQ[\Oi:7\Oi\cd[La3<\jKI4IfNKC6_iVTZB"
  633.     A$ = A$ + ";EaW5OGgfoMKQaoeJ4\W^;Qh]WBdQ^AEOMP66Qn^:h4\k1C4PK;eVW6mj1Yg"
  634.     A$ = A$ + "oZWh0FLTI?41^HeFDFBFa7]\MES^g[jnD<W_ZNLO\m]V]kcZT43fK[NZ>]ZO"
  635.     A$ = A$ + "hKoKobbghSmRb_oKn\fhKnV?SliOY[;Od7m<fNVlCMniTKN^iT3?AgF_>jfm"
  636.     A$ = A$ + "_?;<FH`8<omEf\_NKhS`lgKc72mIZEYHPM_]P]lNPF4j9G;ngJAV];afRj`2"
  637.     A$ = A$ + ">H`kb]ULGBVa_MeGdJ]m=]8dSKeSU9A[lcNjC=WlaOl[8oTO_?]lolKmIU_f"
  638.     A$ = A$ + "7miToT_`7CnD?eET?aCN9iMOa[;OT7oRb;XL^PkTG[lN_]oKb2S56>3_FnbU"
  639.     A$ = A$ + "0F[ZiH=[blYhgZGZaI2<bf3e?;OO\nO3J];cF;`\Ok`N:UCM;26I[K`K9\0m"
  640.     A$ = A$ + "DBKgKCj[Y:\mFV=YnL:JGA8?nAWAnFOl?Tlgl]nRb?j;lFb?hMo`b_gKl<bG"
  641.     A$ = A$ + "neONiSmT?XlV?nE]nHUg;iN^]oKa2S56oR6\6GlKe[DfXGNHe71aURHDifB_"
  642.     A$ = A$ + "CGioHe;a`6Nn0gYQ;0O`jZ:liSM5L`::c4TJ;<KKmoB]I_ie^2YmlcDnj_i["
  643.     A$ = A$ + ":oT_jWGn>ORGCnCn\_YNlUT?g7l6:^hjbUVKBYn\Bmfngo56;<nGJP?TM\i#"
  644.     A$ = A$ + "]n09J:XOk5a6ma`6d[PY6[8f\1_VUJk=RXIVm]CR_;h9lg`Nef:^[k#lLI?P"
  645.     A$ = A$ + "\ZggRTijYMigiI^YlGn=n:bOcgn;;oiOUgAnJOT7GnVOlGD::Qh_]oMNQa2S"
  646.     A$ = A$ + "oe>F0O\`HQaobS=XLSJYb2U3?e`BDKboK]_ebJ<dgULgbJ_c59KHE;FF_R=H"
  647.     A$ = A$ + "m\kcZN09iHfR\oakGFbM\8a]kk^]n\G=IVVL^Y7Gn[o3nJb?j;mITOhGj]UO"
  648.     A$ = A$ + "l_gk:_hU?RDOVaMKoki2S56oZ<HM\5PZAO=gcMHn<fo`M91\:5;4TgV64jCS"
  649.     A$ = A$ + "XmPm1j^ZZ4aSko>5g^gg_]O8Bo_[f<c#FVnH\W_mdWk4b?l[lYUokOQ?ZlSn"
  650.     A$ = A$ + "6_Sl5oh_R5oHnLlm1^oK[O?GH\`hGe1[m4Z]K`3Kb[EI3_GjMI[3AZ7NFG]`"
  651.     A$ = A$ + "kb_UOo:7[7`RmD<1k_TF4Q9NLggU4UonIkYY_nSm#RlGnmUoR_cWCn<OTWdF"
  652.     A$ = A$ + "3Qg^o^]`HQa_^S0Gkb]JFTjLUN80H1?^o?P\1Ek1S=keJ5g__?P4Vg[Cll1^"
  653.     A$ = A$ + ";3K\>eOcjGcbT0GebE\d38mEI9b7iAO#i?k[m>bgkcljB\Qjmk9GkN\hOaeG"
  654.     A$ = A$ + "c2SoccH9gQ_bmoKig]^o:^cgk[YdJb;3[_B#O3RHjj\GU#o1Rhg6Xb1SNg8m"
  655.     A$ = A$ + "KXPGg:TeNg_?aKEGbVmc;a[ULoB_ED\l9OnWDn9Om?Wlon?nKmKT[aeLgNN["
  656.     A$ = A$ + "KOO__5Zkfocnh^FTkbZ^SXUE^XM:[n>BDlnNfQhgm5]hnkO;bZGD8bm\8gTE"
  657.     A$ = A$ + "N71lNje4ee;[W3gGlM:N]dkejGM\Ojj7eZUjWaGUOUig`]E:go7HAbjMOUfS"
  658.     A$ = A$ + "=C7=;?gi?YlGoMomTObGkc;^OG;jGi[1_o0gg_`c_4mg[E^XPUE]X`Dm#AXS"
  659.     A$ = A$ + "=;^]8Oecii_bOF;<ngWSEM719g_nOMI9<WdNnGB>#?O4iclRo?T_oWioOi?h"
  660.     A$ = A$ + "]ooENQcoIT#FCRbM_XgKVWTh#aJ3Qmk]EMg;bjYSdO\3aceHh2?E=7dK_FfM"
  661.     A$ = A$ + "\83c\6hKYJhImbB=cgIai9OnGm5To\Oo_Xl1_f5nejJaWggM9^o1nIkGo[Aa"
  662.     A$ = A$ + "1^YcI4iR;DBaWVUaZlAT;]WGGNZ3oQUSek39QkEJR7;mG^m<Y56okWQKgcM:"
  663.     A$ = A$ + "[O5;oFg?B?bEj^`C9?fQnlbCOR_RlVgho^leoHoEbgngn_DnSnlo_UoX_`oP"
  664.     A$ = A$ + "LUmm2BVAF]\b?`k=man0D]4hK8SigCN0Khmb^?[GbkaR_Kkn\FBH=9inB^?a"
  665.     A$ = A$ + "cEo0bJGbMJka?WOjaTgn5N:i_k?lkHk5goZlikikKAROZ?9_n]FThmmiboS_"
  666.     A$ = A$ + "[J5BYaEUDNd]9mUnQT7^_?VldCo>bkldo0iKl6o4ico4O;ie^dWEVXY;;5U#"
  667.     A$ = A$ + "ojL>1XS5hNmOT6nL_g]TefgR4jZMeSl2OiA:k[n7Fn#Wo[;OogATof_]XLB4"
  668.     A$ = A$ + "ioW_jO_lSojo3bO^NO6oMOOANU7iC8n\\#o=neXK;nN=M4h;0nDXGOcnhV]o"
  669.     A$ = A$ + ":0V1^F`]Re]KbA^EY[jZBRN;19N[H4ZUaIk\IiSod?Vl]Og?i_dOfNLW_OaO"
  670.     A$ = A$ + "eWEXgoRT]\d59a_nU9U4O8F?6i6WnLB7I<XLQ^NJi5fkk:Ojco7:OcWk7;om"
  671.     A$ = A$ + "o1RlGm=nkUod?mOYlGlk9bOcgETo\o?]giMLEaifNODA5A1YgfKjmN_GDA01"
  672.     A$ = A$ + "a>R8XRPm2:2F0EDA5DDQ8R:4;a6J\T#454;8H;RRUH_5=6;97=J<5SWC<Vbg"
  673.     A$ = A$ + "gWIllNOolniN_WkiVLDC>Io7OIVm\ic<?kiIn=[eJVWWej6BSWoXaPfl7clc"
  674.     A$ = A$ + "iOFAUnhO<Zd7oi5[eEC<#hgPDnHeDa6\E4SIiCHeLXboH>MU?2n;847Bl2A7"
  675.     A$ = A$ + "n?c;nR_7n^G^]O#lMOe]n>lafPN]eNUV?fnhP=4TK>9l]AGii8RkFK>^HQIb"
  676.     A$ = A$ + "c]:SKOKUWWEnkR3HVdk7a6c`b>ZQLM\XZEE6=EGeo_jhIUjZSC]A=lAX=j[S"
  677.     A$ = A$ + "JbTj^CLhgMNdL][PC^WgWe_hUcdkgRhd[mci;Z3^Ke?3^YhlcGo3`;nIhK#n"
  678.     A$ = A$ + "Lhc4jU78d9YekIREJ78jgZOkeR?ElZ7[eY]X\]ZAGMD9>gfF#6MI`\n\F?7M"
  679.     A$ = A$ + "igT;]U_5^UDO]0Q\hWOlCiGNR#W8^4#ZOo7Nh?c3_fGBOR\o_fJ_Bie<9TZG"
  680.     A$ = A$ + "l^JY2I=QYJe>iaHU3VI4J;djB;=G?]AO]JSlL1aN3eF>OT_TLV45=SYloha#"
  681.     A$ = A$ + "I;D7c5[hT8FO?4JSXDX>S:2[IW;:M>cfW]`#JSldk\Onl;f<5?UlIiS]B^c>"
  682.     A$ = A$ + "oA^OERC;=`;?Wm\OALOTo:l8ai[70?o^R_CHc=[DG:>XO4_akgEaold7oM5G"
  683.     A$ = A$ + "eD=2b0eI7cIaDaHF4=]RKaINk7c;>]X_Fdgbm5l`o>OiOgVbSQcGoUILYTa["
  684.     A$ = A$ + "ef[c:UV3Q69WO7Tb=:NK_eHQ#?8I3AY>M#F_XK[K1V:FGBg8EKNUbQo7H[[C"
  685.     A$ = A$ + "N<_o?JOKCKJ=N9lUbGQ^Xk:DS<R`Bfd<CTZFl`hN=o>l;?HoR[m?1?nje`]J"
  686.     A$ = A$ + "^AVG6IaLC^H^dVO8gHCO;GO3?QWLPOnUfMo<YcM_POnCQ_mJ`GLNaij#c67="
  687.     A$ = A$ + "XC_akcEaoLX#lWd2?HR`LeYXQ55gHWKSU?ZYAUCZ6Ng\KRk:^Wh3ZAL[`39^"
  688.     A$ = A$ + "Eh9oN^kQO2gZn7`C_b?a3?oCiR7lj<l46i[ef\GfJ=>JV9bJ4;eC7iliPTOF"
  689.     A$ = A$ + "6XQjb8mImJC;Uc=46YIK`2]K;e\QEb5?DMoWb3cFXI[`=3d6KD_EhD7J9NYU"
  690.     A$ = A$ + "J4WiZah3eDfhTSRJGd0Yi]==>K]cSGlUe;<Jf<obGN<Nd7G7Oa7O:Fj\bS9g"
  691.     A$ = A$ + "_LHKcN_DOAWQZcY9^dkl8Nh14WO>dOSkdhMh6kkch3gfWAEUMI<_MAPAZknK"
  692.     A$ = A$ + "lnMEl?7>dZfBPJgN:8e#iFe]0N`AZTM^`ia\kCQ\P4[TM<i;c^ck6LfbO<Oj"
  693.     A$ = A$ + "NnKlYemMLcJO<?hh?SZFfNhdknS#YV_NmUfM[]D>OKYD7]5f:J_lHQg=[\03"
  694.     A$ = A$ + "JG[AKQ?ABiQK3KGKaDMe3CkPVHH[ESgMi5a5>bN82OnoY?Tl[L69eCb;YhXK"
  695.     A$ = A$ + "V[91[[8637J=_m42Sj:I0L_6W=gkXicm>GIlEgO[2S1WUOn7>9lg^0OkWO<n"
  696.     A$ = A$ + "nWLCflZF6AHGH<VHV8c9aRISSOODm<>;=EfShfEoCLUZoH^b^nL>lV^?38\l"
  697.     A$ = A$ + "#?elR>Xjm5n76\El7o4nBdd6V4ob=F3OJm;QKDcJ85_BVDLOBTMGG55VdfIc"
  698.     A$ = A$ + "C]A^f>o2^cNo:NnUQWLfo6goDo5Nnmn[_fKcBj3C4GgK^^M45MD;iee[=ZS9"
  699.     A$ = A$ + "2oZTd8Veaf;_MU6J2>Y`DiadkNfD5laWZAlaFc#A7J5CKX9a\C=16X3VAdjY"
  700.     A$ = A$ + "69hTJ\TQj5k]T1b5fi4hV=<=N`i;P_ocFU#G8\K`A4L2h7KB\lJlSOg7aGnP"
  701.     A$ = A$ + ";BmkI7hU5^:lA]gTX?9AFA=;6RWIAiSYFZ^`CbagDCLl=ONFh4Z45]>HdB]G"
  702.     A$ = A$ + "OelHElK7G4JSdlG9OaA;0nle`C?o:iA7_BjU[AChV6;mfcABbQ?6VB:ibLC?"
  703.     A$ = A$ + "?:J<cWBVD1DbTW?W_aSce?aYO]gVma174n#I\`^Q9b_O>7TlebDSOYM3QoD>"
  704.     A$ = A$ + "Zd4j#;K9VJPAdm>5ZLNLXV=^2^baZC^fJ8EgJM#HCaEafkEkK9Cb;Si#EdK^"
  705.     A$ = A$ + "F=CP[__\hnGLnllW\6nUG\MQF#hLicZVOiYE3Oo14O^I1GQ_kIWRSL\Zh^gi"
  706.     A$ = A$ + "Z4C`M1g=aALB;[9AokUPn`TjOF<VN<LFJFiaHkk`A7eDmlZnS8Q8lYH13`7h"
  707.     A$ = A$ + "SG=?o2;4^ckbM>HiDBfiAJM;M2aa89BORR4R>NB9^NB>3KL<THSW5<UYB]KI"
  708.     A$ = A$ + "CL]CNlGk]IOM`9l`JKUm_BQ86LYLbVTV`156Sn]]ebcMMSUNfE6H83ZWm6cd"
  709.     A$ = A$ + "X]LX?HMLgcOHf#95PCjf>2d#=`Kam6FFRMR3EDjRH_W<Og]4onOdZ5f8f1lL"
  710.     A$ = A$ + "1oX8h[ojFi^Odli>WJNl9e?7^ga;VWod6hWOnYYnm_AFAY5Bme^Gf`:F=;LJ"
  711.     A$ = A$ + "cQI<j9aLcNJ\l2G4_gk\NVBJ35gEJiKlnIEloN\Fmfb#LACfbh2W_MocS?Je"
  712.     A$ = A$ + "YbEZJFRH:G=U>[L9_\V<i=Ui#ni:R79WlX`iV7c:W\II;<OFn2W;Gn87T7Li"
  713.     A$ = A$ + "cmJ_MkSCNPcF8UkMd2_Ld2\EYnHY9M4CdYMhSM>Q=2MQ]:K76ZM[aAM]EhcO"
  714.     A$ = A$ + "KYf:;E4oa7`]?i9Hb9W<fZ^Jh_QZaAGoTicK^4nV_Fh7egG9l=[7NQ`VaCn0"
  715.     A$ = A$ + "Nf5:QkOTYb][O4dLUmVV:O`LXB72W_VliBkOaLZ3l><aQgKB?eD8Sa>NVN^i"
  716.     A$ = A$ + "Aa;^D:KI[T\W#VdWhkiKlnHEl[7Ej3Ej3ElO?FZF;8g^H5k?_n`aFd0I3S?H"
  717.     A$ = A$ + "FfHk4UWc04nDk:Nk\=h_GNC_kN?XWa47Y=d49a4SSQVL_8oYUQ\n#B7mj^Mk"
  718.     A$ = A$ + "^=^PM6I]LNgE:OnhRMVRW>K11iY[HHKd6mEG3dA3e#gfZ6:KYYHM[<RSGgJi"
  719.     A$ = A$ + "C_`NiQGjSh2k[>bOTmQA5_GLi6G<goB;SOlG4aJ8Q#OlEWNAlX3E4gHkIbIg"
  720.     A$ = A$ + "`#Xj564K:GgISC\c\ld2RE<a8HEi6?cJdaCRAk3AeU`8VHRQ1Uj`8Y1U6N7P"
  721.     A$ = A$ + "ZlAmo>PRFd2V#4fb7TK2\ddlSlC`Ab^G>Af38#jN#^:?FVLgFK9f`k4m;j^a"
  722.     A$ = A$ + "D6o`Ha5<M6mPk_L]E[Ve]:\GWo[W;4_:`LAl6fKQQ4Qg1SK:\3?\D9>IZAH]"
  723.     A$ = A$ + "`fQD^aBQfM0Ce#O<#mf;R1AMiiBXQZ9F_]j`1[Z4^nIf1glDkW6N_EcnZ\0J"
  724.     A$ = A$ + "^jBi7^kNQ7G;oU[D0gYiY;\UT7WM;SPj;=9FgTj<ETIXTC2VC6aH4Y7\i<\#"
  725.     A$ = A$ + "\V9d3kIHMe66BdN;GoXS8h08Z8STXSBE^cjOW#J><TRGVCYS8J6GdFBjQK<m"
  726.     A$ = A$ + ";03X7nI2ahUM4^;>Bdnj3AhV[dI_mD^nn]RRV]L=QL6S9MVj_ba9n_6\b03X"
  727.     A$ = A$ + "WM>2R9<o9BO3TXm>02c97af>Z=1k^]HYA]3mD_eXO;dV>XFK#_F[6jeBe`=3"
  728.     A$ = A$ + "\RRVhDhL=^I>C3EbU?jNHk[Na\m:bUVfebhNWN;lCg[6NjEF2gHoIC3[9AFk"
  729.     A$ = A$ + "TmWb7_OTC_]WafE[8e8\Vdj\c4Wc:9Ao\W`]DMB><79i^nbjLHG3=dghmUZh"
  730.     A$ = A$ + "OmHVj]RP<F36NWMS42eLRf;M8nPEBL1J5NKRf4TEVAbAfIjI0n9OM#ojB#DB"
  731.     A$ = A$ + "NCV9VB2\Ri<3L#LoLYank[dfX^JA2M;J6LOj53\7a:?NMS=#o8YXj2fd1=aX"
  732.     A$ = A$ + "Ff2dAX3<DCeTO>^J[VVHBKdW83aIiL;jV:IUlAkm#DgVF3KHa5A3K[J^hQ?2"
  733.     A$ = A$ + "7Ng[VVgkZif=G9gnHE`;^dJi[?EIRh_bU<jRfd77DSDlGOjY[6#`:<R#=G9Q"
  734.     A$ = A$ + "HQhLT;>#o3dI:9ka8?VW]AOMOSg?ZRGMh^^JBLRkofIQM4G4gG<8G=T`Mg<2"
  735.     A$ = A$ + "g>cXK^H?A8^NLb3:AiJBlTTZkiSJ8<Wa?26GRmiEJkBYAjRK>H=M=T0H`m;N"
  736.     A$ = A$ + "R=R0UcSEVeQf#L1k^LM<cJ]J3N;^^eH]D3m54RgN`0R;9:8g2XlUG85=gL9Y"
  737.     A$ = A$ + "hk;m?VN#4Nh9^HZi4C0MQDjI_YPi<:>DM[TOjaO8odm[W_AXCnbVZT7L\ec>"
  738.     A$ = A$ + "Gl8H\AI1QIA;`OCe0Wdf01V#0FH5>:^W##FZPaf_G]onEa_?`N]dR0\bBldN"
  739.     A$ = A$ + "5hRm6QO^[4oLF1nZd0leHM`>=J1EEAa\XY=JiJ2cXCX7<f4k5>Kd[^JTZ[fH"
  740.     A$ = A$ + "19fCAl^RSePjOl4X7fSi6dN<G?=U7?^jd6e`4]ES>:\KH\6]6OmfBV#V3REE"
  741.     A$ = A$ + "AiTm4W>Y=hASS^H=^jQK2l15VY45VX?VY_>XQ`_;e5a][_2e`BKESL7KTLh]"
  742.     A$ = A$ + "_8hAGS_nRO8WL7[Wob9g3=]SRa7UZQ;6dB2aFG5nRZ;>ZK7`9mjP`fEg4nG>"
  743.     A$ = A$ + "fghmMZhe3:JSfb;Ma9[`Ik=Ch;O784k=W#]d4\GhgbNfdbIlY473Y7ME4g^g"
  744.     A$ = A$ + "HVV]jEFKYc1j;m<Z>C8nlbWOVDlhFHX8^KMJ[LmDCJnbZCk5GO;d7FIR^Tf0"
  745.     A$ = A$ + "CVUDFQ<gU<KR<nNadVmBXPU\JfE3=#=7md\nMg0E\igWMEOmDe^f=[FhWeD:"
  746.     A$ = A$ + "HbHQ?M4m]BXAdG4SRaZaKUKfLoCO>hYO?gnT7S[O\?PM_i5:RibI\a0C`8=d"
  747.     A$ = A$ + "6kdYeH_N]UU>g5n6_?C5_i#QnBj3A<8VZ?1J]Adlnf6QjYibeUVGI7c>fNii"
  748.     A$ = A$ + "iD?jBh4Zg^P_2]QG>H9^H]9be=:UjY16[M[AG=D7C<BM\eFMIfcNfDdR;S9>"
  749.     A$ = A$ + "[i`KonEa1>k7cf?`iXbJKVi^bgU9^`]BfUnNTc:f>I_PgVl;NM\^ZZVe^kZH"
  750.     A$ = A$ + "S7J7DfF:FX15f4<Y5X[j]4k<b6b8e9acOdg`M_LClYG]FZIWUAkJC;4jafS]"
  751.     A$ = A$ + "6X>nJ[ATn0OmmL9Da_?a9Cd3W<#;LcD]iTeoN_b>>Bek3Yi>K<Rh<jT_NBOS"
  752.     A$ = A$ + "9BjKgj<1iQSbJ4kDX7>XD?ImQAJY>FITA<T1g?N[UF8iG`BIMKk0La7n2Z^i"
  753.     A$ = A$ + "?QL:[:VjB[RIENMTcbf3S[T3AZ5]76Aaea4F`^IJ;XJ6k\G1S[`UcX;J9<oe"
  754.     A$ = A$ + "D1e]ceBZm9LiaYRf]AGd\56Ai5of`gm5lIgY1^oWMD6N63UF8l;CY1_j\KZR"
  755.     A$ = A$ + "oHQ:mQ:mQ:n_75M\MHUn_lMoehNff[dSE0^HWllT=n>5:M90O8<_MWn5CWUg"
  756.     A$ = A$ + "^D=hd1Ce5K<D;2c;GXoae3Ve<W9;N9;UcNiW`]O2Dhj?1SYXJHfKl\<VUD3Y"
  757.     A$ = A$ + "Uoka8boPT`<?69Dh98i5d<Y=SVHBck4<U5M#6G1kVa]XZIXCKYLh6f3=^k=P"
  758.     A$ = A$ + "56eJJK;E73dd<6LO6\lkhQOnFl]oe;BY[OI<c5??DX#;6i`Nm=GREaO<XQJO"
  759.     A$ = A$ + "?R=b0OU\_S:X08jPmU9>\DYGA61A8\Q4OW33g\b<l`6UHRF]6g\dHiLVh8C\"
  760.     A$ = A$ + "g<W\bQ]]iM#eEO#^kG2Oh=PAE#3Tib?73^P6Id;[AVbZ?59=eSBlCiD4fD>2"
  761.     A$ = A$ + "A?mVH`chR<bIOBBKVe``bOo4ohf:9WmJYb=\9fmFG5QhU9H^ajAkJQ6<VTCW"
  762.     A$ = A$ + "Rc=;Ff267?h1=ck^gM`GccYU]B=fnFGkKln3Elk;:KacW5Vgoj7WEniR]T#g"
  763.     A$ = A$ + "j:9g[H`FSeEN^_JY1j8?gHUbo2BiI1g]dDLg<3ID9d;FOa;Tb;\8fg^f7Wl4"
  764.     A$ = A$ + "GS;MGHeeN;QODGPDVkIH`;YI6bKM#6hl[UQ?W[A_bmjdYIN2RJFWTT4JS1WO"
  765.     A$ = A$ + "M<nB[SaDF3doID?I]d3CQ5^4FEYcS0ME;<^S]4]JM[InCJb\T\67KYTYcb;<"
  766.     A$ = A$ + "Kfb>g>?SOR2Wg<Xh2ck=NoQ:nm5A6L0L]V?eoBgWMbO?X[1k33Z?aBhnhR86"
  767.     A$ = A$ + "4=#7eE3SkP6biH1YHBTZm7Bi>gdjI\\`YT9GXamCCeD=kJ[Ea^Zn`LV?5N[?"
  768.     A$ = A$ + "hR<fbn4bh]O<QWi^H`;kPTjBKP1>ecCLCnb4C1WWHVoYY_cj39e2ZUQ^TM`P"
  769.     A$ = A$ + "4nR5LjkTnVekCfi<3B;iHaTf[6jf^Gn<S[H^cQ6OWE#mED2K_d5`#6j#IjcN"
  770.     A$ = A$ + "F2o<Ooghm5ZhgGHU2c`LmeWC^gjo?fVM6If_imKXNiTL]VEOaeT:d[MhREV:"
  771.     A$ = A$ + "Sg>HSL>^Z[ni3Ma7_86omQ>kZ34UW^#F3I0Dk6F9Od7nQ\Qe_MZ^YkAIkkZT"
  772.     A$ = A$ + "jB^29<g[CDcHodoB[U1FbN8UYOERM:WSPbm#4B^=BOVaa9iI_KBE4ga0:h04"
  773.     A$ = A$ + "i4KVHW`^X_39929H;aEcK51j[eTo\bTgMY;TZFh\HmC<3:NTSVNdUh8eT74A"
  774.     A$ = A$ + "kY]XXEojc[eZhOo`9K]AhcSA4Rc^ChNiSlf\BO3o=]?]aHma>A<gnjTEdU0M"
  775.     A$ = A$ + "WPmbA2fCW`Ck]P0LcN2b=78FQ=;9Rd7gXc^k4QkRmhUB39DW=Q=\RBiBWiBD"
  776.     A$ = A$ + "aFJPInfe8kOe`FbEYo5f03N5e`PGj>I`cZ9joL?>mYXS#gWk1XgC^6B:W]A2"
  777.     A$ = A$ + "I]J6#>KWn<aj9b1]L\d1[a1KeV5?ma`6FeRIkEF>;NJSWgJL3S:6O6<iNe?:"
  778.     A$ = A$ + "LZiaafg1`<Qm=;KW:mQ:no7g]a>LFY5l]Onm9]ng_OCk;[<DGiH`kTON9d7f"
  779.     A$ = A$ + "Ahni:a6V?4K4nmB2gOjMDQAT1j9n9R9G:^L?\d8lcNU4R;FPOfZ?1hPU4\KN"
  780.     A$ = A$ + "#3eMJJ\aKA6chmHXCI[<R5^CBJ>[EH;IETBQKP1]`gE4;bV9QY_6B:k:HdcL"
  781.     A$ = A$ + "MTF65CJSMadmN<A\db09ca<1f`:G6[^hlI1cHB<c<79iWiXHJYU2cL43SZZX"
  782.     A$ = A$ + "LnXSNH\GQZi?^:n?SIMDjnl^PnJX9ITFZLccO6igam_fmW[F9=n^\W#ldEjJ"
  783.     A$ = A$ + "#nABm<6B<^>Q_>K9QhU3hU3:UGgOG5j2k<3OMdLlfN5RhW]V^j[Sh_M6#`>K"
  784.     A$ = A$ + ">QjZm4Z;1bD7k\hlWo[Ho=n9\b]M<ZnTgV]fdEXhM^K:LCKUY]dEA^5G1U]Q"
  785.     A$ = A$ + "gWe\iMcBO[eaR:\DVAVIab:HN\aU_2:IfiANI<BZjM:W[fdQhC?g9iaObehJ"
  786.     A$ = A$ + "Wn4\[]\aghm1ZhgghZEf#0^j^LndAjiaNk;NN>JMebBWoL9[A>LB^WaCOS^["
  787.     A$ = A$ + "4C819\54Rlj3\7MWTR?>iaUn#CX_biAT`ma3IMQdkg#JmH2=#I2f374J5_4f"
  788.     A$ = A$ + "DL3G]aDlcEK8DOLV#lf9Q]6G9Jag5Yo^So2MCTnI3NHUfhWM6SWFI>FYWnde"
  789.     A$ = A$ + "#SViUOaLZcLEJnLGUKnI?P7md7cCOf3iNgkZLkKM1^i=>7GlD7SJfa6IeRH^"
  790.     A$ = A$ + ";INCQlc>=:MNIbK=W<I7[]Lfi6G3[m]:RRWM^<n1WlKlckZh?6XBOX2El?6;"
  791.     A$ = A$ + "4aT7\k^:WgeR;l#IDY<#:EhObfOWe8l1YBZNcKBNm=ofUcj:[Di_KNCK:2oO"
  792.     A$ = A$ + "6=SHP3#>V3OLdFlbN[o?d8B8UWeUd7B?SGoMa6R><Ya_KXh[;RH?Lg>i_[gA"
  793.     A$ = A$ + "62a7A0hWCRh?L`0R;<78^#MBF[4O4NPKfJ:N8R9aMk\RQWb08cAVZ86nRHgK"
  794.     A$ = A$ + "\DZO7E#MKY<FG9iAIcIBDD>SVlc:M:8gAaFGe2XXI>B6o#kYL]gAZFklVnl\"
  795.     A$ = A$ + ":nS;BiR=W=G1nhPMbiH:?\a:LeBcUoL#^i2Mf?O8b0lC6Ye3eCgU9<_l#ncB"
  796.     A$ = A$ + "d9OmVX2fOiH?TFfkXj\\]5oLeAQm2gYC1hSlBO4aX4dOG7=P^73Yd[^Cbm8:"
  797.     A$ = A$ + "6D_4ooQJ?M;H[aGkK7NHM[9<O=1g\^m4KP>B4^ZTHme>RcC[9Y`lPAdm88c4"
  798.     A$ = A$ + "SSLB]oTARmDnI4?g<73;OncRh3oEcH2#5oi6YLOK8Nh6>Z`DI=R_>J_lBWDJ"
  799.     A$ = A$ + "6^HQBAldf:_=YeUf^o>kXlfTdFfJ\Qb?3;Yj?PdH2d>COic:fFc<BFCH_BC`"
  800.     A$ = A$ + ">56CPNh2Ah_gbnQ5X#k8=n\lcNKXc2O^6k0k6IVFgYlR6_`FEfTNB1Cj3<LB"
  801.     A$ = A$ + "X[NARMe7BY[nbXkIW8mHSPQ;dDY5GG8cTCP5TE6DbdcU1d]XU?V:eF_gHW3E"
  802.     A$ = A$ + "Q:n]Pi6Y?fKQ2Q_CF9KOBB_e5QmW`5jbN5Z?TN_STdB8LbJDmQgYRlIFi<26"
  803.     A$ = A$ + "CjmS4jNh<dn6=3;Q^c4BO#<ndCQY>nA`85f=2ChSgKjOGZ#5o[6Yl8ZT]Z#5"
  804.     A$ = A$ + "JS8m;02aI7807\2_M`4lbAc`K?]S>5QOTDBmUT7#OIX9gOVhHBWTjG_aF[Dm"
  805.     A$ = A$ + "N;DaON`LMd3GDJ>N:lKc=QoF^H_MhTS>SefJ7:\`F\aF7a25ZZO0Z#5oOAOM"
  806.     A$ = A$ + "EY7DQ:DaO^ho3<B9%%h1"
  807.     btemp$ = ""
  808.     FOR i& = 1 TO LEN(A$) STEP 4: B$ = MID$(A$, i&, 4)
  809.         IF INSTR(1, B$, "%") THEN
  810.             FOR C% = 1 TO LEN(B$): F$ = MID$(B$, C%, 1)
  811.                 IF F$ <> "%" THEN C$ = C$ + F$
  812.             NEXT: B$ = C$: END IF: FOR j = 1 TO LEN(B$)
  813.             IF MID$(B$, j, 1) = "#" THEN
  814.         MID$(B$, j) = "@": END IF: NEXT
  815.         FOR t% = LEN(B$) TO 1 STEP -1
  816.             B& = B& * 64 + ASC(MID$(B$, t%)) - 48
  817.             NEXT: X$ = "": FOR t% = 1 TO LEN(B$) - 1
  818.             X$ = X$ + CHR$(B& AND 255): B& = B& \ 256
  819.     NEXT: btemp$ = btemp$ + X$: NEXT
  820.     btemp$ = _INFLATE$(btemp$)
  821.     _MEMPUT m, m.OFFSET, btemp$: _MEMFREE m
  822.     BASIMAGE1& = _COPYIMAGE(v&): _FREEIMAGE v&
  823.  
  824.  
« Last Edit: December 14, 2020, 03:19:25 am by NOVARSEG »

Offline segura

  • Newbie
  • Posts: 3
Re: Solar Flare
« Reply #38 on: December 14, 2020, 05:22:42 am »
Great job!

Offline Dav

  • Forum Resident
  • Posts: 792
Re: Solar Flare
« Reply #39 on: December 14, 2020, 08:53:05 am »
Do the screen captures produce bmp images?

Is it possible to capture you tube video images?

Doing a program screen capture in Windows (by pressing Alt+PrtSc keys together) sends it to the clipboard, which I *think* is in a raw BMP format.  After pasting that into an image program you can save it in any format desired.  Normally I'd use .PNG when needing transparency because .PNG can have/save a transparent color with it.

You can copy a screen shot this way for any window, even while watching a youtube video (one image though, not all the frames).

- Dav

Offline bplus

  • Global Moderator
  • Forum Resident
  • Posts: 8053
  • b = b + ...
Re: Solar Flare
« Reply #40 on: December 15, 2020, 12:49:24 pm »
@Dav did not know that, that might come in handy! By pasting into an image program I assume something like PAINT?


Better late than never, I found a way to mostly clear the dark background color mix.
This is from code that had embedded image but did not have transparent background:
Code: QB64: [Select]
  1. SCREEN _NEWIMAGE(1000, 800, 32)
  2. 'SCREEN _NEWIMAGE(800, 600, 32)
  3. 'SCREEN _NEWIMAGE(600, 600, 32)
  4. DIM starx(1000), stary(1000)
  5. DIM sz(1000) AS DOUBLE
  6. DIM speed(1000) AS DOUBLE
  7. DIM x(1000) AS DOUBLE
  8. DIM y(1000) AS DOUBLE
  9. pi = 3.14159265358
  10.  
  11.  
  12. ' AHA! this almost cleans the dark background mix without running through 3rd party image enhancer
  13.  
  14. pic& = BASIMAGE1&: _PUTIMAGE (0, 0), pic&
  15. FOR y = 0 TO _WIDTH(pic&)
  16.     FOR x = 0 TO _HEIGHT(pic&)
  17.         cAnalysis POINT(x, y), red, grn, blu, alp
  18.         IF red < 25 AND grn < 25 AND blu < 25 AND alp = 255 THEN _CLEARCOLOR _RGB32(red, grn, blu, apl), pic&
  19.     NEXT
  20.  
  21.  
  22.     ' _LIMIT 10000
  23.     a$ = INKEY$
  24.     IF a$ = CHR$(27) THEN END
  25.  
  26.     'toggle full screen mode
  27.     IF a$ = " " AND f = 0 THEN _FULLSCREEN: f = 1: a$ = ""
  28.     IF a$ = " " AND f = 1 THEN _FULLSCREEN OFF: f = 0: a$ = ""
  29.  
  30.     stars = INT(RND * 100) + 1
  31.     IF stars > 80 THEN
  32.         s = s + 1
  33.         IF s > 950 THEN s = 1
  34.  
  35.         rad = RND * (pi * 2)
  36.         x = SIN(rad) 'get direction
  37.         y = COS(rad) 'get direction
  38.  
  39.         starx(s) = x
  40.         stary(s) = y
  41.         x(s) = x
  42.         y(s) = y
  43.  
  44.         'Set size and speed
  45.         rr = RND
  46.  
  47.         'large photon
  48.         IF rr >= .5 AND rr < 1 THEN
  49.             sz(s) = 1.4
  50.             speed(s) = 1 + rr / 170
  51.         END IF
  52.  
  53.         'small photon
  54.         IF rr < .5 THEN
  55.             sz(s) = 0 'returns the smallest photon
  56.             speed(s) = 1 + (rr / 100) + .0016
  57.             '1.0016 'slowest value
  58.         END IF
  59.  
  60.     END IF
  61.  
  62.     FOR t = 1 TO 950
  63.  
  64.         stary(t) = stary(t) * speed(t) 'accelerate photons
  65.         starx(t) = starx(t) * speed(t) 'accelerate photons
  66.  
  67.         cx = starx(t) + 500 + x(t) * 50 'used to adjust origin of photons to size of sun
  68.         cy = stary(t) + 400 + y(t) * 50 'used to adjust origin of photons to size of sun
  69.  
  70.         IF f = 1 THEN 'fix aspect ratio of photons when in full screen mode
  71.             cx = starx(t) + 500 + (x(t) * 50 * .7)
  72.         END IF
  73.  
  74.         r = sz(t)
  75.  
  76.         c = _RGB32(255, 255 - (starx(t) ^ 2 + stary(t) ^ 2) ^ .5 / 2, 0) ' <<<< yellow
  77.         'the square root stuff gets magnitude of position so the photons go from yellow to red
  78.  
  79.         fillCircle cx, cy, r, c
  80.  
  81.     NEXT t
  82.  
  83.     LINE (0, 0)-(_WIDTH, _HEIGHT), _RGB32(0, 0, 0, 20), BF
  84.  
  85.     IF f = 1 THEN ra = 1.428 'fix aspect ratio of sun when in full screen mode
  86.     IF f = 0 THEN ra = 1
  87.  
  88.     FOR b = 0 TO 55 STEP .25
  89.         CIRCLE (500, 400), b, Ink~&(&HFFFFFFFF, &HFFFFFF00, b / 55), , , ra ' <<< adjust to shift color over 50 instead of 500
  90.     NEXT
  91.  
  92.     ' _PUTIMAGE (500, 400)-(700, 520), img&, 0
  93.     ' _DISPLAY ' <<<<  moved to here so sun is draw over photon formation circle
  94.     ' DO
  95.     ' i$ = INKEY$
  96.     ' IF i$ <> "" THEN EXIT DO
  97.  
  98.  
  99.     _PUTIMAGE (500, 400)-(700, 520), pic&, 0
  100.     _DISPLAY ' <<<<  moved to here so sun is draw over photon formation circle
  101.  
  102. 'from Steve Gold standard
  103. SUB fillCircle (CX AS INTEGER, CY AS INTEGER, R AS INTEGER, C AS _UNSIGNED LONG)
  104.     DIM Radius AS INTEGER, RadiusError AS INTEGER
  105.     DIM X AS INTEGER, Y AS INTEGER
  106.     Radius = ABS(R): RadiusError = -Radius: X = Radius: Y = 0
  107.     IF Radius = 0 THEN PSET (CX, CY), C: EXIT SUB
  108.     LINE (CX - X, CY)-(CX + X, CY), C, BF
  109.     WHILE X > Y
  110.         RadiusError = RadiusError + Y * 2 + 1
  111.         IF RadiusError >= 0 THEN
  112.             IF X <> Y + 1 THEN
  113.                 LINE (CX - Y, CY - X)-(CX + Y, CY - X), C, BF
  114.                 LINE (CX - Y, CY + X)-(CX + Y, CY + X), C, BF
  115.             END IF
  116.             X = X - 1
  117.             RadiusError = RadiusError - X * 2
  118.         END IF
  119.         Y = Y + 1
  120.         LINE (CX - X, CY - Y)-(CX + X, CY - Y), C, BF
  121.         LINE (CX - X, CY + Y)-(CX + X, CY + Y), C, BF
  122.     WEND
  123.  
  124. SUB cAnalysis (c AS _UNSIGNED LONG, outRed, outGrn, outBlu, outAlp)
  125.     outRed = _RED32(c): outGrn = _GREEN32(c): outBlu = _BLUE32(c): outAlp = _ALPHA32(c)
  126.  
  127. FUNCTION Ink~& (c1 AS _UNSIGNED LONG, c2 AS _UNSIGNED LONG, fr##)
  128.     DIM R1, G1, B1, A1, R2, G2, B2, A2
  129.     cAnalysis c1, R1, G1, B1, A1
  130.     cAnalysis c2, R2, G2, B2, A2
  131.     Ink~& = _RGB32(R1 + (R2 - R1) * fr##, G1 + (G2 - G1) * fr##, B1 + (B2 - B1) * fr##, A1 + (A2 - A1) * fr##)
  132.  
  133. '*********************
  134. 'EXAMPLE USAGE OF BASIMAGE1&
  135. '===========================
  136. 'SCREEN _NEWIMAGE(600, 600, 32)
  137. 'pic& = BASIMAGE1&: _PUTIMAGE (0, 0), pic&
  138.  
  139. FUNCTION BASIMAGE1& 'ss.jpg
  140.     v& = _NEWIMAGE(293, 108, 32)
  141.     DIM m AS _MEM: m = _MEMIMAGE(v&)
  142.     A$ = ""
  143.     A$ = A$ + "ha9]mN7MMUMMWV<12260H6<C2B`8H>W3P8B#TciL>W80A>`L^H>ET59[L>XB"
  144.     A$ = A$ + "BUT:U:YB1K[DKIIIkF>KIgMKk^M?fNFSmJfcnKoNW7AA5ldmJVoh\^gg=m^_"
  145.     A$ = A$ + "kkLn>ofQci>aa<FIBSMLB0SN<bT7WORoSJDb4e]5hhmGFcBGVEHolIf>kO:n"
  146.     A$ = A$ + "=nWN>SN\bD6ch\?CI2jah:1`a<ZaJU9i]<UAiWE2dGIlFIbSNLN:SI<N:SMD"
  147.     A$ = A$ + "FIBSKdFIRjjS\h>^Y<faJ;WPNO5`XeSCGW2[kigRkcSan=`f\kcAiMoSF??n"
  148.     A$ = A$ + "=YGWYi_obTdcS?7TOnIKSSUW;^Ocn[GWa[Wkh7eHdcGgohlGV\OC#Vbh3#2J"
  149.     A$ = A$ + "2Cb:\^khiIVkkJTgSlm<AmcfmPnk9PahIMkh6]W??bU^ScM<c:`9I;WfT6_N"
  150.     A$ = A$ + "?YO>X9:CLLja[7c4dc9Xa[?K6WWUcHRSGVKPCDFhd3DFd<2bGIacLZb2dUcM"
  151.     A$ = A$ + "ZCFFX^>U#WO`bRVedTU=_IK[_hI?MIm;?49Ti<CKKDFn2VS\b5=?KibGdlU#"
  152.     A$ = A$ + "Ghl\U[Ha;#gnle[cdTPe__E\`iJ7oVGmbUe^\5K[_YE\D9\U\0I9jga>FkZT"
  153.     A$ = A$ + "M^jE8Q]Pi:[C?_]_b#U3]i=8[NN1;[L>cbn<kWeGclWS<Ko7W\ZiZgGcJjb6"
  154.     A$ = A$ + "3IAb6Fb2UE5l<UEXON3ji_LmkMMjeJSjm1[_XY<AInCD[7[W3[?=mie2Vd4T"
  155.     A$ = A$ + "YZ;GhT3#VYn\JjjcXYY;WZn<KecOFnFO11>198mijdlKdb<WPFoGgfTYNaHm"
  156.     A$ = A$ + "DHM:CcO?U9Y7k2WaT]jC1jWWj#C?0]n]OjoeSaCm`Y>Q9h[>9eYVlHej8n=A"
  157.     A$ = A$ + "mo;o]jBDWJ6CJbb\VBPFm7:^j[D?Rj`cIJcDVJ0Cf>W9kO0NK7jY>E#JmgYY"
  158.     A$ = A$ + "oN3DO>iZC=5o7S<c03#Vlh7]Wj51<>KMZc<5mn>0]]5U9#mVanIK3AI2SmcF"
  159.     A$ = A$ + "lGONAa?olD6?WWnkMRn=>KoL?>A]mlD6e4dfkdffO[<IJSK]c7[ENjgaHoeF"
  160.     A$ = A$ + "Ll4gjllReWo<VYL`M^;[]\_f`NKSAa>fo3HBCLdN:>VSS15TgboA<YWU5=BV"
  161.     A$ = A$ + "Ta<dWQCbe>7ndh6W]dgcDkoD?o>ioH^_ii6[c_[PeffCAo?IZSGo<W[GFQS="
  162.     A$ = A$ + "iSChmlhgU7^dH4ohiPN?Cm9:\N0SAOfYee\jLNO>JWWGVT[4Pg2lfY<naJeS"
  163.     A$ = A$ + "V<eOe?cBf6UY[]QVQfnI^C?8IQcN6FkoUX]aP14RffM5;InbRWk<]blWeDUU"
  164.     A$ = A$ + "<_I9Q<O?\3H;`=PW\dPWQ\LMK[=T5:KDI<[GI4`6Pg0_8\U^8K9\6>gU>gII"
  165.     A$ = A$ + "WkZFllUM\ne8[A??>6gaAaffbGR\V#e?_R#\b6DV3W3l\]Y<7^nKI=[#fnjG"
  166.     A$ = A$ + "Y\ie\<Ik[MibFeU`V>`FgXaLfeJFYaO>hVF_Lh]^9KinFOHBLkMGB<kJkbNG"
  167.     A$ = A$ + "gJT8ffVU]]RU9A^m]8Q_U=:9LPm:9N`m9AYK?fM^=[4Q^mBB>1Y`4RcF?BmJ"
  168.     A$ = A$ + "5_N=J\PLU<R<LIc:7K?jgeVDF6[_g`FUdDYi:i4OTBB7N?BUiTR\i#GT\\I5"
  169.     A$ = A$ + "T\UU_HIC;KQbNf#HBhKOcbLVlhU5=m9KLXYZ]93DKC?W95P<[9AMF?<9:cGi"
  170.     A$ = A$ + "nFOYSaCQe3`;7J6CJBbdWh4=f4e=XmROSJLJM9o\jCNjWcCM=7?:8oWP_jPL"
  171.     A$ = A$ + ">^jLCaOU;=FolMLNd:hW?N4UPVPOFoD`RP1AQ??9o6U_]kHA^b8iA>VD0SK\"
  172.     A$ = A$ + "F1^C0JOL`P6oho\<9focbTV\GNdo[bT\[aH6[?=Bl<HTli3\SMJkcaTLJ=L<"
  173.     A$ = A$ + "YAbdn]aTnEICN:nHAN_GM<YOC\XWmIfcFPc?bRSCi_G=:^e3LlNn=BM\9Iec"
  174.     A$ = A$ + "D>PnOfDeoCMUPDVP?mBL^FoKSc>GN>#aaMLLJO??mZ5RU`jVN0SghOcGI;;6"
  175.     A$ = A$ + "fbLV]\bi?GI9:[060J:P7#Ie:[Pfl[;dU8KJEQJ]cgJH[dF^me]JOJ>X]oZF"
  176.     A$ = A$ + "RZ;HEQ8;OQcf:[LacAFaR2FF]^<\#Dm;cOVBXcCo>2NJB8JK]U<c0U5?SYH5"
  177.     A$ = A$ + "JSAQ]]`Y=9kHVkDlGVO#1H]1iHF`DWX4fRW[M<;O^c#FalVY\Z5<KIe;<HKi"
  178.     A$ = A$ + ":e_cEYOOlM]^UY<^#GXmI>^M4fb]cM;[<4I[[>4IM;MN:?LQb62M1b6de?`V"
  179.     A$ = A$ + "GS\iU>OiPKLeb>FiBT3\QEI;SLK[Gf_b`>b^gRLh]\FIO[K5B<kLCb^EFF4K"
  180.     A$ = A$ + "MMfWSN7KDRMGKFRBol^eOoA[WcQdcOo:cS2[7YN^7#?fhgcFU4fkfTHfn6TS"
  181.     A$ = A$ + "beLC[afFBkO7BjA]?9gSNH9Y3]CYTD?RTlQf]M]c8Z38EVIBBcUUWDE^Y:IO"
  182.     A$ = A$ + "d8THfcFT]_ZU:a\k]:A^S=95VLLB5jnRMoKGi[[ERBgoQekYMYOglL1mC1Ze"
  183.     A$ = A$ + "IW2jC6kXUY?na9c:0o]eYN7J_Lm?>9U7=k9=5I^15TWj>Sbci<EZ_AMKZSj]"
  184.     A$ = A$ + ">;W3m1Bk[Y[l=ZOiJghj;ehPVF]aK\AjgUjcFoPNeAcj?U7iQol\\2GmI7G2"
  185.     A$ = A$ + "n35d:1?jGQ9YgGd>O:SN4LXAXihY\WOkjTL?G<K12HRN\Aak_m5<cIiSKo[L"
  186.     A$ = A$ + "OjMioo9CbIkV?kgN6fSCC4[kC3b8d=A16RkhMjWM\9ZS#MSi5hT]UlOWkoDW"
  187.     A$ = A$ + "=MCfKM2:CA_6^bTmbbVVOSEeg[f7=U9Y]SEkN2NF:c8H[\:e>ReXm9_NEOa6"
  188.     A$ = A$ + "DF2;GWZ_HMjBdZ\1]_h=Zm=CIm;M1FKHJ__V5=7[4jLV^\dI?ESG0oPeQI0k"
  189.     A$ = A$ + "`a?VWJWA`Cb?[0;IF1<F[oki6d4T5Y<U#Df2W7<UWU[4f2VQ\f5>Cef8e6]5"
  190.     A$ = A$ + "[<Vi4TEFA`1JkSb^3KYZ]BcAeb\8ECC8bNFkbDM<;Ge_4Z\g=^2[\o=_:Ki^"
  191.     A$ = A$ + "FgbdOCj_Qi==kh?hVFUTFTkE>bNgX\ge_DiXkGi8k4>C8B^aM09Q3Bkk`TM_"
  192.     A$ = A$ + "fU8I6kn\?7afGS\7fOl7BbiX7dnl1fdbE=<ca>G>V\>bn]S?nm]9iXje>i3]"
  193.     A$ = A$ + "=[DMfa;EUeAU\RI_BNjiFDBA8]DB6B194^TBhKG:?mHEVCHBVA_7YfLCDRJG"
  194.     A$ = A$ + "Q95UJTBJA_;9jM_FY0mhC9RM:I[gKY5e^U\d[AL7H;BljeVU94n>Ubc>A9W4"
  195.     A$ = A$ + "R#ZYPdTbc:99[h>\TK2A95VbATcecaTQJ[1Ykj[Dj\Vb\U7_fbUV:9?YR\BA"
  196.     A$ = A$ + ":?cTekm8dW3kdHKKJi;Co?L:FMYY<ZAHCXFGO^joWc#[?6\Zg1]I^jKCbKMC"
  197.     A$ = A$ + "HAD?LJJoVCG[S3oRUcFeR=S02`ZkjZ7?CE_mL2Jb6G2]KHCicbTP[lDK<ldn"
  198.     A$ = A$ + "fe6oI]McaTHi8IBnJW?BNdoK`T6YFaY>Q0lY54ndCe5>NOkcY=hI]mcYKJRo"
  199.     A$ = A$ + "JlWdcjG9GamknY5_\6_5N^jh2OVRG6fC]UJdfBW]W>KhlaE6[7O7Qn7cFO]?"
  200.     A$ = A$ + "[Ih_O6;1F4OVo[Y?]YjgX=o8<Kl3cTWX\`Y6XfVNVV^V`FTZQIa;dGISZF67"
  201.     A$ = A$ + "[aaK2Ce_\JE_cZD]?H[4Ue1[IncB2EI3;AI;XoPbRVF0FIQCM2b22BI<1>NI"
  202.     A$ = A$ + "NCa?K9KKYcJ:bbVMPFIicIZF9dP3Bfj:G\]Lm;M>jmiXDFC#:SI6bfGcBTM^"
  203.     A$ = A$ + "fU:k#I3K;\#<^1<5H57L[[A>bngZThQgUef:^3\=9e3_39A]]6]GYTQf>Tff"
  204.     A$ = A$ + "YY];IMJkFFJah[=n_BAK[CQfb^eCG?7^65VhQ=^CS5VZZih8B>7IO:_8>YdD"
  205.     A$ = A$ + "SBb>jM;]DT^mdSA:=i8TlSKoBSiWTDO^98UUBTfWK^`DTV:8IYLmhYTnQg^T"
  206.     A$ = A$ + "C<kAb:ZM956o1UBBj`faaeb]mf:9MYeRCcfFBkOCfeJXV:EZFonSKG[EB;l]"
  207.     A$ = A$ + "9Q=g9kKmNZ=GI`V:bF6efF^ZWJ3b6GddTLSM_fnk\flUceKS:ciPBGeGXbAF"
  208.     A$ = A$ + "_Z?B_odOK=DDJB7EEXDAV98EVERB]iUZnk=2mgM<jcV8E>Hdjc^hUf:;OYSb"
  209.     A$ = A$ + ";#o]UVDKfYXgOi83d#UbUjYMiJ3g[dOSE;G\gS9ghTm9MECYba[^4YR<BDB#"
  210.     A$ = A$ + "ea]=e6bEXeIVUoSflcUcfaYY\YYZjX2J<N\SdadHK\_0mZebS?`6[?mFCN4K"
  211.     A$ = A$ + "3nU_nnmfo=nQQfEXKSb8m=SY?K<SnYJV<>fXmFlJOWSUiE_4faI5W^ToG#WT"
  212.     A$ = A$ + "kkLTfW>k03jYLB]=odWhTlaT69Kjg6CjgT>YOE^iWmNmGQ1m<5N>AaO_nham"
  213.     A$ = A$ + "mmDo:kU[j_oVVGW_\MfT17RnLLJZImPWD0BXcMFVOFP[#1];VF6MiJEM;[De"
  214.     A$ = A$ + "I0GaEFldWXEP[0C1N25Fg]=H;Q<m0TU=c99;OfCAFeLWZ?m9KHac#FoRV^\a"
  215.     A$ = A$ + "U<C]ngLEkCFTJgbBU3Yj2>lFFYY389EG057o81E[AYY6]4gNfPTGlA87Jc[f"
  216.     A$ = A$ + "\o8Wh2g\oPBiI4_DFj7E:<YX]S9?MOi[7C997SDV^oBC9FYHMOUWBdBa9LHY"
  217.     A$ = A$ + "RDSa:=TKBBUY5[DGf9HUJblXBkUTY]=F_j<RcF_Zd?R]^CG2;[9W4TVdfYDP"
  218.     A$ = A$ + "W<#35KlVZb8FYQlBdh2`PXDN:7FZ=[HU:c8:YQlSGZ?_S:eVcAT6;81kceTM"
  219.     A$ = A$ + "\ff::a3H7C7ETQdDQ9jKO]DLbBgeTSM<UWF4fWMWca:?MY[ZcF>NEI9ETNTB"
  220.     A$ = A$ + "KUVZEJ^XT\U9\_eI[ciag97oEj_AS=mP;f[mMbaage#=G\LQ^[EBiPKahRQ>"
  221.     A$ = A$ + "Mo<^EA9L8il7_>ij3fYdXbRZEIB5Z?O_cYjF^`aEMBEU_m\]i2BE6XnBT1eB"
  222.     A$ = A$ + "_EGPdJQY9MGINFYoJ;BJ:odTRdoO:;iXT>;?7kiOGjn6ZabT[=#kbC^bY]bm"
  223.     A$ = A$ + "?o#bSO^c8glDm;3dDeJO57B]eMebbVN#b\E=?hgnIXeaWYb<Hm0Ym[fWkLEM"
  224.     A$ = A$ + "51ko4<6dTmZcgi_R9=ZOEORhcN5WOOdfmNloS76`h7mC]cSeMn7oo_T9ihAS"
  225.     A$ = A$ + "LmAJ77[kH#XCJT<ZOK<YWMkoV:^O;>>]?N]gB#SX4h8HB>MD`TNFF45dV>=E"
  226.     A$ = A$ + "ckDlf72fe?Mo7[ZWHFbFGEXVMAKKe;cnlVGaB]UXg1fc62InbJDKKF^J_dBV"
  227.     A$ = A$ + "aT<VcBVJ0bREKQ2IJCDFn\2DFmLW^\f5<;S[P=?HK3;Mfk\QU4\\iU=?cF7d"
  228.     A$ = A$ + "Y0W9l=_2c^1\e063jB:hX7`jC>?E3Aa96^DAJAk[M;[SN0f>]]AGPCc0j7#3"
  229.     A$ = A$ + "#35TRa4J_l\=KA`f4\C1KF:Fk?_R<D>#VaIlTAFZ=[hm`MdUeX\UJe]iF_L]"
  230.     A$ = A$ + "mAI9YW[fVZBUCeRf^Zd4S`F_:hAJQS_NmlK:oDTjcAe8TmA=V3jLHM^7Q;EG"
  231.     A$ = A$ + "flM5WdBQ9Y]g>ZbcRDonSaGYalRGIKA[l`8df_9J7GY9M8UCN0U5VZ]=f7<\"
  232.     A$ = A$ + "2RK_:;<:kj`fK]XT][1[CY\T3G>FY:C<o4\cW]aabeQ_G>gN[9GkjcjlMai3"
  233.     A$ = A$ + "KTcIX6;Bnl?ijbijX:USDPMnMDFjfeX^\?Rb<b`n>HK\T]gVZ9;_Hin:6[`W"
  234.     A$ = A$ + "KFo_Y4mo\<DMMUZoWeAII:MEFFB3joCA^QU99[mUdXb`_eP];GYgVTcN\ZUc"
  235.     A$ = A$ + "gI]b[NSc8W^]:Un[[#iBMgPNODSLRV:GjZRLUS[5hE3fDUb9J]6iNWM8i5_j"
  236.     A$ = A$ + "ieci:b[Lm;;_le^RLocN:YWZ[#ROgk#2IZCa7WRUCg?eNNeV0dEQFZI#<N`W"
  237.     A$ = A$ + "`Sicj?NJSI]gdnkWjHmcSO]de3DGgiKJW=8F<_l6[GOnI1KC<OWha7e?[VTA"
  238.     A$ = A$ + "jKW9lK#STC_SWH3iiJid3iaGJ?=FT^H5<B^doA<9GlWn=En?R9QnB\G6]W1i"
  239.     A$ = A$ + "eGcCL4nka?H#No^LnQWh?\PI<EI5;LNZ]<[BfgVfP4a^fV\[e_6enm#<64nV"
  240.     A$ = A$ + "Ic[H9bl2LR6;J^CAea4l<Ti<aa917`HUi?5oU5?]9If:]Ri>=9\iSVVi8KII"
  241.     A$ = A$ + ";#fJX;dh=V?FFe2Tm_a#UXgej<oLTLhkBb<V385THDV>5h3HS3f``B\WYTDR"
  242.     A$ = A$ + "b\7R2\6H>D#?1]YM][Mj:Xm=;Y_I>67_Z6]]N9:[PjZ`H#kR[P66F2?bn^D>"
  243.     A$ = A$ + "3jKhhX#Oh5Nd3Il77WYAmjhFW]3g1>Dc:g1V4K_JmJ2gRSUnl=N4\<mNQ2fO"
  244.     A$ = A$ + "am>lC^oYmia:=3[m=L5h?`1HMh0`6PI`jV^9UMDO>aI<07caaQH973kS?3CQ"
  245.     A$ = A$ + "?3OPc7nFK5WR]?hH\?HD>V5W7KWmcaC1>3W3gG\O>>>?HGLmilijbfIMgibi"
  246.     A$ = A$ + "hIO9ZgS7an=fZJ;JkZ]SDPoLlBcDJG]KmHXKDI#mXLY2SIGBej_mjdO;mEIF"
  247.     A$ = A$ + "jcGe^gS\;Yk:bDNa;?PDTbM?^blNWkLAYL]^b5kZNUcTWliOl]TGh23:?hl3"
  248.     A$ = A$ + "HjXNbE>YbbZE_?bBiWU9W]m6TcgACb]6^7i]^cEU_l[mHi[mF_\l6gk6b5ji"
  249.     A$ = A$ + "HBc5W[LTM_EI6nkAWd<lO\OVLJ`S6:UoX]]WZfNJVSMlF9#U3=MolGVm4VX<"
  250.     A$ = A$ + "ca?1mllGVE01HnXelS[gL?Ql>`aTlh;G?JKnO7VTSah:nd_<jW6GbWeGfo7U"
  251.     A$ = A$ + "?1>nVSAhhK\o5=Wi:C1]TZ6<olbDlgk_Y9ke_K1<2O?3C7n>5\C6>oDl6c2>"
  252.     A$ = A$ + "VP3:8I1cTH;=?IE;RhD_4I3[HIFl^a?bhcHlYkBWIPF9h9>6SaP=h[K9caH#"
  253.     A$ = A$ + "KKUQHfG]V5>;IG[NYZ=D;bRa3a1:R]]F9ZM\Ni8kJSBLkVH;_59EUkPoEb>F"
  254.     A$ = A$ + "EK3jGDm:52GAG7f3JC#k25Jkkh6HK4JCX=<<2\IZ8E7DCiSmBAKJ:Z?7d=4["
  255.     A$ = A$ + "]mbd[7[kfF1a]OOm7Ck0f6L3H4=UGbBA:SY1UAhdc0o0]>\O7S:oSL0]]FJf"
  256.     A$ = A$ + "jL_EKV`QRG?7]=N1I:]EDf:?B]o;QX]BCiU^dIIi[jVDF#F9K;[9S4mEZ:Ce"
  257.     A$ = A$ + "n^\CbhNlkVUeWObZ=A9KKW_7nm2W5Om0?5F5\EHGdVVOgl<X1>VRCcnmbfZ8"
  258.     A$ = A$ + "eX<=FlIFbnJAeN1WSm33Pcaamhhhcl\TeIk\T_3FWcemmi^^LN^[9kSWYllU"
  259.     A$ = A$ + "SQ[5J7Q9gRnl]<mo[nDKbjXh<\?gZ^Mh>MFRbLE=ZXm16TED6faEFkaD^6[C"
  260.     A$ = A$ + "QeK=khTn;?CYkRCEjZXDTfDk3Y<8fQZfXf\bSihjGIRUUh1UZE6MC:7Lhj;f"
  261.     A$ = A$ + "hLLOMPe^HI#e^hgj^GD^oIjE^JO]JU?neNPlJghLbceK;Z^[6ENFcbY?Fmbe"
  262.     A$ = A$ + "7^;i3NdMUgjNGGNgWL?i]OdMTGhJWG>Fe5;k8\EjcF2lOJPN]kK6SN<N]1Ld"
  263.     A$ = A$ + "FIfSgOIVTWN>nUbO<k#DMBc9X9IiRedV`h<OY?GES6JUl`]6[5;O\aJTjI2`"
  264.     A$ = A$ + "Kl`69kITf^ih7?Kn9m\agngVoXNf[kWan<_l8S=IiTQnKE_7mc[OoW8\8Ua#"
  265.     A$ = A$ + "Nh<_Y>E?n0bKl5P1Q^cI<naIi3bBWmdE6c\=on\Ri7\USND#CDXcO>:_9HEK"
  266.     A$ = A$ + "c\]laQl2ThOC\[FQF`7cQ<c9K\8H#kJ]QJn4j#KIMb>FcBU3_me[fC]79e3_"
  267.     A$ = A$ + "G;F`I6m1U\?bQTlC8Bco;h7VbC;>Yb<lh35dPP_K[1V1ecej`X1R]kJOFZJ3"
  268.     A$ = A$ + "DNa^O9c8fU?of0O2V45dfCK=7GR2]GXhJSDWgf^`QHki[fiQ]1FK>_fO1;2k"
  269.     A$ = A$ + "]Po`f<>Tb3HOUXO_LODDlQKOoH_5<:d9A<bYDLRa8MGM9B>aXoNS;2E7FlZm"
  270.     A$ = A$ + "T7FemX]oD>E6A\?9c8g_]TmQoJK#iEhO:lCEA:oZJU_afZ<m4\]SoZ#75nD1"
  271.     A$ = A$ + "oV#Y2mIHMIWTioUJDNF]ITPd#f:?8WD\UEWVnL=USH5F_YLCEJ]P<\mEAb:O"
  272.     A$ = A$ + ">;EkBaI;]EHVBMIVXM<eT^b=b;=KkLlL]H95>>Fj>7nnLOV[Ei95SM]K_X\\"
  273.     A$ = A$ + "[1KSekYb2U^:?OYMUo`c`VdO7mGM1:g91S7eP^=FgaRZE]I^>molFb;9S9eQ"
  274.     A$ = A$ + "Za[CdBiU9eRbEJEeK1C2ND_UZ\n2BBj^\dTn[:;mHB#:;nm9W#]ITS[AU=1G"
  275.     A$ = A$ + "ZgZbF6\^l=VDOEUWLRV;cnoWn\j[f2<MUXK3K=oTgmAZ=NI;_`57#nj_mST?"
  276.     A$ = A$ + "jE^[L]Q?Vl:gjLbKoP[:gjdM;gi\m:G^oFUKNZ^TKOVNT?i3NC[l1?iiem?X"
  277.     A$ = A$ + "4eFfX\jI?3IjJK_5<1o=oC=[a>6IfZ]<`X2NRC`J;>E_ic0a2JF:?bb;DbaD"
  278.     A$ = A$ + "RAXoScG>2k\Oai[7W=IFlX6A\lOFNbW9_JNVLmkGGicLnSPgm\<<^O8gBQG6"
  279.     A$ = A$ + "d4EmN1<1S3Q_aVR^nhlbTVnDVXYkcUGeF\5dU;H:CblQ7iQ;nGVHG]nU<?cG"
  280.     A$ = A$ + "?`GHK`N2AiDTG``PF:f\5<a8KFFl^gn:F\\GbIU=\2i`K=<CcC27HkVVWLRm"
  281.     A$ = A$ + "PBlkOKVMFH_55l5<]UP1EQJk5UZ9V:Nkg7N4K3f4<:WMH\T2aY2ke`7d`]`g"
  282.     A$ = A$ + "=`0XmHWUWWeF\<]mJ9jgIeI#Oh9K\:\[R2l[\SJ?VNV2RkPV6;:`DL77KWUh"
  283.     A$ = A$ + "CDh?>MA`QHmA^=OfPQ^9Moh_Elo:GCl]JS5Z]7:_#YeBcGjZVbTRBBi^Y[J9"
  284.     A$ = A$ + "b;3MOIKKWmWOlZ^YD>Z]o:cDOFTCJ:7Vh<5Yi_EfG]iV^M\ETABF\WbBiKTS"
  285.     A$ = A$ + "?eYL:HE`a:GeSE5j[b8ASQEWN\=[WGmjeTBA792E?RZiBoNJBo>HO=TE:BEj"
  286.     A$ = A$ + "e?[`g[J?C\ffKG_gHKXU[0UMRF_nZYDC[Ge:C4mL\lhUGPYckHUT[nL95C?8"
  287.     A$ = A$ + "Johc=TCZZ>bh<MQ\_f;>7kjfJnIJ;kXHH25IlY>;=GSIeBnYK<b>D^EW`elZ"
  288.     A$ = A$ + "3SnE`_A\4mK]ZJ5K:W4<]=nd>YUFE6Fm:oZMMo\\5\iDi?MRO`D^EgUW]M^L"
  289.     A$ = A$ + "]XO:d`AOAMFNFfe^1enB>7>NFFOfa83e#n:g<JYoJcalE6lYS[f2VETKGfi:"
  290.     A$ = A$ + "3Fj[nlU_d[N?SAm^?hiTgnnGFn6_cSUgii_RlJgnbbUj]=iQGlDb=?A_bgjM"
  291.     A$ = A$ + "NMiCO_gDn>_gk8?oY?YTj1gW<KJS2S:PaKiB?jXVWZ7J1JkfI?QaHONbHggh"
  292.     A$ = A$ + "NZ_c9_X`oDdng=>:LiVn8mMm_^bcV72>Fbc^n8IGSlH7YMQoje:=Fco>T3X>"
  293.     A$ = A$ + "V4aCd?mg`hlJkF#CdO?JTDN2fN]Se\:I7[J5bFGnb\L^Ua?`2WXObllO<bRV"
  294.     A$ = A$ + "n4DM?4Kn9KUe^hP]l_Sl^UlISlYSL^;a3^39SXg_Yg9kH3GB=RmH<WREF3aT"
  295.     A$ = A$ + "ZB_5F_Jh=iVR]>\8:5ZJSP=Aom^]i:`S`V5SEYeaP9UOl7bh#hGId9aBlO4\"
  296.     A$ = A$ + "4d3AkOR;CE:?SeQ9URb6SOgK#RKW[cd`L\BcbHD\N:7H[6K2k\J]Xd=kOb9j"
  297.     A$ = A$ + "mJk3N2f0bfA;DQ:S2Kd`63h?>FTCc4[khHi6cn\[5lYbC9F;NeI5ChjbH<FC"
  298.     A$ = A$ + "a97W?nCZ7NOj_QX\]aa032F4<[bB;1O\YZPIXUBC=NK9<YZ`>?UCDJZ7e3GB"
  299.     A$ = A$ + "KoSV[Jd]S>;HC\]Jd[3L9h;EZO?5[<>FbfP=0oYJmjB1>E]jg=W3l;fFA7Ee"
  300.     A$ = A$ + "`Zl?7[1>TSCihB=WO6n\k4KEihP7A1F6K_AUGfCE5K\XBeOoi[LFhS`QjXTL"
  301.     A$ = A$ + "<]HI6n^=]FffDV45dZ2oHX6;a:h;9H9]E#:VV9W=S`^Hk7[T<==]7Gk?Qok#"
  302.     A$ = A$ + "G3W_cNDnoWhLRfBdd2;RcS2JTkZl<DMLZ]ZZ6<FfG=I[onhg^^_:Bgl36nl2"
  303.     A$ = A$ + "V4nZ_eBBaRQ8a\ThGFBb7bRihS^b0F<6A?eKM_;9OSgjabgl]ORl=O[GBNcK"
  304.     A$ = A$ + "MIiM^ceUgkNgDnNO`K9o\_aGFndgo=TWo\39[>hY:Q>m9I]7]hlYLXI<F?fk"
  305.     A$ = A$ + "=CeN76[0cNBnKl8\_3oQ3G2kgLlQA6g\oOSoOLl;gHlJTS]]AbTL5omFLaRO"
  306.     A$ = A$ + "Tn_fI_6L9W_S6WgbH#7h\VY4bRV[=^8Fn2`_?cAFldWZ\TY5T=NUHL<5fLVQ"
  307.     A$ = A$ + "\i5??IWQ^#I7VoUWS5clM5fRU`gjZlh[Wm\I9a3\C;7LCk`kFbBIAh;I\OZ>"
  308.     A$ = A$ + "]N1L3H4^]AQHG33Qmi>>;^fT[947ME34<7WN87?2VFA:WRH\Sn:\[SeIKhCK"
  309.     A$ = A$ + "dNQF;\U1]0df[D]OhdEk19_Qa7<dgm#eGUF??9cgD=XJXJ[dLTNZ]4Yc:;#Z"
  310.     A$ = A$ + "?_DU<SJOVN<fNgeX]E:;GY8mkcYQ3=KLNUVPbkRk`Vm:>K?`N6HOX33fG3:_"
  311.     A$ = A$ + "5]I6?Do<JnLfQ2S0m;UYj5hnULW1VAQa7UI?GCZ^3f6o>hhXPn6:LL`Y#C5\"
  312.     A$ = A$ + "9d91[2VTK9GOd81oQcaUS>lManH9OgL]X0gR_C\GTeMjYJFecQ]U\?OOgIVT"
  313.     A$ = A$ + "M]8gOhHiNV_7>Fn<[cnikT?kdZAQ_K7GT]cg7;Q_1?3^6L>N6bc]lEKhQQ3C"
  314.     A$ = A$ + "RWe`Xhi<<4jK0]W^HSA1kohH[?7HBIHf`j9o:Bb^N3eH5V_YilX_8H#WXi:D"
  315.     A$ = A$ + "6Bffo[lO3oggAII;mXf<beTnAP=Q^\NZ87CgeYJ]<cf=h#4?#d8A<38N03gD"
  316.     A$ = A$ + "aV?lkYjL<odS?iihicmX\\V:8NOaVljmeRl#e^^<?dfUkMb^ToVO`gEnWnSn"
  317.     A$ = A$ + "mUOhGlMU_dC^WlJGo2b[N]c;oAOW_Zl3nb__LWCfWTYf?O816P4<i;eXmDLn"
  318.     A$ = A$ + "=7OmRoG2`K<`Il#h;?Tm67?boYOMjH69?biC9h9<^9LScTAJ;g_ROTNfLgnI"
  319.     A$ = A$ + "HF`SVMP1:CMBCDVI#1:cNjCcCIVc#fgNf]\_M_=I1cNJF>V2CJ=;LnBH;HNb"
  320.     A$ = A$ + ":IlGP^9UG]e#FPLP`2EeD\9;_k`ObiV`nULDk_9VgHc4a07f2L6gfhc\>5d\"
  321.     A$ = A$ + "P?Yaf::X[Q]QVVAj38J_2GbIg65c6=_jUPm#^0Q^;\1<5U12CZ>lGBaI9iZe"
  322.     A$ = A$ + "Mc8bmJ]?X]1]Gj[^bmhk5]ohLSj#6;ZaLdndCSLJ9J[ToARD[cQMLaZL4enX"
  323.     A$ = A$ + "d86h9XjRRagfHmJc:EU_LDkcUVTZY9V3:EUJLFOihO5F7^4f8BK8lI3L9HBU"
  324.     A$ = A$ + "kEo7<gVdf9`>QEVhnf^a#k]fbTLE=Uh?9h4ho877Q]S_VHklIn]1G0Kg#S5j"
  325.     A$ = A$ + "Z8f>`XP7af#c4l\f;=?S=`e5F0l1n\S32cfaThhM<3^WX`fiiGKZmFL\h_:H"
  326.     A$ = A$ + "9`WL57K[7bi`:;b^>L?fI55JOGlMBQo3hJkbQaAbm<OTiEoD[jiRmMTkAMYm"
  327.     A$ = A$ + "C`cCH9hS9WOX:9n8=>1j>anL?n=ccb6;8M?nhGOncjHo:J7iiBfaNHYQ2DVE"
  328.     A$ = A$ + "I5X?cDmBIWRUSTW_kfTQK_A;?`KF]I^W6ZbffP=GSan6^Yb=MHX[JPJ:`\aS"
  329.     A$ = A$ + "H5B<3QodG]iI\WCfBY6KRm172]C`[HMHDDj]FNnXJ]eBk5WT<LS58W^eB<O\"
  330.     A$ = A$ + "gUNL?hTM;OogkEToZ_oW8bo`_D;o=bo]Oj_WleOSW8Oh;LKi3OlMTOhGi3T_"
  331.     A$ = A$ + "k7n^bS^dIE=1kBF`T7_5??bYcI?a9HL9OiH0i\9i#`Xl`YH9LYOC<YA^mAZA"
  332.     A$ = A$ + "2^d8e9=bmkK\^Yk?PA<NiIK^LnVL:HncH6B8cM^bBGh2T#GlRTE\\5;;OY;B"
  333.     A$ = A$ + "FJ8;D>hnfULXm]CK\KbHlRaJaFFib\a6ITKN3B>AXfD4cQ=]dlo?nf;kHfYZ"
  334.     A$ = A$ + "3J7Bfa];YhD?TUO?T;_\ThYC<X9ViTG?\dU??^hSk\U2Ma>olR]#NlgLTF>7"
  335.     A$ = A$ + "C>oPF5j[2]B`RbGI<5YeWaFTBdjnHc3i\;fW#M=ZKeG3E:]Z]oX>FQ96[7KP"
  336.     A$ = A$ + "Df1<4h7UWRZohX4GWDDV3ai9KmjW^D#l7AbW]WYZk9U4]a;J]iTYbgRFom6Y"
  337.     A$ = A$ + "ZUj0ff::aS:]DL1jmEbjcP8TdSh#FojHK2a;3kBhcHW2maCQfddV469]WM]G"
  338.     A$ = A$ + "AS0K3fDc5UYe^ihEEX7oE[<<hFlKWW3\?f6l<NVh\MU]17P[SCG8l3Jg3?]e"
  339.     A$ = A$ + "Rdf2jc3JKSn0\I5M3dnVRYOK4J#IMW6E^fXid]?Go4`licLOC1k]9>4D8OZK"
  340.     A$ = A$ + "#gFE47#li7nnCg6;Y_T\ReC<;Ho7Ci<7GeOboU^o7?Vb_#CJ;JO;eYgKdo4J"
  341.     A$ = A$ + "G_#g]HjE#[3LQ1KXD]MNQBK5WQeG6aITWAl\bml46D=H_ZbfXn#YZ=WEZljb"
  342.     A$ = A$ + "c#]9CoO^Hmoi\eoOSNGKAZFeGbfYDDJ99iVHLB679:YgV[ghB=Z\Nd\BNOkb"
  343.     A$ = A$ + "10lIe5>NMF^GfYN_A>TA\G9_<k#eMA<3Y#>>Q]SH[g`=DXdCUJoTZ>:\c3ND"
  344.     A$ = A$ + "WUTTdEIY8MFLb:;:EIXZbA>I]i;3Xj`^fa[Gj_\LT;fBEbKOSc;oaOc_Xl_n"
  345.     A$ = A$ + "Wo78bo]oLiOFGnGl3n4ikoiO7i;nT78Oj7lfbO`WlEU^Z[2IVC`ClY2NbChY"
  346.     A$ = A$ + "SODlY<SMdahQ;=UA=F9XAkg_1o9i6?m?eN[Aj?YWESTSGi>fWMoCKlC#VG#C"
  347.     A$ = A$ + "CFVbQLaVWhQ]<ef\55l<Ui7ld]b\VnDT5_PPU#GblU=_fE:7NgKGRMoZ]Ga4"
  348.     A$ = A$ + "Qe><Ym]K9k3O8YhhRb7CRH=A^gFJ:Q[JCDVSJK<L7bg`W=W3Q3A>52[1^3;Q"
  349.     A$ = A$ + "1E\gH#QOE`ObF>lTF\BjQ_39f]7VYYRl?TjQG\WFU^Z^8C;]Kl2`bReff^2e"
  350.     A$ = A$ + "WMKWnjbAemC1O`#OQ`QbFe6AKDHCUUL2BF:O9kX>\ZQ9=9i3^?]>LnZ=Ia;a"
  351.     A$ = A$ + "\S]JeECj#kGe`GXdGmeXJIRaHF`QZGIHmDKEfhL_B]n;<<lMna:=7[olVef5"
  352.     A$ = A$ + "X5Rfo5[l3f6]_Y]E<Z=^9YjjLl6H?\Mn\_H9j]M?W3[SMR^fV`1X=Wm\#_f^"
  353.     A$ = A$ + "no[4^=j^b?=Sa`BWMS\?bO6?k;9cf5J7CO0lL_oj:fJWkbkBdGhdL#1oZPod"
  354.     A$ = A$ + "ho=FbfhJ`WiH]lo<W4lUGX^ai6[C^TS]h\nP=G^?kQAkBmNO^P]A`R`OG`?P"
  355.     A$ = A$ + "?UM<7`hNll`Ye1=b7MG[gnnYN4<9:L?`_;hElkdRU8ne6O9Q=geEZ_aL2LUF"
  356.     A$ = A$ + ";_#U7ZfaYooEC^ZmUjok]EAAB]iWY]=:5WNbF9oTSGRo#kCB=b3Hl<doQmUl"
  357.     A$ = A$ + "<=Kmg1i;6nTj63eQbMZcNFMUNKabQL?aa8GcWhT[3MEI>nlM>a94KnH9nlZS"
  358.     A$ = A$ + "RBbRi7af3OEMVV:C6BePeOUi:MZ?3k^T\\BoETWd[bW^BG=:gIh>U_aKnlbO"
  359.     A$ = A$ + "k?iCUomOiOZl_mGoW:ol_mGEn:_jST?o;nlbOd_ggFNb]N>?i2eXmT[b<F9\"
  360.     A$ = A$ + "l7WaWWon;cHl<_1<JcGcDlicWa>N;g4LSmDdIiVK?H>1Ri28Vk=lK4cG#Tch"
  361.     A$ = A$ + "C?P9Kcc;F\m9G#e]]Z5^H9lM^CISQ6ZJ3fl\heC^A7B`Ce:;K1c#FE8cAFiB"
  362.     A$ = A$ + "EFebVW\^`2Afaf2CRLoKC>RJoCNd>8gDmX3AkWUnh9V8`S8><hc4d;Sn6;nD"
  363.     A$ = A$ + "N7_EdNQnUX?MlS4ekLa>cicT4e_3RQ=GgSEFnFojI5e1TD>h^\jRGo4mJSe8"
  364.     A$ = A$ + "jC3m?T?0hGLdlP=2>=0XcPea6VbmZ1Q[_KLJP_QhJSm#LnL]CBo>hJV]JS35"
  365.     A$ = A$ + "jg[ZLDFdQgWEG;_T>RD_FOUBEiUQf?I2JOTAHSWcj:<Ccn7lE3<?bA1^7hgR"
  366.     A$ = A$ + "cO?^aj1iJ0]?XM:]KY]3;Y]?K__J;bGNCbfLL1Hg`a9OQHMbIXj8g6lV_V^l"
  367.     A$ = A$ + "daiSFjOfU_2^LEPl8RScUOES<768O1;E]CVh?AQe9WVkXHEOXb?8g9kBkkVl"
  368.     A$ = A$ + "CTLUTlETle^Xhg_iW4f>iW8a#bUWT^lhfbcJ]?Oba`f8gOd?ce0okF^fO4iJ"
  369.     A$ = A$ + "8iB>S[UAV;Z\]nZ[#C;=jJ:#e_Q6AHE`F<o7YooeKeUHlm4gkF\l#0o8ANRB"
  370.     A$ = A$ + "n1`c1GlfHMGN^cc#jO\LmIg9K_:YM]]McUVYD[JGhY>FSbM?g9d]gXZ9[8i4"
  371.     A$ = A$ + "Z=JH39fTRmW\>mSAl>KZ8USDKiV^FHADO[0jkCoO7kAA[[UK6A^GSKBmo>Z8"
  372.     A$ = A$ + "OmJG]N]cA[kVYaRkBi;hcDGM0nmPo]8>RDP[Q>;dFIUbbejS[mBbf:7_\l\l"
  373.     A$ = A$ + "Vhhjn8G8>ES5i]DXLJeNaK=haT_l;MGi_Be<Qn9iOl_Bnf_o[8Od[n#imNQK"
  374.     A$ = A$ + "9?hi>[UW=Tc0CfKnTkbaYIio4\h\CIf1=IIL:7IZC<8K<G4XKnCK<SjYcc7N"
  375.     A$ = A$ + "W7PX0?Ri^\0mWaTkX]2fVaL6`^Gk6U]_Ze:[L^cGFf\V]4b<W^US#^LD<\U<"
  376.     A$ = A$ + "7I7[=D9Rm\99>6gWA^K9nXg[TRZM93E_BFJO#I[]YcFKCWL4kelE=?k9N85Z"
  377.     A$ = A$ + "J#bFKkF#<:SiXAHnDTHGAo4`NLjlYOk2mV3A9\_]:7M?Kfd1`oA>OG`e4o8`"
  378.     A$ = A$ + "omGY_>TCdB]V?:`V<l=NLkI[V^7jc4^8L9h9DGPc7nScG4h?3hB6SBeI`g;l"
  379.     A$ = A$ + "#HBI7m1=OC`ei\7_5K<EbeSa5N=:ca]Tn<Q9EB699U[Jj[De_WeAEkEDnK]J"
  380.     A$ = A$ + "MblEn;L9dQamB_=D^d\F7QOGlKfICUEo7KCE60S9;H9HoZ;?`Y`HGUfSdfTl"
  381.     A$ = A$ + "67mSL<L>\TaY2J<Mj;MWGSS8Fd`PP91[YHEKZ;73[9mX\hBGOFaJ5RE=mgbj"
  382.     A$ = A$ + "`:PI#<^IMbo?nLci5_57kcdJIJkQDef2Y8=V[nMTIDF\]_n0=ZfR4_]mN[>;"
  383.     A$ = A$ + "c63FB<VX<#MiZf\TQ5kkFbEI#UXLW<SF>I358mDUJcKdKG^HWEKg3>^6gg`?"
  384.     A$ = A$ + "X`_7b;<Ri5aVTaR6a:PlDRfTh3^1Z[LS;e\bQ>CcEKm7FhA2gh_lk6f;W?J?"
  385.     A$ = A$ + "8oT86KTSB4O;6KNUCn?ZgG5WVnOC^aKa3QooB;RmIecZ:MEOB9:3Y]JUSENN"
  386.     A$ = A$ + "FMecdA3be6\;[^9mMRo`La6PjZh__^Z4=#UZg3IJj^aVD^^=Zm;gUJWI;:__"
  387.     A$ = A$ + "Bmn1mnhSEWOBkAekoLme^UWg3e#UFl59VVTO:h_<f?57ST_K;F35VQ]o1ENF"
  388.     A$ = A$ + "?ET[U_ED>A]i:GYS:UQ[]#iTeG\lLZMN_`IjAnV_cSUoYodOR8oOng;oQOk_"
  389.     A$ = A$ + "Tlf?lVbKnlGG::US:ccVc:Njhmbbc9E35iM9cCHScVGk6oWQ9QFYW>_OhYhl"
  390.     A$ = A$ + "e];fMH;hB3N^bFGcJ\bZVglU#Va<U=^T#TM^jEJi\`RWjDT=_l5JlaXfm6UD"
  391.     A$ = A$ + "RJ_BF9XlU4E6TFb9iXULCAIA9Y]1efGYXjJbTH_3cAkk7oYB\?:Fi5TK:XE2"
  392.     A$ = A$ + "KBbAKg3W?GEO=]=Q3#NESM9`T`N;l70fG0[0=gW\ej\aP=nIUiJ7^fa^S=Jl"
  393.     A$ = A$ + "5N^CNAF^bH`W#df7==hg8daCne`L`37;JWMl=HB>OdPn8cGaA\7Cc4OgXm7]"
  394.     A$ = A$ + "Bh[5lU0JV`61^^DWTeik4NHN96]E:;c4URB=>Y0]oHVo;BGk34K2MaI3]NHk"
  395.     A$ = A$ + "5LHn]Al5ik2^BZ7J[NddX]C`FFh;<fhQY0cZ[ZbeHASL<c1G2^UKk^L[6=C\"
  396.     A$ = A$ + "?FbeRa;2j:8gVQ;iJKkhCE`hj0M;:W1ndKMkc:gmT7ch?mEM>nbSVQ8N#5U\"
  397.     A$ = A$ + "=6:HlClX;d[lMNoWHKKPJcclg17;LZ\SHKbIK[LCk3\<HLGXSZT?mmN\M]hh"
  398.     A$ = A$ + "Q]MWCd^L^f[#NmKL:kjC>6NZV;A^FO=JWcYKYDibmD_5CLbkIba`cXJGPU`_"
  399.     A$ = A$ + "QN[9OilZ^RcdB5bIK]:;_\7B]W\=\;DIEmECQBG5[];c>A[M7fcd#VaHi09n"
  400.     A$ = A$ + "1VeaW`eWAdV6=haUTh1m<6ib?NS?E=Sag:cdlC9am5==FoWJmLb;:H7H_7JK"
  401.     A$ = A$ + "\H1k=>44WEhET7f3gBeB_ZMPm[m;1[R2L3d#1;S[9aE6kE9_D`g3DHKX76K;"
  402.     A$ = A$ + "PcBK7JGALO_NOM:?h<39WE_nmY\\F;:CcfOlo7i415b[;hD7Go>#;5nZ2KkX"
  403.     A$ = A$ + "d]nKTOgMXo^JDiNmZ?K6DiCTk2gHXfUgo5^Vlh[<\l]nL_Zlgn7nk:OSgkeU"
  404.     A$ = A$ + "WoRWblY6SM2bK0;gaWToflb9c5M<7e5`HW`WQ9A<kl=7Oh=NL^L8H>16X\b5"
  405.     A$ = A$ + "^#cf\e5B8fL44ck;HS6SG\m\fE;A_c]9kOC[FfcjGQUCdIZm[TIL7bV[IP9U"
  406.     A$ = A$ + "Il7fHB`SbAiAILDMoJK>d9USb?HnnSfQFN2C<Le2i[2i9BNaN#S;U^Z5Qlj1"
  407.     A$ = A$ + "oILkCgWU_GXI0n4nn0oCJogAn9Zfe1K`YaQnJ`6<HA`C8NC=Xm50o1N4<8:M"
  408.     A$ = A$ + "[m7Qo>cgK\UMmC=DCEk;7WA_4G7Z3132>1nRQk;d;AO<X]V[AC5iYoAn^PAa"
  409.     A$ = A$ + "_An>Q3RN8VoMB9bmI?_X?Df?W7nUR[?nj5mOhK[T?h><k=6ZiZT3]aEJl4h7"
  410.     A$ = A$ + ">k^`GolIWn9:OQGjfbkm`[JcW7>^3W7k365\;F2CSeAG5On8k<<S]IJVD]1Y"
  411.     A$ = A$ + "Zj`LS9SFl>nJ[CKGRN4lMJEY6QlGn3nJbWoAGEb<l]H]AY]:73k7NDi<nJ?j"
  412.     A$ = A$ + "nTOi?iCT_o7nbfWQaPoGQQAn3VeQgZaVhLPe`nn^O`;:ObKo#S5MeNK#NkkL"
  413.     A$ = A$ + ">i?ogmSUglFWAnQOYg`nNHk`Qn7oSnM<^hOc?nK:W#IDHKhceGcboi_o7KL9"
  414.     A$ = A$ + "6W[G^W6]LRVH=QN\CXfSLU^[cdGag9fWllWZ3ESD9b#jmgM7^EIhjbCKgU]L"
  415.     A$ = A$ + "a>:G^DWEXl\BUNeOC3GGnfm:o>ILlJSIgL9>0AKJUZ<[HliS;n?Tn=kGI<ho"
  416.     A$ = A$ + "9h#V?b]icUh<]_^l1`i32Z;3CZ?bM0eNb1K\:[?FZ3BMNbOTnK\DcF=HA7_j"
  417.     A$ = A$ + "l=67igR;gf`?DT?3`J8O\:<f3K][Pi<XfNid:ok<]GWL2]>>J4kGK3<HmEXJ"
  418.     A$ = A$ + "b:DIg5KliNZ:OYKeV`>6ANZOZ6:A>AM5Il8\97kHI<4gAiIIUcZjWNo7OCco"
  419.     A$ = A$ + "8OW_`k:_m;LGiE_ke]LRNbnl3nH]LV>`0VT4D01jc?BD\l8PiLEbe9_jVHL`"
  420.     A$ = A$ + ">[9=9I9Z=IfLEf\WY=f=HN3JoKNmbQgf6TT2O_JK^mKic;\1JObcC[T#hfLc"
  421.     A$ = A$ + "55F7nDf:K2FE67iPB:Jk=d8USZEP2]9[`K\IY#O9H37??cfK>khbM8GnEcoO"
  422.     A$ = A$ + "\T?3C0m:hS0;GQdfe`OPU0O2m=9[f7NTM^9cWBXGiLMeZLU1>^a;ZGe2EVUg"
  423.     A$ = A$ + "=YH\4lM377JNP[i:LM`^>j_2^5m]ag7jghn1MCdo5jIHK`DHK`[\H<A>>YKo"
  424.     A$ = A$ + "XjfI>?3]m4G8dfac=>6lE0W3fYBmggEe0oa_nSTQKZBi_mWnkJSC3lC?il]K"
  425.     A$ = A$ + "LeQ?TbB]?VRK>0hjZ=oo?ocnYnlY_;6SL>TO4DgUaY7i41eO9o:MG3bEL>NZ"
  426.     A$ = A$ + "Kcg3Sc2be?b=cF=o?7[a[`GZhWY?neONinW]79c8fQWLl[bL\hGCoW`abEiR"
  427.     A$ = A$ + "hOZOfgj;Hl1f?nmQSQUHC5iN8[?#m5IL3RmmolOa?efnYJ]2[NooGobo8i^W"
  428.     A$ = A$ + "^;iWoYOTY1263\B\KhFWX3iojOh_SlVgi2ff9nDo;oUon:GZAcF^[?H;V>\J"
  429.     A$ = A$ + "enichP[gH;W^i2UW[kZ]aMfGj9GCn?mUNMYOe6\1D=>GmhE;W[URTK?#3Z=:"
  430.     A$ = A$ + "U;3EC6B?UUTLYSERLg1KF^Nge:GlHE8G[7JCGXLZF:F>ga:g\alhZ]TmFWWi"
  431.     A$ = A$ + "XY1J\#OSGj^eW[mFYZ9AeZeNYIHm7P=d<WBM<mg;fIS6ER93?k97V8n0Ln?U"
  432.     A$ = A$ + "c4[mO8aQkZmgVigMFWLN2]]mFK1F>CQOThoAbW0lE6fWBn^SF=\mPjRXA2m#"
  433.     A$ = A$ + "`PX0[2mC`>an>le4LYCYJT>QbQ8oX`GQlO?<XQKZDko;HbWmHEJf;CO13fH9"
  434.     A$ = A$ + "f_;b=HRIh?okm=UghNGGnZ_m[Jic4i=0cG#FN2PO_mKRnHBhW9F7^45RO7SW"
  435.     A$ = A$ + "^U>[I8[K9;b677<?57flWU\_e]BKN7UiLZD>d>]fMdVRH<#k9G^lH<1U3alO"
  436.     A$ = A$ + "55F7FDjaN09;ESDnZ=LhKklQQXf]TKBNlS;c_YaYGOdgLKU_n6gj:b]?I?FK"
  437.     A$ = A$ + "AR;2mMPf4Gn<27be6VflHS3kWn#LiH7<96GGXgi6Z=egnDmkAWCZN\G4k[#g"
  438.     A$ = A$ + "2fGAadXXk3kehn0KnHMF2S:=EG5\>:`Vhg<lB\U4F4jILacVk9VO9`WO\>5b"
  439.     A$ = A$ + "IX<dWKXiS2a\RHUkb_9NVb_EgHIQj>Xonoa_hWJj\oIO[_\liObM]j\YN`]i"
  440.     A$ = A$ + "cWe`T\h76OhFLRHo`HnL?jVn6_MD?6>3aj2O>#1^4f#hR=973L;geTf0`d`o"
  441.     A$ = A$ + "^4cIb=lF\HOM4c^>ghM5kQLnLaaRPGi6K4`GX`Ld1nURjaDOVSQU^h51_b\]"
  442.     A$ = A$ + "ZcJ=66cM7`hPE13j1W_?ii?G_be6XEKK`^8^g_mm^TlX;=XleNc7JSQIn^n:"
  443.     A$ = A$ + "_fmUkXJN^`a[A^HGeJfcMN]MSIOIEI8GnhE:gIhVUn[>Ci7mA_Vl3oR_ZDHD"
  444.     A$ = A$ + "ZFl4?PlZG^OiVmF_bRZD]O;GYR4f]DfAgYZE8>mcIKnDYKE;4nlmQWYCi2MF"
  445.     A$ = A$ + "YlQ?j:bKNkC;?nBm:GYWJU7MaNTKZL#n>_No=9GF_7#k7j6IL9g9fBZ;M\8K"
  446.     A$ = A$ + ">NQaQ\F8NJ`R8fN4?=ReWKlKcoO`Iho<Fbfih9?5>A;UKnaWHKB1f4o72SQh"
  447.     A$ = A$ + "aB>HISg6]_L\oPnlY?BZSQ?^Q9Qn8G^MjCWTZ33Nd#Zf8\imT]h9WYLoOkV_"
  448.     A$ = A$ + "48F5H3Kojo_GX[j=VhIJ_6;G:`?hoWnJOAi^WKHK^Be6G[TCUSKlB0SaO?n#"
  449.     A$ = A$ + "b[__AKddhmLa46WJGfT\i^3NOB`k=RE<kP\iX3H5YNXMKmMKSm2_f[BLOX>["
  450.     A$ = A$ + "[>?iU8eeMc?7Hg<S3<bkIb5jB9NEJ1]A9Yf]P]Na]o]KajjZ3e]L[CfWi;Jb"
  451.     A$ = A$ + "e6\16Kg:eK\YY]>jPP9aWin0mI`3Q1#1m5d^6^cij\ImiB[fjh[KH:XO2]?`"
  452.     A$ = A$ + "R#K6l767:h?9:HK55>>h#4S;>?Fbe0OIclj<cGdhk7f>a2iKm1_^Y=o_h7oM"
  453.     A$ = A$ + "=oLAo3<V#RIK[An`7O;i[oV?bRACBkKSVV1dJTiQgYTAhk#Bm0Ke6C9X7QLT"
  454.     A$ = A$ + "]0dIRMKkIcF\eImcM\6]jC<n8jB]_4M><g^jV;8a72Y7i^lU[XD`V0n_PSQe"
  455.     A$ = A$ + "MS1VA^ToKLS9VV;>M;^jXog=G60KRjEDWgbS[lBfC1o:YL9\aci?[^E6aUEV"
  456.     A$ = A$ + "3m?BOmH_877]eX>:J1X=877GOJ[AQf=X7PlFVfA<_VafXN<c?7dO?k7m0d>U"
  457.     A$ = A$ + "?g]Jc0gW43LZccm8kW__QE>5<=hL<75QV<bW#j;oT=E\a86^alU;SnXjcc\S"
  458.     A$ = A$ + "k;lT[Ji#8i[cEEm?mZJU`V][dEEBnA_=e^cMXWK^bej[JeF_:<NDCZ=JW^Q2"
  459.     A$ = A$ + "TWo4]9O_?hAbWlFgCNnCg^M>54m>\lni\]DRa\^e0=9_ae?Ql:GI0ifZ6[[d"
  460.     A$ = A$ + "GmbM>ma<V9\b1a6fJcc:mG7jFbfkl`BRf_3glW0\Fd<Bo2iZe_H^SYAK^W8:"
  461.     A$ = A$ + "Ko<NMMcS0`[_Lg=YlaV=]#Xo1oFcjDP1Q>9ZSAK<d=1KRLhPh#2OJPJen;Z`"
  462.     A$ = A$ + "C^?iRC7eMioMHYTSVHW<ggToV>okaH86KbMJN_Jo]HSAHbQPOa_ggBZ^P<li"
  463.     A$ = A$ + "Wk9ck6Ya>NOc9\1hMn70NdLl>G2alh:cG#d^Sa\:UdDMAdN1Mm`PLc3YT3#D"
  464.     A$ = A$ + "XmWI7QJ70\8bGJZWCQjmXWRlNVlPVa4;c_jeELfbU7Z;ifWOHiT]gPYCQaQQ"
  465.     A$ = A$ + "a>8^kH?WZ72]2`K#;QSk0;2K`aof<GlQ_1Mii8<;G\kML4d;1S1k_PgPOK`G"
  466.     A$ = A$ + "B\THg3SRh`AloHNY7m#HO67OhKLe6?Vk=W>>>?>>lM4kk6WXKi7menlV?]nI"
  467.     A$ = A$ + "Oj7K]Ub#I><Vf#?cKNk;Jfo`l>BJ7J[6OZ0U15o^F_TMTkfHBN6_]AJ?WI9e"
  468.     A$ = A$ + "AbBe>UlngVTSn<aE`VFN^j63`\4]>`C>eaZaH<`W8OI`f<no0fT;V<^ieF^6"
  469.     A$ = A$ + "hG3f6lXonocoHkjl?l;n9V]2Xg2nconOg_`GOcHoPY3;a`maNHMVOjniOW_T"
  470.     A$ = A$ + "i3;h>hC1Zgbahla>USS=MZf8H>`A`6ChCWZeZ<nT;g49_aP7NbFZdgcBj74]"
  471.     A$ = A$ + "OlIlS2gk\>G3KLMXLC\92Ok?Bo71Cj<]GQicKHBhglce9c1]eJfKMVf:EN^N"
  472.     A$ = A$ + "[C^JONdAQmM`Y^Fo=HfUMcnKD^J?eHJZ^J_EY]kbbd9MFVO:?IkbOfgi;8_e"
  473.     A$ = A$ + "]>YLoCeVJG6S[HU_WcA\an?<Y;Y7k?h;l:b_k7nBFi3O`UT[>#Sb#ZmNdNnJ"
  474.     A$ = A$ + "3d\ljgj<b;MeQef]mYfVfYZW\1KlPPVAl=?l6nM`_;dNjh33X<LVkg`nHdCb"
  475.     A$ = A$ + "L_4cC1^aR2S1B6WMH7f9KYJmk[:[`WM5HC7c6?;iJf_i\M3o=1?RhB23T_;:"
  476.     A$ = A$ + "]Ye1<]H:_1f95hXmjU51CbaU`n>dgRFFdenh;?TlGnCnNb?jKoafkj2kMJ`h"
  477.     A$ = A$ + "llnKam^N1mAXQbm^ZPiH8RMFhKJEfL74e=P3UCDkAi4kcbYJJGE#lkcCiX7`"
  478.     A$ = A$ + "G\OPAali<]3<^0S;<EG8<T]5jl=KB8N2gm\38GmTm:Mg#5B9Y7_4o1gY?]:f"
  479.     A$ = A$ + "hcDe8ibU8h#X=:j]_>CS6JAXm?ni6Oo132KRhjbjlMHi]QJg6<9l;=a;3V4l"
  480.     A$ = A$ + "5\g2O5Q_WMJSP7A>1LDe6?b30R97nP2mEOd[l2bYJ[NIOQ5ZI38<>lA>n47O"
  481.     A$ = A$ + "B3S2F7JcP;Bn^Hjidf>`I#[MTKNUfhU==U=UETkdV72ILfV`NfXYk6]VDPOQ"
  482.     A$ = A$ + "NJ\_ci7=\mWaC:<JF7N:o^LiV<_g=`_D<>SI<_l5O]G#n:_e;JJAI\8clQ;7"
  483.     A$ = A$ + "3ig<JEa>KgWilicL\4KioQodo0;N>bodOWmK0o[RNdoUojo4;N2eh=7G\hhT"
  484.     A$ = A$ + "#h6C0og2c3nggo;mfb;OccI[CNbP?LiH#c\SMfG3U8]EFFfc:n_dYiUo;aW]"
  485.     A$ = A$ + "^L>3O3`jL?#m7d4S?naVMf>g?D_P]S=k3YfCPoRYOAgLW`YK[JS;Q=QlLWf\"
  486.     A$ = A$ + "d_=aP[GE34cK^<oaQ]6XSR2k3k5Q7POXXOOSSY<<hFWZURTK<HSbiJ]DC_3l"
  487.     A$ = A$ + "Zk<D;V_`__bW>_bPJ8m8UW[cZTKeG3b[YjRnIOegFnaOd[8OWgiiUglj39WY"
  488.     A$ = A$ + "Y2DkWBb^F_eM>]l]O_7:OiGiVb;Oe1UKORF=OBMi^[A^oIj#N`i>^a:9FS>o"
  489.     A$ = A$ + "`SOea>:b71l_\i[7dWPf4MO4K`SaHB#k[Y4mI?L:Hfh_9h<D`n<WV9b79HA>"
  490.     A$ = A$ + "f4OVoSaV>lW9L;bI;6_04C^;Yj0hi[C?:<B^_8nY3DMfV_iL;k[b<ek]l]Lc"
  491.     A$ = A$ + "TkORO:nkk?i7mYbYjYM?c5n<V#6eHmi;kI6POFQg?6<?X]Y#GP\_=jQ7AKM\"
  492.     A$ = A$ + "W0OD`l66][<NTF:>Y3jIl6[mm1GbUO;DgSj[D?9BE?4L4Z317RiHZcMlV\h9"
  493.     A$ = A$ + "#\VP5AQh^Q6YRmVKR`?hMN3J#X>7iioUk[M;FKX=RjRXCRUhSKG>:IS1GMMh"
  494.     A$ = A$ + "P`>\LKdkLT1iO6L6NGk`Bd4M8e6<VofH>5`UGB`6IOkM=;cb7P8fLHbCN^c9"
  495.     A$ = A$ + "_de^P\cE\HCC4\=NOo033oVC>HB\`hg:]aPOBno2C2=T9^g=97IkQ99__=K<"
  496.     A$ = A$ + "m?m3NIcV^XgjZ=m7`_PAm7oMoHcoBhcXGjZWedDW<l?UOB>cT]nlPW9`[I^f"
  497.     A$ = A$ + "6F4l4hC<WLcLL#o=EYlGo7lkIc5;][egLSIH\KVSQi21FbiIc?DjB676\n[L"
  498.     A$ = A$ + "k;K]ko`GlNF<PXM?lRGiVGdFWHKBmEl;1\6H0DLf:NaNKfHDXA6k:IMR7473"
  499.     A$ = A$ + "[Cnb`WQEAl0XN0?_Xn1j;Qo#>Fk6o:d?c0=FQmo<<<f7oOcB^?iHLanl4]EU"
  500.     A$ = A$ + "?V4Ji#[5f2Rn1glS7mEClZYM4j1ci8kg^_QONYnJadNam4m_PVCZ;On>[g\?"
  501.     A$ = A$ + "lgoKnQb5EFe5EMCgA]5kco`;KfS1;RfLgC]Ok6:3jf:Sj5?OgbmD>5l9l;5n"
  502.     A$ = A$ + ":o=^fPbm?A;bYJ8?IXJbB^i#=9Ol[M;ikniN\ZQnDbIK_<i>W\=i^WZMCS6i"
  503.     A$ = A$ + "Q5n=7>8nW2OAQ_Y^WJ[gSE]D<oiN>mg\cWcfl6GNaKi[#?UWQUCfmYkSLDeV"
  504.     A$ = A$ + "oDD]]NlIN>NlMMINlY4oO2KR2f\IiTTnO1n`eIC7n>Pn5a^5bW0lcT=gS[jN"
  505.     A$ = A$ + "#37LLhT47Eh#DH^Q2O]=D]iJf1SMLXoTLe0]C_o;OOi;lF_\=?WhI>KK<VMK"
  506.     A$ = A$ + "4[=N7Ybl#dFGaBTm]QEKfE5gNgRe_=]E`OQTK\<n>`gTn:jWMS]3lK0n:5K1"
  507.     A$ = A$ + "H\Ybl0;n?VhGMj>JB^Pb39GYIK`K\a9UgLb1oi#^^R^3d^HSaOMiYEKi`gB?"
  508.     A$ = A$ + "hRW`HAF>ihM\kk6Ol>o;ibMBJg#mKhHXO1m<Hg6LSE>[0=MGXKRH_5^bJBe;"
  509.     A$ = A$ + "KR2nG7^Dlji0[1f3LA^Gim36f_1S3O91WR[?<;l;M\kL3fm6<ARc6gO`U#c6"
  510.     A$ = A$ + "j=iNdioO\5SnInd?l==oQS_`87ThN5ni_lWn3<VgOg?k7I\Dd4AQk7Nfin<L"
  511.     A$ = A$ + "5HAH;<L7d3A\lHkXmQlYcaPhHP9ajL\`OHL?`i0CRSWocPMQf:6[a`gPiidY"
  512.     A$ = A$ + "jN^kK\0VJdnV[5Ln[2>4]aIOXERl86K2Q7Qf8h0`T\gU0joCXC2f2l6F27Te"
  513.     A$ = A$ + "IO>MDXKS2c7eD70^5jY#?:i_3mGAnALZf[cRg>GoCgA]FK6ghCS2f0RmQ^ae"
  514.     A$ = A$ + "2S?^Fik#_N3eJ=b`]E[dSfFcYoUWIW^c6UGn6G#nTgoeTKLbSK<gKOV^UOng"
  515.     A$ = A$ + "k[8gG]_RL#PLYRlDPiLbCZ<]kOR>]i8YkdOcbkOkcI<ZGj2mHjYN`Yk#NSK<"
  516.     A$ = A$ + "\I3h=j_NcgC\n5>FIbS>oaUcf:cI:<?b5SLQf;gdOQMOTOX>oLQF\[X<^cgJ"
  517.     A$ = A$ + "Ub3?MgbS>GgbeekS;dBIBOUUQdBF7aVohjYTd\?3G2oAQ^6HB^i13hATW0<W"
  518.     A$ = A$ + "#QmIWXa:]bPeEV=ggQOVP=ALj`g^9_oMISSAV38XM\YMBO^R?`I\gagc0EY<"
  519.     A$ = A$ + "Y:cf6kL3YjT6FICTSUDPCQoe#O9nPZgV[Dnb_g[;cOZCfglJ[WgU`SaN_o`k"
  520.     A$ = A$ + "VdHgcf\2e=YN9m_kI>k9LK^]S2[3SRhfjVojagVTo;dW3jSXM2f6#kJn_e=f"
  521.     A$ = A$ + "Wim:CYNcCNl;<i7H6aN8C_1aaSj2l^TQg]<GZ_>\L2260]IY>:]iA72jhaWB"
  522.     A$ = A$ + ">=Bd6ad55O4FK6f?JlX=>iRoS^lI\iEmW[o>=mAXeQLXT_?RQ8\XXDV3nARg"
  523.     A$ = A$ + "iP`Z\g]QKKmV]JLMhmG8l7hBmGO5VmCT_8LM?lVG]aOX];<6Ro6<6;o9mN_b"
  524.     A$ = A$ + "Bf6gW<770Gj;nV?f6KDXg1k^Ll#\GTaY>?W`nCW?f]i`AUE1SU2fYin_Ri\5"
  525.     A$ = A$ + "j71VbVFjLme_Bd:[L[;O1fkJ=f>_kDfaZF\m^<Pg1K\T]_]E\#kM[2_[ghM["
  526.     A$ = A$ + "RkM\2_k3FmL2B2M6CDFWN\;LbSEFfd3#FY^o#VVObbWU^N`CBFa\WX\Vi5X\"
  527.     A$ = A$ + "^5>=IecM:n:;K6n;Q>c98;MjSgf?7[kHhJ\Amj_FmkLcQ<7IE17XIOo1g`:\"
  528.     A$ = A$ + "2\l]^\i9kK];clW9\nm_^#=>?i[_;g:XO0\WcUSJ`0AgSK^0Qi14RGnM?M?f"
  529.     A$ = A$ + "h33kiP==8l<U11;jTZN<lW9eA9o#87lO`U?UL>]_SGmFGbd92Cje_kUT_iko"
  530.     A$ = A$ + "Bbe?A7F<nc;^mHil9<9R5e`Nc_b7O^nTOh7n:bC>KgbGh1GBnB?jiD^Am6C2"
  531.     A$ = A$ + "fcS_#Gb3?K76?2O#mfZ>9nl=7X1iJmF[l2W[CCc5l8bAMJ;Onf:C>]nMRoYX"
  532.     A$ = A$ + "MmK[f8o=N]WGnhGnFb[nL39?n<M9_`YD>IWeHLQQ[>GK^f]GUAS?XLj6=]TY"
  533.     A$ = A$ + "kao0TO0<^IH>hTaABoeDRLjFZA]3cS]MFN1X?;X`hfTaC>cm3FLZS?2kjM:U"
  534.     A$ = A$ + "eSO]hgmPEW_aShkoDH_VZE2f4[S=LEWBhNdAe#QBkEGXLUCe_=?EkI^FKlnV"
  535.     A$ = A$ + "GMIK7JkKFR?L?jChoHGLeP9Q]6lnIX#en<HAhKfRe]S?S\hYaHnPiYaS6YUK"
  536.     A$ = A$ + "PlNfSggNeGLnBbAN89SHD^Vnk8cH?\TFD7dVK;H\ccHW0o4CN2i6W[lIbA8l"
  537.     A$ = A$ + "a3KcFgKn61k1]6>]jX;b5oLZO27JGJk=^o_eYjE>caJd\Y2]7`>Ni[OAi5^d"
  538.     A$ = A$ + "Y]lb6M?K:TiIc1LH[6<A:`UP;`kWEli4\;NoYn^?hFVmKhSKh2_mm_QI;jS^"
  539.     A$ = A$ + "bY]h]Qn<JWH\7mlQS#\k#o5o6`oDHG8L7F7M>l^R=ghSfNV4e>EKjdW9kHe;"
  540.     A$ = A$ + "CfiJ2EfcjFY_iFChSl>:8Ho7Uf6Obfk>5R5:;iMZ2KKA1j_<_9>FkmY2_SEF"
  541.     A$ = A$ + "g2W]<g06Sb0VZmkTgi:DhhihHk<G0K_[WdUlnIQ[9W7kKS;I^b\lKDfWimd2"
  542.     A$ = A$ + "_cJg\^]e[GoM\l59kIe;eh5DfmZGRaBFo2WY\5U_1gH7:SS]]MU7^CUm1kQS"
  543.     A$ = A$ + "Um_YU4\agfbb2f:^gUD\L7[D?WE<?IEcIbnfn^Fm2U`VO#j_SII_oYhHP_]n"
  544.     A$ = A$ + "i?EIK;=HS_i^FL<lM`gUkkUkSm6fB=^VKl8COKXA4mQ<FPXN[S7ANcBlOI^N"
  545.     A$ = A$ + "PUX?3=HT?RGGe0=\Z?Qh8LV>[C^f`MHal3F7_OT^n0];OjknBZFXc9?lDm8O"
  546.     A$ = A$ + "SGm1b7L?e6_nKEnj_fM\lOj=^e9UWGi?H77iI`UD=B3FMV:7[Ci>3fX]lU_D"
  547.     A$ = A$ + "?b[LYn<Kn`WD_oM>[LOe6AWoYnF_amT_cKm#i3_g5Uk>#;6kYWRCE^J7E[L`"
  548.     A$ = A$ + "S;?4oJeLY6OPlKTLR7^4nT^CE;3JFMc9a<^]HL^C\k8gc`Gf3Yl;bUBc6?_c"
  549.     A$ = A$ + "i><>mH^l[b\Bg6;h=WGVfL_7ciVGXmjUNen1>3iAYb27bd:Yf^EGNV69hBHO"
  550.     A$ = A$ + ";fcIcg_:3Wa<E1:;8di<CKlSHcK0<Gk?i0\g;R<^lim;\=GDSOE]Lk;:O<9g"
  551.     A$ = A$ + "l0\Y?Bg6nj6oJbkV#WF0lC<n4Z^2bBjXjBUF[\DYjlcFBWi7EU9AK?J36onf"
  552.     A$ = A$ + "Q=?6j\ESfXD\h_S6ZA<fk]l5B_ffHYEI?`nP5iVk:P5Q_#AW2f?1GReY^8\Q"
  553.     A$ = A$ + "cZf=R^V]Z]Y`^7dj\M_ie0l7l[=l7dZQN9H8H?7l#67:df3=9LnTOCOk?h=="
  554.     A$ = A$ + "]KXQj>WYOc_\X=2OTAmM^7AK5l<d9beU[?a_4=Il>8Pg3:ln:PgM:1?UaK_c"
  555.     A$ = A$ + "iGRb3hMIk\Whh\gI:<nPHNnUL3Si2Ih4[OA1KLU#WiD\RkMj4l:F2O5OSaBn"
  556.     A$ = A$ + "]PV?nNiI;a74>_;>2`n9?banIN?^B^TSNFgh[abME_O6V:]Iig_aJemC^OQM"
  557.     A$ = A$ + "DloPcf;GN8SoH`f>d]`faN:>6f?jMMfXI];lj_9JWd1S7M_;aOC\MC_C]5Jf"
  558.     A$ = A$ + "lQmQH;XKNj3o:#Li`>AjOTgiMa\ceJm=#Qj1h?CdI1W265lCF2WRgiEXATg9"
  559.     A$ = A$ + "hlNQPi:INFR>IfVcgRHc:jaQ3ahLmlMgXEH>]ffVZCPaXoi?F3b3>kPb0EG\"
  560.     A$ = A$ + "Z7ZOiCNmG#^B7e;G_WV<m<_fE7bd9QOT6X^LTfbk8Z=NaIiTicObFUGh<7cl"
  561.     A$ = A$ + "id7L_c:_nE7#N1mH9VN`PN_KO6cn_WL^^Tg#_>_c=?UY9RiF4VO__DKE8?nd"
  562.     A$ = A$ + "7Gn2goBbWX\__f;M3i5?G?bc?LkbelVCFTgYF<?eW[T354K=l[=aDSal7iN6"
  563.     A$ = A$ + "S[6VgBI>:5o>QF9HBMal`Ii5JcAbeUO>fLCAGUGTdBNIHS;`nZ\#EKD^flLB"
  564.     A$ = A$ + "oZmR`U6De5MJU3MBU;1Cj<lnbC]7Ul[`VKidf>a\g]Ki>YoNWcg`f=V?ehm<"
  565.     A$ = A$ + "D\kKGbA?Pb:RbC^nHcG>Nc?Hl[Mna^O[>0<:\YSL10k]iM^^SYTG2ahInXZY"
  566.     A$ = A$ + "jDMIU;iWLRBZA7YTILA;9Nh38i47c9J:[;ST\gAad_D?eE^YCVjlDgWlm1]4"
  567.     A$ = A$ + "^idIhBHgO5NW;=#[Ti[8]??j?6=o\4o;CM]3\nUK<2h3H_5nc6]>lNT763[O"
  568.     A$ = A$ + "`e_Bc6<W^8:k9\#mI37e5Ym<jS`F?^>\4O;Qn6H>h?:jk5kfPQCMLhFKAeT#"
  569.     A$ = A$ + "MKH6cNlSbdZ0SQgUYl>JRg3^cDg>_?;9g;2AkSHacNjBHZFeM_Q`\iAZm\QE"
  570.     A$ = A$ + ";7H;[Cfb:3AO^]?kmh<niSLiTWA`aQK0CQHFbhCYjlBcRE#JA[JIEMh9MhmH"
  571.     A$ = A$ + "l6f7aBX2]N7kSaG7Kg=6khlIK4S1>6FBNAPf1la7oOhb]MbO<gl8E;NWcc8G"
  572.     A$ = A$ + "F\aJ^gh9C<LHKX[g=>dIkdO<ik977l8?aJfCnlAlom<WOTaWIn:QHlSOOLcg"
  573.     A$ = A$ + "R\=?a=ZDkL7ilI45hIG#KoSV6la4mGP?b7ZUJUnK\:YG]_9Z_Am>KNO#_WZG"
  574.     A$ = A$ + "iTh?=d<ibK=j_RoSYn4e[hoFHJKH1CCfAXZ6\U>;]NeB=kQ9^U`O?VghBaHL"
  575.     A$ = A$ + "mnWX?UcDWLoCf[lBGjDb3Df5nIjB7_6i5>O?F^DB<Yj]lDUKZ[o6?g0b;Mn^"
  576.     A$ = A$ + "TO`Wk9b_g7lHikm>?#nR?hRb[MinU7LRfD^B[bMj_AiEEMCXoQU_ee6FNm[<"
  577.     A$ = A$ + "TLknJB^oP]:Od3^RlSoL_TlMOSk;_cE7F^K_=8gB]El^3dTL?Mo<>097Q87="
  578.     A$ = A$ + "Q7e[JS9l8lW=cA0flCZgieMb=F;?386bjoWHG1m7eCmeHcY:=FTnOAQi9EYf"
  579.     A$ = A$ + "be2SUGlgTnLk4Z]HmFBFb`<?<ECN:_<Gi4elDo:=#=I97_dT]LUPLPX3EgiN"
  580.     A$ = A$ + "gdZUY?N?i=Ym>hEkONNC;#eV]m;A_WMHe=Q9Ao2X1QL6ad:Y<8b=;bo8R1Wc"
  581.     A$ = A$ + "?ChoClK4miBMd>Z\HKNU7]M`OB=:ef\TB`VWZb91N7]VTb`>\=71EDb9HcK7"
  582.     A$ = A$ + "MFKYV__an=Wf8hLijmmfJ9NW[Iic`:a?3dgWKN216dNFC8V>:hDD7R]I5UU#"
  583.     A$ = A$ + "lkQo`BH:`BXTTGKePkQn>HZX[aY]aiSKZK27S[1UEYjI`nUeYJM`7;cM2jc`"
  584.     A$ = A$ + "0DM>1YjJVcdTe>_IHf>Q]?H_3;A_c^Gk:T8fn6=Kc`^\SN#mJ[?gSAk;8jm^"
  585.     A$ = A$ + "C9iX2Gig7FB?f8ebQee?TTBDlnZOG6o6=V`7P71_f6_bJOK<fUio\dSiP6SQ"
  586.     A$ = A$ + "o3a7M<_2TmAS`3gB[_0?cd`Ze]HY=fSIlKjMnc4V??SaODL<`T#c8jFMW3;i"
  587.     A$ = A$ + "JAo7XS2oS2[Qj^h?DRG8l7?_o3BehA6;ZP<li7EVcmM_[#L_kGMcIJX9RHMQ"
  588.     A$ = A$ + "69:>=B<o9A><CQcQ?3_Rg5]T3D^iO4HJ`XPmamTU_O:G2OQS?`a6<Gn6#^eC"
  589.     A$ = A$ + "1n5fRQMHH[2S;EbQ7d7hlm4fVAQ[]a9c=1K^4THi4[gn6aFe=Ze;f\ZUM;cO"
  590.     A$ = A$ + "FBdJO8IMXM9U5OTF><NEUEBNLOkQKcNG^m`ce]lb:c1kcNdIjddolY_ec;Od"
  591.     A$ = A$ + ";L5iaZ]GgX7mnZJ?foL]SkaN\;[J<^NGeHLYGhD7CiHm:_c=>]lNgl<bKXlY"
  592.     A$ = A$ + "GldM:gZ[J]b[XGo_bS_ZlaZ]ROd3O>ie^n9]k1b?8N6B>WNbVZblUTkMe2L8"
  593.     A$ = A$ + "bS9\M[B;OICB>Un<RiT0RIMkEDZ<#c=8=ELQZnPDT2?BTfL94jTjBgoPEXm9"
  594.     A$ = A$ + "dB5bEJ_BS7eOiY[JhBe6S>Ho6J3I^PhlMDQLf>[b6G7Cc??Sa4Vgg\g_eZ>9"
  595.     A$ = A$ + "6;]`S2OkKF]]H;fhFSnmaN8G^A232nTS7ANc#N6SOG9NF<o5C^Zcl_#c5#m["
  596.     A$ = A$ + "d=OQaLUHV:3:_S4[DHl7Eo?l#BbQ[jYB<NYl\b`\][^RbC:ViB8VWT\L18BO"
  597.     A$ = A$ + "iP9OW`nhNPUX91V3]_XO^QK]>;NN<oPBOgHg25N?]InPIYccb[Q`gfj<KCH<"
  598.     A$ = A$ + "2_g=\B96e6EJ7SO^B#I3X3Qil?nm7Ub=>dV2c63=kEi8[Ei9Q>c0Ui<Qa8[J"
  599.     A$ = A$ + "FZmCcOfb22HLfBdiS6oeXL8nNAo?iF05dKQ]JH75[kV_gPm1;4k39geAKSK9"
  600.     A$ = A$ + "gSXE5k9Io`;aWKDHM\S`=FQ]eEKJcbKNTboIX]eYae6gQNc98R;_;W^9gPjY"
  601.     A$ = A$ + "^R<kV`69Ro2aQQhDakK7\;RoW9g3AcRkm_4ik3]7ml>d=9;7OMc_fdnWh9cf"
  602.     A$ = A$ + "<FDnYkiMFDAYkmmPFFfbfb=IYY<SGKWUW=nb]g[;Z]KH74Oo3XeWI^fX;mN\"
  603.     A$ = A$ + "KEG1[cHU<SHgSWio8K<PiInHRL2<j=_<YbD>\J;DcFLc97RagY^aK2aWVa\2"
  604.     A$ = A$ + "n61o`B>dhbYHbQ?R55i3=775f6SS^K<D[F>9ckla[?HKFN3HicTnlj^WXCin"
  605.     A$ = A$ + "WZK]mMcF>2#QaDhUe?SF=N6A\]X>KBkKcb1GgBU]\TI9KLQCgF^gE_8K^LPO"
  606.     A$ = A$ + ";L_ahSiNWlhbC^hPfeVi6kKXJJ`We_l5jCN^>ZF]oY#E_ANfhL1kh`OiOhm_"
  607.     A$ = A$ + "PI[gm6^IUAeVZWZECod[SMNgjd:[jTbSDKo>_J_didRU[iWZ3;oU8VmT?S<?"
  608.     A$ = A$ + "8`k9Z^DF4c?BT[4hgHbiD6W;=bhVCONAO33g<i9?<nZdOSUIc?QUXU^[ZLmj"
  609.     A$ = A$ + "DYiCY^:93c?BW\j\DMBI8W_9UAeLnbIK^#K\:C^PeOcU;MDKafLc3ajWlhf="
  610.     A$ = A$ + "_MKSeFVWU6oh\gmL`THnA<7]?IGmKV?6MfZAa=o<2?bbeH\cB]c1V4coZ]2?"
  611.     A$ = A$ + ":[D==M`#c;fXD]EAH<YLSEe=51aT;Jef]<UJb;OYNUgFEnI[fh5WiokL>RWL"
  612.     A$ = A$ + "oVl^dN7aV`Q\hlA>9#^n#oA`U`6[M^Z#<60fHAoih_4n<\8:h7U8gi6]b1f\"
  613.     A$ = A$ + "b9fjJU3^U`THgkF]egIH;CfEHZF:UoPnU3^ieZfL]4K<mAIS;AiIQ<OKKKII"
  614.     A$ = A$ + ";DelX\]=\6Ik;KABTKNMB2kIkfm1O?`LHMlK4o6P5ibmBH;^gQ1`JHMf>JN<"
  615.     A$ = A$ + "OM[7?jdX`jLlhSMgkI>7?RcQ[QCC7L=dXV]GomcoI4[1glG;a5`Ucf^gg9Xi"
  616.     A$ = A$ + "5>`3_`PbobOiOXl?lWl3UCeFUF>VlOoGlS]l_idJK?baCga3ORaDUKn_gCn8"
  617.     A$ = A$ + "6WY12kL8n1X?RR?KiDV4mobk0=ZcOlRb`:X[_]\CDj<_TUSCN=Y;O`E>Q8bo"
  618.     A$ = A$ + "\8oOo?9o9oX_UlOiGlC4iOmoRlgoGmcT_nWkE5iOkODTomo1Kn_#n_oG:bOo"
  619.     A$ = A$ + "OVef=f]\Be>S8]a52cUB<7;A>kALi_Xbg8WMX`LG=SKDFR?EHn<QU?G?e;gX"
  620.     A$ = A$ + "oF==<\=n<aeWaQV;WPX];cA1X_Qi55R[6_W97F]e4VdUj^9C;5U;kUAQOU^e"
  621.     A$ = A$ + "9>^mI:<o?bnaVCgh6l8kH]6KJ[Q<K]>EXfh;2M9`=_haK`^_8gSNPZkQbm7Z"
  622.     A$ = A$ + "=UkdQlEOYK8O`M?Wli^giU_okm8iKmVgENgKSOUJg\o3KeP;Q6:dF1?jE^H_"
  623.     A$ = A$ + "b;[5bilGiRmKnm^=NO<aHC;oDUn:?GKl03G2V=<9hoXo4VdP:oVn_`OB]ELN"
  624.     A$ = A$ + "jokiHcOCeTI:fLT:c7Zl>_XWbcgRk6jS>]noaIK87iB]Z\XZBCjY\D\oG8g_"
  625.     A$ = A$ + ">K?]Yj#baR[6S[FN_;=S9jIL^5Pm>je?KNVTaBbQgaFTnJZ6K^63KF`7]T[D"
  626.     A$ = A$ + "X9RhFcHkPH7blGTKloC^;cabBRC=c?T<G8DJ2aJ<Y2R;6K>X^`4RcV7GCG]U"
  627.     A$ = A$ + ";gSZf`UNZBYITVDBVYJU2Q5ND?i0XIoPgg]I`T8FOYMX]KiGXc>=l19JAH\_"
  628.     A$ = A$ + "`k_=\eJo[OUVOLX0OPfleckkVbbc\W1F4\Y8fa6\UDP9]9Ug`k;>\_Reaf:f"
  629.     A$ = A$ + ">5d<5aFG_bMFWYQReIn#?jM\9c7mSdF?HS`RPWPo`HMH8\TkG>6n\;nK^L6g"
  630.     A$ = A$ + "GLhDN4\7f>7?o6Ho``Li[07;f<QmCVO`>h><kJ979L_cDLie\=GGhM<mhN7a"
  631.     A$ = A$ + "QF7h:dFi3NQK8OeglQVo5HN>QflgjTMJf1aa37b=V?X]4W7fG1_RlWSLK1Kd"
  632.     A$ = A$ + "Lcg^>KeHkfLH8cAQ5VYLlBbaN_3eJNYIeokYd\U^EnDW5jaOhOUgmU5ioiOW"
  633.     A$ = A$ + "loh_n?FNn[MFU?m_Z8Zo[bWlA_S7NTb[nio>O=SQ:bo7bof_l?A>McE8UZLF"
  634.     A$ = A$ + "bm>RW4miCNFOFe6<h?lnZm<JkK6omWZYbU;L\J<f3L9VG=`_>hO5RK?io<iF"
  635.     A$ = A$ + "<i8m]DmA`VH\V`lV?So4VSWH>ORi7:bm`:8g[d_Kn>P1aHagaB<NRZIjV:Gj"
  636.     A$ = A$ + "^ZF:Fof:ORHaM1bkB]L]nKcNGeNjF[b\ERh55_bXfebVS\[U??Ig[HnFnVch"
  637.     A$ = A$ + "B6K]^m#7CNlika:hcj?ie^WleOUKIaOSlaTiV0H>\n7m`;[7CGFin3eR53^F"
  638.     A$ = A$ + "b<F;fK`SNIeVAbUBb[BbeK6C]flnIIIJcg2lO?j1`^IbW2Rc8jZMi:;njfV["
  639.     A$ = A$ + "NlnngQiH>bG9VChiJaLlRWicKE_4c92UWZaS8NKT;mHc<naLoJooCg[n8Rk?"
  640.     A$ = A$ + "SgO7C2=BDHnOKC;?4Yl<Cf\W1>3Se;W=JD74^4eo\emVod^i04ghCULld6OJ"
  641.     A$ = A$ + "9ODYlT#WML6GRiHKVWkC;BEC`AH>D<9S;UO:ZNZdBbHB4?>bS_LR;lAH_HDf"
  642.     A$ = A$ + "HEULPVlM6=BhCK\=3m9DHMhA`W#W25JCcf#;DdkNcVoNao^<FOgnZ3aN_`]a"
  643.     A$ = A$ + "U=OIEcKVFL]hm3gNGoZ<mBH7W[L`=^6[0C2kifiZFZm^>Sgmj`X#33L6\Oca"
  644.     A$ = A$ + "OP9AaIo5\8:>m?>F3L5gHoeI;7<9HY^eaW?^gi5>knL_O2n=aT#WTS9Q]K4?"
  645.     A$ = A$ + ":HA`I#SSKna5]WY5nf\L<SL_?nm\N;gG;`bgS8mm>6SSg=_USoJ\iCPDRel="
  646.     A$ = A$ + ":n]QeaWA^g]]XQRgO:F>gUC:6GZn<d]WD<B75TV=?YeJ>9I_;I]aQCmUJi>G"
  647.     A$ = A$ + "^9Z<C]OkbdmE\JOG[EGXLZ^J#ZUgK3ZmMToS<_RMNEc1j_`N#h9Tob`MP1Ic"
  648.     A$ = A$ + "5RZMC\n9K\<SKP60\i2m=e[f^RF7V[T#34c=e`YP3An7C>6SVYGBeL`hkWi;"
  649.     A$ = A$ + ">V;inR?ijfl1e>2IFB^A^;il]GS=gDC>?IjPD^4f7N2mnPUWY]Z]gGf>n3;Q"
  650.     A$ = A$ + "=akBKHE`\HKG_kV]2G;:h;WHenNGol3D]eKZB<KN5B>A\CK>DkVZF=HBh_Jb"
  651.     A$ = A$ + "90\Q3o#MV6;dlE3<:d9mbGX7i]ILnZLZGl\MKnIj3^ciUgmVWA^mP]Hf^ak="
  652.     A$ = A$ + "LFfOeiK?K871H\g`h3Sj34[0hAH7?[CLCaWL\=le<fVBl58>24KEZC`L50J9"
  653.     A$ = A$ + "kekeOPZcaSVc6m<g?<PnO5j82=hP<kcH^j6MBnNgVhWWaj6JThMNbT]ajfd<"
  654.     A$ = A$ + "kgHNjWL7:SXlHOPUS#YN4;No^aN_=nE9ORScSO^Q9AlQ9onHLZAabe?___2A"
  655.     A$ = A$ + "KA2kOWfL]4i5#N9YmoVC6flnJY:7TLiVH3Q_A8oo`Gj^HlIagkPKc\=WL8T_"
  656.     A$ = A$ + "KJ7SmB`S#G4nb1O9c_IJgCLRH^#RH8Q_Tfj:G\m^h6>4nHRac7iU3_g^gTbS"
  657.     A$ = A$ + "86GAYL6bAX`E]#H77_c^I9\:f6nK2F4f`A^<4gNfVa4Q_`c8lK4\#W=KXY1^"
  658.     A$ = A$ + "4L:^OQo0;1K<QiPORiNTmaah\WcYQRRcn>l[]kJjlUTS9A^FBo3T32lo3nF2"
  659.     A$ = A$ + "k^]LK?a3KjTLfOSf7\oVW_HG6ii:caK<>j9_GILabWiHMcI9`TLSO<>GFRMk"
  660.     A$ = A$ + "H[6L8R_6nBRa55K7]Bfkn<U7Q=Lh?KNoebk;b>;9?KNG]^dB`ckcfZ:BkCjX"
  661.     A$ = A$ + "BCZ^oBc:9YKliZZ_RB[jn8>P<N8?caKbli<id7c5]WYQ:UN;=?c78`MJ:KN_"
  662.     A$ = A$ + "KT[L^F[E>]N=j]2VGfZdR?=5>>:l^Y5MB`M#O5cI]`eP7al17]ONbUjg6OIg"
  663.     A$ = A$ + "kd7cVch`g`X1[Thg_Lc1JC^c`MHc;UlmBn8ah]oAGL8i>W\;iQWO0K<h37bd"
  664.     A$ = A$ + ";YjS^8ffY<:FBN1LQF[F^Dke:gXWFTkfOkbm7\3iVmfZLW1>VL9U;A1kVHnn"
  665.     A$ = A$ + "<l=\DI?[JnBh[KAB\KOUV=TFNAZfaMnV:abYBbgY_gkn2bKN]QU_j;NC;fo4"
  666.     A$ = A$ + ";>l55i^dKM]C:?i2mJl8gL_6J6]i5b:BG6De3bk:gf]iDVLlhokj;ch=^gmP"
  667.     A$ = A$ + "`U#k4c10hKLR]0c=BH?:nMTl;P?SohH<2chOV?cLj6f[1W8b]_>I6n=:;6Kf"
  668.     A$ = A$ + "kjjaiASTm^EJ<NFgV[TdeWkDVT=_:1KJYcNj6GRg3#D`g5FLYdjm`RLcMAT_"
  669.     A$ = A$ + ">fLUVF7462JZ86iflk_gi6FkM7_bKLl]dSl06?Ri7Ob;0b?0HBEXe=9fe4O8"
  670.     A$ = A$ + "\Mc6GYA]7On^bS]2kgch0Va3?ci\4K>]m:f]Q65d61K2>U[`n`n<l[=nA2Vd"
  671.     A$ = A$ + "lVRO6;JmQ<GK^iMOZfWM[<W]_V#U]Yf\A\a`oB`Rfo6mHK7<9cogk1kdf^I?"
  672.     A$ = A$ + "7_W^hg5JG#_3iF7a=We9oS`OFSdV;HkX_QH\SOlQchdEibm0R_5?_QkhbA:7"
  673.     A$ = A$ + ";bUc2Fn\Z?WilIo^gYhlo3mIP6YAZG2oKKcG<NSC:?;ao#>=CX;2OI2?2oga"
  674.     A$ = A$ + "ll#fA_KCW4fZAl]J`V3<lln8H]c=#i#[G]]M5Z=^Tk3ZVe]_\iIcSnKH1c`n"
  675.     A$ = A$ + "<c5X7E]?>JmIOIZ=c9ZjD?Xnl=ARObQfSTZbcCSg?3JoFloNFJo6EY\[ldnU"
  676.     A$ = A$ + "V_nOCnYL49cS6QUo^9Z5dj6nFFSWgoB:k9aM^AYJ]?PR8n:je6n3nbXl4RB6"
  677.     A$ = A$ + "^>67ZU;3FC9F>2e_beP9Qn9dEQ69d6POW#KdUj\>[oMHDXMR]aLKdo?TggML"
  678.     A$ = A$ + "BEmEk?k\UIgIfN_g0f2eUb2kB_gk`B_3B_g1A###:R505\[ADSU#d4kmF4k6"
  679.     A$ = A$ + "kmH\T4eTXafKJ_Z?o>?Wkm<LILaHNS6ckk_ohkWkMVi>]kmnmikciLN>Wc>F"
  680.     A$ = A$ + "a<dlOUf^A\:eGB[J>QOoKWj9D\OTh7\NNCK`H?^ULQ^dm\5U;4]SKO2ndi:l"
  681.     A$ = A$ + "U>OJ;7i9MJK#\eJMhl5\8R3M`=^L\oe^H5OJoKHI:o9R]MYkM;hLgfJ`Z5<P"
  682.     A$ = A$ + "ngaZeN\Mk:9EdnRC1;[Q1XaIkf_TcF[i9<7CfkZV]F3jX_R8G:b;j0KHAZ_a"
  683.     A$ = A$ + "?_CFnO:o?HmbTnGSl59gB^obVj#5LVaPCC\kK7[J^ZV<dnbbbWWZ]1R7AN#d"
  684.     A$ = A$ + "7gDCC4WIkbge>Gk9QCNQRMO;`IXilVP5]1FO[Fa9QCM5cGkGE<V`m_nfRVUG"
  685.     A$ = A$ + "6Z^k8>4keBd^\<L]MSLSXoTh`boFZIBjGY4MkW04WZMED^6CjY=b1SAgg^[a"
  686.     A$ = A$ + "VRa5SH1LNXE_XiPcAhlXahf_>X^0VUK]XfjcE<6e4cQ36cJ6K96WY9;c[I<g"
  687.     A$ = A$ + "H>V#MbHi8:mGk4M[kf6>8eN;aMHleYMITC4O\iC9^eh=a]D_AlnIRm`JL#[:"
  688.     A$ = A$ + "=GDJ6Q#;:>Kdn::F]QSjX^nFEY><L9^?]g]g2f3aU8Fd8TiBcL<33kMc[7?l"
  689.     A$ = A$ + "]mc`U]_c#eHe]LEG:^hm^3EOE\N3cn20ig`_OcOeV_Yicc]4OQLi8FTjWJGM"
  690.     A$ = A$ + "iaSUHDlhhiC>h[ccell:?6N\L`7[j;MH>LE]LGQLS<l8><Kg<MVA^V4KRh<4"
  691.     A$ = A$ + "gaZkA<7ZI=_Ufbae;]GWHHFoWRnSVnVea?O>e#5^^1icBo9=6QcF3bedi9H:"
  692.     A$ = A$ + "DC`C#\GVjYSe_hA;o?H==PmLcY>`nXmm>Zo>6kUi:gS\V59ljkD=Hdba\li>"
  693.     A$ = A$ + "M]g9#N[dVKjo2j_2f_\;#^WM12gkI9L_[_Tl`BTkMVQ\O;c<I\ii>3<Aijd\"
  694.     A$ = A$ + "HOOA>fa:[O<=aNma;oV6NM]2C\?eYL38V2cMMRm\CIn3mY4c=DR;An#T;bI^"
  695.     A$ = A$ + "QikDCU4l8]VU8KI^_bSWn?Wf5Bk5Im1ajaJL#oGIe#BRIA>ATK4aKfgjG:>G"
  696.     A$ = A$ + "Iki;HALLN2NdU_eeS;HS2?[MLbJONTHGJLlf^llknD`nfnJa65LUQgmfR>GI"
  697.     A$ = A$ + "nXSUVYVWo<_fHlhh_Ij;\m]a5Q;Jk[Ack=^Ui0g]OiW;^[3O8L`=_B7^P\?E"
  698.     A$ = A$ + ">Sa4^GRCoE]TY`n]kXaNH]blDFQ36T<OUm3CZ=Bj;ke>kYYiM:eme^Gg2aj4"
  699.     A$ = A$ + "^E[LV37[ONS5KA>7Mb;H22ndTDkjHNB]XYgPFO67#Gk0:<MQ_C\>fYU4i25K"
  700.     A$ = A$ + "d>e00F7glkFSTR>JTNla[J1PmJ9R=UP;F4kMUUTQS]NDS0EGDN:F4mc3kk0d"
  701.     A$ = A$ + "W?LMJ;Vffl4;NA4Oble1O<]WQHBJ=_F`KXMDd6=[6DC]c#mg`Ne1eB3ONjOK"
  702.     A$ = A$ + "bkblG5W[IfQ#\9c_;lkUcMY]C43RaKShDVoV=kXjL[JVb?Rh#EE#6XIiVZ^?"
  703.     A$ = A$ + "mW4aTj#EU76;RJZVfaa7C=;BL9bIZOMZ]:o9cV>JOgjU[GWg>gZV72kJm[#h"
  704.     A$ = A$ + "f>CUO4mc=aJ<=QKH<47Qf\In2gR37gbWS_VICWQUcc[V^A]lMa`m]e1hiZak"
  705.     A$ = A$ + "6c1ZWM;GTYV^<]0`jn6ed1aE879Jg6mU4aVhJSd>QGiXg1^U3O#ES?dV1Re#"
  706.     A$ = A$ + "NAdn>j;9CC6d^=7=Qhd[Z]JiZ5_=f;NYMK\GaB\Y5;H;4GRi`9e:bR6gXdhb"
  707.     A$ = A$ + "bN^1iJBNb43J9RMH4KJaba<OJC[KoUJM2O7FkYImQNSblT=8?77KB\1lD5<X"
  708.     A$ = A$ + "=9?gY8HKKM1cFOn]<_IRU9Lc9>eD5NiC^_MEi?]HFcoWoDEoOclXgZm8LN:c"
  709.     A$ = A$ + "KFR?YicnRWZ^UHB<7m9g83CR7?WKcg?mm3kS#NmG=]QSaFgja7dWC4;j\5N#"
  710.     A$ = A$ + "WiZGXJ_f14L9R7M9KKmRmG2>dFF;>djGVbERf^M0icjl5NBkK[[A]ki\fZHC"
  711.     A$ = A$ + "gNg\6o[bCa_`g\H<GaFLV?Kd6^ckDGQREbHcMQWVHGifF5^:afc3O6K1kQa8"
  712.     A$ = A$ + "LV=XijVeoZX69HmDReQ9FCV>Mioh>Fm\enH0i1AKfH^FBO^\ni?;\_=_1LNK"
  713.     A$ = A$ + "kDLjc?CKdjjEKJACB`U63f`lK#kagTW5[i;D3Vd^YJTiSI6b1G9Hd>mT4fCg"
  714.     A$ = A$ + "Lj3^>hBY:fUA<9ZCBR3aARnm[3[Ngj]NLCOPC=;e^:TiVedBdnZJZJ?g47fP"
  715.     A$ = A$ + "dnA6eb7e_7ea7eV7mM<7DK=Tkc`kEm:VSQc#L8Z58kHhnLnXRO9g_XmBP1gK"
  716.     A$ = A$ + "MObaRHJLN6e8>mARf3B4>1CeeV=>oTnK^kR=EV_K8f4ck23KRHBleH\f8^4e"
  717.     A$ = A$ + "X4aQb=DdXj2cDkS1\F\#\7Jk6aVX?U8VDG5^A4?J0^iSL?MaVj8?6I;aYWk4"
  718.     A$ = A$ + "6]f36ljkJR9AL5;nK4KblWTQ=aOkV]IVOS<oRcg[M\WjbG0^VcOOJ=EP7_5C"
  719.     A$ = A$ + ">^_5[>nn==[B]TacE4KRK3_Ook\VGddfGF?d8G7J77]=VlKX>DfcjG4ne?em"
  720.     A$ = A$ + "Sgha_WScOB4[aZKg4GRlU8V4m_TQ1iU;5O=R5Ym6LaV\5:[3]`a>L\R9g0FV"
  721.     A$ = A$ + "KO_ViS2ed4me8aMG^PY\0I>`LTcWD?8;HZS7;LJC#SGj25kiX>LIObVO6<_Z"
  722.     A$ = A$ + "fXP5A<X=Cmo?;7<8nLWl\5lV5;fG]l5ZKic[7W[oT8_6jgKR9ANA<NM\W6<Z"
  723.     A$ = A$ + "^d6<^Nf1eGAdoBTc1e90e20aT<\8nLd>>R9Yn8G`T>Kaf\cfen<nhm^f5YlL"
  724.     A$ = A$ + "DoE;LS>P`3RLS8FdY]`IXnfOccNRHg;M>h\5<ZcANncF\AJ?\6l8lY8f5aa8"
  725.     A$ = A$ + "?Ym\A7N97LGK2kD`V6KOkTHGLVHXM\iJ=7i\Fk2aI;leXnYHm?We2HFWdn97"
  726.     A$ = A$ + "L?Z>2864S36mQ6mi?e09kUKlj5]?cd[0i7anH`BWiHdLUPnEPmHmmLb[7kJ3"
  727.     A$ = A$ + "[5[I>cD\McYWcaJWPf_hV:e<k#4<X9YhI[NfSAhbG7J_H;ON96SR55?i59H9"
  728.     A$ = A$ + "IUJ:8mTBDkmA\7eV4cY=IT:k?]lan?fPJhV3nnc9i#Zo_9ND8GnD4?[IiU3b"
  729.     A$ = A$ + ":HLJ<kH?SSlVHN><F6g9QGl`jAm:>2aN8V2iIKH;dn<Ro`Nf6O<i8Al9f75Y"
  730.     A$ = A$ + "?42?gB>6bGR3R_A>04CRmCIJ?:So8mc_io5=O:4\97o_GWR3`llRfYaidL;7"
  731.     A$ = A$ + "4GRfhInfVhBd6^bc:9U[4]USJDRfYAkg8?9FgXZCh3ANB6^4mc=]Ocle=i<A"
  732.     A$ = A$ + "L:noWij1e:9e95ma>m[Ugl<SoNhnL[Qm`7CnK6G:noRhAVo[ikWHe6ODf;<Y"
  733.     A$ = A$ + "N#=O>A<=N>R_^ZYKFk^MaOXm]CeE[kF]hdZgf4_PlLH\dX]GFm`bjUB\V0AM"
  734.     A$ = A$ + "9AOM[md4gja=?FcgCFmlfQkd#eJoY5?>>866aS8G9R9YS6HoFM2ZfeXmGd7S"
  735.     A$ = A$ + "d?B\n[#okcnJg99HDJL>4^h\_KB<YU?k9SU=[9YL\Gc<WTbAjT5<6Rmh`CJb"
  736.     A$ = A$ + "Z?^iS=^BLO>D\8Q357d?CZoU4^;dNZY>P^Xmjb9e_>RY<PjDONComBn#4gQn"
  737.     A$ = A$ + "=Rh#D70KKYCeQKT[mALHHJd^=RcA<8j_XcRJ2HEcGONj;KjO8jc8J?6aUfnR"
  738.     A$ = A$ + "4>IcKZJO^VhAL\?13j\FfLELYe>9ilfH6TZi9F;mEkT4\XcFh;=Znd9DI>15"
  739.     A$ = A$ + "kVK^jk;jWM]nT8ffAmMN`CK]hRfe9[ehLb5Rn]WhALO6KCfKX8?>jW:Z5Mc_"
  740.     A$ = A$ + "d<6ZdOE[OnC6KDnLg\lKQiN3i7]RI=MMLb;LNH;;MAZML\NM#K:_Q;Koh7]o"
  741.     A$ = A$ + "]97odA]EU?:>eHDom#mHWNl>acWi^F\b8>]OejdGfH_#RhA9;LQ8V476>Tg1"
  742.     A$ = A$ + "i6A=;UG:YhP_i>BAhJa?GbU:1gLSSHF\NDfRB;DS=g9=a6dl5Qi71c52f3GW"
  743.     A$ = A$ + "XHW7]7ShFL;mGiXLck1[>BbhKcL_Sm[MRCANCLXl\TiWL^VecehmTL;SSVSN"
  744.     A$ = A$ + ":7PH?BoM[E2>eo4>GVlThLMZ[Jc7cdOCT;4e]=aV8V4]GSLVJNAIiDgj4N?4"
  745.     A$ = A$ + "oQh#4CJX2>7aM8>D]EFVZG9^UiY?mg=Sk6a2Y>UX>:YO\<L7;Gih_53GRh#V"
  746.     A$ = A$ + "mL3b=WOi_G^UHbdgllo\gL1VOFdF#VOFTK4SG7c?;niJ_?>dNd#Oj\CmUd]?"
  747.     A$ = A$ + "LJLTX_U8g9JgVbEB\GSlT<=#Bl5^?[E]FmXUngVJUSjCaj]96?8cODL[3NFO"
  748.     A$ = A$ + "MkogSB]OcZ?g<Ff<_bY]B;QJ8#h8_8aF>bIRnWfZUHd_5J=BJ>C1KD`<>eE]"
  749.     A$ = A$ + "8\f5<C]F6aldWe5;jKe`mUEQg47d?edO=DWCL`H]InbVj8V3nHZYaCMQ>aKS"
  750.     A$ = A$ + "H7<Ng\GDcNl4eJdRW`0DMOci^4Wa`L8G8eGgWbReJ:9aXH\hh`la=cK=nKPj"
  751.     A$ = A$ + "AHlM_3H:mYN]7`ANATC4]CSOolkVKY=NGb>gTbYj:fkFaE;H>Gj^>55kJg;A"
  752.     A$ = A$ + "hI<QQS]<W9YnNRjLPH7T73S_eH4l8FC4HMMOO2f7OMJ[8eI`NLkA9<VlDWmd"
  753.     A$ = A$ + "FKjK[E`JB\\N3caONl<nO<7KD=K8LQH^4C]S#kd>W]]F\O1WidUOkWbbW_P="
  754.     A$ = A$ + "=G=OEWoDV0Fj\4>1cN6jHicLJJNPAO5DOc;CaQBe_C<db8P?]V\aNbFj94;b"
  755.     A$ = A$ + "9eT#J9621l7EHL9R7aJfF:2OXT5LWD8f3[c]=2VT57^Pbf<36dCokfY?_Ao?"
  756.     A$ = A$ + "UA29XhFZ^_SbQ35mONaYW<jGmeZibVICgh7BoDoFB<9^oH4\X9jJO6aT\l[E"
  757.     A$ = A$ + "[CHbJjln`E;L[YoV8?9bARL0hlHbSPL3hlBjWLR?]HIMD6_[9:HPDO1F>LA^"
  758.     A$ = A$ + "5dOFlcVcY]L_WfYA\7bCRJUdd50mYTnlTkCm]G]KShBeDNQZf9[<_<#kJJaQ"
  759.     A$ = A$ + "S37gBKgH<g6E_XMCMFS17ie`O[Vo[8VRUK9la6W8cV>R[`SQlZhFbCbZkMdN"
  760.     A$ = A$ + "=VgOd>ERYAl>NnR3nHJS8OoFmVSl6IMTTf^Ie61^ULVVX[?V8NdXkM7E<9J_"
  761.     A$ = A$ + "6i6iEKnSXKeXhADC0<6LLO=6L2F4_7Wh?d6?[GW`WcA3US#e6YYgKC[0\?;a"
  762.     A$ = A$ + "LhT[?CmKcHd_da?25CRLXXNVX^1hL3]fkahn;lQFeLWVR=]oCKShLgaV`ngj"
  763.     A$ = A$ + "ja^Gob2G;FI^bAM5#k#DLYI=1eF8JS2aKXoKX>TE=I;fGiP3=5eo><6Id7#4"
  764.     A$ = A$ + ";QH;Do<\?7aNZ;mU4eX4]KS??]YSK979N<d_CdoBD;C\7bAmBBNFCVe1jnF_"
  765.     A$ = A$ + "JCVi[XM:fT]ei?=e^=J3fj5^8lg1e107dOF6W:J_7e90aaXOTX6UX_W8F3]c"
  766.     A$ = A$ + "RJaSJ4Ve4XM;OF<gE^0V?;b[OJbW9[EA\?R`hfC^_<O19g7VGoTC4mc5OM^n"
  767.     A$ = A$ + "0_N#\MFK]Y6Shie3\]=Xijg:4>XT_jBWaTL^F8L#I_JNicI6J>OA]3fWjj0J"
  768.     A$ = A$ + "B^IjH_TPk#\8R1UVP75::gQOgjWM<A5VSDR14<3f_JS;PFGTX]K4?b`Th`[]"
  769.     A$ = A$ + "KfX`<BEc1g0^l]8>T^?aeR9F]7LCl]0^lWX_VXOa9VHZajXO0jcZZ:<Od[JK"
  770.     A$ = A$ + "_nkWiCJ33F\GC`ZVPPE<<I^TUOXTWdTLef4eU9eG3WCaiQlL3eSblVdXalWl"
  771.     A$ = A$ + "HLli]K]5R3Z]Y9:hL\VW\JQG>ad9>5aT8^5WWbinT;1afhLIRcaHABo7EKEU"
  772.     A$ = A$ + "Zh#<nKL#^BDcTT7TiW8JOV=X=J\_eANID73DSTDkTm#\I[CbkQiLREG#h`ZQ"
  773.     A$ = A$ + "^6F4aL8FREGMi[CLFcOeV?W<<;c7hZ_iKNC2[?9njlmB<=RGcgoTLeX5cMFV"
  774.     A$ = A$ + "?kFn8Ke0B[>CajRnXjE]:VTe;hXo^9n4el5SeVQ7AKfHLg8^4aODm;=P^ZHG"
  775.     A$ = A$ + "4cQK]WWjgVJSTe>4]nBJf_9HBTO4cY=>Xm8;Jd34cWeQkQgK=_5hPjbSe9ia"
  776.     A$ = A$ + "CNLdFZ1gMUCWe?Y9g;>GSJMQe8ERW#KVH=<LC2>47Z_KMea=aVH\]]jB?gWh"
  777.     A$ = A$ + "=f`lM=mA4c15fW9GjT6TJ;4S3WiSKFKfhPhAdn=nnhW?k[V\oH^#io:SU>mM"
  778.     A$ = A$ + "d59lIX?P8FdfF`dEkc8Nd^FVSMMlHX]L4GTJmTaUSH:4cPj7P3RM#n>TC7aO"
  779.     A$ = A$ + "6CgJ7VY\60em4eG9c[>nm`SUeU3F35<kUee3Tc[<WU9?9R;Ie`>RmKekOZWE"
  780.     A$ = A$ + "6KOFojILa8GDfCEijl;JZSGaPfPHSf6Gdl5kVWTZC7Vg7\FH7Y?M\HcKmGKc"
  781.     A$ = A$ + "7e\f7Yk7G\:o8>26K<QifXik_`;:9OTOT`a:ZHAJnSk4j?9nMB<WBc=GTV`9"
  782.     A$ = A$ + "ROn4W;I1?RHK1L]U;[TB:l_=R9JLVX>2\HlanJIKJJY:^dD6U`mAh^<iA=He"
  783.     A$ = A$ + "f<eGC^aTSjIRJIRe8AZ7Y`amNPm<L_ZV[MBlKV[;dOjdoE4GRfGAoi#K\hkQ"
  784.     A$ = A$ + "cS=kOdjZ[[_`Y=?VO]Xoe7LgZEeY4i<IfceVb:#c[4ZSKniA]KcnX9]MSiH2"
  785.     A$ = A$ + "e`=]CSnC_FiH\LQSiU;e>9mK5a<8N1aMhSi`h1a]VMKVVcYOW86SI36o]CL8"
  786.     A$ = A$ + "6o#noQn3SK965Oo4GRaRch4BM#IiX?[S]\nebjB4iNHl?X?hHL:eJnY<WWh#"
  787.     A$ = A$ + "df=Za;[O?`7cjElhkGM>iFXPC#NCJM<^Q17f_CV]KQ[9kd?D^iL4S537d^=Z"
  788.     A$ = A$ + "=LR7aab6g#aBKH8jf5>Z1hV?6mBaSH=hB[Cb\g;9cYVh#jQnKThB<GPiW7WS"
  789.     A$ = A$ + "A]1cn^Q6ojIfPc#hd`J:;[mm[WJ\InSG]1Sh<47QLLHmNT7;];SLXH\eD^A2"
  790.     A$ = A$ + "V3?6SS4cO4Jg6S_?];ch4amYfT>[=^0=VKFM_WJBVf^A>Gd^\e=caYn8RHBW"
  791.     A$ = A$ + "a:W?fmbW[Zi8R9AKk8?9Re#o<AL7b_a`P865]aRLHij64WWm14J[7e#0i1Bk"
  792.     A$ = A$ + "19^n:4KkhWg>TWWj5SlQXMMLOZK8V38dg#F_XRaPPLH]N>2[e1FM<Wf5_\Ih"
  793.     A$ = A$ + "h?46oPU>mY8[Y=:DGeEPLR?FaF<o:N3W;CO9CM<B=3A<Rl4Kb:<]<4nB94fO"
  794.     A$ = A$ + ">186CPPj81o\7]9LOR?P^=F?n2RhAL#l8>BaMdHf^EDVYYOf4?JKKLSQ]oSL"
  795.     A$ = A$ + "^hn98HBIVL::V4o\9^9o=bOcI6OLboQh4khRAeMIn9WHhnbTS>XR3EDHFX3b"
  796.     A$ = A$ + "Jn3ZKMBeRTeS7Yn:I>YHJTdZgTZF^7BOD<8Z98_i\?aSFbdWXRCA]9XjVBVk"
  797.     A$ = A$ + "Bn26o;Ck1lL^>WM:SEiLAo`Co]Cl>boRHDd>>6OOSGT6_ofeB]N0`]<Wf8o8"
  798.     A$ = A$ + "jo8[>1dnB;0eGQ`[ZUE:L[[A[OS\_gIjTRlUlJKVEW2l>lJ?WigJC3TTGUYc"
  799.     A$ = A$ + "1b9RncVfTbSWfZIe0?nLll8[k?<N0dg;lN>V30[g=f0Jo1Nb>mEBJoUIofTe"
  800.     A$ = A$ + "n>C?LZa32n0cAMV?9D[TS^W]Gi>A<8><nEVOU8FUCOXLTZO^Y>aiJeFOmSe2"
  801.     A$ = A$ + "<R5]Z9><\6ikNUbJh;TeS0QSalLk;gcI4dOE4K[kbem^;_onYnFWmK9V3X\o"
  802.     A$ = A$ + "EbNGh64<0R3#N:4WQlGH_hPm3K=_8X]FcM\H3WdH4LY64LV9XhCT3TFC5G`T"
  803.     A$ = A$ + "D\4bURe73nJ4;JScEnlVmXdlfUH#T[4?FNLL;aP2WG_\71aN39[mnR]K4SS7"
  804.     A$ = A$ + "?a>HLlH<dfVP;AOKAkf8O9^?]EkbfmVEmCBMMcJoTYmDVkVSZk]GGGH52Vb:"
  805.     A$ = A$ + "5>NDSdJM;B`IH^:_LiL8cEIZQYc#`jVo8jWbMRHe<^LDGe\N:#n`\o9LVKJE"
  806.     A$ = A$ + "ZoQHMIPil3mOTE[Z8G9f?`H<n]jg>eBLaY:H9T7Q<G?9Gn?dn<JoSiC76k\D"
  807.     A$ = A$ + "4L9SKB0R=4SHKDL9;7GB26A\861K9#DaYmEkDB8XJS5ie#n=47#ad4^Bj#h7"
  808.     A$ = A$ + "A<YTTg77QHO:9ZH2?Bb_S^^Y_R<^#4?ROV6VTmHb1SO?9hR;aLTShB1MelTR"
  809.     A$ = A$ + "CiA?1F^[TT[MVZ>bUo[d>9b7Idm^[Jm7PaSCe3`PjSRaHe18ZgKKXJ>Pn<GN"
  810.     A$ = A$ + "MZCA63NR=ajH9m5<aNX?`9V6i<AO;AOT[emO17JACKLZ?;8^4gb1Sc<]CTf6"
  811.     A$ = A$ + "Jj2M8M[CZORX?SXMIdn<b5Rkg?Qk4eCcD6DOahkK?4kmK3jFcMdY97<fK43b"
  812.     A$ = A$ + "bO=SGTI7WigK[>2HfiANCL[E3k8F4ae8>5OOVf:]l;adGPEg^I=hNPeGSFo_"
  813.     A$ = A$ + "Y_]I\fX_^Y=a\G1<h>C=ADSf_VX]JFm_Rc7X6UXMKd?gdofL;7S[_^m=;gjU"
  814.     A$ = A$ + "5gWHJdf=F?7IMK`dVYech<o<anS;]ESHA4CJ5\W18kclORH9LNmbW<eB``Te"
  815.     A$ = A$ + "c7XbGRiJ7m]>i=an;2kag4cR3R5A<Q=kVkDNk;7<_fGaD5kFVb#T]3Ak;A4_"
  816.     A$ = A$ + "A72n274cQi#k:Wf`DoJcj8f65^EKFh:AmnanV4c=DfcTfY`9R?VHQlmbh_ah"
  817.     A$ = A$ + "Z__CNI:O:e6?FgCFf\D]BbH[C>B7Jc[FmQ=SIf:4L7jOOJ7f4Tc_S\[]EkWX"
  818.     A$ = A$ + "TC:?GbcATCSU;QTW8aTH=RB]GE`LXmN4OSL<G1kAmbm5;K2SDikHija6Gd\`"
  819.     A$ = A$ + "ZI=dC\1K=WdddJM5Sgc6Vg<dj??cS26OC^^?[iGTKON9#<1O:>4SC6i3IHA<"
  820.     A$ = A$ + "?>h8T[MIL>^f;JSfMh?JM`NMTc8>I^?S36kCT1Aln38HCA[h5dW?dWd1mk?L"
  821.     A$ = A$ + "m7QaJCe1P[]KY4E0Mh5;:iX5L=1_cn^n^OhG74;;X[FXD]AYW?l;hCaZKY6="
  822.     A$ = A$ + "I^oBm?ajf=mYf\W`HehiAkJYf3X_bYN=Y>b7S`KQf`aQVS:2V3c=QY;[[<3i"
  823.     A$ = A$ + "JhZU[U;LJR]=RMoCMDmC73]WM#hYeN<lNGWJC8[EAT_d>FobEolahVcJ17m9"
  824.     A$ = A$ + "\YoiYifW\]jm?OMF7EI]Kbj59dnXCBVc=1aVSAd[J5nL]F[Yn\nkggJKYjoI"
  825.     A$ = A$ + "FOnkOWLle4a]hFb[RiV7iF=^ndMI>O?eJ`0[gLdgo4;I0e;HGeF=jEk[DgO0"
  826.     A$ = A$ + "MY]boS>6>nTJ=FZkM<LLnX=Y<GSijOFmIQ3nLlh<]3<L[G\8HV=#<k^f1<Ai"
  827.     A$ = A$ + "L8k_CC#k_LMB]]B[GI2W9Z;6bUQmEMjg7nORHP3\[]C^6dN1c_Sbj^eSY?l^"
  828.     A$ = A$ + "[mD;fk8Hl]X_NX_OX=>dn5j35cG:<7i_RcNkhj>dNeNY=eE3WgCo5A<Y5jRA"
  829.     A$ = A$ + "A\:ZG:V[jTo4]SK^SY_RM93aQcd9AkD7ZZ?6]f>_`9[afWnkQlILdf8[gn[0"
  830.     A$ = A$ + "7Jk[CkUg<W=^HIkQH]lH[[Fe14[U]\WkbjF9ic#<3f[NI>KaWWaeRJjQ_^e3"
  831.     A$ = A$ + "IiPm]JFog>KQS2[5S\NI#]\cN5:cCmijfc2h`ja>F?SgjOM4;Qe1<j;EFgGX"
  832.     A$ = A$ + "6ZGkLVZbcU77[UJDcXFOmQ[_BMB#oAc1m3m\6gXeldRe9f>fl:#cb;;TKR15"
  833.     A$ = A$ + "N0>m\A;g<Bf=FFLHJDd\Y:\_LLm=47>cQ?1c_S:V`S#nMhAm]Ihmc`N\mJ9Z"
  834.     A$ = A$ + "HIam_<fClA<RleigC#o7c7G1miD7`C9VhLO>7mSCknXob9ga2C;9dQZJ:6F_"
  835.     A$ = A$ + "jVZS>63?R1Akh8O9b]QnjVnmNL\^^Bm=9LK7o`4\4I=jAdWjah4LR5bnhcd7"
  836.     A$ = A$ + "3F1WO\j5RmNZ[EaTX?_YfTXmKFo=QL<hJ#<^4<g3iFjK6Rk`j];SM:_7Rn=V"
  837.     A$ = A$ + "LAH<^dn2Lok\>GMZ2OQU8OG\>Z^>FOSUg;[QST[<[?Z\>hbjh_iWJcNCbeJX"
  838.     A$ = A$ + "eg1egJ\gNcnX1eVfRUOkCC\iITm^S:NGOjD[#gJKUZmV\f6`H8B\6;GEX_bh"
  839.     A$ = A$ + "cA\9N<3DNl#kEm:?AZQEN<TO5[GV4GJ8b_Sa8LaH^P#<9FoN8V4e0c#[_UHX"
  840.     A$ = A$ + "M^EJM2Pid`dIOZIL3FoObO7M_MEQ^e1QWG]]#`65>_mSeZc^XS9:l]X?YJXg"
  841.     A$ = A$ + "eZmN;j7463:VWl\NN`hBchCKjSQeV=V_74gPj^QeK=f?YIOeUiX>]WSHC;e]"
  842.     A$ = A$ + "N^=o6j_baRm\`U9HC4_RfmaNE?m7>m=4aR867o<InbbJ]4aTXnMff:IMFNZ2"
  843.     A$ = A$ + "oR9:l;VPJkd2Wb8Eo4CkLYoIH>BHebBJoSEOHI>7ce[Hm<U[i`L`S[=YH;bm"
  844.     A$ = A$ + "9DolLORWHnfSg7aja2OMnlln8;?bhcAo<CN>dg>d73D[Xd?ZDSFDcF[hTV>F"
  845.     A$ = A$ + "f\WZVCX<VHDKYDS=<NaEGD>:^3ie#l6KOcnU4Lm1=cI3>dJ;[klA3;P?f6AR"
  846.     A$ = A$ + "Il?khK;NTY;0nLfnNomlm=VTmmJh`4C:iXUcCa6`1KBh;ZJ=?6ojF>\c[<NS"
  847.     A$ = A$ + "LKa2G:FcijE]]5m\3eXKYVXdjY;e10]KC\[Nl\6d=b1RA;H=S\oR=83]gH:2"
  848.     A$ = A$ + "6eH6D?``kCGdGSjjVf;BkoF3ejkBV[CMIF\oSLOYmCFO9`hFHm]K7]8dP6gN"
  849.     A$ = A$ + "VOKDo#<66<F6dW>JNa8h<F]6Qn8S7oj4ndKII;#n^V7fdRW[Z[:6;?ZeZU>="
  850.     A$ = A$ + "7=bbLEVahcd[4ad>3Img;n<g>^lm];LQWefai_g]Ym_l=]\iYlUXf[Hl3IM>"
  851.     A$ = A$ + "PJ_RaFTh#L#<Y^9LVjYP?e;13SlU8^UY_2S_dhINl:3f;;Ion^?2?`^g2FkG"
  852.     A$ = A$ + ":G`?KQ6CD>H=:M1CM<He;HVH=;LFHYbJi;DVS=CQOjD7e0Do2bNZ;[CZLN8]"
  853.     A$ = A$ + "9Sa_KARMM\nP#]BgkFF:Vi#jQj_K63>nl;WnKB\OQnoVe=Bj;9>HmLRfEblL"
  854.     A$ = A$ + "QnNWHDL`HeAKlHnAhTS4>ed97lS6dhCA=j#K[H>abNJ?[]dleDoi<>Wn9`\4"
  855.     A$ = A$ + "NdTS;m77SA`bUo;lg?GSRmJBbIVKI?W#cS`Qf?MM3NOPNobd7_VOYlN3[?QA"
  856.     A$ = A$ + "O6<?GmYckQhm2lhiSiPe1LnNYo6hm4ln86g[e>oIYiZ4aOHnd#\8Jc0eI3__"
  857.     A$ = A$ + "_5UD0b<nHdLFe`O\h;UT7K?XOMiFMOGL8VC7jnbl=U7P7l7=fla5#eHMb^a["
  858.     A$ = A$ + "ok2<Q_YA2Z_VJLnGOC_fgWHBZ_g5<YdR;N5C:W#9X36k>R?acgQlM<<9jkO^"
  859.     A$ = A$ + "eR1IRnLl;E^96?:<e4AeUF8J[`YRmhPN8hESPmn=1KP[U<<jSlnfI<f1gCen"
  860.     A$ = A$ + ">bYRn?Wfn#oUcQaIajE:dghDc6;CciW17^>cBl5;_m]jl8iXHiK6c36jk#ba"
  861.     A$ = A$ + "VnfRKikWOn>eIbje1[[`4;RH#\^U_TY>NE;oDW\kH=;CGcT_O^><kcJ\O[EC"
  862.     A$ = A$ + "Ii:[;fDefCZC2jG<bEbd1:aJ<Mb?S66VZ9<foIj^`IZ==]#DG[JVb=DckI1_"
  863.     A$ = A$ + "C[a0bFFcRioMjK:nOSa8Pmj3fK5hPkKn[RHiDWndFJ]>RccKll1mc^<WTi]6"
  864.     A$ = A$ + "SQ1[Yg\^f#\4bcQH=:>TP1=WQfC\8aFJ>F0[Q:m]><m1d5<O1SRhADoaT;4["
  865.     A$ = A$ + "IFlmBMBa?WYk6W>>8V4a[8_9>X_a<o_c]\GF`j6?mQ3k[>\?Xc1Se8mO6eK0"
  866.     A$ = A$ + "c9i9j>H]WRG3iHZ^lL\J54oO#^?dV;VC<JM<#^^BL6Jo476_6RAA=faHZ`7C"
  867.     A$ = A$ + "OFBoEbmical[R73mS97lall9e57cMP:;8;=_i=K\XoG96DU5T3:=cDUi6ndQ"
  868.     A$ = A$ + "I76m3]CnE4[jkHR7UZKnTIlT2k[GoNVo51gX8aTnGU[DSQc49VSG\W_[onnf"
  869.     A$ = A$ + "bWkhhWiR9IlT2iFGiXmK6gCEk3AkhW=N>Ui^7iMZl#inliLmAG2nMdE5m77S"
  870.     A$ = A$ + "KIj1SF>7kCeFAYIU6JCEUPjKGeHXD;UbLAF7nY>5X_Z\ja?gbeU6IOkY^?[]"
  871.     A$ = A$ + "CCO<S#gb1m]57<OohaC=\?JicIXm\[:N0ahX>Xh`d1^j_nnajUMo5<[nYm51"
  872.     A$ = A$ + "Kk`j^L_H=]2egl:AWZX9XS=[LdQVF\F_hH^ZXmC]2cDcIh:b?EQSN6X9iTTL"
  873.     A$ = A$ + "_I#DInY[jZR3FK3X=Xd_ATCTb7B`>6THCGm2WYf:_NWHNedV:3GG=iPl[<O^"
  874.     A$ = A$ + "cjBNOLiAamYmMFmXSnJgZ;MF<06Lgk\noWW78GeQeGioLOj96DgjRN>NTbiR"
  875.     A$ = A$ + "IBN84;IXblong9<j^dB<iNg>LB3][H2M[=HJmYF<7F?14L2REaa<4K]9g9j?"
  876.     A$ = A$ + ":j?9j3H]?e:f`BoXc1[IVdOjlih[AO4cnI`dM[K4d7PCTmF2ZGdneE]F4B];"
  877.     A$ = A$ + "Coj#>#Zn`5k_hHNCNDRm#SDm?3a<8W5>hJBd_=LMR5:f;MB=<2=ODWkh6YZG"
  878.     A$ = A$ + "G6cGZW7V3<<gaY]D;EN<7<?IhS9?7nJ3GFcS[;fgjJ7ZA^nbjeQgJ7DF94MH"
  879.     A$ = A$ + "Md`kmEn?NdoSZ=IQS3e\\YMIR_HfUYagfef3cO8VoQhnfjnNScna`TRaMle]"
  880.     A$ = A$ + "Mkk2n:=6nc9ji<L23Sl7B<9N>Rj9Pj8PK=oaYHCDchAkh;>kJPVc`aJnd?j`"
  881.     A$ = A$ + "j5Ua5<nXm[Jd:f`?WLlailIXa:D^G8k4SEiLiXecH3S[aeOhm8Y4mal58iRU"
  882.     A$ = A$ + "]`ASJE_U2G<bSNL3^oZ_4=<<R[A<6[?\<UQ=h`njRKYo_6Koj]\6LOaXjM?`"
  883.     A$ = A$ + "#jJmXK]^5X;]\J5CJ0eE;6VlL3XS]GeN0eK0eV4e_=[a:<?HJOU5Qff\2TO3"
  884.     A$ = A$ + "I;[IVVV[N\>maJB7aU:>]4L`^TA;;;?DYPUe:aF>b?RHAL#L9bYRHHlcUJ7U"
  885.     A$ = A$ + "JYRalSi28O>[f]Ha:ThADWElg2aXXOlXf<h_Ino#kSXbiSY<bA:HeRM[SHHH"
  886.     A$ = A$ + ">2o163eY=:fkCX^Vj1Fl4j?VoXk9Vk`j6Fnh5nQ3]kHAS\gHa2WVE>^QP5;f"
  887.     A$ = A$ + "#AkgFf47VjKLZ59jK8Zo?Zi96SLFCaYN38N4cC>bIIICMLJ\U8V1S7:k75;J"
  888.     A$ = A$ + "2RmeCVm9U9XmX2Fk1HOKM1SKD:nb2H]jB`FHN9Ia_ULIHMbAeb\K_HQa\UmN"
  889.     A$ = A$ + "JR1AN\lmbj7=][J:SN8HT2gb18L<kIM]5MB^Nf^Z[0EDDnZNR=\263JC;OVn"
  890.     A$ = A$ + "Hh[C=n`J34G_E?Fo>i[:eo<Sk>7YV#LJ^dWRKm>ShAfmofSc<Q#8_TCmHn09"
  891.     A$ = A$ + "Vh2?WBeVX[>4iL=><\YSQ=HnbnhaNR4chk;<Y8a8ljWkoMS9amel3Fh9Zon<"
  892.     A$ = A$ + "]58G7D=4#\KgHda]Jo3gOdQabYmQ43RJeRSHTG?T\N#RDS5aW0Rc_L]=Qh5<"
  893.     A$ = A$ + ":7\9kj<olc>YPQ_OiHH?A[ldl^>UaoU?WS6\RA`VBE`6J2jFKKSP?An2MEh9"
  894.     A$ = A$ + "eMMK33J0XoM^>I=AiNEIKoZChIdMjKiNXKkE7JW<OGVOgVFQ^;_o1ee>[7C?"
  895.     A$ = A$ + "KOKE]ZaAWKAEX[]ZiQe;5e<1c]5j[8RmHeZGZ3MRO#<6j;YZ;>K57Z:iH8FD"
  896.     A$ = A$ + "cUSSkc1O=>8FE[ImeDN_e:fjaSSK[YI59[OW_JG8kMgeEMYQ[]`FobSmECfO"
  897.     A$ = A$ + "l8nTC_HX;JNm<mA><]OI=o9:cS7_<o_QA[c]Y_RG`T6\PK<<]NF\d9gO1SHP"
  898.     A$ = A$ + "H]cHhJMPNKcMbHkcOZHW;JVJ^`cjTmI\V5Xe<Fj7LFK[iPmm86K:jW>ZEMb]"
  899.     A$ = A$ + "Qa?PnRSh54[PnRSo6HoiJ1bfE?kIPCJ\SBk5RcI<SDkI>\6`?=I]RY>lQXmf"
  900.     A$ = A$ + ";b_U[U#>aLoAKm_:geEjOWjP^NAgKC;e]LmXlB:Q`nE`dNWRGhbAWjfS[CVJ"
  901.     A$ = A$ + "la7>_\BVm58IO=WAU77_KNBHShMON^>JL2VT=deCmk4?mHM?Fc^Z\B:Ie>;M"
  902.     A$ = A$ + "NP?o>J5::QGQ?WhYcHYCmn4Di:i\eh7IHBa7a_1;gHonb^ZC4VGTHAWXSoOW"
  903.     A$ = A$ + "HB>WGSBi35^F4hgGhh3HeDU_f_Ini9ShU[1aahh9[=4#>O73G?B^^a]14>C9"
  904.     A$ = A$ + "#=A`LdSeN51;bF[RfgYe0HO>hANi9Km`5c?kNO=^U_VQIak?YmVla=9W\dg3"
  905.     A$ = A$ + "[M`ETG>26B1X55;caKAeX;]^U:fCOkD]HXmXK:nDOjH74kWJ=jL[JQR3Yf`E"
  906.     A$ = A$ + "Ec4LQbej?0ceg`mWKa6<33Reb0Jk6][SHE<WmJQP;e<ii<l8^OaI4BaQJWlN"
  907.     A$ = A$ + ":DhAA<;R7a1aV:;kTeSW_GJCHM]\L]>C#<9f3=;<TODCAIZnj^fBb3mSmY\n"
  908.     A$ = A$ + "f=<GQS0[i8[KfCASAmfF>a#FQFSMfk6GUFSC?WCIYh<gd2`^F7[;?c4kO;;4"
  909.     A$ = A$ + "We9?GL`CMYh<Fm9Q]_hIP]>_IPcN=;3WeZGZ6C>6W<R9ahban\6[Kc<fUdgD"
  910.     A$ = A$ + "d6[I<f1[f:A^:cKbSG[IbcF`NVf86:V8kEGR=aTkf#kFWA:<_2heNg]YakYR"
  911.     A$ = A$ + "bITV[OJ<>afeHb9f>fdSfihhWSnI4hHgS`eXDN:lc?PS62I^DXjhSgO5CdQc"
  912.     A$ = A$ + "kD^ULgiPimUU_5Lohek?M>f48gNim6_lHM8_F:1C0Y5:AWeOmi;\=1LN0WcX"
  913.     A$ = A$ + "c7R:6EW#9k?n`HBDK?DW?f8T?glIe3_96OO;>o>HUOM^BNWkn]InMS5Wo_9<"
  914.     A$ = A$ + "YoInloObgig4G]_=3[>>ISPQ77og?aPJ\A<nTk9R:>iN2ZUMobPGkM^fJgO`"
  915.     A$ = A$ + "[oiWNj8c4C<\f?=ma7igOT3R;B^bVo2]gC8glkQ?OnYVja]ES1;cOInm4FWk"
  916.     A$ = A$ + "9YSa=`1QQfMQ?EmM6M^U]2MZiEiP=EC;Ek3iffGICD=V`NX>k3^\>Z#n>UVE"
  917.     A$ = A$ + "BX9R]K4gYiR]LEGR3OXRB?8:9c4e1aM8oW<RgWR7aN<jBWmTA7KQcWACY=O2"
  918.     A$ = A$ + "f5aTZZh<ejPAe5V\H[FEXZL3QR3i3M^b2A?JAYXj\2ZmCSI=dNYiBk>FjLai"
  919.     A$ = A$ + "]ieRObiMVh6^PcB7oTcMGh6?omRKhlg=^i;i\`5]ceP3OFK0Gl^G=^PCO5h0"
  920.     A$ = A$ + "KKI:f4e4=SC?c;dM^R59lSFQP7]LLZ;JfZ>1YNSI<g7BGK_`AY2=oO8^;oMB"
  921.     A$ = A$ + "lEVoELXj5Q[K#kkmi;l8iXLZKQN7fcaSUe#\TSb\EgAOPF<\BfoGom6nc`=>"
  922.     A$ = A$ + "FZO3R>J=g]hPgCiP[l=?RWgkj>hSSCVKH3nhHSfI4#^G:NiNU4R9f`_?^6KR"
  923.     A$ = A$ + "aBKh2YgGWM:Y[i_A\^JY>1U;DL>3?j5jHjJl[?_<bk_mbC:bik6O2_k7iSon"
  924.     A$ = A$ + "VCcg6NHOChNo?Il]1CRKoV`T24Ml:O9WALj`kJFiVAjQc]HbY>NGL3JWmo8<"
  925.     A$ = A$ + "9_fAjMKB^e<1nh\25:LME`loUYKE7K0?F<AbDhQW\?fS^C6EGP`MYlBELYjK"
  926.     A$ = A$ + "5[]L=G`OJVH?EYXZ2cE[GEUUE:Xd<CFmG47Tc3WSBlTb4>>iULL:FUmJ43Ra"
  927.     A$ = A$ + "LSe86RGenZ:ES57aR:?WD2K;7gfJa^]^fjbaH7#m8W0n#=UVQV[D7n\g^FcM"
  928.     A$ = A$ + "jLCcCcERI=XNPM]dIQKoBg?n5GgUZS7lJ^#LOGeQdnBoCMC76?a?kbUm?OL["
  929.     A$ = A$ + "GjN`A>oC3Wo>F>>Se?K\_]\DLNKOehPKOM2OZePCMYc3kLe[0[O>c6CN0m7M"
  930.     A$ = A$ + "]jVRBCF`ITioI6SC]_Pe[IfcbE^[^e<e4I]S?#<Q]k``C26eaK;^U;3F_``f"
  931.     A$ = A$ + "JnWd`T<kd]HZLR`T\LR`^FKgOJLPlRoh5[Ya`VJ\W;>in23GR3kcP_FXh2Xn"
  932.     A$ = A$ + "W#GWEf6B`QhmlQ<l8R1m_8Vdo<lBnO3HBZ=HAToLOOmM7YV3\1i75_P]HfdA"
  933.     A$ = A$ + "kciPHBT?=aP:8S<dkSI>4[hPNdWagVoc6_IM^#\aY[]`?3mJ\[O^RljSi[AC"
  934.     A$ = A$ + "S\QegPKLK]7ch^DFFI8h?RmNUD4jTH_GM]D`VZRf\eD5KRmN?R=ELj9Zh:4o"
  935.     A$ = A$ + "Yh<3RVVOZ:?2FGmY__Y_^Yf0^Pm^M=NP<VLi4d_Jk7i6=]a<4<TNFWbIZbRc"
  936.     A$ = A$ + "2UTE81;\<aFbZ#GKIYXfVU7jHCb5M\d\#_[^4<WQd;=_#>ke\0lLgfeRGknn"
  937.     A$ = A$ + "IhU_kOZ>NQkljda[O?o4l:gieRWh6^DLGoXcA`Tf;>bQf1na7HKh:goFaQgo"
  938.     A$ = A$ + "f`>ghRa<KH#J_J8_T2P<Uoc4KVeI#f7;H]_Pe03Vg3<7^CfCN:In:VGC=LPH"
  939.     A$ = A$ + "m`_E[W>^aTE]iWLJMON>RG]maOhWghk4>_2lPSid7OlOLSCdLh8_?DmaYWQg"
  940.     A$ = A$ + "Gc^gDmi#4_?Jk6]ISnKP3R7A<8nJQTkeDOR68N=?bLbe;o:g9N<Q>1iQASiO"
  941.     A$ = A$ + "X`HBfLe`Won7??h4M<o#Q9MRdgIHoTO2`Tn^BoCoS`T\e]HNfhe^NSWTiC_I"
  942.     A$ = A$ + "<Q9PQdWnXOFla6FcgZ_KGKhikQnKdl7VmH7oH6Kh??mLS;FTI7?aRb:1Z3[0"
  943.     A$ = A$ + "8KQ?UUK=>hD>el5ZC[FEF9X==Y<dJI;m;5aTJCC:Ai:UOba[h?I9h<iUB\XK"
  944.     A$ = A$ + "]_J=noDGTd7C\O\DVHo6]AQcoYm?<6MD[0TW4]iSfgUO:1#C;8M<hNfAQCF^"
  945.     A$ = A$ + "Zf1KFF9P>ddLE<YfEHJX>a^#Fk=^VcJKhN_bc7_cSL7hSNn76Of[nHh]>j]R"
  946.     A$ = A$ + "Gl^^NlkNbk6o^7mf`_h7Onhn_j3R7iWNYh>^R3PKk:??L4a^^]_ji[fQAlcT"
  947.     A$ = A$ + "Ra9o>9>S5KZ4Lo_Ka2Gck:gJ9XiC6NmTKYOKheDF[`djbCl1LfbcSaM\7WP["
  948.     A$ = A$ + "?I<OfHkKHD95a`;NDSQ95f_V^3_g?j5WYa`TlR5AOFgH7[i79R=5Dn?BnAaj"
  949.     A$ = A$ + "FK6i[WQ`WfbmDFW>HngC\8R=mM1VdgVko?AhAo#Q9m?27eh24:RJ6ggF\U_m"
  950.     A$ = A$ + "oFlOL3_eCLSSN#GM=URK\f8OO>H\E?jmN_Xc][MQ?ObHF`ldiKki03oQH?F]"
  951.     A$ = A$ + "5Fa\MGcRg_XeV1koV;>VQYcnb0eD[jC2j;ZXS>L^?V\[O;hS;<eD5n#YSVV;"
  952.     A$ = A$ + "SmONZoc97Zbc>EES;dV;R;AkfjH;;GeE4mm=[OMEUKJJ=9Wec^lB`_63oZc;"
  953.     A$ = A$ + "M=WhXo`INW#L9jkk<265JC55Q1d]f[f`]\I?Adnbc3mF`#JU`iJ<M]3hjggN"
  954.     A$ = A$ + "`E^k]PGmN_Ili_bCQo[GmYa7lTg3nM?fMRgmA^EllgaeRWlWMHl<gn?1gmEO"
  955.     A$ = A$ + "Ah>_b;0GnILJJO6YTDB`a_`aN\JQ:SCUQQTL2a[h8Jn>h6Sk#^e8W0^L5hPa"
  956.     A$ = A$ + "\86M]6ojfTR?XPe4WJW>i7Kcmmj_6M>M4f#imn=_aMVaPGS3_kmAQ__b]^AK"
  957.     A$ = A$ + "3c^m_Yk;?nl4kH33?<bSS3kkWgWbkIEOEimcaEO;ll5aL=]^#OP[g_5]o_f#"
  958.     A$ = A$ + "mMNDA>R0C:Ln]ehH;oSNnO8aTnV6Z]UnlgXhBW8\\_[aTRd?2Jmi=nHe[_<O"
  959.     A$ = A$ + "VYf?VcDW4nYGmE7>fW4K9iHSgaVl_=o7M]Kch2IKSgUo<GcbhFK[3j5CBmS5"
  960.     A$ = A$ + "S?\<X_WdH;6MdQSWGR^nLb\[SLXHnoEJVY;HAIRVGLQZNOINoAOHCOGG#J1#"
  961.     A$ = A$ + "nY6WZ?Y2B>>DAfYXHADcU5UDLQc=GR9A=?aLS[6?aL[]EE263eIhX7ZZY?Fo"
  962.     A$ = A$ + "jH^SGH2aPFWK6HnSL`2VdIPGj>_9lA?gCPGi^oih=^oKAaSN_7o^Tm_1lhgh"
  963.     A$ = A$ + "US7jj^L1;jBa1gf9SI<TnS\Sf9NEJ]==J7lHefSPQLleK<A76Wa_>o::e79L"
  964.     A$ = A$ + "mo<C:EEK7<>ZabHY6US_OYOF2cO8:7mOHad`hK4Y_L<o:76SbeN8_GKS4CBa"
  965.     A$ = A$ + "UR0C:BKhRlNS8__lOd`;VURE9OWQcmnXm5nHH\H8WAN?EfYU:JO[KEH^BQ_7"
  966.     A$ = A$ + "cOdo;S9MR^W?QX>V>LR4oi7JlX8m9OTi;3eZ57Vn7<\YCdWgGcn;cOeW0<Z_"
  967.     A$ = A$ + "V?Wm`cVg35>^^nM6>eTCoZ]2Tg4?VKiWL]XQQ=<Hn>GaER>>U[doXooAR]Ja"
  968.     A$ = A$ + "Y8lFIN7WO#=BaiBL=kSSK^KmAgRIG8gjm2O<i84f66IObSbbM96_>^UlUjL["
  969.     A$ = A$ + "KYf3lHNIBo1A]Jg^Z:6MXiUZHA54:6]>3`L6YfVDX6WnZc9Ed7fokJJAZ?TY"
  970.     A$ = A$ + "nTI>0KjDRiM2iKeJa^`Z::?=Vg5UFBXU5U?bB>?^]U<Ol`g`eQ7hJ?<nTGnI"
  971.     A$ = A$ + "aOo=OIlOmJ?3nC?kAa[M?oDlRgfERGiNoYh87JOH<mZW>aPGm?D0QKDlboIR"
  972.     A$ = A$ + "S;gW4K#]6FhWea2iLE1iU7b=W<#ZY42a9hC9WPH;FLQTcKa[eP76cRhSAhL6"
  973.     A$ = A$ + "Cl8:ic`WL^SSXUkYhkg_\?7:79Ih4?SH?VOVUib47clML<bi`XSb9F\lhX?J"
  974.     A$ = A$ + "B`[nllR7hQWDHOKkR;56[beFl`aVboak7M_lfiP[AJe^7Cg;Ajgm8m9_>LeK"
  975.     A$ = A$ + "#69V0F`\V>faY^5ES0ZoUR?#HnCD7NA>2#]ele`TL6OKleRgLd_al]]G<mOX"
  976.     A$ = A$ + "`T\_OnKdKna`AF1C4I8lY?F^RhTkofLa__`T\[o<n<JM0fS6WBfeV=^oPkI?"
  977.     A$ = A$ + "aCo;n5Zm21M]APon\J\#Sa1ckPeU:^NEjbjlVMKlm`]L#l8R5aQ>7aS^>See"
  978.     A$ = A$ + "Whji:GNBVV#mZgg`Jc=H#MN#Cb97DEQ5ZfaIe>?V?D<_X>Y9=J\c=]JdWjK3"
  979.     A$ = A$ + "jD[JRfcFH]ZTeP9FcUJWP=EF:aSLSc7:B`ZZ<[TAc4\8FK;iPaX[_egF=fKW"
  980.     A$ = A$ + "fjG^RWcLl<o#a[ai[bLc2CM`30koDF?N`Ob?6On_j5a7l;ODlQ?gSRgkGn#h"
  981.     A$ = A$ + "3On71_U`EjWNXMQI<hNPLH?;En?B\8Wjn^<WWh:n28gk4_FOMB`O28XPk#N?"
  982.     A$ = A$ + "QTcWA;oWSAnNm7UCmi:X\n0Sa=a^H<D9^DdnSCNM^eQc4S1EJ9VTb]:6o7K]"
  983.     A$ = A$ + "0b?UekI7<YHDL[HTADbmQ4;c?iEAKDhjVbmY<^j9jJ3^jC#o>fDJHBVOVl6["
  984.     A$ = A$ + "d4mM\JkQYIJknO;^O=6V4O=FWXYNMYVhljcn8aP\NJ6O>nnRg]f5A]IZnYde"
  985.     A$ = A$ + "7oFmKlHn:kOM<Y4l\f9O<_WUelJN?OTH#6OT_[Z[8o?Mh=fONaIhn]^R:AVb"
  986.     A$ = A$ + "m:EGFiQoOU6[eLNdhUmHkmkmoeG33bjW:A<lV3_:W<gLS9EgjAGl^J59mDB3"
  987.     A$ = A$ + "94W3F1]=Kc[MMH6=<NegbJmlDVCTIP4DNBQRfA3]1Se_keIQg5c?0I[YiO>h"
  988.     A$ = A$ + "jE4KbdA0m9B6RmlDG]fo1Nmcla]aQBiAjjcFNo#f9WLh7CNkDg_T?4o]Ao=a"
  989.     A$ = A$ + "kikL=ePFFNiX`dCgagCnLjMj\^h`l<[YIW:b9QXelkUlR>]E_8E3f==[4ejf"
  990.     A$ = A$ + "4]Oc\QSeW9JgFZbWAmEg4Eoc5VHL8oPaXeagVVIbJNFdiVgD<]1?8TVLLEUE"
  991.     A$ = A$ + "jHhMYShJfoNaSO;71_gcn`h]Nbk2_o;l#h3NiSRWnNoiJOGVa1ThIi9cI:;Y"
  992.     A$ = A$ + "4AaQB6YcJcULm9=1;:5O4?:65K:aH2QPbiL7k`Tcea:h:2VIlajXGaDSbI>?"
  993.     A$ = A$ + "GK:JG\4R5UH2QlhW8OQmURcWQSNNdceZ_ZTkY2T426<E4OXDAP4BCn>BFhKA"
  994.     A$ = A$ + "L<Rc9gCXHUaX[UT^Poc[9DcJfeW<4kZ]e^\j8MS]>UG]#[eQj01d]1L_g`d_"
  995.     A$ = A$ + "=O^TLS5XFCZMo<3k;YXonK^JSa]h4YGk8aU\ihlcaVkJ[5K_^gHAcGckcI?o"
  996.     A$ = A$ + "gGi^f9BcD6^Bf9WRNL]X9=53X7mDo]`o7LnZmI`OKNWcJogJ\hN59V4_7?IG"
  997.     A$ = A$ + "\8[nQKn[BmiLPHLFO8>7NmTc_?ZYSXRC]MX\L:BF_;XlnSBV;WTlnSBaZhlT"
  998.     A$ = A$ + "45k:8GN_g_ceSH<NhmZlNDR5ak3=]hckSh[Ijlgdm_YA0CO0le>fec0jmjfm"
  999.     A$ = A$ + "XLn0_o<P_SE_9:9[\#_[[>e6>bGRfaamI>]hXQLoZV0H]<Pi0:[A64kYE5WU"
  1000.     A$ = A$ + "V3ZLK9Y6#mQ4[EC<?NIOURe=5JOGYY64UWNRRmK9YnOVe>CRCajUIK;>?DXH"
  1001.     A$ = A$ + "?#WJBi2fBlH=cJZhf_R;6ggeOi0ObkP?n=NLlb?d?3?j]MeJ=DZT\B>\odBd"
  1002.     A$ = A$ + "RAED>m9WTLkE>ZFRMeA3ao9G87]KhGco7>8^OZZ=O^jHTa0#hM7D`R28[[`["
  1003.     A$ = A$ + "Wdf>U7]kJITS3];Ciohge7V^n3Wfl5ED1P_Xim01#DaT8liG\M<ZPbgW<_A^"
  1004.     A$ = A$ + "WPLSigSQS`HafRVdTSkj\QGHG_DObk><<7ki=\93_abI4N=VgWh5oabkTSg_"
  1005.     A$ = A$ + "BOgI;SQSdHJMiK:FLWXl:ah5Il9\GSgGkE;<V_CimlNW7lm57Y8cm5;Gel>?"
  1006.     A$ = A$ + "To^hLd5<cIYLn\[CiUFjQaMh_G3kdhhdHhiO=^U^il\EgU2coB>FjkDcVKWN"
  1007.     A$ = A$ + "gBljj\iTIfR]g2^A:IZh>1de\Y?_BDV[WQ<bDFgD`SlWR<_AF;e7oMTP>BB\"
  1008.     A$ = A$ + "a8i09:l_BFVc4#mmJ\^fja_kFe\VYjLbhkhml#hnZWlHNMSW;<\7NoW]V9_G"
  1009.     A$ = A$ + "Vc1hn5UFJX_2Fd0kNgElFZ5Lc^>bCbjm2\ni#>5ETKjQc5>V7Y\fWbh[ALW2"
  1010.     A$ = A$ + "C<F1g94Z<WD3?JMaiR225[b=Z=UT7::Y0:FD52O;F;DKF>YQ\28O^2oXBB=9"
  1011.     A$ = A$ + "DOE=3;KB=PKk7MAh9_e[7oaGlXhGoXg>nXGka#gKI9:W6=WUYOj5kPl9G7d1"
  1012.     A$ = A$ + "mM]lk;>>L]Q#]OfeO<JOmB^6`A:biN>BEf_#ilK>ai43B=OYS9F7OO7]S?Xd"
  1013.     A$ = A$ + "Jm\J?HLba8GSla[e2NS\NCLbeWdUeP:<iDEN[d_iZoWh_71ScWlKUKijE94W"
  1014.     A$ = A$ + "OeVVPf_;QS67EFB9Z6o]e<\JJ_=lVKJQkY?^3N=]4a>k2c<CDFNiYK]SSHB6"
  1015.     A$ = A$ + "VElN^nKg3L\H[mM;7YCDmIkK2oa[oAK\?3>g=WDBE]7bhF`S]dL5Km;YDmH<"
  1016.     A$ = A$ + "^8fkad8cgGhB=foKK^8o]Ih=m][MCFgY_Qo]<j1?4DEYU5nem63[CTnPR4Cb"
  1017.     A$ = A$ + "ZS0L;mIU5g;jWB63R`mb5gkCH<CMbWAo:FCRAcjH>cmfdU?S\US97I>EIbWM"
  1018.     A$ = A$ + "ibni9?G>b8CTAL5ZSPbaUP_dTG;Aik=3im:HoAW2:?WB#OkBgAKZ\BDT`Y9P"
  1019.     A$ = A$ + "K^LKHd6g?S?IZ^ml5KmBcNPLB9U`[EFAa5S1dU^Pbc>k`H#L^^E?:lJkFR^h"
  1020.     A$ = A$ + "BI7_O<EFWRHMQKh3DkA1F_AQii?e2=gJml46;=RodllcDk1D\_7DMNIXiBK^"
  1021.     A$ = A$ + "bW5ild\2b4]^lRAaYT8V`0j;Fj47;N`ObESgmYN#lA_dSS_lgnZR]LW>bTJJ"
  1022.     A$ = A$ + "D`_Bg5WTHenTokA9l9S>D#h;>nHiL_li6#>^H]lM?J7>DY:H9Y7U`odG:8CO"
  1023.     A$ = A$ + "YR\lUT\=JTSlJY;H7DoXakjW9jg9FciC?n\#>aG4b9VR4K;cCh=WS<:#F?Y#"
  1024.     A$ = A$ + "iJK^8SX4l4ijKRA5B`TTcM9T^P;5S;FID8:Rm4D^?=>WO?aCO]4]c8U4nj[G"
  1025.     A$ = A$ + "HfPILO<\5njL]8f;=JFA5YHAlJYQCi]>?cSU[i`]akQgESK?hg]c=mb?ZaRE"
  1026.     A$ = A$ + "FTS8?F_nDQg?C\NKn[aYP73_o^iUg4eg=lnOKNYIgWmNng5VTGmMHle<k:Wk"
  1027.     A$ = A$ + "dV^^?aE7o869f`:FIH<H_nOa\iiO4VDHL\Xl7>GY=mX#NBI6G#TA\9Xe^1jK"
  1028.     A$ = A$ + "`LC?95_PaXPlLB:jDUkIcEn=EPL_LE8[X[CV7d5TMdm6i5K?A99dIDNXj#>n"
  1029.     A$ = A$ + "J5:8VfR\me2I>Be26An8cXKZRI5#V3UE`lAkKAk2[ETT39W;2hgmN]H3O=`>"
  1030.     A$ = A$ + "G`[IloH^YVJHK0=>CJnfiREIe6:R5IaUScQYoU\j4XRGiV;`\Og#^:\f1#n="
  1031.     A$ = A$ + "F>jbj<2e40kIV\OD`n3Ufk`;<KDNV9[aWWL\:C\MSLSbCh>EAnT79[M2nDL9"
  1032.     A$ = A$ + "NLS]GM5KI1c1Go1>ClLgi=S?o=ONlA_hCPb2i354`=>oDoW1B2IUL6`_lk?6"
  1033.     A$ = A$ + "ilA<940n5\:Oba4[`oRhBAcin2o4=>GR=E97E28=5C:9GLY4UcgaRBR=TP]h"
  1034.     A$ = A$ + "X?;N]Sh7YVH847m5U_<4>E58hA2N[_Z5L\f8K[E`gjP<J=beGc#nn:CN^Rde"
  1035.     A$ = A$ + "LB#6AkShB993a^LiN3Z31E?UAhGid86Ob9[G7<l3]^fcLDD>oKf_cl0PHAT?"
  1036.     A$ = A$ + "Ui[83cb\QchmXfO6K\Qi7i]7^6Y6Vn^bOBAJceo<HB=6?9KMEknIKobb;o`h"
  1037.     A$ = A$ + "BV_G\noX>geeN>_jPik;<X8oo59W9eGc^f\eQFfZ`nj9odc0GmUNI776kahm"
  1038.     A$ = A$ + "fhOVW`h2h?j`JKEkE;^aeUmSU<5K^\JQE6J=2=F=NP9i;TLOJ62>DEb[E=JB"
  1039.     A$ = A$ + "B34S_GK3cOT74KO9g6^Y;j]aSnComhMNd_B7oZ7j_QSLP75[HRk6]8WN;WKU"
  1040.     A$ = A$ + "eRUAl2?Z4UA\J<T2XnK:k<4LVTRge72A56Cb^N`c743VH?4G:\oSL]McFKUH"
  1041.     A$ = A$ + "BFm9UhAI;c3bAF?VHBV=LTc4]QSeQ0Vcj<6Idn=R;UOBaZe\T\RgWZKKfWGH"
  1042.     A$ = A$ + "?l]55USf3Z8>DAYT0JMYi[e09V374_RHCi8hB\Vg=b1eC]N\ajA`27oXa27k"
  1043.     A$ = A$ + "8`CLC71OnKlBh?n2?=^a;lLA>bk;Ga>iLUig\VHTHDd6ZXMFWPnSSj]VeM3i"
  1044.     A$ = A$ + "LODd^;o>nQ>VHLjc>dG>99L>CE6Y;H5LTS<:?jPXDiLJ1bk=khHM[aaV:j;Z"
  1045.     A$ = A$ + "<R>CiH:C`LJ1JFDM3eVlXAo:M>HRMJcHMCjb`1g`]SOl>_7IL[H?;mRaR6kY"
  1046.     A$ = A$ + "RJ:N0X`DkPL?C92Gi\U1?gW\J3?m[U5gC[>iKg?b[CTkCC;\#DNni[h?4?RH"
  1047.     A$ = A$ + "<N]Ic[_VlR=Ifmimh==6aQM<fWagEHBW8O1m]eOBNm[MTakW?Vf[ak]Ym>cO"
  1048.     A$ = A$ + "6clHaKdmce[O]mbk:Lm;hk9<Y8eWPGm1HLfhcCNNV_U<n2Woi\?dm>f9mo6]"
  1049.     A$ = A$ + "gdd\hgJOP9ONFoIQLDH<QYMI1Ui\libAh9U3kgDdG<947JF6Y;fH8f89fKUV"
  1050.     A$ = A$ + "P7EAB]7eFh`aR7mIQm]fK5GaYo4hJfkcRklbO;l82Nd;MgO:N]kkC`;NgO4n"
  1051.     A$ = A$ + "=?aGROcCn5ha_Yg2WoF?26L]CaImiH5KmlUULoLJbo[43W7;QR;j`fRJaHTk"
  1052.     A$ = A$ + "ConcoS5TAV:NTaKW[mJ[1ci01MeQ^ZQ5G]:A=EJlVhF>7b[OUX_^ImlQLUJJ"
  1053.     A$ = A$ + "FY[LN8n3el8[c9doglaUTF8dg>FSbKZ`TSGSG7ONFKDHm6:_Pb__D2QRb>9D"
  1054.     A$ = A$ + "LNYRLC9>T[`mSe9]3L:[3?dAnahGm8?0n;_mKPE=S9[f<jPi7DaR25SSOgH>"
  1055.     A$ = A$ + "[URkj1d_f1Sf96GA9SH5>AnehMiTWXYjG`QRf?bEn]GTP]F^PmD>kakbS;Ah"
  1056.     A$ = A$ + "QUU67>OJnoeY:J?6G?V<V#Mc3;KPW>fkd_6L9;k^aeL:75glIolhXGckRGn>"
  1057.     A$ = A$ + "n8ljgi7RWhZNEL;7la`eOF?<fh\?46C_F>Z:on:oVJZ^V2]=?9O2GAo9SDR:"
  1058.     A$ = A$ + "AU_FRZ?ZR2]]jV[fRE\Ho<i<5_7\7c><_a;;n8`DJ<OPK7WMMgn<lnn?V=Lo"
  1059.     A$ = A$ + "[=o\alMdoC`TRd?if`RC3OnNFGmN`QS=<NUi?Ekh<M=eHJ1jk;<9_W?lRGb]"
  1060.     A$ = A$ + "VOD\GK43HPHe;N9Q?6c6?KNloX_OJOVfOiRcAC[T7>S=LBbLGbCRfBDZ`O87"
  1061.     A$ = A$ + "iNlQdafRFVMFXhH5k:4k2Z9mJa:7efaFWaUPKn0_4>jEmnhM>:`OnePH?2`7"
  1062.     A$ = A$ + "nRO9n3?gO5Oh;m5hSOMPod[i<n`Gi[`OiM0niGfmS5=i=RBC[UbmaiXn6?HD"
  1063.     A$ = A$ + "QdiT<?TLbSZSQ9IL5KB15ZGG:>kL2G?_<>kNG[E__eoah2ae_]h]A\8CC<la"
  1064.     A$ = A$ + "<GhH>Qaj#Nn9kd[0YoO8g6f3OY=JTk4gB>Ad7h]ZTlD<;J;GCb:5UK4[cUm]"
  1065.     A$ = A$ + "ffQ>FICaRVnTAM\WZDBfX41KRi;G7:_0LZ;L>hN_V[0_kCm8heNT7dYN4iZi"
  1066.     A$ = A$ + "5EcQ2W3onRCeCDZ\6J8lICSaGSn_SfK9cmY=c98G3XF08Gf\4lZ2S;6d4Q?G"
  1067.     A$ = A$ + "cTA;Cd7JKZn#Wb;>dcVU6JXW]0S_OM#[5fGnI_O\cUOjH13JUhLGdePS\i71"
  1068.     A$ = A$ + "gkIljhQ?`KSGijo#lY?=`OmG1lY_lO5_oAo8ln?lWP?ni1n]?nGPo[g4h?nZ"
  1069.     A$ = A$ + "07n0?T`7\OR]m=G>GEPPKV5B;V<5\LI]ZXCF7\^3M\[OA[lR<o:IH;NSIVGl"
  1070.     A$ = A$ + "93_aReQIcWG\<_h?66dacAjOM<9N?WEWgnVV?m?B;0=V62\7Kl;hn6O2cV>_"
  1071.     A$ = A$ + "iiYi?9;^Go?5_iOec9Na2Sd6Ekg:]QcQOLXS;7j]oKNaY=ogKim4aTBENO\G"
  1072.     A$ = A$ + "lJifTC<k3XaL[\d2:f^iC[Gl\olUWlJ5j;1d4in`3^T;4Wf4>?LO7le`CLhO"
  1073.     A$ = A$ + "?Nckh_0lkP08aaOG0WnBi6k_4om?#Nn?EN^?cmenC0o=ihnXghc`3NC?:JGC"
  1074.     A$ = A$ + "ZChWT[L?LBZo^Y>GX=L9h9^4N]QVo?]oolNFkne8inKJhDe<W[Fm>fj_>jFc"
  1075.     A$ = A$ + "li]E71<KD9?9RE`jPHM]\:d^::GgbLf]\\BCe=0[_l]Z\R#c;>OEGT\6XTCX"
  1076.     A$ = A$ + "0J=AY7]_=XfVG1b?cT4n11dl=YTD4\Man9fWi?b5\OlQ_n;PSN[gX`Ob1[=H"
  1077.     A$ = A$ + "l1P?OnLe?DL>aZ?J7mBVKlYXm#`dSFhi9Woc9:icEh8U5Gc#VkfDQ?DEbWMk"
  1078.     A$ = A$ + "4\X>WV?<Z:3RU?hZ4k_6;^o[NKha^ic5glU]KlXgb?1GfN>06C]C0KHdk6?a"
  1079.     A$ = A$ + "5oKa7L[0_iemGaKOSO>P\f1n3lJdO3h_;Gonh_B6#_^ngUeAnL1[jm4lYGjQ"
  1080.     A$ = A$ + "nL<SALbXdTkTL^Z<a>#j?aD5>_IXa_c9>Nai^FBl`Rk_Gn=W8m9eHibFS=>A"
  1081.     A$ = A$ + "iFBTf^eHlJl>o<bHNkU3RYMGcg\A6Wl8ca9_ncmOGnPnOg3_aLRK=]9i5oak"
  1082.     A$ = A$ + "oo8eUUG]SjE;4:^SKle2kGKo>JHUhC<GWhLibB=0:<P?\oCNaX?EF8Z>#DXI"
  1083.     A$ = A$ + "bmJ;^GC1Gf:^<LMWlMR7l0_>Nn[jC`GnLbm^_Q3V34H8l7oHlUoQ?5Oe7:hC"
  1084.     A$ = A$ + "o9iNKiFNmnK1Gj_mnO9NoGn?RohKnaHTmN\8_T;Fi95[[60SSj78jSY30;_L"
  1085.     A$ = A$ + "]e:<LZhEO3V7fnVfTS?]MaV2kcQX?F>bWP[?8ha4>nT^S`mZcHL64?:cHm[h"
  1086.     A$ = A$ + ">\6`a]UWMjj``O\jf:cI4RAEAnI[lMhF>::mT5nN\VZ6WF[0JFF9SB5KhHoM"
  1087.     A$ = A$ + "n<FgbacMog1fe6G]b?C[i2\n_`Hnk?:EK#Y;GWc=YDEKbBFh9U]PCGD\9P25"
  1088.     A$ = A$ + "KW;B>nbUAEbo_FC\XPn#O;86<g^G6>SIe;L3kNVh9_f=S?kU^F1SiNaWnFg1"
  1089.     A$ = A$ + "NiOaeROkcmHH_[nDa8JmH`1F`QaKM3oghM?2`[Mh?5OlmhNmSGSnLijeWmO9"
  1090.     A$ = A$ + "G[nc0oNijgk9?g_Gh?mfb;;LMOnkoc`:VfIS:bXk2>ICTOOI[J2Qf^iDo5S:"
  1091.     A$ = A$ + "\oT<M95VkZ7<U_9<WoI`Rnn4CbRWRGoZhmmh=6oV??onDCSo#?Rd_JNk?;f`"
  1092.     A$ = A$ + "`Z<<j8?GKHC9h6K=;6Kd_=Q[Q<^L5==8`GSJbV[3?bJK1VMok4JQLOOMI63>"
  1093.     A$ = A$ + "]9?>LMKI?h#cOghbFb?67mLO3lTWoO0ofOV\FjC8gk:ggRgE6__Wa7B<:GNB"
  1094.     A$ = A$ + "OXcJa?cMm2hEOTg4;LB;FFC=5QWD#E[<dg8\N04<VSe[2lZk:nkSaMTnGclO"
  1095.     A$ = A$ + "ZG=GjPihXSK;6#AZ;V`LPMmeO:AkdgLHLh]JV87IW#0DMQi[SVUKfXnFfL]f"
  1096.     A$ = A$ + "jbj2>[i^\73cnL0aU8O9foYLZ_d>JX>?iai;_6OMFC1HlnIoXo>oaG:nm_nc"
  1097.     A$ = A$ + "YiXK:aAl7Q?ZH[HBa7[jo[#^ml:FOjbBV[WS\6Aia5[`?e7ZA\=[m2>DG4>A"
  1098.     A$ = A$ + "3^0OHaM_4L>c]?h:>i6`Afc\`3NEK0_cSM9h[N_k#0oU;8OnSPo`[LCbhN`K"
  1099.     A$ = A$ + "lHg;ffRG16Hc70fj4g;Nn[lma[N5O2NQ;h3a[LiO8n`kDh6mR>lR`_QG;5nB"
  1100.     A$ = A$ + "_mO7Oi_6h[T[[Ob;3l1?SHgm5obHTMIUXb<k1BcOibe<ZcCWH_TF8QKGbRm`"
  1101.     A$ = A$ + "YWPZE9CofVFF]HTIhEOG>n^2Cb[^olbCbkWWmjNmCRM?ZYQWOXa?nnHHlJBd"
  1102.     A$ = A$ + "clCkLPaM`VcBlL33c`Z=kP37K>jC6b]b]fOTNR9Q2b:k`foAo7[i[BLa[nDY"
  1103.     A$ = A$ + "0I<S^E?j#6AS^GD<HGcZ_hi^fmSGm6^6LPi^FLi;kR`QGn=Q[NU75gc>OKlf"
  1104.     A$ = A$ + "bJ^_g=9;aNO2EY7EFJmAo;h]_o?4ofOa7Sgh^N?lY_hGP?h9o<ln?cWRWk^O"
  1105.     A$ = A$ + "5lF?m_5cN<W4BaOZZ6HBd_keHgj`\mod[=efo5jKOCg:<F>TWDl^HDQi;IaW"
  1106.     A$ = A$ + ">ReV=KgX?UioE[?NaJOXeSgE=;58FDIniRJJBIjFF;h8fD9YW::8i4eJX;i8"
  1107.     A$ = A$ + "A\8Z_9>hcA<8j_LZAcZ:^HWNdRH3GY9i7gdUONhi^_K5Od_nUdn]JbD30^eL"
  1108.     A$ = A$ + "4e?gdGF1S6]<cT5\8jWjXAE9j7eTT`7B`S6DAn`RjBNHgC\6lSFEOa=_k9PO"
  1109.     A$ = A$ + "aU]4lHGcJaCMcK3_cCOYh_o7_;1?jaTaCR_j?n#hgoJg:n;O`CQ?heNLLfWb"
  1110.     A$ = A$ + "V`PZY_HESNMhJfl]QkJG?9^c]n<h6GgAacO9oNlFodo<Nokl;`kOOoIlVgiK"
  1111.     A$ = A$ + "RgjNO;lZgn_1?o=m1hGL=o6LTmo2H=CkRAA9dMTM<]B`Sb599fBJhA9;[M58"
  1112.     A$ = A$ + "6WLKaiNC7o0IiEBhjKKSDgAnQ4CR33kaVgIa1cVo5YOOS<?#J<o0moe66g#_"
  1113.     A$ = A$ + "mG43kVcY<n?VoT\c?NeUeaUKOV_\C`9_?<<M=giS9>QG#8=OCHn4`lBXRX3P"
  1114.     A$ = A$ + ">UL8dk2R5KOJM1_a]Njh=_]mPgk1><^QM^=L:SLQHcSL7hdKh`HOCnfae]ZG"
  1115.     A$ = A$ + "0ol=mZhY>hO0_n?nca_nFnchGO[O6NWklca[Oco1lN?lWS7m7olh8kkF`Clc"
  1116.     A$ = A$ + "OJl9_iWQ23FPj3R#\>kjc]Vg4[[FJLioco7V?^Y_]i`\7`ZcUF>VHnEBkc5a"
  1117.     A$ = A$ + "iF_:Lmi4a]Ld<CBQiT[WOlkZ9JJGHD>eGJ>86A9bW?[5L<?DH]Z\`DCFeI9g"
  1118.     A$ = A$ + "bj:#;;]HDQHK7kiM\6>bn:L1Yjd;dYFk;;kLAN96DSkEI2oQ[n0k2?k3L;h;"
  1119.     A$ = A$ + "nXgAk3gY;h<Y7SCNP#kT7Ak[6KLl33KJl32c]W]63XXPXNjSX:R5KJ4EScO9"
  1120.     A$ = A$ + "M5gjI>>lDGe2akL_K6_c3NZhMNTMRgiG^OlA_k?6hon152>?5nboV\X`OkG2"
  1121.     A$ = A$ + "lWOFl9of72_`SM4lGn`G7Gi5\?d[JZ7M_YM5c_o;5KYQmR3=W[1oX5Mkh6gh"
  1122.     A$ = A$ + "CQKM[_2>jnomh=_a_0o^kiSa;NS_6NaOf_E^f1LoGakRaee=QFVm8AjnZA>o"
  1123.     A$ = A$ + "DTLn>E7oo5;m3YL=Ano4DnOTA:aXWkie5S3[GMGORbSe6Klm=VT]Fng4VTgi"
  1124.     A$ = A$ + "Q6nT5WKK>WQ=m3E>mo_;<Y6KO_f`IcE=<9SoYMNdkiNR3Ii=B8Gom[iFOdaj"
  1125.     A$ = A$ + "`IPmGHNN>:ZoG7K5jPHW`LkA9hXGnbaGmZG4`[OAhGOGW1NeKjR`<[__HBe<"
  1126.     A$ = A$ + "A<YF]L<_j?3\bnL1H7SoJaE^Vk5gknN1lbg`7Pgjfn8la?jGPoj;8V]mDoIl"
  1127.     A$ = A$ + "5_YHJgSok`OmMn_`;l#?[P38f86<9U_BheGRa1CbK\CheOnOd^_`AK4ahZ]\"
  1128.     A$ = A$ + "hoJjCAaY4KQB;H0en1ZCH>LhA58lmEjiCo>e5QDUmCGn=TALa4F?e\6`A<YL"
  1129.     A$ = A$ + "5L5F_U::=1c9UTd7cQf[XH_3>Y4DLYlC9TZS;N<5VE^jieZ:8?=oLkBEUPKi"
  1130.     A$ = A$ + ":>4N]7oNakmZ?5JGCb75THdH#M\EH]COlHcCK<Hi3\[H2ET?jGjn#mQlQaDU"
  1131.     A$ = A$ + "H_gd[1gfI>1lLoTERWm6F2NmkI]h]O\C1_gc\MlGn=G0`Om65L8QK4N0ILDI"
  1132.     A$ = A$ + "l82fT\m[XCnNIlOoI?=NSGj>`OlmN>LGgbeQ9>lARJ:^5RMiS0=d^aSIGo2`"
  1133.     A$ = A$ + ":jkYPYfVEP==\c37Lng<^aMlXh1^X76?lELDl`GicPkmbOF\cULHD#\e;WGZ"
  1134.     A$ = A$ + "#FkRJh8KijA#EOh94`9WGB;D<8_<B4EgTRecgD_6V>Rl6SD_koOZHBAJkVgh"
  1135.     A$ = A$ + "5IlQlJ[Rg__o_^oTRd6\6cn=kL\icK_i`WmHjS66W=coflhGlL>9defdFWlC"
  1136.     A$ = A$ + "#6I8H3<OJCGN?=G`SVA]5RSLjC4O`3^MPO[P9mIG;ndWil`_oQ?<^\=]1<lF"
  1137.     A$ = A$ + "d?d]l6XL_mR`8Jc9Q9f]iSE?YeS]<[C6KMVK2kJnW6fkB>MLV;Okh<GeYQWh"
  1138.     A$ = A$ + "V^?l<gk3SGiAN2\Q5]HUKREoe<mFKn4b[FchnTOS]^USmo>aDfboLWh:JHd1"
  1139.     A$ = A$ + "MjmLQRo[YWH_iV]R_kfg0ImcPeB0R;A]1aOG\VVd^:4KfbcY6WddLcEeh3[9"
  1140.     A$ = A$ + "LE8fcaWWncVlSH_>_b2cE[ke4S;_<c6]]i]23^7MaYVifZVRKj7M^h5OXK5o"
  1141.     A$ = A$ + "iOc;SE=kaSi<ZnSQ8lUZ#hHd2iHjUP3=l#nab[97LhEfILO7J4hU_YUPGifG"
  1142.     A$ = A$ + "1NakMUhMO^C3oe?D^>lUG7nZone:H>RabOi=3lig8nZ?E`Vn4iaoUkDNn73O"
  1143.     A$ = A$ + "eOSLVNAlIOnSSGnE^Ml0?dA`KoF_4^Tco2#o[_GXEiF9Z:Yb#g:ZFd#]3G6S"
  1144.     A$ = A$ + "4;Kd;6;O\[0cOXc6KLJ;2Wm:f4F`XV=JAF]BhbEPL^=;TJP2L[70R=fbj795"
  1145.     A$ = A$ + "BF_8EIm\hSfao0<gkR;9G^6a5>Wf<^]AV3oo[R5mm5VTiOE_lN\LobkL;NOY"
  1146.     A$ = A$ + "MoW5Koo_Z]KNeN^Mn`KN9Kh?V6:XoP<O3i=OM]iNF]dSn`>IgGoj^R3SbTi>"
  1147.     A$ = A$ + "9;f\U_PGU6]MANn:C>X6GiCOL]3O`M_KPGk2aOmIg9nZGiL0N[[6_eMO#LKG"
  1148.     A$ = A$ + "`IQcLUK2cH0c4eTGmXcEfKdkfeG<Vn=4<fn?#<Y1=<\^I]#<oa>A<e1>4Lj["
  1149.     A$ = A$ + "N=hj?d1a=OEG1Ni7mQel:;Egn2FfQ24Fc#V>>=^N6OH_l0M`[Rjhb3GCO_Q_"
  1150.     A$ = A$ + "og]>3j=o?MN?7;W2Eni\7[hj[KR9UYP;W1OMV3JR][]_RZ#[;SaO[0eV=JKF"
  1151.     A$ = A$ + "cb?K]o3A<XRc<9en=ZaMbU:;Q[#><NKIV5JMcZ2CNHS0i7O0<0Q?dmmC_Dlf"
  1152.     A$ = A$ + "?cmS?iGoLhb?c]SZH]\DnMeY\R7]EF3H\UV2fG3m0gg^V9NfS<?l>?fZ`Wm6"
  1153.     A$ = A$ + "k4hgOQ0OlU8lO^>QGT<n_XMJ7AgnQ_enaKodW6N[7OKhe__=SOeM]5l>?lNa"
  1154.     A$ = A$ + "Gmag:n[OjmP_l_bP?l[`MM7o8L^Wc>`UN174ge=OKhb?g;4kL]K1kJ=K6KLN"
  1155.     A$ = A$ + ";7KMU[5KIi[67H7k6GoULIhZ?g3PE?SYSFEH92nL<ZOS25Mb2ND<Z^J34WO4"
  1156.     A$ = A$ + "KLDSi>f\5WV3N>iaK#O9ZfRK[3h=oBh`knoc<nVR1ggeHBN]c`>F[VD`1O>>"
  1157.     A$ = A$ + "WK`m^?QWO6iWioY>RllBSUSNOKn?4Y6gmnik=FT6NTEW#<o#ahEaWgZS\dFX"
  1158.     A$ = A$ + "cNkW^FKZY?]c?^HEoZFF<1#kB>><eV74Ge2k6n3ol]P?i>f6Nj;LJhi>l2a;"
  1159.     A$ = A$ + "NTC1_emNQhQ^^3RciDF?fd:F5fbJ?E\YE_5LZ[OKHc[KCH[KHSH7KMChDFg:"
  1160.     A$ = A$ + "a9_VUSm]cC57HWK5gneL5h5NPk6_g;l;E]QWM\neL4Ujd9AgJV5cMm0^eI;_"
  1161.     A$ = A$ + "f_MR7^g_6cal75g68JWnV3c=S45<1VCmdo[FmLb`\2g7Wli4_[\34bYf;U\H"
  1162.     A$ = A$ + ";F>YPfEE[Ae5GQR7AlWJZ\HdYFg<dT2c0UTK:Xl2CC\A91d^VF5:G`Qb<1Ob"
  1163.     A$ = A$ + "[9fT:_ol2U2Z<]V8l>3P5=^QSKn`W3Nf7hW2lWN7lV?jSPE=a9RV8fmd4igE"
  1164.     A$ = A$ + "]Ii3KLLeQ7lbF5n]?fIRgie>Clao9af\obQ5lX;C`EH`=5N#OXlnOk[2OncN"
  1165.     A$ = A$ + "VhMOPePGiVW1NckJ>ha>l8`CN5C47mPC1ggi<El;_nePWiV>EllgaN`;Lo72"
  1166.     A$ = A$ + "?nMN9HYcN4Hh3\KHVCKBHa;HAH3[OCH7Wf^aNgciPm__c3WeN>K\bU\<<bQ<"
  1167.     A$ = A$ + "<TOFI6F[8iU^`?:DBZ>ALZIga5^OA4^f`johk;Go#?_kkbQgiNF<B<KAZYZZ"
  1168.     A$ = A$ + "?^e=mjCG_cEK\LQkKkLooCM49VDTJnd\[QW_<]AVEZYLLf0ih_6gjo^lLSIP"
  1169.     A$ = A$ + "3fYG3:h254Kd:VD9bagU\2Qeg[BaM\YARgl:G5NXM?1Li;ZNLPIe1\_5d3L`"
  1170.     A$ = A$ + "e=>\aI?<a6PFPfFMiXkegADK=]5SH`353[o32SJX31cHj=P6JH#HH3YWHjCL"
  1171.     A$ = A$ + "hhDGkRai_[]ZHB4;;?af:F;H972Z;867LM>PP75`mnloI`T\jIXQ9YeA8Zk1"
  1172.     A$ = A$ + "fSEXfO86]OOQ[eLQiAAKmH>Y4K0eWJY6E\:fDlD;REDX`7ZiXYIGVf[CH?NS"
  1173.     A$ = A$ + "eMKZiXVgdl#KZ^HDKK:7eeVFP\R;ITA<aS<3BNZRMT2FCA9V::dONX\XcFko"
  1174.     A$ = A$ + "S?l]NahGo\g6ndgiGRgoiOJl\gn]RSLPMRCmT69Vk#Z1G`Y<9l2gkN`knlk3"
  1175.     A$ = A$ + "o5Q3domG9fWaQP9mi_fIQ?j9f=nmgg^`kOKW6Ne[MIhY^lYRkj\k=^aMF7^R"
  1176.     A$ = A$ + "eg:LMKZ[h7]dNR3<3ia[M0hLGJga5\nQPcHY32Wbl62JXO]33ZGM0m]GM5m_"
  1177.     A$ = A$ + "om7CNJc2;H9[4SObc0]]SeS<cY0]6;5WL^8AangX9O3J[2So9[5SbeV43hdk"
  1178.     A$ = A$ + "6>Am`Xoi[7lo_SASUOoLnD^YVfaQ5596coK0C:B^T=6gb_]HBVn1ii2;Wh\l"
  1179.     A$ = A$ + "RSg_dW^eMDDFI76GB[OelmhgIn?i>aiT\WPaJ#?eTD12_Qjb9I\T^g4lCGoH"
  1180.     A$ = A$ + "`]_SYRcN6M0WjHZ4[H05QE>lZ`:7GW`DkO=H`ee2=W:jH;K9JECJ26Hgj16M"
  1181.     A$ = A$ + "o60VI3S1[NAc2kIkK#[Y\cK:S5;KjC0GP`GjV^d;0=;e#8Knm;h3\VWA<AjS"
  1182.     A$ = A$ + "iPNROlGWknoLHCJn4CLHfSheiBaXJ1bZmU:n\;VTZ;8GNBY;hB59LRJFaIQf"
  1183.     A$ = A$ + "fR:#gKKmXU5dDdZR:6]^T2AEiU=jB;5\9QS4kU0M#[K09RlR?3TI<Q#AY4]H"
  1184.     A$ = A$ + "3G<JmDZPh39WC3Qb3T:^a;N?h^?bIRGi9_>lGnPW4_nSO7hN^n;4gdUMjhf?"
  1185.     A$ = A$ + "lfaSMSW3Nk7n`h_mfg6`OhVaWn^G4nM_hfaKmHK#h=]9lLo\iSWjZV3^[cIl"
  1186.     A$ = A$ + "hjflP`U^lNR3]\^PM=SFPe=VR`RkOfH^m<G<cj;2cZcUQC^QfQU<dVQIeWba"
  1187.     A$ = A$ + "R6I]HZm[]H2m_N<V1d;M=TnfkNSnegnSFejfQ0aWHhjc=c]GZYLVWA<783Zj"
  1188.     A$ = A$ + "HcYf^AlXTD]TloOP9eHH6Nc?O_nheh84Y_TnO3HBNo_59Vdgd__6cf=[f6Hf"
  1189.     A$ = A$ + "jJ7CB^aHKVCN:X>QoRICWN>;:o7KnZ?7KGXOMYOT8>1cSlZ357VD=5QcI>m3"
  1190.     A$ = A$ + "kIVm4;\OUPIf]L`XJKBHdM<C<d>T;6AWJ6jO==5M[iERfGFYXO]_MXk]\5XW"
  1191.     A$ = A$ + "]]=Xoee><dNd9L^kJcH:3]OHNSOTHScOVhJ?diPe<S9S<miPoU7]KCh`TK21"
  1192.     A$ = A$ + "Lb[3nOb_o`i2bo<HBQm?ZKMP>>gi=NkUhN[]bF]Rgdc=e9JYIVYfG_7F?k>j"
  1193.     A$ = A$ + "OG[5m]nJA_KOW#oJK7AC5>WM]Z:ACB9IDA6YRjKEC#9IW0B=FO>a[;ZTeLZP"
  1194.     A$ = A$ + "en]dican?[OZeXBa^FjZa;mPo<l;_g[4?imLHlWNc73_`3N;hJ_`mP;l<FQL"
  1195.     A$ = A$ + "NImhXo\mQWnF>0NWWhZ`Gl>g4nRgn7Q?m5?3lZga:amLA=P;OSeS;NEeR3^X"
  1196.     A$ = A$ + ">PM=mFSe=RVQ5dWBa<jLnHJM_<<SNF=6Mk:13Zj2A3MXIHjm\Bd]BR1C\[ER"
  1197.     A$ = A$ + "6jB;`4kCW`XjAMXgefNdW^d5TG6IZiATOgJ7:[3U9;fWAnA\6;IenO[?:Im1"
  1198.     A$ = A$ + "I[gFoo?Q9iMNYGOLJaGcK=69blfoo4aT>AnCZan_n=mK<B<9_jR`R3Pgl=Qc"
  1199.     A$ = A$ + "1kEGjZVOfVO_iajdc?SB__Re?#bQ#[aZTS0m[TPA#o^FG>aSIgcFRYfS:`Hj"
  1200.     A$ = A$ + "BAXOeT:jM[B23Yn2aPjDYXKET=JK^9Sj:=O<XJJ=VH_k96F7kPNOo0kHK`Xk"
  1201.     A$ = A$ + "EMh<gdZ`hkCGaBWdH`i^U=RCInc6E8L#H^mV[PC#NB<?C;<H81Cd_V_Y9AMK"
  1202.     A$ = A$ + "6CLAd?amL>aC_B>X7oFL\cO^eK7gJBWY]BRo4d]VSaj?6]a;ePaZJ]^ZB:#h"
  1203.     A$ = A$ + "?d?<UA>L<ka=F<QQ>#=GKINf>`>e1<nn:L;Z^YXl43R\UOg=;mDDocWE#j7L"
  1204.     A$ = A$ + "G]Ok;8b=^<dnaD_kLeJOMk#kJ7h:>cc3?m]MOh87JohF_R;2GnNf5^gOleRk"
  1205.     A$ = A$ + "iJ^AlLgo3PGnA^CLool;4?f]MQRM]G>Nc7k`h=OX3Qof[NUh_olG<nC?nna;"
  1206.     A$ = A$ + "NTeS[O[35;^G9SAFQ?<VF45VD]IPQeR<A?;=3DO12g]R:4eUGnXc5;G[JN5H"
  1207.     A$ = A$ + "`]\<<f>E=>cE>O\Yi<==?Z;?SdD=Hah<VN29jf3fmiDK^SfY?_M\NBYCM[Ak"
  1208.     A$ = A$ + "OenMd#RU?BQn6`TnQ67ikbi]L[G=0hMN<gBObbQQ=eHiono9R95ioUoAoF?A"
  1209.     A$ = A$ + "S63CRkKheV=LF\9]j5YJOV[oTlVS9FOjRnYTcIYOUH]a8CinAbGZEY543Bh2"
  1210.     A$ = A$ + "dkFE<jY`IZibJ^EGLdX^FT5jF[b7m]eUS^edla0JNcTkm5>BbLhE=i6`ZVnH"
  1211.     A$ = A$ + "a#[_eHiCM\H3cMZHZ3ZgH;;J>HQ=<BDCAiZlaHm_?WHSAg?CJ[I\dOg>j7WJ"
  1212.     A$ = A$ + "BPJChOF<YS=L>NR95dgajOdD_BZ>nB86TIb9P2c>=db::3mYcM43]?m0CId3"
  1213.     A$ = A$ + "13\kM2M[]]#kc8iWHL2fX?<XjK5>Y664bPi0HBaQf:cmY_ic99O8STXVLlQ>"
  1214.     A$ = A$ + "gfFSa=XaS]_n]S[A`M>h1f1feFG?FnlV36o#656Ko7:JXom5M_e]1=??1cXM"
  1215.     A$ = A$ + "M1m_Sm2CJHS0;J>=P]_UiRkkF??lQojk2OaOhGP_hM_;l7NR[0O\P?m7?jQa"
  1216.     A$ = A$ + "km#G6N_7hBa=\WiP5dgRA]Ih3M]hX#]i5?JEj9SZB>CIT;Z[X:#7;^DDYPkG"
  1217.     A$ = A$ + "BLaPj4\f5<jAR^FAc#FbejLRC^O8Q#Z=Z<_dH_Ib\gPf<cJ<K>YWVR9Al9J["
  1218.     A$ = A$ + "F#]^ZkDo8h8bnRmoG7C:biMVoADoPhj_KSKTYSB_j[lod`TJ<>Afo9_aef[F"
  1219.     A$ = A$ + "]?AnFZa\Mc`I\?C_mT8CgfLOEC5^igEB^[aaenD>h^e^O]W=jg97;8^DcB:9"
  1220.     A$ = A$ + "daB;1][l2AKJF1Xi=;KdR:c2MXE5R>DM1XmUT9JOQb8WDAkb:IddhSBh2\G\"
  1221.     A$ = A$ + "ke>?<R^E3Fo9=5<_a<D<mQdG\P66>Z>k<dlKUncVjTVafRc=8W8R1AO<[?Vj"
  1222.     A$ = A$ + "5bGS5;h67C:a`SX?^Nf=]5Ti5[EOTD]?5KDX5U;H\MZmXQQeO<IiggT7k#`X"
  1223.     A$ = A$ + "7B_eHYEDVQdNcFAY7DmS=[3JY6W?TKbR=]YjG?g`jA9SgOkKK9H9;KbHkkLm"
  1224.     A$ = A$ + "h2>d1a:Gj6`<Vbl#;KMEXbVG6JA[K9ZXi]#ff>D#n5Rlb=CD#^IPlc`9nW<o"
  1225.     A$ = A$ + ";RAnlS9A1K[0OXTV8h<eV<Fo2j=^o[Mgh;O7VP>_<nC?g_0?jeMIhIoi76o^"
  1226.     A$ = A$ + "7mF`A_^mR]_XQPfEX?dl<mSJb?GdiVd2aVkd#A1B4EVFRXZdC4==m<4nM3#\"
  1227.     A$ = A$ + "IN12NJ\:N_N>A>gBm>T[HW6k[;AfC]2[kdXLb39[Vf`kI<mf6o9HMfo_j8bi"
  1228.     A$ = A$ + "_Afg:<O8ieVUoC6C:Bk<io7CSXN[;:f[IHEOK`TlZAB3_f>oHjA:liBZ1WHL"
  1229.     A$ = A$ + "c5<genX?<35`YoRlo[m^>S>Z^^F?RA]ITdXN1ek0ZST#2e0Q45AGP04EQXgA"
  1230.     A$ = A$ + "6<M#2901H#0RRYG]1CaVPXJ\Yh2fD<4S=f6LN^TRmc>9nUG:_TEbjmN[egk\"
  1231.     A$ = A$ + "?gkNdQi=RRSC`a9oH_VfM^cM^gcik^gkcNomi^^6Y9ea=Z^Y5F8>K11JfMhW"
  1232.     A$ = A$ + "7VA2]=BTDRAQf5G`8R0L7Y4Zo8gh23i5A#81Qo3a9RSi\?gVad6N?Agb:N<Z"
  1233.     A$ = A$ + "nD<jE7K?b?Yh#`V=:WC#eE8aS^B]kB_>CHokhjQUe]P7G<96;R=Bkf8<9?ei"
  1234.     A$ = A$ + "SjTS=B9FDOkJQXGMY0TKjJ[I8U;kdC<J4^o^SFkU;8#gM4Qk[KB^HcO?5WG5"
  1235.     A$ = A$ + "n1i[5]j;?bPl6E>dQQU_dJ`JgDmX^eF3:KDUSRjMo`lZI]H5[MWH_7nHhTGj"
  1236.     A$ = A$ + "Bhd_i=a9N]KQmMZ;Q]M`G2GjM^5>i5^0>n9?5>baOA\CQoDcI5?=b_d<#hYk"
  1237.     A$ = A$ + "9l=B1^GXDo\H095X1dSdR4[O1c6Oa=_=`Oh?SOkmn4liGo:hS_b?2OdEN1LZ"
  1238.     A$ = A$ + "3^:dW>g>IMD5]O1Q0Le22a=1FTG>9R]d54Z5?a6ZKEB<OI?m:^nCLO2iW4Q;"
  1239.     A$ = A$ + "9en:GMeJ<^BMBAY7IO#n2aJ;i?TaT\M^VJ=l`n>`i^UnL>^]_?W?9eeOWN<R"
  1240.     A$ = A$ + "03Bf[FfF[Wbn1EW_`i[c]4GBmh<>`J^\eo?K[>SB[?>KT_BbeVBO<9eS9nJ`"
  1241.     A$ = A$ + "5h_3N0oLaChSKFPGN;Vgh_W8X04SmmeM4Whii6GTXm4O`:Rc;kX20ghl71iU"
  1242.     A$ = A$ + "JH8odS2a5TGJLL]H^\?^X[E]>KdJN:8>i#JTF#g:7]SncOoe3GcLaB[Tj847"
  1243.     A$ = A$ + "k1[k:dn?0amnYjaVkSFJn:aiS4G7eaTK7jS0;:_fW06\`g]<4hAY5O48QX22"
  1244.     A$ = A$ + "];b0AD1j12e7GAT2lf0]hTTCYMWlA:07A<ah=6m8;7eDC=He[ICH>;LIHVE_"
  1245.     A$ = A$ + "D\mGjhh\Goma[nSog`AOeKSWo<g0Kj0W4em\_0ViZ><VA377c^aG4cO;75C\"
  1246.     A$ = A$ + "^W5cNUK7ef`NaZflN`N?NCHgWjhh`_eIa1N]SQ=MX6`#7MG5hT2oL2b1ai>3"
  1247.     A$ = A$ + "BO:S=PXad[hY`GlAO=n;ojO7niOhEam^EChWNgcPCOR=Q9?iQ8iIKO]h6RVj"
  1248.     A$ = A$ + ";Ho4n`5C0HLU?H<VQ>2IOk#Ln;c9i\V[CnlYM>BCoCTeC_D_8XcYJSI\7GB["
  1249.     A$ = A$ + "FKM?\aofKnf3KNh?dajNBJLlVle#:_>D]<#i4Si`ENkh[5ZGcNHlKg3M<Qnm"
  1250.     A$ = A$ + "hhm]DO`<fLMPCh#TAHBV5a^ALm>Y=aB>7eP8F:9o>kV6_hHd\\VELeT`_:J^"
  1251.     A$ = A$ + ":U?5gLA<ga7dFol0]c?gAB]f2^n5NAhU93RhCLd:WK#c]YnGSZ7BZ^5UJ8Vh"
  1252.     A$ = A$ + "mYJOAJ]BCCa8NVVN]CjF;Q9YQ7IDh?SWBL9>N]Pl`C]jJ#L_OZ?e8>ST`RjN"
  1253.     A$ = A$ + "^I9iI]QdkNP1dmR`0jAQXKiU9jH:]AR;5K8n8]h3e79VD#FL41hQS2\Y0#7C"
  1254.     A$ = A$ + ";=<ZA>#\n=D?Fic\>Dk:f0fkANELUgk[`MnUogXYKlIHikmlHnKjhH^KhhXj"
  1255.     A$ = A$ + "]N>\T=f4Vo6?;VjjN=<VWibXREOF<n6>7ZX^SSI\bCQi]bV`lFmQaDZI;HZe"
  1256.     A$ = A$ + "_IDI][3CJe[5;OGK3_c7N=L^C\KDAY5PPmbP\Va]h\g2o130Y4KNH[=\MPo["
  1257.     A$ = A$ + "O5`ocGP_lWM9l5OiKRcNYG0SKjSFZS8]>#?AXnIDFgVkJ;K41ZGGoBM0AWW4"
  1258.     A$ = A$ + "8o69\JR34XNkSROS`aI=oSh09b_CKaPn[1CbN[acCjiWocXa[16mLN]3ISl;"
  1259.     A$ = A$ + "Rim8E^GSk5I^WJJYjHjAiJ:[[eBn]EGg2UJGXA]n>Ul;B[>LMDCG0Xhh8cAa"
  1260.     A$ = A$ + "__3^8e8<B[`\8i>#Z>iLBF7_\6BBJRL8NJ2A:Rc9B_<1oMc1LicN4IL>Bmda"
  1261.     A$ = A$ + "5QoAVLBFG#D=1Y]6O>;e9>G4aChX^F?K;VTAQ_1>;eNgkGk0]>O`PVAh?T6#"
  1262.     A$ = A$ + "agSWVKaJb;=_;[4R5M:mTTL`F_kLNbee_;IU>b_m9S\CZ]HPM_#ifdmlb#F;"
  1263.     A$ = A$ + "TagJ_AdnkQDgKc?]4`PjIO`2NZiSZGlRaJFk6`>gKCh7oQo6lio6PGiFoNDo"
  1264.     A$ = A$ + "n^6VlZ?=VASG4eLPO<VlJ?]0Oi5aDG^03Zf;RbFlE#o[ijX\j_66f:_16d2_"
  1265.     A$ = A$ + "2ZLAG5?eb^6FdcL=<WWiRHZ[hDXRJ>1Vjcd46mlf0JLG??Nm;MFLiC]O<WY>"
  1266.     A$ = A$ + "#QOe>9_6jWiPQ5WJ=6IYSDFG5gkVDO^mYhgoW^3nZohWR6gg6aRGcbP1aim#"
  1267.     A$ = A$ + "2a3<Qa>8DK=cCFWXDM?hS5CJJ>S9]kEh[I]NWQR_eMmjbR`TlBV;?SB^TCVC"
  1268.     A$ = A$ + ">KcAW=J<ag5VmjoSo5VeOK<elMaaYaefPZ?aZLRP][aogVJ[T=B3]9C5CR6c"
  1269.     A$ = A$ + "aLS_\?8E`TdjG0WTLlXW6=9e0Jf<[cYY4W[A[O\4_P6[KfX<7<4WCkY8FS;M"
  1270.     A$ = A$ + "VG4UDDf8#akAiOQ<J>1aGIB=JB4WZSTo>RS3Wde[NkQ9iTN=5eBHBdo7b_8:"
  1271.     A$ = A$ + "^=>n3ZWiLWhgoP20M]SIQ^UC6BNCKVS]2d_RjTd?Y>9lGZg5V?R`?_#BA6<B"
  1272.     A$ = A$ + "9j#5k7WTFBA4XDgTjGWc2CH`m7;MFc7KOMK37iP73=ed5amndo4nio70_e?1"
  1273.     A$ = A$ + "XV]OE<aEL9DeV_=Vhj^96i:^<Vd6_<Vc>O7<]EM=DnLOCdkil>XC?eeAnci="
  1274.     A$ = A$ + "#gFhEAoG`kRA^XkP98`YVJe_>ZLaW6S]fG1U=gG6mNZ763Kfk6CMQK0?onO>"
  1275.     A$ = A$ + "LZ3_3<oYG:b=]P#H1jSho=aSDVaT7fH#3;HFHdm;?\aE>EleOm=`WlEg1_`;"
  1276.     A$ = A$ + "O<lKaO1=mZW1]BLnnX7Ng8j832FLcIhUkRkaHBcGEomd\<?oT_[D]A#mX<iS"
  1277.     A$ = A$ + "4S99_WU1SBoT]EWK\W^glP<kEW;]d[]GmblTNnk?4=[i]a#cJhZ:?I#h><Of"
  1278.     A$ = A$ + "bjDPjjYeBiBjA5KRVgCgSeEInOMBR7AikTh`<_daU8<YV[5>=oPX]WhjA2Gb"
  1279.     A$ = A$ + "B[LEjcTkjL\\TWUKU6O^CaRAh=dHnX2;8IOH^Ye\L\ZU\0InS8N2aEmJ5GVo"
  1280.     A$ = A$ + "JMM_eRSVUHK^8i<9Wd`=9l9SJHAD_VCmUV]J\\eHJe__]d?9WMFF33dmkMC<"
  1281.     A$ = A$ + "W;c4R1UeSRUf`jGgUn05CPN;i?=R7A8\8R_eR=8oTLI;aC]4OoCJRDb1k?VH"
  1282.     A$ = A$ + "Im3=FclanJHEH[e_J\[e]ILnCNNLm[M?lknc0O`?7HWWiC5n6mVRHcNO<lj^"
  1283.     A$ = A$ + "56DM_36iJ_16ej_86jb?3ZH9G1SKYg3mK1O<:Jng1MNaG3M]j[S1DkkSb5hA"
  1284.     A$ = A$ + "S\fcQaDg;QYehi`TgdU4OWg43JAG0cJ32LZI_ADOm[5kXaUQ9=R2#f9jQhlW"
  1285.     A$ = A$ + "6_hgfP37;oYNJ\fI=Ed`\7;>djF8fLmc67jXk17j475oAloRSOZV#m;KAXQj"
  1286.     A$ = A$ + "GR\n[2`;gT[OQ5C>[[WaJe#:k[;g?TbL<X_fTbL>BLX]H\PZag;hA5KjA1Cb"
  1287.     A$ = A$ + "fHknGiAj_]F;5g<k74gGJ\FCc[5WmRMkKce>>f=GeGG:>f=ZogUak#L>4e;H"
  1288.     A$ = A$ + "jeY4Q7An`h<=nSROCOMOehb3W4n;AL3]V_mbNkFP7i8Q9iUI4Nh197gGD>IQ"
  1289.     A$ = A$ + "kMSg1n;if9GUHGQjWoJa\jPSblohWc^;eAJ6SSGo<[mbYNMFKkj]YV[N;jnk"
  1290.     A$ = A$ + "IFFoeJa[ei>T2:>Wda8:]4YE#j98Go\P]hZ<?kAj_gBN4Qh5BRO8Yl=UE2a;"
  1291.     A$ = A$ + "e3BBGTZ\_UPE=WZ`5?fcSgob_2^jYK2_lQ?2>iQ?>>IC_>^mMo]hFoDPeoS^"
  1292.     A$ = A$ + "3Vb6OK<U=mIHjKoK4aWMKD#EW4SLSG4E\Q;Q1?gG73M^_7jiCoQXK;j3AgGa"
  1293.     A$ = A$ + "kQ^_lKRBGn7P1DmKQ:FaI`TFW8F]eN<<2A\O5>ccRL6c9`0Ve;Qa_XmPI?o5"
  1294.     A$ = A$ + "Q:7F98_Tm21i6ao:J[ggd7e`afZKYhbkI;h=gkF`5ffj`AKLUHbSY2<ZA?J\"
  1295.     A$ = A$ + "`JZ6_jiOIAlc_TDgTXo[4W]8kK#WL\InGGL]dGgm41hY?Je39k3_1=mMa;mJ"
  1296.     A$ = A$ + "KW`Q8OWJ>?C=S9Ynl7dhOek;c[7UejTkk1cAoWASmAB=V=El:nmi?CUOF\Ug"
  1297.     A$ = A$ + "=OL_>J=f=mLFba^An8iY>?f8i2=mJ?Q`^LFjWT>WHKBC;hUeIXhkj]1B_aJU"
  1298.     A$ = A$ + "\>[YaRDofk0YClF<QP39#4I81S`leGLmGn2X^I<KihHCbj=b54K01;e?j0Lf"
  1299.     A$ = A$ + "3mlDYYWUn:R9QjiE?M`XeL`BakYY=gf7OWegFbg8^fSlFLLVGJ]5a5\?R?g0"
  1300.     A$ = A$ + "lE<?>4O<QTR9HT#T]FJ477enhSFb_oiWFBXh<C7M9md#gkPhadB65VHlX[YV"
  1301.     A$ = A$ + "06DWc5cJD31WIo?;nh[MIl^_eKQm__SRE_a3QV^j_0Kjlg5CL;G1E\f?2UEg"
  1302.     A$ = A$ + "7SN]Tg5MMA_26DSW13MMW5EFk=a`GhMA9cAPE=g[S>^PG3i^P;SnGg7PBGdK"
  1303.     A$ = A$ + "SQEcY`XZkXXRWY9<TElZXXIN=QM3Db<>96aLg16`X:7iVC48^P<P43c8b>SX"
  1304.     A$ = A$ + "#]EG5>hfG?NQ=\:LlEE=NYZW;fg<W>JH2C2;H\C2mY;m4E<\APWK[K1M;eH#"
  1305.     A$ = A$ + "86edEGJ]0\hT[BN3Qd6BRC8mb\W8YhC49gVT4nAi_F?l;`\XJ:UFk2jJPF^`"
  1306.     A$ = A$ + "eb_T<NOM\9?ecYTI5n<o1Q=ai?EMMKhadZL_S]c9nkaLCK[M`7Gk9=fbg6cf"
  1307.     A$ = A$ + "jZBbIajn4an:YZSflfal79caMlmEDagNDnmIoTXk;:eU7WM5niR9=nogT9[J"
  1308.     A$ = A$ + "J=]^kDmEBaFiQcV4VK`;C^3WMb1ijTiZ3jgcDZcH>H5CbEMMf`X0388QO7]="
  1309.     A$ = A$ + "VX5a650b]M9SOo?k;A1YU^4kPn>Aj[oB<=;BNee82bX`o5a_C#>JBF?OT6d:"
  1310.     A$ = A$ + "G;8bLTZ]AV[LJNl:SWCHBD<K4??Bn85]hgV`KR]eNS<JKTXG5V5jBf9SLB[="
  1311.     A$ = A$ + "JFZ]5Y6GhX`\B5IUDLXS95_<F^B4ndAFAYW4b:n8AQ9gFD#2aQT3bGTFXnSl"
  1312.     A$ = A$ + "JG#H23Z[HoKYAl1gj3`Y>kKQ]MX;Q5_mCSIfh5Ta^=feNGQo>g13Zn;QA^UC"
  1313.     A$ = A$ + "SA^QCPaDoKPAFmE5admfXdjO;DjZO3d[jNE<hJOKdoWndXliO4<^UMDDf\f9"
  1314.     A$ = A$ + "6bl?:6d\O=Dj<_0:J4K6]_h:A4a75R?6;H`UT>Fc2W<fo>F3>jc_E\UE_4\V"
  1315.     A$ = A$ + "i==\nY>F\kI?3\]Y=MldmKPHdmX?Xni^4LUcoZXo5E82FLn;2CJJLPT?Q5WO"
  1316.     A$ = A$ + "9Sd>?b8mZb\hl>IT>jjT1]NDVReVecUPmfR^^9hRd8\X7G<9>GYZL\?Wo2e?"
  1317.     A$ = A$ + "CMl]mdYaoFIZoNfcnQ8V4GGBfFceZeDUJo4ceb4[mfDNHH^SB]gSOD?WXV[L"
  1318.     A$ = A$ + "e[1dciN#AmHQNTnmHNiGZ1L^jRejI<D_mEF[;VE`IMG?oHD>aXe0;iXS5];d"
  1319.     A$ = A$ + "`aD[X2lkogo2DiP6Xd?6NmMXeOfObo67KUliDORiY\^6=8icJ?9^YVb1[`_7"
  1320.     A$ = A$ + "J]c\XSEA?Wl9R<JkTjaV3JaSai]^cIVV0C:FTEbaR2b<ADBnYS^faD#9M:CY"
  1321.     A$ = A$ + "EDfYRB:X3XoM=OdSleN=eCoIYKY4A08ch255VZ0c:Q`AVah;B=<_4hEAPLB:"
  1322.     A$ = A$ + "5\_Wm0hBWkVhbGnCac^k[PY_XG4SN>76E\TSSa_ZCPbGj^5n=]3<ljg_d6aZ"
  1323.     A$ = A$ + "N1<PJf76jb?8:KQk2E\dG0U?k]Q9]hmRYEm^AUC_1DiDF36#i;2mZ?c4A4Af"
  1324.     A$ = A$ + "8W<;6E=iIPmo\K47N7[3k\QJa:GdCQ5Ge4`BVahA]E=A<_:7>6Oo:1;NlS57"
  1325.     A$ = A$ + "OKK5_mi?7NggleALQ4RlLU\>SHmfD_Go\eWCN\4cmSlS4?1cl8LBa6WTCaYa"
  1326.     A$ = A$ + "VdH5Z6FD7G[bcNL]kBKCba5_E>lRf>F;eiejQg?DmjI;o<Z>giQQ3l``<\5K"
  1327.     A$ = A$ + "AMNQm<KWodBeF5_?nk=NRm>?dB7o]da777=OnEmJB2A73b<YTA\Q6VE=jEUC"
  1328.     A$ = A$ + "KiL=mPdk^7fo1E]2PO]J=Wbe<>oKcLj=mKASGHMbFU?RI^nT73B7WVUlGK[#"
  1329.     A$ = A$ + "`NBnYTPT3ZS=hPad[\2l9_g]`kmf_Q\F5UHCVLZI=Nd1=SVoXJ4V3Q;aeP]5"
  1330.     A$ = A$ + "mJkSoN4N5]6K4g>VHTDO^4W\N8c=e4AaM<CDJgk<:__M73^WMF4SFl8Sf51b"
  1331.     A$ = A$ + "ElHF9Ae8IXbGWI2AR>TX07:fPA6]9<d1akenh21I;N_R5hI5WAK#7Re?TORQ"
  1332.     A$ = A$ + "PLJGH8_4S3aiGP8_4b6cM:ESGkL_?N_gko4_bUo<\kSM=l\7i:XY[oih`GmS"
  1333.     A$ = A$ + "`F?oUA3WhDXnWk`HnKI7HNKH7H1=\=d`n>6fdnO9\[3N:\SmL2\Qe_Gl<eg8"
  1334.     A$ = A$ + "FiBG1FDEc2KL5;Cfc^7HcK1[[VUPWNREPU<m9PS_W]RkNeG3Oj]NKlC_meag"
  1335.     A$ = A$ + "lIg3Oe7O7L_KN=Lb3M0<lngK=>FaTcBo;9nHQ<^nGI]hTh4KF3cI^WEZU2>i"
  1336.     A$ = A$ + "T4;RifLJM9X]]f5\#DNo;EF;MfSCGE[m>N<5=6QijDekobS5Y_CD]>HI>6cY"
  1337.     A$ = A$ + "mYOOL\^J><hm]]h2Zc1E[]6eeYV]FZ^JNL`[\=nbWTfg5HBZ[e6KlWAh>T>C"
  1338.     A$ = A$ + "CGOXk5I[o\le5kEgJ]46^m`4ESiA]_EDa0Y7ik7BSWH<B:7g4OF`S?haJda>"
  1339.     A$ = A$ + "GcW^ZG3e\ok96Id8[4CFj_4aWndJbGkLV=nlklNh=?gI4cQNN\QUG7Ve467Z"
  1340.     A$ = A$ + "HPURQegNS1d]RA?;8?dmLkX`gVLAOkBWU_g#kC_`#jE9XlNgCIoj?jb6PLk9"
  1341.     A$ = A$ + "n]^PdC1iTB2BL8ZNS8SN_^WGfb?WN<WDRGVSYRkHJ2OXB2Y8l1:aXK=b<aXU"
  1342.     A$ = A$ + "nBUGj2L\fgFQOF9:mIZKR][X>8fGYf696EAI6=b;iPA:AJ1I6KP8Oag9e833"
  1343.     A$ = A$ + "A:>?4OXASRc[KHIef0>iY_<NWKMGLSKOGl9OiGS?oGmehGo7n6l7nSoBl=Oc"
  1344.     A$ = A$ + "WQOa_h^hcodg7o\?o3aWlC^=^ckL5lFGl\hd7k0HW=^B\YE]#\^U=7Dk\[4;"
  1345.     A$ = A$ + "N637=^\Z`jGJEH[[YFL\M_ELR3\;\ke_J\_=^Fd#=;0CKT33m<g\UJ9>]6RT"
  1346.     A$ = A$ + "^E:icLGXJmd\L=ne^WSVFHCHCD^^I=B#5[BEgkX]Wk5G=]afEIMdamEZ]c]]"
  1347.     A$ = A$ + "=Oe\OClmfDe:DN<[6WYKnn`^HM4U^oVZfXn`REB]VJhS7eiKZmEZZVJ#onLo"
  1348.     A$ = A$ + "lc6_FCL^EHM]A5Gk9=^dgUHBZn:K;7CCGc9C=7hdi3Vo3n[97gZ7cZk3nJ7?"
  1349.     A$ = A$ + ">R`Sb;S<A?kBAFo=9ogH=YTfnh2;L<TneokCGD\nOgP3F[OAbOY`meOdQ4B2"
  1350.     A$ = A$ + "iTLRBmkPdK82cIR3OXHY?m\#S2o1>jNfU4OR\V>hcQOdc]OikM`]_E\o]\9\"
  1351.     A$ = A$ + "g=eXLkFkB[6;KNcAhKbT`h7j##YM]8I\JYgVH#2TVd6GDBL9jmH\YlB;9YfH"
  1352.     A$ = A$ + "CHBdJ_AF7B8J9FDgbWjg=1VE1IR<B8:9f4]M4VDo;:Gdk>U5:#PSUIK5a^5_"
  1353.     A$ = A$ + "OXPD35m<ohA?cClNaj]4WZgM:5dIQOD95C[A:RhjJCDQ:kU^a=lQPZV#5X^5"
  1354.     A$ = A$ + "DUho`ZaY>#ShR_hFa5>ff`i>dV`QfbbaNGgB`VFjCQe\`YPE?o9QJWeH#eE="
  1355.     A$ = A$ + ":\R5<AA\J[4kJm;0[NaC0CKdm5I;>VSeOO#4NkV<OeN[WgjP<i\To6Ho7I=D"
  1356.     A$ = A$ + "A6[V3Jioc;C>OOh?LlK=k[C[\nJ^ofXJmFc?hVe46FK6DmABML<?>CM=IXaC"
  1357.     A$ = A$ + "Zn]#SIHOniLTZ^oDWCXfKX?\HchaQlnUaJXSGbXkKb6G_=\ae\\mFcK63j7R"
  1358.     A$ = A$ + "HBZW[E_?2O_4jl2W_KKceSZV9l]mLQZ_Efj_UZNMCG_:\SiPB:\;F?Fc=m<#"
  1359.     A$ = A$ + "Im]O`Kaa8mi;Jf?=jCGkfmYSLlmLhj5R`RT[W\heAjOPBmmXMQ52R`G_Aja7"
  1360.     A$ = A$ + "[Tol9Mn8UXSDZEJdSdkgaT4h6]?EDHVYSRb:C[6mJjmc;eTUFnYAH1]Gnn\A"
  1361.     A$ = A$ + "_VZ?Kb_8:^=jiD^Uj?eW]2oU8<Z<C\=2oQBFfo]M>[dU??KQ?FYCalYkW5mm"
  1362.     A$ = A$ + "6B_j>6NojU8V_^QQeW^RAd_2aPjNVXGi57jA>AQ2KOP8Sh<QDRb9TKbNSlc8"
  1363.     A$ = A$ + "8TDD^QTS`MDBf]1M:a#A9I4;jAJAQNVJDXllC1S]7iPag[>QZ6L?a<6D_`l["
  1364.     A$ = A$ + "H#Hj3^_HLm[kbef[^ZV<FilN:\iUG=jM1I;l9;Hh[;6UnmHEk;ME[omXL]Aa"
  1365.     A$ = A$ + "XALG>Y7VFkA4mL8A[K9YY1B>fdPQk3oQlAZeNk]EmKQaShhhhgG5_R7kcl<Q"
  1366.     A$ = A$ + "J<lL<IZSahgSR;C5cQmIRnLJ<?[AZdWASOhl0H?LZ7dL`7F>ZEW7`_W]l2Y]"
  1367.     A$ = A$ + "kKEO[\=f`WThAOGQ9YRUcmI[jiOnj;OMWm=BmN5ZHDf[NUN#V]h#<V?7_6_="
  1368.     A$ = A$ + "dcYl7YjoT7jn8aLA9kc7W3NE^FQ[e>b792KRbWT<N>mlo#j>4YISiVBB8EBC"
  1369.     A$ = A$ + "I3YeBlX\BX]8Sf4Wli94NXX]Q6\lAje]?^H^_?SN\3][=b_3mI4F7Q[5CPn;"
  1370.     A$ = A$ + "ccMD1hSDCSXn3SNM\]fOYV[eJ;VA<17P4oQ\h2=84K82LAQoE4^DWj#kUalA"
  1371.     A$ = A$ + "iS:K1f5e7:D?bUILA;`PJ;jCnYQY<dNPZZ\GXjI<4\eE?=Q?Lc6;JFURaDN>"
  1372.     A$ = A$ + "H<3]0<YAD<:[hd`P;>M<lRc0CM0M1CZ_M6SYT>QYdoB`h4hKEfc^PQEL1XZQ"
  1373.     A$ = A$ + "E6Fi\V>fNmeRe]`5PQdS^Q`mbKiiZ#]hShlUFolAm1;]fRNhXV?XDMH5Uon;"
  1374.     A$ = A$ + "[GMif:loT`cYc5TncAW[Xe:;QX27A5LP8V#9OhR796ShcS;>dQT5h`YV:B:f"
  1375.     A$ = A$ + "HUJ^VeNogPF]YBhA=kKTfhCbo2Ke;66OQ7;J_e[94AlnZlPQ:?abSQDWOaa<"
  1376.     A$ = A$ + "`l^_mb_TjLaF:OBfVK9Ko>fZG=f>GafmYmVOoTLmfn^0CR[g86SQG[;jN3Zi"
  1377.     A$ = A$ + "dAmJTeekf6MJka5?BmhRg7ZidRaFhefScG]jh0F_LIoQi?CUCDX_?5cVII?j"
  1378.     A$ = A$ + "k2lcTKFeEGIo`Jf\E<;ZNllVd[F7K67SkEMZVb9cR>OY#e#0]]4gmC?:[iLU"
  1379.     A$ = A$ + "_3=GUW_Bn7#?WNTi15NK8NfVZi69oBf:]hJTWG5??\0l5a5N8RH`RDPA5]L>"
  1380.     A$ = A$ + ">=gVlK[;T?J2<dnTOFXOiU>6Co;2m]c9S:;[0<[9F:feFF<fcfZ5E?oaSY<Q"
  1381.     A$ = A$ + "b`T7c0AImZ0<j1d=<iQf7<fbj5VaH61VfH6^dVkd6?VcdW0VP`gXl5aI6R0o"
  1382.     A$ = A$ + "T>>YLB;i]8ZOM<#eJU[2<MO4Hj^9io0Jn?egfBoYUm\_;F?WBmJ<]Nm<VUO^"
  1383.     A$ = A$ + "iZLO:Wkk\AInZI\7NMe8\7EMWBmA:F?Zn#h_7U[CJ<4iW<?FT_OUjmdD__7m"
  1384.     A$ = A$ + "8QUYjK2OO#>oDL\Fba>:[?W]iBbNceNLFG=Kca=omEke;emY]nBIknfF<^oA"
  1385.     A$ = A$ + "4CbNi]W?G`mBRjjPYN^`fLgaHLZm9gSbo3EO\DacH<:6[D=6C>7HFicJMLBJ"
  1386.     A$ = A$ + "\6Q?YN?7GdaOXjBR`UXJ5PlERNDFKBjLb3cA?bn\Sh63mNKQ=FO\E=IO2K3^"
  1387.     A$ = A$ + "UlkAj=R36\FKObJIBO]_UejWc6]R?AO6Qo8o_AK_n[Il9CjhINkZCB]BRlQS"
  1388.     A$ = A$ + "`VbCP7EDVIQLC8ATKkRGFoBbeV;nP#J]9H4O<nSfWJ\XcM:C<#1nCiU?0<\Q"
  1389.     A$ = A$ + "<0<jQ9R=KLS6cLbS1U?`nS2;874CTQ0?MGho[cRS1Gehb=GdeG5?LYEbS3jl"
  1390.     A$ = A$ + "[_Vm#fg=NkX8VNW5cMMdUV[;3mccL?e#W?mAfG=V\N>UaRYL9IfHce1PJ>]i"
  1391.     A$ = A$ + "ePSe7=el=ahBL<Mlm>7eP7R4GR7oX>7#e_O[[=RB^:EOO>W>dSL>N8lF2WRN"
  1392.     A$ = A$ + "=W;3nnTd[il?[F[NfNLH_iTfRQlhHZa6fBiJoOTaT\gi6E\H>V8>?K<f>_64"
  1393.     A$ = A$ + "f;?hZ[e1oNZ[mZLl]nfC?W7Gc_V__e3jJXlgPf65OH]M=khaO\_;lL6:^=Io"
  1394.     A$ = A$ + "j[kc3S9acMHlV_c<S6\[I;W`eL_[d\Amk7?oT?fHn4:<_l1AkOP8Q#33Y:RM"
  1395.     A$ = A$ + "<eHR199lW:QhR5]E4GDKKCk#Da4;2>\X#8Q73R>VfP`39<h]HN7a[1DmVBmU"
  1396.     A$ = A$ + "?ekN^iZH>Z9anf\0SfMQIbP\WU9NMaCWdZ92;:i#bRN=8jR\>7M#Fg[lJ4AW"
  1397.     A$ = A$ + "K9SaZMGGC5\Z=DjH^?>j6;IL^]K^F1d6;#[?\Z_<?^c]OLoLKmKi_Ge#igg]"
  1398.     A$ = A$ + "7dJ#n]ah[W<N2kO2k_RmdULjN7dJH#n#CL1WJlLfFOBZ[]1WoI>nLJOXVo:k"
  1399.     A$ = A$ + "Yg;f3CBb[JfP9Yb;V4^77k6Q5iYT?3K^7IEm5b:G4lm<<9bHo6hSEZgKlfYV"
  1400.     A$ = A$ + "G?2[ck5n]#j^XoN70J]oA2Om><hVK1236\8<C`ASRhK=JbJ?5;c5W3]BG7WL"
  1401.     A$ = A$ + "FjS65CU7^Xeo<NhT6O^8?FM#[^\l#WcYTn=JD[6lYNoPjo#>OSlm0Xl=A6M^"
  1402.     A$ = A$ + "EbI]<FT^V\lhP9A?Ba]YnJEoODSgAmnK?^cU\G\Gf[^YODZo^oIcn^4CB=F7"
  1403.     A$ = A$ + "KSQR<e?cfhJY?W_o8?NPgOZ7OdHE[SIER]Wfnf4AToodZk77<9ehcE[U=[n\"
  1404.     A$ = A$ + "9cWQ3Fi\Ff?9em]mbkhgNk1?G[U<KaRdjohk7CbR>N45oW[>iPTo6=iT6OdA"
  1405.     A$ = A$ + "loTS2oFLd0igY7`MW3D\=n3S68<O?5OO?QG6MCb_\TFjJa1Q_^2\:jA?KUI9"
  1406.     A$ = A$ + "o:8]FiTT77K>6L=]ZFj_VA==3AbG36MF[GXemSVReQGWCjl\_2<4Odi^F?<J"
  1407.     A$ = A$ + "ln`HhHbNDekJjkajZ77O7W?H^N0XcmljWa[5gSbLX7eiHf^VGZ[mlgGZKaO8"
  1408.     A$ = A$ + "Q9IK^UDG;CelH[nKKkJGJ;ODbK[jjca_VN>ECJDljUFB?A7B>5[i7#]N^O#H"
  1409.     A$ = A$ + "BbkakHcJe47K9_m<V4_FKTYfghZ7KfF?2OO0CBe?9KSMcMmh^LFh7SKRH^Lg"
  1410.     A$ = A$ + "T6oBAm76Q9IDPeH`PK`1Q?B>J`KagcK1FTg`77<;eR5_8\I3jHB6<3?=hVle"
  1411.     A$ = A$ + "NI#3[b\1bOCRC#dd14fO:c\60CanIXEBS_fK=O:jmJ6SQBHBNZ_nnf;V\7V_"
  1412.     A$ = A$ + "B<n5_fKdnQlIRk?C>G#lhDNleSkhOK=eehRck=kOO;aC6?Ya5nn4Vd3:GJ]T"
  1413.     A$ = A$ + "moae%%L2"
  1414.     btemp$ = ""
  1415.     FOR i& = 1 TO LEN(A$) STEP 4
  1416.         B$ = MID$(A$, i&, 4)
  1417.         IF INSTR(1, B$, "%") THEN
  1418.  
  1419.             FOR C% = 1 TO LEN(B$)
  1420.                 F$ = MID$(B$, C%, 1)
  1421.  
  1422.                 IF F$ <> "%" THEN C$ = C$ + F$
  1423.             NEXT: B$ = C$
  1424.         END IF
  1425.  
  1426.         FOR j = 1 TO LEN(B$)
  1427.             IF MID$(B$, j, 1) = "#" THEN
  1428.                 MID$(B$, j) = "@"
  1429.             END IF
  1430.         NEXT
  1431.  
  1432.         FOR t% = LEN(B$) TO 1 STEP -1
  1433.             B& = B& * 64 + ASC(MID$(B$, t%)) - 48
  1434.         NEXT
  1435.         X$ = ""
  1436.  
  1437.         FOR t% = 1 TO LEN(B$) - 1
  1438.             X$ = X$ + CHR$(B& AND 255)
  1439.             B& = B& \ 256
  1440.         NEXT
  1441.         btemp$ = btemp$ + X$
  1442.     NEXT
  1443.     btemp$ = _INFLATE$(btemp$)
  1444.     _MEMPUT m, m.OFFSET, btemp$: _MEMFREE m
  1445.     BASIMAGE1& = _COPYIMAGE(v&): _FREEIMAGE v&
  1446.  
  1447.  
  1448.  

See the first code block after the declares where _CLEARCOLOR is used with POINT and my handy cAnalysis.

Offline Dav

  • Forum Resident
  • Posts: 792
Re: Solar Flare
« Reply #41 on: December 15, 2020, 01:13:07 pm »
@Dav did not know that, that might come in handy! By pasting into an image program I assume something like PAINT?

Yes, PAINT will work.  Alt+PrtSc is handy for me. Also, Shift+PrtSc will copy the whole desktop as an image.  Also comes in handy.

- Dav