Solar Flare

[bplus]

@NOVARSEG  congrats you found the code tag button, so much easier to read code :)

And nice mod!  I made 3 tiny changes:

Code: QB64: [Select]

1. SCREEN _NEWIMAGE(1000, 800, 32)
2. 'SCREEN _NEWIMAGE(800, 600, 32)
3. DIM starx(1000), stary(1000)
4. DIM sz(1000) AS DOUBLE
5. DIM speed(1000) AS DOUBLE
6. DIM rr AS DOUBLE
7. DIM x(1000) AS DOUBLE
8. DIM y(1000) AS DOUBLE
9. DIM x, y AS DOUBLE
10. DIM cx AS INTEGER, cy AS INTEGER, r AS INTEGER, c AS _UNSIGNED LONG
11. DIM rad AS DOUBLE
12. DIM pi AS DOUBLE
13. pi = 3.14159265358
14.  
15.  
16. DO
17.     _LIMIT 100
18.     a$ = INKEY$
19.     IF a$ = CHR$(27) THEN END
20.     IF a$ = " " THEN f = f + 1
21.     IF f = 1 THEN _FULLSCREEN
22.     IF f = 2 THEN _FULLSCREEN OFF: f = 0
23.  
24.     stars = INT(RND * 100) + 1
25.     IF stars > 80 THEN
26.         s = s + 1
27.  
28.         IF s > 950 THEN s = 1
29.         rad = RND * (pi * 2)
30.         x = SIN(rad)
31.         y = COS(rad)
32.         starx(s) = x
33.         stary(s) = y
34.         x(s) = x ' * RND * 5
35.         y(s) = y ' * RND * 5
36.  
37.         'Set size and speed
38.         rr = RND
39.         speed(s) = ((1 + rr / 400) + .002)
40.         sz(s) = rr + .55
41.  
42.     END IF
43.  
44.  
45.     FOR t = 1 TO 950
46.  
47.         stary(t) = stary(t) * speed(t)
48.         starx(t) = starx(t) * speed(t)
49.         'rr = RND * 100
50.         cx = starx(t) + 500 + x(t) * 50
51.         cy = stary(t) + 400 + y(t) * 50
52.         r = sz(t)
53.         c = _RGB32(255, 255, 0) ' <<<< yellow
54.         fillCircle cx, cy, r, c
55.  
56.  
57.         'skip:
58.     NEXT t
59.  
60.     LINE (0, 0)-(_WIDTH, _HEIGHT), _RGB32(0, 0, 0, 20), BF
61.  
62.     FOR b = 0 TO 55 STEP .25
63.         CIRCLE (500, 400), b, Ink~&(&HFFFFFFFF, &HFFFFFF00, b / 55) ' <<< adjust to shift color over 50 instead of 500
64.     NEXT
65.     _DISPLAY ' <<<<  moved to here so sun is draw over photon formation circle
66. LOOP
67. END
68. 'from Steve Gold standard
69. SUB fillCircle (CX AS INTEGER, CY AS INTEGER, R AS INTEGER, C AS _UNSIGNED LONG)
70.     DIM Radius AS INTEGER, RadiusError AS INTEGER
71.     DIM X AS INTEGER, Y AS INTEGER
72.     Radius = ABS(R): RadiusError = -Radius: X = Radius: Y = 0
73.     IF Radius = 0 THEN PSET (CX, CY), C: EXIT SUB
74.     LINE (CX - X, CY)-(CX + X, CY), C, BF
75.     WHILE X > Y
76.         RadiusError = RadiusError + Y * 2 + 1
77.         IF RadiusError >= 0 THEN
78.             IF X <> Y + 1 THEN
79.                 LINE (CX - Y, CY - X)-(CX + Y, CY - X), C, BF
80.                 LINE (CX - Y, CY + X)-(CX + Y, CY + X), C, BF
81.             END IF
82.             X = X - 1
83.             RadiusError = RadiusError - X * 2
84.         END IF
85.         Y = Y + 1
86.         LINE (CX - X, CY - Y)-(CX + X, CY - Y), C, BF
87.         LINE (CX - X, CY + Y)-(CX + X, CY + Y), C, BF
88.     WEND
89. END SUB
90.  
91. SUB cAnalysis (c AS _UNSIGNED LONG, outRed, outGrn, outBlu, outAlp)
92.     outRed = _RED32(c): outGrn = _GREEN32(c): outBlu = _BLUE32(c): outAlp = _ALPHA32(c)
93. END SUB
94.  
95. FUNCTION Ink~& (c1 AS _UNSIGNED LONG, c2 AS _UNSIGNED LONG, fr##)
96.     DIM R1, G1, B1, A1, R2, G2, B2, A2
97.     cAnalysis c1, R1, G1, B1, A1
98.     cAnalysis c2, R2, G2, B2, A2
99.     Ink~& = _RGB32(R1 + (R2 - R1) * fr##, G1 + (G2 - G1) * fr##, B1 + (B2 - B1) * fr##, A1 + (A2 - A1) * fr##)
100. END FUNCTION
101.  
102.  

Maybe photons should bust out of sun faster and farther but that's up to you ;-)

[NOVARSEG]

bplus
Yellow photons coming from inside the sun way better!

added some mods so the photons turn red the farther they are from the sun

by accident  got the sun itself to flicker but can't reproduce the effect!!

When in full screen mode the sun looks like an ellipse got to fix that

Code: QB64: [Select]

1. SCREEN _NEWIMAGE(1000, 800, 32)
2. 'SCREEN _NEWIMAGE(800, 600, 32)
3. DIM starx(1000), stary(1000)
4. DIM sz(1000) AS DOUBLE
5. DIM speed(1000) AS DOUBLE
6. DIM rr AS DOUBLE
7. DIM x(1000) AS DOUBLE
8. DIM y(1000) AS DOUBLE
9. DIM x, y AS DOUBLE
10. DIM cx AS INTEGER, cy AS INTEGER, r AS INTEGER, c AS _UNSIGNED LONG
11. DIM rad AS DOUBLE
12. DIM pi AS DOUBLE
13. pi = 3.14159265358
14.  
15.  
16. DO
17.     _LIMIT 100
18.     a$ = INKEY$
19.     IF a$ = CHR$(27) THEN END
20.     IF a$ = " " THEN f = f + 1
21.     IF f = 1 THEN _FULLSCREEN
22.     IF f = 2 THEN _FULLSCREEN OFF: f = 0
23.  
24.     stars = INT(RND * 100) + 1
25.     IF stars > 80 THEN
26.         s = s + 1
27.  
28.         IF s > 950 THEN s = 1
29.         rad = RND * (pi * 2)
30.         x = SIN(rad)
31.         y = COS(rad)
32.         starx(s) = x
33.         stary(s) = y
34.         x(s) = x ' * RND * 1
35.         y(s) = y '* RND * 1
36.  
37.         'Set size and speed
38.         rr = RND
39.         speed(s) = ((1 + rr / 400) + .002)
40.         sz(s) = rr + .55  'if > .55 then too many large photons
41.  
42.  
43.     END IF
44.  
45.  
46.     FOR t = 1 TO 950
47.  
48.         stary(t) = stary(t) * speed(t)
49.         starx(t) = starx(t) * speed(t)
50.  
51.         cx = starx(t) + 500 + x(t) * 50
52.         cy = stary(t) + 400 + y(t) * 50
53.  
54.         r = sz(t)
55.         c = _RGB32(255, 255 - (starx(t) ^ 2 + stary(t) ^ 2) ^ .5 / 2, 0) ' <<<< yellow
56.         'the square root stuff gets magnitude of position so the photons go from yellow to red
57.  
58.         fillCircle cx, cy, r, c
59.  
60.  
61.         'skip:
62.     NEXT t
63.  
64.     LINE (0, 0)-(_WIDTH, _HEIGHT), _RGB32(0, 0, 0, 20), BF
65.  
66.     FOR b = 0 TO 55 STEP .25
67.         CIRCLE (500, 400), b, Ink~&(&HFFFFFFFF, &HFFFFFF00, b / 55) ' <<< adjust to shift color over 50 instead of 500
68.     NEXT
69.     _DISPLAY ' <<<<  moved to here so sun is draw over photon formation circle
70. LOOP
71. END
72. 'from Steve Gold standard
73. SUB fillCircle (CX AS INTEGER, CY AS INTEGER, R AS INTEGER, C AS _UNSIGNED LONG)
74.     DIM Radius AS INTEGER, RadiusError AS INTEGER
75.     DIM X AS INTEGER, Y AS INTEGER
76.     Radius = ABS(R): RadiusError = -Radius: X = Radius: Y = 0
77.     IF Radius = 0 THEN PSET (CX, CY), C: EXIT SUB
78.     LINE (CX - X, CY)-(CX + X, CY), C, BF
79.     WHILE X > Y
80.         RadiusError = RadiusError + Y * 2 + 1
81.         IF RadiusError >= 0 THEN
82.             IF X <> Y + 1 THEN
83.                 LINE (CX - Y, CY - X)-(CX + Y, CY - X), C, BF
84.                 LINE (CX - Y, CY + X)-(CX + Y, CY + X), C, BF
85.             END IF
86.             X = X - 1
87.             RadiusError = RadiusError - X * 2
88.         END IF
89.         Y = Y + 1
90.         LINE (CX - X, CY - Y)-(CX + X, CY - Y), C, BF
91.         LINE (CX - X, CY + Y)-(CX + X, CY + Y), C, BF
92.     WEND
93. END SUB
94.  
95. SUB cAnalysis (c AS _UNSIGNED LONG, outRed, outGrn, outBlu, outAlp)
96.     outRed = _RED32(c): outGrn = _GREEN32(c): outBlu = _BLUE32(c): outAlp = _ALPHA32(c)
97. END SUB
98.  
99. FUNCTION Ink~& (c1 AS _UNSIGNED LONG, c2 AS _UNSIGNED LONG, fr##)
100.     DIM R1, G1, B1, A1, R2, G2, B2, A2
101.     cAnalysis c1, R1, G1, B1, A1
102.     cAnalysis c2, R2, G2, B2, A2
103.     Ink~& = _RGB32(R1 + (R2 - R1) * fr##, G1 + (G2 - G1) * fr##, B1 + (B2 - B1) * fr##, A1 + (A2 - A1) * fr##)
104. END FUNCTION

[SierraKen]

Great job Novaseg! :)

[NOVARSEG]

SierraKen

Always wondered how these starfields work. 

Thanks for posting code on starfields.

[bplus]

@NOVARSEG yeah for turning red!

[SierraKen]

Welcome, we are here to help. :)

[NOVARSEG]

Fixed aspect ratio when in full screen mode. Hope this works for your computer.

Code: QB64: [Select]

1. SCREEN _NEWIMAGE(1000, 800, 32)
2. 'SCREEN _NEWIMAGE(800, 600, 32)
3. DIM starx(1000), stary(1000)
4. DIM sz(1000) AS DOUBLE
5. DIM speed(1000) AS DOUBLE
6. DIM rr AS DOUBLE
7. DIM x(1000) AS DOUBLE
8. DIM y(1000) AS DOUBLE
9. DIM x, y AS DOUBLE
10. DIM cx AS INTEGER, cy AS INTEGER, r AS INTEGER, c AS _UNSIGNED LONG
11. DIM rad AS DOUBLE
12. DIM ra AS SINGLE
13. DIM pi AS DOUBLE
14. pi = 3.14159265358
15.  
16. DO
17.     _LIMIT 1000
18.     a$ = INKEY$
19.     IF a$ = CHR$(27) THEN END
20.  
21.     'toggle full screen mode
22.     IF a$ = " " AND f = 0 THEN _FULLSCREEN: f = 1: a$ = ""
23.     IF a$ = " " AND f = 1 THEN _FULLSCREEN OFF: f = 0: a$ = ""
24.  
25.     stars = INT(RND * 100) + 1
26.     IF stars > 80 THEN
27.         s = s + 1
28.         IF s > 950 THEN s = 1
29.  
30.         rad = RND * (pi * 2)
31.         x = SIN(rad)
32.         y = COS(rad)
33.  
34.         starx(s) = x
35.         stary(s) = y
36.         x(s) = x
37.         y(s) = y
38.  
39.         'Set size and speed
40.         rr = RND
41.         speed(s) = ((1 + rr / 400) + .002)
42.         sz(s) = rr + .55 'if > .55 then too many large photons
43.  
44.     END IF
45.  
46.     FOR t = 1 TO 950
47.  
48.         stary(t) = stary(t) * speed(t) 'accelerate photons
49.         starx(t) = starx(t) * speed(t) 'accelerate photons
50.  
51.         cx = starx(t) + 500 + x(t) * 50 'used to adjust origin of photons to size of sun
52.         cy = stary(t) + 400 + y(t) * 50 'used to adjust origin of photons to size of sun
53.  
54.         IF f = 1 THEN 'fix aspect ratio of photons when in full screen mode
55.             cx = starx(t) + 500 + (x(t) * 50 * .7)
56.         END IF
57.  
58.         r = sz(t)
59.  
60.         c = _RGB32(255, 255 - (starx(t) ^ 2 + stary(t) ^ 2) ^ .5 / 2, 0) ' <<<< yellow
61.         'the square root stuff gets magnitude of position so the photons go from yellow to red
62.  
63.         fillCircle cx, cy, r, c
64.  
65.     NEXT t
66.  
67.     LINE (0, 0)-(_WIDTH, _HEIGHT), _RGB32(0, 0, 0, 20), BF
68.  
69.     IF f = 1 THEN ra = 1.428 'fix aspect ratio of sun when in full screen mode
70.     IF f = 0 THEN ra = 1
71.  
72.     FOR b = 0 TO 55 STEP .25
73.         CIRCLE (500, 400), b, Ink~&(&HFFFFFFFF, &HFFFFFF00, b / 55), , , ra ' <<< adjust to shift color over 50 instead of 500
74.     NEXT
75.  
76.     _DISPLAY ' <<<<  moved to here so sun is draw over photon formation circle
77.  
78. LOOP
79. END
80.  
81. 'from Steve Gold standard
82. SUB fillCircle (CX AS INTEGER, CY AS INTEGER, R AS INTEGER, C AS _UNSIGNED LONG)
83.     DIM Radius AS INTEGER, RadiusError AS INTEGER
84.     DIM X AS INTEGER, Y AS INTEGER
85.     Radius = ABS(R): RadiusError = -Radius: X = Radius: Y = 0
86.     IF Radius = 0 THEN PSET (CX, CY), C: EXIT SUB
87.     LINE (CX - X, CY)-(CX + X, CY), C, BF
88.     WHILE X > Y
89.         RadiusError = RadiusError + Y * 2 + 1
90.         IF RadiusError >= 0 THEN
91.             IF X <> Y + 1 THEN
92.                 LINE (CX - Y, CY - X)-(CX + Y, CY - X), C, BF
93.                 LINE (CX - Y, CY + X)-(CX + Y, CY + X), C, BF
94.             END IF
95.             X = X - 1
96.             RadiusError = RadiusError - X * 2
97.         END IF
98.         Y = Y + 1
99.         LINE (CX - X, CY - Y)-(CX + X, CY - Y), C, BF
100.         LINE (CX - X, CY + Y)-(CX + X, CY + Y), C, BF
101.     WEND
102. END SUB
103.  
104. SUB cAnalysis (c AS _UNSIGNED LONG, outRed, outGrn, outBlu, outAlp)
105.     outRed = _RED32(c): outGrn = _GREEN32(c): outBlu = _BLUE32(c): outAlp = _ALPHA32(c)
106. END SUB
107.  
108. FUNCTION Ink~& (c1 AS _UNSIGNED LONG, c2 AS _UNSIGNED LONG, fr##)
109.     DIM R1, G1, B1, A1, R2, G2, B2, A2
110.     cAnalysis c1, R1, G1, B1, A1
111.     cAnalysis c2, R2, G2, B2, A2
112.     Ink~& = _RGB32(R1 + (R2 - R1) * fr##, G1 + (G2 - G1) * fr##, B1 + (B2 - B1) * fr##, A1 + (A2 - A1) * fr##)
113. END FUNCTION
114.  
115.  

[NOVARSEG]

photons more realistic

Code: QB64: [Select]

1. SCREEN _NEWIMAGE(1000, 800, 32)
2. 'SCREEN _NEWIMAGE(800, 600, 32)
3. DIM starx(1000), stary(1000)
4. DIM sz(1000) AS DOUBLE
5. DIM speed(1000) AS DOUBLE
6. DIM rr AS DOUBLE
7. DIM x(1000) AS DOUBLE
8. DIM y(1000) AS DOUBLE
9. DIM x, y AS DOUBLE
10. DIM cx AS INTEGER, cy AS INTEGER, r AS INTEGER, c AS _UNSIGNED LONG
11. DIM rad AS DOUBLE
12. DIM ra AS SINGLE
13. DIM pi AS DOUBLE
14. pi = 3.14159265358
15.  
16. DO
17.     ' _LIMIT 10000
18.     a$ = INKEY$
19.     IF a$ = CHR$(27) THEN END
20.  
21.     'toggle full screen mode
22.     IF a$ = " " AND f = 0 THEN _FULLSCREEN: f = 1: a$ = ""
23.     IF a$ = " " AND f = 1 THEN _FULLSCREEN OFF: f = 0: a$ = ""
24.  
25.     stars = INT(RND * 100) + 1
26.     IF stars > 80 THEN
27.         s = s + 1
28.         IF s > 950 THEN s = 1
29.  
30.         rad = RND * (pi * 2)
31.         x = SIN(rad) 'get direction
32.         y = COS(rad) 'get direction
33.  
34.         starx(s) = x
35.         stary(s) = y
36.         x(s) = x
37.         y(s) = y
38.  
39.         'Set size and speed
40.         rr = RND
41.  
42.         'large photon
43.         IF rr >= .5 AND rr < 1 THEN
44.             sz(s) = 1.4
45.             speed(s) = 1 + rr / 170
46.         END IF
47.  
48.         'small photon
49.         IF rr < .5 THEN
50.             sz(s) = 0 'returns the smallest photon
51.             speed(s) = 1 + (rr / 100) + .0016
52.             '1.0016 'slowest value
53.         END IF
54.  
55.     END IF
56.  
57.     FOR t = 1 TO 950
58.  
59.         stary(t) = stary(t) * speed(t) 'accelerate photons
60.         starx(t) = starx(t) * speed(t) 'accelerate photons
61.  
62.         cx = starx(t) + 500 + x(t) * 50 'used to adjust origin of photons to size of sun
63.         cy = stary(t) + 400 + y(t) * 50 'used to adjust origin of photons to size of sun
64.  
65.         IF f = 1 THEN 'fix aspect ratio of photons when in full screen mode
66.             cx = starx(t) + 500 + (x(t) * 50 * .7)
67.         END IF
68.  
69.         r = sz(t)
70.  
71.         c = _RGB32(255, 255 - (starx(t) ^ 2 + stary(t) ^ 2) ^ .5 / 2, 0) ' <<<< yellow
72.         'the square root stuff gets magnitude of position so the photons go from yellow to red
73.  
74.         fillCircle cx, cy, r, c
75.  
76.     NEXT t
77.  
78.     LINE (0, 0)-(_WIDTH, _HEIGHT), _RGB32(0, 0, 0, 20), BF
79.  
80.     IF f = 1 THEN ra = 1.428 'fix aspect ratio of sun when in full screen mode
81.     IF f = 0 THEN ra = 1
82.  
83.     FOR b = 0 TO 55 STEP .25
84.         CIRCLE (500, 400), b, Ink~&(&HFFFFFFFF, &HFFFFFF00, b / 55), , , ra ' <<< adjust to shift color over 50 instead of 500
85.     NEXT b
86.  
87.     _DISPLAY ' <<<<  moved to here so sun is draw over photon formation circle
88.  
89. LOOP
90. END
91.  
92. 'from Steve Gold standard
93. SUB fillCircle (CX AS INTEGER, CY AS INTEGER, R AS INTEGER, C AS _UNSIGNED LONG)
94.     DIM Radius AS INTEGER, RadiusError AS INTEGER
95.     DIM X AS INTEGER, Y AS INTEGER
96.     Radius = ABS(R): RadiusError = -Radius: X = Radius: Y = 0
97.     IF Radius = 0 THEN PSET (CX, CY), C: EXIT SUB
98.     LINE (CX - X, CY)-(CX + X, CY), C, BF
99.     WHILE X > Y
100.         RadiusError = RadiusError + Y * 2 + 1
101.         IF RadiusError >= 0 THEN
102.             IF X <> Y + 1 THEN
103.                 LINE (CX - Y, CY - X)-(CX + Y, CY - X), C, BF
104.                 LINE (CX - Y, CY + X)-(CX + Y, CY + X), C, BF
105.             END IF
106.             X = X - 1
107.             RadiusError = RadiusError - X * 2
108.         END IF
109.         Y = Y + 1
110.         LINE (CX - X, CY - Y)-(CX + X, CY - Y), C, BF
111.         LINE (CX - X, CY + Y)-(CX + X, CY + Y), C, BF
112.     WEND
113. END SUB
114.  
115. SUB cAnalysis (c AS _UNSIGNED LONG, outRed, outGrn, outBlu, outAlp)
116.     outRed = _RED32(c): outGrn = _GREEN32(c): outBlu = _BLUE32(c): outAlp = _ALPHA32(c)
117. END SUB
118.  
119. FUNCTION Ink~& (c1 AS _UNSIGNED LONG, c2 AS _UNSIGNED LONG, fr##)
120.     DIM R1, G1, B1, A1, R2, G2, B2, A2
121.     cAnalysis c1, R1, G1, B1, A1
122.     cAnalysis c2, R2, G2, B2, A2
123.     Ink~& = _RGB32(R1 + (R2 - R1) * fr##, G1 + (G2 - G1) * fr##, B1 + (B2 - B1) * fr##, A1 + (A2 - A1) * fr##)
124. END FUNCTION
125.  
126.  
127.  

[NOVARSEG]

I found a nice pic (bmp) of the star trek enterprise ship.   I want to load the image into the existing EXE file so don't have to supply the pic as a separate file.

Also want to load the pic from memory (in the EXE) but only the picture bytes.  I don't want the black background of the ship hiding the star / photons as they come by.

This will make the ship  blend into the  star field properly.

If necessary i can ensure that the black bytes surrounding the ship are really rgb 0 0 0 so that code can process and load only picture bytes etc. I can also ensure that there will be no rgb 0 0 0 anywhere else

Ideas?

[bplus]

Along with all the accoutrements to _LOADIMAGE this will be handy to make transparent background colors:
http://qb64.org/wiki/CLEARCOLOR

Also might be able to dig up the Enterprise with transparent background.

[NOVARSEG]

Hi bplus

 found a ship with a fairly dark background. I looked at http://qb64.org/wiki/CLEARCOLOR and it looks like that'll work.   Will need to make sure the background is rgb 0 0 0  for clearcolor to work best.

I found out that CLEARCOLOR is used after PUTIMAGE

The other thing is to put the actual image into the EXE file. I know how to do that with quick basic so we will try that with QB64.

When the EXE is run, could a _PUTIMAGE  access the picture memory location in the loaded EXE file? 

[bplus]

Hi bplus

 found a ship with a fairly dark background. I looked at http://qb64.org/wiki/CLEARCOLOR and it looks like that'll work.   Will need to make sure the background is rgb 0 0 0  for clearcolor to work best.

The other thing is to put the actual image into the EXE file. I know how to do that with quick basic so we will try that with QB64.

When the EXE is run, could a _PUTIMAGE  access the picture memory location in the loaded EXE file?

Do you mean embedding the image as data into the bas source file, like what Petr just did with his Christmas submission?

I have a code by Andy and maybe another by Dav, Steve has one (at least, I am sure) and there is Petr, these guys are probably better experienced to explain. I've done it once or twice but it doesn't stick in memory how to do it. It is so much easier to save the image in same folder as EXE so EXE can access it without hassle of laoding it as DATA in the bas source.

PS, you can do a whole range of colors, make transparent that is, not just one.

I found out that CLEARCOLOR is used after PUTIMAGE

Before or after, use it after get the image loaded into a image handle with _LOADIMAGE.

[bplus]

_PUTIMAGE is both simple and complex, suggest practice with that first and get that down pat. Moving the Enterprise around on screen is excellent!

[Dav]

Here's the one I put together earlier this year that converts an image to code: BASIMAGE

- Dav

[NOVARSEG]

Dav  your code works!
way cool

The ship has a dark background and the photons (er whatever they are) are not showing through.  I'm trying to use CLEARCOLOR to make the background transparent.  Unfortunately the background is not pure rgb 0 0 0 .

bplus says

PS, you can do a whole range of colors, make transparent that is, not just one.

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 rr AS DOUBLE
8. DIM x(1000) AS DOUBLE
9. DIM y(1000) AS DOUBLE
10. DIM x, y AS DOUBLE
11. DIM cx AS INTEGER, cy AS INTEGER, r AS INTEGER, c AS _UNSIGNED LONG
12. DIM rad AS DOUBLE
13. DIM ra AS SINGLE
14. DIM pi AS DOUBLE
15. pi = 3.14159265358
16.  
17. pic& = BASIMAGE1& ': _PUTIMAGE (0, 0), pic&
18.  
19.  
20. DO
21.     ' _LIMIT 10000
22.     a$ = INKEY$
23.     IF a$ = CHR$(27) THEN END
24.  
25.     'toggle full screen mode
26.     IF a$ = " " AND f = 0 THEN _FULLSCREEN: f = 1: a$ = ""
27.     IF a$ = " " AND f = 1 THEN _FULLSCREEN OFF: f = 0: a$ = ""
28.  
29.     stars = INT(RND * 100) + 1
30.     IF stars > 80 THEN
31.         s = s + 1
32.         IF s > 950 THEN s = 1
33.  
34.         rad = RND * (pi * 2)
35.         x = SIN(rad) 'get direction
36.         y = COS(rad) 'get direction
37.  
38.         starx(s) = x
39.         stary(s) = y
40.         x(s) = x
41.         y(s) = y
42.  
43.         'Set size and speed
44.         rr = RND
45.  
46.         'large photon
47.         IF rr >= .5 AND rr < 1 THEN
48.             sz(s) = 1.4
49.             speed(s) = 1 + rr / 170
50.         END IF
51.  
52.         'small photon
53.         IF rr < .5 THEN
54.             sz(s) = 0 'returns the smallest photon
55.             speed(s) = 1 + (rr / 100) + .0016
56.             '1.0016 'slowest value
57.         END IF
58.  
59.     END IF
60.  
61.     FOR t = 1 TO 950
62.  
63.         stary(t) = stary(t) * speed(t) 'accelerate photons
64.         starx(t) = starx(t) * speed(t) 'accelerate photons
65.  
66.         cx = starx(t) + 500 + x(t) * 50 'used to adjust origin of photons to size of sun
67.         cy = stary(t) + 400 + y(t) * 50 'used to adjust origin of photons to size of sun
68.  
69.         IF f = 1 THEN 'fix aspect ratio of photons when in full screen mode
70.             cx = starx(t) + 500 + (x(t) * 50 * .7)
71.         END IF
72.  
73.         r = sz(t)
74.  
75.         c = _RGB32(255, 255 - (starx(t) ^ 2 + stary(t) ^ 2) ^ .5 / 2, 0) ' <<<< yellow
76.         'the square root stuff gets magnitude of position so the photons go from yellow to red
77.  
78.         fillCircle cx, cy, r, c
79.  
80.     NEXT t
81.  
82.     LINE (0, 0)-(_WIDTH, _HEIGHT), _RGB32(0, 0, 0, 20), BF
83.  
84.     IF f = 1 THEN ra = 1.428 'fix aspect ratio of sun when in full screen mode
85.     IF f = 0 THEN ra = 1
86.  
87.     'FOR b = 0 TO 55 STEP .25
88.     ' CIRCLE (500, 400), b, Ink~&(&HFFFFFFFF, &HFFFFFF00, b / 55), , , ra ' <<< adjust to shift color over 50 instead of 500
89.     ' NEXT
90.  
91.     ' _PUTIMAGE (500, 400)-(700, 520), img&, 0
92.     ' _DISPLAY ' <<<<  moved to here so sun is draw over photon formation circle
93.     ' DO
94.     ' i$ = INKEY$
95.     ' IF i$ <> "" THEN EXIT DO
96.  
97.  
98.     _PUTIMAGE (500, 400)-(700, 520), pic&, 0
99.     _DISPLAY ' <<<<  moved to here so sun is draw over photon formation circle
100. LOOP
101. END
102.  
103. 'from Steve Gold standard
104. SUB fillCircle (CX AS INTEGER, CY AS INTEGER, R AS INTEGER, C AS _UNSIGNED LONG)
105.     DIM Radius AS INTEGER, RadiusError AS INTEGER
106.     DIM X AS INTEGER, Y AS INTEGER
107.     Radius = ABS(R): RadiusError = -Radius: X = Radius: Y = 0
108.     IF Radius = 0 THEN PSET (CX, CY), C: EXIT SUB
109.     LINE (CX - X, CY)-(CX + X, CY), C, BF
110.     WHILE X > Y
111.         RadiusError = RadiusError + Y * 2 + 1
112.         IF RadiusError >= 0 THEN
113.             IF X <> Y + 1 THEN
114.                 LINE (CX - Y, CY - X)-(CX + Y, CY - X), C, BF
115.                 LINE (CX - Y, CY + X)-(CX + Y, CY + X), C, BF
116.             END IF
117.             X = X - 1
118.             RadiusError = RadiusError - X * 2
119.         END IF
120.         Y = Y + 1
121.         LINE (CX - X, CY - Y)-(CX + X, CY - Y), C, BF
122.         LINE (CX - X, CY + Y)-(CX + X, CY + Y), C, BF
123.     WEND
124. END SUB
125.  
126. SUB cAnalysis (c AS _UNSIGNED LONG, outRed, outGrn, outBlu, outAlp)
127.     outRed = _RED32(c): outGrn = _GREEN32(c): outBlu = _BLUE32(c): outAlp = _ALPHA32(c)
128. END SUB
129.  
130. FUNCTION Ink~& (c1 AS _UNSIGNED LONG, c2 AS _UNSIGNED LONG, fr##)
131.     DIM R1, G1, B1, A1, R2, G2, B2, A2
132.     cAnalysis c1, R1, G1, B1, A1
133.     cAnalysis c2, R2, G2, B2, A2
134.     Ink~& = _RGB32(R1 + (R2 - R1) * fr##, G1 + (G2 - G1) * fr##, B1 + (B2 - B1) * fr##, A1 + (A2 - A1) * fr##)
135. END FUNCTION
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. END FUNCTION
1451.  
1452.  
1453.  
1454.  
1455.  
1456.  
1457.