Searching \ for 'VB' in subject line. ()
Make payments with PayPal - it's fast, free and secure! Help us get a faster server
FAQ page: www.piclist.com/techref/index.htm?key=
Search entire site for: 'VB'.

No exact or substring matches. trying for part
PICList Thread
'MLIST.VBX missing'
1996\06\25@153016 by nogueira

flavicon
face
I'm very sorry for the MLIST.VBX missing in my ProPic Programmer, but it
is avaible in my home page.


--

Octavio Nogueira
spam_OUTnogueiraTakeThisOuTspammandic.com.br
http://ourworld.compuserve.com/homepages/tato

1996\06\26@043740 by Keith Dowsett

flavicon
face
>I'm very sorry for the MLIST.VBX missing in my ProPic Programmer, but it
>is avaible in my home page.
>
Hi,


  I've just downloaded your pic programmer and the schematic looks good.
How about adding a pcb overlay to the file?

I have a problem when I try and run the software.  It says it can't find
INPOUT.DLL any suggestions?

Keith.
==========================================================
Keith Dowsett         "Variables won't; constants aren't."

E-mail:      .....kdowsettKILLspamspam@spam@rpms.ac.uk
Phone:       0181-740-3162
Fax:         0181-743-3987

Snail mail:  MRC Clinical Sciences Centre, Cyclotron Unit.
                Hammersmith Hospital. London W12 0NN.

'MLIST.VBX missing, InpOut.DLL replacement'
1996\06\26@062955 by Antti Lukats

flavicon
face
part 0 985 bytes
...[snip]...

>>I'm very sorry for the MLIST.VBX missing in my ProPic Programmer, but it
>>is avaible in my home page.
>>
>Hi,
>   I've just downloaded your pic programmer and the schematic looks good.
>How about adding a pcb overlay to the file?
>
>I have a problem when I try and run the software.  It says it can't find
>INPOUT.DLL any suggestions?

I just wrote it (even as I am not the author...) the compiled version
is attached, I suppose it should work, I only sent it to help those
who cant wait until mister noguiera puts it on his web page :)

Full source of missing InpOut.DLL (Borland Pascal 7.0)

---------- chop -----------
Library InpOut;

Function Inp(a: Word): Byte; Export; Begin Inp := port[a]; End;
Procedure Out(a: Word; data: Byte); Export; Begin port[a] := data; End;

Exports Inp, Out;
Begin End.
---------- chop -----------

have fun folks!

antti


Attachment converted: wonderlandthree:INPOUT.ZIP (BINA/mdos) (00005A8A)

1996\06\26@065316 by Kalle Pihlajasaari

flavicon
face
Hi Antti,

> >I have a problem when I try and run the software.  It says it can't find
> >INPOUT.DLL any suggestions?
>
> I just wrote it (even as I am not the author...) the compiled version
> is attached, I suppose it should work, I only sent it to help those
> who cant wait until mister noguiera puts it on his web page :)

Very cunning of you to take the initiative.

Minun pitaa viella kirjoitaa sinulle vahan tarkempia vastauksia
edellisita kahdesta viestista.

Yksi asia josta voin antaa vahan uutta tietoa on se NitPIC
kieli.  Se kirjoittaja sano faxanneen PRoforma invoicein
minulle (joka ei ole tullut perille) jossa silla on oletettavasti
kysymys demo versiosta.  Han on nyt Kapkaupungissa ja en pysty
otaan yhteytta ennenkuin huomenna varmaan.  Selitan uutisia
kun kuulen tai naen.

Ala vastaa viella tahan eika seuraavaan vastaukseen niin saadaan
'back-log' poin viesteista.

Sinum systeemi aika on vahan vaarassa ja panee sinun viestit
vanhaan paahan listasta.

Cheers
--
Kalle Pihlajasaari     kallespamKILLspamdata.co.za
Interface Products     Box 15775, Doornfontein, 2028, South Africa
+27 (11) 402-7750      Fax: +27 (11) 402-7751

'MLIST.VBX missing, InpOut.DLL replacement OOOOOPPP'
1996\06\26@065323 by Kalle Pihlajasaari
flavicon
face
Sorry about the previous message, intended to be a direct mail message.
--
.....kalleKILLspamspam.....data.co.za

'VBRUN300.DLL'
1996\06\29@073851 by nogueira

flavicon
face
For all of you that don't know where to find VBRUN300.DLL, i've put
it in my home page.

Octavio
--

Octavio Nogueira
EraseMEnogueiraspam_OUTspamTakeThisOuTmandic.com.br
http://ourworld.compuserve.com/homepages/tato


'[OT] VB3 or Does Anyone Really Know What Time It I'
1997\10\14@120155 by KcW
flavicon
face
Here's a problem and fix I ran into writing a control package (yes, with a
PIC) with VB3 in Win3.11. I set up a couple of timer controls to perform
some scheduled events. Sometimes it worked, sometimes it didn't. OK, try
this: create a form with a control group of 10 timers with an interval of
100ms. Add a control group of 10 labels. In the timer events have each time
update a count in it's own label everytime the timer event occurs. When you
run the program you might expect all the counts to be reasonably close.
Such is not the case. My problem, as illustrated, is that Windows places a
low priority on timers and, as such, they are not necessarily serviced all
the time. The result is what you saw, some timers are serviced consistently
and some not often at all. OK, so what to do? This is where the good folks
at DesaWare come in. The have a high priority timer control that, when used
in the demo above, are serviced regularily and all counts match. You are
not limited to 10 timers either. Thanks DesaWare! The moral: use the
DesaWare timer or don't use a lot of timer controls in your apps. Note that
this is not an issue in Win95 or NT.

Regards to all,
KcW

1997\10\15@074101 by Mike Smith

flavicon
face
-----Original Message-----
From: KcW <kcw.kcwccspamspam_OUTSYMPATICO.CA>
To: @spam@PICLISTKILLspamspamMITVMA.MIT.EDU <KILLspamPICLISTKILLspamspamMITVMA.MIT.EDU>
Date: Wednesday, 15 October 1997 1:33
Subject: [OT] VB3 or Does Anyone Really Know What Time It Is?


{Quote hidden}

Alternatively, use the multimedia timers for better resolution and priority.
I don't know how you get to them from VB though - I'm using C++, but the
problem with WM_TIMER messages is there too.

MikeS
<RemoveMEmikesmith_ozTakeThisOuTspamrelaymail.net>

1997\10\16@101623 by paulb

flavicon
face
KcW wrote:

> Here's a problem and fix I ran into writing a control package (yes,
> with a PIC) with VB3 in Win3.11. I set up a couple of timer controls
> to perform some scheduled events. Sometimes it worked, sometimes it
> didn't.
 ...
> My problem, as illustrated, is that Windows places a low priority on
> timers and, as such, they are not necessarily serviced all the time.
 ...
> Note that this is not an issue in Win95 or NT.

 I wouldn't be too sure!  I migrated from WIN31 to WIN95 because I
found the latter serviced (comms) IRQs in dos programs whereas the
former simply DIDN'T, particularly when a program was running in the
background.  And this on the same machine.  Obviously WIN31 contains
certified faulty code, but whether '95 is unreservedly fixed in this
regard (it still fails on a certain proportion e.g. 10^-4 of background
interrupts) is moot.

 Note:  I am referring to DOS window events, whereas the VB matter is
about native Windoze calls but, ... one has to wonder.

 Cheers,
       Paul B.

'WWVB to Logic Chips'
1997\10\19@125300 by brooke.nospam

flavicon
face
I would like to build a clock based on the time code from WWVB
(not a TRF type receiver that uses the carrier).  I am looking
for an IC that outputs the time code so that I can use a PIC to
then drive either an LED or LCD display.

Thanks,

Brooke

**** remove ".nospam" from my email address *****

1997\10\20@110624 by Mike Keitz

picon face
On Sun, 19 Oct 1997 09:51:29 -0700 Brooke <spamBeGonebrookespamBeGonespampacific.net> writes:
>I would like to build a clock based on the time code from WWVB
>(not a TRF type receiver that uses the carrier).  I am looking
>for an IC that outputs the time code so that I can use a PIC to
>then drive either an LED or LCD display.

Start with a conventional shortwave radio reciever.  Unless you want to
recover the 5 or 10 MHz carrier frequency there is no need to do anything
with the RF part. The time code is a 100 Hz subcarrier with on-off
modulation at I think 1 second or 1/2 second periods.  It comes out of
the AM detector as a 100 Hz audio signal.  The receiver may filter most
of a 100 Hz signal out of the speaker output.  You may need to modify it
for more low frequency response or take the signal output from a point
inside.

The first stage of processing would naturally be a 100 Hz bandpass
filter.  It should have about 10Hz bandwidth to follow the modulation.
An MF10 switched capacitor filter would work well.  Follow it with an
envelope detector and lowpass filter.  A slightly better design would use
another filter with very tight bandwidth so it "rings" at the 100 Hz
carrier frequency and drives a synchronous demodulator.  You could also
try a PLL.  All these designs may need AGC.  Unless you live in Fort
Collins, Colorado, there will be times when no WWV signal reaches you.

I don't think there are any chips dedicated to this purpose.  It is easy
enough to use conventional op-amps or whatever you prefer to process a
100 Hz signal though.

1997\10\21@010032 by Adi

flavicon
face
Hi!

What frequency were you planning on receiving? WWVB is on
60kHz, isn't it?

Regards,
Adi


>I would like to build a clock based on the time code from WWVB
>(not a TRF type receiver that uses the carrier).  I am looking
>for an IC that outputs the time code so that I can use a PIC to
>then drive either an LED or LCD display.

'[OT] VB3 or Does Anyone Really Know What Time It I'
1997\10\21@064509 by Kahn-Syd

flavicon
face
It is said that the PC only has 16 timer channels - using 10 controls in VB
might be OK for your machine - but one another there might not be that many
available.  Why not just use one and update all ten - that would definately
keep everything in sync.

In VB I like to keep all that I can in one routine - easier to make updates
in one place instead of ten....

my $.02
Syd


{Original Message removed}

1997\10\21@090438 by KcW

flavicon
face
Actually, uh..., the idea was to not to make a label updating program, but
to show an example of how multiple timers do not get serviced regularily in
VB3/Win3.1x due to the prioritization of software interrupts. Further, to
point to a simple solution and perhaps help someone who might not be aware
of the inconsistency. Perhaps I should have made that a little
clearer....but hey, if I ever need a label updating program I'll be sure to
use your suggestion:)
KcW

----------
> From: Kahn-Syd <TakeThisOuTklassEraseMEspamspam_OUTSUN-LINK.COM>
> To: RemoveMEPICLISTspamTakeThisOuTMITVMA.MIT.EDU
> Subject: Re: [OT] VB3 or Does Anyone Really Know What Time It Is?
> Date: Tuesday, October 21, 1997 3:45 AM
>
> It is said that the PC only has 16 timer channels - using 10 controls in
VB
> might be OK for your machine - but one another there might not be that
many
> available.  Why not just use one and update all ten - that would
definately
> keep everything in sync.
>
> In VB I like to keep all that I can in one routine - easier to make
updates
> in one place instead of ten....
>
> my $.02
> Syd
>
>
> {Original Message removed}

'WWVB to Logic Chips'
1997\10\22@223700 by brooke.nospam

flavicon
face
Yes. 60 kHz is the carrier frequency.
NIST is in the process of increasing the power of WWVB
from 13 kW to 40 kW so that people on the East Coast
well have a good signal (I think > 100 uV/m).

Brooke

1997\10\24@003135 by Adi

flavicon
face
Hi Brooke!

I've been looking into the same idea. First I'll have to get a bit
more involved with PIC programming. Years ago I built a receiver for
the DCF77 signal. DCF77 is a time signal on 77.7kHz transmitted in
Germany. It's coding is virtually identical to WWVB. I did the
software on a single board 6502 system. The RF section had a ferrite
stick antenna, a tuned RF amplifier and a 77.7kHz filter crystal.
I've looked into this stuff again the past couple of months and I
have two ideas. One would be a conversion receiver with a mixer and a
455kHz ceramic filter. I have plenty of parts from discarded cordless
phones. The other idea is a direct-conversion receiver. It uses a
doubly balanced mixer and a BFO. I think the last one is what I'll be
persuing. First, though, I'll be getting more involved with PIC
programming...

Regards,
Adi

> Yes. 60 kHz is the carrier frequency.
> NIST is in the process of increasing the power of WWVB
> from 13 kW to 40 kW so that people on the East Coast
> well have a good signal (I think > 100 uV/m).
>
> Brooke
>

1997\10\27@220730 by Eric Johnson

flavicon
face
Hi,
       For what it's worth, Heartland (I'm not associated with them) has a WWV
clock for $70.  They have a couple different versions- one analog and one
digital.  I don't know what microprocessor they use though.
<http://www.heartlandamerica.com/dprod46.html>

Eric Johnson.

>I would like to build a clock based on the time code from WWVB
>(not a TRF type receiver that uses the carrier).  I am looking
>for an IC that outputs the time code so that I can use a PIC to
>then drive either an LED or LCD display.

1997\10\28@001627 by Todd Erickson

flavicon
face
RadShack has 'em too but for 40 bucks.  I have one and it's right on
time...works like a clock!  Seriously, the clock really works well and
locks right onto the wwv signal.


Todd Erickson
z008876bEraseMEspam.....bcfreenet.seflin.lib.fl.us


On Mon, 27 Oct 1997, Eric Johnson wrote:

> Hi,
>         For what it's worth, Heartland (I'm not associated with them) has a
WWV
{Quote hidden}


'O.T. Re: WWVB to Logic Chips'
1997\11\04@143723 by Martin McCormick
flavicon
face
       It has been a couple of weeks since this topic was discussed, but
I think I should add a bit.  "QST" which is the magazine published by the
American Radio Relay League has had articles from time to time about time
and frequency standard stations.  I detect a slight bit of confusion, here.

       The HF time signal stations of WWV and it's sister, WWVH in Hawaii
do use the 100-HZ carrier method for sending the time and date to receivers
capable of receiving it.  It takes a whole minute to receive a frame of data
which is clocked out at one bit/second.  The signal is mixed in with the
voice announcements, standard frequency tones, and ticks indicating the
passage of seconds.  These transmitters are meant to be heard by the human
ear as well as mechanically received.  The same is true for Canada's time
and frequency station, CHU.  It transmits voice time announcements, ticks,
and a binary time update in the form of a 300-baud Bell103-style data burst
sent each second between about the 31ST and 40TH seconds in every minute.

       Both the U.S. and Canadian short wave time services take at least
a minute to automatically update clocks so I would put my money on the
WWVB signal if one can receive it.  It should provide complete updates almost
continuously since its binary code is constantly being sent and is not
time-shared with voice.  WWVB should also not be quite as susceptible to
the random Solar flares and daily/seasonal changes in signal propagation that
plague short wave signals.  The same holds true for the other VLF time
signal transmitters around the world although I have no idea as to whether
they all use different digital data formats.  Even if they do, the signal
propagation characteristics should be the same so they all represent a good
technical solution for automatically synchronizing clocks.

Martin McCormick


'Vbe, PIC pins and LEDs'
1998\05\01@011711 by Mark G. Forbes
flavicon
face
Something I've done which works really well is this:

If I need to sink a medium-current sort of load to ground,
I use a ZTX849 NPN transistor (Zetex, great part!) and
put a series LED in the connection between the PIC pin
and the base of the transistor. This seems to work
adequately for most kinds of loads, though you'd probably
want a 10K base/emitter resistor to handle leakage currents
for very light loads.

The LED provides an extra 1.5-2 volts of drop, and *I don't
use a base resistor at all*. I rely on the PIC's natural
current limiting, coupled with the couple-or-three volts of
LED and Vbe that I've already got out there. As an added
bonus, I get a visual indicator of whether it's 'on' or not.

Mark G. Forbes, R & D Engineer  |  Acres Gaming, Inc.    (541) 766-2515
KC7LZD                          |  815 NW 9th Street     (541) 753-7524 fax
EraseMEforbesmspampeak.org                |  Corvallis, OR 97330
http://www.peak.org/~forbesm
RemoveMEmforbesEraseMEspamEraseMEhq.acresgaming.com

"There has been an alarming increase in the number of things I know nothing
about."
---Anomalous

'=?iso-8859-1?B?zvLi5fI6ICAgICAgTVBMQUIzLjQwIG1jaGl'
1998\05\01@104926 by Alex Torres

picon face
From: "Alex Torres" <RemoveMEaltorspam_OUTspamKILLspamgeocities.com>
To: "pic microcontroller discussion list" <RemoveMEPICLISTTakeThisOuTspamspamMITVMA.MIT.EDU>
Subject: =?iso-8859-1?B?zvLi5fI6ICAgICAgTVBMQUIzLjQw?=
Date: Fri, 1 May 1998 14:33:57 +0300
Message-ID: <01bd74f5$07bd54e0$LocalHost@Pal>
MIME-Version: 1.0
Content-Type: multipart/mixed;
       boundary="----=_NextPart_000_0002_01BD7523.99560AE0"
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 4.71.1712.3
X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3

This is a multi-part message in MIME format.

------=_NextPart_000_0002_01BD7523.99560AE0
Content-Type: text/plain;
       charset="iso-8859-1"
Content-Transfer-Encoding: 7bit

From: Mike DeMetz <EraseMEmikedspamspamspamBeGoneELKHART.NET>


>Anyone know how to extract the cool background Microchip logo that
>shows during install?

See attach.

==================================
Alex Torres, Kharkov, Ukraine (exUSSR)
RemoveMEaltorKILLspamspamgeocities.com
2:461/28 FidoNet
http://www.geocities.com/SiliconValley/Lab/6311

------=_NextPart_000_0002_01BD7523.99560AE0
Content-Type: image/jpeg;
       name="mchip.jpg"
Content-Transfer-Encoding: base64
Content-Disposition: attachment;
       filename="mchip.jpg"

/9j//gAnRmlsZSB3cml0dGVuIGJ5IEFkb2JlIFBob3Rvc2hvcKggNC4wAP/gABBKRklGAAECAQBI
AEgAAP/tF9ZQaG90b3Nob3AgMy4wADhCSU0D7QAAAAAAEABH/7QAAgACAEf/tAACAAI4QklNA/MA
AAAAAAgAAAAAAAAAADhCSU0ECgAAAAAAAQAAOEJJTScQAAAAAAAKAAEAAAAAAAAAAjhCSU0D9QAA
AAAASAAvZmYAAQBsZmYABgAAAAAAAQAvZmYAAQChmZoABgAAAAAAAQAyAAAAAQBaAAAABgAAAAAA
AQA1AAAAAQAtAAAABgAAAAAAAThCSU0D+AAAAAAAcAAA/////////////////////////////wPo
AAAAAP////////////////////////////8D6AAAAAD/////////////////////////////A+gA
AAAA/////////////////////////////wPoAAA4QklNBAAAAAAAAAIAAThCSU0EAgAAAAAABAAA
AAA4QklNBAgAAAAAABAAAAABAAACQAAAAkAAAAAAOEJJTQQJAAAAABZIAAAAAQAAAIAAAAB5AAAB
gAAAtYAAABYsABgAAf/Y//4AJ0ZpbGUgd3JpdHRlbiBieSBBZG9iZSBQaG90b3Nob3CoIDQuMAD/
4AAQSkZJRgABAgEASABIAAD/7gAOQWRvYmUAZIAAAAAB/9sAhAAMCAgICQgMCQkMEQsKCxEVDwwM
DxUYExMVExMYEQwMDAwMDBEMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMAQ0LCw0ODRAODhAU
Dg4OFBQODg4OFBEMDAwMDBERDAwMDAwMEQwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAz/wAAR
CAB5AIADASIAAhEBAxEB/90ABAAI/8QBPwAAAQUBAQEBAQEAAAAAAAAAAwABAgQFBgcICQoLAQAB
BQEBAQEBAQAAAAAAAAABAAIDBAUGBwgJCgsQAAEEAQMCBAIFBwYIBQMMMwEAAhEDBCESMQVBUWET
InGBMgYUkaGxQiMkFVLBYjM0coLRQwclklPw4fFjczUWorKDJkSTVGRFwqN0NhfSVeJl8rOEw9N1
4/NGJ5SkhbSVxNTk9KW1xdXl9VZmdoaWprbG1ub2N0dXZ3eHl6e3x9fn9xEAAgIBAgQEAwQFBgcH
BgU1AQACEQMhMRIEQVFhcSITBTKBkRShsUIjwVLR8DMkYuFygpJDUxVjczTxJQYWorKDByY1wtJE
k1SjF2RFVTZ0ZeLys4TD03Xj80aUpIW0lcTU5PSltcXV5fVWZnaGlqa2xtbm9ic3R1dnd4eXp7fH
/9oADAMBAAIRAxEAPwDqKKKDj1H0qyTWwk7G/ujyRPs9H+ir/wAxv9yWPP2amP8ARs/6lqKGlcnw
929aP7PR2pr/AMxv/kU4xsfvVX/mN/8AIqb3srrdbY4V11gue9xhrWj85ziuV6t9brbS6jpU1VcH
KcP0jv8AiGO/mWf8I/8AS/8AFq98P+Gczz2TgwQ9Mfnyz9OHF/fn+9/Uh+sY55BEa/Y72fmdI6c2
cz0q3HVtQYHWH+rU1u9c/mfW1hJbgYFTW9rchrST8Kao/wCnaufJJJe4lznauc4kuJ/lPd7nKBf4
LsOT/wCK/I4QDn4uayf1/wBXh/wcUP8A1LkytaWaR29Lev6z1O76d4rb3ZVXXWP+izd/0lSddcSS
62xxPi9x/ihkknxThp7rWhy/K4hWPDix/wCzxwh/0YsZkT1JZtvvaQ5ltjSPBzvx1WlgfWTqGJcx
123Moaffj2srkt/4O3ZvY/8AcWUWnsk0Odo0EkdgJQyctyuaJjlw45givVCPF/gz+eH96CRIjYkP
qWBd0rqOIzMw66n02aa1tDmuH06rWbfZaxWPsuL/AKCr/ttv/kV5p0brWX0fLN9HvrfAycYmG2NH
/nu9n+Ct/wC+L0jAz8XqOIzMxH76bPHRzSPpV2N/MsYuM+LfCZ8lk4o3Plpn9Xk6xP8Amsv+s/8A
Sv8Ajwx2ITEvNn9lxf8AQVf9tt/8il9lxf8AQVf9tt/8iipllr0f2XF/0FX+Y3/yKq9Tx8dvTctz
aa2ltLyCGNBBjt7VfVXqv/JWZ/xD/wAiVbqf/9Dr8X+i0f8AFV/9Q1Tssrpqfdc8V1VtLrLHaBrR
9JzlHE/ouOAP8FX/ANQ1cn9bOsHKyD02h042O79OR+fcPzP+Lxv/AD//AMUsb4Z8Nnz3Mxwx9MR6
8uT/ADeIb/4cvkxtmc+GN/Y0+uddt6tZ6bAasCsg1UnQuI+jfkfyv9HV/gv+MWSX+CTz27ImLQyz
dbb/ADTO07Q4xu9z/wAytjRvtcvQsOHDymGOLDAQxw+WI6n96X705fpTahJJsoCZ8ynDT3W5Z9Xu
purbYylg3t3NocW1vI7baXbtj/8Ajrv8xZzKBvcxzSyyslr63Aggjlrmu+ioo85jy8XtzjPh+bgl
GfD/AHuFBBG4a7aydAEevG7lWGVdmiSrdWDY/nQKOebuaU5xxQTM7WjUnyWtgdAuvx2X23NxWWjd
VU4PLtp+hdZ6L69vqfTrr/c+n+4ot6aLc2jAcZbed15Hamsepf8A57f0P/Xl0lkueXdz2HA8h/VW
b8Q5/JiEIYjU5DjMq4uGHyx+b9+XH/4WvhC9S8j1Xp9+JaKs0b2vBdTkM9+5jfpPqtAZ9obX/h8e
xv2mj/hKveh9J6tm9AzfUb+lx7QPWqB9trPzbKnf6Rn+Df8A9bXXW1U30OxcppfjvIcdph7Hj6GR
jv8A8HfWuX6l0yzAsNGQPVxbJsqtrEBzR9PJxmD+btq/7X4P/X6P0P8AMzclzuPm8UuXzxBMhU8R
+XLD9/H/AF4/+vsf+qUomJsPf4Obi5+LXl4j/UosGh4IP5zLG/mWM/PajggrzTpXVcz6v5u9n6bG
ug21A+y1n5t1TvzbW/mP/wCt2L0XCzcXPxWZeI/1KbODwQfzmWN/MsZ+6ue+J/C58lMTjeTl8h/V
5P3f9Vl/1n/pT/HxwmhMSHinVTqxjpOb/wARZ+RW5VPrH/JGd/4Xs/Is6Rtc/wD/0eg6j1E9O6Az
JrMXOpqqx/8AjHsbDv8ArTd1q4P6IiSSe51J8ytv6z5nqu6fhNPsxsWux4/4S1jef6tLP/BVhvK1
/wDi7yYwcjHIRWTmT7sv9n8uCP8Aifrf+rJyyuVdtEbj/r5roug9OFmZVVYP0OKPWyD2JaQ/Z/ay
PTb/AOgtyxcGsvyN5G5tI3x2Lp21M/tWlq7LpGP9m6WHkzbmnfu7+mP5r/tyfW/6+pPjHNe1gkAf
VL0Dznv/AIsP+etgLl5NqfUe6yw6uMwqXVukN6iPtGMBXnVNhrjo2xo/wN7v/PN3+C/4pXq2g6wr
+PQ6A5x2hc1y854pDJA8Mh/zu8ZD9yTNLUavJdLFd29ljPTyKXbLq3iHNcOz2rT9JoIHP5FZ6z0Y
22DPwS1mZWNrS7Rljf8AuJlfyP8AuPf/ANp/+KWdRlPtrcxodW4E1uZZpZVYPpY94/fb/g3/AOGr
WzDNHNHjjoR88P8ANn/1XL9CTFVaNzpWM2zMycx30Xu+zUn/AIKk78h4/wCOy/0f/oMtG2n9wadi
VndHywdmBYBVlUgisDRtrQZ9v/D6+9n+EW3VYyxpEe/vKzeZ4jmnxijfp/2Q9OOUf70Y/wCOuB0D
mvrcNShWU05FDsbIBNLiHgtMPrePoZGO/wDMuZ/01oXV+6FUc0gwVBrGQlEmMomwRuu3eQ6l05+B
YcbJAfjvBsqtrb7Y/PysVn5u3/tfg/4D+dq/QqHR+r5nQsyR+lx7INtQPssZ+bbU7/SfuWf567C7
HpyqDjZAJqJDgWmHsePoX0P/AMHcz/zCxcj1PpluDYaLwHUu3PqtY2GkD6eRjs/Mb/3Owf8AtP8A
z9P6uug5LnMXN45YM8RIyFZMZ+XLH/OQ/dn/AOxMbHKJibD6Fh5mNnYzMvFf6lNnB7g/nVvb+bYx
C6yf8jZ5/wC69n/Urz/pPV83oWWbKx6lFkfaMafbY3822p30W27f5u3/AD13GbnYuf8AVvMy8N/q
0WY1sHgghvursb+ZYz89q574r8JnyUxKJM+WyH9Xk/d/1eT+v/6UZYZOIeL/AP/Sy8+/7Rm2XdiG
Mb5Cuuunb/4Gqb3SUV+n5fmdUOphsuYzjcYXVYQIcviA+WOOER/dhBYdynw7Nm+sgH1RGpI1Hbc3
3N+ku5xsunqeOMjGBYa/0dmMY3VGJ9F0f+BP/wAPWuRs6Tk/YT1THZuxq3Oa9o1eGMOx2Tt/0Lbd
1T/6nqfzaP0/LuZa3KxHBuSwbSHfQtZz6F4b+b/o7Pp1P/SVrK5/l4c3DihL14zKG/pjk/TxZY/o
/oLonh36vX0tL428d1otrLG8bj4nhZeBm0Z9P2rFBbY07cjHdG9j+dj4/wDA7W/o8hi1aHttZuB4
0hYfCYkxkDGUdCCyE2sWPM7jz2Wb1Xoz7YzsINGW1oY5rtK7mD/tNkH83b/2myPp43/ErXLYI8uU
7QBIJ9p8U+EpQkJRNSH8uGX9Va8kK6uo0b2bmW1uLCHe22u1n0qbf3Mqn/wZiu9N6lZdYMXJIGc3
6D+G3gf9Tk/vM/wiP1fpbnWnP6ft+2BoZYxx2V5LG/Qovd/g7mf9o8v/AAH83Z+gWRaaOoVF7Q5l
rXbXB422Mtb9Km9v+Byq/wDwX+crV6sfMY+1f4U8Ez/08U//ABz/AGv82tv5bvSGwWNB+Xz81Vsb
7iVU6Z1R9tjcbL/pTvax50F8D6P8jNY3/wBiGfy1csaRry08FZ+XFLHLhkNfD5ZD96P9VMfBgNE1
+LVl0nHvaXMcQ4bTDmvb9C6l/wDg7q/zX/8Abn6NSA1RWNkqOJlEiQJjKOoI3XF4jqfS7cGz0LY2
Ol2Pc0bWOj6ZY3/A/wDdrE/7T2fp6P1b+brYObkYH2mpri3Hy6n05VJ4JLXNrsaP9Mx35/7i9Byu
n0Z2M+i9pcx8EgGHBw+hbU//AAd9f+Df/wBbs/RLher9JysHJGLYNxsa91F4ENsrY1z36f4Oyprf
01P+B/4h9S3+X52HNcrmw5gOP25mQPyy4Y8XuR/u/P8A1P5xjIogh//Txran1Wuqf9Jp1/tAWN/6
L0+FRbbktroE2vIrqH8uw+mz+y2d71ofWLGdRn02kDbmYmPeI8fTZRZ/55V76oYBtyLc0j24w2Vn
/hbQR/nUYm93/oQxdDPmow+HRz6H9VDT/WcPDwf+G+hbVyrxeipqbi11U45/RY7RXX5taNu53/G/
T/trm+t9DOEX9U6YyMUHdlYzeaT3upH/AHF/fZ/2n/4n6HWOp2sE6IYLq372GCFzHKc3kw5TMHjE
/wCdjLbKP639f93J+gzSiCKeTwsq0OHUMJwbfW2LWnVj6zrtta36dLv+3KP5+pdZ07qFWbV9pxZZ
Y0huRQ4gua6J2Pj2+5vupub+jyK1zfWOlHpVn7Y6YNuIXD7TjDipzjt31f8Adax5/m/8D/xSdhso
ezqXTyGEN9zXSWbD7nUXNb9PEe7/AK5i2fpqVq58WLmYRyYzvpCR3jIfNgzf3WMWNC9q17XtDm69
o8Pimc093Bv4lZ3T+oVZ9JvolljCG30OIL2Oidj9vtfvb7qL2/o8mtaFT63AHn4rMlGUSYyFSGhB
SsKwZ2tLydCXcfcsnq/RbnP+24O0ZoaGua4xXexv0cbKP5r2f9pMv6dH83/NLZdkNaNNVVuvcQZ+
5HHkljkJROo/xZR/dkP3VPM+tg59RZYHVvB9O+l/strsaZgkfQupf767G/8AGK90vqj7bz0vPcDn
CfRu0AyWgfS/kZzG/wA7X/2o/nK1R+srKT1KtlbYym1MrutGhc57vUprf+/9mx67Hb/5z9PT/g1k
Zzhc8+4jaQWPaYc1zfoWMd+Y9rvctYYYZ8ceIGImOOP6U8Uj+lH96Mv/AB3H/X+Rt0XtGjXTXwVi
pnjysX6v9dHU3DDzHBvU2j2vENbktA1ewfRZmMb/AD1X+F/nav8Ag+hpbKyc+CeGZhMa7gj5Zx/e
h/VXg3qlpr1EBVvrFjUjoXUbS3c9mLc5hOu13puZvZ+6/Y7ZvWlRXpKqfWYR9W+qH/upd/1DlDW/
kVP/1Nf61dPOR9Vun9QY3db0+ipzwBJNL6623N/sP9O1avQ+mnp/TKMV389Bsvj/AEj/ANJdr/wf
so/6ytLpYB6XhSJH2aka/wDFsVhlVbNGtACry5vJLlocsfkxzlMf4W0P8GXuT/w14Au2hYx+v8FW
fXHK1Lm+GnwVK5sAk9ue6iiE24n1hvZR0TKaecqMapvi553vd/1qljn/AOYsHEy30Na0GWtEQp/W
zO9XqbcNpmvp7djo4N74syD/ANbb6VH9ixZdeT2K6Pk+WMOVgCNZ/rZf9U+T/wAbjBikbLt1XOou
GbgODHsEPrdJbsJ3PqtY33W4b/8At3Es/T0fy+jws6nPpORRLXtIbfS4gvY8jcGPLfa/f9PHvb+j
ya/5a4qq8ghzHbXDUEK5jZV1F7crDIZkMBa6sj9G9h9z6XtH0qX/AEtn06LP02Omcxyoyx7THyz/
AO4n/U/6CBJ68vJ4080zX1MLrrnbaaGutteezWDe4/ggYWXR1LG+1YwIg7bqnGX1P/0d23/wG76F
9apfWXKGLgDDGt+WQ57Bz6LD3/8ADN/p0M/f/WP9HYszHy85ZxhkDE3U/wCrEfNL/FX3pbhW5Nl1
t+ZaNttjnHaez7Ic9v8A6DY4pxP+tqjdZDfyJsjI2xU07tn0neLj7rHf5yqPsLuSughj8KHT+6xr
FxBDgS1wIc1zSWua4GWvY9vua9n7y7z6q/WdnVC3BznBnU2j2WcNyGt5e1v5uUxv89V/hP52n/gu
A5KIGwAQS1zSHMe0kOa4atexw+g9qlz8nj5jFwT0I1hL9KEv5fNFQNPtdJBbB0cOR/FZ/wBadPqz
1U/907/+ocgfU/N6l1Ho9WZ1FgbYS5tdo09asRsynV/4L1P/AAX+fr/R2o/1s/8AEv1b/wAJ3/8A
nt65jLhOKc8cqJgTE8Oo0ZLf/9Xv+k/8lYX/AIWp/wDPbFbVXpA/yTg/+Fqf/PbFbIVPh1K9g9u5
sfkWV1bNZ03CuzngEY7d4afznztx6v8Arl5YtgBcV/jEflsbi1CpwwS83XZESz1APTooe4fQ2zZb
+k9m9WuR5cZ+Yx4z8sjcvGMfVKP+H8qCaDxLnWucX2OL7HEusceXOcd9jz/WeUg7xRCAeVF1fguw
MAWJk2xzdQUevKIOuhHcKnBBTh3ioZ4Qh1KuqejcL6nWU3gbTbS4tLm87H7S3cz+Qg5fUTc91gL3
2v8ApXWu3O429y9znbPYx73/AKNn83sVEu8E0EoRwC7+n0Ta5d4JgJ81MM8VICXNYwFz3naxjQXO
cT+bWxsve7+qpxABTFrPFdH9U/qo/rdozMtpZ0qs/A5Dgf5qv/us3/DW/wCE/mav8KtD6vfUC68t
yuuj0qdC3BB97/8Aw29v0Gf8BV/12z/BLvq62VsbXW0MYwBrGNEAAaNa1o+i1qzee+JRgDjwSuZ0
lkHyw/uf1/6yQFNY1jQxgDWtENaNAAOwCyvrdp9Vurn/ALpX/wDnt611j/XD/wASnWP/AAlkf+e3
rCpc/wD/1vQejtP7IwZB/o1Pb/g2K5tcex+5fOI+gz+q38ikFV0vqvfo4NPgU7qmvYWPaHMcIc1w
kEHkOBXziknivFT7N1X/ABe9LySbOnPd0+067GjfST/xDtvp/wDWbK/6i5fO+pX1kwpIxhl1j8/G
cHH/ALZt9K3d/U9RcCnPC6Hkv9J8I4uHg6feb4v+Z+u/x2M8L1N3Tuo0yL8PJqju+mxo/wA4s2Ks
6l/7p+5Zl/8ARGfArIP0j8T+VXxLma9WPF/g5Z/+qEaeL1leLkWfzdNln9Rjn/8AUNcr+N9Xev5L
g2jpuRJ4dYz0R/nZPpLkOn/SHxP8EbO/nygZc3+hDCP7+TJL/o4oK08X0jp3+LjqFpD+pZLMZnJr
o/SWfA22BlVf9mu9df0j6udI6OJwqALiIfkP99rvja76Lf8Ag69lS8ASWTz3+kKPu/zX+q/mv8Lh
/wDUqRwv0kkvm1JZuqdH6SWR9cAT9VOsR/3ByP8Az09eCKNv8zZ/UKWqtH//2ThCSU0EBgAAAAAA
BwABAAAAAQEA/+4ADkFkb2JlAGSAAAAAAf/bAIQADAgICAkIDAkJDBELCgsRFQ8MDA8VGBMTFRMT
GBEMDAwMDAwRDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAENCwsNDg0QDg4QFA4ODhQUDg4O
DhQRDAwMDAwREQwMDAwMDBEMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwM/8AAEQgCfgKiAwEi
AAIRAQMRAf/dAAQAK//EAT8AAAEFAQEBAQEBAAAAAAAAAAMAAQIEBQYHCAkKCwEAAQUBAQEBAQEA
AAAAAAAAAQACAwQFBgcICQoLEAABBAEDAgQCBQcGCAUDDDMBAAIRAwQhEjEFQVFhEyJxgTIGFJGh
sUIjJBVSwWIzNHKC0UMHJZJT8OHxY3M1FqKygyZEk1RkRcKjdDYX0lXiZfKzhMPTdePzRieUpIW0
lcTU5PSltcXV5fVWZnaGlqa2xtbm9jdHV2d3h5ent8fX5/cRAAICAQIEBAMEBQYHBwYFNQEAAhED
ITESBEFRYXEiEwUygZEUobFCI8FS0fAzJGLhcoKSQ1MVY3M08SUGFqKygwcmNcLSRJNUoxdkRVU2
dGXi8rOEw9N14/NGlKSFtJXE1OT0pbXF1eX1VmZ2hpamtsbW5vYnN0dXZ3eHl6e3x//aAAwDAQAC
EQMRAD8Aq9N6bRl0Ostc5pDy0bS0CAGn87+srf7Cw/37P85nPYcJugmMN+sfpD38Gs/lN+j+ctOf
P5Tr8PprVhGJiDTycpSEiLc39hYX+ksjsdzOPHhN+wsP9+z/ADmf2u35i093n850+P00p8/x8P7f
5n56dwR7I45d3N/YWH+/Z/nM57DhL9hYX+ksjsdzOPHhaU+fynX4fTS3efznT4/TS4I9lccu7mfs
LD/fs/zmf2u35if9hYf79n+cznsOFpT5/j4f2/zPz0p8/lOvw+mlwR7K45d3N/YWF/pLI7Hczjx4
TfsLD/fs/wA5n9rt+YtPd5/OdPj9NKfP8fD+3+Z+elwR7K45d3N/YWH+/Z/nM57DhL9hYX+ksjsd
zOPHhaM+f4/+Zp5M6mO8z4/nfT+ilwR7K45d3M/YWH+/Z/nM/tdvzE/7Cw+A+wmCYlk/kWnqImZ4
gnv9ID6f/naWhkF0iPEHSA3dtd/nuS4I9lcUu7mfsHE1h9hieC08eQbuTnoGGCQbLNJHLeRr+7+6
tPWROkax8ARHujb/AOB/ziX0RBPGhg9hIG3bH5vqf9cS4I9k8cu7mfsDC/ftng+5nbQ9v5SQ6Dgy
Bvs10+kzx/q/mrR3+Bntz3mYbH9Zifc6ZmY92mvEaQ76SHBHsq5d3NHQMUx7rZI4Bae39X+skOgY
h4fYfm3z/da785aO0HQ8dyYP7vuO32/R/wCDUwNx9wknmedef3vzUuGPZPEe7l/838TnfZHxHj/U
Tj6v4nd1nxBH/pNaob46nxTppEeyuI93L/5u4f79n+c3/wBJpf8AN3C/ft+9v/kFqJIUOyuI93LH
1dwv37fvb/6TS/5u4X79v3t/8gtRJLhHZXEe7l/83cL9+372/wDkEv8Am7hfv2/e3/yC1EkuEdkc
R7uX/wA3cL9+372/+QSP1dwuz7fvb/5BaiSXCOyuI93K/wCb+H+/b94/9Jpf83sP9+3/ADm/+QWq
TDS86NbJLjoAB9IlxVO3q+BVP6T1XNj21AumY+jb/M/R/wCETZyxwFyMY+ZZsHL8zzEuHBjyZiNJ
e1CWTg8Z8HyR/rTao+ruJ+c+yY4Ea9udil/zdwv9JZ8Zb/5BQu66CCMemBwHWOk/y91VXt/qfrCr
W9VzX8WenoWj0wAdZ3EPs9a3dt/ctYq8+d5eO1y/uj/vuF2OX/4sfFMtGcYYAf8AOz/Q/e/Ue9L/
AAMjc/5u4REtfafCCP8AyCDZ0jo9byx+UWOHZ1lbSAe7muDXt9vu+gs+2x9pHqudbE7RY4viedvq
F30lEGBDdB4Dj7lBL4h+7jHmT/3LqYv+J2l5eb3HyQx/Kf8Aayyer/wps2YvRg2a7rn66ANIJ/7c
rrr/APBEF7OmMaYF7ngSA41sHI/Ob63/AFCgSYJB15lDiDwQAeZI7tifcz9z/X+crhPO5j+7H+6P
++4nQh/xV+HQ397KLs+5k6fufqY4f+/ZuGKD/M2QDr+lGv5vfHb+65DFTeHSDx4axq3UfmpvzddN
I7Rw3T6Lf3P3vz/9KpHQnwkkiIGhd+83+z9D/g/STDzWY7z+wRj/ANFtQ+AfC8d8PLR1/fnly7f7
Wc+FY11+P4hL0286xr59i7t/5FOA6Y5doPA/1ufa/wCj/r6m9zBBMSD8ewMfv/yP9f0qH3jN++WT
/Qvw3/xLj+xia2ieZA+A+CRqaO5nsPFOZ114mPvdu/6lPwT2g66Geds+1rEvvGb98q/0L8N/8S4/
sLE1sHc+XjEc/wBpTZ9mIANVhdoCRYACfo/R9Bzm+5NJBA41jw19p/4P9x3+v6RRb7gGxJgTrrxt
8Hbf9f8Ag/TI5nMNpn68Mv8ApLMnwH4XMAS5aOn7ksuL8cU8bYqb0wtm1mQ0kjaGOY4RAcfdY2n9
791GZj9FcJc/IrP7rgCe3u/Q12t93u/OVEAeRBjiI/e+jt83/wCtamHQAO3Y/wC9PHO5h+7L+8P+
84Wrk/4rfDpaR93COntz4vxzxzOvR0r6v27QMt258bR6lYJJ7bHM9Td/I2q3/wA1umc+tbt83NH/
AKLXPl2hB4PIPHzU6rbKifScap+l6bnMmJ+l6ZYpY8/+9AeYP7Gjm/4oCrw8zttHJD5v+qxl/wCo
XfH1U6YeLbvP3N/9Jp/+aXTf9Jd/nN/9JrKo6vn0ua4W79oiLGtdIjb7iGst/t+st/pXVq85ux3t
yGCXNHBHG9n8n/z3/wCfLGLmceQ0LB7Scfn/AIFznJQ93IIZMd0cmEynGHF8vuccMc4/4vA1f+aX
Tv8ASXf5zf8A0ml/zS6d/pLv85v/AKTW2kp3KpxP+aXTv9Jd/nN/9Jpf80unf6S7/Ob/AOk1tpJK
pxP+aXTv9Jd/nN/9Jpf80+m/6S7/ADm/+k1tpJKpxP8Aml03/SXf5zf/AEml/wA0unf6S7/Ob/6T
W2kkqnE/5pdO/wBJd/nN/wDSaX/NLp3+ku/zm/8ApNbaSSqcT/ml07/SXf5zf/SaX/NLp3+ku/zm
/wDpNbaSSqcT/ml07/SXf5zf/SaX/NLp3+ku/wA5v/pNbaSSqcT/AJpdO/0l3+c3/wBJpf8ANLp3
+ku/zm/+k1tpJKpxP+aXTv8ASXf5zf8A0ml/zS6d/pLv85v/AKTW2kkqnE/5pdO/0l3+c3/0ml/z
S6d/pLv85v8A6TW2kkqnE/5pdO/0l3+c3/0mm/5p9P8A9Jd/nN/9JLcTJKpxB9U+n97Lv85v/pJL
/mn0/wD0l3+c3/0ktxJJVOH/AM0+n/v3f5zf/SSiPqr079+7zhzD/wCi1ukTymLZP+1FVOH/AM1e
nf6S7/OZ4A/6NP8A81On/v3f5zf/AEktsD/Xj8Etun92iWiqcT/mp03/AEl0eTmn/wBFJ/8Amp03
/SX/AHt/9JLZ+P8AclBjuNPNBPCHG/5qdN/0l/3t/wDSSqdV+r2Fh4FuTU+0vr2wHFsauazsxviu
lIHnrx28fPz3LN+sRb+xsiCNdmmn+kYeR/WSOyiA8WkmSTOLwW0//9BdBMYb9Y/SHv4NZ/Kb9H85
ac+fynX4fTWZ0A/qb9Y/SH8Gs/lN+j+ctOfP5Tr8PprXx/JHyeSn8xVu8/nOnx+mlPn+Ph/b/M/P
S3efznT4/TSnz/Hw/t/mfnpy1U+fynX4fTS3efznT4/TSnz+U6/D6aUyRrJPGvM/2/zklKnz/Hw/
t/mfnpT5/Kdfh9NISeOdDHJ7fy/5SfSJJ08dx49x/kfm+7+okpYEngz5zpr/AG0ge8zpugHWB2+k
/wB39lS1Lts6zHPc/wAlr/zm/QTSSJHkZJ3ARt7z/L379v8ANpWpRkaSdNHQfJ35xd/K+ikJ7GTy
QNQdJfpu+jtf7U866TpOn+b/AN9d+d9D/ilEmR4tA76+Lvd7/wDq0EgMgIgdp26cfSb9Bzdn770w
foCPI6HSfZJ/6CRbuInWSQXeM6c/mf2EoMcbePjx/W9vuckmlCeBoOJ8vZ7iSP3dv56ZsQNAZgzx
po7xa3+UpQZngz28f9XfvKQb/vQtLEB3edNIBPjr3ThnP48eSkGgJ021WsGp4A4SSSQpJJJBSkkp
Gg8dB8UgZAPj4oqUol4EnkDuCO27xd/IUkHJzsTFJbdYDY0EmpkvcIAdDgwba9+9u3fZWmynGA4p
kRHeRpkw4cuaYx4YSy5CLEMcZZJ1+9wQ4pcKb8EuGl50Y0S5x0AA77isfK63efbiMZWdQXWavn94
NafSbtcXfSsu3rNtstyHbsiw3HU+4lwBdBdta4Btf/W1Uy8/jjYgDM/4sXoOS/4pc5mEZcxOPKwO
tfz2bw/VwlGHq/23uf6t27+sYrARTOQ7US32sBBh36V7fd/I9Jlqo2dYzXulhbQ0GQGNBMH6IdZe
H/Q/k11qieZJPkElSyc5mn+lwDtD0/j8/wDznpeU/wCLfwzlgLxfeJ9Z8zWa7/R9n/c/p/Q/U+4t
YXWkOtc610Ab7HFx7/Rc7+UdyUSZM66xJjx4SS+CrEuwIiIEYgAR+UDSMf7quySSdJK2vZOkm+KS
lzx4KJInzPhz+dokSR/r/tTakgRPlz5+CSlnESR4yPv8wf5TkoJdED3flP8AmtS0AgENjTmO236P
5qiSByBI11jn3PHMez+b+kipkOOJn807Ymf+j9L83/qE068z2BJ+H0t3/UJiANDoODyBy7T6Lf3f
of61Ilw17jV0k8jY7bps9/8Ar/wiSLpWhJg/x/6M/mNd+d/np/AwARqY4H50/m+HtUZP0eZMA6RM
NZ7Z3btrj/g/p/8AbaeZ1b5kD7rPzdv/AFGz/wBFpF2pwAG0HgQB21aNyXJ90QT2nTQdnf1E+oBG
ugPl8f7O5rf/AFYnnXw8P9R9JJKw3A9x4jj7pc76MbWf+lE4PfQHyj/zn8795KdONTHh3/6H5yaR
xIM+f3dh++klfUeJ4jTXjv8A5ikDp5fcod93jBk66xP8lIAjgHwj5f2N3sd/n/8AGIKST5yiVX31
PbZS8se3UEEgEe32H+S/2/yEETz3++SI8vekO4Hj8zoNv9bd/VRBINg0UShGcTGcRKMhUoyHFGQ/
dIew6T1SvPqIMNvZ9Ov4DVzf+/8A+ti0FwdV1lVjbqXbLGxtcDExA10/dXV9J6vX1Csh4DMhgmxn
A0jc9gP/AE/9H/mepp8rzXueiek/+n/6E8N8c+BS5M+/gBnysjr+lLlpS/Qn/qv83l/wJ/6zRSSS
VtwVJJJJKWPknSSSUpJJJJSkkkklKSSSSUpMklCSl0kkklKSSSSUpJJJJSkkkklKSSSSUpJJJJS3
B0mfGY81GRoO/AHB4HAn/vikU09vHTUwPnqglWuoA5k6aDvrANazvrG4no+TJnVmn9tnaXf9JaI4
j8NR4LO+sWnRcif5Hh/pK/JA7FReJSTSElGtf//Rb6vmMJ+sfpT38Gs/lN+j+ctSfP5Tr8PprM+r
/wDQn9v0hP3NZr9Jv0fzlpmdR34idf8AqnfnbFr4/kHk8lP5z5q3efznT4/TSB0kHQa8+H9v8z89
PI3HxkwJk9/bG/6Xt/dTyeew13TpHju3fundu96ctY9jqYE6z5/1v+/pwdds9450nX+W76UfRSHa
TwQNeBof5R/Mb9D/ANKJ94Pc6xyTMH3a+47du78xJKw4b4GI8O3Ht/e+hs/42tP9EE/RgDU6QNSG
v13e3b++mBOh+jPJ0H7p/wDIpAQ0afm/ydJAna/3N9zt35//AH9BNKdwRqNO8js797+s93s/9FpO
5JOsE6jUCZB1/tbfppePbx8xq7gO3fnJ415kjv30n+s5JNLQI11b5cafSjanDdZIk+J+fk385ynt
1kp4A4TTJS2wJbR/qU6SFoWjw0TgQkkkpSSSSClJEgAk6AclJJJSxMfw1Gum72pvd/u8v/JKZHaN
fDz8FUyup4mKXNP6a1pINdcQCN/tfdudXXtc33/4ZCeSGOPFMiI8f2M3L8rn5nIMeDHLLM9Ii/rL
9yP9aTaa2SA0SYA84CqX9UxawfTJyHcD09GSRpuvd+h27vZ7HvWXk9SyMgFhcWVf6Nkhp1LYsd9O
32u9383X/wAAqpeSZP5AdPb7ZVDN8Q6Yh/hS/wC5D1Xw7/iiSBPnpG9xhxS/5uXJw+r/AKj/AOHt
vK6jkXzucGVuP82ydpB7PdPqW+32Ob/NP/0CpzpEQPAaDXttb7U3ieT4pKhPJKZ4pSMj3L1fK8pg
5XH7eDHHFDeoCuI/vS/el/XkvqmlJMmM6kk6SSloTwklKSlJSmJH+vmo7pIA14iPkf8AvySmRP3q
Jf8Adz4eGv8A0lGdASZ0k9hqG/na7U4J0HPERqP3dw27v3WtRQr58fdrH7v7zk0jQnUe3keI4Mn+
0mmRzzH3nx1+g6drvdV9P+QkS4ajTmOR+472+2v97e1JS27SZgxyD357uZ+ez/X/AAjzB+BPtMjv
wBDG/R/4P8//AK2l20ktHgQRtlrdf836X5/6JNI4gR4E6DRJBKwA7QTEGNREbXaj6X7/ALH+mnPi
BoDGogcQz6P/AJJImeeTqSeVHz18ElpLKSQYkcjmRqdzf+l7kiJB0gfMwfzW/wDV/m/4T/ttpkid
TwJ1+5PoSJHl4flSQCvEmPE6RBOp2/Rj3f5lP/giXPu0k9/M+5276X7vs935n80mEAcSDEn/ADf3
p/dSAPOhMcRpA93u2/1fopLgWUjwI5JHEa+7d/r+5/pEu8dySC0eOje39VRBI/lARp3gBrnf6Rn0
W/6/zScfugyR7SOOA7U+5v8AW97P0f8A58SbVoHAk6k6+Mkt2+7d/wCYf9cSAPA1mO3hrr/Va33J
w4DSYGhjQc+7v8G/RSA4ECQeADz/ANVu3b0k6qDiRLtCddZ4jfLvo/R37voJT4iexaSBB90/67Ew
aAI00g6QeIeOfb/5wk0R3ggD4SJGkbv9f8J+ekqyza7z57/Gf+n/AGkSu22mxt9Diy6shzHtMGQg
hw1dO2Jl3hG3973N+lsZ9D/BqbT20+CG3h4poSiYyAlGQ4ZRkOKMoy+aMo/uvX9J6tV1CvaYrya/
5yrjg7d9bf8Aqq/8F/UV/VcLXZbVY26l5ZayC1wPhx/r/wCi11nS+qV5zC10NyGfTYOD/Lr+l7P/
AD2tPlea9z0T+cbH9/8A9CeG+O/AzykjzHLgy5WR1G8uWkf0Jf6r/N5P8DJ/rL6SSSuOApJJJJSk
kkklKSSSSUpJNITpKUkkkkpSSSSSlJJJJKUkkmSUukkkkpSSSSSlJJJJKUmhOkkpSzPrJ/yLkf2P
/PjFprM+so/yLkf2P+rrQOxU8Mkkko0v/9JfV4j7FYXfR9U94n2N0+k1ahkTrP5Jgj6Jf+e47Nn7
6y/q6YwrD/wpB8xtZI+k1agJkGT4zJHhJ43fnP8A6i1sfyh5OY9RXJgxP0eBJmBv/NLm/mtTTJ01
IiT8J7+53f3/APqRIcDk9+8TH/T/APA/0aRHYxHadeNPL+2nIAVr9KSfHuZ9vt5dud7f9f0aceGs
6TOvhuZ9P87alHj56n4ylPbjiB37e3lC11LaQOP48R4sT9/iZkJ9eJjz+PlKbTy1M8iNUlK1IjxH
5Z81ICfvTdpI0Oonv8P85SGhIPI089ECgrpJJJqFJJJJKUkkkkpSU6xHz+7+9NEmNI8DHw13fFO0
Acanz5MDw+l+ajSLVqTHih5GTTjV77nhpP0WabnEEe2prvpf98/wipZvWa6wa8SHOP8AhnfRbqG7
qqyP0z/a52/d6H82sd73ve6x5Je8y5x5P9Yt9vt2/Qb7FSz89CFxx+uX736A/wC+el+E/wDFfmOZ
4cvNXy2D9wj+k5f8CX8xH+vl/wDCfb/Wt3L6vff7apx6uwaYef5TrI3V/wBSuz/SfpFQgceAAHwC
dNKzMmWeQ8U5GR/ls9tynJctyeP2uWxxxR/S4fnnL97JOXryS/vqJSTJ0xsKlJJKElLJ0kiUlKSl
NOvn/eVHdMQJ4IjTw/6rckplPz4/FR3SQI7j/vvw+luUd0anWIPMdmd/5SRIAjSI8o0EE/8AQ/e/
qIoVOknXQE9hqG/nD95MTAPhHyMaOPP52zakTyfiBGvjtHtPt5d+f/4EmJBkzAkhx55Pxf8Au+zf
Z/6WSUu46E/ECNfHb9E+387a3d/4EmJBJIjQzrB7k/8ACfus/wBX+onJO6ToRBHMiZs/OLvbu/l/
9uJoI54gAAntHtSW2r2nk9jPuBMEBv73/fGf+kkOQQIJIhsfh3SMnnudB5lRJnmJ/wBf6zUkWv8A
jA05PMpd/wANP9XJj/r/AK/6/pEj8uP9e6S0lXOv3/6/upc/66/NPAn5f6x/ZT/k/wBkJItjBGh+
46Jf6xx/5H3fuKSaB2+H9ySge62v3hPPlrqfvTEc/wB2iX+uv+v+v6RJNsj5eMA69v6yXkdWzxqD
A9w/eb+9s/rvTT/t/u/NS14HHy7pLrZa8D3a/RGk/SH0Z/l/6P8A0iQPYGToPuDvd9Jn9b3s/R/+
fG1M66HSCZ04Tkzo6dPzeNR8J2/n7fZ/6jSQVw4eMDkDQaH3d/6rPoMSA1iACDBAHcbW/wDfEwJ4
Hu/kjSdT+bLfb7/3P9IkD2Bk6aT4B3u5Z/W97P0f/nxJtfmNew7zpDf++lTER4eX5FAOAPeNCBpo
D7zz/Ja36LUhpHby+Tf+q2pJZyRqeP8AXlEqtsrcLKXltjDLXNPf91BBjjjtHH+vt/NTyQfEf3Ja
jUaKIjIGMgJRkKlGQ4oyjLeMh+lGT1/Sur151exw2ZLB+kYDof5de4/R/wCo/wAxaAIPGq4Wuyxl
jbqnFtrNWuB7/NdT0nqzM6std7chg/SV66jvYwe539dv+D/6vT5Xmvc9E9Mg/wCf/wChPD/HfgUu
TJ5jlwZcpI6j5pcrKX6E/wDUy/yWX/qeT/W6SSSStuApJJJJSkkkklKSSSSUpJJJJSkkkklKSSSS
UsdEp7+HPPimIkpw0D+CSVgSfgpJJJIUkkkkpSSSSSlJduP9Sl/qE4j5ILgFa/6/+RWX9Zf+RMjx
9n/nxi1Y8v8Aesz6zH/ImTrI9n/nxiB2TTwiSSSYtf/TX1dn7FZz/O8yPBnn/wBJavBJ8/hrP9hZ
X1ck4VmnNpH/AEW6crV8x34K1YfKPJ5WXzHzVHlp8P8AzFPrOn+746pQOBr8p0A/8ilt4nv2Gpj3
GUULfAj/AHf+RT8caad/Ae2UonkcxpqeT+ayf+rT+JGp11MH73H27fofpNvv96Klo7D5nsB+9tjd
+Y/8xKYnWNJ+BPb6W53tb/01ICdBr2AEHTRo4P09PoP9jNikJnkiddCeSd3j9L2tQtCMgAHsD95E
T32/S/fepQ7XSBrxMAg/ylLgcQBwOw/DalA18Rp/r96VqKySSSahSSSQ141+CSlalKCY8+E8fdGp
0HPu8XKrn9RqxAa/a/J0Aq/d0HvvA2ua3X6H85b/AOCJs8kYRMpGgGfluVzczljhwwOTJPaMfxkf
3YR/Tknyb68ag32mGydkAkuP7lbZ97vb/wCfP0n6NYef1KzLlgHp44dLaz7iQOPWdLmOd+dta30/
+M/RqtffbkWm652+x3cjgfuM+ltZ/aQ5WVzPOSy3GPph2/Sl/e/717z4P/xcw8nw5s9Z+aFSB/yW
CX+rEvnnGf8Alv8A0mv+RNKSSqO+qUySeElKhJJKUlKSlMT/AK/FMHSRpPHHPb/qtySl5CbdJAAm
YiPl/wBVuUZ0nnv4aEM/O/N3JidDMRHyMCHOb/W2fvfyEVK7STPc9hqG/nD6O5InTWIj5cQ4j/M/
fTEwCfiO58do0Pt5dsbv/wDAkiZJ1gSQSNeT8X/u+zdZ/wClkkWomAT8QCNfHb9E+3l21u7/AMCT
GCSeBJDnCDydf3/3fZvs/wDSyU699wIM99Zf3P7zv3v+3Et3cnWPwADYDv8AViSLXnWeHAgiJJE/
pPzi784/v/8AW7E0x5ECPkAGwHf6sS1iNY+HjH0U0/GP9fJJbauwA+Pfv4JjHOn8Ete/92vZLx85
Gv8Ar/VSW2rny/17/wCv+kS+X3/6uT6HWfPsZ/19yX+749kkEqA+eo0Tz3+KX+pSnX+KK21k+iYp
d0qQSrslx/FLulqPL/YkoFWnxP5f/Oko/wB/bul+T/XzTzqkkFjEfl8DAlLT4niB/r/mJ/D+CaPl
2n5fFBcCvPzPiP8Acn7aAR46/eonx/J4fS/6KXxH3D/Ykm2ROkT7ewJnTQd/zkpB0MkHWB/ZI+hu
2fn/AJv/AKhYDXXTxPw55T6/HjQ6fw/76kniUZ4OgmIiCDrPt+h7d/8Ar+kTieBoYI2jTU/m7fp/
nbdn/maaIBkaTE99I/N37fbKaDG088CT7ddrYd+5/N/+e0lwkGYIMkcngDzPt+ju2fzn+v0E7SCR
A5I0brz2/O8VEO3Hu4z315I77Hfvf6+p6SQPEHXTk/D99zdv5n0PzP8Ai0khkCRBAkGDpP8AV9v+
aise9jm21HbY3VpH+v8Ar/UQBHadIiI3cxwN3ud/XZ+kUmnUEag6dzJJ2iNu791LtW46hJAkDGQE
oyBjKMhxRnGXzQnH9KMnsOldWZns2uAryWibK+J1/nK/5P8AIWhyuEqsex7bqX7LGmWu0BmP/I/6
+mur6V1evOriyK8lg99fEgD6bWu/N/tfo/8AMWnyvNe4OCfz/wDT/wDQnh/jvwM8pI8xy4MuVkdR
80uWlL9Gf72KX+Ty/wDU8v8ArdFJMD8/NOrbgKSSTQkpdJJJJSkkkklKSSSSUpJJJJSkkko/1hBV
KST/AMPu1SiB4f3pJpZLlOfyJklFRSS/KkihdONU3ZIILxuusz6zf8iZP9j/AM+MWp8Fl/WfToeT
H/B/+fGJpXHZ4RJR3FJNpjp//9RfVrXCsjUm2ANdfa3sFrjkEST24JIns3/X/v6yfqyCcGwdjbr9
1Y/q91r7dNZ11nxnufou+m3ctWPyh5WfzFYDTSHRJ7RoP5X73s/9JpFoEgiO7Wnk/mt3M3fybFOO
DERxHb90bj7/AOp/waQgCBx4aeJ+DUbWrEcwODyYOvO6B7PftT+XhoDJHl7vd+6EuDOodyfjqlx8
xpPz7oKUTzzrPPxOv+akfP4Rp2/qpceH4fFPGkSBMdvLdu7/AOv8ykpWu46+4TJ1nSSf5SQA41MT
A+X/AJj70j4EwW8jQkcN1Dne3a1J0nsNCY8Bx3lJTH/XRJSOvA07Dvz/AGfdtTR5oKpZSa0GBE/6
/FJrSTpz4jlZnUeqsbWacN4c54997ToAfzaXt/P/AJf/AKM/m2Zc0MUeKRrt3l/dbfIfD8/O5hhw
w4pH5pf5PFD/ADmWX6MGXUOrihzqMWHXNBa+2dGO/dYI/S2N93/B/wDntYhJ1JJMkkkmSSeXOP5z
kwEAAcDhJYubPPLK5HQfLHpF9H+G/C+X+H4uDCOKcq93NL+czSj/ANCH+bxR+T/aceRRKaUk6ib6
yeEtEpSUpJMT/r8dE26SI7kR8yP+q3pKXntzwmncQB34/D/qtyju789/LUN4P5u5RJ0M66c8zGm7
+1s/9FpKZTweYjy5De4+juTE6a8R8jAhzhrt/M/e/qJnGJ+YBEnxge0+387b7/8AwJI8nWNdSIOj
ifN/7ns32f8ApZFCnGAe3IBGvjGrT7eXfn/+BJGJJmBOrtDyfi/81v59n/pZNMa6h2h8eZfy783c
79/+xYlJ7EjT+G2JSRa5OsyQ7QjknWX/AJxc76Z/f/z00zrJBgfHgNhrh/1KbsIk/wC2PopTprJH
4fkSW2qdB4fhrH0ZSk+enh2/1hNrEn7/APUfRSj/AF/1H0Ultq178jmP9f8AvyUR+Oo/77p9FPHG
nw+8pQkglUD5duOP+p/fS47/AHSJSknXv4pf6/66pLSbXlMlPzS80aRavypFLsP9ewTkHw+SKLWn
ukQe+h10TxOg/u/uUg0f39tDz/1SS0yYwO3+v+sJuPJTj5k6/NMR4ajt+KKOJjr8PBJPA+Cb+CC4
FdJMnEyhS61ROusc+WqkyomPw/JoiV1iZ4hF3VsGsd9EaWGZ6MGUe2ToB37IoprHJPn/AOY/R/6l
Bdk7tRJ8I1H9lCNrueI+Xl/1SVo1O5pvNxa3HRwB0UbenWNExI8R8OyqsyC3Ux2+KtU9SezQnTw/
uRsdUVkHym2o+l7XREnSDG7xjs538jahzpHlxPk7/vq2RZi5YLXQxxGpAVTJwnNkjXzH+dr+agY9
mSGbpIUWmDJA+lJ0nUkEt1+g7871f9f55cCSNIkz3jbz7W/u/wDCf+jEi0gkTHl5nbu0Y36PtUZA
Et5EGZ8IMS36Pu+l/wCi/oWNZ4yBZtcW+fYnnTWCdu7938//AK2rVF1jXtcxxZZWZY8TuaZieP62
5VCeRBlunuHu0E+4Q76MV/nfyP8ASJAgHTtJAEdhodku/d/9GfpEhobTIRnExkBKMrBiRxR1+YcP
6T2XS+qMzWbHwzKaJezWCP8ASM9x9v5uz8z/AIT9Hv0FxFV7mua9ji22sy17eQ4e384f9FdV0rqH
26gucA25hLbWjxH+EaCfoP8A/Si0+V5n3PRL5x1/eeH+OfBTyZ9/CL5aRrh/SwTltD+vjl/k5/8A
U8n+tvKJnspJiJH96tuEsJn/AF/uUkwEf3p0lFSSSSSlJJJJKUnATJ48uf8AYgkBXOvikBr5+OnK
efP/AF+aSC+lDy/1/wBZS+CX+spJKUoqSYjVEIkFkkkklq4CSaUpSVoznTx+P/RWV9Z/+Q8kf1PD
/SVLTaYWZ9Zv+Qsn/rf/AJ8r80Cvuw8EkkkmrX//1X+q0/YrT4W6fHa2FtCB8NdRp96xfqt/Qbj4
Wmf80LZiJk6jTx/FacPlHk8rP5j5q00n8nb8E8HvAMcEx4ax+clqPKI1H+d9LT+t/wBb/nEhoI7e
R8fh/a/MTlqtAe/kDpp9LQ/+YJwYI2mIg+Ajxhv/ABbXPTac8T4T3B01SmREfKT/ACf5X521BNK1
HJIjiTB1Hn+bsakRHaPEE6j87/O2p4+WkaJR+KVppWukduOdISAShOhaQFoCcCTA7pAEmAsTqnVR
cHY2M79BxZYP8J/IZ/wP7zv8N/xf04s2aOKPFL/Bj1kW78O+HZ+fzjDhFVrlykfq8GP9+f8A6jx/
5T/HmrqnVBduxsZ36Hiywf4T+Qz/AIH99/8Ahv8Ai1mT+H5AkokrHy5ZZJGUjr+ER+7F9H5HkcHJ
YI4MEaA1nM/zmXJ+lkyS/eZJJk6jbSkyRP8AD8VGSYjWSPyt/wCqlJTIn/X46KO6SBzJHHy/8koz
pJMgQfv2/nfmqJOhniOdCDAhxH9b0/8A0WiplIiSdBB8vzDz+b/q9MXQOREfImIc4f5n7yZxMEjT
kSNfHaPb9Hl233/+BJGJOsCYcRB5P9v932b7P/SySLU46E8cgEa+O36J9v0n7G7/APwJI8nWNYJE
Hknzf+77d9n/AKWSn3TJDtCOSZ1f+cT+c79//txNOmhIgD8BtgEf+cJItefdOodoRyTOr/zi7853
7/8A24mnwkcfkjQj/wA4TcCPv0+B0lIkx30+5JbapgacfDTsfbKROmswE2vMfP8A1H0UgNdNPAjT
7tPopLbVBgE/eP8AX6KQ7AaHxH8P5KcD4A+I+Lko0gf7dUkWoePHwgdzwlGn+spJIrbUkkT4pT4p
Ui1SZ80uyX8UuOdO+qK0lUpR4p4MacKW0fPx07SktMmME8D7/mpbQpBup81INPy8UVhkxA+ScNUw
NNU8SlS0lgWwmI0nuiQmj8UqQCiLfx8FEg86QjFsjj/UqO3xEf7UqXCSPbrOuiLXWeSPjKmyqdT+
P9yew7Rtbz2j+CSeJYuM7WTPcqPp1M917jPOwQTP3/upz+jArYR6rxr3LR+O1WsLpGXlhttYil7t
chx1P7xa0+//ADEQJSPDEGUuwVKWPHjObPljgwxPzyNcR/dh+9KX6MI+trsuqaQWY3qAcF3u+Bkj
2KxV1TpbWgW9NrsIiAyyxsRH0Wtdta72t2e1abej9Kxv6QPtNm1u7eSYP5zm+mWOb/1yyz+QoOwM
NzyWY7gIIgOsHyne385Tjlcw3MB4E3/3LmT+NfDTYjj5rIBtKAjDi8uLNjl/jcDnfaPq7do+jIwz
PtFbhc0QAdA5tbvzXM2pn9H9Vjn9OvZmMaJIHtsGjfp1v2fnP/O/7cWg/ouLduOPa+snUMcC4CPp
bg8eo7dH+nWZkdPy8J4se11Lmn231Els+388Q5n02fT2KPJinDWUQY/vRbHJ87yvMSEcGeWLKa4c
HM/NO/0Yy9XHP+piyzm1CbKnQQWkH6J508Gq5jZ5+jZ7mx8SiDMx8tno9SbssgNZmMA1/lXN/wC/
sZ/1tVs3Auw3iQDU6DVc0hzXNd9BzHfymqOq1BsN4mzwZI8E/wAJf3C2b8ZlrPUq1B1IWfZW5hIP
bT8nmjY+U6t35R2hXH11ZLZbG+NQhoVCUsZ12csQNv5obGo1I/O/e/6KTZiIkAAkToI0bq4fu+3+
3/YRLaXMJkR4oZ1PAGupA411/wBWtTSKbEZgjRkx5bHgBr/ru/eP/W/9GreNl241ovpcGubz4ER9
Hb+c13+v+DVGSPyR24if3f8Av6m15adCYE6cfvfyz/0f37EgSCCDRGxXTjDJCWPJESxzBjKMtYyt
7jp/UKc+n1K9Hj6bO4/8k1ytLh8XKtxbm347trhrHAIIGkfyv9f0i67p+fTn0+pXo9sCyudQT4fv
Mdt+ktXluZGQcMtJj/neIeE+NfBZ8jP3MVz5WZ9Mt5YZH/JZP/UeRtJk6SsuMpJNKdJSkkkxKSl1
If6/lUVIIFdHdSXbyT/6hL+5Bet/r/r96f8A1MfelB/HTmJ0S+R+48cpJW/1+Kc+fHOqWv8ArP8A
rtSHMiJ1nj/pJIYnRMndHbhMiGOW6kkkkUKWX9Z5/YWT/Y/8+VrUWX9Zv+Q8rz2f+fK02Wx8kjd4
KUkklDa9/9Z/qrH2K49/V07/AJoW0DB057EE9tfL+wsX6pg/YL/+N47fRC24/FaUflHk8vMeo+a3
h5cD/WE+s866kTqfmnSRtFLQPj2TpJJJpaAnS0HOnf8AKn45ERySD4lv8nwSUtB/2pATA7nyPeI/
6pIjx7jv90e7c1Z3V+otoY7GpcRkP+m5uhraTP8AK222s+js/wCMTMmSOOBnI6D8T+6GxyfKZubz
w5fDHinM/wCDjh+nlyS/Rx4/0v8A1Yh6z1FpBwqD3jIc06aD+j7vzvd/Pbf+KWQmAgQNAOAkSsXN
lllmZS+g/dj2fSfh3w/DyHLxwYtf0smQ6SzZD80z/wBxH9xR1TJ0lG3FJEwmLgFEug+H+8jhJKxP
np5+QnVM46EHnURqdRE/52xKeNfxBH7v9T87896b7zAE/Ax4mtvfaii1OdyfiBGvjt+ifby7a3f/
AOBJHuZgTDiIPJ/t/u+3fZ/6WSk8mZB0PfQnX3fynM/PTbu4J/1G2ElpK5JmTIdoRzOvv/PLvbu/
4T/rdibd34MfOI2wHf6sTdtJ+7xjhKTHOg7/ANyS21dtPDw01g6SkT8YH4fh5JoPz/18ko8PkQkt
tXx5/wBfJIeXyj/X6KcafwjtHgl2hJHEFAfD5fEpR+ROmSW2pJP5pgjSLV+PdLv5dkpHBTwUUWFk
8Hvp5JQTwNP75hSDR/d80lpkxEn4KQbHb/X5KUfj/r2Ug3yRYzJgB/tUw1SA+R1CdKlpKwbpqn1J
80+3x0UgD2P+uiKGO0p9uhmNPn2UuPIfiloJ48/yIWpjtH+o8E0fgpmEok9z5d/yJWpgW695+5O1
nb5HTzUo+Xj34Umt50iOe6KLUYa35cIBLWA3HXUhg1kmEW0k6DvpprH/AJLahOJsuIaC4VmA0DUv
Om1un0v8GgdAvxx45AbDeR/qtnpnT7M7K9Ldt5fdYBq0E/RZpt3v/wAH/wBuLo7rRjtZh4gLNjQ0
OMjawD2jd9JRxsdvSunhvN1kGx3IdYQPoTs9jGs/1/wgWxW3cfpO1cdB/q1aGHF7UP8AWS+bw/qv
K/EeePP8wZAkcpg9OCH7372U/wC0/wCZD/qjJraatSA9w/e148G+3ait6g9n0YI5Gmhj3SqhJkz2
7HTjy+iojTnkcn5hPq99Wtx1to6jczCvhuVUGu7Ws+kDP0v5aLdhH03OYRlYzgW668z7Xifd+7sW
NoAeB5firONnX4z91Zjs4HUEfnNd96FEfKVGUZ6TH1cvqfRTU0W4bTbQQN1Zlzmx3aZ3ub7f3PYq
OJmmhvpXNN2G8++smTWXR+krkO/rf6Ndq308thuxgN4+nX3A/wBfzv8AB/8AgiwOs9GDi7Mw27Xy
fWq8e7y0f9Wz/rlX/CVcuDeeIUR82P8A7z/vXe+H/FxUeV588UD6cXOSPrhL9H7xL/1P/wCG/p5H
GzsD7PttqItxrhupsb3nXa6fc1CpvdW7Qn/UlHws1uMHVXN9TAtI9aowS0kt/TMn87Z9D3V+oln4
Bx9t1LvWxLtabhqDz+ic4f4Wvbsf/wClK1W0IsfUO0RKEvay7/oT6ZP/AEJtRVmMjQWRoFn3Y72O
Mjj/AF/lJqb3VuBEyOO/fzWiHU5bI4eOCdf7kd1lnGf6rkcJduNfH8VYyMZ1biCPBVoI/j/rCYQ2
ITBGhZtfsmBp2HP3q3jZV2Lc2+gw8EyNdfFj2/2fcz/0YqM6a/cVNj9piYHEECI1SBIIINEa2F8o
wyQljyRE4THDKMhxRMT4Pc9O6jR1CgWVna9v02eB8Rx7HK0uJwsm7FuF9Di1+ojXaRq17Ttd/Z+k
us6f1CnPpD2e2xo/SVmJBJ/6n+X/AOQWpy3MjKOGWkx/zvEPDfGvgs+Rn7mO58tM+mW5wnpiyn/0
nk/9SfzllNx4fk+KkkrTirFQJjw+einHzCiZjlJIXaVIGEMTP5FNBW2yQFID5gcD4ccqAKee6FLx
IdWQA4EeXH8n+T5JtBppr2/CNqUkjyP+v8EjM8xrqNeUkqMeQJ50jw04TyeZ0J+5N2E6d/yp4bzr
zwkoFYzr5KKk4jsIhRRCyW6kkkhE8feitUsv6zz+wsnw/Rn/AMEYtRZf1oJHQsoDg+nP/blabLYp
G7wUhJQSUNMlP//Xf6pgfYLvO38jWrbgLF+qf/J1n/HH/qa1trRj8oeYn8x81JQYnt4/Ewlx8Rr5
/wCvsSIHx0PEeW+NrU5CpA8415jhLXjudI7HtO2HO/PTmfMET48gbkx8JjnTT/X2/wBdJSgR2+O0
GPPt7vz0o0H5dBMfuz++1OSdRrz2mdBPj+YoXW10U2ZFsiqoEuLe/wBLbW125vue9npt3We/8xIk
AWdANSmMZSkIxBlKREYxG8pS+WKDqOaMGjcGg3WktrbIAnUusds92ytc05znOc5x3OcS5zoiXOO5
ztETKyLMm991mjnQA0GQ1o0bW2f87/jEJY3M5zlnp8kflH/df4T6N8D+Ex5DlxxgHmcoEs0t+D/U
RP7uP9//ACs/+p8CKSSdV3WWSnw1+CRMKBMnsY15ngeHvSSsTJiY+H+v5yYDSeB+E/6t/eS14+HP
/kf7SXgQRP5vhxr/AJu785FarcQRrBBHjyCf3X7vzf8AwT/ilGCAO2mk+0TGu3/rf+r0p0iflp4f
1n/us/N/89JOAEkaSSfDTtuHtSQSoyOR8J+Hn/XamJ8yR+CR07fCdPvSa0k+fj3SYzJQBJ/u/wBy
IylzjoJPkreJgut1PtbyTxCs2PxscFrfcQNfP/VqcI92vPNrQ1c/7K4akR/qUxqHgD8eUS7JDtZG
irusJPiPCEkAyO7MsI41UC3T/XunFjvj5R4pw9h4/D+MJUmyEZBH9/zTfDlG2jtwouYe/P8Ar/35
Kk8XdGkRGp076qRadU+2CkgzCwBP+9OGxxH+spwPHv3Uw2UVhkx2pw1SDdFJKlpKwGmqdPB76KW2
Oef9eUVrEN+SlHwE/wAU4Hhp+VKI408PyJKVET4z/r/ruT8aeHikfu50P5ICaJj5/igq19fh2/Im
7aafJSDfFPt/FGkcTAeYmUonQDkRH+v/AH5T2a6pbO4SpHEx5/L/AK6KcQPnx8/7KTWnSdY7f6kJ
OBgNHJiO/blqQVYKF9gra6wntDfM+Wu36aufV7DN2axzgHMxh6ts6jcQW1t9x/rP/wCtqjcQ61tW
obXBPJ1Mbfzj/wBSum6bS7A6UXvkW3H1CwzoSBXWyPY5v6P6f8tS8tDjyj93H6j/ANy1fi3Mnlvh
8wK93nLwQ7+1L+fl/wCF/q/9X7uNlkv9bJIj21kt3RyZ9/0f5SA8z30/3eCm0EVydSTJJ8z/ALUM
j8quk2beZEeGAiGP5AkPxHhr+RPtP8NRp9ycga+XiZ/1+kkhaPLSR5JaA66a6Ekf+YpT9/j855Hw
TBxiGmOw+COiKKSm63HsbZW4tc38v/ftq12Pbl1G6kBljQBbWOBrG4f8H/57WJp2HhCJj3WUWiys
kOGoIlNI6jQskZacMtYlB1roxdvzMNhDhJtqjmfc50T9L9+v/rtX/CZGDnfZd9VrDfg3fz9EgkH2
xbTP+F2j9/8AT/8AbVtXbMdXlM9aoBrwItqb27bm/nen7vzfof21z/WujFxdm4jRu1N1Q7knXa2X
fSn3bf8AjGe/+drZsN3kxj1/pw/e/uu58L+JxhGPJc4bwHTl+YP+Q/dx5Jf5r9yf+Q/2X8zk9Q6d
9n25FFgvwrtaLmzrJDfTfuh3qsf7P3/9P6Vn6NVqbnMII/1+9WsHqJxA+q1vr4Fxi/HOpE8vrO7b
u/6Fv/B/z1bdR6b9nLL6Hi/Fu1qvaJB8WW/uObH5/wD58VXQix9nZ2yJQl7WXX9yf7//AKG2mWVZ
Ve10B0aHxlUMnGdW7UadvghVWurcCDwdI8jC1KrGZdYY8gP7SjusIljN/ouMQfv/AB5S89fHz/1/
8zVvKxXVOMiNf7+VVLY/1CaQ2IZAWTH7NZ0B5B/L9L/pq7iZd+Lc2+hxbY2R8RpvY9k/59az5gzz
4c/cZlTY7aNPDgf7/wB1AEg2DRGzIRDJE48kRKExwyjLaQL3XT+o4+fTvr0sAHqVkiQfHdHuY7b7
f/ViskQuIxMq7GuGRjuIc0nTQ99QY+n/AK/4Rdf07qFHUKA9hDXt0srmSNOW/wAhy1OW5kZBR0mN
/wCt4xeH+NfBZ8lP3Mdz5aZ9E95YZS/yWX/1Hk/9Sfzh0inIhJWnEY7f9ydOkkpSQmRHPZIcqQGn
HKCQLWAOvbSfwTgSeD4EfiUiABxp5zz/AOYpA6akmePl4ILhpooQIg6uiD/nN/6pqeeTxJmPHXif
zFIE6t7k+4DQGT7vo7WfnP8ApKBJ1MzPJ7mf3kk7AMfn80jz4+aedNTxoAl5nXt9yKxZL5JJIoXB
jjt+KyfrQf8AIOSP+L/8+VrVWX9aNeg5Xl6cf9uVoHYpG4fP0kklCyP/0J/VP/k6z/jnf9TWtpYv
1T/5Os/453/U1rZmToeOQtGHyh5mfzFRcBoNSkHg/wAQeJ8E6aE5av5gAkfwB8Gu/dTkRIJIHGoA
0lzT7H7Pdtb+a5/6RMIOh148PPu4H6U/mJ26ECYLtRECTubtO3bV9Lc/0/8ACbP+D/nEoK0I40PI
Gun0JaN1jX7XWf8Agfss9Rc/1bqH2u30qy11FTpa9one+DutL3e7273tZ/n/AOjWn1PPGHUGs2nI
tANY/dHuZ6uyP5LfQ9X/AMEXO6CAOAAB8hCz+fz7Yonxyf8Acxet/wCKvwu5Hns0PTH08rxbcf8A
lc/D/U+TF/1X/KY8akyRSCznsFJ0kxOojnsO6SViSNddIJ+9Qgjkcd+eNG8/1Up1b4yCPPtp9F30
kzWjSO8DTQa/1kUE6q+cz586+bm/vJhGjtIkHdE6D5Oa3831P+M/4ytPIj4gaTAI/le787/0om0m
NCTprzBA2n3H28fv7P8ARpIWBMASZgRzoY/te7Sv+p/NptOeNToPvT7jG6SdQZOomB+8P5Pu/fTc
6fDz7aJLCVAS6OfFX8HE9RwJ0A5J408VXxqjY8Aazr4/68rRyr241AqYdSPcdQU4Dq1cszfCOq2b
nNqb6VJhg78SfFUsbDzeoW+njVOsdG4kAhrWgj3WW/zdX9tSwMK3Puc4vbTj0j1L7n6NZX7Wmx35
zvpfzf56Nl9Tml2F03fjdNaZdJi28tH08t3/AFNH81T/AMajpXFLb81kIyMvbxAGf6UpfLD+8ydh
dHwzty871rp91OI02ACPz8hxbS13u3ez1a//AEaGzI6URFFdvxuIJH+ZP0Y/fVnH6Faat1pbjM2y
3cJfoGuZ7Zbs/wC3PU/4NHu6V0+A1nqPDZALi0j/AKjcphgzEXwCIO3FoS0J/Evh+OfCeZnmmD6j
hjx44f4cfbhL/Am45srPDCORMyJ053l/5yb9G76J+XGo3efuW2Oj9NfWRXbZW/XZLgADBIlrW17v
+3FTzek5dG5525FLZ1/ODf3uP87+c/4xNny+aA4jHiHePqZ+X+J/Dc8hjhnOLITUY5wcXFKXyxjK
X6vil/fc8sc3txwP9Y3KTX6wfw5SBOoZLgOWOkH5JQHiQYd4eEqEHs3cmKUNJD6stoP0TMpbdJ/I
mY+DtPzHbxRRrqO/zTt2A6MNo/3J1Lb96eB257d0VpYwn2xM6Hw791Icfx8o/wBfzkgI401+HCFq
VE/6+PmloP7xp5pHy+H+v/RS+CSlfl8EuT8fx/IpbT3Ums107o0gyYBv+vZTDPDuiNrjka+HwRQw
6dvJGlhkiFZnz8vmpNr8PhpoUYVacc9j3/q/noja+QBPMd9ANePb9E/y/wAxGlttf09OAmNRj/d5
q6avdt5M6Ec6lw7+7/P/AO3EjWIJ7duxj6fh+4jSOJpOZtElV3lo3Pdw3U6Dx+f049itZJ2yBpqQ
CBx5rPy3aMomAfc7UxAHz/NTZaWezLigZyjEfpaJOk4n2zMqqsB2uJstIB0Ee3ca9uzc1rv7fprp
c+w23tqB0ZqST385/wCqVT6t43pY1udaAPU0bI1Ab9L3/wBlrHt2/wCCR6/e91rjq8zr5/RH9lqu
ctDgwgn5sh4v8H9F5/4zzH3n4gYQN4eUHsx/d90fz5H/AFT9X/1NThDYGk6eai5uhlFeR4iIjt9/
dDd5+fZStIhgRqZ7+IUYHxRCD5+SjA+/skgxYEGZ5P8Ar/clHj4a/wC1SPkP9ZTR/qElui2nbX8E
pHfjunIPcfJKIPOn8UlUyousx7G2Vna5mv8Ar/JWuyyvIr9etu1wkXs4H9cT/gli6CPLjiUSi6yi
xtlRLXDuP9fooEdRuujLQxOsUPWuimwuy8QH1NTdX9ImPpO/lWf6Sv8AP/nf+MyOn9Q+xl9N7Dkd
PvgX0GCWz/haZ/O9372y7/tq2rs6X15LPUp9pAHqVD82T9Kvb/g9x/63/UWD1vopcXZmGPfq62oA
aj6Ttm3+t72f9c/46rmwkk5MY9X6cP3vEO58N+JxjGPJ84bwHTBnP+QP6MJy/wA1+7P/ACH+x/mc
nqXTfsxbdS/18S7WjIEwf+Dt0H6Rv9X3qpVa6s6SIPz1Vzp3URhb6b2G/p138/Ty5h5bdS76Xt/N
S6l0v7KWW0u9bDu/o17Z1EHcyzd7vUbsVbQix9fB2yJY5e1l1v8Am5/v/wDobYrtrzKtjoDwNHfH
RUMnHdW8tj/XmEKu19b5BjVazH15tW0j9KPxA/8AIo7hjIOM2PlcU/GI7pvxJ8P9f9f0as5OO+t0
QfEquQR/rp/r7WppDZhOxoyrfDgZ+/yHt19yu4mXbjWtuocWWN+MEH81w/l/6/4NZ4/DwU2PI576
fLw/M8UASCCDRGxZJRhkhLHkiJwmOGUZD0yi950/qFHUKQ+uG2Nj1Ku7SR2/eZp9NWC0jzXD4mVd
i3Nvx3FrxqPAjTc1wP02u/P/APJ+9dh0/qVHUaN7PbY0fpKzrtJn3N/O9L6Wx/8A1v8AkLT5bmRk
HDLSY/53k8R8a+Cy5KfuY7ny0j6ZfpYif8nl/wDUc/5ZDpJGJ0+5JW3DUnB08SONBPEdymSCCQdV
3c8z/r5JfH8iR11TJKO7ImRHbnjyTE/7Pgm7pJKJX8o+HZMng/SjRMZ+XZJRUkngk6wOfw+CZJCl
lfWiP2Fk/wDW/wDz5WtXUHz5WX9aDPQskE8Bkd9fVrSlsUjd8/SSSULI/wD/0ZfVLXp1h/4Z3/U1
raAgk+KxPqlP7PfH+mdOvbZV2lbi0Y/KHmZ/MfNbX5JEgJQJnunH0hzodNsz+CctZAOkCNRxIkak
N7bv3t3/AKLs31qFttVNLn2u2VAbnHWI02MDG/vMf79n6X9L/PP9b0VJgEADaONI0Mjb+7/V/wAH
/hv+7XprH69mud+o1ywCHXOl+46l7a3Nftb7Wv3v/wCHs/4NR58oxYzPr+iO8/0W98M5CfPc1j5e
NiJ9WWQ3x4Af1mT/AL3/AFjm5OVZl3vyLNN5O1nZrZ+izRm3+yz/AKtCSTLDJJJJNk6kvpuPHDHC
OPHEQxwAhCA2jCPyhXKdMnQXKUHH/X4annc1SJgEnQDuoHnw7SYjTdu/6rcklYaSOTwY8v7Tvzvo
JuPDgjmOPce4T6/L5xx5hKToJE8Ad+3MH3f+rfYihYkg9w0eP+dxO13tf+k/M/7cUdR7Z4mSZGv0
OPzv+2/+MS0ESOIMRrwP5Lv+o/z/AOcSPEEz49xIAb+bP0tqS0qcZO7ue/dJokpvMfgj41W54CQY
skqDexGNqrNp+M/3KlYLsrIbTU0vtsdtYwCdzz9Bjfo/nK5mWCuoVt47+P4qXS3fs7Byesn25IP2
bBPH6V4Pq2dv6NT/ANa9T7OnjeugacpEAyAuUvTAf1pfKt1bIopYOjYLw7GxTOXeyR6+Rw8z7W+n
T/NVf9uK50zprcWoZ2c2Hc0UkRB5a5/0/wBJ7fY38z8/9L/N0ei9O+2ZX6XWnHh9swQ5xP0HB5+i
6Pf/AOpF0uHS3NyX5FsjFxtAJMPcC7jRv9dys8tjBvPMaA1ij/3Tk/Gubli4fhvLy4ZSHHz2QfP6
xxww8f8AXhLjy/8AU/0OPGvVhF7Rl9RJbWda6BoXaDX+Q32/nKvk5TXu21VNYwaNA7CTt935yl1H
OfdYQCSPKB/1KokE6u0P96tAE6y3cIkRHDAUGQcxx1bE92/xlGY+xn0TuZxsPz/8kgBTaSOP9fmn
ajZFCQqQY53TsfPY57PZkt+i/UHQaB+n/giw8jGtoudTcNlreD2IP0T/ACmv/wBf3F0jQXQ5mjhr
8U2TiU59JptHp2sksfGrSf8Aqq3fnsUGbl45blD05f8Ap+bp/DPi+XkjHDmJy8kdK+eXL+OL/V/6
n/wv1/zvMSHaH6Q7HsnY7b7Xcd/9dUTJxcjHudVc3bYwS1w1aRxO785C+kJiCOQdB4/wVDUEgipD
cF6acYmMcmOQyYsgEoTieIVL5fU2B2P4xqPzktv46Sh1PLdDoZ48DKPAjTunMBNMPPv4fimA8O/P
n5omz5pNZrp+KQC3iYBs8/eptZJ0RG18T+RGbX3GgGvj/ciAtMkLa+CfuRmsI/3oraoHEH8pj/pI
ra9dBI8f9Rt/f/fTgFhkibUQNBE9uJn/AHqQrGoAme/OnHb2/v8A76Lt5MTzJ7f2nEOb7NrE5Akz
ECe4/lfS/O/e3e5HhWmbDZySJn6Wnz/dd9Ha3+2nDex4k+YkfJSLYnT79PPmHO/N+kkGiePDT7vC
P3EVpJKhABgwPDSOHfRlSMAeYidskc+Tdzfd7FINMfkP+6FC2Q0knyHj8t25FDn3Hc+TqBM8nt2j
+WP66zaWOzMkNa0F17g0eG0abjt3u2/R9/8Ao1b6g8sq2Cd1pj8oVz6rYnqZFmU76NI2V9gSQ8Pc
Hhw930v0f/CV/wDBqMQ48kcfc3L+6N2xLOOV5TPzZ3xx4MP+2yejH/z/APmOxlgUY1WICTAawkwD
tYA3XaGe72+5DYC1ojlM+w3ZLnnhphsae0T/ANUiuBjX7u60JnXy0eTwQqNneXqPdET3n8n4qJ0H
BPb/AKlv/fkTaefy8cphW38EGWiihx+fxhLYSdQi7QBoBPgm541B/wBo/OSW8PfVHtAElIjWPwUw
3x7/AB+f7qW0aA69/wDd/nJKrtoiP+1It5nUd/8AUqZ040Hl8FEnv3/2z/J+ikigxiONPw5TSO8H
xTny+7j+CbXTv/qfEJINdGdN1lFgewlrh4z+T+VC1q7a8is2VgDaP0lR4b23D/g1i9oEEeHY89v7
KJRc+iwWVnaWnn8EiOo3UCNjqEHW+ibi7MxBBE+pVHOvudH/AJ9b/wBcZ/wmT03qFeJvxslpt6Zk
kfaKhG6t3ta3IqP0dzGt/wCu1rtGPryKvVp9rtPUrHYn7/Zu/wAz/i1zfXOkOqe7No1pfrYyI2/y
9I9n+k/0aq5sW+WA9X6cf+6dz4X8QFDkebleI0OWyy0lin+hh4v3P8z+5/N/3M7qfTbMK0BpFtFj
Q/GyBqH1u9zf7X7zFVoufU6ZIMfh4cq90/PpoqPT+oBz+m2OlrgJdQ8/n1s93/XWN/nf+MQuqdMt
wbYJFlVg3U3MMssZ+a9jlX0qxt+TsjijL2svzfoS/Ryx/eDeBqzaoMCzn79fFZeTjmt5BGo0Pio4
97qnSJHx/wBi1ga86oDT1ANPOPNLdZriP9Vw41E6z/5jwkDoj5FDq3EEIER4SmENuEgQzadpgiO2
o0n90/1dzP6iu4eVdRc3IofttaeeZ7uY8e3d/LZ/6sVD2/66mI/sbtqIx5ade0aGR/I/O/d9P/q0
gSDY0IXzjDLA45gShIcMoy+UiXg9x0/qVHUKd7PbY0RbUTO06/Q/O9N3/F/9NWFxmLlW49zMjHfs
tZ37fymWfR/tM/8AUa6vpvUaOoUBzNHsgW1k6tmG6O+k9jv8G/b/AOCLU5bmRMcMtJ/9J4X4x8Gn
ycjkx3LlpHQn1Swk/wCTyH9z/N5f8f1/zlhJItI+WpTgToO+n3qy41LJJEQkkhSSSWkIqVpHmn+P
4pjylp/tQUrQg66/lSHB44TgATqDA0Bnk/8AkUxJMAmY0Hl3SSpZX1pMdByuP8H/AOfK1rD4wQsn
61OJ6BliY/mz8SLGf+SSOxVHcPn24pJklEzP/9J/ql/ybZ/x7j/0K1uLD+qP/Jtv/HO/6mtbi0Yf
KHmcnznzWTxJjt5c/wCv7n/CbElJgBPcQZnw0Lf+/bf9fUTlqPLyq8XGffZtc1ugaY2ucW72sj3e
x372z6H2b/Q2rlHOL3utcZdad7jEan3f9+c5aPXMr1cr0GmWUAB/GrvCK3vr/R/Q/wCM+0rNWTzu
bjycI+XHp/h/pPf/APFn4cOW5T35j9dzQEtf0OX/AMjH/D/nZ/8AU/8ANrJJJ1Ud5SYmE6gT/vSS
sTPmY/uH/Vf6+mmImewI7acx/V/8h/6MczA++OR381EDWB4+Q5RQSv4jSTP97nJiRMz7Jkz5Ec6W
N/O/1/m0pbzIEkcaaHb/ACv+/wD+kUSfH6RHl3Df3tn8r/Sf+j0kFQOmvECWxEkS6D/53+f/ANbT
TPJMn/XdM/S3KRlziR7teDPjt/kOdu/1/SKMg+Y8tZ/8ySWEqHuK08GoBvqHgDTy81QpYXugak+C
07yKMYNGk/JOAauaWvCGjlPfdcGs1LjAB1/q6fu/nq31yxlFmP0qk+zpjNtpO2XZNmx+S/2s/Mfs
o+l/N0p+iBteRd1W1m+rprPtAHuh1slmFTpt+nf7/wDrSD0qh2d1Kv15tJLsjIJMlxJ3t3+pu373
v9//ABqdwk1AfNkIiGMZIYzkz5NcXJ45ZZf1snD8kf6/6Mf9s7ODj2YPSq6RPr5J3EGZBdDdg9n0
vS2b2LVytmFhsxGR7R+kP8oxucXf9FQw2jI6i68iacQQCdQXz7B7T+b7nf2FV6hebLtTJH3rR4QO
HHH5cYeOOWeU5OYyV7vMSOSVfL6u3/ctQu3OLj3TpuAptE6D7zwnsQUB2Ug0k6KbWDnX/X/eitZH
by8O/mkvAVVWQfkjW0Fw3s/nGaz4wk2B56/xH9ycWRBOp+7U/wDmSYSbsL+HSjs1L8bH6jT6T/0d
9c7HjUtMfS9v06nbfexc5kY12Nea7B6d1euh0InRzXfnVuXUWs3n1KzDwAdO8fnbkPJoo6lR6dns
ur1rfy5h+j/bZ+bYzds/qf4OPNhGYcUdMg/57c+GfE58hL2st5OSyHUfNLBKX6eP+r/nMf8A4X+s
/neZafUBgRY3kAGAAD2H0v8AX01Ou0tO06T9GNdPL+Slk4t1F7qbR6d1est1EHiyt351bv3lFrhZ
7XDa+ZcBoZJncyPbs2/62b1RujRFEdHpsmOJiMmOQyYpjijKPq0l8rcZ7u0yNB8EVrZ76fH/AHKp
S97TtOs8c/EafvfyPpq9TDpgaHvyfwG399PDVloybUY0ET8ifl80ZtfgJHiJPgHf1d3v/fUg0ayJ
nnSB/acQ5vt2N/PU9s8/6/1/+lv/AEieAxGTHbEmOeT2/tOcD9HYz89SIHJ4/Dv9L/0Z+kTgHsIP
j38df3v5fvUgzv8Aj38P4IrbJYbTOgj/AF7/AL38r3p/GOfmUUVyYP4p9sflSUh2/AfBTDNI1/J2
hPoD4Hnv4eSQng6f6/BFDPbI/jx5qtkgcdtSSNOFba0xI44Wf1C70aHvE7uANOT/AORQ7pFkgDcu
HnW+pkOI/M9jT2k/ncfmrrMahvTukMqALbHtG7QTvcAXj2H3en769/8Ao1z3QMF2T1GqRtZTF7yY
GoOjdpa7d9HZt/cXR5r/AFLwwfRq5I8TG7+T7PoqTlI6Tynr6Y/tafx/ML5fkIf5Me/m/wBpP044
/wCBDj/8MYY9UNj5kaDx4/1/89qy6pwMRr2nTg6qOE0kgRpx9wiJ+irnpSJJMkDXxUhOrmbBp7Nf
PRMWDjsZ45/794q1Yxo8dZGnM6f999yC7w0BPgBHI4cUrTVoSO5A/DxUDHHCI7XTx7Ejy8f6yGQn
AqrswJKiSY+XZSKaEkEMD4f6wPuUSdOfNTLdITEc9v8Ab/vSWkMEu89/Ma6KREFMAdAB8I/hCK2l
o8P7/wDX85LtB10jX/X976KftPx1+HuTaRqeOT4SPPb/AC0UJcbJsx7A5hgaBzSYBHOv+d+ctRpr
ur9Sr6DtHdi0j94f1P8Aof8AW1jaDnTsexH5v9f/AMmjY99tD9zRpqHNOgdAc7Z7/d7dyBHUbpBB
HDLWJc3rPRxUHZOMAaCPewahg+X+C/8Abf8A4n+Zp9P6hXTWcDPDrOnWOO13L6HmBvr3H2/8JX/h
f+MXYNcy2v1GHdWfa9ruQfdM6+3/AKf/AJPmutdGFG7JxxOOfpsj6P5P0X/nj/iv5mrmxb5MY/vw
d74Z8SEhHk+ckaJrl+YPzRl+hjyS/e/cn+n/AH/5zO6l02zBuAJbbU8bqrmSWPYfourd/WQaL3VO
B8P9fJW8DPrpZ+z+oB1nTXu9jhG+h/G+vd/J/nGf4RC6l02zBuAJFlVg303M1bYz82yv/wAgq244
o7f9F2NRL2cvzfoS/Ryx8P639Vvn086o/wClHPmVk30OrcQRx+Klj5FlThB++Y0WnY2vNq3D+c/L
p/r9FHfzWC8Rr9H8nF/H8nh5JCZhvJER4k+zb7f6yJdS6skEQRofie/9lDnWJk929o7B3u+gmU24
SsaJK7NpHIaYifl47fd7v/MFdxsi6m1t9B22s7chwOj63/S9rvzmLOb2ifdA8iSBpDXbt37/APxi
LW53gT34PfYYbtb5pAkGxoQunCGWEoTAlGQ4ZCXqEoy/Rk9x07qNHUaN7Ibcz+dqJnaf3v5Vbv8A
X+b9KuzEH/XtHjK4nFyrce1uRQ4NsYNDoWkeDm/uu/1/SfpF1vTeoU9Rp31DbY2PVqOsEj972/o3
bf0Vn/W/5ytafL8yMgqWk/8ApPD/ABj4NLk5+5iBly0jofmlgP7mT+p/m8n/AFP+c/nLDu34ymUj
PB18xrKiVaDiFSSSSKFD/UJ2kSN30TzpqO0/m/8AVpp/DgJT+KClxsJj6IMAEnQHTc50N+ik0ODQ
4tIOkO7d+NP3gmTkbY5DpmD8i0hJP7FgYgjssr61COgZRPf04/7crK1pgx4cx/5JZP1qEfV/KPc+
nAM8epX7m/5qEtimO4fPUk0pKHiDNT//019UP6Bd/wAaf+pZ5LdWD9UTGBafG4j/AKLP6q3W8LRh
8geayfOVT5x4pZd4xMV9/pl4aILSJEuO3ZZO72u+h/X/AEnoW/4OVLHOdxI79v3RpoW/nfnLI+sW
W2x1eG3isi20nVwdG2urdvds/R7vW/8AM0zmMvtYpSG+0f7x2bnwnkvvnO4sBB9sniykf5mHqyeq
Py8X83xfvuQ+yy17rLTufY4vc7xkyolPymWG+nAAAAARA0ERpGI7BSSSRSStJ/uUD46fhwNUidQD
x3/1/OSbHw8Se0/1fd9FFBK+p+BiY8j+9rtTafHx11/lae1OBI108PHX7/oqMjmR276xH9r/AKhJ
HRbdrzoInXtG33T7W/S92/8A8mmmBPYt8D4u7e7c/c3b/r+jfWIkjboeZGm0/wDpN/8A6MScTJJ0
dJJnU6a+/d7UkFide+7w5Mj5/wDR9ibk+P5f9f8AzBPOnl/rClW2XAc9tUgxyNBvYFW5246R/HlR
6jcHPIHA+en5yt1j7PjbvzndlU6biftHqtOK47a3um13AFbf0mQ7cRtY5tbU+tg0jIeqZ2iCmzwM
TpOJ08aWZX69mQWk7fc3Gq9rnf4Ddd/12v8A4NaPRKnYnTrMy0lr8mNjB2A3Nq9u3+U53/F+msu5
9vWur23Nln2u/YwaEMrA/RiG7f5mildL9nZdk42AwEUVtBfO6NjQDt9x/cVnlI3OWU/LjHDD+91/
5n/Tcn45m4OVw8kD+t5qX3jmB2xRl+qhL+rPN8n/AJztihn2XpzQ8j1LAbX8T7h+jb+9/NrIscXP
J/36LU6peXe3iTJB7CPboVlac9jJJJ/8lCtQHXu4kzsBsFBhknuPEQjsbxOg+I+4QoN0P4+XeVLd
/cfP/O3I2tFJRt4gT/A8+2XfS+l9FIWaT30418+zmIW77vAceP8AaT6nz8p/18EF4KQ2Eg/cQol/
gfL5eajPccdo80oKCbZtfqJJ/ipurc4+ozSwa6a66uOn5u1CDUasR+X/AF/zUPFVAiiiycTH6lR6
NrQ25o9j4EtPG7832/vrnMjGux7jTcPTuYdD4j81zXfnNd+9/wCjF1luM549Sse5v368KvkY1HU6
fStOzIZJY/Uuafh+fW7b+kYo82EZhxR0yj/n+Dd+GfFJ/D5e1lvJyUzrHc4JS+bJj/8AUsP/AFJ/
O81W8PG1wh4gvbGh84VzHt/NdB8SRr9/+d+4qeVi3Y17qbhsuZweQf3XA/nsd/r+kUqbtxh3tcOR
4gclUgSCQdJDe3o82KJgMuIieKY4oSieIVL/ALl3GEOEjTU/6n/v/vRGtE+fbx8FSxbpOxx18VeY
SI78f6wphq0ZCikayY+8T5oja+8eBTV2tj+77knPcZHf+74/2kdVqiWhsD5/JDJI079h/sUj+HH+
v+v/AJhGPHj/AG8pBTEjkceZ+POqnWwl3EfD8qQCn9BvgTykq0hALdoHOn3rn+t2772UM1a3V2gi
T9Dlbge2uuy12mxpM91zQrfnZ7ajJfk2bTB4BO6yC/6Oyv1EyW3CNTI0zcvwiUsszWPDE5JnpEQH
EZH+67/1dxfsvT35lk78gB4H/BjWpujtvv8Ap/8AXP0iJXucdzpc55kz5n+0rGWa666sStrWtMSA
AAGtENbE7fzEOpsnXgf7z/aV6hCEYD9EPMHLPmM+Xmcnz5ZGX92P6MP7uOH6uH9xt4rGsaCSAY5M
aGP6w/NH/ntWXOgaiByZGkAT/K+j/wCk0BrgG6aGIj4T9L6PtSkcDQAzpAIkhvltd9H8/wDf/wAK
o92TZVjh8v3gfDiP+/7f89Bdu4AM/uiR+5/J8tv/AH9GA4lwMxpIHPf+V/L9/wD1xMawBwYHM+IH
mz97/XYxFTWg+J2eDQeNPD+r+/8A4NMaz3/h8Ozv6yslhB+B1PHn5ofp+OnEz25StIQFsfFQLf8A
YrRqIGumvnz9Hn+S4tUHNA0+iPjGhH53t930vzUQVEIDWY405kDT/X2qLgNTx+HymUZzZ3EjUSTI
n+S/eXD6f/f1FwcPdJBmd8/H8/5IrULh4a+ev+v0VAxPlzGnxhGLB5RxOsa/RaS4hqgex7yDPcGT
9HX+0ktIRgcD4fDQT9H6KUHk6RAHfT87k/STx+T/AG66peHy45RtbS3Oo79vlt2lxd/N+7Yn0iQQ
OwJ4gNdG6Xebf9L9P/raQ1juRAgmOdrYOv0XfRS4B7SCSTInQ7nO2ubu9r3793/qNJVJKbn0Wks0
Ew9jp4l302N2O/zmf+fFoMcyxhfWCWmC6sc/2Y93/pT/AEizDodeBMSHdiZ+j/o2n8z9GiU22UuB
HeAQY9wMP13Fm7+R6f8AO+//AIRA9xunQjhkLDmda6L6Adk4wnHIJewahoEf+A+7939D/wAR/M0M
POZRUcPODrOnvJPi+l8bRdRO3w2W1bvSu/rrsWubYwvYJDgS9hJ9p7njbt/0/wD58XOdY6KKN2Xi
NmhxJsZxs+7/AAf73t/V3+p/g/5urmw1eTH/AIcP5fou98M+IicY8nzkuoHLcwd+L9HHOf8AnP8A
Nz/9Sfzmbn9Otw7GiW202j1KbqzLLGHiys/ykPGyn1PDg6TM/GFYwc2mqp2Dng3dOtMhx1dQ8/4a
r85rt231P0n6X/jP0iF1Dp9uFcGOIfXYAabhBa8GYew+3933+xn7n02WKDT5h/6K69SEvay/N+jL
9HLFvOZVmV7mj9INIWXbU6swdB+Hf4KWPkPpeD37dloPFeZXuZo8aubpr8kt0C8Z/q/k5I5H5ztA
BEzro2dr/wB1rfz2f+CJxwHEHgHtP5v8j/X1v+MU7KXMdtg6dtT3iIb7nbvYhiIka6ciPCNfd7dz
3/vf+QYwhtwkClrftI1njiO3t9upV3Fybabm30O23MPPLXCdux+v0XR/rZ6b1QG749+/8nXhv8l3
v/f/ANIpMsLR8tIPlGmu783/AF9iQJBBHTsnJjjkgYzAkJDhlGQ4oyH7so/uvc9Oz6eoU72DbewR
dUeWu1/tOa/9/wD8zpVksnce4kkd1xWNmWY9zcihwbYzTjQiZcyxsjcz2/62rr+n5tedQLa4bY3S
2qZLXf8AVe9rd7H/APo32LS5fmeMcMjUx/znh/jPwaXKS93GDLl5H+9LDL92Uv0of5vJ/wCGfrP5
yaSm7V0u0Oo4+aG7idedeVbBcQxUD/r2Tpo18Ph8U6K1ScuJkGTOvI5knc4bff8AS/fTSYDfDX70
o78jxQV5LnueZ1k88rI+tX/IOV/1v/z5WtdwgwWlpOpBBEeXu/krJ+tX/IGVrP8AN/8AnysoS+U+
S4fMPN88SSSVdnf/1IfVD/k+7j+e1/zWLfbwsH6oD/Jtp/4Y/wDU1rdHbwnVaMPlDzWX5ylltVL7
LPaGguc7lwaA4+o2va73f2FyWTe6/IsuLQwWO3NYOAIaxrRoPotZtW917KdTg+hWSH5A2t1IgD6Z
+jt936Nuz/hFzgEAAcAAD4DRZ3xDLchjG0fVL+8dv+a9l/xS5IRw5OckPXlPs4j/AKmHDLLKP9/L
+r/9N1FIJJBUXqF1Ep0xPgklh89O8+GiWnYx2E/LukfjH5E8HvpI8+NOdAitKxMDwHYHy8d35vvY
mLo7iAfEAd/5TvD85v8Ahf0iXH0efA6aTMO2n+vu3Jpn87QwTJJ7/n7X/nb/AOv+ktrSUSFtNCD4
8xPG3/N0/wCtpeYgfBOXH84nUSZ+ZbMx4qPj4JLJFaJPiruDSX2AeB76qowSfylbOHWKaHXEaxp/
r+anRDWzzoUOqHql7QBW3hojyPyUsWMDoWVmHTI6iThYw/O9PR+ZZp9Jn0KWvZ/N+sqLm3ZeS2qo
b7LCGtA53OO1sR+cr/W3tOfXgUgvx+mMFDGtB/SWk7r7WM/4fKdZs9qddAy+g82EQ4pQxdz7mT+5
Dv8A4XC2fq3isD7cp4luM3a06Ebz779v0nb21bf/AARbnTGfo8jMe0N9dxY2ONgnf+cXfusVT0HY
vTsfArg3WANdBmXOh921zi13ue7/AF/RrQztmNjMx2wAwbRoefznaD/Se9X4w9vHDH1+aXm8pzHM
/e+bz81+gT7eEf6mHoh/jR/Wz/1uRzcuw2Pcde8z8vPb+agCQTBM9zx38J/1ek4ySe/PgZ0d/Vak
BoO3Ck2DWJs2vrxp8p/798EvI9+3+vtSGkQNB/vTj8e6Clwf92vCefOT3TBpjwPgiNZ/r8wPBKlw
tYSeNfPlS2ngkT/uUmt0/vMojRHlKGi4RJWZXJnw1g8o1bA3gfI8f2kwIgdv9fM+SmAY00B0ntxr
r/1aaSvASgt2xoQBAJg68/SG7wVbLxzuN1ejwSSB3ku7f9FHG2Z5HB1nQy7/AMj9L89TaSQdJ1mN
CDGun0v+/oAkapIBFOdfj4/VccU2+zJYDsd+cD/6Mqe36bP/AFEuZysW/GuNVwNdzD7XDg/uuY79
3+V/6MXV5WK5jy+v6TfhrH+d4KNtGN1bHNOR7MlmrHayDr/24x3+EYhmwjMOKPpyD/neba+G/E58
hP28l5OSyH1R+aWGR3nj/wDUuP8A9SfzvM42SAQHjY5vmANJ+itrHs9WvxLR+TX/AL8sLLxLsa91
Nw2XVmWu8WmHMsY79xysdOzi2wNfo8RPnEqpCRBMZaEaPQcxhiYjNiInimBKMo66S2df1C1xaex8
xz/u/wBf8EZr9wnT4DshWBtlYsZ+HZAZY5roP+vZSNPdvCP9v3JRpM/IqFdocET8dJRQyqaC6DrP
HdCyXHjnx8f4IrXx+KqZDgT56R9+3kodUdUWfdsx20N0LvpcTH/RS+ruNN1uU5vtEVMOsHXdd+bs
2fzbP7Cr5bnWglsEsBc0GfzRuj+r/VWxjYdleEzGqIJDBuEQXT9Ijafz5/OT8EeLKZdIfta3xXN7
XJjCNJczL1H/AFeHhlL/AJ/tf4HGxa833uudr2brOg+i395Gr3fN2vz826oNbi1m2PLbq4f5v/kU
+/x+jHGhHH9lWJWSbcnHQiAG6yDE/GTHb9785GYPDkEjxOh93/U7PcqtLyCCde/hJ57bvzf9f8Gr
QgNAHGkRMae3uHKNeyktEA69gTJ8htn+Uo+7t8dJd/J7Na3832pefHlryAB/5H+2nDJ8yODE9gP5
H8lJTAjs7kDXiIn4O9u5qThAP8kExrGnZ/8AJ/M9jvpowrgfDgDQfu/+YpOaNY00+l9/9pJLXc1o
kR3InQH88eH7rNn7n56G5pHHmdsR3/N2Od9L/wA9qw4bfjEiOxH5v9l7a/8AX1EJ4aJGkCSPCP8A
zhv09lqSWsQOxGnB0MAfRJ+n/U/9KqJaNZBA76a6T/Ib9H+t/grEZ4M+LtedSP60+3Z7/f8A8IoF
rQdJ5gOaAToWx+az37dn8v8Az061pRFpmT3iXTpqdfd/K/rfvqEGWnWNONIku+jG/wD6lFiNQBp2
j4ifY5276LP9f5wbmjj4gOAHED+T+79L3/8ACf8AGFCKPbpBkd5H8fzU2o8dDoSCJ2/M+5rdqIeZ
4MzE68Tt93/flCAIiNQBrtiQYna7az/V/wD1tBaQtwNZAAjcZiBr/L/r/wBdIAxMcRJAPIGzcSGO
b9J385+j/wCuekmgRpAJ0aR82NO7Y1+7X8z/ANRpzB98dpB28fnN5D9v+Db/AKX06/Z/wpQrj+RM
SZiNA3mfbtb/ANRZ/o7PXR+jxAPaIH8psBjf3vez9P8A+i7HI1gaAggTpE6VubtPvc1u122v/wBV
PpMhogkbm8aEn9H7t36J2xrLP5r/AEX/AAFZTTKq51T5YRJJ0Ee7936DRu9h/M/89K+x7LGF491Z
PuGpidS72x7P+Mf6n/XP53O9/wCa6SeS7Q7obs53/netb6W39DX+kU67TU/c0wAdfGDr+d/htnvf
/hNn+iQI6jdWhBjLUOX1von2fdk4zZoI99fO3jc7hv6D/wA9f8R/N0sHNqrqd0/qAdZ060na7l9F
mnvr1/z2fn/8Z+kXXNsa6ouAlp1cyNAf3a9zav3tmzd/6NXPdb6IKC7KxAHYzvpsHDR8W7m+lp/1
j/iv5qplw1eTGP78P+6d74b8SjkjHk+cl4cvzJOvF+hjyS/f/wA3k/T/AJuf+szOo9Nuwrtji19V
g9Sm1n0bGHhzf+//APk/0SFj5D6njUnw8IVvB6hVRUcHPabumWOLoj9JS8wRdQ53ta5j2++r6Fv9
dD6n0x+C5jmvbkY2QHPxshmjXtadrvb7ttrP8PV9OlV6/Sj/ALzr3KMvZzfN+jP9HJ/6E2La68qn
c2C8DXzWbbUa3cGATqRx+bwf+t+3f/wf/Fkx8l9Tpn/ar1tNWXWXsALoJOnOnzS3QCcZo/K5YBGs
QR4aR/aDP+Df/r6yeO40nWfEa/6/SUrajWSC0ACYPHGjfptb+47/AF/RqI0JB0JJ50JI0d9L97/q
01txkCGTH6wdZ/D/AMkrmBm24uQLKnQ5v50Hjh1b9pG+p/7n/oxUyAePv8f6pSa8jQ8DhIEg2DSZ
whkhLHkiJRkKo7UXvcHqWNn43qDaLGAepWXAETMbf5tnpv8Afsf/ANb/AEaO6oteQOJ0PEg/R/q+
1y4XCz8jCuZlYzjW9hlp11n817f9G+Pexdn07qOL1ShpqIqeyPVpJAMkQPeI3VOdXu9X0/8Az16a
0uW5kZBwnSQ/5zxHxn4JPkz7uP14JEcMuuIn9DJ/3E/8D/aSaPDtz5H+UnTwd3cnwP8A1JTK24JC
hzzHmnMDiD96ZIefHdJCoHYR4nssn62R/wA38rUn+bgf9drWudTMxIJPlz7f3nLH+tkfsDL5/wAH
Gv8AwtfkhLY+S6PzDzfO0kklA2H/1Y/VD/k67Q/z3PbRrVvsGvl31jRYH1Qj9m2+dxk/2a1vh4rr
fc5pc2prnkN5ho3af+ZLRiQIAnoHm5xMsnCASZGgBvr2cHruQLc8sYZZSNkh0gu/P9v9r0/+tLOU
n2WWPdZZq97i5xgCST9L2wokrDyTM5yn+8b/AIPqPJcqOV5bDy4r9VAQkY7Sn/lJ/wCHk4prKSYJ
0xsLFRJ7qRUCdYJ0nU+ASUVteBydEjHERJjbGo1HG7b/AFPpJATAMa6eHlt9zdn0U27SRoHD4Azx
u1b7P63/AAiKFjqCdY5jns47vzv5X0v7H+kSMyXEGOZLQfDmf7H9f/riY8aaeDuDpLvzS5253+v0
P0aMcx49oB1OrY2pIJW44008+493gmPj4JyT/uSAknufL/X/AF9iTHItjEr3vA81oZ721VNpECOQ
PFQ6bUBNh+i0TMzwqmfb6lxk6E8a667f5Tk/YNMniyeEW50bZiU5XWrQJxR6eLPfJta5lLmfSd+h
Z6jv8Gn6BgnIzmusb+jqPr2QIBJJNTPbs2/pGuf/ANbS6s37PRg9IBAdU37TlEnX1bmtO2z3e5vo
NZ/IWp06pmF0gXtO6/MDXF0ARub+jr/O9tbf3/z1Pgx8eWIPy4/VLzc/4nzXscjllE1m5w+xi/q4
P8rPi/R/V8fB+nx5XSwmm/OuynfQxgWVzoN/3fvbrFWz7i+0gGY4MK61gwunto/P5fp+c4DQNhv5
qyHkmS77/wDf7VbHqkS84RwQEB03YzHeI4B8k8ETpHn8JS08P4cCOzUuTMfh8/8ApIrF9okCPh8N
PP8AdUmzp/D7oCYf6/3qQ0P8PLiElwDJo7+Hy0+Sm0AR5f7FEDy+amOP4oMgDLX5/enbr+HHmo6/
JTY2dDPkkVwZt8ufyKbQZEcjiPj5KVdTj208vH91HZWB/r5/m/8AnCYSm2DKSflHIn4nn/qUeuoS
ZH3/AD51O76acNgcaTIB8Rr33KbWx3jtp937oQUwvq3NGkrJvocH+rXLXt10/wCq/d/rrbABEaAI
GRQTJZGmoPn8v+iiDRVKIIo9XLvxaOs4wredmVUP0bxqR4n+o/8AwrP9Wcrl4l1Fzqbm+ndX90T7
Xs/eYuryMZ9TvWqlpbqR4Hmdv/fE+TjY/WaNln6LLqktdBJb5+7/AAbv8IxDNhGUcUdMg/53g2fh
nxKfIT9rLeTk8h9UfmOCUv8AKYv6n+cxf4eP9d/P4PSupEOFN2h7z307LRyaAQLa9Wu1BHj/AOSW
Bl4l+Pe6i9vp3166cEfmvYfzq3fvLT6R1QO/V8r6R/j4fylVhL9GWktne5jABEZsJE8MxxRlH1Dh
l1tLXaWnkwB+RWmW7hI8z/rKFmYprIc3VpHtiTp+P7qDW9zSZkjUmR8vN39ZPGmjW3Fhukng+f8A
FVby6TGnM9uf/I7kZrg7zHbvqR/JDv5KHawnjt4eOvxRKBoXP9U027iCWHU6Ej8VoYnUBibWWu3Y
jz+ieTJrP7rv+D/1/m1TupDpBHu58OeSHgoNVzsdxqt1Y4DQ/DVMjIwlxRP8vFky4MXM4jiyC+3S
cZdJQl+/F6u+huQBZXpbBgdnTxqdrXbVWaQCQ8HWTrEkn3H6Z3e5v+f/AINVOm5oxdtL3TRJNb/3
R9Lb/wAUz8+v/wBF/wA1q247bgH1DZZ7dBoD9IfmN91n7j/9GrsZxyRsfUdnms2HLymU4smsd4Tr
0zj+8P8Auo/oIZc2Tx46aGPdLQ76bEaqwz4+AmD4/wAv81Aqcw+xw2kweIIkf2/7bnv+h6al9GOO
BppEHz/O+kmEMkSJat1m0/39+P8AO/OR2tjifgFQruMROgH+vZWmWgjxHfy/rJpXJjHY/wCv4f8A
VKDj3Tl08Hn4d/6vu/qqJ+Wngf8AX3pWgonjQ8DTvp+bHf8AzVB8GZPtkk+XY+H+Dd/xiKR2PfTw
mee6HzBkmRqRqe7v+jub6e3/ANJpWoIbGuiSDu15HBIhuun/AJh6X/F7IOaAdRxI1ESW/R0cd39j
/oP/AENaK4CO2s68Nk+48H/qf9Hb/o6kMtb8PGRGnu+k1v0W+92//wBCE5CNzCdDJdEca68e2Ppe
73fv7/8At2DwCST9EkzrM6h592/3/wCv+lRPaBMaDtIHnr7v5DP7fqV/4OpMfbPuiNJHjGn5236V
P7v/ABf+DRQhLXfnSO+gn93VkDZ+f7fchx3450b2iHdv3f6z/wCb/wCDRn1iSA3uQNo8PMjd7G/y
P66E73AxrIgDnQDz/rf+pP0f6RBRtaSPI+HmPnZ/5h6aiBED6MAgHggD3fSDm7v0n/F/+B/oZOgS
POdRx393tDvb/W/wn8uytNr2EGRHBMx+buZ+Z+fsZ/57TkK5nTbMnb21Ddw907ne703b96UDUdte
NTy5zm7R6v0tr93/AA1fp/pUuRHaCNABAOjzrXV+a7/X005gyZkDsC0katePd6hd7/T+k1//AAyK
FaAguIEmdfokCXlrXbWb/wCR+js/f9nqb0tWtBAIAAnwG0Nd7vobW+/f+Z/xX5iW0wdPpyTtDo9x
c3lm3+t9D/0on2ydB3P0QCZJ/Nd7P9J7f9IxJTKtz6nkslp4PAEQ/vub4f6T2f6NXK7p9wE1kklh
8T9Nzdpsa72b3ent9P8Awn/CqkAJGgHfQcaubvk7f++KTXPrO4TJ84n81v0vb2/dTSDdjdWhFHUO
X1nogoa7NwwHY/NtQ/NB7s+k19Xu/wCt/wDFfzVDp2dVRXZg5gL+mZJ/SbZ31WfQGXVt9++pm3ez
/C0/y/TXXVWQwWNk1HRzPD6W50fyv9HtWB1zoYoDs3DaHYx/nKhPsj6X/Wv/ADx/xSq5cVXkxj+/
D89He+G/EY5Ix5PnJHoOX5gnX+pDJP8Af/zeRy+p9Mv6fkCqyLKrBvx8gQWWM53BwDf7bNiHjZD6
nSf9fx/lK1gdQpqod07qDTZ02wktIHvofq/1aoa52/fu+j/OIHUum29PuDHuFtL9aMho9ljfiY97
W/zlar9OKLrgyB9nN8w+WX6OWI7f1v6ravpZew2MbDiCCNQeIg+5Zz2OaYLTqdWx3O+B7Q1v0Xfu
/wBRFxMo1ECdDz48bf8AvytXUsur9Rg0jVvIA0fHtLf+rSOqYkwlR27tAGeNZjyn/qtyRAcJHfg/
NJ7HNJBEnWI0Ey7yb+e1OCPl5praEhIMQ4tOo07j+9WsPNvxL23479tg114II9zXtO3c399V3Nkf
k+fdM1xY6Dwe8jxj+CQJBBBohUoRnGWPJETxyBiYye+6d1DH6rjm+kFl1QaLaxqQXufAbt/wTfzL
Nv8AN+z6dCLtJmdXcnxmW7Yn4rhcPMvw72341hrsHtdBiWn99oP0f9f51dngZ+P1KgXUQC1g9akD
+bcBtcxwcGfo/wDQ7GW+p+l/0a0uW5n3BwyIE/8ApPE/G/gkuTl7uISny0uv6WGUv0cn/qOaYg6z
oeI44TKT+OCPMDTwG36TU3eB5ac8/JqthwSFCe2hh2vOka/9FZP1sI/5u5cEgE1mCfC1nZo93tf9
N/pf4VasaeSyPraSegZRPf0/vFlO7/pOQlsfJMdx5h87STJKBnf/1o/VD/k23yuP/U1rU6u/0umv
DT77XNr3AxAO5z38e7d6bq1n/UZjX9OynEatuaB82Hz/AJKJ9Z3vdlY9ZA21tNgJ+l7iWR/V3Us2
q1zGTg5c1uQI/wCO0PgvKjmPimESrhhI5jY4v5j1x0/2kIuR+KjPnonKb5rHfRFwnTBOkpYqEHt8
57CRrx+cplDInQAec+ceH0UlLa6bdTx59m7fxTEgyZ8YJI4Omrt38r3f9d/0ac+4CNZ4Hj/V1e3d
9Fv0EtSQBJ17b/EbXN9w/wCD+ls/m2f9dKCVt3nz3l3cu/NP8l3+vvUZnXxMnw/I1ITEcaayO5j+
t+6kYnw7AacaQksJC3n/AL/9f/UiJSwucP8AX/NQxyPl/BX+nVb7Ggz4/JEMOWVRLdtd9nwwJhzh
qq3Rsdl+cbr/AG42MDde7j2tDixm7d+e9u1n/pRLqt02beGjQeAU7A7C6LXjj25HUnb3idRSzZtB
2/m2We//AAn836f9R/W+kWrRMREfPlPCPr83+LFHjNu6r1I2WAl2ZaX2A6bawd9oPpfQbt/RLqS0
ZHUK6oJrxx6j299PcG6f5qy/q7Q2jHv6g8DaR6dRMTDCfUO+f8JZ7P8Ara2MBvp4rr7B78gl50j2
DjQ/mud/3xXMEeDDxH5spv8Awf0f+/ee+L5xn5844kHDyMfZj+77v+XofofrP1E/9gj6lcZ2EyeX
eZ7/AMlZpmTzxyB+CNkWGywnvPHmggKYaBzpGyoaR+JCkB3OqYfj28FIT27QPikUBcAAc/7wpAga
D5Jmtny/DnzUwyedQgyAHyXbJ1A44Ov3KYbx5DRLQff2/wBicAeH4JLwGTWzoBKPXX35ntzrCgxp
8J7k/wB6tVNEdySNIjk8/wCbKaSnVmxnYCPy/wAUQNGs/jqNT8dv7qjvjjUDWJjjX/X+WnLiCRMc
9/lu9v8A0k1STSP9fgmLhP8ABDDuSPj+P/mSeT2/11STbLcQpNskx3Qo4/BSa2P4IKWvpkbh+E/3
rLvosqcLqhtc3VwbodPpf2dvu+itneA2DP8AvVPJYCdwIB7GQOdRqSiDRVKIIotPJxsbrWNss/R5
NYmuwCS0nv8Ay6n/AOErXJZeJfjXupub6d9eunBE+17HfnVuXXPx3scLqNHjWB4z4Dc395NlYmP1
nF2PBqyKhLLQCNpP7u36TPb76kM2EZRxR0yD/nNn4Z8SlyMvay3k5PIdR88sBlvkxj93/OY/8OH6
z+dx+kdUbcPseXo7hp/ijZWK6l50kdjHb4rEzcXIxcg0Xs9O1sbSDLT3bsdDfa78xbPSuqV5VYw8
sxY3Rjj8FWjOzwy0kNHc5jAIxGbCePDkHEDE8Qo9VNftMOM+M/67laYA9sjv/f8A6/uIN9D6HkOk
ETr89Y/tJVPcw69uR5jsnjs160sKvpLeOP8Afp+d+aqdtAe0g+fj4+R/eWuWtsZz24Hgqd9RaTPw
J8tUiAqMnNrsdju9K3WokQe89nT+82Fr9Pz/AEIrtM0una8aQOXdj+79D/Bfzn83/N0bqW2NMj5g
wdD9IbVVrsdjuLHgmontIiDo6fzfcmRlLHLiC/Pgx81iOPKPGMv0oS/ei9bZT6zg+sj1m7ZYDoYL
9WN3bWc7/wCbr/R/uf4QNdo0Y/XgD6R49x9sNdt9L6G53/qKj0/qBoDa3uJpP0HjSP8AyP8AKZ+Z
9P8Amv5rXvpF7d7NLACfZMOE7hsDT+bt/sfzf/EXoyjkjY+o/deazYcvKZfbyaj9GX6M4/1f+7ig
9zXCfadJ5EePt+k1TZYYBJkjgH7zDkFp4DmwDIB4E+7X272bW7Wep7/0X83/AKNPMazodZCYQyxk
CLDdY+dPpE94Oo/q/wDVIoJI0/DXQ+3/ADf7H7ipMedD8p8P6u5v/be7/hVZY+YGgPaT3J2/vOd9
L+QmpZlvJGniB/r/AK/9tqDmyfj+TX/yX+v6NFBaeDI7RoI57JnDj/XzSQ1nAGSIkzAPfk/mbv3r
f9f5oT41IMaF0yDEbnbtPY73v9T/AME9StWHtJ0JmRz3ERu7+1rf9fehO3akTOp03SDBP5v0f3f9
N+l/0n84QUFEdDpI2yNwPEHbIc79Ltbu9/5n6P8AzEdTqNeI14ne5n5u3j/Q7Kk5Aa6JDYOh0bxt
2O/wft2793839D+c9JMAIAIO0iI01Gvt2n8/2ufX/wAH/gqUVI3tkH4fKAH/AEdbd3tr9v8A58Qr
BJ9x7xrrweff/as2v2KyROpG4nmOHEhv5+z6Xt2/8F6384g2SGyDpBIdMAwD+cI3fR9rGP8A0P8A
24kgodp002x24A02/ut/e/Sf8HWmEDtpIBB/k6+5vtY7/wAgpFo4AB7GO2uu07K/z9v5v/oxMfGd
D4afyvL80+z/AIL/AK56brQsNeQTtMugH833Odt3M9+7+T9BOO0mSNTzHLX2d/V/wT/8GlB5gHb+
EDdzr9H912z/AIpOToTJIGvO7g7Z9znt3e1n5qKFoA1iCNZHj/0t37v0/wDtxLTQDRoEQOAPa32N
3fS2/mJ9Z8DJ1aZj/WE4jbHlMCf6jtPd70lUs0GQYG4+B7zp9H+t+a//ANSya2B4DjQeO+fBn0n+
z2/zaRnvr5RA77ezf7Pt/wBJ++nDgIiDGv8ArtSRS7XuqfvbxzHj8N30larvaASAXVwZZyQAXCGz
9Jv0lV1njuJ4JAAnj+S36SYONZBGswS2fj23N93tQI6hddipdXL650IUB2XiDdjkH1qxw2Pbub/w
Tv8AwD/iv5uhg51ddZwOoA29Osd9LU20P9rW20yfo17f0lH5/wBP+dXW03ARBJY4atkyNTLg1zfz
/wA5YfXegtqDsvDbuoM+rUPzRMe0f6Fv/gH/ABf81Vy4avJjH9+H5u98N+JRyCPKc3Lw5fmL9XF+
hjnP97/Nz/x3H6h0/I6fc1jzvreN1FzPovH0tzD+bYo4uTsPkYB1PE/+R/1/SKzg51VVLsDOYben
2GYH85U+dxsq/wC/1/8AXK/0m/1BdS6c/Ce17Xtvx7AXU5DPouaD39znb2fR9/8A6jVc180duo7O
tchL2cvz/ozHy5B4f96mvoZaw2V8GZ2/2j+aHfuqg4FpI4jkajk+/kn6KPi5JYSDAbGvHGu5zvpO
7/6/mGyKWvbvZpEyAfoyNfonz9yVWujKUJUdmoNfj3SIkafGEiCx20zoYPYBP8fvTW1E2EbHFp1k
SNT/AK/S+irmFl5GFe27GeWPkSfzXdttrB7bGPlVi3WePHhQa6CA6SOw7gny/NSBINx0IROMckDj
yDjhMURL1CX9Uh73p/UKep4gyahtc2G2s1Ja6Jd7h/Z/8n62+isxmInTmFw2Lm3YV4yqHAOAMg8O
EasI/PXZdPz8XqeML8chlg0tpJktPu+h/pG+z/X01pctzImOGXzj/neLw/xv4JPk5HNhBly0zof0
sMjtjmf/AEnNMsf62D/IGUf+L/8APla2NOCsj62mPq/l/wDW/wDz7WrUtj5OHH5h5vnSSbckoKbN
P//Xn9Q9emZvJ/T18a/mWf3Kp1O51+ffa6R73MaCSYaw+ltH7u59brFZ+pFjKejZ91ntZXa1zn6k
ACu390/99WbLoBeSXRLidTuOr939tO56XphHv6v8WMf++Z/+KuG+Y5jPX83D2onv7+Scp8P932P+
esT2TJJxys965dJJMkpYmEN3HY9tfL/zpTOpAHcx96hM94JHbXSNpP0v+ue9yKFnOmSdRx7jOk6b
vf8A1fpf8N/o03t7QTr2AHfya7/X+Qn3OOomeSACeQ52vu2/v/6+sm7QXTBiSSYj2zxv27diSCVv
yjtH9yY+Q+H4/wB7U8/H/XT/AF/lpv8AWR/r/r+jSWErgT+WO0LT6d7QXDw+P96zRzI08OVexLAA
QTyD5/6+1Oi1s+oK4pOXntpEy94aY8B9IaQmzLvtnU3+gW7GObj4x/NgH0mO1/M/P+h/LVvoz209
WZe6AGCwhxjnZYGO1b9FtmxyX1VxW251lxBIxmhzA7Q7nk17nlvt9m39z0/0ykhAzMYD9I6+Ud2n
n5octDNzBF+xiHtiuIHLml7ePi/qcft8f9R3HU7a8XptLtCGsO7Uhrdol+zb/XVvLtApIZ9EENaP
Brfaz/vqrs/Q5ljr262M2VHlo3Db7fzXf+ZqLHufXscfc06Hzjt+a1X5/N4ReUw6Y7u5SNyPX/Ca
LueI/KlHjopvYWnyHB4CiJ08fD/X95FFG9VwPkpANHKj4fgERgjWfCO3+v0UFwC4PPbzn/zhSAny
nWO38E/Ex/r8kp/Dsla+u64gf7VNs/NQEz8PvUh/r+KBXBMzkEfl/wBrUdpEeZiSJn+S53Pu/wBf
5CCwHjuew0nj+r+9/wBt2IrW6T93gT7uP637v/qVNKWYJP0QJGukcfS/zPo/+pE43GI4EeMdvJSb
X5Tt1A1jST7dN37n5qM1gn+Plp/KQUjaw6eIjnnTx+n7tf8AyCIGR5fIcRCcuDfiol/y+KSl3GBp
z4KDnefimLgDrpPjyf8AWPzUIuMa/nQCdPzh9H/zFBSTcBzoB27x/wBFRc8RDde0Ajx/eYW/6sTA
GdBBkGBrHOun8r/txOBoDqdO5J4l3+r0ksDu5Ojhzwf87Vu38/8APQbcY7vVp9jweGiCD5fnfyPd
/bVkiNANYI1iCO7VINIPcjiD5EfmwiJUiURIURbQysXE6zi+naAy5ollgj2kjf4+6p30fT9mz9H/
AIZchlYuRhZJovaWXVn2u8R2/d/1/wCuLt8nGcw+vU4NeNQZA7O+lJZ/b/nUDNwaOsYxrsb6Vtej
XHUtMM/P3fze7Y33el/1v/BDNhGYcUdMg/539WTY+GfEp8hL2soOTksh9Ud5YTL/ACuL/u4fp/7R
yuldSZmsGJk+24CK3aa67dmh8/3UW2l9T9jhB8Dzp5O2Ln8nFyMHJNN42W1n2uPfnv8A6/8Abi3e
l9Rqzqhi5MNvaAGOMe4D2hjtyrQnqYyFSGht3OYwRERmwyGTBkHFGUdRUuoS02mt2hmOW/Akf9Ur
FjG2N3N5H4FAtqcwkOJ7+R4+kFKm4sME+3XwHf8A8yUjVPcNayva4xpGojw7f5yr3UNtBDhrHMzp
4gj89a11Ie2W6jv4gfFUXMgwfx8/igQvhPu5ldj8V+x43VE9p0/dc0/vNWz03P8ASLWPdNLvoWCA
W+e530Nn/gP85X7P5qnfQ21sEEk9tAZMjn973fT3KjXY/EsNdgD6nO+Guv0PzmuYmRlLHKwvzYMX
NY/byD+7IfNGX70ZfvPX2UsyAbGtHq6OeGtGo9r3PH0nepsdY5385/gv8FYq7XOgNfoSAdeZ/wAJ
t/OsYyPZs/c/65fndP6l9kDG2uNmER+hsmTUQd3j9Dd+f/OVf6TYt2yhmQA9m31nEO3DvMbPa5u3
8/8AQ+n+f/19XYyjkjY36h5zPgy8pl9uesTrCf6M4/8AoP6cP8m1AS0yDxzwR2+l9L6KMywjQT/V
k+Idt90O97f5CrsI0a6JA+Yjk6j1Gfznv9b8z9J/OfolJpc2JEDQ6g6DV3h/r+ZsTSO68HiFhvMs
aR7juj/e3+X7vzf/AEZ/OKfIIn+7Xv3/AKqqseQJJIAEOOkAe9uro/1/0TFYrfIB1/KJ9wPD3f5q
apkQT56/6/8AmSrvAEEx7RIOkCNJcYq9v9v/AEysEiI8teew+B/rIT9eCZPEc8bf5TXIXSqQOAEi
fog6CTwG7fY1rf3a/wDRpnNAkHg6Hkz9LwPv92z2f+lfTRXCQZ4me4gR8VA6GTEDlp477jZ9L27f
W+l/hP8ASpwQjdt5cBLidCQZJPvrnc/936Nbv/fgTud305gmOXdnO9rff+5v/m/0ljP5aM8mCDxo
HDiSInduLt7m7dvvf+Z/wVvqgfrzr+cdup171jb/AN8Z/wAc9FCM6jndpEnWdD/5L/z/AP6NR5me
NS4nSBru3f5//n1SdwZ7g6/EWe787262f6/zqJ90Aw6TA7gkiPbu/q/zX/gicELDnzBB15nT6W1/
td9L81KJ1HyJ/wC/Sd25Ltpx2iT+432ucfT9u9mz2/4P/hExeI3SOCex/fP7/wDIaiplHP5YTpvE
c6n8D8Sn4SSqNNB/DlPBOggkg7eR3LW87fzv9fYmgRxJ10jxEf5qeeT5zP8A5Iu/O/l/vpLTbIQe
30ogaeLS0e3+upAGNA4A/HvH/kmocj4jsDx5f9H+ulDY404nT+T+d6ftSQvqyXM45gSRptfPf+pv
2KxRkBhj/B6BzRBg/Q3N/ku/c/RquQ7k6a/Af2va3/4GShwMiQRpBieIiY935vqbmfzqCbBFHUOZ
13oXpNObhN3UEF1lTY0H0t9ev81t/t1f8V/N5uFmVUtODnTZgWk95NbjxbWf9f8ASfzi6rHyG1mD
pW76TdCG9t7df5v3fnfuLI630MVMdl4bQ7GdDrKf3ATq5jT/AIJv0rGf4JVc2GrnD/Ci73w74kMg
jynNnwwZz83F+jCcv3v3JuP1DptmEWv3C7Ht1pyGxscJLR7hO2z821n+k9RRxcsMO0zt8J0gbv5W
387+2j4PUTisdi5IN3TbdLanQTWdf0tbiPb9L3/6RQ6j09+G5l9NnrYl+tF7Zgifolw+H+uxQdLH
1HZ17lGXtZdz8k/0Z/8AoTO+hr2l7DI8Qew0O5zVV1Bggg+CNiZIgh3Bj5a9vc7+QpZNAHubqD3k
cR5e1Ai9mSEzCXCdujX/ANYUXNB7Sfu8Pj4KX8EkxsbhECa3hx1gx3E9/wDpQreDmZWHazJxrCbW
yIdBBDtrXse071Xc0HyPY6Ieolp4PI/6X8rclZGo0IWmMZA48gE8cvmjIcUae/wc3F6jjnIxyWvb
Hq0kQWkjw3O/R7t2z/zB6zvraCfq5mEfRb6XPibWLnsLNyMG9mTiuLXNEFvZzSGyyxv530Wre6/1
CjqP1OzMin2FprbfWD9GwWY79n0DuY9lzbt2+t/83/UWng5n3I8MvneJ+L/BDyeX3cVy5aR0/exn
9yf/AHz50kkkpXMf/9Cr9W7vT+rPVGhu42W116mAPUa+nd/Z9T9xAcZdPiZUOivsb0LIDTDH5dQc
P6td1zdfzffWxSKi5yV5AO0Y/wCM6/8AxZw8HJzyGuLLlnR/1UPTGJ/6p7qycJklWd4MlElOVEmT
A54+9JTE6wPpSY/EeLh+9tUSTAkyOxJgGAOzi1rf5z3P/wCuJ3EQfB3nEg7fF3/fUxmYH0tNG6d5
b2a/6LWO/wAJ/wCCorVgZiZjTQmP5Lon2t+g383/AM9+9p4n4eP5U8iJB0McaDSdunub/wBNMfvS
Wlaf9/8Ar/r6ifkePl2jj/NTf6+Sf/f/AK6pLCVeJRanlrvBC/1lPwiGOQsN5ryHC1sSOe+ndCpu
uwcoXUOLe9bp5H7u785Qqsjk6eaM9rXNIdrWeR3E/nDlO16GiNR5sGkSbiJwkOCcJC4zgd4vV4Ob
jdXxYnZc0S9o5B4D2/8AB6qEvrt9K7R4+hZxI0j/ADlylN2Rg5DbK3Frmn2u7n833LrsLOxOsY0H
9Hc0SWz9Enl9cn6CvYc3ujhlpkH/ADnnPifw08lL7xg9fJ5D5ywTl+hP+r+5NT6Rezc0Q/gjvKpu
aQSDwNfHQHlXGvsot9G/2vb/ADdmsEfyv3q3NU7qRcCYi1n0mmOf9WqTY0WiKkOIatBroMcHuJ78
f2lMH7vH/WFF7Cwkagfgk3n+5JQu6SA9u/8AsUgPuUWxHgEQDXXlBeAsAisaIk8eHwjzSa2eAT5o
jW99J0jUAfe5ArglYwREaeQ7fc1iOwQR23T3gnXt+d/r/bTVNmCZgcH48e6Bu+lt9r0QiBpI0+Pf
/pfRTUUsCNswOJ8vFSLyOePPyTAEwTp89ND+8mDDEd40/L+b9H3bUipiXzwZ7H8G9tqiNxAkHUaj
Tnu3+UiFn3Tp5ySf+kkGT2BHjqglHBgQSNJ0045dt+ikGbexEDXkRH/RRtnfjzI/2J9mogQfDiNf
++pJpFs000HHj/J9pH/R/wBbFIjX4eWvP+v56ntHhr+P9r/zpPE+fwn4lJSMNIkRr3AOmsePwRGt
0Edv9f4pEN8PH8fBSHj/AK6oJYgFp0Gh7ad1UyMV1ZF9EggaxDuGub7WPD97/oMazd9D+vZ6ugAH
aH7k21zTGmsa8pwJB0RKAkKLk5uHj9ZxSywbLmSGP0O06e02/o2Oq9v+v6veuOycXKwMo03B1d1Z
9rvH93XTw/199a7nJxiyz1sfR2kDQDnRr42WWV/8H6n+iZ6Vir5eHidZxQxxDbW61vOrgC3cd2v5
+3/Sfzn6Wv8AwdtIzYRlHFHTINj+9/Vk2PhvxKfIzOLLeTlMh9cN5YpS/wArj/8AUmP/ANSOZ0zq
bM2sUX6XtjY49/8AWEa2vaYPHEny/en/AKa52/GycDJdRbNd9R5IIkT7LG/yXf8AVroOndQq6hV6
dhDb2Adx2/19/wCYq8JEnhlpIOzzGGMQM2IieDJ6oyjrHhP6X91JTaRo7v4+c/3Kd9AcC5nfwULa
3VPLHAyOPMa87tn7qJRcAdj9W8E/fyntc9w0nNgGfv8AAa+PwQb6G2tIcY5Gvaf85auViwC9modJ
BE6T/wB+VB7droAjk6ad/DRIi10J9XJY+zDs2PE0uMOB/wDMlrdN6l9k21WO3YTwQx+h9Pd+a6f8
D/W/mkC+lljIOv36hUa7HYj/AErPdU4w4HjtP7yZGUoGwy5sOPmsZx5RfY7SB6Sj/XezupGSPUZP
qAydjvzZ9n5/6P2v/M/wW9USdpLH6EabdO/uIDPe76O32b/+tLP6Z1P7CW03EPwnQKrDr6YP0mWS
HfoXO/12LoL6Rk1yx36TtB27gfe393x/M/8AA1bjIZI2PqOzzmfBl5TLwT1ifkn+jkj/AN9+/H9B
pNdB76zBbHOrf6ln0f5aO10k8Az4eHI+j9P8z/X2VXA1uhwiZ7Qe/j+d+j/P/wDRiIx4MnUnURr3
G2OXe7bt/fQIXAiWzZ3zqDoddPPUf1XJiZ8/xSBnvPaR3n5pie3j2Ph9FMpSi4NgugCRzpwP9XKB
7eX0ieAQNrtxLdn8mz+a/wAMnBMyPaR8e3Z21zfzk0eAEgaGdZgM+nt3/m7d38v+onCkMHaeI7yZ
nUD97a78zd/g/wDtz1LqRFkwDoOJ4AkNfvb7fbtZZu/qVf8AbJpbtkaM7AGNPpfmF/u9O302s/8A
UfpwdHJGus6aaH37m+xu39Ls/nf+h6yNoQkRqZbH0iNNfY/3+5v0fd+d/wB2P+EsiTAgmACZE+0H
Td/V2fuf+e7tllky2O3lp3j2iNsfv+z/AI2r/S1ehE+eoPccR/W+h9D3V/8AB/4Oqn1UUMOfCZg+
U+1rDs2u/kbPT/8AedIOk8kz5ydYn2tc7/hP9ak5Pdx07zJn6W76R930fZ/1z/CerckfB2on3A+e
jvpP/dc76bKvf6X/AFsqXjxB+Y+H/kk0jTz8dPD/AMkmDZEHbrG/jy3GP5Xrf+i/0aceWkmO7dSd
d3uH+k9vu/8ABP5tKVP+/Q9pSnwSmfH/AGFKT/r8x/KRUr+PHefwTiCdfnrBiC394f2kw58eAePl
3b+6pAaASNNSJjgfyif62/Z/4GkSgrtBMCPcdeO5/N9o/e/dZ/3KTiAJB4EyTPaWuP3M/wDJp9pI
jUtPjuPMTo6tv+v/AAifzPPP/mXH8pNQAxLezdI4Akf6/TRMbKNBIdrVyWjXaZ1cz+SogSPGNQPy
fkTPbAkGY4+H7sf+QRXabHZzevdBFYdm4QBpOttY4aP3m/8ABf8Ann/if5nJwM8Ym7HyWet068/p
69NzHf6WtzvoP/f/ANJ/xnprrcfINBgz6JPubGrdPc7RZHXugisHOwRNLhNlY/NHdzf+B/8APX/F
fzNbNhr1w/wou78O+JDIBynNm+mHN1/qxnL979yf/duN1DAdhvbdS8XYtrQ6i9swQ797+V/pGf8A
bqLi5DLWem4+JH3u9vt/8wUMLMGMHYuQ02YNx97ODU86evX+6/b7bf8ASVoWTRZhXyCHVuh1bxwQ
fo7XHb9FVz3H1DreoH28m41hP98L31bHH8I4/wBf7SGFbDxkU9y4DU6fHVVXtLXGRAKbIdWxin+i
d1QolocIPHynkccqUgpJrMxrBboYj+PkrrnO/wCbXWWAnbtxXlvIn1izdx7fa1iqKOU9jen5YcDu
dTtaQCdfXxX+4t+h7Wv+mpcBrJE/y10c/wCMw4/h+ePaIl/4XOOT/uXn5STJK/Z7vCP/0cXpdhb0
wMBAY+973jQS5jKmU6xu9n2m72/y1YVHpj5w219/VsnjUOFH8rf9FjvzFeHmIKr8z/Oy/wAH/oRe
g+ACvhuEVRvMT4/0jLX/ADVJJaJKF1VjoJQyZHb48Dkf3/5n/TIQPihuBmCeef8AX3fmt/dRCCtu
IMzIBknXxa795vg7/Cf+lVGDBaO3aDpA9/H7uz89OXcGdee5MybI+k7+T/r6iUaQYj83WRpEke7/
AKbP6iS21FxJ+JnmVH/WU/Ok/wB39pqb+Py/1/lpLCuPL8E/4f68pD4JyI48+/8AtRYzLVZMnI1P
zTaT5IhaSyGh1geKuUv3iHaqm0fLxj/X+ujVOIIPdFimnsqaAWPE1u8IEfDTd+chUX5PT8ltjHEP
bqx/Y/vNd/K/farbC17dpCFZS2PTs1rP4f6u2/1Ee1aEbFZCfDxRkBOExw5MctYziXqcHMxOsYkO
hlrPpMH5n8tn71ToTNfbj2Ci87HN1rt7R9Fu7X6C5Ki7KwMpr63EPEFjx+cD++P+rYuvwM3F6xik
PG2xo97fzmH9+vd+Y5XMOYZRwz0yD/nf3XnviXw08mff5e58nkP96WCX+byf9xNJbSLWHQtsby06
fF0LPe1zDCts9Wi0UXENcJ9OzgECJl/7u3/ttGtqF4II23N+kO503SG6KTbQtMVIAxc5u/8AJp31
+5ysVaxpPHA1/N7f2kKysscQdI518OUmEcOEAaER2g/vbHe2UlAU3Wjx1MD8Y/kn/X/g1MSD3B8p
kaifbsb4+z/zNDqcIIPnvAI7D9J9Bv0P/UuxFgjQiPjoBBaN38lu/czf/OJpXWnp1ERz30jXw2v/
ALKsbAeO+v3/AAValxmedfhr3kD2tdvVkO0jt38PjCC5faBqf9fHsnIbGkj4/chl55j5n/N1mPop
SY8vj4/cgpcjudJSECDHfy/D/NTd5HJ5+acTyOfuOiSl+P4/lPCYjQiJH4GPFIwNOB2/2fmpET5n

1998\05\01@104939 by Alex Torres

picon face
KlPVJLlf+cP16/8AnS/+GOP/AOQS/wCcP16/+dL/AOGOP/5BKlPVJLlf+cP16/8AnS/+GOP/AOQS
/wCcP16/+dL/AOGOP/5BKlPVJLlf+cP16/8AnS/+GOP/AOQS/wCcP16/+dL/AOGOP/5BKlPVJLlf
+cP16/8AnS/+GOP/AOQS/wCcP16/+dL/AOGOP/5BKlPVJLlf+cP16/8AnS/+GOP/AOQS/wCcP16/
+dL/AOGOP/5BKlPVLlf8aH/iF6n/ANY/9uKEv+cP16/+dL/4Y4//AJBYH186z9a8n6qZ1HUPq7+z
8R/peplfbabtkXUuZ+gqaLH77A2tEIL5EkkknLX/2Q==

------=_NextPart_000_0002_01BD7523.99560AE0--

1998\05\01@104954 by Alex Torres

picon face
t3PEafSSStrA1jSfw+lrDXf5qXxGvMf6/uphxpr+Ov8AZO1Juvnpz5fcgplrxPx/2Jp58U5GnxUS
YPhxMxp+KSkjHQ7RWBWLWkD6QHEKq3TT8EZj40SSGJlphxgT2VHIxn1OFuOYMguHvc3s3eWb9m7e
d3+vrLSsIeCe8HXnlBceQ6CPA+M+coxNarZwEhTj9T6W3rGKyyndXlUj2NcdzQSG7sd/tZ7Xbd9f
s311/wCi/mlyLXX4t5IBquqMFpMEGP5P8n6D129lDsaz1KR7YHtAbGhZDf5sbG+38z/CZFn+E9NV
+rdIo6vSL6SK8xrQa3O03D/Q3b/0nbf6j/0lf/byGbF7nrhpMf8AO/8AQm38M+JHlD925j1cpMnx
PLyn6uOH+ql/lMf/AFXF+s/n6vT+oU9QpFboba3UHXQ8cT+876KlZU6twaeREfBczOThZBDmuquq
MPreIgjsZG1y6Xp/UKc+gU2Ha9ugJPEn/qP3/wBxQQnxaHSQdXmeX9mpwPHhlrGUfV6ZbEfvRT4+
Rp6b9Wn49gPJDycY8t1B47/BQtqdXZtcNrpEE9/u+kjUXhzfTfw7zT2udNQ5zh8/Lt/5igX0ttDp
EuPc6TpDf7e32rUycaDuHB7qg9hb5eceMISDJCTnV2Ox3Gq33VGfh+7LVrdM6n+zy3HuduwXGKrT
/g5/Mdu/wH9b+a/qKndU2wa/f3/rf99c1VqrPQJpt91TtDx58JkZSgbH8vBky4sfM4ziyi72I+aM
uk4f1ntb8dmUyW/TIBB8Ro3/AKn0/TWZD63FhB8IkGBE7f3va9rv/O1R6Z1R3T3DHyHbsJ0+nYZ/
Rz+Y7/gn/Q/4FdDk47ctkiPUEQex/d+nub/V/wBJ/wBbVyE4zFj6j915zPgy8pl4J6xOsJj5ckf5
fPD9Bp1P018Y5jjz/tIrhII8dZ7a/wDSVOXVOLXCI1PI0930td383+8rVNk+0wPDw8eE0ilwIIsL
ODhJM947+afcB4jkiO0Swvl278135zkTYYOkGO3Y6Ibg0aDy9rdO/s/Ob9P6KCWOpOuukHl3725s
lrmu2+76X/o5DIg66EHUzqNzfTPu+n/xP+m/0f8AhVJzhHuh0aEnaZaPpf57W/uf4P8A64oPJ+jI
LhLeZmfYfa8/yd3+j+n6v+lRWsTrpoCTGmu0w3iHf1PZ/wCCfo6FEkbdwgA6iDAGm7aH/R9u1tP/
AG1/xSk9wkk6giRJnSPM7X/9u/6X/hKlF0iSZnWZ1MQ9j/pNZ/0v9F/oa0QhjxJB0BMkaEAb5Grv
a5rGbq2fmf4X6DEw0kcbdIZzOv0Np3fS9T+x/hf55S1Lp5cNSPpkbSXc+9+5n0f8F/6SaI29wI1/
N/zxt9n+v/FOUqIMRHaO3G2PzXbNv8n+a9N/8hNPeT89NO7Xe36Pu/8AUaWkajtxAHZv5sNT6/6+
MaR9H/zNFC2nfgc/D/zJPtcZB51Hz+jx/wB9am+Wn+uicCeRu7kePj+RJDJpMwTydwI1P7vHv9+u
5SiGxBAiOOI/rNb7f67/APTJjM6mAdJMAEmPc7VzXt/74lI7c+GgMzuPZn76alfueJ17ecn/AKnd
7k+0zHHBjwCbSNOOx7R9HmG/vJwR8QfD+CKmcbedCDoNdZHb/NUyRtl0uHf5S/8A6Wz2oYcRxpHy
Gkj6PtSgcaAeJiB9Lv8A1WuQVXdi5hbx2+I4+P5qLiZJx3bYmp30mAfRJ/OThupkeB28eHw/N/1/
0g31EGW8eB4CSRRFFyvrB0IVNOfhtDsVw/SMb+Z/Lb+c6j/zx9BY+PkNZX9ky5dinVj+TWfFv8l3
5y7DEyzju2uk0unc3mJ50P5u38xY/wBYOgMoYc7BG7DfrZW3UV7vc2yv/gP/AD0q2bDXrgP70Xe+
G/ERkA5TmpVLbBn8f0YSl+/+64dtVuDcJgsMureIIcCJ3t4dt/MR3tF1e9upjWOPvQ6b2tZ9kyhu
xnk7LOXVk/nN/k+1Qcy3BvLHw8ES1zfoubP02wq/iP8AedX1RlwT0mPlP78WJBaSCkrFjW2t316z
28/mq3Bj+9NIps453od2SrdRj7HZpxEf5zVYCrdS/oVn9n/qmp2P54/3gxc//uPmf9jl/wDScnFS
UZKS0afPqf/S53pDQ6gjmXmePBv7y0jHb/WFndGj0TMRvPJjs1aL+VX5j+cl9P8AovQfA/8AcWHy
yf8ApbIxTpu6RULqqKg7kAGPl3OjdPzv6u1J7oHImPya9y1QJ1iQNe/ke7dn+v8A1xFElpB1nTmN
3aGjbz/nez/1GxJOoM95PJJ7u5d7o/eTgniJgDkk9hP/AFKY+cnt/GEmMrGP9f8AcnbA+XyTKQHh
x4DVJZI6M62fhyjmgho+7xMBExKgTJMBvdOXOuvbVXpPzgRqeP3U8Bqynqew3aj2R4/KEOAdB9w5
058VZfY2y30MasuPDT9JztJd7S3f/K/4tVwwuk6ET/r/ANFAmmXFGc9xWglrvwy+U/8ANUIMDn4f
w/1/0aK3zQoMmdf9fNSHtP8AD8UgUTiRuG1W+FaYQ8QQT2hUa3efHco7DEdidI1Kc15Be2hhb6Lx
uqOjeZB+kNqr035PT8lj2Oh41Y8RDh5j/q2LQa4WN2mNdYQLambDTcf0T++kgzyP5Xu/1/whrrdE
bFUMgiJRkBPFMcOTHLWM4vT4edi9Ywy0+yxol7RBLT++zcfc3/1IpNNrLPRvO2xsbLZDmnVzve9o
+hvrsf7nf+TXHUXZfTstr63bXtO6uxvDhPH9Zdfg5eL1nFDY23tHuaBJYTFe8bWe5jvZ/wCdq5hz
DKOGWmQf85wPiPw2XJn38F5OTyH/AAsMv83k/wC4m2LKvXaWkbbhy09yOHfmtWfZWa3QdB56DQT/
AJ3739dXWOfXYKcmQdDTcQeDue1trv3P3P5FaJZULvY4AXNEEkfSgdwD/bR2NFqAiQBBu2hVYQdC
YadY5AGk/S9u3b/wfsVup4LYEN0JkccRv+j/ADft2f8ACf8AdhVH1PrdEGRxBJ1jWHtP/F/R/wDV
k6nBrpEaa+0caBxLNvs27Xe//Sfze+1FTfbIMcTpqQT+b9LU7/bYjNcHRI5HeDz3/d+iq1LyQONY
JjXy8dv/AAn5/wD6NsKCIH5sxHM8eP73/XEwrrKUSTOs+PhPz/tKcRH39pk6/wDSUawNYEc+CI4f
hxHhKSgGIAnX+5OAOOf9R9FOOO/klHb8O34JLlvMfl/2/wCrE0f6/BT5+7jy1TQkpH3j7gO3kAJc
5IR8R3Hx+KTv9v8Ar/5ypNH+v+v7qSurIAxHfw8VEzzP934qYE69gZ0/18k5b5fPsglFMeQ/1P8A
1KkCQf8AWPxSP+v5UhPyCSkjAT3j/XslfWQZjvzz/FJrgPiNAU73btdT5n70ktaTq12vI1Gk/D6S
rvqdjO9Wg+w/SZAO76Rbv19/s9377/SV01EcAqMEyDMEcT4/9JESorJQEhRcrq3SaOsUC6gtrzKh
AJ0mff6V/wDI/O3f4Nci05GHkEOBqvpdtex3II7Ef9Su5trfiv8AVq1a46tGoiXOP6OG7vp+/wDk
f8KqvV+j1dXpF1IFeazRrzMOE7fSu09zHWfzdv8A6kTc2Hj9cPnH/Pbnwz4meVP3bmfXystj80uX
J/Sj/qv34f8AVcX+uq9Pz6OpUim0xcNAZnj/AKW3+R/rY1tb6bNrvpDUQdD8PpOXNA5GHeRBquqO
17DoQfA/6/8AQXTdP6jT1On0bDtuA5JPeJd7nO+l/wBD/i1DCd6H5hu6nMcv7VTgePDOpRlH1RqW
0gY/oySUXNcBXYJB0Dv48KF+OPpDUHUHx08v3UOyp9L4cNpBggeXht/tItN8ex4558NE9r7ahour
g8QQfu/6rcq19IsbBnQaTPy/ldvatW6lrtRp5/iqVtJaZjx7aeaBGjJGTRqfsJot1rPBA0Hb874r
S6T1V/TbG4uU79TcdtVjjHpz7hW4/wChd/4EqV1O7Qifv8eyHWZb6NnEe12nb5JglKB4osuTHi5j
GcWUXE/48JfoyhL957LJxmZde9kCw6z46cz+9+6s1rjW/aeQY5nUfm9n7tFndH6wem2tw8wziE/o
7P8AR/yX6/zH/ntdLl4bcusOaf0oGneZ8x+d9J7FchOMxY+o/deez8vl5TLwT1idYTHyZYd4/wBb
9+LXot3sBEHwjv8Aiz6Sm8OI0mB3Hj7f3Xt/Oa7cqDXGm0tsAHO6YOh1j838xXQ7dB54MxwSf5Uf
2/d+YmEUUAg7ILGkCD34kugH2jVxI/OZ7H/8JvQnOMmJmdAZ5E2MGxx3fSez9z/ttFc1pEwAC3kR
EH2ujaD/AGGfpPU2VoLge/w0B/OJ/e9n5/t3IhTEmRz7TPJ0iR7nsHt7e9v/AKV/Rx89R+6TpBPw
2+7X83/wNSB4IiedNNYaOzimiOJHgfL/AKr81PpCiZ51AOneP6rSXN+gNijoPj4jT+t/1Skf9Z/i
mg/CPkUUUr4f6/ckZ7fh/u/e/wBf5xPH+uqb4fl/uSVSh28Ox/1/sqQgAaCRrr4D+t/JTfhPHxjj
snb468zH/S7IFVLgwYB8jtOvDtv+rUvnIHA7aSfoy3+skBJgSf8AXak2CROskflSUv38wdeCZ/1/
kJNGp/L8vifopASAORp2gf6/+TUgPHXWZP8AFBIUIg/BTmCZ155M6EARr/U2f6vTDU6zPbx/1apN
iSYESDJJgA+73bv6rEkSZcmABuJ1mJ892rP+m38//racjmNO/wB/ukuSAMAO10mDJ/8AMvzfobFJ
oMwO+msDSQ33bUkIbay4yPpTEmddSPDyU8LLOM8ssH6F0h7SJjXa47fzkUM0iAR4AHg/61/5iHdQ
HgbZ8AIPHj/r9NLZNg6HZxfrF9Xm4zTm4Q3YbxuewGfTkz7P3qfd/L2LEqurFf2TLJOMTNdsFxrP
MtAnc3+R+eu2wc0480W60v5Hh/KaP++LF+sX1dGKHZ2F+kwrPc9jeK937n/Abv8AtpVc2Hh9cNv0
ovQfDfiIyiPK81L17YM3ftGUv85/6UcFzbsG412Q5pghzdQQfoub+aiWsa9oe3VupKhXbWGfZsqT
j/4Kzk1Ejy97mP8A3f8AV7EW4Vxqs1adZ7EH6L2/1mqDSvB1BxRlwy+cbH9GYYagwdFX6kf1Kz+z
/wBU1W7WtHuaNPAEagKl1Jw+xvB5dBHyc1KGmSP96P5p5uXFyXMf7HL/AOk5OKkkktJ4F//T5/ov
8y7+ufAdmeK0Ha9o8vLhUeiCcd4nl508YDPP/vqvuOn8DMqvzH85L6f9F6D4F/uHF/h/+lcjBM7n
zTlN/HsonVY2TEeOg1gfioOiPI6RIAMFzo1az8z/AF/SbFN2mvB5nUaAO/78ox7tNZiOT3a1v0Wn
dt/d/wBbkg0x7RzB1IMwZ+Oz+WmOo8E8agjyidTBnw938v6P+j/4KtL/AHH4pLCGPfTTw14RKm7n
d4H3qGs+f3I+MyXgQY7j/UIhhyGg3pFON/KPZV63+ljW5AMvf+jr7iTu9R3H5u3aiZjnOcymsSeG
jxPyQspwba2n/B4wBcefcfc4/nf5qddAlr44cc4w34jZ/uh1Pqt0+p+S697XH7M1ordHtD3b93b3
O9J30f8AhEXqnSxfX9sxdX/4Rg9x09u5v0nP9jWerX/1yv8ASfz+hi0/s7pFVJbtyMgTYdJ3u1t9
zG+7ZubUxPh72FzDJBB26Ew4e0j2tf4/vK/DDH2hikN/VLvxn/uovMZ/iOaXxDJz2CekSMeH9OB5
aHp4P9jm4ff4P85N5Bzd3aHafMdvd+6hiDoefPhdJ1jo3qbsrFbDxJsqaCfN769Pd+9axv8AxtX6
T+e55zdwPZ2mvkqGTHLHLhOx2Pd6rkudw8/h9zH6ckdMuP8ASxy/7rHL/J5FmOIP5R4qwx4IGo/1
/wDOlWEnTUHz/ipMeWyfvj/X+SgCjJCm6xxHHCsAixsTGnP+5UmPn4o9b4I1mU5ryGrGytpYarm/
oxqHD83xj93+ogVXZXTsprmmHt1Y6NHtI8Ffc0WCRE9igPYx9Zotb+jPEctI8CiRqCDRGxTjyCIl
GURPFMcOTHL5ZxPzPUYGdh9YxhuaBaz6bOHNdPqbq/c32P2fmel/o/p/zk2OfURj5Rgs/m7hJgfQ
Y5zi4/onfvu2f+l+Mpuyum5bXscBY0zW4QWvb5sd/wBNi7Lp+didYxo/wjR76tC9h9omkuZZ9OPY
9v6T/TfzSt4soyjhlpkH/O8Q4PxH4ceSl7+A+5ymQjxOEn/J5P8AuJp7qfWG2wRZ20EO1c72fm79
v9f/ANKZ9lbmGHACRyfog/yXu2s2N/O/l/6X1dit1l9Dm42VDRAFN7eGmPo/RZuo09n/AAnqfzn8
8i2V+qTXaNtokGPzhDo9x/ebs/P/APPadqNC1BUhY2adb4MgnXz7D3aN+jv9v0v/AAwrVdm7k6+X
+rf7P/BqpZW6sy8RqZPjAe537v77nbf5f+D/AME7LIPYEfgdHf1fpf6/6REdkh1KXa6EfEf7yrET
z8CP+qH4/uqjTYDyePGT+Uq4x+kcefzJ4KauC511+Zie6W0jTjkSlI07Dt/enB01Hw+SSWMaifu1
PiT7f5KUGIIj8v8AV/rKbhpofPn/ADTqhnTjg/k/NQUtH+oSiP8AXw/rFPM6paIqXB01+/5pyfIB
N4/6/fp5p5QSxd4Jh96cpyISUpomPNWK2tABM/kPhtVcOAEc+IT+qR/DwSKQ2rLGRAAn4c6n28+a
q2FsmP8AXVDdaTqOD4cKEk6jj5/HsEgolk9/5p1DjqPJU3g41nrVCWz7mwJM8s5927a921rP0n/G
KzAGhjXx8fu/kpnwGkH3NiCDoCPP/wA5RBpZKIkNWh1bpFHWcduRjkNy2A7Xn88CP0drobvbvO71
P+uf8AuOnIxMgwHVXVn3NPIPn/ne167UvtxLDbTJYTq3kcaua3872ofVelY/WaPtGP8Ao8xg9jtQ
DB3elbH063fmu/8AVaZmxcfrhpMf85vfDPiR5Y/d+ZuXKSOh+Y4L/Sj/AKv9/H/1TH/rKXT8+jql
IqeW15LBAB0B0Hdx+ih3VupeWuEEaREHT6K55wyMXIMh1ORSYc0mHAgf6/110fT+pUdVp9G0ivKa
IngGAP5Tv9f/AASKE70Okg6fMct7VTgePDKpCQ9QqXqGsf0V6rphp5Pj9yVmuvIH0fl8v3kK2i2k
lrgWnjXt9ylVYHGOCe3xAJ/6pPYNNw17KwOB5DiDp3QHskmR3kTz/r7dyv2MBOnB8vP4fR9qrvq0
JjtP3D+03/zNNIXxLXcwWs9OwyRwe/h/nK30PrjunWNwc136pMVXcmsn97/gd3/bKAQJ11j5nniV
DJx/VrJiXDvHzTQTA8Uem7JKGLmMZwZx6TrGX6WOfScJPZZeGzLbvrMWnVpBGszAkrKrc6mwtcIP
cePcrN+r3XjgOGDnO/VT/NWkE+mf3Hu/0Lvzf9H/AMWuoysSvKbubHqcg9nf1lahkjkFj6j90vP8
zy2Xk8vt5NYnXHMfJkh+9H93+vD9BpghwkEjdpM8yPzfu/cQns78f6j+WhsdZRZssHuGjgf7laBa
5sjUHz/BIiitGuzTc2JHP+sfylCPx0/1lW7a5E8888cqs4EE+f3x8pTgbUQxgd/nHkkZ4+cfFOZP
z8U2nb+/sihQ/wBSlpB8Pw4/tJR4f668pTx+SZSTS4B7azAjSf8Avzk+h576mfl++fzdybtqAQeZ
4/774pwBB786d/8AvySFTJjQkyT/ALPzk8R+TiDwRHu+j/6rSn2nWQZ154/6Lvc391SEfDwg9j+b
y3/oIWpQ/wBsj5/R/wA5Proe448dUhx+OninAnw/1/e/NSV0XDeQYhvw7Ee387/zhTa0D4gEangE
fBv9tMJkDWfA6x94/NUxLjJmDrMmefIbvbt/19RIrSoAGJGncfASfzXN9jf5KkJgaHiBP/Sbt0bu
TbdAHCY0P47h7dvuUgDydC7/AH8fnf8AVpKZAAD3axEjz5n3Bv8Ar/LUtmo0BIOo076fyfbuH7qY
D4g+PMEd9Apjz45EzP8AV/O/OQU17qNw9vOmp8R+9P7yfCy/R3VXAvpcIc3wnks+j4uVgt7jw1/v
9vt/6KBbRu9zNH6wOOdNvtDvpJbLrvQuD9Y/q8MSc3DG/Cfq5jdfT3d2/wDA/wDULDqc0sGHef0T
tKLCJ9NxGnH+DXfYOVt/QX60v9p38Nn2/n+30nrmfrH9XjgOdfS3fg2n/tsv/Mdt/wAE7/A2/wDm
HqVc2Lh9cdv0o9nofhvxEcxEcrzEv1v+RzH/ACnaJP8AnP8A0r/08JzX0vdRZo4dvh+6iXVPPR+p
WhvsrpY17j+9ZkY3pgfvbvQuQrDZLGu12kBrjodo/M3fSWpbSwfUzrF4JLnWUVEaQAx9Fo/lfzmT
buTMIvLHtu2fik5Q+H5+IesgY/A8UoxP/jbxCSSSvvFv/9Tn+jGMUkHmx2h8hV4H+UtArL6UH/ZQ
Q3R1jwD4kNqlsDc785n5i0WGW99dYVfmP52X0/6MXofgQr4fhPf3P/S2VdL4JnGBPhqkJiD+KhdR
Z08iZA08VE86wROp/wAz9797/pqYGigf9fHxnd80lMNdsjkCSIntu93s/wCC/wBf0yRHxAGkx2Jb
H/nz86z/AMzlyQRySI8eZ/ee785RAHhwB2J7COP3vU/d/M/4x6K0rQSPD4K5iCCXAHTsqgEnQ6TH
gVcB2Unz0nyKdFrZiuxw9SzJf7hSC4A93Tsr/wCl/wAGrP1fwjl9RpL2mxrXevc/Xx9n0fz3W7X/
AE/8E9U7WkNrxfznH1LRpoeGNc0fR/N3Lpeg1DD6W/LeB6uV7qxA3FsbKGbv0rnep9P+b9nqKbBD
jyxHSHrLmfEuY+78jlkNMnNf0bF+9wS4vdn6fV/N8fDP9DJ7bZyLhdl7hrXQBMcFzon6J3fufn/m
JODWVwdXO5PMkAR7oZ/a/SfuINbi1urtzj7nO7ku/fO7ds/0n6X+cuUDYHHduBnuDrGrvf8Ane5v
85+k/P8A+B2K7ubeZAEYiP2+bbpsmA/TiHRAMf2av6//ABX+EWV1jowfOViCLBrdSBzM/pK2w13u
/nNn+E+n/Ofz16twBGsGWkkRzO4bf5vx/nP8y3/S2qrJAbO3s0jw9v5v0vpfR/8ASnpITjGcTGWx
/DxC/l8+Xlcsc+A1KI2/RnD9KE/6knh3N3jT6Qgj/f8A9SojUQeRp8Y7e5dH1vo3qbszFZtsjfdS
3gydbKfzX+76ez+c/wAH+k/pHPObv1H0vyj4/wDUrOyY5Y5VL/Bl+89nyfOYefw+5i9M46ZcR+bF
LtL+pL/J5VMcWqzXZPef4/6wqgkz4jn5KbHQY7eH5UAVmTGQ6NVkfBTtqDxub9Lt/t+5VKrOJVym
zx+idD5p4PRryFFrwy2s494OydDrLXCDub/V/wBf9GgVW5fTMwFp22NnY8cPb/VP/U/+o3q7kUae
o0TA14452/ghAVXVnGvEtGrX/nNPO/QFv0v+tpEG7BqQ2kuhkAEoyiMmLIOHJjlrGUS9TgdQw+r4
h4ZYPp16AsJBb7P5H+jf7LLPWsp+n+lU2k1kY2SQCCRjXkHaNdzKvU9u/wD0fs/9GLjKLszpecHN
s9O1sOY4aB7Z7gbva7b/AJ//AAi7HAzsPrWKRt2vaCH1iCWAzXva41WO+ja/9I7/ANGWq3iy+4OG
WmQf87ycH4j8OPJS9/ATk5PIdDucJl+hk/7if/qT+cO5u+WWN22tiHcT9Jlbtdv/AFvcqdtZrcRM
AaHXgAAT7X7fb/1v6asBz69tWSfbxVkfSj+s7/R2t2u9/wC+iuAf+jt+kB7SCPcDB9jifztv76cb
B1aoIkOIG2nVYWETpHbUcT/J/eWhVZpHHb7vZzos+2l1bvcNDqe0/vR/Wcp12OYZGgPhIHbj2pEX
qE06gM6zPn/r/KT9+ECq6eefA6eLfD+Q5FGv+/8AuTVzNp0TO58Y+advj4fHnw5TO1841j7v6yCm
Pn38UvJKDx93in/18vFFS2sT+Pkn7/BPAHPbsmJj+KCVSAm3R24TGY04TfLjTskpW6eNEv8AWfgm
055/2KDntEkn7vyn70lM+NT8v/OtFFz2tgaaePP/AJJDLnzA0PmfCfdr/V/dUAZ4766aTHGsu/6p
JDM2mfbzwBqeB/5L99M1xMTr5aR5fRSFZOgbA8Pn5D95GrxyTIjQ+HmkpA6suHgdBMA8+785VGmz
FeLa42yd7exk7n6+1v5q1/SDWqrfS106R8tTOnb3fnogkIMQRRaPVOl4/WccZGOQzMrENedAY/wV
42/Q/cs/wa457L8e9wLTVkUmHMdyD/qf7f8Axa7Jpsx7TayODvZBjn3e33OT9U6Vj9aoF+ORXmVi
GudpPf0L/wCt+Y/8xMzYhP1w0n/0v/Qm/wDDPiR5U/d+YuXKzOh+Y4DLrH/Vfvw/6pj/ANbm9O6p
T1GsY2TpktA2uJ5j/pf6/wDbqvx30uIOg7Htquetpupuc1zTVfSYe06Frh+9/wB9W70rqzMtgx8o
xawaOJ5GnjuUMJ3pL5g6nM8t7VTx+rFP1Ax9Xzdj+6mrfIII1Pb/AF/lJzWT4GdR5d9yVuO6t0g+
06AjiOO0Kdbg4QRopGu1rKu8anhDaQHQ6I7d40/sq85p/N5VZ7I4+H9yBSGh1DD0NrY2nU/irn1e
+sRwnNws1+7EJiq0n+bn813/AAP/AJ6/4v8Amy1w4Fjx7Xd/Lx1WX1HCNNm5oljtYHn+6mG4Hjj9
WfhxcziPLcwLifkn+ljl+/A/vPdZmGzJZuGtgA2EckEB0cf5iy2PfTYa7PbBhwd27LJ+rn1j+x7c
LOfOLoKbDqatfoOk/wAx/wCev+K/m+qzMNmU0FhAta32FuszGn525WoTjkjY+o7PP81yuXk83tZd
Yy1x5B8uSHeP/dw/QaYEx4HXw5QHsDojgx28x/W2/STMe+pxqsEQfcP9qM/3DcDMzr/sQogrNOjU
I8U3x8O6NYwyfHuEKIOnx+KeDamMSCO3+v8Amp03b+8z/r+8pCZOnHh8nfuoqW8tCfHQjVOASDGu
nidNJG7+ttTiT4HXx7gbu37/APnqQIGvn3PhqR/I53f+i00lHkoiCTwNY8Ylx3DQ/vJ/hoNdBoOf
CP5SaNpjXTmZn/Vyf4/3pKAV3UmgHnUDUg8Hhu3RIAg66cgiQDoPcpiTyZ5kGYmXHx89yKJMmgyI
nWTxz8mj6X0U4AA8e8n4eMNd/r/xqYAEHSfGfD/Nd+buRAHE8R+QGff2/MQWreZEDXUajn/N/wBf
U/RqQA1HI8OePaB+du+i/wBu5MzUgjjTw8uP3v3f9fUU2jQREEeIjT/vv7n/AJ7SUuNT4kceJ/1h
TaNY5n/UlINnxPPl5/8AfFIg6z304j8u5JS4bOh7xp3g/wBX+0mLe+pEidT8fFTEanznjz/84/tq
Rbp3hJQad1Ad7m6OHcHkclvt/qKWPl1is4uUGupcC0hwBAmGPY7hr6tz3N+gjOaQdPvVe7Fbb9GG
keAHht/8xQXaf2vL/WLoDun2i/Hl2C5whxMmok6Mtcf8F/orv+t2qz1ag4/+Lu6Q0G4V3kN7+rfX
dXuMN3P9F9TV0WHi5DHNJ+iIP0nQNfdptb/0VR+vkn6qZ3gPS/8AP1SZDCIzMh10puc38Ty8xyse
XyeowlxnLfqycMTGPHH971fO+R7gkopKenLp/9XnumN/yc1xEg23D7m4/wD5JXRGscSe8oXQwD0Z
7zyzLaGHw3VWuO3+u6qr/ttGiPGOO5UHND9aT3Ef+hF6D4BLi+HYwf0JZY/bnyT/AO6Uma3Ty/17
J/hyE4EfFQOqqFFw8BJ8OZPHdTTHXlJSI+BMjzmI0d/33/ztMRpqCQDrp/VY6PZ7f9f+DUiONY/L
r9JRhvkJ+Wn0fztrvzn/AJ//AIEigr1Dc/x+7xA0jb+c32q2A172tJ9oG58gAbR9LsdzdrUGgSd0
yeRwNeXN9v8AKepXOIqIH0rnRGs7R7tf+inja2lmuUhEbyNJMCk52bWw6/aLAIJI9jZfYPZ7v5pn
prrc41AV4dQAqqEuaD7QGj6O33tbtb/o/wDS2f8ABrO+quHXW2/PtHtrmquQfot225D2/v8A7n81
bs9L+WrT3Ove57vcbHagiTp7W93bf+r/AEuz/uOrvLR4cfEfmyG/8H9F5r4znGbnRijftcpEYv6v
vfNmlH939HFL/YrFxbLiQ1zSXEF2wzuG9u6XPY1/0f6//XlEh0/SJ2wJJLZ92jf5Hsqc/Z+k9J//
AA36Nk3Ht7oGkaj9783T813pMq/4dn6L9YTEdw7UfnAaAt/dexv5rf0v/FMZb+j9GuhTAaOaTqwZ
LS3w7zDRr3Ah7Xeo0N+hX+l/8+FrsmJiR4kE6e9w/Oc5mr/U/m/6/p2IR+7QmPDTc7aG7fd7Xemz
/Bv/ALb631GmvIDgOOBt+l7fztjN3+D9P/rqKQW5XYBodIOrpM9/c5xj3aO/Sfvsq/0VvpZPWui+
pOZhsh5G62pvfWHvqb7nfT+nX9P/AK9/P32vJb3kTB8DO7d7nbm+5le//RqxVc3cGugdxq0cwzuf
Ts/Nr+iz/R/n3JsoxnHhmP7D+8y8vnzcrmjnwS4Zx3j+hkgfmxzj+48OQH6jR3+sKOp0PI/guk61
0T1CcvCbNmpsqb+dpLrav68Pd6f5/wDOU7/8Lzrg2wSNHaEE/wCxZ2THLHLhP0P7z2XKc3h5/B7u
P0yGmXGfmxS/d/rQ/wA1kXY4g6f3K3VZwVR557c/DvtlFY4g68+SQLFlx0XXpeHAA6g6fjx/nIOT
QW+4HUe4EeHJ26e36P5qDTZ5crQqeLG7Dqe3y935yeNdGsbBv7Wk01ZFf2bJgCTtIiWuGjnN/q/u
KtXbm9LzQQ/Za3WuxvD2+P8AaVrJxnVu0kx2AjUE/nFOx9WZV9jzJIBBrsgbmOid7Z93/Wv9axRu
wakNiyQmAJQkBkw5BWTHL1RMZb+l6jp/UMTrWNJaBa0fpGQJbuc0ex0t/Rf2f/BFMbqXDFyXSxx/
Q36kj93d7dn+v8tcVVbndJzmncGWt1Y8atsYfj9Jrv8ACVrs8DqGH1nDIIG4D9LUdS0z9Kf9F/KV
rFlGQcMtJj+Wjg/EPh8uTl72G8nKZNjfFLF/q8n/AKjmnc0uPpWiH6lrh9Ejxa4/FU7KjUYI/J/d
5IwJx3DHyvdSYdTbyWnXXT833Iz2aejaBMSx/YjnRwCdqC1okEWGnXYWwBIPGnf4f5v7qvVWgie3
3gfSVG2l1bo7HgnT8qnS8tdI0Pn8OfzP3d6R11XOlPy/18UgJie/5T+61CqdI7+fA/v8Edsdzzyf
9fimqUGmB4GPyfBI6eU/IflUidD8O34/+dIZeBrOvifJJKifl8VGQmJ8+E0HXjQpKXcR/r/ruUd0
9vxAUg09+T+VSFZ7j/UJKQkT218Z5jzTbTMgfl+Okq16PkfiUxaBz8ElNZtAgDy+XyRm0DvoNfx+
aluAGnZM63Ty5SpTMNrZyNe4451/kpnXRo3t4fj+8gueeBr+SUzie517T8f7KSl32E6d+w840H5v
5qG47p7jXjzBjb/nKW3w008dY/1KkGH/AFB8vNJDXfWHcGXc6cz+P/qNV/0uLZ61PA0c0cEe74rS
9PT/AG/DzULKQRBGmvHmiCoxsUXP6r0vH61ji+nbXm1j2PI57fZ7i38z9x35i4y2m2m8hzTVfU6H
sdoQR+a5dqRZi2mysD+WzsQRx/0lDqvS8frNHr0EMza9GvOgI1/Q3/yf3LP8Go8uHjHFH5/+k6Hw
34meWP3fmLnystAfmOC//UX7+P8A6pj/ANbjdK6sL2jHyP50aS7vH/U/SWiahO5n4LlLqbarXNe0
13Vna9h0IP7pj95v561um9VNg9O07bmxqfzoH+dv0UUJ3odJOnzPLcH6zH6sUvVEx9Ualtr+66wb
uEeCDYCfPx8P+/I1WRW7R2jok/6/nKNre4M+ceBHl+8n+DWCBrADoOfHTnyAb4ItlbLqNjuex18v
FQ0A7eAHj/rtUwRAj/UFJLzuXjPx7O/p6+cf+YLa+rn1k+zBmFmvBxeKbnf4OfoV2bi5vofmsf8A
4L/CfoP5qOXS2xhmJ799eFhZFLsZ/wDweunPn/q1RnihLii2x7XN4Ty/MC4n5Zfpwn+jOEv0X0jL
xGZbN7P5wCWu5n4u/OWW11lD3V2tggwRqNR/WDXLK+rn1j+ylmHmunFPtpudH6I8MZZvO37N+buf
/Mf8SurzcJmSwu0bYJ2uMCQPzd3s/wCo/wDPf6O1DJHJGx9Y9nnOa5TNyeU4susD/N5APRkj+8P/
AFJj/Qc2xoPuGoP8O6A5vb/UqbXPoea7WkFphwPYp7Gg8a/DXjnhHYrA1yCdNSnjU6SNT3/6P+cp
OHcan/X/AL8UtBxEdj/qP9f+3EbQVAAzMkDQ6zoR5hze/t/kKQ3jkeB8PL3T/V9qbQiNdZ050/6X
5qfbx7R3/wBRLW/1UFLDw5/18vanTxJAGpPke6drQYmdfl8klLgAgA8cT/1XDfzVITJceT5+Pmk1
vE6TA107T4f1f/O0UEDjQdwZ7kN9zfb/AK+kisOqg3UfEGNO/t/P2pwAYjmPbIk6fvcfvfvJbTGo
gGQewBMV+3adv5z/AM1SiQSTtBMkHTT3u/79+f8AuJKplrGoJngGf63L/o7P3/8A1WpDQgnSNT2B
n4v/ADkwHcDXmfMx/aUhoI4Hbtofk1JXiu0Dg9vEzqIP5xUgNNfnx8/+imHPJ0J7x5/1faptBEdj
+SElMmt14hEa2f70zGkwOePgiMAgHn4fCdv530kEMTWD/rB8+U/oxzp5nQeKJEf6kTpA/wCj+4nj
XT/Z38Pbs/f/AJCKmIYAOAPM9jp9L+r7vzlg/X2P+aedBj+a0/69R4Hb/q9dBr2+RP3e/wD1/m1z
/wBfT/2J5+v+h55/nqf9f+3UlHY+T4+kmlJO4gxU/wD/1qn1aosP1Q6hY0EtOXVugTAr2Oc8/wAl
jbUEggkGQQeDoVr/AFFx/tP1S6hRIb6l1rN3P0qqR9H2/wDVLIJLocRG4B0TI1938VHzY1hI9Y8P
+J/6M6v/ABYmBh5jCN45BmP/AFePB/77qSTJKq9Aukkkklg4Ht93nx/1KjOvz8SBzunQsa38389T
IB5TMB3Dy1nmOT4buyIWT2S1tO0AdwBPwH9ZR1tvPpCYiqluh9x9rWhzv+EKk5wrqc8cj2t4mT/0
muWr9VsJ1mZ65aHMxWl0u3QbHw1nBZu9p9/v/wANX+jUkIccowH6W/8Adc3PzI5fFm5ogS9mPDjE
vllmn6McT/V4uDj4Xcsprwun04FQLCYHYO0+lY/9G79I97fzWb/+2shV2bTJiQOBEiP6vv8A3mN/
7a/4P7TPMsFuVYWlzg0mtmsmW+1zol3ua7c//jPU9L+d/QtAaA0iBoHDUADt9MO/Rv2t/c/0X/Ar
SNXpsNnjo2IkyJMpHikTvKUt5MQ0yBrJHIBmAOfaP5T/AKP+hx0oBAOmo1OhGkuPu37fY32bHP8A
5n9F+j/SpBoPMGTJOkEwQHRNftu/19Sn+bnrIdrJMy4ls8Fps0/O3bP/AEX/AD1SRRSP49jqO0nX
9xzq3ud7voep/wAVZ6dSgGlwjbOm3QCdYZ9Fvt+mNnp7/wDqN6M5oLdNNNocQZEgt2uZsdt/nW/o
/wBz9H6f856sDBOnPjo4gAhvultu5/s/f/wKSQsSJ3eJJE8z7Y7f5n/nr/Rka+JBMak9vCHH+v8A
mWP/APBVCCBqCABwRIOk7I21e3+Rtt/7cUQS0xJJgiJg6BjfHf8A20CvBb9NpkNJl0y2dJdIfHJ2
7vZ/gf8ASfpP8KsjrfQ/UDs3Cad4911QGp/4ZjW/vf4Svb/wlf8Awmix0yDwZEiO8/mkOViuzWHH
X80mSZM7t39l37/8j9GmTiJx4ZMmDPl5XMM+A8MxuD8uSH6WPIP0oS/l+seDcA8SNHBJp3EzIdwf
yLpet9D9TdmYbYfO6+lvf9+yoAbd30vUrb/6s5pzQ4yI3D8VQyY5Y5VL6H957Dlebw8/h9zH6Zxo
ZMR+bFL/ALqH+ays63lp14MD71fotgiR8v4f9FZodu0I906jzRabNpjn8v8Aq7+UiCw5cZG7ubWX
1R+cNJ/BZuRQWHw00Ph47Gj879J7f+21ZxsiCDPxI/KP+qVy2ht1e5uh7xPgO6fuPFrWYnwc+t1O
dUMPMO10zVZGrXEBstY7/wAl+k/m/wCcVSq7O6TmgbvTuYJY5s7bGGW/yN1bvcjXUljo4GseR4a2
NGu9n5u38xGrfT1CgYWWYIM1XSCWujn9J/K/4T9IhqSCNJR2LNCYiDGURPDk0yYpeqNHrwvUdP6j
h9YxNRFg/naT9IO+lvY7/hXfQThpx3DFyCXVkg0XCTHG387f9P8Ac/wf/gvFVW9Q6RngOJquZo3u
17fzmu/fr/NXadO6jh9ZxHNI22N0urMEtcR9MT7Xtdt379vp/wBtWcWUZBwy0mP+d4xcL4h8Olyc
hmwk5OUyHQ/NLDxf5PL/AOo8n/qT+cOWz+jt0Lh7HDgg6Rw3cq1lb6nAaiNR8o82N+gptNmM4YuQ
R6Dv5m06Bp/N/dd7nfmIogn0rdHt+iQYEf1kdQWsCCLCKp5B17RuMR/J93t/Ob/1at1WSPGNOZ/F
UbazUdRoOIA/7/8AD9/9InZa5rpmTqB8fpcbvP2JUl0CSf7yP/OlHU8TH8dVBtgM6xHOvYHbP/VK
e7uY+ems+aCl2sBMn/XlEFYHI1Qw4/NObD92ogT2+DvBJISQ1oiOP7vP/X6abeAJHPjH/fkLcOPA
6f6t/sKO7+HxSVaV1uk8D8ANEMuJ0J+/jwTfD7/9f6qUTokhafiU3dTFZnhTFcc/IH/UpJRbT8Pk
pNr8o8UbYB5eRUw0Dn8mumndJVIRX8u+qJsjsSVMkAczzJPyUTPw8vhKSVQPJQcGkQBIP+u5PHJ5
jXTy/wCimOmmkjkfhKSkFlQI05481TdW/Gs9Srg/SbyIn/zJaLnD/XyQLIOnfWJ+Huj/AM5RBWkA
uf1XpdHWMf16SGZlYhlh4cP9Bd/J/wBG/wCnWuNyMe+i59b2upyKTtc0nUGP5B97HMd7H/nrtyH0
v9Srg8sMGR349qF1TpNHWKRbQW15lftY88O/4C+PzN30LP8ABqPLi4/VH5+37zo/DfiX3b9RnufL
SOkvmOAy3Nf5uX6cP+qY/wBzJzmHnm4bHnZc2fnE/u/4RXW5nZ3J7af3LEvouptLLGupvqMOY7Qg
xP8A1P8ANv8Az1ax8n7Q3YfbcOR4x+c2PzlBGZ2O7rcxyoh64erFLUEa6S+X1fuuobZPtJ8vH/X6
Cky3SeD2n7/FZrbi3Q8Itd4nkaRwR2Px/wBdifxNYwdAxHl48kD/AFb/AG1n5dQc13Gse3wP0tP/
ADH/AMwVyt+5o7n7+Nv9ZV7zwOfDz/N7/BGWoVCwXFe19DhP826ee2q6P6t/WX7IGYWa/wDVdBTe
dfS/NYyx351H+is/7Tf8V/M491YcDHfU+BPE/m/6/wA4qMmp0H6B+Gkj5/S3e5RAmB4otzhxc1iO
DmBYPyT/AEoS6Sj/AFn07Nw25LJaALWztPj5D+0smXMca7NIJ+A/6pUPqt16yu2rpeS7dTZ7MW1x
1YY9mOXO+lXZ9HH/AHP5pdJnYX2lpfXpcBwPztPL85XITGSNj6jxea5rlcnJ5jhyag+rHMbTh+9X
/Si5cTpzPEanj+1/UQ5iSOe/hwOP3lJsh21wkTz84/dKWpHaSJ8xMfmyixLHVpBOgntPiPA+Nn/m
CkAJgaydPmdyYDtBH4ny/wCipATAPBA8tJ3amEkKDZ+BjX4ogaRMCDzOnx92/wDlP2qIAiDodZnU
/wAr2O/tqY8hz4jv7WfR/tbP+L/8EK0smzADZ8BEDvuG32/1U8aAARoQ36Q0+j/ZY5uxNAIka+cT
pq7wd+btTgNMgBvBBGmkzztjd+btQUyaIJcIA19wgd9df+3FNpMggnTzJ8z/ANLZ/rvTATpEkz5T
5fvKZkazrqdxJ/1/lIqUAJgTzPj23HxUmgQNp0Pbx/zP7STRI/kgcIgHM9+Y/HxQQsBHl8efiWn4
IrWjuPDQ/wDkTscogGI154Hj/J5RGD488DQafu+7/N/62kpkBOsz3kfGf9fcxEkePzH/AJ1/2yot
H53h3H/fT/r+j9NEh3GsgxpP+3/rSKmIBHA100b/AN99rf8AX0U/3fjH8fb/AOi/SShoE6RHaI1/
zf7P/qNOACYP3aHT6Gg/6P8Ar+lSlgO5+ZPnA9x937y5/wCvw/7Es/x/RHjt69Pf/X/0p0MaSe45
1AgjX3e7+s//AF9XA+v4P/NLqB/4r7/Xo3fR9v0v/Rn/AFxKI0L44kkkgwv/17v+LQT9X8kHg5T/
AJ/oqhH/AElkZ2OcbKto2loqscxo5G36dO1x938x6a2f8WP/ACBkeeW//wA90Kt9accU9Wte2SLw
22SY1E1Pb/mtqf8A+rEOaF4wf3T/AM2X8otj/i7m4OcnjJqOXGf8LJjPFD/xuWdyEydMVSetUE6Z
JJSxTtEQT8T205+kmKI0hjXWGQ1okkS2fKRuTojVg5ifDDxOjC0g2BmuykF7u+uvEfu+5dj0zGPT
ejS8fp7pdYWyYc9uwMc4eszZTWz8z/R/4T2UrmuiYX27Pqqs9wcTdc3SS1pb+jiNu1z3M+n7PT9R
dX1KwSGNG5rG6vE6+1pZ6TnbnfR9L9J/g9/87+jVvlY/NkP92P8A3Tzfx/MR7PJxOkf1+f8Avy9O
OP8Ag/rOOH9fE02jc6DDgNO7mz9Hd9Hd7nexn85/UtrUuTp/ZA5g/Sa3b+du9trv+n7FNjQ2pxIn
6QPmfbuZu1btfu2sZ/pv9P8AzqQbyR9GdHmQNAQ73w7Ztr/P9Tf6n0/9GrLiyKxhokkdzJ0Dg7c4
mH7X+m9jf3P5f6ZOWtkj94wYHILtriZaz+XZXu3+99in3iA0jXa3tulod6bdvqNe7e7c7/0oltOh
+i6ZO0SQXHTg2sb/AITe/wDwiK1HIILuWkOkwSI9zm7ufzLvz7P6lf8Ao4EnUEknkgniPo/Q2vZ7
A9/pbERoIEnQiT2527WfQaxv0dzfak5pg8ujgHXQke0bdu7+3+Z6n6RBcj2AEjhs6AAAgBzy1vt+
l/IZXvTEQAHH4tBMBwh3t/t+zap6ccg666iJbDvcdr93p/8Aoz9H6iYiOdfhqTO3dt3Nfu937zvz
P+NSSGIcWujjy0Gs+6Y/lf6/6Q7LJGvw7/BB2xp27jUaj+tv/cu/sJNMHTvrMQZP+5AhfEt+q0yA
4xzsceYjyhZHXOhi6c3DbFn0raREOBndbXtaf5Nj2M/7+rzH9xoRqrFNsQHHWIa48afm9/zXf6/4
VsoiceGTJhzZeWyjPgPDKO4/RnH9KE4/pQk8I5gdDh9LsR3UWunQ6OHbv8F0vXOh7t+bhNl2pvob
3j6V1I1/Sabraf8Ari5xzd0Fp1MQZ0hUJwljlR+h/eev5XmsPP4fch6Zx0y4yfVin+6f3of5rJ+n
/wCGY4GouLTBBng/9H/vy1sPJGknT+BMf+S/PWC10naRDhHbhXMbILDB/wB8Dvu3p0ZNfNiI0LsZ
WMHNLh9E6n4t7f1vYsu2lzDuMgjTv28lqUWgs2nUAa8/LRwH+v8AIUcjGD9QJPB08fOP5KeY3qGt
GXCaLUY/Hz8YYOboQIovOpY6Pa2T+aqLLM7pHUA0uFWTSfY8ase2eP5VT/b/AK7LEe2otOmnCtVv
x+o44wc07XAfq2R+4e1btw+h7kyr61IbFnhkEAYmPHhmDHJiPqHDL5vS9L0zqWL1nEIDdtzdLapl
zCeHN/eY78xyUPoc3GuJ2f4C2fD81x3e9cUx+f0jPAcfSyavovIlr2mC5rx7t9bv6y7bpnUsPrOI
dw22N/n6iRuY799vt91b/wDSfn/11ZxZfcHDLSY/539ZxfiHw88oRmwH3OVyHT9L2eL/ACeQ/u/5
vJ/3f84QFrh6doHYAzofn9JV7GGs7STHbsIHI4KkRbjvFFxLmx+itnU/yd07UWd7Sx+jogO57fSk
7fzmp5FFqAgiwhZZHgI176f5zv8AX9Kite4j2yOY+P5vb+UgWVmsnTg6DSNP3fo7nf62fuJB/gZj
xJP5UEtoGZ2mQODPyH53kpTM9/w08QhsO7nU/wCv9VEAB0Ovn/H/AKSSl9SfDy/3H95Ia/hoPgP6
qltiew/DTVTDe0fLukqmIbPb46KbG6jv4c6pR9/nopAHg8/DVCk0vAHGg7nRLwnQeHzSJ1mdeZ5T
RrA/h/e5JK7eNP7lMAnn7v8AUuUAROpPzPH+rk++BH36ygplAUC4fEH5DnVRdZKgXa66+SNKJZOf
3JQy49gT2/gmLwPPxhDdYddfGfiPNJC5e6fxj7p4chucAIGnwiJkbfbO3smc+eTpzp8R/W939VQc
46nkj7p55nd9JJSz3DgaHT+9vb+UhtsfU4W18clvYj6UJOgHwAnvx/K/qt9qVbXOcDGpOv3td/1T
nIhBW6n0rG6zQLKS2vMrAa2w+Gp9C/Z9Kv8A4X3vr/wf+hs4vIqtosc17XVX0uh7CBuaR8fb/Uf9
Bdy6qzHy62VEb3NBcO0Ry7VYP1zyan5VVbYN9NRF728w9zPTq5e72NZY/wBP/ux/wig5iEa9waS0
/wAJ2PgvNZRP7nIe5hMZzH+p/S/8LlL9H/Ozc+wmyhl4G0uiQPERv+l8UNlviSPiSP3v5f8AwjP8
/wD7asPp9HpONuibNzgI/NJ2td/r/wAYqdWpaAeRGkdxzuDt35/76jP7G3obrYEgOtjvMSOdeZ+L
fpe3/viDe7UgH/cFOjSrdEaQO30kC86xP92mmidsFoGpROOpmZkzKBYwO41PhCI78qbX/YVHbKA1
GnZLHa1kiNfn2/lLsfq39ZDYa+n9QeTYTtx8hx+l+7Tc7/Tf6K3/AA3/ABv87yljGkeXf4f6+5BD
tvsfq13HhB/eSjIwPFH6hly4sXOYvYzbjXHk/ShL94f93H9N9OzcJuSN7NLBq6JG7z5/nGrI9zTs
foRpBPgOBzua1B+rX1k9Qs6f1B82mG42S46uP5tNzj/hf9FZ/h/+O/nd/MxBeC4aWjwnWO34K5Cc
ZxsfUPMczy2XlcpxZR4wkPknH96LjwNdI8hrH4p2jXQSe4Hn7T9Haka3MdsePcIHA105iT4p2ie/
hE69h7dfY72/+BpzEapkDpHPl2JbrMf6/wDfFPbr4xxJ8Phu/ed/6rTCI1MAj849onb+7+c7ciBp
4gmZI07j/ov/AH/ppLdVQJl2vPI8JH58+1S7SXHQmdZgtBd47d3tSb4tiCQZGgJMbZ/rfvf+fFJg
7CYHOmv/AJ1t/N/4lJS8D6JEDgjQyJ2xtE/S27VITz30M+PHu4b/AG/+DTAHnvpwfHnbr/K/88KQ
EmBqTMCJ500AG7Z/6K9JJTJsc669+/8A6s/cUh8COT7eZ/k/S/19RO1vxHjrJj+V/LThvl3H3/2h
7fbu/wBfppTJrAeYE+Hz1bo7833/ANT00ZjYjtMHy12lu2fb9M/6/wCEiwackeJIPI/6nj2N2f8A
qQrGmYAg6mInn2dm+76X53/q5KUGgDQR4Hj80/vfR4/f/wDSieBz2104GhPtGjf9f/ApBoEEDnj5
n97T85/7/wD0/wBInHZwj+sZE6Bw9zfbs/l/9bSUsGnjWe/M8+7b/IdO53+vpLXx17eH7jT/AIP/
ANS/mJyAG6wBHMbRo2W8t9jf7X6NIHXvpAjVvn3s/P2tZsSStAIJbqDPGv7uvFm5+33Mcuf/AMYP
/iR6gf8AitfGMir6f0vo/me/99dDAd33cy4QfB29rj6v8nYxc9/jCk/VHqB7/opkawb6Xfyvo7tv
00UHYvjMlJMkkxP/0L/+LH/kHI/8Nv8A/PdCvfW/DdZTRlCXemTW8aRtf/6lZR/0/wAxUf8AFj/y
Bkf+G3/+e6F0vU8Y5OBdS2C9zfZMgbwWuqlw/lqWceKBj3H/AKK1OUznl+axZrrgl6j/AFJejJ/4
3Kb51EaeCYqTnB0PGgcJE8xymWY+g/gxTpJiUkLt50+A7+QStg7KgJkgkacD6Mt/eUmjtpME/wDf
tfpbk+JQ/NyG01fSyHelWBB2tEh0fR3emzc5PANUNTLQNScomZnMiOPCDlySP6MYeol6r6s4teN0
52cQRZcSd7p+g02/Z9n+j+j62/6alY0vtAiS/UHSSXANH+E922v6f6Tfs/636V7KFdNFWNWIYAIL
TtaA0HbGwbNun7n/AB2+v9Iq1bCZdx5NEanafzv3W/8ABrSjERjGA/RFf2/4Tw+bNLPmy8xO+LNM
z1PEYx/Qx8X+qhw44f1IMZP0hMDgxrHlo53sa39JU930/wDRp2M7j3OgyeJj27Xu99lnu9T3Mb/6
kd4HPJ0E9zqC5vtbuRa2EfhqdeSOZd7v7FicGOR0YCBrOkzzxJb9LX/v30/0ieAGjSG9tAI+H/mL
VMsfpE8SdD8/oD/opi0DcNTMgn4+7+07/X/CJItEQZ3COdCCPP8AOUYIAmW+cdonl21v/SRXCTIk
7uJJ7kjWPdt27v8APQjB18dJ0B53fSB9iS4arcacczt0I7qJ41iCfDT8E5nXifACBP7u2f8ANUSA
dee3h+8ePcguC3n5c+ep1+j+8mkKR0mYGkk/j4f2f8GmcTMDkTpxGrfEt27Xfy//AEokutTTrI1R
q39+Ph5a/wDVIJMnv8+fL8535uxIGO8TpPPPtH7qBC8F0K7I0Jgzo4QO7i3VY3Wug+q5+ZggbzLr
aB+ef9LT/wAJ++z/AAn/ABi0qXh4GkB2n37S1u7+TP7yNVYWnYXaGNriZGo09x/NTJRE48Mv95k5
fmMvK5RmwmpDQx/QyQPzQmP0ovBPYHQRyOD/AATMcTEaEcjjhdH9Y+kBgd1HHaQHGcpgEgaf0j/0
tt/4xc5Y0g7okjQiNVRnCWOVH6HuHrcHMYud5cZcehGk4H5seTrE/wDc/wBR0cG8GAdfGO/w2z/0
ti1K3yACNRzweNv9Zc/Q+H+ImT/3781bFD5AHPgCBHIb9H/zBSQLSzQopbscPaS3sOPkOdNqzbqS
0kaEefB8itVhiDGh/J7fBqa/GbY3cI8x4ynEdWOMyNGo1+N1HHGDnu2Pbpj5R+kw87LHfnMWcyzq
HRuoBrj6OXRq1w1a9p/6uqzarNtRrdPyB4Vhpo6ljDBzSGvZ/Rcl0g1n/RWfu02T+7+i/wCL9iYR
fhIbFmhkEAQRx4cmmTGfUPV80q/7l6bpvUsTrWIWkbLWwLqiZcx3O9v71f7jkzg7FcKsr3V/4O0E
8fytfpLiarOodIzwHbqMqkw0mYcNNzXf6Sp/8l//AAi7npXU8TrGIdwDbGwLqCQXNMtdub/Id+ZY
rGLKJjhlpMfj/dcb4h8PPKn38F5OUn1+Y4b2x5P6v+byfyySLN0Vv5iWuHePhCrPrdWSDqO/h/33
2/u/mIpY7Ff9mtP6Pmm06j4fm/mokb5rf9MD2kx4+R/k+5OOmjVBBFhAwhuh117zr2/k/uq1WZ15
HMqm9jmOIPAifDtq36LU9dkETAP93jCSnQDvvTzHw7oFdk9/iOfE9kTcD3/1+9BLMERzx2/jypiO
3Hfj+CECYHPyT7jwdfJJVpST2M8ePxH7yhMf3KBdz/Dj/vqYvS1VbPd/eolxUC/Xz8B/sQy/XU6p
KSl/yQzZPH3c9kNztNfvP+7+v+aokmdfGdR5y7/XakpkXkmOfjGk+fuUZM+Lj9/Yf2Xf9/TQdJHH
E/2fHakZAnWB93ASUqTwZ8D/AOcu+koOJPPxgTP+d707vDiJA+R+Si7mONePmP5H8nY789JTB2sd
5nXnUz+7t/6H+EVzp9TXPNtn82wbnO5gASTP9lU2gvIA1J8/L5/6/wAj+dvXE09PDGyLclwa0Amd
oI/6tEqH9qsTfkX3ZT/budtaNYDQB/W8FweXbkdVzBtH6bOsljRBgEBtdbfo+p6dbaq/5a6r6yZD
cPpLMJhmzJhhIlv6Nha/Id7f9J7Kdn5/rrB+rzPTvyerPA24LNtE7YN1ktp0+l+jaLbfYq+c8U4w
G0dZO18JxnFy2bm5AceX9Thv90emWv7uTL/6QZ9ffUzJGHjmKMNox2bdATWNh/d+lZuf7HqlSC49
yDqPA/j7kO5++wka9+TrBA40ft/NYreFTrMTrqRpPi7+TwmXZbAAjADt1/7pskBlQEQeeP4qk8yf
HzVnJfrA7f68Ko4+KUkQHVjMny/gmJ0/vT/k8P8AWUx8fl/v9qaGXZi6QYPI58UKxoI4keCIY/3K
JMJJCMODfa/Vh0BM8fuuXY/Vv6ymzZ0/qL5t0ZRku03kfRpv3bv03+js/wAP/wAd/O8c6OIkHkfj
4pmuA9jtWnQE/wDUuSjIwPFH7GXLhxc5i9nNv/k8n6cJd/8Avo/5R9RysL1iHsAFojcOzhrP8lZe
wsBnSNHGRIjT6TT7f3v9f0lX6s/WX1Czp3UXfpdG42Q788/RZRcf9L/wn/an8/8ATfzvQZWKLvc3
+cAj3dx/L9x/19ZXITExY/3nlua5XLyuU4so8Yy/RyR/fg5jCexg6gkHwOu1st/O+n/6rUg2exGm
haNf3fYdntd/o/8Ag0xY4cgyOQZnks8R7t389u/l/pE7W9gJMkCGgat0+ltLfb/0P5v/AElacGFl
EiRBJmJ45/d3D9G7/wBJIgGumveT3j2jj6Tt2z83/wBFqLY0iIP0SPw923Z7drf/ADtSiePnI8dP
dvB/1/8ABEosw3UjWSdPwHH5/wDNtUmiRxx4zp/V3Bu781n+vpJgNYGviDHE/wAr+X/00Ro+/iO2
ntf28trv++JIUBEAQdRsGnaP9a/Z/wCpJsbOrRoAADE6QPzo/d9vt/8ASiYCedZ799f6g/lfuKbG
kGREk9wJmJ5LP+l70lJGs7bZiREAx32n93+2igENgxrrp8n7mfmuf9P82z/jUNgbHiBoZHAA/OHt
bt+g/b+hRSORyTIIMamA390bnO9n5ln56KgoRMDkyDGhOr/+E8v7H6T+bSE6Eak8EDmdvu4b+ds9
vq++v/SJyedTBnue/wDa/wA1KOSdJ5/8yhJV9lgNAW9wYI/zt2np/S2s9taeCPx7k/upEdz8/l7u
/wC6m2jwHedB8+ySrXI01Hbv/r5Lnf8AGED/AM0Oof8AWf8Az9SuigTPfngT8f8ANXO/4whH1Pz+
0eiP/B6R4JIOxfGEkkkmN//Rvf4sf+Qcj/w2/wD890LryJEc+IidDouQ/wAV5/yFlf8Ahs/+e6l1
8Tp4+In/AKKnHRzDu+edVxTiZ91AHsY8muBA2P8A0le383az3U/9aVRdL9b8HWnPaHST6F30iON9
LnOLnbdrz6K5pZ+aHBkkOm4/uye6+E8z945LFMm5wHtZL39zF6ST+j+s/nfT/nFKI1PlynPCQHiY
3cniAoxu28kuGJK1hcG7dQX6Dkc8+H0WrpfqhgEvsznyGVg01gd5h1z/AHMd9HYypn8v1VzVbXW2
yxu5xhrG6D3OIaG9vzyxi7yrHZ07pdWKHawA57jEucd11nv3bN82+1WeXhxT4jtAf85wfjXMe1yk
cIP63mpXL+rgh/0eKXB/f/Wo7nm68v0M6AQ4ER9GY3Md+/tcp7fogcacEeZ03JsZm9xJBieDp/J4
Z7fYzZ/wiKXAifGCG6EzGnZ236W5Xa0eZ60j2kdwQBqZ00A7wiCAeBJmNdY/e1/N/lpmyTIEgnR2
vjrq0N/e9iYkOEDa8GXNGmojcfpBzXt3W/ziVIOpUXDQkaAwfiDH5u5DLjwNYHPcfnNn/O3ez/zB
SO4zMwOIB+iAeWt3e3+2mLCBqCSJIAHce4ez3fScz9//AINJVIy3wAg9vKP7X9VQLXQT3jQn4c8P
/wCqei+LRxJE6mQD5n/O9v8AmM9NQc4DUkfHmPzfByC4X0YuaJIiAfiBzt/1/wCgoE6bu/eT+G4/
y05knbHOhnvPYwf5ajuPI5jQ6jkSNQ5m1vu9/wCk/wBEkv2USAI5HadJ47+381v+vqfo2J8dAOBP
EBSMxMwCI78fR9vubu9r/wDM9L99Q79gfw/6X+b9NIKCv9fyeSbtBJ1GvI/uT6fAfw+ZTD/XVFLN
joJmG7pE8CDp4N/Os/8APqtGzeJEjWY1kSfomNzGcbW/1P8AtukAAZ0EmPCZLW/nNb9Ju32uRmOk
ajdOhmTOo/kt+k0fnf6P/riYQuBbtJZfS5jwHNcCyxpgyCPolv8AVXD5mK7GyLcV0zS91YJIJIH8
06W/8E6ty7PEJ3wTMj6R0nX+1+7++ue+s4YOqucAAX11FxHczazc7+yxig5oXAHqC63/ABfymHNT
xfoZIX/hwl6P+bPI4lTuB4cacSD/AJy1sR+g7DTt2+lB938n/oLHqPLiJGnw04WjjuDQPLTsPLnT
81V4nR1uZj6jTp1mYgCTE8T+bP7yNW/aIOg0/h5BU2vEeX38HzZ/1aI2zXTntHnP0dv9j99SgtMx
KTJpDwSNfJZltRYZ8OOYjlagfp5ecT+93j2qGRQHgkaHwI/u/eQkL2TCVGmsw43U8duDmEVWMAbi
5B/N/dqsd/ofd/1n/ivWqVBj+odHz9jpozKNATw4fnVvj22VWf1/5aNdW5jpA17fDzVlj8XqeO3C
zn+k+sbcXLMez/grm/4TH/0f/cf8z9GmHXbSQ2LPCfAJCQGTBOxkxEcQqXzen/uHq+ndSwutYztI
fWQLqnaOYT3n6Oxzv5l/srQ3MtxXNpuJdUY9KzWZB0bruXF1v6l0XqQZYDRmY5G0mQHtMbmu1a59
L12/S+p4nWcMjaG2NAGRQSJa795u33OZ/oblYxZeMcMtJj/nON8Q+HnlSM+A+5ymTY/N7PF+jk/q
f5uf8srkNtGxxhw4Pf8A1/OVV7XMJEFuo01ifH/yCLYy3De2qzWskNZZB0j8xzPzUQtba2Do75f3
J503agIIsNdtu2J4Hz8Hf6/62I7bDHmBPl9//kVXdW5ruIPI5nv+a73JNfI07Rx4n/qXe5JLbDuB
34Exqpbp8p/juVYPP5OPjz7SpB3A548P82PpdkLUmLtf4cqO53x08+f63/mKHu08hrpP/mH7qaSP
Ljkd/wANyVqZkng8aiCI08O6huOgmT/sn/X89LzH38zE9009h8h30IakpXw5HHPbXySgDgadv9/9
lInaCSNACRAMwP3YG78z/BpiYdBjwn567mx7fb9BJSjGvHhx8j+amPJ7eek6/wAr81R36guMTBPh
J10f7d/0H/8AW/8ARqAsPt1AMwBw2fZuBcdr7Ntv6L9H7P0np+gii2bnAQD7Z/NOgkkN59u33bGM
/wBIhlwIEES4lrYBcN07a2/mf6N/q1f4P/SpHRhLD7IO12ja9ga0hxLfot2t2M/l/pPR9GtM6SHu
lwHu3O1AH0/c925jv0U+/wDTen7P0CSrS4rRdaBAcDBA3B2m7fU9oj6Dv9J7LN9X+E/nFdtAv6hs
aCWYo28Ogv8A/JaqOGRTXZkvP82CWgnTcfM/1kC3IPTuk3Z23dcQHMB1G+w+nRuP6L2tdY1z/wDr
iFjWR2AXRhKZjjjrPJIQj5zPDF5j60Z5yOo3bXF1WN+gqa2eW/z+1rvz/X3s9jf8BWiZbRgdJxOn
N9ryPtORGkPt9zN2u6v06v8ABql0fEZldTprs/o2M31byRptr92v5vufs/fS6lluysuy530nEkT4
EfL839/9z9IqgJPFI7yL0+SEYe1y0DePloi/60/l4v73zzm16m7nR4aniQfpO3NM/wAn87/wT1Fq
UtFdM8dh5aR/1Kp4NW4gjUN+ifIaDu5Wcl4jaDwP9f8ApJw01YZ6mkFjpP8Ar3QZn+CkddFGZGuo
j8CmFeAr/X/UqB8f9nxUifhPy/uUDHHKKVie6g48qTjBj/XwQ3H/AHIFcAsXR/cmmR4/xPzTE6/k
lMIQZBFm1zR7HatdoJ8PBy7P6tfWU3FnTeovJsJDKMh/58y1tNzv9P7v0dn/AGo/m/5/+c4qdNOO
/h+Kk1wja76LtBPn+aUYyMDxR+oTmwY+bxezmGv+TyfpRl3/AJfO+qZWN6oL2iLCD7SSAdD7eW7f
pf8ApX6CzzWJI11lu3g/1fzXb/0W33f+B/zaz/qx9ZjY5nT+ouJuMNxr3H6cH2U3SP6Tr+isf/SP
+O+n0WTittG+sD1NZHIO3b3P7u2v9Jts2fzauQmJix/vPLc1yuXlspx5B4xkPlyR/fg57ZMkR7o5
4M+73bT9Hd/r/ppjmWieBqNdR7R7R/5woz5wdC4bgI09x2y/979I3d/4KpNmeJI1jSRq+dvt/s7t
rE5hSA6taJPB+76X0d3h7/7CI0EwAJP7p/tub/V93t+ixDEfFoInvqJ/rfnIjGg6ETzppr/53uQQ
yEEacA8yJ1Ant9L+RsRWtmYiOPAD6Xt+j+a1yW0u/wBvgNe3wRWtgag+YJB7+5uiIQu1vBI1Hb8o
7/uqX8P9f5SXA/3Hv5JRJj5flRQrskU4Ex/r8UgO/wANf9qSaWj5T3Tx46fgnA/Hw0TpWmlo8vlC
53/GGI+p/UJ5/Q/+f6F0nw1/18fzVzf+MTT6ndQ8P0PA0/n6UFEaHyfFkk0hJFhf/9K3/itP+Rcs
eGSfDuyr+5dkuM/xW/8AI+X5ZXPbWtvb/X/yHZqcuYdz5lqdUwWZuDdjmG72+x0fRcw+pU7b7PoP
/wDUi88IIMEbT3adCD+cz+w72L0xztf6vh5fTXEfWTCOL1J7wAKsqba9vEiGXN5/qXf9eVfm4XET
rb0y8js73/FvmuHPk5aUtMo9zHHp72P+c4f62TD6p/7BySolxaCRyNAI7jyKVhhh+4KIgkAmGsAc
6eJPCqDSy9JmHFKOP97f+67f1V6ezIz2vsh1eI0WlpIO57pbTLXg/uvd/wAZ6K6TMebL9oMhntHM
GQfD02+530v+D/62g9AxnYHR/UsbsuuJtc0zMuj0WO3fzf6Jza3tRcasl5cWkbeeQYG7Y3Xd+b7v
f+/+kWhhhwY4jqfUf8J4z4pzX3nnMuQfzeP9Ti104MXp4o/1ck+PL/1RMW+m3Z2EzzE/S+jCG7dP
uJPHJJ4I7T9Pb/r++U+4k9vu853f1t376XBJkAak9hz/ACt6lOrSAoI21NaTuAJMcydR7v8Aqm/m
/wDpJJ5btLSSXHUcESIayN/6Hdud7Gf6T8xSL9deDAAkDk7fzneaCbHENO6JHAO06ja327mPbvj8
5/8AOf6TYkgDqu94IO0tMGWgQ4GPfU/j1Pd6lX+Eq+h7PZ/OQJbwBLYMaAjaD7f6+1jv0f8A6NUt
XHX3A6ifDX1C3e93s930/wDRpoMefePGdvtn+0lqnT+WiNxJOkk8kHuePc/6P8n/AMwUS13OpA5m
ZgTrP8re7ai7ZMjWOY76H+s5RIgdgQBrz/aH0vzUFw0YBpjgSAPHw/19iYiCdTppuBEgS/xP0v8A
rn816v8ANom0cnjuRryJdKiWl30oEAyIBj+c3Dnd+d/39BRRjxEa8/uyfHVvs/f/APQdNB5EkE6a
cn932ta3fs+miwJJc7yJJ1kF2793d7fo/wDFVpi0al8fyvOIMvHu/ODWbUrSEMGJ+Ak6f52/6XCf
aRqT4SNZk6x/Wc1Fh3aZMe4Q48fvWfme78xMddDEEAEce0/9t/R3JWlEdPIj/X3fyVJvOgP8fH90
/wDnacATqOfpQONZ/O2t2pBug0EkTxrx7v3vzvf/AOQStIS07nXBtejvHQAcmf3vpLC+tjXt6idT
uFNZkiD9K/w27V03Tq9DY+GtJ5J4A+k/3fvLi+r5LcrNyb2RttthhBkEN20M90fn+lvaoOZNQA6k
ut8CgZc3OW0cWMmUv60j6I/+lP8Awto1tg+HaT/sV2kiPD4zxz5qswGTrMd0Zhjj5f8AVKrF18mp
LabYQI/KiCwEwfmCB/r7VWDo/wBfuUg7wMJ1sJi3q7IMAz5An/yX8pHrtmBzPAnXv/KCz22H8sT8
/wCUjNtg6n4+Ea/m/wCenCSyUE+RQ17dzSNe2nfX84/urMuqLDI0Jnwg68fn/msWpVdETprrqPN3
c+aWTiixpczUnsDr2+kAWu3bvpIkXqN0RJjoeqCmzE6nit6d1A+m5ntxcqBLCD7a7PznU6fnfzaz
67OodH6jDyacqnRrjO17J2ua76PqU2/1k91ZrcdIPhAmB9Ju385u32fzav1WY/U8cdP6i7ZYwbcX
L7tIP81btZ/Mu+mz/R/9C1h1rWpDYs2OfBxAx48E9MuKQ4o+r5jGH/Ti9T0zqWJ1rDcA3ZaBtuo0
LmOh2ws/er37PRs2f+jEG6mzEsFToLNfTsA5A+j2+k32rja7eo9F6jDj6OXT9F3LXtMaOE+6p/8A
6lq/wdi7npnUcTreDJbFjSBdQTqxwGnv+l6W3+Ye3/0orGLLx+mekx/znI5/4d91/XYLycrPX96W
Hi/Qn/U/cn/LKMhtjddHjwHOgP8AK/d+kgPaWugmCNJnxIb7Z/N/1/SIl1V2JYK7DLTJqtAEO+P7
rv31MgWt/lAaiZ01+jJ/OlP2aW40a4dpqIntxG7+S4b9u7/1Wibvifv8vFDe0tJEGTPAj6Q+LXfy
kmnwEiZaI05nsH/yfz0FJR5eOnyS4/1P/mP0VAEAdokDXTkta0at/qpw9rh7HAkgbSPd9L2V2RXt
3V7v6iVKtlB5I8zpP8D+6ol7APc4AN+nBDgPbPvdHsa1n+v5ig8tJIIHDnBsHeBDQXt2bXNc1tj2
fo970xe4y6dpZMn6UGHOb9F2/b7t+32fzlX/AAiKmW7Vv0WudEnnVp3bN+6t1n+Gc3/tz+QhyCAB
OojUuYQS1jWNsLTX6e7ft9NtX84/1a608lp1BDhtJaLNYHsraXvf73XW/Q/m/V2enemADWhp9rQC
wQ7lrYdLKms9+6tr/wAz9H/gP9Ikpf3O3ObuMk/RgncQ9rq/5x9W5n6Pf7fS9b/hP5pbgdWvJB/P
Y8viSYcf7F/qfzXp/wBj0lLbLgXAF0tElhOo22PO527/AEbNnu9ln+kUQS4tncXQ3kgGCRDn12Bn
p79130K/5v8AsMSUxcCQX7XAx7yADqN5P0m+u5vsez2V+/1/YnY0GwERJdtDiQ6SDfo1/st9Rm52
/wDMq/m6fz1ABrmBxgM27i+S4NBLvfVa3b9Ot9vv9ZnoV+j+hZ6mxXcCs2XbnNgwC8+AbO6trtrb
Hta7e/3/AOkSOihulyWEsowm6B/6S3kfi3b+b/1awvrjl17sfCZYD6IdddW0D2uIa3H3u/4l97tn
/qNb1D2PuvzrSG1gkb+GhjPdY6T7Pa1v/QXB5dt3Vc73e23OskN0hocAGM/M/mqmMZ9H8xQ55VAR
G8i6vwbCJcxLmJfzfLR/8cyDhj/zPcn/AH/bbmBOH0a/Kd7Ls1+1pjUVVmXf1mus3LNa3e/bEgGY
Gv8AJ3abv3Vodbtr9VmHR/M4zRUzgagbLHcN935v/qRVsKre7dHOv3/uqLw7aOjxEg5Jb5Dx/wDe
t+hoqp3E69vPzVS15c4nlWch8N2Dt/FUXHVKR6LICzauT8O/f7oTflKUduY011TE9/8AXxTWQLE+
fHdRJ7lJMT+CKWLp4PP4obj+Pf8AFSPHl/r4IZ1nuEF8Qt5cQkkl/rKBZgFx/r/r7k/j+Q8FRMd/
9YSmPvn/AGoWnhtI14I2u1YdAT5/muXa/Vj60OtLOndRsPqmGY2S4/TP5lWR9H9N+bXZ/wBqf8J+
m/neH0M/6ghTa8GWO1adB/5FyMZGB4o/ULc+DHzWP2c2h/yeT9KMv6v8vW+s5GN6n6Ssw8dtfdGo
7/S2/T/fVKO0QQdRroZWT9WPrObizpvUnzbo3GyX/n9m0Xu/0/8AorP+1H/HfzvSX0C0bm6Wdj4+
RV2EhMXH6js8pzXLZeWynHlHjGQ+XJH96LS1B/IiMPwjz/12qLW7pEe5pgjwP+pUtkDXjtHHyRYW
wwyNeO6OJOsamdD4qmwwY7eCt1GRBMz/ALAiCimQaPj/AK+HyTgf6/3J+Nfmn+X8JStVLR4p/wDf
r/r/ACkv9fCEkkq768pf7v4dil5cCePikkpXn/roub/xi6fU3qH/AFkf+D0LpOeO/wDcub/xin/s
N6hrz6P/AJ/o+CQUdi+JpJJJzE//07X+Kz/kfLd/3Zif+ttXaa9tfL/UOXG/4rR/kLKIGv2p2sDt
XSY1XYzHMTrAOnBEcn97YpxrTmnc+bAjiPKP+ht4/O/19P8Am/Vy/rJguyumPLGb7sc+qwCZO0/p
GNDd25zqd/ps/wDVq1NNAOCNJ7wNum7+Rt/kfT/nUhGkajTj4z+d/r/xadICUTE7EV9qsWSWLLDL
D5schkj5wPFUv6v7z5jZHtIMiQfiIn/qVd6FiPyuoUVjSHi+x3O1lZFjtNzfztlftU+vdO+w5ttL
RFT/ANJRAgbSfdWNPb6Vn+ZX6a3PqpinHx7M2yR6+jB/wbN0P+j/AIRzn/8AW9iz8WInLwH9E3L/
AAf++ew+Ic/jHw88zjonmIDFiB/Rlk/nP8PD6/8AqmN1c+yXNoGoiXcExOnscPdt3fm1/wAhPWwM
qAjUxMdvzmtbtH0WbvYgMebri8667tJ4lxZ7HV7f9Js/12WHS2ABwOB27bW6f9BX/F4+tgtuA+PJ
8dUzQ4mJ14kHTWB7R+6mazc6ZDiBzBExpP8A1f56shpI189OOPDd9H6H/GJKkUBaSe4afzdRBn/N
d/r/ADiYsLgYM+XA8/y/y0YgAaDQ6KI18yUQrsgLRrGu7iYOo7/TScJOg508TEfva/yfd/Of+Bor
mOJ4kaeM6GeQ5R2Hb2+MD8P5XuST5oS0ETAnTmZ/k6T+d+7/AOrFEg7pkGJJ+U/nf1mu+kz+bRy0
cfGfDv8A1/8Av6g5p+j34HjEFvtkO/tIJBFoyyRGjjxMeA+lJ/4z85n0P3Ex8eABoR4fR/O2/mNR
driZ1766jWZ/79/XTBmo4Go1+J4n95BNjuh90nsRzJ4Pt0P8neUxmBEjggcmI9v8lvtRQRG6QA3i
CZkj8zb+d+/sUCYGg4A79wCHfRcf3vakuDAz/dzOnB5/kpjOgGuo041Pfn+SpQfifn/r/mKB92vM
+Pn7v+pQSPNjptg6jw17RH/kVIBz3hrdS486anmf7KYCfEzqTz8/xVvptW+w2duB8T9LX+T9FFJ0
BKD6w5bMLpBxmx6uW30GCeGR+ns7O2tqbs+l9O1i4t5lxPAb27SR/wCRWv8AWbqP2rqLwNKcUGlg
MglwM3udvDXfzrPR/wCtLGII07zJ+JVDNPjyHtHQPVfDeXPLclHi0yZ/1k+4jL5I/wDhfD/hs6x3
01P8PiitGg7SP9vioN4H5OymCO/3c9k1cWf5UgeIPHCZP+CVrSGQdHn5KbXkfRMf7O6F/BKUbWmL
abYR4j7yNPbqP6qtUZMGDx3k6aADv7fas0OPxU2vg6FOBWmLpX47Lmbq+dIbOoj3fR/k/vLKuodW
ePaI0jsfLc78xv0dn/pNXKMlzHCCfh4kKw9leQzcAA4a+A/BGrWC4+SCq6jqeM3p+c+LWf0XJPuL
SQ72O+k70Nz/AN//ANJ2Ua7M/o/UYn0sqo6O5bY2Q7bZt/nKn/o3/wDbdn+jUr6H1GSO5PaDPO38
3d/r/hFaqup6jjjAzj+kaP1a/u0g+2qwn3+lvd/1r/hP5q1pF+EhsWfHk4OIVx4Z2MmM+qNS+aQH
6X9eD13TOp4XWsMwIcP56g/TrcdWuY785v8Ao7vz/wDwNAtotw7WseSaz/N2gc/H+V/wa4yq3P6N
ntO41ZNf0HH6L2H817f8JRZt/f8A/BV3XTOpYXWsN0thzYGRjkjdW48Pb+9/wVqnxZeP0y0mP+c4
/wAQ+Hfdv1+D18rP6nDxfoz/AKv7k/5ZAwy1k6NPDvKPMf8AVqs4Fskj3Ay8NgwQ1zo3/o9v9ext
df8A26jX0XYtwY6XzPpuG4hzdT9GPb9La7f+f/xik4NyGzy7WBPE/o97fz2bW/uel+f+epNmjuNE
AJb7hDtu4aTthv5m5jWNZ72s+l61n89Wk4yC2d4gglxBa6BYwh+3fs938670a/8AB1/8Gk5ji6S2
C4zDhJGjGn9I0PYx1fqW+z8//SfzqaXFpPvggukAt0LXfmuc69vtbV/NN3+t/wBdSUonx1P0miwh
sn9DsPp7W7f0m33vZ6lVv80z9InDSRLZcA0hpEFwLSNzPUse/wCm5m3/AD/f6iQ+k6CfpAPLS2AQ
W6v3Brtz6nM3/wDBs9n/AAiA3EFwa+SN0AO+i47m+r+jZ+ge/wBnt9T9HZ+ekpfYRLQA0SRpLNHO
b7murc7b7Xu/4y3/AEaU/Fvq8EBrSd3B2W+/1aamfnf5n5ijMQdu4js1hYZkPdtc57f5y6p3t/wn
qVf11ECJaNATsc4ewkyd263aNzn+t6jfRr9mQy1nqpIX3NcPaWjcCIa4ES9r7Pb6e2yx/wDhP8B+
js9RLcHEOA3MLp0lzYJY5jmae7durt9VrLfT/Tfpfz0weSA7cXB+1wguI59SK3t9Nj93qVVs/mvU
Z/OeqkGySRBd3IJP5z9rt+1/5zvYz+bp/SJKWaCYLpLhqXalwDfTD2t91VjvV9J/81VXTd/ov9Nf
91GEY1uuO1sTqT7jtDn/AOY3cq2NVve1oEgGYPABDnez2v8Ad+l9L+d9P/wStXWgXZoA/m8du1oA
gbj3H0d30fYl1XDQW5n1lyGYXSGYTD78s7PaS39GwtfkO9rfo2eyrZv+heuf6IBUcnqrxpQ010F0
wXvkP2/v/o/6/wDO/wCDT/WbOOV1S4sb/NfqtQHJ9Nz2vOhf/h327PofofSTdQjEwcfpzPpMG+6P
3z7nfnOf7XOVWUuKZl0joHo8GD2OTxYf08593L5S3j/icGNziXWv3EyT3P8AsWnisDKwRp3VDGrL
nA9v7vctG12ysDvp+PimhdkNmmvc/c4oJ40/jz96dxMkeA/10UHH/X8ElRFBcn/Z95UD+CRKaUFy
ie5UHFOT/f8AJDJ8TH4IJiFnf6/iFAx8U5MmfBMiyxCil3T+X3pfDX4JrIt8Dr933pj35B+cpz4c
9x+ThN5f6/kCC8BeI55/D+CeRMd/A+aQ5AA10IA/uSAEQJIESZJjmToHbfYz/of8WkE8IIZseCNj
9QeJ8P3XLt/qt9ZzcWdM6i+bTDcbJdzZ4U3H/T7f5q3/AA//AIY/neE2xp8iD4/R2/nIjLARtfBn
gn7tU6EzA2PqGLmeWx8zj9nNv/k8n6UJ/wAvm/ffXMjHNn6Sv+dH4j906IVZbaSHCLB9IaTIP0lz
/wBVvrUbTX03qb5t+jjZLz9P92m53/cj/R2f9qf/AAz/ADvTZGOX++sRY3WOxA+5XIzExY+x5Xmu
VyctkOPIPGMv0Zx/ei131ljiPPjX4qdb9ddT/r4hTrcLRsdo8aQdOD9FCewscf8AX8iLCG407gPH
59lL/X7tVWps8dfLsrPl8v8AX/pI2ilf6/kS/wByXx557+aWv+o8PiipXxHZLz8fx/8AJf1UgD/r
p4fBPA/10QVS3+uuq5v/ABjT/wAzeof9Z/8AP9C6YDw08NAua/xjiPqX1H/rP/n+hK1EaF8RlJJJ
LiLE/wD/1Ln+K6D0HJB/7ln/AM909l2Mka8Hz4+ZXHf4rT/2P5J8cx8/Kuj/AMkuxUw2Dmy3LAiC
QNPHSCfzdQlzqYOvj/epFo5jQakDyPgE0EGDyPnx+d/Ka13+r/enrXP6t0mjqlVYuc5jqiS2xm3d
Dhse3c/f9L6X9hV7T6ePViVMFdTGtY0SXe1um2fpO3LZAg8EaRJ/s/Slo8P+2kN1NR9wbBHI0B8f
9f5aHCLJA1O5ZPdmYxxmRMIEmML9MZS+b0tDDrdWzc4EOIgT4Dn/AMzRQNfPsOP/ACX7v+ejOpIJ
9vx07/cpNpkEH4f67vglSL6o6m9zIB8yCY+X0tv9f/ivYjTxJbyOTI0Hh+e1EawAR28OP3dNP6qU
d5knmT5fyY/OSWowwnx8AYMTp7TKiWAzqI557eJiUaPDTt34jb9Nux/ZqUHt8RE6aO4ku/6PppKt
rEEGB3TFvfufDvJj+0rBYB8BwNYEcN13fm/TQ3AEwASTMxJMEa/9V/LSTZ8ERB5iYnz0+jz+6mIi
RAgcz8e7fzf81ScSeeCfgOdR/wBLZ7f5aGXOcJGvcHt+H0fckuAYmNQNYgGY+H/maHY7cC3sRB+f
t1JUy0/RHgdB8P8Ao/5yRYNw01Go0/1/P3oJCE7nS4guJBnk6fTif+o9v/CKJZJJ3AkyD3n6X/kE
Xaxo4mOx0MAH26bdvCgXDvBB54Pft7v3WfR/62gvHcIy2DOkjx55/wDMVEhvHA4kn8eym4nUEkkc
z4/Nyg4an5/Dv/31JcFiZMjU9viT/KA/eV3LyHdL6TZkNbutY0NYNCPUsitu7+R6lrd/8hAwqfWy
ATBZXq4yDrHtHt/krL+uGcbMqvAaQGYwFlgBB/SOBaze36dbqa9/07f8MmZZ8ECfoPNs8jy33nms
eH9AHjy/7OGso/4f83/1R5x7iTBJcfpOcTq4z3n99yi3XXt/emLtJ/eM6/8AR4SE/wCv+oVAPV5p
WaG2wSg+CkDCFu8Y/wBqmHBOa5SA/wCvaOE8hDThxGv3orUk+CdQDh8P9YUp47T3+SFKXTidO38F
FOQkimQdHw+9Hqvc0gh3+sd1W/gnnsiCtMXSPp5LDOjj/t+kFn5FBrdwedZ+Hb+X/wBWp13OaQZl
Ww+u9m12ruBP+u5P0PmsFxPghruqz6BhZsiwHbTcdXNd/o3D8/8Atep9NVKMjP6PnAtcK8moew/m
2MO13pv/ANJS/wD8z/nVPIx3MdIkac+I1Pb4ozLac6kYmYdrm/zN35zPpN8fdX7U0i/CQ2LLiye3
YI48U9MmM6xo+D2XTeo4PW8M6e5hHrUOPvrf+a9rp/7bub/Of9BV76LsS73EFrjNbwNoPt/Oj2u2
xvf9BcZj35/SM1rg708ise13LHtP0mO/0tNn+vo3rvOmdTwutYbiGw4aZGOSNzHdnNd+67/A3f8A
f1Piy8XplpMf85yfiHw/7v8ArsHr5af1OEy/Rn/U/cn/ACyVoZaJaySNS3QgkfpPb7vTY/1H/noH
pnTbtMmWvLByW+ky1ztzG2fQf/NfTrsq2fo1YyMezEuaHe9rjua6DDoG/dtl+zb/AK/8JAtZYATq
8xqAA+B6e46j86Pe9np/4P0/0ikc/TohD5A26lo9oJJLSA5zN3qV7/Utp9t307q/9H/hkziwyHOE
HTTa4wxzmyX2hznek79J9D2Xf4S1OQ4RweBG32mAXwNpf6bfb/hP/RiQcRy52mkuiDG73bmbW+/b
6j2Nd/N/4GtJTFwMe5u1z5bEbxJLmhroeHW1fpfUYz+brq/0CkSN24Run2uJJ0MDa07voO217vT/
AMIoxtG3g8EiAXQGs/NbW31PZ/22z/BpTMgQQewMA/8ASb/ad+l+n/ISUuTGskdiTzA/edH0m/1r
P0qXMdxxBkifo/u2t/drd/bSgiYJB4B+Gk7gHfvf4T89SDQ92mocI8dPpd/6/wBB/wD6LRU2sUCt
jrnAw3iYkSI28fSdtUMnL/Z3Rbswu2ZFzf0REGbrB+h2tsd6b/S/nbGM/MZZ/bK9gf6WIBO/3WT+
6Oe30v3Fi/XTLe26jD4rrZ9os49zn+pS3QD2+kxl/wCf/h1FklwwJ6nQNzkOXGfmseM0Yg+5O9uC
Hq4T/f8A5twumY7bc9hI/V8VvqGeJH8zz/24hZl5yMmy3u5x0mY48dqsVD7N0g2R+mzD7tPzJIH0
Nv6J38p/+EVOkF75PHaVWqgB9S7858eSeTt6I/4PVu4dQDZT5FkugH5f+SU5DK44+Kp2vJPkiw7m
1i6fIDtyoykdOfxUS75JWupkSoFyi533/wCv/VKJJ1I7SgvEWTnT5d/9ZhQPH+vCRJ1jzE/5zf4M
TEmZ+fbvuKC8BY/GU8pgl8EmQBX+uqfU6c+KYpjH8f8AcguAVMyTrP8Ar5pxpr/r/ro1MNe33f6/
6/o086eMf690F4C4B8gQe54gge4H+t+enAmCNABoXSSBO7+W3t7v+JTQAPGJEiOD/Wb9L+d2f+q/
UcATxMRBDZPDY+l/Z/P/AD/0f/CJkC4BiIPfnXiNH/vbfzWf+BpFs6j7gDGv+cn2iOB/DT/pKcAd
pPjp3SUYg6MGPDhtdqCIk957OXb/AFV+tJtNfTOpPm36GLku/wAIfzaLnf8Acj/RWf8Aaj/wx/O8
Q5k8R2GvhwkxwILH6zpr/wBS5OhMxNx+xr8zy2PmMftZv+p5P0oS/l/jvr2RTv8A0lelg/6XkmY5
tzIJixukE66feua+qv1qNpZ0zqVn6Y+3GynGN/7tN7/+5H+jt/7U/wDhr+e6e6l271q9LRyAIkfd
/OK5CYkLH1eV5nlcnLZDjyDxjIfLOP70Wu4bHRAgkiOPl7lZpduEAcdwhl7bWF0bXtkOb5geEf8A
nClQHHkE86/DRHqwJoA8v9fgnjy/1/sp4T8o2paP9SnhKE6CVoC5r/GOP+wvqP8A1j/z/QumXM/4
ydPqX1E/8R/5/oSURoXxBJR3FJKmGn//1bn+Kz/xP5H/AIcf/wCe8ddiuO/xWf8AifyP/Dj/APz3
jrsVMNnNn8xUdR59v9n8pMeD4Rx28nf+i/8AwNOddOx5S7/f+JTgUK2gGNBB+fPlt8P9foMQ4+AE
fGNqSSVqVtb4D/XRJJOghZJPCSSVJJERp3Hb/em2EmJ50Ea/68pKYPdyG6kT2ntKA4FwIADh4ETP
7u/Xb+7/AOo1ZLGwJEj++Xf9JQcGjUxPEz4a/wBrhJIQbD4gjie0aef/AFaiWwO0niBGuv8AW/P/
ANf5z0yWOAB1jsDpodf5Q/dQ3Ekns7x1jX3Ttd/Jbu96S4MSWtJGhg8aeW3chuMDwjtoP5U7vc36
LdynscPKOD8NfF3j+6mIg+2dDGnnrr/mpLkZDjp8SBp89W7/AB/z/wDg1FzAJB0mQSNNDx3Z9Jrv
9fTRfKfIEaocaxGvh83fu/4PVyCRqjeZkkjWfh/1I/e/6hDcY+joeR/f/nbUYkDUc+Z5nd9L2j+3
71Cmr1766e0y7tp/W1/dSK8Vu3sT0sTBsy7jDAw2vMT7AC76DTud7Pf/AK/ouAy8i7Jtffe4m29x
fa7XQn3PH521lbf0TG/uLq/rjmtrxqensd7rj6tzBH82z6DH/wBfJ2f9s2LjnOJJPY6A+X5yp8zK
5CP7u/m9F8D5f2+XyczL5s54Yf1ccP8Avp8X/heNiXS6Tx/emB/1H3ptY1jX/XskTJ0KiDfItlPP
nof+p0Ug4jv4whcSR90f6/vKU6wfv/3/ANVJBilDxp/uUgZQQddOe/8A0U4J079p+aKwxTJw4jXx
Qw/xUgZStaQkDu3btPHgpAz8f9iEnDvnKKEvwCXYqAd2n4T9ykD49/7kKUvJCIywj4Icpef+v3pI
Ib7bG2t2v9wnnuqmRjOYdzPuGgn/AMx/fTMeQfNWWWhwg/IpwN7sesdkTLKsugYmWY1mm2NWGPo7
fzmfvs9T/wBRgxsnO6TnNsY8MyKvoPElj2n3bH/R9Smxv+vrIuRjwC5nxjXsPbwWpB9eTX9nyz9G
fTt5LTP+c+t3+v8AwSIvrUhsWXFkEbBAlimKnjPqGu+n/Si9x0zqWH1vCMDa4EC6kkbq3n6L2lsf
ynVX7Pez+pZUq2TRbh2+LHSWu1bPl/WXF4uRndJzg+t/p5FejXcse0nVln5tlT/9fTuXfdN6lidb
wHPE1vAi6r8+pxEtd+b7P9G/+bs9L/jfSnxZeL0y0l/0nJ+IfD/u/wCuw+vlp/U4b/Rl/V/cn/LJ
Tc0PG4Tprr5F30WFv0W/Sa/Z7/0X6VBcNpgGD217gjnV357tqNfj2YlxrIkHVv7pA/d/q/nfQS0f
q3T4iNDt/wDIqTZzkAAEASQ4gNA05/d2jf7W/wDntKZEg6Eczp5HaD/KUthiI5I0gQJOk7B9LcmG
76Q08DryBu3S+fFqKlvEiJ5idQT+Y3aP9HX9NHxqpcXHgDUmCInVQrrLogGBAHIIj5fmu2fnKw9j
toxatH2QCWiQ1pIbp7f3UD2SEuM6pleR1DI9tTA5znEE7WV/S0b/AFf3t64LJfb1PqDnH2WZlhe8
E7i1pO5te5w/wNeymr2Lq/rfm1Y3T6umVhpsyNr3jR2yqtwc0c7musurqZ+fX+jvXMYP6Cm/qFgG
5w9OgOg6fnOg/wCkfsa3Y/8Ar/4LZWzHimI9I6l3fhWL2eVnzH+U5g8GL+5H9L/Cnxf+Fseq3Mfk
enXHpUjYz5j3f9FrVHDr/O8FWbue/mdddTr+VaDYqr517AqO71bUvTERDHIsAET8VTL/AMU9tpc4
k8Dv3Qie8pFMY6LlyiXRPh+Eapi4jj7/AMVE/d/rH/UoLxFkXakjn/aSmPn207/DuE3Oo+KXHx+H
+9JeIq5Ej70kktElwC40Tf6/cnTfd8e34oJV+TxTDn4xx/ZSJ8+yUT2+7/X/AF/RoLwFx+T8OE+o
EjnkGYMxu/rfm/6vS89ND30E/wDfUp2gHuJg8ax+9LP5CS8BQjyAiNDwDLdur9v0Pzf5H/GKQ18C
Xcxqddf6/wDnf10og66dtZmBvbH0W/6/+BPqdSJPz1j+tP8Ar/4Gl4ZNg6+MH/vqkkAnQSxUXMDv
j4qZSSUQDuja7dLH6zpB/wC/Lufqp9avWLOmdTf+mMMxsl8fpP3abnf9yN2707Hf0n/j/wCe4lzG
u5HzRcTDty8mrEpHqWXuDGNdJEk+5z9jXP8ATrb+ktd/g60+EzE2Ps7tbmuVx58Rhl2FmOT9LF/W
/wC/fVchkXVuZ9KwlrmzEwCjsrDeyhh47sfGpqtsN9tVba33OJl5a1rX2e5zv5xzd6OrgePkACQD
YB3/AHvGlk6SSKlJfFIga/ckgpXdcz/jJn/mV1H/AKxP/b9C6blcz/jK/wDEV1E/8R/5/oRUdj5P
hiSSSLC//9a3/itH/Y/kf+G3/wDnuhdkB4d+B4rjv8Vn/ifyP/Dj/wDz1Quy/j4eHyUw2DmyHqKo
nhMpcjXwj/X7kj+TRFDFOPvS7J/u+Pnr5pKW0j+/5eSScEDvHw8IPmEhIHgD8klLR4/kSIGqXH8O
/bnUeaf/AFH3JKVyZ0GvyCZPqddTHf8A13JaCJ7kc+H+c1BLB5AGnYdu34ILmuJnWRweI/6rcrRE
GCNR46H/ADT7/wA1CcRwPDTgaeLvp+76SSQjiNR+BPbT+05CMQQNQPIRwfd3b9L3f6+8jhu04BGv
ZQcOTP8AWjx8NJ/zv9a0vpg6Z0kc/wAfD/X/AINQLW6SY2wJ8AI3RG5EPwMzI7xB8vzmqAEGfD+H
wJ/d9/8ApEVBhBA47eBjj5/uuTGDoIjz/wC/fuqcCNRwO/h/Wc3+Umd31MifEcGZ930f9f5aammv
bE68DnXgeZV3pVJDH3u+k8mCCI2/S/6pUdr7bBWzU2GADJ/6U/8Ak1P60ZVeH0g4rHQ/JiljREmv
nIcQ/d/gfZvZ/hLUJS4YmR6Bnw4JZsuPBHSWSQjfYfpT/uw+d5PrPUPt2fflMJLHuDaJJPsYPTq+
mPbv2uyNm3/CrNJkwPoj+BU7HamI0/18fzUOR8SVn2SSTuTb2UoxhGOKAqGKIhEf1YjhV/r/AA8U
ycme6X5UrWgLf6g+KXl2TyfvSRVS3ifw/wB3xTzrr/qE0Ja8dkrWmLMH/X/X+sxOHHx47/NQ8+/+
v96U6/A8/wCv9VJaYpg5SBnUIIJ/H+P/AJk1Sa7z+f8AeksMUqkHHU8k9z8ZQmv0CkDOoRtaRSXc
OAfKe0cJ9wP+vZClSDiIA+Xx8fwRQkk9vw4UmuhCDtPv/wBeFKfklSCLbdds6O4UL8cH3MMEdxyJ
/wA72oIMf3ffPtViq7SCdPHyRWEEahC2MqsY152PGtVh/NMRtf8A8H/UT9K6pndIzN7RFg9t9BO1
tjBOkt3bX+/dXaz/AM92Kd9APuboeyE4MyaxVfDLWD9FdOkj6Id+d6bt39elIi9QakNiy45xAlCc
ePDk0nA/9J9Dw8nB61gtupduYTrMh9dg/NdXu/Rur+g//B+n/hNizsnCuxHyQfT/ANIBIIn2z9HY
7X6DlxmJndQ6Vlh9TzTcCCQSTXYGlwb61bTtezV//CU/menYu66T9ZOndVjHc00ZD2knGtEyQ39K
6l4D6rfpO9n6K3+dt9FT48wl6ZaS/wCk5PO/DJ4QcuG8vLm5WPVPEP8AWf8AqxqiwOjeJcO/gfHd
KIyqh8nsTBMQNdzA381v53tV/J6S13upOw6+wjQd/af62/8AcVQU5jLDWypjLBM2wTAI1+k797+v
/wCjFJTnDhVZbXS3Rpc5w9reXOntr7v89WKWUYGNZ1HPeGbRufY6YAn2NbO53v3en/pbVJlOL02h
+dm2fzY3OtedBqB7W6+/Rv8Ab/mlxv1o+sZ6na2mhpGHQ7dU3b77XgOZ6pb9Kpm136Gr/rlv7lbM
kxAf1jsG3yPJT5vIAAY4Y/zmXpp+jE/5xo9Qy8zrPUC8iLsktbWzcXCtgENbudP823fZb/wnqv8A
TUepXV17MSgxTQAJGkmPztrtv8v/ADEZrG9LocbROfkAgt59OvQ7Po/o/wA31Vn1MfdZJJnue/3y
quvXeWpeglKMiOAcOHEODGPL02mxa/z3aNGnPZLJumW/50Itz21M2tP8OxH5qz3uLiZ1JSWRBkbU
Xan8v+vwUdf9fhCX4eWqWkIMwirxI0P+1JL+KSS6lGfkklon17TrwhaaW1T/AIppHPZMSPj9yC4B
f70xJPn4j+5KNddfMf6/6sSHl/r8P9f9GkmlSZ58P9W/STjjw/1CUfh/eAnEyNY1/ikuAVw2SCNB
rE6Elp+k7+q1OAdRGp0ngEQfdxX7dr27v/RiYdtI8fhG737Xbtm13u/kJ44BgAgROnA8xt/P/wBf
V9RJeAu2ZBaJnXTn/o7f9foKTB/DtHZNz7jrOs69vkEQBJcoJJEpkFKThIBOkpWg1JgDk+C9B+qH
QD07F+25ABy8tjTsLYNVf0xT7mts9V279Z/zP8FvWR9TPq87Isr6xk7fs9TnHGqIDvUe3dX6rvpb
WUv3+l/hfW/S/uep3PxVjDj/AEz/AIP/AHzhfGOeu+Wxn/bEdx/kv8H9P/EUl8/vS/1/1lLWFO4l
Lph+I/uTwkkpWqSSSSlLmP8AGV/4iuo/9Y/8/wBC6dcx/jK/8RXUf+sf+f6EkHY+T4YkkknML//X
u/4q4P1eyP8Aw4/5/o8ddiTPx7n71xv+Kr/xO5H/AIcf/wCesddmpg58x6iqNUueUk6SKW0/1+fC
XiePhPn8UktO/HxhJCtR48a88QkR3/HtP3NS2xoYH5Z/1/1/nE4AkTzoT8D7h/0ff9L/ADElLCY+
GqeByeO/gI8THt9qR8/E68QZI8G7fpbnp+PcdI1k86H6Ov8Ar/4OkkLRyOCOZ8v/ADMf6/zScAdt
B3Mzp7d2o/ke36P/AJ9qT/R+ImPKPokbj/I/6H/bzceccRB0AjX/AKj6CSaUB248QNBPLuP+Ls9/
v/6CgT7tOR4TMSO0/S92xE04me3+p+TPzUN4ECYg9jOpH/S/OStVIniDA547j/vu5CLZ51JkD46+
Zd/IVja5wPfsJQ3MIPjHh5HyP7yC5EQI01ETr4Ed3Q5NBMQZ84E6ou0DXz7/AAj6SiSAD3Oh8ef9
f+rRSiLIMR8o8dP3UOwgDntr3MIrnQ0cRyJ472dt37v5iqXudO33HXg6TJ09rfbu9yBSBZbPS6d9
r7iJDYDdPzjJOv8AVXK/WfqDcvqlnpkmrGAoZqYLmkm9zRHt3XO9L/rK6vNvPSOjPvDQbq2ja3Qj
1XltVe/3D2te79J7/wAxedvIaAwcNA1jw0/8zVbmZbQHmXe+A8uDLLzR/Q/VY/78v5z/ALj/AMNR
kyZ576+P4KJ/E/6+H+cnGnnpzE94/im5Crl2wOv4rfh3+/5NTjXt4RCaOY/u/gkQP9fh8kEkLpJS
e/8Ar/VlLQ/P+KS0hX8Uj5pJI2ilJcCO3glykihQ8e/+/wDvUtxnXx8YUeePwS8vw+KS0xZgn8f9
ef6zE4dxr8/mh6Tp3nTsnkzrz93Hn/ZSWkJg/wAVIEHhBBPHfw+c8f2mKQd5+QPzRWGKWfw7qQcf
Hnn8qEH+P+1SBB4StaQlB0/d++OwUmv8eYnU+MIKcE8DVFDeqt7Ok+J+/X8E12M14lv3AwfBVA/x
+f4f3KxVeW8/iktojZH6ns9DKZ6tIPM+5sjbvE/n/wBVQOC8t/VnNyazH6N0B2u394s/e/8AUauu
FNo1hrlWsxHsMsdEHtyEjrvqux5JwNwPD4fotjH+svXcIhvrXfTDvTvAs3Rt3N/WR9o9Nzf9HdWj
5H146vawgejVMD1K6zvG07v8NdfT9E/6NUBl59QLd8tj6JAIOvcEFv8A0FYZ1/rFZ/R2iudCWsbM
DbpvdW5232/Q3ognbjlSMkcciJHlsMpD9Ij5v7/o9SN7evdasF9ldtscXX+ytkhv0PaymvfDHfoK
/wBN/wAIpAYPSjv3tzc4Ew8EenWZ+lXub9Jn+tCBfd1PMM33WWnj3E68f1v3f309PTHmHWe1vJJ4
7IULsan94rjORiIyMYY46RxYxwwr91qn18uzc8l5cSSe2p3O/k/nK5DMZn8rxKk99GO2K4Lu5VC6
91jiTHOnghskAy8IhjdYXEjRCT6+aZC2eMaCkkk/CFrqW+KQSkf7vBN+XxQXUvPfkJjrppPfgJc/
6/6/2kvh38f7v+qSSAqSefx/1/zku3f+P5U4/wBZSSSAqEiO8adingTGh89f9fbt/wCmn1HALTOh
dIiD8G/u2JLgFokx3MROhMkN8f5X5m9IH87todJH7r9p9v8AL/8AUfppw1p0A0JiIB/c/dY7/X+v
+lcNJA7E6DtyGjs1v7373/qVLgFmggxqSIkDUyNv5oP8p/8Aov8AjE7WkCANDppMcfyDtclppOg0
OscOO7T6P0U4b4jX8dAP+kkkMmxM/P71JID/AF4ToJYp4TpJKUtj6tdBf1jNBtY77BQ79ZeDt3GJ
bjVvHuc93s9bZ/N0/wCErssrVfovRMvq+Wyqpjxjh4GRkCWtY0bXWtba5rmfaPTd+jr/APRa9OxM
THwsevFxqxVTUNrGN7Dl2p9ztzvpPd9NS4sfEbPyj/nOb8T+Ifd4+3jN5pjf/NR/e/v/AObZ11sq
rbVW1rK2AMYwAAAAQ1rWj83T91ShOkrTzXiVJJJJIUkklCSlJJJ0k0suZ/xlf+InqX/WP/bihdPC
5j/GZ/4iOpf9Y/8AbihIbqI0Pk+FyElFJPpgp//Quf4qf/E9kf8Ahx//AJ6x12a4v/FSf+x7I/8A
Dj//AD1jrtYUwaE/mKyf+CXf+KXb+E/3JIUQkRAPYEc6t5+/8z+UnP8Arr5J47R9xEcFvb/X0/8A
wVKpYExI0jUeGh/Oj+Ufbt/9GpCBxqBrE+H0fo/nf+pP+tuTJmZ8T5ka8/8AfmppJ/26/wDVJKXE
gjyjxHdvA9u7j/X/AATAgccjTdwfI/2Uvw+H3JIJUNABxHhKUlJJJSkp/wBiSRO3kQRzPOn8lJIC
xAAk6DxQnO3afj8fipuaSCTqYiTuI7btdPb/AGv/ACaiWyQSe/BGvPh7kU0hcZE6xyQCZI/se5MQ
QddNskuMyCP5R/tohbAHf4/67VHbp4IJCB/tbJkaGYgEf9V7m/Q9v6T+b96HhU+rk7yPYz3GeC78
1vu3bvcp5LgAWjQCTx5/BGqNfT+nWZVrT7GOvuDfpENG9rPpfuf9NC+/RdEE0I6ykeEeZec+uXUf
VymYDD+jxYstPY2ub7B7h/gKH7vp/wCH/wCDXKulzu53HRsfh3VnNybsi6y687rr3OfYRJEn3FrZ
n2M9tTPd/Nqu0SZI0+MyqEpcUjI9fyezwYI4MGPBH9GPrr9KcvVPX+/8rAxEmD301013a7gn+JDj
yeTP0j/a+h+apSefpRqZIPdk7i4n8/8A4ytN25LgIk6/mz4D+R+emtiI0YwNOPPuOf5O7c1Lz4P4
/h/aTmR9L5+Ekcbfo791f/otLyPPDp11/O7sf9L2vSVTGI7f6/ckY/158k4jsZlKPkkghaTrOuup
n+9PMnx10hIyD4a9v9R/5wm/CfD/AFH/AFSS0heUoTSe+s8lONfPwRWkK/In+aWhTBK0Uo/f/clG
kD8EkpRQowOPu+/w+KlOuvj30/1+i5RhLyk/70kGLMHtz/v/ANrFIO8Tx3Qp8B46f6/1k+4z/H/X
+qksMUzX+OqkHSgz/r/r/XTh3efiR9yS0xSyISL4mDqhlx/17Jidef8AXVG0CKYXubxPz+9EbmvH
PA8IIVPd9/4fvf8AVJpP5QPgkngBdAZzYkgf6hT+2VjXb9yzJPbSUtx7Hv2StQxOp+0tn0GgE8Hk
/kVe7Pts0J8jGv5VTP8AqUyXEuGEDozfY5x176qBST+QnyCbbIIgLJJSI8R/BMT2nXxQX0vIHP4J
p7d/uSnz+R/1/wA9LU6T8j/r/npJAUT2n5H/AH/56UdvwP8Ad/1SefP5f6wn8QdP4z/5JJdS0+Ke
DxqBp+MCZ/N+klqBrLZ018RzOrf/AFb+jSgjlvEyY4H7v0fpbne76f8A1pJNKiQQ2dYEDXU9vwTg
lx0906+P7n0tpP0vof8AGf4RNGmsQAY/Oj6P523953/qOv8AnFIgnnvMSZn5u+l7/wBz/wBWJcAx
DZGgkEAeI/N7Br2/Td7v+2/0X82pAQRyAYgfNkfR9N7v9f8AraiTJA11kxMH+VH8lOARB1GgPc8e
7+T+cklYAEduBqdRx/a/0aeNeI/rCdB/1X0k4aOP9f8AXRSDY40SSsG9vLn/AFG381SDR8Ek6ClJ
JJJJUr3R+kZfV8wY2MNobDrriJZW0/nO/fsd/gaf8J/xX6RN0fpGX1fL+y4w2hsG68iW1tP5zv37
H/4Gn/Cf8V716Z0zpmJ0vDbiYjdrG6uc7Vz3n6Vtr/zrHf6/o1JjxmRv9Fz/AIj8Qjy0eCFSzSGg
6Yx+/P8A7iCTAwqMDDpw8cRVQ0MbxJj6T37Q1vqWO/SWO/0iOklCtgUKeXlKUpGUjcpGyT1JUkkk
kilJJ4ShJNKhKE6SCaWTpJJJUuX/AMZn/iI6l/1j/wBuKF1C5f8Axmf+IjqX/WP/AG4oRG6JbHyf
CUk0pJ9juwP/0bn+Kf8A8TuTHP2x/wD56x12gH3BcX/in/8AE9kf+HHk/wDbWOu18u6ljsGjL5ir
8E8/JNp/r4fJLUfJFC+oCXl2/wBfFNp2jyTgeHJMRxrr5oJWST6f3apkkKSS8Z7eGqfjt/HxSStC
Wifv5/Ln7kgDx8PxSVSp/wBePPumDeNOPDQ/k/kp+ee/3JacHXj/AFCSVBoHAAn5cpjxpp/r5Jx8
YPhyUpA1mP8AX/akpE/TSf4IL3Ac/GO6LYQfo6A+POp+aqZDtrACfpQdTEwZP/S/6CC4LUs+03tr
OrZ3OadDsGv5s/8ABrM+unUC2uvprObYuyNPzQf0NXH+EvZ6n/WFudOrLaHWu4sPtEH6Lfz9u389
/wD4F6a8+6t1F/UMu3MMhtsCpp5bWBtpb9J7WO9P9LZ7v559ih5iXDHhG8tPo63wTlhl5n3ZfJy4
E/8Aqsv5v/F4ZTj/ALNoWEuce/hGshS29o+Ovn/r/UTVtn3eH0VL+CqbPSgWbPVjB0O3cRr4aiHH
+qmifPwLROg4+l/r/wCBokT8uE2zx8UmSkekcgCO3AEBp03N/wDUuytIjvxHhI+jv/Ojf+b+/wD+
oJwdOdddBGphR26cTpptb2HfUef+v6NJVLagiZJmIPOmz2j6Xu2/4P8AM/0aYwBr4GfDQO9276P5
qltOoDeRqBx22/ynfm7f+3P9ImAB0aYn4ayGtH0Hbvz923/z8kiluO8ROo8vCJTRB8CNCO4Tz3do
4/nEgSSG/nkD97/X+csXaewgcayRuH+rnJLSGMeX3JH/AFj/AF/1YpFsffoYITQkilp8ddeU8z56
6JiPj8v9f9WJH/Ujv/r/ANQktpl+PwS+GviozHImeT/r/rsTzPGvYJLSFJf6mE/8P9f5Sbn5I2ju
rSUu0DUeHxSS8Y5KKKX8SOfw/BKT/ryY+791N8PwS4SQYrl0cansfh4f5iY+B/1/zkte3dKEUAK+
CX4pf6ylr/ulC1wC/wAvmkmS/wB6CQFJ03+7/XVIkd9PkgmlT3+Z8kjxqI8R8J/8imJ8dUo1P8fm
kuAUZ79v9qfU6T9/90/56QgcJRodY+5JICpj8vmng6g/H+Pl+alrMaidNfEENPdv/naQBJAAMnhp
JM6hzGR/K/8AUqS6lceU+PiD7u7f/Vv6JIduwmNSSInfH/U72/T9ROGniNdNdYOnf+b9rm7P+tPT
jxmfj35+l/wrvd/pvppJpiAABOk/xA3au2fv/wCrH+onEaTHbQDt7JHtO7+R9JO3SIMcazGvP5jT
+5/rYnA04jQaGeAB/wCS/wC+JLlgNdedA6ef5XP/AFxPB78ka7hzp3Dvd+cpAfKB8fDx9v5qcNA8
vgkpYN8o0+J/8j2ThoBTpIJVwmlKfNIJKXCdME/KSlLQ6P0LqHWLduMzbSx4ZdkujZXpvPtLmuus
2/4Kv9+r1vTVv6vfVfJ6yDe95xsJpj1ol1hBixmPw1u1u9v2l29nq/4O39IvRMTExsLGrxcWsVUV
CGMb2/O/tPc73Pf+e9S48RlqdI/m5vxD4nHBePFU82x/dxf3v3p/1P8AwxD0zpmJ0vEbiYjdrG6u
cdXvcfpW2u/PscraeEoVkAAUHnJSlORlImUpG5SO5KyeEk6SKWhOkkklSSSSSlJJJJKUkkkkpS5f
/Gb/AOIjqX/WP/bihdQuX/xm/wDiI6l/1j/24oSQdj5Pg6SSSTC//9K3/imM/V7I/wDDj/8Az1jr
tlxP+KX/AMTuT/4df/56x12/HeI7eH/UqUbBoy+aXmtBPz+78P6yf8O/8e6UeXlH/R5/8DSnvPz/
ABRQofGSflP3OT8j4wPCf5Pb/VibXiee08/9JSA79vHyOnb/AF9iSQtI8Zn5T+I/eTEeBHke3ipT
Gs/7fzv5Tf5SeI47acDt+7/m/wCv+DSaYfk8O/8A0Uvu8uEj/f4pGNfu/h4oKV/r/vhLTv8A6/gl
/tjnxT7SIHHgDz4fRSUtqPgOwTgHsJ7d/GOE8Rzr5n5dvb/1aREfSnTxEd/g3/0X/hUk0sBxEHyG
vh+78U20dzr3jnx0n3f8X7FPz5/1/t/6+slxprppHfj4t/617UksHtAjT7uJ/k+1v9j/AIRZ+UHO
taxn0nu2iCQOHO3A/wBnZZ/58Wk4aExwJ0HlOnt+h+cxVKKS7Ie90Asbtkdy487m/wDS3/noFIc7
62ZgxOkjFpLWnJ/QN+iCKgHes9rNv51TG0/mbPtP/FrgbXEugDUaAef+u1bX1p6g7K6pdDt1OKTT
U3UAbfdf7T7d3r763PY3+bx61iMYS6TqB98/BUss+KZPQekPX/DOW9nlIRqp5f1uT/D2if7seCLM
ACANY8e/8opwkAnUTfApSdJJJK20fx+aiWCNR/uU0kVItsx4zMxwf3uP5SXxlw0kfEs2xu+l7W1o
kDw81HbqNO/fXT/vySKYQ5okaGJ0Mfu+AH53uZ/L/wDBWIHbSOC3SI9Qt+j6m1v9tn/o5S2kRIMe
Q17Tx/5JNE6cnvAkx2/6P+v82kpiGwQAIcTwOAZH/kv/AFGlwJAOkcjXX3a/+cqW3xAgwSO0Agd9
nt2u/fUQB5TwdRxA0d7t3f3/APqNJFLQP9yXzT9h+dPcnmAI13fS3P8A0n6X/wA9pa9zxoOZ/ebz
t9uqS0hjH+oH+v8A5wkfGPu4T6A/xS1+CSKWkjnWe/8Ar/rsT6nz10TR/qAl/HwSW0uEk0nv37/6
/wCuxP8A6yktMVJfFP8Ak/uTI2ghSX5U4j4H+5N/rqkhUd/xS07apSOfBMTyP9fkkuA+i5IjX/XR
InyGvjHPxTSY8h/t/wBf7aRH+v3/APkWoLgFeX4H/ekBr4eP5PBOAP7vx/uTgH4DiUl1d1tfn3Ti
RwNRrEeU8JtNNYJ1n+/j+t7U/aY41HgCT9D3f6/+i0kBQGntOkgAzoQZ/OJSI0OnYxu8/oD95v5/
9f8AnU+2DEeI78Extlw/nHf6+l6SUCB56SBAMg+Vfjv/AKn/ABaSa7qIgkx30BAH7+n0a/8AX/Bf
mJbYG0aDUAdtJY3n0/8AqP8ASf4RPqDO2AdTIEQdzvzdv5v+v5icN4+GoOvA8HJJW2jw0514g7nb
vaGN/qp4PJ1PMnyh39p3u/eThuvn3766a8fyVICPKUk0tBnXt3Op4A/76nDY408k6SCVJJEppSUv
KbzSA/BOAkpQTpI+Bg5PUcxmHiM9S5+sTAa0fSttd7vTqZP/AHxnvSUSIgykQABZJ0ADXJa0FziG
gck6Lrvq59TLbH15vV2BtMB9eG6S5zp9v2xkbWMa3a/7Puf/AN2P5v0X7P1d+qeN0ksy73faM/ZB
dp6dZM+oMYbWv+j+j9az9I//AIH1LKlvqxDD1l/i/wAXD574sZXj5Y0NpZv0j/s/3f77GqquqttV
TRXXWA1jGANa1o9rWNa36LWtUoTpKZxlk6SSSlJJJJKUkkkkpSSSSSlJJJJKUkkkkpS5b/Gd/wCI
fqX/AFj/ANuKF1K5b/Gd/wCIfqX/AFj/ANuKEkHYvg24pJkk5jf/07n+KX/xOZP/AIcs+X6LG17r
tuPL/X/zJcT/AIpRP1byJ4+22f8AnrH9y7b/AF/LqphsGlP5j5q+74fgnH3nxHE/elJ4KXn8tf8A
ektXB854M+Hx1/N2pNPf56QfNv8AI/spa9+f7vh/VSPOuvcz/wBUkllBBMTMxpMzxzKZxB4mPh+T
91JwPJ7/AAHInz/7+mjXsD5wdRoguWg89hyewjzSjx+EzI10/g7/ADE5jQ/dP4T9H973p/4+Ph/K
/wC/f9fSVS0Hw8vzufOW+Xt/6hKANADr2jX+yPZ/1H84nAM8E9uPwd7P83/rSaIEHQdx93k3/qfp
pJX+4fk/h7P/AFMmiPEQfhz/ANt/6+sngD6UR38NPpR7R+6kG+WvHz92nt/lO/kJKVBPn8fnEzLv
/O7UoHefn5j+z9Hb/wCq05EyToP9f3o+jt/6H/bUtp4+jMjQHxP0Po+z85JTHaD7YjtEcSJ9vt/7
5/6jBlMtZjW3YrA7KbU/0GuIguA3V1P1Y30dzf8ASKyIA0IH52nA1G1zuPb/AG2fQTxtnkNEzz2E
/vbe384guGhBoGjdHY+BfJraH1ONNrHMdUA1zLGljm6D6Vbw1zNyZeldV6F0/qrAMlhbcIDMhgDb
QBudsaXNO6v+da6j9N/pP5xcR1b6vdQ6UHWXAWYwIH2mv6Ik+z1qz76HO9n79P6Rn6ZUsmGUPGPc
ftev5L4rh5qok+3mP+Tkfnl/q5fp/wB353MTQnSUTfWSlKEoSUukmlKUlLpJJJJWgfxUS2dHaie/
+5TSSQiggyBJ58NdHO/zkhOnJiBMkd2hv537uxEgKJaCdfh8v9QiikesbgdYnkg6Bscf9H3/APpN
KADAiGyANCIB/wCuO2taN3+v6eUHsNdfAanvqE3hOo/3Rt+l/g0kLagiQdIJHu7f2XfuOr+j+Z/h
fTTQQNQYAgkzzpz9Hb9L/V6eBGhEweIju39z9/8A1/Rpi0CQAGnXkRpLgdNjfzP8z/qEohbTyShP
3OpEEfS1iPb7tD9H6Pu/9GJaRwe3I1E+7+T/ANQktIY+Y0+H+v8AqxKPL/X/AF/6CfQflEJaf39k
kELTEyPjBTyPj/r800EcfglJ8p58v9f/AEWktIXn8ExM6+PCU9z/AHn/AF/7+lB78/3T/ckoBR/1
/wBdP7CXH93HingePz8fpJ4J8uxPbVJNLQAlHwj5JaaCQCfH+P8A5gnM92kEzIg+Dt40bt/Ne36P
/UWpLqUAT7RrqBrOkHYJb9L/ADkiCQYAExB0ET4u9n7v/oxORyHakTyIPD+x+jtf+bX+j/8AA0+0
zpp4eOhj/jPzt/8AX/wSSQKWdoSJMmeSJ11/O2/S2f8Anu1ORB/dmRxH7zY0az97/wAw/wAHWhoN
OPAnT83Q/m/m+93/AH9OGwO407+A/wCl/WSTSwEwdsDQmQNAfhH/AKTTiR8dOZ5EO+j804Z2j79d
dP7lIADjRJLEN7REfPU9/wB3d7VID5D5J0pQSr4pJSmlJS8ppS5Twkpbt/qU8J0uUlKTta57msaC
5zyGta0EkuJ2ta1rZc5znK50ro3UOrW+ng1hzRuD73y2lpaA7ZZc1tn6T31/oq/0v9hd70L6p4PS
C295+1Zrd0ZDgWhod7dtNO+xtX6P2+p/Pfzv6T07PST4Y5S20Hdqc3z+HlwQTx5OmOO/+H+4830X
6j5mY31uoufhUGNtYDTc8Fu7f7jYzG2ucz221Pu/nf0dK7fp/TcLpuP9mwqhTVuLyASSXHl73vLn
2O/ruVlJWIY4x237vP8ANc7m5g+uVQuxjjpAf99/hqSSST2qpJJJJSkkkklKSSSSUpJJJJSkkkkl
KSSSSUpJJJJSly3+M7/xD9S/6x/7cULqVy3+M7/xD9S/6x/7cUJIOxfBUkkk5jf/1Ln+KWP+beSZ
/wC1r/wqxl2x4k6/f2+K4n/FL/4m8n/w7ZH/AG1jLtoE/wCvGjlMNmjP5iqD21TjXUa+J8vklGil
8e0/6/nf+YIoAWAEjx+Xw808EfEdtOT21j/viXbX4FPJ/LyguFKcO3Yzzr5au+ko/wCon/zr/P8A
5CeZ8/8AX/Yn1AHPPPwj+7akljrGgPGgg6/GNv0vz/5acjmRMTJ8fE/9T/26kI7CflzInX853+v/
ABaQg8Hjgjyn/V3uQSFQO8EdzodJPg1v+v8A0H+Og+McduG7fc3/ANVp/OO+n/kWmf8AX/oVO2Cd
P7z/AFvo7vbvb/xaSVhpr3Pyk/d+b/mf9P01tETpoOe0aQddnt9v0v8Atv8A4KQmARwYjUga+36e
n5zG+79K9LnUSY7mZmN38nb/AOAoJpXmO2jfDmW92/us/wAIm0AJEARy2OIPp8bf0f8AK3sTkiTr
EzrMmHfR59+139dPPun4HmY+lP7/AOb9La9FSjJnkwdI1Mw9p9/0W/R/N9JMOQREHUOAcNPzi3Xb
73O/9GJeBd5c6xGohzhuf7v30tOCB56n+1+alSLUI+PiP8w7XfT3e1v5zk8ePI0k6/8ASd7vzUtT
5+cnU/5qXwSUXn+rfU/AymPswGjEyIlrW6UuMN0sqALa/a36eP6f0/U/TLj+o9Kz+m2bMyk1gna2
3mt30tuy4e3c7Zu9Kz07v+DXqEeWnl/emsqZax1djQ+t4LXMIlpaRDmumdzPzVDk5eMtR6T4fL9j
qcn8Z5jDUcn6/H/XP6yP93J/3z5LEcpLuOqfUnDv3W9Od9ksMn0iC6kn3O0b/OUbnO/wX6Kur/tK
uU6p0fP6VbszK9jDGy4SanSC7a25za/0ntf+jf8ApFVnjlDcad+j0PK/EOX5mhjn6/8ANy9OT7P0
v8BopJ0kxtLJSnTQkpSdNCSSl0kyUpKVA8P96jt7Hj+ClKZJTAh3gZ8tDwE0AQBBgyNNJH0fbP7q
JtHgm2/l8f8AXwRRSOJ0Eu8O/izwP8hn+D/9GpGJ7aaawAQT9H6TfY7f+b6f/gakQ48yT25/rf8A
VJAmdCdOOe20j2tP7oSQw7fvE9yeYDY1LvpO3/pP0v8A57S179tBz/WET+an4Eg6x4kcBv8A1Lvo
+7+p+4lDdAIAEwNCIn/rvta0Of8A6/pkghiYmB27/glH4qRkRO72kaSe30vpDb+Y9v8A1v8AwqYA
CJ+fj+bLY/ebKSCFhGnfwSjTtHySgzHB7iNf5X7rfa397YkdWzpEQAYjh3t5+j7fZ7/+t2JKAX1M
ga6gd9IO3Vv0t37rdqXM6RPEjtoeWtDva1S2yTwYMA9xB+j9Daxv84/6Nf8ApP8ARpgJAHj/AA3e
6AX/AOk/9VpJAVru1Op5DuOe8/S+h+k9j99taQAAGgb2APxDf3PzfZ/22/8A0ikJ00/lEHiDrr9F
u32f6/zaQbHPh3148vpd0krDsOBpzBMEgeTd3sSDY+EcEeQ/NUg3t5c/6jb+apAATCSaY7T3Osc8
+A/74pARx9ydMgml0pTapJKVKXxSgpwISUtr2/1/FPCdJJSydXOmdI6h1Wzbg0m5sw+7ipurQ7fe
fZuZ6m/0q/Uv/wCCXWdN/wAX+Owh/U7zf7RNFM1skgixr7t3r2ta536N1f2T6HvrT4wlLYfVr8xz
vL4LGSfq/wA3H1ZP/Qf8N47CwM3PtNOFQ/Itb9JrIhshzm+ra8tpp3+m/Z6ti7Lov1Epod6/V3My
XiNuNXu9JpDt26x52OydzW1/o7KmU/zv6O5dTj4+PjVNoxqmU0snbXW0NaJO521jIb7nO3Iimjhi
NTr+Ti818XzZbjj/AFMPD+cl/h/o/wCAxrrrqrbVU0V11gNYxoAa1oG1rWtb9FrVJJJSuYpJJJJS
kkkklKSSSSUpJJJJSkkkklKSSSSUpJJJJSkkkklKSSSSUpct/jO/8Q/Uv+sf+3FC6lct/jO/8Q/U
v+sf+3FCSDsXwVJJJOY3/9W3/iin/m1kf+HnxJgH9FjHx8l3ERx2Gkj7vauG/wAUZP8AzcyQP+5r
5Mf8FjruZ8QI7KYbNKfzHzXjw4M/P70uD8OybcdfHz8QpbvAacj4d/HcihUafDv/ABSPB7d0xcRz
yPyx/r+4l/t/gkpXAg/6/kSnWe5jX8Uu/wDqP9fclrwD5eBQUrTvpzPCkJ0JGk8/DT+z/r/1uI7R
rOo+A4/s/wBVKdJ+Q0HlpqPpfuJUkM29jHMcd/u2/wDBqQ9wAJkaTrpzH8p3s/1eo8z+dOknvwI3
e7/p/wCjSmdeTzqZ1iEKXWy1Bk/S5IOmsD6X+d/wzP0aUDjloEagcRtPPt26fQYxiQMeEeWnP9n9
5Pr/AHkT/a7BKk2oT357888Jdvh8xp/vS/1H39ko8Pv/AA7ooVx5JDwHP+5PHc/3J4/1/wBfzkE0
xH3finA8eR4/BSg90oA/IlaaWjy+9PAnzOvmnPw+Xf8AIl4/Of8AXVBKtJ00KaAePl/rCfj/AGaJ
R/ckpwOofUzpWUXPxwcKwg6VAemTAFZdjvGxu3b/AID0PUXM9R+qXWMIF7axlVAn30S5wEhrHPxy
PV9+7/A/adnvXovHwS/1EfwUUsEJdOHydHl/i/NYaBl7sB+jk9R/8M+d8hc0te5jhD2Eh7Do5pB2
ua9h97Nv8pMvVM7peB1JjWZdDbQNWOMhzZId7LmbLa92xm7Y9c9nfUSl8v6fkOrJDi2q8B7ddamN
tr2Wsb/g91n2p/8A6Mgly8xt6vwLr8v8c5bJQyiWGXj+sx/48PV/428YktfM+qvW8Xe44xurZH6S
gi0EGPo1+zKdt3e/9W/8DWS5jmvNZEWNJa6s6PBbo5r6z72bf5TVEQRoQR5uljy48g4sc45ANzCQ
nX97hYwmhS45SQXse6QUkklLBJJJJS0Dw41+eqbbOh8fw+MJ06SkcO08Y8IIOnf3JfHUf6tAb9L/
AAf+v0FOB/r4ptvB8/w/lafyUUUj0iY+7/zj/X/rSUDkgQdBppy79zY337dn85/xf/ByAPImfCI1
0Os7vzk0acgAjk6aH2z/ANL99JFLNB0jUgjgnt9H6Pt/nD/0/wBFsSAkc8iJ8RBZ/Jdt/wBfTsTi
Xe4gHTdrrAM/S19vuTx46nTQ8yJ/N1c5ySgFiBzpwCJ8DL9P3f8AM9JPB55mDqJOnkd3u9ycNEaf
36+3x9qlAHCSaYgDjj7/AL/d7fzFICPw00CeEkEqSTpJKWShOkASYAkpKWgJ1Oii3Js9LHY6+wAu
LKmutcACGl7mUix7WbnN9y28D6mdby9rrK24lR2Hfe73bXfS2UVeo/fWz/BXuxf+rRESdhbHlz4s
WuScYf3jr9I/pOCpV1WW2tprY59tk7K2NL3ugFztlVYdY/2t/Nau6wfqBg1OD83IfkkEkV1j0WER
A37XWZO5r/f7Mmv/AItdBg9L6d05mzBx68cENa4saA5wZoz1bP5y1zd307XKWOGR30c/N8ZwRsYh
LKeh+SH/ADvX/wAx4Lpv1L6xmOa69gwqCA4vu9zyHBxGzGqfv3fQ9T17MbZvXT9O+pXRsRjDksOd
cNXOu/m5Ldjg3EH6D0/pvZ6zb7Gf6VdAkpI4ojpfm5ef4nzOWxx+3H93H6P+d8//ADlJJJKRpKSS
SSUpJJJJSkkkklKSSSSUpJJJJSkkkklKSSSSUpJJJJSkkkklKSSSSUpJJJJSlyv+ND/xC9T/AOsf
+3FC6pcr/jQ/8QvU/wDrH/txQkN1HZ8DSSST1j//1rf+KOB9Wsk/93X/AA/msddwTrE68R/sXl/+
LrqXX8Tot9fTOjftKl2S9z7/ALTXRtca6Q6r07Ru9rGtfv8A5a6v9u/XP/519O/6/Rxp4s2qYbNO
cTxHbfuHpQO44076JEEDzIk/HzXM/t365zr9VxPb9fomY/qfSTnr31ygf9i4jX/tfj+PkxK1vCfD
7YvSR8vKPkGp9AuZ/bv1y1n6r/8As/R/5D6Sf9u/XSP/ABL6f+H6I/6hJXCfD7YvTaHTx0+8JE66
mPj276/yVzI699dP/nWPyz6fH+ol+3vrpGn1W0gRGfRx/Jhv/UJWnhPh9oemOukRPY/Dv/nf8Ipe
fjOsaaj/AKn99c0OvfXWNPqt4/8AehR/5BL9vfXX/wCdX4f5Qo/8glaeE+H2h6bzPlylGq5n9vfX
X/51tf8A04Uf+QSHXvrr/wDOt/8ADCj/AMglaeE+H2h6dSAn48eK5f8Ab/11/wDnV/8AhhR/5BSH
X/rv3+qv39Qx/E/yEiUiPl9r04jkfPx8eVIA/wB8f7lzH/OD67//ADqff1GifnLEj9YPrvH/AIlP
h/lHH/8AIJq6vL7XpwP4ceafT/X+K5f/AJwfXbX/ALFPj/lHH/8AIJf84Prv3+qmnb/KOP8Ah7Ek
15PUJd/w5hcv/wA4Prv/APOp/wDDHH/8gl/zg+u//wA6n/wxx/x9iSqeo0jRL/Uf7Fy//OD679/q
p9/Ucf8A8gl/zg+vH/zqf/DHH8f6m36SSqeo+CRn4R46Ll/2/wDXf/51B5T1DH8PNn0Uh9YPrtIj
6qa9o6jj/wDkElU9R3+Ph/r70onj8nj/AORXLj6wfXb/AOdQfPqOP/0tzPpJ/wDnB9d41+qf/wAM
cf8AixBNPUR9ycD/AF0XLj6wfXf/AOdP/wCGOP8Aj7Eh9YPrxGn1T0/9OOP/AOQSSA9TAQcnDxMu
sVZVFd9YO4MsaHgEAjcGvB93uXO/84Prx/8AOn/8Mcf/AMgl/wA4Prx/86f/AMMcf/yCB2128V0O
LiHBfH+jw/N9KbOX9Seh5Dt1bbMWS4ubS4Fp3Hd7a8hl7Ktv5voeksjI/wAX2W1gOPlVXPnVr2Pp
Ea672vzPzvzfSV3/AJwfXn/50/8A4Y4//kEj9YPr1On1Ujy/aGP/AOQUJhhPUDyLp4s/xbHpw5pD
tkxyyf8APlH3P+c83k/VbruM1734j3sYYLqi2yRO3eyut32lzP8A0HWfkYmTi7ftVT8ffOz1mOqm
I3bPXbXv27vzV2o+sH15j/xJ/H/KOP8A+QS/5w/XeRP1TE+fUcef+oTDih0mPrRbuP4lzw/nOTlL
+5HJj/6UcrwwaXCW+4eLdR97U3HK6PN+sGb9qf8AtD6p4H2r2+p6/UcH1OPZv9Vm7+b2bVi2/WDG
9Wz/ALE3fSdPpdRf6cyd3pfZ2eh6W76Ho/ov9GmnF2nD7WzD4jI/PynMR8I4+P8AH0NU6CfBMJOs
iNflHjqmf1HcS9vRMljHEkV/b6DAJnZ+kwXX7W/R/SP9RVsjPyXOb9l6S+oid/qZVVhP0du3ZRj7
U3gPeP8AjRZhzkTQOPNG+pw5fxqLbIShZ4zeqwI6dp/x7P7k/wBt6t/5Xf8Ag7P7kOA+H+NFd96x
/u5f/Cc//qtv7Qoxr5/6jkbf3VS+29W/8rv/AAdn9yb7b1bv07/wdn9yPAfD/Gir7zj7Zf8AwnP/
AOq29E68/wCvbVR0MgEECePh5nb7fb+aqn23q3/ld/4Oz+5R+29Wj/k7XWJub5eP5v0UuA+H+NH/
AL5X3rH2yf8AhOf/ANVugGgefgpIbOpN0jomQdf+59Ef+2SPR1qqlpbZ9Wr8lxM7z1CIEfQH2PHo
q/6G9H2z+9H/ABmM89EC/ZznwGGXF+PCxDXHgE/BRcWsne4MI1IcQDHwK08D6w0brPT+qWPMN3fb
eo1ce/b6P7TZ/W9T0P8Arv8Ag1vdM+sP1i9B37J+qWP6G87/ALL1HE2b4bO70WbfU2emiMQ6ziPr
bFP4jkHycpnl/egcf5e687T0LrF9raq8LI3OmN1T6xprrZkNppb/AG7VoY31J69eT6lLMdrY/nrQ
N0k7gz7L9s+i1v563v8AnD9ev/nS/wDhjj/+QTH6w/Xn/wCdL/4Y4/8A5BOGLH1mPti1cnxD4gdI
crKPnjyyl/3LXxP8X1ftdm5mpbLmUMDYeQ32+rf67bKm+/8A7T1Pf/4GtfG+p/1foLHHG9d7OTc9
9jXGNhe+hzvs3/gOz/RrP/5wfXj/AOdP/wCGOP8A+QS/5wfXn/50/wD4Y4//AJBSCOIdY/U208mb
4rkviGYD+pCWMcP9bgi9RUyqmttVTG111gNYxgAa1oENa1rfotaiLk/+cH15/wDnT/8Ahjj+H9RS
H1h+vP8A86X/AMMcf/yCkpz7OtvVJLlf+cP16/8AnS/+GOP/AOQS/wCcP16/+dL/AOGOP/5BCkvV
JLlf+cP16/8AnS/+GOP/AOQS/wCcP16/+dL/AOGOP/5BKlPVJLlf+cP16/8AnS/+GOP/AOQS/wCc
P16/+dL/AOGOP/5BKlPVJLlf+cP16/8AnS/+GOP/AOQS/wCcP16/+dL/AOGOP/5BKlPVJLlf+cP1
6/8AnS/+GOP/AOQS/wCcP16/+dL/AOGOP/5BKlPVJLlf+cP16/8AnS/+GOP/AOQS/wCcP16/+dL/
AOGOP/5BKlPVJLlf+cP16/8AnS/+GOP/AOQS/wCcP16/+dL/AOGOP/5BKlPVJLlf+cP16/8AnS/+
GOP/AOQS/wCcP16/+dL/AOGOP/5BKlPVJLlf+cP16/8AnS/+GOP/AOQS/wCcP16/+dL/AOGOP/5B

'Vbe, PIC pins and LEDs'
1998\05\01@141951 by David VanHorn

flavicon
face
-----Original Message-----
From: Mark G. Forbes <forbesmSTOPspamspamspam_OUTPEAK.ORG>


{Quote hidden}

That should work well, as long as the output is a voltage source, plus you
get the added on/off indicator.  Remember that a transistor, unlike a logic
gate is a current device, input voltage dosen't mean a hoot except that it
causes current to flow.

Although prototyping isn't particularly cost-sensitive, it's a very good
idea to proto what you will produce. Otherwise come production time, you can
get the "boobytrap suprise".  Still, I've seen times when 10 protos worked
flawlessly, and production had 50% dead. That one was a clear violation of
the spec, and the justification was that "all the protos work"..

Hobbyists can get away with a lot that wouldn't fly in production, but I
think that's where a lot of them get in trouble, when they accurately build
someone's "cool device" and include the other fellow's mistakes, which don't
work with the batch of parts they got.  Hobbyist magazines are full of
things that Horowitz and Hill wouold have put in the "bad ideas" section!

It's always a good idea to walk back through the specs and make sure you're
doing it right.

Zetex parts are wonderful, I've used that 849 in a couple of devices, no
problems ever.  Their ZVN4206 is a nice little FET too. TO-92, low RDSon,
but beware of inductive loads. It goes into avalance so fast that a 350 mhz
DSO can't see it!


'[OT] Is Win NT VB - MSCOMM compatible'
1998\06\23@065607 by Jim robertson
flavicon
face
Hi folks,

Anyone know if a Win 95 program developed with VB and the MSCOMM.OCX will
work with win NT? What, if anything do I need to do to make it win NT
compatible?

Anyone with a TM4 based programmer and windows NT willing to test this for
me?

Thanks if you can help any!

Jim

1998\06\23@123905 by Andreas Voigt

flavicon
face
There is an issue with Multithreading and Win95:

OnComEvent will WAIT for an event when the program runs on win95 and
will NOT wait (as i think it should) on win NT.

Query OS at runtime and place loops inside the code to wait for the
event
if NT is the OS otherwise do not loop as on win95 OnComEvent will not
return if there is no ComEvent.

You should also use timeouts as on win95 you will not be in control if
OnComEvent hangs...

Andreas

Jim robertson wrote:
{Quote hidden}

1998\06\24@123045 by Claudio Rachiele IW0DZG

flavicon
face
                  Status Distribution June 23, 1998 15:04:12

The message regarding "[OT] Is Win NT VB - MSCOMM compatible" sent on June 23, 1998 15:04:12 was sent by

Status Recipient
         Type                To
         Native Name         spamBeGonePICLISTSTOPspamspamEraseMEMITVMA.MIT.EDU
         Foreign Native Name KILLspamPICLISTspamBeGonespamMITVMA.MIT.EDU\n\n\nINTERNET



Recipients

Status Reporters
         Type                From
         Initials            CR
         Name Domain         NOTES
         Native Name         CN=Claudio Rachiele IW0DZG/OU=Italy/O=IBM@IBMIT
         Foreign Native Name CN=Claudio Rachiele IW0DZG/OU=Italy/O=IBM\nIBMIT\n\n
         Organization        IBM
         Org Unit 1          Italy
         Last Name           IW0DZG
         First Name          Claudio



Status          769
Explanation     Invalid recipient

X.400 Status    769
Explanation     Router: Unable to open mailbox file D14HUBM1/14/H/IBM mail.box: Server not responding

1998\06\24@152054 by smg

flavicon
face
Claudio:

Is W0DZG a HAM Operator call?  Would 0 be in MO, Perhaps?  Sorry I
misunderstood.

Richard   EraseMEsmgspamEraseMEfrontiernet.net

----------
> From: Claudio Rachiele IW0DZG <@spam@75805312@spam@spamspam_OUTIT.IBM.COM>
> To: spamBeGonePICLISTspamKILLspamMITVMA.MIT.EDU
> Subject: [OT] Is Win NT VB - MSCOMM compatible
> Date: Wednesday, June 24, 1998 11:11 AM
>
>                    Status Distribution June 23, 1998 15:04:12
>
> The message regarding "[OT] Is Win NT VB - MSCOMM compatible" sent on
June 23, 1998 15:04:12 was sent by
{Quote hidden}

IW0DZG/OU=Italy/O=IBM@IBMIT
>           Foreign Native Name CN=Claudio Rachiele
IW0DZG/OU=Italy/O=IBM\nIBMIT\n\n
{Quote hidden}

mail.box: Server not responding

'[OT] Is Win NT VB as it relates to Amateur callsig'
1998\06\26@172146 by paulb

flavicon
face
Rich Graziano wrote:

> Is W0DZG a HAM Operator call?  Would 0 be in MO, Perhaps?  Sorry I
> misunderstood.

 That was a zero.  The structure of an amateur call is:

 Country code: One letter may be preceeded by a letter or digit, i.e.,
       may be one letter, two letters or digit then letter.  Some
       countries, notably America, have more than one such code, which
       may indicate different operator classes.
 State code: One digit.
 Personal group: Two or three letters.  Possibly one.  The first of
these is often a class denotation e.g. here in Australia, "two letter"
calls and infixes "A" to "E" are unlimited, "N" and "M" are novices,
"Z", "Y" and "X" are limited, "L" are novice + limited, "R" are fixed
(unmanned) repeater stations, and various others.  In NZ, "T" calls are
limited ("Technician" - rude, isn't it?).

 Some temporary or special event codes are also used, some of which do
not follow this pattern at all!

 Someone may care to post the URL for the search engine.

 Cheers,
       Paul B.

1998\06\26@205133 by Harrison Cooper

flavicon
face
               http://www.qrz.com <http://www.qrz.com>  has at least the US
database for callsigns

                               ----------


'VB serial'
1998\10\30@155947 by The Plumber
flavicon
face
Sorry for being a bit off topic,

I am trying to communicate to a Visual Basic application using a pic, at
first I thought it was my code (pic), but then when I tried to use a
terminal program on another computer it didn't accept the input either.
The cable should be fine, because I can communicate between two computers,
in dos using a terminal program.  Can anyone help me with this, any
example code, I am trying to use the mscomm control to make my life simple
but I must be missing something simple with the On_comm() event.

BTW, I can send easily with the mscomm control.

Thanks,
Joe Hoffmann
E-Mail TakeThisOuTjhoffmanKILLspamspamspamit.sait.ab.ca

1998\10\30@171641 by Alberto Smulders

flavicon
part 0 1867 bytes content-type:text/plainJoe,

I think your question is not so OT, Visual Basic is very nice for making a
user interface - we use it for control systems and remote data logging -
despite the fact you sometimes have to use rather a lots of tricks in order
to have it work correctly.

Well, you cannot read the comm buffer immediately on a comm event, it
doesn't work (why perhaps Bill Gates can explain you, although I have my
doubts). The trick is starting a timer on the comm event or when the
inbuffer count is greater than 0, and do the reading of the buffer contents
when the timer fires.

I've attached a small program (VB3 code) for communication with a Panasonic
PBX system, there you can find a way to do it..... The sample program
monitors InBufferCount, you can also start the timer in the On_Comm event as
another way to have things work.

Regards,

Albert Smulders
InSAD - Encarnaci—n, Paraguay
.....insadspamRemoveMEitacom.com.py

-----Mensaje original-----
De: The Plumber <RemoveMEjhoffmanspamspamBeGoneIT.SAIT.AB.CA>
Para: spamBeGonePICLIST@spam@spamspam_OUTMITVMA.MIT.EDU <TakeThisOuTPICLISTspamspamMITVMA.MIT.EDU>
Fecha: Viernes 30 de Octubre de 1998 17:04
Asunto: VB serial


{Quote hidden}

Attachment converted: wonderland:Central.ZIP (pZIP/pZIP) (0001BE8C)

1998\10\30@173146 by Peter Grey

picon face
At 01:09 PM 30/10/98 -0700, you wrote:
Joe,

Are you requesting code for PIC or VB? I am using VB4 and talking to a stamp
and used the standard dialog as supplied in book.

"
Private Sub Form_Load()
   MSComm1.CommPort = 2
   MSComm1.Settings = "9600,N,8,1"
   MSComm1.InputLen = 0
   MSComm1.PortOpen = True
   MSComm1.Output = "AT" + Chr$(13)
   Do
       dummy = DoEvents()
   Loop Until MSComm1.InBufferCount >= 2
   instring$ = MSComm1.Input
   MSComm1.PortOpen = False
   MsgBox (instring$)


End Sub
"
I had no problem with this at all. I modified this to handle a greater
length input.

Good luck



Peter Grey
Neosystems
{Quote hidden}

1998\10\31@133709 by WF AUTOMACAO

flavicon
face
The Plumber wrote:
>
> Sorry for being a bit off topic,
>
> I am trying to communicate to a Visual Basic application using a pic, at
> first I thought it was my code (pic), but then when I tried to use a
> terminal program on another computer it didn't accept the input either.
> The cable should be fine, because I can communicate between two computers,
> in dos using a terminal program.  Can anyone help me with this, any
> example code, I am trying to use the mscomm control to make my life simple
> but I must be missing something simple with the On_comm() event.
>
> BTW, I can send easily with the mscomm control.
>
> Thanks,
> Joe Hoffmann
> E-Mail @spam@jhoffmanRemoveMEspamEraseMEit.sait.ab.ca

http://www.marshallsoft.com has the solution for you problem!

Miguel


'VB: (no subject)'
1998\12\28@100600 by mats
flavicon
face
part 0 366 bytes content-type:text/x-vcard; (decoded 7bit)


>
>
>unsubscribe PICLIST
>

Content-Type: text/x-vcard;
       name="vcard.vcf"
Content-Description: Card for Mohammad Mustafa  Qureshi
Content-Disposition: attachment;
       filename="vcard.vcf"
Content-Transfer-Encoding: 7bit

Attachment converted: wonderland:vcard.vcf (TEXT/CSOm) (00023394)


'LCD emulation on VB form'
1999\03\27@002728 by Leonardo De Palo
flavicon
face
Ciao PICer friends,

I need to emulate on VB form an LCD (2 x 16) with a caracter cell of 7 x 5 ,
a seven segment LED display and a couple of 5mm LED.

Anyone know were I can found the OCX.

Thanks

Saluti

Leo

1999\03\27@013226 by Peter Williamson

flavicon
face
Can you type http://www.altavista.digital.com ? Who helps you breathe ? Do you
want help to tie your show laces ?

Leonardo De Palo wrote:
{Quote hidden}

--
Peter Williamson | Phone: +61 15 898934
Waybeat Pty Ltd  | Email: EraseMEpeterwspam@spam@waybeat.com.au

1999\03\27@051710 by g.daniel.invent.design

flavicon
face
Leo:
Scan them and store the bitmaps, then you can simply call up the bitmaps
as required for each digit.   If you want a professional result, then
either put in the time and effort yourself, or PAY someone else who
*has* the required skill.
regards,
Graham.Leonardo De Palo wrote:
{Quote hidden}

--
Steam engines may be out of fashion, but when you consider that an
internal combustion engine would require recovery of waste heat by
transfer just before top dead centre then fashion becomes rather
redundant, USE STRATIFIED HEAT EXCHANGERS ! and external combustion.

You heard it first from: Graham Daniel, managing director of Electronic
Product Enhancements.
Phone NZ 04 387 4347, Fax NZ 04 3874348, Cellular NZ 021 954 196.

'LCD emulation on VB form (get your free OCX here!'
1999\03\27@090056 by Mark J Anstice

picon face
part 0 1045 bytes content-type:application/octet-stream;It's your lucky day, have my LED built with MS Visual C++ 6 ocx for free.  It
is fully functional (but a few extras are to be added in the future). I have
added two properties, one for Status, True = Led ON, False = Led OFF, and Led
Colour which can either be Red Green or Yellow.  You scale the size of each
Led control to whatever dimensions you like (it uses bitmap stretching).
Here's a hint - use control arrays, it makes life easier.  I can send a test
VB application if you wish.

The reason I created this control is that all the ones I found on the net were
either crap or cost too much, so i thought i'd do it myself.  I'm currently
working on a 7 - segment display and an alphanumeric LCD,  not sure whether
i'll be giving the others away for free, it's taking ages to do!!

Have fun, regards,

Mark.

Content-ID: <@spam@0_922543190spam_OUTspam.....inet_out.mail.aol.com.2>
Content-type: application/octet-stream;
       name="MARKSL~1.OCX"
Content-disposition: inline

Attachment converted: wonderland:MARKSL~1.OCX (????/----) (0002D191)

'[OT]Re: LCD emulation on VB form'
1999\03\28@183342 by Tony Nixon

flavicon
picon face
Leonardo De Palo wrote:
>
> I need to emulate on VB form an LCD (2 x 16) with a caracter cell of 7 x 5

This doesn't seem the correct forum for this type of question, but
speaking from experience, it's not as hard as you think, although I did
it in Delphi not VB. Have a go, you might surprise yourself.

--
Best regards

Tony

PicNPoke - Multimedia 16F84 Beginners PIC Tools.
*** FREE PCB OFFER ***

http://www.picnpoke.com
Email spamBeGonepicnpokeEraseMEspamcdi.com.au


'[OT]Re: LCD emulation on VB form'
1999\04\04@182627 by Leonardo De Palo
flavicon
face
Hi Tony,

I agree that my post request is just a little out of argument, but i need
some support/ideas/comment in a project that use a 16F84 to manage a 2x16
LCD display, and a  seven segment display, trought a PC via RS232.

My needs is to give a real rappresentation on PC screen of what append on
LCD.

I have read some time ago on a USA magazine about an OCX for VB but after
some researc on different internet engine I do not have found nothing of
interesting.

As the comunity of PICLIST is great I suppose some frinds can help me with
suggestions and or comments as the spirit of the list.

Reagrds to all.

Leonardo
cacciavitespamBeGonespambigfoot.com


-----Messaggio originale-----
Da: Tony Nixon <RemoveMETony.Nixon@spam@spamspamBeGoneENG.MONASH.EDU.AU>
A: .....PICLIST@spam@spamEraseMEMITVMA.MIT.EDU <.....PICLISTRemoveMEspamMITVMA.MIT.EDU>
Data: luned“ 29 marzo 1999 1.34
Oggetto: [OT]Re: LCD emulation on VB form


Leonardo De Palo wrote:
>
> I need to emulate on VB form an LCD (2 x 16) with a caracter cell of 7 x 5

This doesn't seem the correct forum for this type of question, but
speaking from experience, it's not as hard as you think, although I did
it in Delphi not VB. Have a go, you might surprise yourself.

--
Best regards

Tony

PicNPoke - Multimedia 16F84 Beginners PIC Tools.
*** FREE PCB OFFER ***

http://www.picnpoke.com
Email .....picnpokeSTOPspamspam@spam@cdi.com.au

'VB6 Code - to - RS-232 - to - PIC'
1999\04\24@102956 by David Covick

flavicon
face
I am new to Visual Basic and wondered if anyone would share the VB code to
communicate with a PIC.
I don't have a clue as to where to begin.  Possibly with the MScomm
statement?

If the code is too large it could be e-mailed directly to me.

Thanks in advance.

David
dacEraseMEspam@spam@west.net

1999\04\24@120009 by DAZLOGAN

picon face
In VB6, follow these steps:

Put a comm control on your form, call it say "mycomm"

In the form load event, open the comm port by doing the following:

sub form_load()
       mycomm.portopen=true
end sub

to send something via RS232 in VB type:

mycomm.output="whatever you want to send"


whatever the PIC sends to the PC port, VB automatically collects it and you
can view what has been selected by say debugging the contents of the port
thus:

debug.print mycomm.input

1999\04\24@124203 by g.daniel.invent.design

flavicon
face
David Covick wrote:
>
> I am new to Visual Basic and wondered if anyone would share the VB code to
> communicate with a PIC.
> I don't have a clue as to where to begin.  Possibly with the MScomm
> statement?
>
> If the code is too large it could be e-mailed directly to me.
>
> Thanks in advance.
>
> David
> RemoveMEdacspamspamBeGonewest.net

David, You are on the right track.
you can actually place multiple MSComm onto a form.

on the PIC end, the easy way is to use a MAX202 chip to generate the
correct levels.

Microchip have application notes for software asynchronous code(bit
banged), otherwise you can use a 'C63 or 'C73 or upwards processor with
inbuit hardware UART

As far as the VB6 goes, just open up some text windows onto your form
for debugging and you will be able to use various comm events to get it
going. Just type MSComm1.(dot) and scroll through the list to find out
the options.

Below are some starting code fragments:

With MSComm1
.InputMode = comInputModeText
.CommPort = 1
.Handshaking = comNone
.Settings = "56000,n,8,1"
.ParityReplace = "_"
.InBufferSize = 512
.InputLen = 40
.RThreshold = 80
.PortOpen = True
End With


Do While MSComm1.InBufferCount > 1
RawDataIn$ = RawDataIn$ + MSComm1.Input:            ' buffer data
Loop

With MSComm1
   Select Case .CommEvent
       Case comEventBreak
           Label2.Caption = "Break": EC = EC + 1: ErrorCount.Caption =
EC
       Case comEventFrame
           Label2.Caption = "Frame": EC = EC + 1: ErrorCount.Caption =
EC
       Case comEventOverrun
           Label2.Caption = "Overrun": EC = EC + 1: ErrorCount.Caption
= EC
       Case comEventRxOver
           Label2.Caption = "RxOver": EC = EC + 1: ErrorCount.Caption =
EC
       Case comEventRxParity
           Label15.Caption = "RxParity": EC = EC + 1:
ErrorCount.Caption = EC
       Case comEventTxFull
           Label2.Caption = "TxFull": EC = EC + 1: ErrorCount.Caption =
EC
       Case comEventDCB
           Label2.Caption = "DCB": EC = EC + 1: ErrorCount.Caption = EC
       Case Else
            Label2.Caption = .CommEvent: ErrorCount.Caption = EC
   End Select
End With

regards,
Graham Daniel.

--
Steam engines may be out of fashion, but when you consider that an
internal combustion engine would require recovery of waste heat by
transfer just before top dead centre then fashion becomes rather
redundant, USE STRATIFIED HEAT EXCHANGERS ! and external combustion.

You heard it first from: Graham Daniel, managing director of Electronic
Product Enhancements.
Phone NZ 04 387 4347, Fax NZ 04 3874348, Cellular NZ 021 954 196.

1999\04\25@105012 by David Covick

flavicon
face
Thanks Darren and Graham for your help on the code!
Look out, I'm dangerous now  :)

David

____________________________________

David Covick wrote:
{Quote hidden}

1999\04\26@120940 by WF AUTOMACAO

flavicon
face
David Covick wrote:
>
> I am new to Visual Basic and wondered if anyone would share the VB code to
> communicate with a PIC.
> I don't have a clue as to where to begin.  Possibly with the MScomm
> statement?
>
> If the code is too large it could be e-mailed directly to me.
>
> Thanks in advance.
>
> David
> dacspam_OUTspam@spam@west.net

http://www.mashallsoft.com

U$80 for registered version,,,

Non registered version runs only 20 minutes :(

1999\04\26@200117 by Ricardo Barbosa

flavicon
face
Ola
Que bom encontrar alguem para escrever em nosso idioma.
Ha algum tempo existia o PICLIST que era uma unica mensagem e esta continha
v‡rios e-mails. Agora assinei este forum e recebo 100 mensagens por dia.
Sabe se Ž possivel configurar alguma coisa para receber uma mensagem
contendo todos os
e-mails.
Obrigado pela atencao
Ricardo
-----Mensagem original-----
De: WF AUTOMACAO <spamBeGonewf@spam@spamAMBIENTE.COM.BR>
Para: RemoveMEPICLISTEraseMEspamKILLspamMITVMA.MIT.EDU <spamBeGonePICLISTspam_OUTspamRemoveMEMITVMA.MIT.EDU>
Data: Segunda-feira, 26 de Abril de 1999 13:12
Assunto: Re: VB6 Code - to - RS-232 - to - PIC


>David Covick wrote:
>>
>> I am new to Visual Basic and wondered if anyone would share the VB code
to
{Quote hidden}

1999\04\27@011326 by Thierry V

flavicon
face
>
> http://www.mashallsoft.com
>
> U$80 for registered version,,,
>
> Non registered version runs only 20 minutes :(
>
Little typo,
URL is http://www.marshallsoft.com

1999\04\27@120606 by WF AUTOMACAO

flavicon
face
Thierry V wrote:
>
> >
> > http://www.mashallsoft.com
> >
> > U$80 for registered version,,,
> >
> > Non registered version runs only 20 minutes :(
> >
> Little typo,
> URL is http://www.marshallsoft.com

Ops! Sorry! ;(


'ANN: Web site w/ PIC, DMX-512, VB, etc Info'
1999\06\29@135924 by Adam Davis
flavicon
face
I am officially announcing my web site which contains information on:
PIC uControllers, DMX-512, Phase Controlled light dimming, Rotary encoders;
and a very little bit on TI graphing Calculators and power supply stuff.
No banners or frames, only necessary graphics (well, there is *one* unnecessary
graphic on my home page ;-)

http://ubasics.com/adam

Notably:
I copied Dave Tait's PIC archive and links pages, and have verified/modified
every link on the archive page, and about half the links on the link page.  I am
planning on forming them into a searchable db of some form, and adding my own
large list as well.

PIC ARCHIVE (no graphics on page):
  http://www.ubasics.com/adam/pic/archive.shtml

PIC LINKS (no graphics on page):
  http://www.ubasics.com/adam/pic/piclinks.shtml

DMX-512 (no graphics on page):
  http://www.ubasics.com/adam/electronics/dmx512.shtml

AC Phase Control (some graphics for diagrams and schematics):
  http://www.ubasics.com/adam/electronics/doc/phasecon.shtml

Enjoy!

-Adam Davis
adamspam@spam@ubasics.com


'VB: pic + usb'
1999\09\15@052307 by Jan-Olov Lundstrom
flavicon
face
Someone wrote

       Hi, Chris

        I use PIC16C63 & USBN9602 to communicate PC by USB (Full Speed)
         with a Data Acquisition Device, which has SPI-bus, and with I2C EEPROM
.

        Are You interested the source that operates a few switches and LEDs by
USB?
        I have both ends, the PIC and the C++ application  & Win2000 driver.

 I'am very intersted   can you please send the software to me
 EraseMEJanne.lundstromRemoveMEspamSTOPspamarcoma.se


'[ot] VB mailing list ?'
1999\10\31@190719 by Darren Logan
picon face
Hi,

   Anyone know of a Visual Basic mailing list?
   Please let me know if you do.

   Cheers,
Darren

1999\10\31@191136 by Robert A. LaBudde

flavicon
face
<x-flowed>At 07:05 PM 10/31/99 -0500, you wrote:
>Hi,
>
>     Anyone know of a Visual Basic mailing list?
>     Please let me know if you do.
>
>     Cheers,
>Darren

The VISBAS-L list can be subscribed to via an email to:

        RemoveMELISTSERVKILLspamspamTakeThisOuTPEACH.EASE.LSOFT.COM

Be aware that the volume is about 100kB in messages per day!

================================================================
Robert A. LaBudde, PhD, PAS, Dpl. ACAFS  e-mail: spamBeGoneralspam@spam@lcfltd.com
Least Cost Formulations, Ltd.                   URL: http://lcfltd.com/
824 Timberlake Drive                            Tel: 757-467-0954
Virginia Beach, VA 23464-3239                   Fax: 757-467-2947

"Vere scire est per causae scire"
================================================================

</x-flowed>

1999\10\31@191553 by Darren Logan

picon face
Great, I just found this seconds before you sent it.

Thanks for the warning about the quantity of e-mails. I already have hundreds
a day!


'[OT] Inlog's Ctrl95 pack for VB'
1999\11\10@221025 by Darren Logan
picon face
Hello there,

   Im trying to find Inlog's Ctrl95 suite for Visual Basic 4 16-bit.

   Anyone know where I can get it?

Cheers,
Darren

'[OT] Seeprom + VB + PC'
1999\11\20@024953 by Tim Hamel

picon face
PICsters,

This isn't all that OT because the end result IS with a PIC. I'm hoping there
are VB programmers out there that have tried to do this... I'm wanting to
program some SEEPROMs via my printer port, but my only language is Visual
Basic. I've studied Peter Anderson's code only to be left with a big "?" on
my forehead. Sure, I could use someone else's code, but I want to know what's
going on. Has anyone done this using VB? I know it's possible... Any info is
much appreciated.

Thanks in advance,

Tim Hamel

1999\11\20@050914 by Darren Logan

picon face
I have VBX'x that allow you to read/write to any port in the PC.

They're for VB4 16-Bit.

1999\11\20@051330 by Tim Hamel

picon face
I appreciate the offer...but I use VB6 and a DLL to access ports. I don't
have a problem with clocking (low...high), all I have a problem with is
actually sending data TO the eeprom -- shifting it, OR'ing it with a bit to
keep CS high, etc.

Tim Hamel

In a message dated 11/20/99 2:09:26 AM Pacific Standard Time,
RemoveMEDAZLOGANspam_OUTspamAOL.COM writes:

> I have VBX'x that allow you to read/write to any port in the PC.
>
>  They're for VB4 16-Bit.

1999\11\20@053101 by Robert A. LaBudde

flavicon
face
<x-flowed>At 02:47 AM 11/20/99 -0500, Tim wrote:
>This isn't all that OT because the end result IS with a PIC. I'm hoping there
>are VB programmers out there that have tried to do this... I'm wanting to
>program some SEEPROMs via my printer port, but my only language is Visual
>Basic. I've studied Peter Anderson's code only to be left with a big "?" on
>my forehead. Sure, I could use someone else's code, but I want to know what's
>going on. Has anyone done this using VB? I know it's possible... Any info is
>much appreciated.

1. WinNT will not allow you to access the parallel port. You must install a
Win device driver that gives you permission. These are available on the
internet.

2. In Win95 and Win98, you can access the parallel port, but VB does not
have the facilities to do so. You must install a C-based DLL to give VB the
capability. There are freeware DLLs of this type available on the parallel
port info sits.

3. The typical parallel data port is 0x'378'. Pins 2-9 of the connector are
D0 ... D7.

4. Inputs are available from the status port at 0x'379'.

5. Ground is at pin 18 of the connector.

6. I've driven a PIC 16F84 and LEDs just by plugging a few PIC input lines
into the parallel port data-out lines! Apparently you can get > 10 mA per pin!

================================================================
Robert A. LaBudde, PhD, PAS, Dpl. ACAFS  e-mail: ralspamspamlcfltd.com
Least Cost Formulations, Ltd.                   URL: http://lcfltd.com/
824 Timberlake Drive                            Tel: 757-467-0954
Virginia Beach, VA 23464-3239                   Fax: 757-467-2947

"Vere scire est per causae scire"
================================================================

</x-flowed>

1999\11\20@053728 by Tim Hamel

picon face
I apologize for not being clearer in some areas. I have experience with the
parallel port, it's just this one thing that's got me stuck. To be exact.. to
read a byte from the EEPROM, the opcode is 110000000b Ok, now, I'm using Pin
2 of the parallel port (which is bit 0 of 0x378), so my question is...how do
I flip that value around so it's 000000011b  so that I can start
outputting/shifting it? That's my exact problem right there!

Much Thanks,

Tim Hamel


In a message dated 11/20/99 2:31:23 AM Pacific Standard Time, spam_OUTralspam_OUTspamspam_OUTLCFLTD.COM
writes:

{Quote hidden}

1999\11\20@055627 by Robert A. LaBudde

flavicon
face
<x-flowed>At 05:11 AM 11/20/99 -0500, Tim wrote:
>I appreciate the offer...but I use VB6 and a DLL to access ports. I don't
>have a problem with clocking (low...high), all I have a problem with is
>actually sending data TO the eeprom -- shifting it, OR'ing it with a bit to
>keep CS high, etc.
>
>Tim Hamel

1. VB operations:

OR:     iResult = iOper1 or iOper2

AND:    iResult = iOper1 and iOper2

XOR:    iResult = iOper1 xor iOper2

Right shift 1-bit:  iResult = iOper1 \ 2

Left shift 1-bit:   iResult = iOper1 * 2

E.g.   iResult = (iOper and &Hf7) or &H10

2. Work on bytes individually, and use INTEGER variables (16-bit) to hold
numbers. This will avoid sign extension problems.

3. Output the 16-bit integer to the port (8-bits). Only the low 8 bits will
be sent.

================================================================
Robert A. LaBudde, PhD, PAS, Dpl. ACAFS  e-mail: ralspam_OUTspamlcfltd.com
Least Cost Formulations, Ltd.                   URL: http://lcfltd.com/
824 Timberlake Drive                            Tel: 757-467-0954
Virginia Beach, VA 23464-3239                   Fax: 757-467-2947

"Vere scire est per causae scire"
================================================================

</x-flowed>

1999\11\20@060617 by Robert A. LaBudde

flavicon
face
<x-flowed>At 05:36 AM 11/20/99 -0500, Tim wrote:
>I apologize for not being clearer in some areas. I have experience with the
>parallel port, it's just this one thing that's got me stuck. To be exact.. to
>read a byte from the EEPROM, the opcode is 110000000b Ok, now, I'm using Pin
>2 of the parallel port (which is bit 0 of 0x378), so my question is...how do
>I flip that value around so it's 000000011b  so that I can start
>outputting/shifting it? That's my exact problem right there!

Presumably you meant 1100 0000 for the value, as your's above is 9 bits.

To output bit-by-bit starting with msb:

        iDiv=2^7
        for iPos=7 to 0 step -1
          iBit=iData \ iDiv     'this will be 0 or 1 for bit in position i
          call OutPort(&H378,iBit)
          iDiv=iDiv \ 2         'shift to next lowest bit
       next iPos

================================================================
Robert A. LaBudde, PhD, PAS, Dpl. ACAFS  e-mail: RemoveMEralKILLspamspam@spam@lcfltd.com
Least Cost Formulations, Ltd.                   URL: http://lcfltd.com/
824 Timberlake Drive                            Tel: 757-467-0954
Virginia Beach, VA 23464-3239                   Fax: 757-467-2947

"Vere scire est per causae scire"
================================================================

</x-flowed>

1999\11\20@061852 by Tim Hamel

picon face
You are the man! =) I guess the "step -1" REALLY makes a difference. As far
as the EEPROM goes, it is 9 bits (Start bit + Opcode (2 bits) + 6 bit
address). Now, all I do is OR the value that goes out to 378 with 2 and CS
will be high constantly. Woohoo! I thank you VERY much!

Tim Hamel


In a message dated 11/20/99 3:06:32 AM Pacific Standard Time, ralspamBeGonespam.....LCFLTD.COM
writes:

{Quote hidden}


'[OT] URL links from VB4'
1999\12\12@164209 by Darren Logan
picon face
Sorry about the OT, but does anyone know how to add a URL link in VB4 16-bit ?

Cheers,
Darren

1999\12\12@181844 by Tim Hamel

picon face
Darren,

VERY OT <g> How you would do it is add a label with font at underline + blue
and for the Label1_Click() event you would put :

x=Shell("c:\pathtoIEorNetscapehere"

Simple enough eh?

Regards

Tim Hamel

In a message dated 12/12/99 1:42:21 PM Pacific Standard Time,
KILLspamDAZLOGANspam.....AOL.COM writes:

> Sorry about the OT, but does anyone know how to add a URL link in VB4
16-bit ?
>
>
>  Cheers,
>  Darren


'PIC 'n VB products here:'
2000\01\18@163509 by Darren Logan
picon face
Hello,

Goto http://www.rentron.com/control.htm
and see my pic / VB data acquisition system.

I used picBASIC Pro for the pic-based hardware,
and VB4.0 for the windows interface.

Coming soon...
Im working on a second product for Reynolds Electronics,
basically an RS485 network of 10x DALLAS 1620 temperature
ic's + pic host, interfaced to a pc.
With the windows interface, you can program Hi and Lo
setpoints of each DS1620 node, and also program the
devices for stand-alone (thermostat mode) - for use in
other circuits.
Included in the windows interface is an automatic temperature
acquisition facility, where the pc collects the temperature from
each DS1620 node and displays it in an easy to read table, along
with date and time. Highest and Lowest temperatures of each node
are also displayed, along with global highest and lowest temperatures
recorded. If Hi or Lo setpoints are reached, the cells in the table
turn red / blue accordingly to let the user know.
All data is logged to chosen filename.

Any comments appreciated.

Regards,
Darren Logan BSc


'[OT] PIC with Serial comms in VB'
2000\03\03@020553 by Joe Dudas
picon face
Ok, I am now both confused and quite frustrated. I finally have a logic
probe connected to the TX line (which goes from PIC to PC), and it indicates
something is indeed being sent. However, when I used the mscomm1.input
method to put the input buffer into a variable, all I'm left with is an
empty variable. Its not null, just empty. I have tried leaving the port open
for an entire second, still nothing. It's not likely that my timing is off.
I've tried setting the recieve threshold such that an interrupt will be
generated for every single character recieved. Nope. No interrupt is
generated. I have no idea what I'm doing wrong.

One last thing. I am really confused as to how the hardware flow control is
supposed to work. I understand the concept, however, I am unable to find any
sources as to which lines are asserted when.

If you're confused as to what I'm talking about above, I just started a new
thread, mostly because I have no idea how to reply to an existing one.

Thanks for bearing with a newbie,
Joe

2000\03\03@030341 by Tim Hamel

picon face
One thing I can think of....assuming your buffer is named "MyBuffer," try
this:

MyBuffer=String$(buffersize,0)

That SHOULD initialize the variable to a known size. Also, "buffersize" is
how big your buffer is.

Regards,

Tim Hamel


In a message dated 3/2/00 11:06:14 PM Pacific Standard Time, spam_OUTjoey6spamKILLspamHOME.COM
writes:

> Ok, I am now both confused and quite frustrated. I finally have a logic
>  probe connected to the TX line (which goes from PIC to PC), and it
indicates
>  something is indeed being sent. However, when I used the mscomm1.input
>  method to put the input buffer into a variable, all I'm left with is an
>  empty variable. Its not null, just empty. I have tried leaving the port
open
>  for an entire second, still nothing. It's not likely that my timing is off.
>  I've tried setting the recieve threshold such that an interrupt will be
>  generated for every single character recieved. Nope. No interrupt is
>  generated. I have no idea what I'm doing wrong.
>
>  One last thing. I am really confused as to how the hardware flow control is
>  supposed to work. I understand the concept, however, I am unable to find
any
>  sources as to which lines are asserted when.
>
>  If you're confused as to what I'm talking about above, I just started a new
>  thread, mostly because I have no idea how to reply to an existing one.
>
>  Thanks for bearing with a newbie,
>  Joe
>

2000\03\03@151102 by jamesnewton

face picon face
See
http://techref.massmind.org/io/serial/rs232
for general info and
techref.massmind.org/io/serial/rs232sigs
for the signal descriptions and
http://techref.massmind.org/io/serial/seq1
for an example

Clear your mind, read the signal descriptions and all will be clear (I
hope).
---
James Newton RemoveMEjamesnewtonRemoveMEspamEraseMEgeocities.com 1-619-652-0593
http://techref.massmind.org NEW! FINALLY A REAL NAME!
Members can add private/public comments/pages ($0 TANSTAAFL web hosting)


{Original Message removed}

'ActiveX, Stamp, Pic, PicBasic Pro, VB, Web design '
2000\03\04@092606 by Darren Logan

picon face
Good day to you,

   I'm in the early development stages of creating a bundle
   of ActiveX controls for the electronics engineer to use in
   his / her windows applications (such as Visual Basic, Delphi,
   Visual C or any other language which supports ActiveX technology).

   The controls will consist of LED's, Bargraphs, LCD displays,
   Relays etc. etc.

   I'm giving away the relay control FREE. It's real easy to use.


   A Visual Basic example:

   1) Add the relay control to your VB project in the normal way.
   It's called Relay.ocx

   Place the relay onto your form. The control will appear as
   a graphic of a relay in the "open" state, and by default is
   given the name Relay1

   To change the relay state, put the following code into your
   VB app (maybe associated with button clicks):

   To open the relay add the code:

   Relay1.State = "open"

   To close the relay add the code:

   Relay1.State = "closed"

   That's it!

   If you would like the relay control for FREE, please e-mail me
   at KILLspamdazloganspamspamBeGoneaol.com with the subject heading as "Free relay control"

   If you have any ideas as to a) how this control could be improved or b)
   any other controls you would like, please drop me an email.

   I plan to sell the bundle of controls through my web site which will
   be launched within 4 to 6 weeks from now. Along with PIC,
   Basic Stamp, Visual Basic, PicBaisc Pro tools, Web page design
   tools and offers to name a few things!.

   Projects in the pipeline are:
   1) General purpose PID control circuit (using a PIC)
   - P.I and D / other settings programmed through a simple to use
   windows interface. Will come with a basic tutorial on how P.I.D
   digital controllers work for those who are interested.
   2) PIC based digital multimeter kit (Windows interface)
   3) Electronics ActiveX bundle
   4) Simple Web page design offers (lowest cost ever!)
   5) PIC over the internet (longer term - before end of the year hopefully!)
   6) Multi-purpose pic-based data acquisition system
   plus many more

   other off topic subjects:

   1) Make money on the stock market using online stockbrokers
   2) Where to find FREE video games and FREE music on the internet
   to run on your pc
   plus many more of my favourite sites

   Im based in Cambridge, UK.This is my first time venture onto the world
wide    web. Im a one-man band with multiple disciplines in the electronics
and     programming field and I can't wait to share them with you. 8-)

   Regards,
       Darren Logan BSc

2000\03\04@100417 by Scott Dattalo

face
flavicon
face
On Sat, 4 Mar 2000, Darren Logan wrote:

> Good day to you,

Like wise.
{Quote hidden}

What a coincidence, I'm actively working in X and my stuff is free too -
free in the sense of freedom and not as in free beer.

{Quote hidden}

In my project, gpsim, we'll be working on module interfaces shortly. I
don't have a relay yet, but the LCD is coming around:
http://www.dattalo.com/gnupic/lcd.html
I unfortunately don't have a Visual Basic interface although the
interfaces are basically visual. In fact I don't support any language in
particular, but I suppose any language that can open dynamic libraries
would work okay.

>
>     If you would like the relay control for FREE, please e-mail me
>     at dazloganspamspamaol.com with the subject heading as "Free relay control"
>
>     If you have any ideas as to a) how this control could be improved or b)

GPL ?

Scott

'FW: serial comm : PIC to VB'
2000\03\07@112632 by makanav

picon face
I'm forwarding this request to the list for a friend. Please respond to him
directly.

---
James Newton (PICList Admin #3)
RemoveMEjamesnewtonspamBeGonespamRemoveMEpiclist.com 1-619-652-0593
PIC/PICList FAQ: http://www.piclist.com or .org

{Original Message removed}

2000\03\07@121737 by Jeff Davis

flavicon
face
<x-flowed>At 8:24 -0800 7/3/00, James Newton wrote:
>
>with 2400 baud rate. the u-controller here only send data and would
>not receive any data from PC. after run the program with attached
>external circuit, the vb program stucked with  " PORT ALREADY OPEN" error.
>for

I am using Vb with a different comms tool, but that sounds like the
error I get when I already have a program open using that serial
port. So it sounds like you might either have another program open
that uses that port or you are opening the port twice.

Jeff

---
 Jeff Davis             "Imagination is more important than knowledge.
 (425) 702-1741                    Knowledge is limited.
 8323 158th PL NE             Imagination encircles the world."
 Redmond, WA USA 98052              -Albert Einstein-

</x-flowed>

'Simple serial port software (mscomm control, VB6)'
2000\03\07@151443 by M. Adam Davis

flavicon
face
A few have asked that I send them the source to my serial port program, and many
have struggled with the MSCOMM control, so I set up a small program and a small
page for it.

The program I am currently using to send and receive with the serial port on my
win98 PC is located here:
http://ubasics.com/adam/electronics/ha/software.shtml

Please read the entire (short) web page about it before trying to use it.

The software includes source code, and uses the MSCOMM control in visual basic.
It is not as polished as I like, but it will give you an idea of how to set
things up.  It currently only operates at 9600bps, 8n1, no handshaking, though
you can set the port to any port com1-4 while it is running.

I hope this is useful.  Any comments or suggestions would be appreciated, but I
don't plan on having this do much more than it does now.

-Adam

'[OT] Help Hex->bin conversion (pic=easy, VB=??)'
2000\03\21@132106 by Lea

picon face
Hi All.
       I'm ending a project that uses 2 radio HDLC interfaces, they read
several devices (sensors and stuff like that) and report the changes over
the radio to the base station, programming for this was ok (ASM love it),
2 month of work :), but now, I have to program a GUI (in Visual Basic)
so I can easily display all the information collected by the radio
interfaces, and I'm facing a very DUMB problem, and I don't know how
to solve it , It will sound stupid but, I don't know how to convert
a 8 bit (2 ascii Char , Hexadecimal value) to Binary (8 Char ascii bin)

Ej: If a Have in a X variable the "F0" value, I need to get "11110000"

How can i do it under VB?, it is so easy in ASM that I cannot believe that
I can't do it in VB.

Thanks in advance.

see you, bye.
  Leandro J. Laporta (LU2AOQ)
  mail: KILLspamlu2aoqspamBeGonespamyahoo.com
  wrk: Arg. Assoc. for Space Technology.
  ham: TCP/IP high speed group HSG


__________________________________________________
Do You Yahoo!?
Talk to your friends online with Yahoo! Messenger.
http://im.yahoo.com

2000\03\22@165337 by Mike Mansheim

flavicon
face
<snip>
to solve it , It will sound stupid but, I don't know how to convert
a 8 bit (2 ascii Char , Hexadecimal value) to Binary (8 Char ascii bin)

Ej: If a Have in a X variable the "F0" value, I need to get "11110000"

How can i do it under VB?, it is so easy in ASM that I cannot believe that
I can't do it in VB.
<snip>
I'm sure that more elegant ways to do this abound, but this works and it
shows the
basics of base conversion.

Take each digit in X and convert it to a 4 bit string (F = '1111', 0
= '0000'),
then put them together to make the 8 bit string.

First, X will be a string - access each character in the string with the
mid$ string
function:

    binary_string = ""
    For j = 1 To Len(X)      'this watches for single character; should
also trap
         hex_char = mid$(X,j,1)   ' for lengths > 2

Then hex_char needs to be converted to a number, using something like:

         number = Asc(hex_char) - 48              'Asc converts char to
ascii number
         if (number > 9) Then number = number - 7           'upper case
letters
         if (number > 15) Then number = number - 32    'lower case letters

Then run each resulting number through a base conversion routine to build
the 4 bit string:

         For i = 3 To 0 Step -1
              divisor = 2 ^ i
              digit = Int(number / divisor)
              number = number - (digit * divisor)
              ' "&" is string concatenation; Chr is the inverse of Asc
              binary_string = binary_string & Chr(digit + 48)
         Next i
    Next j

    'pad with leading '0000' if single digit input
    if (Len(X) = 1) Then binary_string = "0000" & binary_string

Hope this helps!

2000\03\22@173150 by jamesnewton

face picon face
Here is the source of the page at
techref.massmind.org/method/math/bindecbits.asp
which sort of does this in VBScript

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN">
<HTML>
<HEAD>
<TITLE></TITLE>
</HEAD>
<BODY>
<TABLE BORDER=1>
<TR><TH>Decimal</TH><TH>Binary</TH>
<%
aryBin = split("000,001,010,011,100,101,110,111", ",")

intI = 60000
intD = 10000
while intI > 9
       strOct = Oct(intI)
       response.write "</TR><TR><TD ALIGN=RIGHT>" & intI & "</TD><TD ALIGN=RIGHT>"
       for intJ = 1 to len(strOct)
               response.write aryBin(cint(mid(strOct,intJ,1)))
               next
       strOct = Oct(intI-1)
       response.write "</TR><TR><TD ALIGN=RIGHT>" & intI - 1 & "</TD><TD
ALIGN=RIGHT>"
       for intJ = 1 to len(strOct)
               response.write aryBin(cint(mid(strOct,intJ,1)))
               next
       if intI > intD then
       else
               intD = intD / 10
               end if
       intI = intI - intD
       wend

%>
</TR></TABLE></BODY></HTML>

---
James Newton @spam@jamesnewtonSTOPspamspam@spam@geocities.com 1-619-652-0593
http://techref.massmind.org NEW! FINALLY A REAL NAME!
Members can add private/public comments/pages ($0 TANSTAAFL web hosting)


{Original Message removed}

'[OT] Thanks and VB #3'
2000\03\29@133520 by Sean Breheny

face picon face
Thanks to those who replied on the Visual Basic question. I tried the
SHBrowseForFolder option and it looks pretty good. Just two more quick
questions about it:

#1) The documentation lists a whole bunch of Flags constants to be used
with it, but nowhere can I find what the numerical values of them are so
Ican define them. WHere do I find this?

#2) Is there a way to allow it to select multiple directories at once? If
not, I suppose I might consider going with a custom dialog. Any pointers
on where to find out info on making custom dialogs?

Thanks,

Sean

2000\03\29@143311 by Tim Hamel

picon face
Hi Sean,

Below is more code (with the constants defined). This code is set up as a
function, as opposed to having command buttons, etc.

Begin code ----->

Private Const BIF_RETURNONLYFSDIRS = &H1&
Private Const BIF_DONTGOBELOWDOMAIN = &H2&
Private Const BIF_STATUSTEXT = &H4&
Private Const BIF_RETURNFSANCESTORS = &H8&
Private Const BIF_EDITBOX = &H10&
Private Const BIF_VALIDATE = &H20&
Private Const BIF_BROWSEFORCOMPUTER = &H1000&
Private Const BIF_BROWSEFORPRINTER = &H2000&
Private Const BIF_BROWSEINCLUDEFILES = &H4000&

Private Type BROWSEINFO
 hwndOwner As Long
 LPCITEMIDLIST  As Long
 lpszDisplayName As String
 lpszTitle As String
 ulFlags As Long
 lpfn As Long
 lParam As Long
 iImage As Long
End Type

Private Declare Function SHBrowseForFolder Lib "shell32.dll" _
(lpbi As BROWSEINFO) As Long
Private Declare Function SHGetPathFromIDList Lib "shell32.dll" _
(ByVal pidl As Long, ByVal sFolder As String) As Long


Private Function PromptForFolder() As String
 Dim bInfo As BROWSEINFO
 With bInfo
   .hwndOwner = hwnd
   .lpszDisplayName = String(260, 32)
   .lpszTitle = "Select Directory:"
   .ulFlags = BIF_RETURNONLYFSDIRS
   .lpfn = 0
 End With

 Dim retval As Long, foldername As String
 foldername = String(260, 32)
 retval = SHBrowseForFolder(bInfo)
 retval = SHGetPathFromIDList(retval, foldername)
 PromptForFolder = RTrim$(foldername)

End Function

Regards,

Tim Hamel


In a message dated 3/29/00 10:35:22 AM Pacific Standard Time,
shb7spamBeGonespamspamBeGoneCORNELL.EDU writes:

{Quote hidden}

2000\03\30@012551 by picxpert

picon face
Worry not thyself over such petty things as the proclamation (read:
declaration) of such constants in the universe (read: your program), for the
heavens shall look down well upon you (read: VB does it for you. Just type
in the constant's name.)

(ooh, a little bit too much residual Shakespeare... studying Othello right
now)

-Randy Glenn
spamBeGonePICxpertspamtechie.com - http://i.am/PICxpert

Ineptitude is a sure indicator of intellect - except in the case of @Home
techs.

===========
To unsubscribe, send a message containing the text "unsubscribe PICLIST" to
spam_OUTLISTSERVSTOPspamspamMITVMA.MIT.EDU

{Original Message removed}


'[OT] VB and the real world (was: Question: C vs As'
2000\04\19@162548 by Mark Skeels
picon face
snip...

> Sure, but that makes no comment as to it's real-world usefulness.  No
> serious application is well served by Visual Basic.  VB programmers tend

unsnip...

I *hate* VB, but that doesn't mean that it has no real world usefulness.

In the IS world, VB is the defacto standard for Client-Server database
access.

I personally worked on two such systems, one for a large telecommunications
company in the midwest, and another for a world-wide consulting firm. I
hated it, but I have to admit it got the job done.

Long live Delphi!

Mark

2000\04\20@003120 by Paul Anderson

flavicon
face
On Wed, 19 Apr 2000, Mark Skeels wrote:

>
> I personally worked on two such systems, one for a large telecommunications
> company in the midwest, and another for a world-wide consulting firm. I
> hated it, but I have to admit it got the job done.
>
As well as a one-wheeled cart pulled by an epileptic camel will get you
from point A to point B, but will it do a good job of the task?  VB is
probably one of the least portable languages I've ever seen, it's big,
slow, and encourages bad programming habits.  The world would be a much
better place if BASIC had never been invented(it's mediocre even at it's
designed task - teaching introductory programming).


---
Paul Anderson - Self-employed Megalomaniac
RemoveMEpaulspamspamgeeky1.ebtech.net
http://zephyr.sellad.on.ca/~paul
"We must move forwards, not backwards, upwards not forwards and constantly
twirling, twirling to freedom!"

'Languages VB and the real world[OT]'
2000\04\20@024647 by Plunkett, Dennis

flavicon
face
       <Superior flame suite on>

       Winge bitch winge and bitch.
       It has been with great remourse and the deepest sorrow that I have
been watching this thread, a sigh of deep dissapointment and a grey cloud
now covers the list on seeing the old fashion, mine is bigger and better
than yours rubbish arguments surface. Get a grip on reality as you may drown
in your own evloving excretations of  of ozzing human waste.
       Any language that the user is comftable with will get the job done.
ALL languagues have troble in forcing the user to create code rather then to
coble code. Not all languages are portable, even thoes that are have
limitations. You can scan the alphabet from A to Z and all the languages
inbetween, for each one there are the good points and bad points, non of
them have created "Great" programmers, but all languages have created
"Great" disarters.
       As I have pointed out on the list time and time before, time to
market is the greatest g-d of all, failing to meet this even with the
greatest compiler and language will still put you out of a job :)

       <Superior flame suit off>

       Smile and get the job doen the best way you know how and with the
tools you have


       Dennis

2000\04\20@032743 by Michael Rigby-Jones

flavicon
face
part 0 7620 bytes
<P><FONT SIZE=2 FACE="Arial">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &lt;Superior flame suite on&gt;</FONT>
</P>

<P><FONT SIZE=2 FACE="Arial">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Winge bitch winge and bitch.</FONT>
<BR><FONT SIZE=2 FACE="Arial">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; It has been with great remourse and the deepest sorrow that I have</FONT>
<BR><FONT SIZE=2 FACE="Arial">been watching this thread, a sigh of deep dissapointment and a grey cloud</FONT>
<BR><FONT SIZE=2 FACE="Arial">now covers the list on seeing the old fashion, mine is bigger and better</FONT>
<BR><FONT SIZE=2 FACE="Arial">than yours rubbish arguments surface. Get a grip on reality as you may drown</FONT>
<BR><FONT SIZE=2 FACE="Arial">in your own evloving excretations of&nbsp; of ozzing human waste.</FONT>
<BR><FONT SIZE=2 FACE="Arial">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Any language that the user is comftable with will get the job done.</FONT>
<BR><FONT SIZE=2 FACE="Arial">ALL languagues have troble in forcing the user to create code rather then to</FONT>
<BR><FONT SIZE=2 FACE="Arial">coble code. Not all languages are portable, even thoes that are have</FONT>
<BR><FONT SIZE=2 FACE="Arial">limitations. You can scan the alphabet from A to Z and all the languages</FONT>
<BR><FONT SIZE=2 FACE="Arial">inbetween, for each one there are the good points and bad points, non of</FONT>
<BR><FONT SIZE=2 FACE="Arial">them have created &quot;Great&quot; programmers, but all languages have created</FONT>
<BR><FONT SIZE=2 FACE="Arial">&quot;Great&quot; disarters.</FONT>
<BR><FONT SIZE=2 FACE="Arial">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; As I have pointed out on the list time and time before, time to</FONT>
<BR><FONT SIZE=2 FACE="Arial">market is the greatest g-d of all, failing to meet this even with the</FONT>
<BR><FONT SIZE=2 FACE="Arial">greatest compiler and language will still put you out of a job :)</FONT>
</P>

<P><FONT SIZE=2 FACE="Arial">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; &lt;Superior flame suit off&gt;</FONT>
</P>

<P><FONT SIZE=2 FACE="Arial">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Smile and get the job doen the best way you know how and with the</FONT>
<BR><FONT SIZE=2 FACE="Arial">tools you have</FONT>
</P>
<BR>

<P><FONT SIZE=2 FACE="Arial">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Dennis</FONT>
</P>
<BR>
</UL>
<P><FONT COLOR="#0000FF" SIZE=2 FACE="Arial">I absolutely agree with this.&nbsp; Visual Basic has it's place, along with with C, Pascal, Asembly, Forth and god knows what else.&nbsp; It's just as easy to write horrendous code in C as it is in VB.&nbsp; Whatever the langauge, the quality of code is purely down the skill and experience of the programmer.&nbsp; As I have said before, Visual Basic is totaly unmatched in certain areas such as it's debug facilitys.&nbsp; Yes. it can be too slow for some operations and yes, it requires rather large runtime dll's, but that dosen't stop it being a usefull tool.</FONT></P>

<P><FONT COLOR="#0000FF" SIZE=2 FACE="Arial">Paul Anderson wrote:</FONT>
</P>
<UL>
<P><FONT SIZE=2 FACE="Arial">Really, BASIC is a very ugly language - most other languages at</FONT>
<BR><FONT SIZE=2 FACE="Arial">least have some level elegance to them(Perl has regex, C has pointers and</FONT>
<BR><FONT SIZE=2 FACE="Arial">indentation, assembler is logical and simple, python has some neat object</FONT>
<BR><FONT SIZE=2 FACE="Arial">orientation, etc.), but basic, UGH, it's a kluge through and through.</FONT>
</P>
</UL>
<P><FONT SIZE=2 FACE="Arial">VB from version 5 onwards is also exteremly object orientated.&nbsp; VB also has many C like constructs such as Do loops, a switch-like statement.&nbsp; It also uses pointers in a transparent way.</FONT></P>
<UL>
<P><FONT SIZE=2 FACE="Arial">Visual Basic reinforces this klugery, and tends to discourage actually</FONT>
<BR><FONT SIZE=2 FACE="Arial">THINKING about the code.&nbsp; For example, a friend of mine who recently</FONT>
<BR><FONT SIZE=2 FACE="Arial">learned C had programmed in visual basic for a number of years.&nbsp; He sends</FONT>
<BR><FONT SIZE=2 FACE="Arial">me this program full of if() statements, like so:</FONT>
</P>

<P><FONT SIZE=2 FACE="Arial">&nbsp;&nbsp;&nbsp;&nbsp; if ((xx == 13) || (xx == 18))</FONT>
<BR><FONT SIZE=2 FACE="Arial">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; if ((yy == 2) || (yy == 3) || (yy == 4))</FONT>
<BR><FONT SIZE=2 FACE="Arial">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; yn = FALSE;</FONT>
<BR><FONT SIZE=2 FACE="Arial">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; if (((xx == 13) || (xx == 15) || (xx == 17)) &amp;&amp; (yy == 5))</FONT>
<BR><FONT SIZE=2 FACE="Arial">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; yn = FALSE;</FONT>
</P>
</UL>
<P><FONT COLOR="#0000FF" SIZE=2 FACE="Arial">This is only saying that your friend was a fairly inexperienced VB programmer as well.&nbsp; In fact a fairly inexperienced programmer period.&nbsp; It's possible to write programs in VB that are absolutely clear and readable.&nbsp; VB also supports the equivalent of structures BTW.</FONT></P>

<P><FONT COLOR="#0000FF" SIZE=2 FACE="Arial">To be honest I don't think VB is much worse than any other RAD tool, such as C++ builder.&nbsp; They are, by definition, designed to get projects up and running as quickly as possible.&nbsp; If that compromises certain areas, such as speed and resource useage, then that's the trade-off you make for the ease of use.&nbsp; Actually I installed C++ builder 4 a couple of days ago, and I was pretty shocked when it had to compile over 100,000 lines for a quick &quot;Hello world&quot; type program!!</FONT></P>

<P><FONT COLOR="#0000FF" SIZE=2 FACE="Arial">Regards</FONT>
</P>

<P><FONT COLOR="#0000FF" SIZE=2 FACE="Arial">Mike</FONT>
</P>
<BR>

</BODY>
</HTML>
</x-html>

'[OT] VB and the real world (was: Question: C vs As'
2000\04\20@045023 by Alan B Pearce

face picon face
>As well as a one-wheeled cart pulled by an epileptic camel will get you
>from point A to point B, but will it do a good job of the task?  VB is
>probably one of the least portable languages I've ever seen, it's big,
>slow, and encourages bad programming habits.  The world would be a much
>better place if BASIC had never been invented(it's mediocre even at it's
>designed task - teaching introductory programming).

Cor blimey mate - you will start world war three with this. I have lost track of
how many flavours of Basic I have used over the last 25 or so years, and one
would have to say that is pretty portable, at least as portable as C. (here one
ducks below the trench and puts flame suit on).

Currently working on ground support test equipment for a satellite instrument,
where the code is written in VB3 running on windows 3.1!!!!!!!!!!

2000\04\20@060921 by Arthur

flavicon
face
It's the person usinf the program Not The Program
At work we have the all the programing tools you could think of. but that
does not make Mal our Vb programer when hes using c++ suite the best or most
compact coder.
but his project's with Vb are High earner's for the firm....
Any Why my computer is bigger than your's *Not knowing What's in The Box*.
<big Grin>;-)
Art
{Original Message removed}

2000\04\20@081355 by Andrew Kunz

flavicon
face
Least Portable?  Who are you kidding?  It only runs on Windows!

You know what's funny?  It's Billy the Kid's language of choice.

Now that he's back as a "technology" guy I wonder what the next OS will be
written in.  Probably Basic, since that's all he knows... <G>

Andy









Paul Anderson <TakeThisOuTpaulspamspamRemoveMEGEEKY1.EBTECH.NET> on 04/19/2000 10:43:11 PM

Please respond to pic microcontroller discussion list <KILLspamPICLISTspamspamspam_OUTMITVMA.MIT.EDU>








To:      PICLISTRemoveMEspamMITVMA.MIT.EDU

cc:      (bcc: Andrew Kunz/TDI_NOTES)



Subject: Re: [OT] VB and the real world (was: Question: C vs
         Asm)








On Wed, 19 Apr 2000, Mark Skeels wrote:

>
> I personally worked on two such systems, one for a large telecommunications
> company in the midwest, and another for a world-wide consulting firm. I
> hated it, but I have to admit it got the job done.
>
As well as a one-wheeled cart pulled by an epileptic camel will get you
from point A to point B, but will it do a good job of the task?  VB is
probably one of the least portable languages I've ever seen, it's big,
slow, and encourages bad programming habits.  The world would be a much
better place if BASIC had never been invented(it's mediocre even at it's
designed task - teaching introductory programming).


---
Paul Anderson - Self-employed Megalomaniac
EraseMEpaulSTOPspamspamRemoveMEgeeky1.ebtech.net
http://zephyr.sellad.on.ca/~paul
"We must move forwards, not backwards, upwards not forwards and constantly
twirling, twirling to freedom!"

'Languages VB and the real world[OT]'
2000\04\20@115759 by Lea

picon face
At 04:41 PM 4/20/00 +1000, you wrote:
>        As I have pointed out on the list time and time before, time to
>market is the greatest g-d of all, failing to meet this even with the
>greatest compiler and language will still put you out of a job :)
>
>        <Superior flame suit off>
>
>        Smile and get the job doen the best way you know how and with the
>tools you have
>
>        Dennis
I agree, I use (not very often) VB as Visual Interfase only on many of my
projects, and I think that VB is a disaster BUT, It allows me to get the
job done quickly, and as consequence of this, get paid quickly .

I don't like VB, has a lot of problems,and very unstable, but It works
and it's quickly to learn and apply, so it's still useful.

Anyway some day I will have to learn VC, when time allows me :-)

see you.

  Leandro J. Laporta (LU2AOQ)      mail: spam_OUTlu2aoqRemoveMEspamEraseMEyahoo.com
wrk: Arg. Assoc. for Space Tech.    ham: TCP/IP high speed group HSG


__________________________________________________
Do You Yahoo!?
Talk to your friends online with Yahoo! Messenger.
http://im.yahoo.com


'[OT] VBX and outlook express'
2000\05\30@102829 by Gordon Varney (personal)
flavicon
face
Hail!!! all mighty PIC list....Guardian of all knowledge.....

This morning the TV reports of another Trojan horse (virus)....
Resume:..(something)

I remember a while back some one on the list, had said that we can disable
VBX scripting in Outlook Express. This will solve the problem of worms and
Trojan horse viruses attacking without warning. Am I wrong about this, or
can some body offer a simple "turn this off" solution?


Gordon Varney B.S.E.E.
tel: 573-243-5186

Note:   The information contained in this message may be privileged and
confidential and protected from disclosure.  If the reader of this message
is not the intended recipient, or an employee or agent responsible for
delivering this message to the intended recipient, you are hereby notified
that any dissemination, distribution or copying of this communication is
strictly prohibited. If you have received this communication in error,
please notify us immediately by replying to the message and deleting it from
your computer.  Thank you.

2000\05\30@103453 by Tim Hamel

picon face
Hi Gordon,

No, you're not wrong. Without VBS (no X <g>) installed, windoze has no way of
running VB scripts. Here's a site with instructions on the removal; I've been
tempted to write a program to do this, but....

Here's the site:
http://www.f-secure.com/virus-info/u-vbs/

Regards,

Tim Hamel


In a message dated 5/30/00 7:28:59 AM Pacific Daylight Time, TakeThisOuTvarneyRemoveMEspam@spam@CLAS.NET
writes:

{Quote hidden}

'[OT]: VBX and outlook express - Further virus warn'
2000\05\30@132516 by Alan B Pearce

face picon face
If you think the LoveBug virus was dangerous, then try this first link for what
a kiwi guy reckons, and the second link for Microsoft's answer!!!!

www.nzherald.co.nz/storydisplay.cfm?storyID=138622&thesection=technology&
thesubsection=general

www.nzherald.co.nz/storydisplay.cfm?storyID=138739&thesection=technology&
thesubsection=general

2000\05\30@141644 by Alice Campbell

flavicon
face
Let me see if i have this straight.  Someone claims to have
discovered a Very Bad Thing.  He claims to have notified
Uncle, but Uncle cant find the notification.  Then he claims
that the files disappeared off his system.  Meanwhile, Uncle
can't duplicate the problem from the info he sent.  A
'friend' claims that an email he sent caused her machine to
malfunction, and was later fixed by him.

Why does this sound like the 1000 miles-per gallon- gasoline
additive scam to me?  Loss of the files sounds too convenient.

If he knew enough to find this flaw, why didnt he run the
proposed fix on his own computer?

alice
> If you think the LoveBug virus was dangerous, then try this first link for what
> a kiwi guy reckons, and the second link for Microsoft's answer!!!!
>
> www.nzherald.co.nz/storydisplay.cfm?storyID=138622&thesection=technology&
> thesubsection=general
>
> www.nzherald.co.nz/storydisplay.cfm?storyID=138739&thesection=technology&
> thesubsection=general

2000\05\30@143112 by Andrew Kunz

flavicon
face
Alice,

He also says he has backups of it, so the files weren't lost.

Andy

2000\05\30@162549 by rottosen

flavicon
face
Actually, I believe that the latest attack is the venerable Word macro,
not a VB script.

-- Rich


Tim Hamel wrote:
{Quote hidden}

2000\05\30@163836 by Ray Gardiner

flavicon
face
<x-flowed>>No, you're not wrong. Without VBS (no X <g>) installed, windoze has no way of
>running VB scripts. Here's a site with instructions on the removal; I've been
>tempted to write a program to do this, but....
>
>Here's the site:
>http://www.f-secure.com/virus-info/u-vbs/
>
>Regards,
>
>Tim Hamel
>
>
The following URL also shows how to disable WSH windows scripting host
  http://www.sophos.com/support/faqs/wsh.html  I am unclear as to whether
WSH is part of VB, they say that it is installed by default with IE5.

What exactly is the difference/relationship between WSH and VBS?

Ray Gardiner spamray.....spamspamdsp.com.au

</x-flowed>

2000\05\30@180227 by Tim Hamel

picon face
Hi,

WSH is the big boy in all the script running. VBS is merely a host of VB
scripts while WSH does all the processing. The layers sort of look like:

Code --> VBS --> WSH

I wonder if there's REALLY a need for VB scripting?

Regards,

Tim Hamel

In a message dated 5/30/00 1:39:39 PM Pacific Daylight Time, rayspam_OUTspam@spam@DSP.COM.AU
writes:

> The following URL also shows how to disable WSH windows scripting host
>     http://www.sophos.com/support/faqs/wsh.html  I am unclear as to whether
>  WSH is part of VB, they say that it is installed by default with IE5.
>
>  What exactly is the difference/relationship between WSH and VBS?
>
>  Ray Gardiner .....rayspamspam.....dsp.com.au
>


'[OT] VBX and outlook express'
2000\06\01@002732 by Javier Grijalba
flavicon
face
I just renamed wscript.exe, that should work  !!
Bye
Javier


----- Original Message -----
From: Tim Hamel <TekPhobiaKILLspamspamEraseMEAOL.COM>
To: <EraseMEPICLIST@spam@spam@spam@MITVMA.MIT.EDU>
Sent: Tuesday, May 30, 2000 9:33 AM
Subject: Re: [OT] VBX and outlook express


> Hi Gordon,
>
> No, you're not wrong. Without VBS (no X <g>) installed, windoze has no way
of
> running VB scripts. Here's a site with instructions on the removal; I've
been
{Quote hidden}

@spam@varneyspamspamKILLspamCLAS.NET
> writes:
>
> > Hail!!! all mighty PIC list....Guardian of all knowledge.....
> >
> >  This morning the TV reports of another Trojan horse (virus)....
> >  Resume:..(something)
> >
> >  I remember a while back some one on the list, had said that we can
disable
> >  VBX scripting in Outlook Express. This will solve the problem of worms
and
> >  Trojan horse viruses attacking without warning. Am I wrong about this,
or
> >  can some body offer a simple "turn this off" solution?
> >
> >
> >  Gordon Varney B.S.E.E.
> >  tel: 573-243-5186
> >
> >

2000\06\04@174736 by picxpert

picon face
VBS is the extension on files that the Windows Script Host can run.

-Randy Glenn
spamBeGonePICxpertANTISPAMRemoveMEspamEraseMEtechie.com (remove ANTISPAM)
http://i.am/PICxpert

"My Finder has died of fits, chokin',
My Finder has quite ceased to be.
OS X's new Finder looks broken,
Please bring back my Finder to me!" - A concerned Mac user

{Original Message removed}

'[OT]: VBX, outlook express *AND* ".js" file exte'
2000\06\04@183106 by Jim P

flavicon
face
Additionally  (maybe I'll make 'the list' this time!) -

I wouldn't indiscriminately double-click on any unsolicited
messages received with attachments bearing ".js" file
extensions either ...

... as ".js" identifies a  --Javascript file-- (versus a ".vbs" or
VBscript or VBA file) that the Windows Scripting Host is *also*
supposed to be capable of executing as well ...

Jim P



----- Original Message -----
From: Randy Glenn <RemoveMEpicxpertKILLspamspamRemoveMEyahoo.com>
To: <TakeThisOuTPICLISTspamMITVMA.MIT.EDU>
Sent: Sunday, June 04, 2000 4:46 PM
Subject: Re: [OT] VBX and outlook express


VBS is the extension on files that the Windows Script Host can run.

-Randy Glenn
spamBeGonePICxpertANTISPAMKILLspamspamTakeThisOuTtechie.com (remove ANTISPAM)
http://i.am/PICxpert

"My Finder has died of fits, chokin',
My Finder has quite ceased to be.
OS X's new Finder looks broken,
Please bring back my Finder to me!" - A concerned Mac user

{Original Message removed}

'[PICLIST] [EE] Vbe breakdown'
2000\06\20@213627 by Tony Nixon

flavicon
picon face
Hi all,

I'm showing my ignorance a bit here.

What is the parameter for Vbe reverse breakdown voltage on a NPN
transistor.

I want to use one to switch direct RS232 levels. (ie ignore -ve swings)

Is this possible with a very simple circuit?

--
Best regards

Tony

http://www.picnpoke.com
EraseMEsales.....spamKILLspampicnpoke.com

2000\06\21@020344 by Nigel Goodwin

flavicon
face
In message <spam39501B94.BEFA65E2spameng.monash.edu.au>, Tony Nixon
<Tony.NixonSTOPspamspamENG.MONASH.EDU.AU> writes
>Hi all,
>
>I'm showing my ignorance a bit here.
>
>What is the parameter for Vbe reverse breakdown voltage on a NPN
>transistor.

It depends on the transistor, it's usually about 7 volts or so.

>I want to use one to switch direct RS232 levels. (ie ignore -ve swings)
>
>Is this possible with a very simple circuit?

Just add a diode to prevent the -ve excursions!.
--

Nigel.

       /--------------------------------------------------------------\
       | Nigel Goodwin   | Internet : nigelgSTOPspamspamKILLspamlpilsley.co.uk           |
       | Lower Pilsley   | Web Page : http://www.lpilsley.co.uk       |
       | Chesterfield    | Official site for Shin Ki and New Spirit   |
       | England         |                 Ju Jitsu                   |
       \--------------------------------------------------------------/


'[PICLIST] [OT] PIC - VB Serial comms problem'
2000\07\05@200617 by Rob Symmans
flavicon
face
I have written a program that sends out a serial command to an external
'F874 based
device. The PIC runs fine, but I am having problems with the VB.

The external device returns some serial data that triggers an "OnCommEvent"
which reads the data. I wish to repeat this process 256 times - which is
where my problem starts - how do I do this. I have tried For/Next looping
which resulted in hanging.
I have tried clearing a flag at the end of the serial reception, before
sending a request for more data, but this did not work either.

It is important that I receive the data from the external device in 256 bit
chunks.

Does anyone know how I can "hold" execution while the serial reception
finishes??

Apologies for the length opf this post.

thanks for any help
Rob

--
http://www.piclist.com hint: PICList Posts must start with ONE topic:
[PIC]: PIC only [EE]: engineering [OT]: off topic [AD]: advertisements

2000\07\05@205459 by PDRUNEN

picon face
Hi Rob,

You may have to set up your computer buffer property so that so many bytes
are received and stored in the comport buffer.  I have some VB code that does
the following:

Wakeup once the first byte is receives and keeps recieving until the PIC
stops transmitting for 2 seconds.  Then writes all the data to a file.
If similar then left me know directly for email to you.

Paul





In a message dated 7/5/00 7:07:49 PM Central Daylight Time,
@spam@robsymmans.....spamspamQ-VIS.COM writes:

<< I have written a program that sends out a serial command to an external
'F874 based
device. The PIC runs fine, but I am having problems with the VB.

The external device returns some serial data that triggers an "OnCommEvent"
which reads the data. I wish to repeat this process 256 times - which is
where my problem starts - how do I do this. I have tried For/Next looping
which resulted in hanging.
I have tried clearing a flag at the end of the serial reception, before
sending a request for more data, but this did not work either.

It is important that I receive the data from the external device in 256 bit
chunks.

Does anyone know how I can "hold" execution while the serial reception
finishes??

Apologies for the length opf this post.

thanks for any help
Rob

--
http://www.piclist.com hint: PICList Posts must start with ONE topic:
[PIC]: PIC only [EE]: engineering [OT]: off topic [AD]: advertisements


----------------------- Headers --------------------------------
Return-Path: <spam.owner-piclist.....spam.....MITVMA.MIT.EDU>
Received: from  rly-ye05.mx.aol.com (rly-ye05.mail.aol.com [172.18.151.202])
by air-ye01.mx.aol.com (v75.18) with ESMTP; Wed, 05 Jul 2000 20:07:49 -0400
Received: from  cherry.ease.lsoft.com (cherry.ease.lsoft.com
[209.119.0.109]) by rly-ye05.mx.aol.com (v75.18) with ESMTP; Wed, 05 Jul 2000
20:07:46 -0400
Received: from PEAR.EASE.LSOFT.COM (209.119.0.19) by cherry.ease.lsoft.com
(LSMTP for Digital Unix v1.1b) with SMTP id
<13.000A3C8B.....spamcherry.ease.lsoft.com>; Wed, 5 Jul 2000 20:07:41 -0400
Received: from MITVMA.MIT.EDU by MITVMA.MIT.EDU (LISTSERV-TCP/IP release
1.8d)
          with spool id 1115 for KILLspamPICLISTspam_OUTspamMITVMA.MIT.EDU; Wed, 5 Jul 2000
          20:06:17 -0400
Received: from MITVMA (NJE origin SMTP@MITVMA) by MITVMA.MIT.EDU (LMail
          V1.2c/1.8c) with BSMTP id 6893; Wed, 5 Jul 2000 20:04:19 -0400
Received: from elysium.uwa.edu.au [130.95.128.2] by mitvma.mit.edu (IBM VM
SMTP
          Level 320) via TCP with ESMTP ; Wed, 05 Jul 2000 20:04:17 EDT
X-Comment: mitvma.mit.edu: Mail was sent by elysium.uwa.edu.au
Received: from cyllene.uwa.edu.au (spam_OUTrootspamTakeThisOuTcyllene.uwa.edu.au [130.95.128.7]) by
          elysium.uwa.edu.au (8.10.2/8.10.2) with ESMTP id e66033D30835;
Thu, 6
          Jul 2000 08:03:03 +0800 (WST)
Received: from pc152 (gw.eye.uwa.edu.au [130.95.191.2]) by cyllene.uwa.edu.au
          (8.10.2/8.10.2) with SMTP id e66033R28081; Thu, 6 Jul 2000 08:03:03
          +0800
MIME-Version: 1.0
Content-Type: text/plain; charset="iso-8859-1"
Content-Transfer-Encoding: 7bit
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.2919.6600
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2919.6600
Message-ID:  <001201bfe6dd$d4bd4d40$.....98725f82.....spamRemoveMEeye.uwa.edu.au>
Date:         Thu, 6 Jul 2000 08:05:00 +0800
Reply-To: pic microcontroller discussion list <spam_OUT.PICLISTTakeThisOuTspamEraseMEMITVMA.MIT.EDU>
Sender: pic microcontroller discussion list <EraseME.PICLISTspamBeGonespamKILLspamMITVMA.MIT.EDU>
From: Rob Symmans <RemoveME.robsymmansspamBeGonespamspamQ-VIS.COM>
Subject:      [OT] PIC - VB Serial comms problem
To: @spam@PICLISTspamspamMITVMA.MIT.EDU >>

--
http://www.piclist.com hint: PICList Posts must start with ONE topic:
[PIC]: PIC only [EE]: engineering [OT]: off topic [AD]: advertisements

2000\07\06@023047 by Joe Dudas

picon face
I'm not entirely sure what you are trying to do, but one way to recieve in
chunks is to set the RThreshold property of the mscomm control to 256. This
way the OnComm event would only fire once for every 256 characters. You also
have to pay special attention to the InputLen property. If it's set to 0 you
will retrieve everything in the buffer upon reading the the port.

Good luck,
Joe

> I have written a program that sends out a serial command to an external
> 'F874 based
> device. The PIC runs fine, but I am having problems with the VB.
>
> The external device returns some serial data that triggers an
"OnCommEvent"
> which reads the data. I wish to repeat this process 256 times - which is
> where my problem starts - how do I do this. I have tried For/Next looping
> which resulted in hanging.
> I have tried clearing a flag at the end of the serial reception, before
> sending a request for more data, but this did not work either.
>
> It is important that I receive the data from the external device in 256
bit
{Quote hidden}

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics

2000\07\07@011001 by Javier Grijalba

flavicon
face
Hi Paul
Can I see the source too ?? I´m just staring with VB5.0
Thanks
Javier

----- Original Message -----
From: <TakeThisOuTPDRUNENKILLspamspam@spam@AOL.COM>
To: <.....PICLISTRemoveMEspamMITVMA.MIT.EDU>
Sent: Wednesday, July 05, 2000 9:53 PM
Subject: Re: [OT] PIC - VB Serial comms problem


> Hi Rob,
>
> You may have to set up your computer buffer property so that so many bytes
> are received and stored in the comport buffer.  I have some VB code that
does
{Quote hidden}

"OnCommEvent"
>  which reads the data. I wish to repeat this process 256 times - which is
>  where my problem starts - how do I do this. I have tried For/Next looping
>  which resulted in hanging.
>  I have tried clearing a flag at the end of the serial reception, before
>  sending a request for more data, but this did not work either.
>
>  It is important that I receive the data from the external device in 256
bit
{Quote hidden}

[172.18.151.202])
> by air-ye01.mx.aol.com (v75.18) with ESMTP; Wed, 05 Jul 2000
20:07:49 -0400
>  Received: from  cherry.ease.lsoft.com (cherry.ease.lsoft.com
> [209.119.0.109]) by rly-ye05.mx.aol.com (v75.18) with ESMTP; Wed, 05 Jul
2000
> 20:07:46 -0400
>  Received: from PEAR.EASE.LSOFT.COM (209.119.0.19) by
cherry.ease.lsoft.com
> (LSMTP for Digital Unix v1.1b) with SMTP id
> <RemoveME13.000A3C8BspamspamSTOPspamcherry.ease.lsoft.com>; Wed, 5 Jul 2000 20:07:41 -0400
>  Received: from MITVMA.MIT.EDU by MITVMA.MIT.EDU (LISTSERV-TCP/IP release
> 1.8d)
>            with spool id 1115 for .....PICLISTEraseMEspamMITVMA.MIT.EDU; Wed, 5 Jul 2000
>            20:06:17 -0400
>  Received: from MITVMA (NJE origin SMTP@MITVMA) by MITVMA.MIT.EDU (LMail
>            V1.2c/1.8c) with BSMTP id 6893; Wed, 5 Jul 2000 20:04:19 -0400
>  Received: from elysium.uwa.edu.au [130.95.128.2] by mitvma.mit.edu (IBM
VM
> SMTP
>            Level 320) via TCP with ESMTP ; Wed, 05 Jul 2000 20:04:17 EDT
>  X-Comment: mitvma.mit.edu: Mail was sent by elysium.uwa.edu.au
>  Received: from cyllene.uwa.edu.au (spamBeGonerootspamRemoveMEcyllene.uwa.edu.au
[130.95.128.7]) by
>            elysium.uwa.edu.au (8.10.2/8.10.2) with ESMTP id e66033D30835;
> Thu, 6
>            Jul 2000 08:03:03 +0800 (WST)
>  Received: from pc152 (gw.eye.uwa.edu.au [130.95.191.2]) by
cyllene.uwa.edu.au
>            (8.10.2/8.10.2) with SMTP id e66033R28081; Thu, 6 Jul 2000
08:03:03
{Quote hidden}

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.

'[PICLIST] [file]cscalndr.vbx file'
2000\07\18@055823 by moshe

flavicon
face
Dear members.
Can anyone tell me, where I found the file - cscalndr.vbx file ??
It's very urgent to me.

Thank you.
Moses.

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics

2000\07\18@061127 by Michael Rigby-Jones

flavicon
face
I don't know where you found it, but I found it at
ftp://ftp.nlm.nih.gov/voyager/WinVoy/CSCALNDR.VBX

BTW, I'm pretty sure [file] was never a valid topic class was it?

Regards

Mike Rigby-Jones

> {Original Message removed}

2000\07\18@061921 by Mircea Ciocan

flavicon
face
moshe wrote:
>
> Dear members.
> Can anyone tell me, where I found the file - cscalndr.vbx file ??
> It's very urgent to me.
>
> Thank you.
> Moses.
>
> --
> http://www.piclist.com hint: The list server can filter out subtopics
> (like ads or off topics) for you. See http://www.piclist.com/#topics

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics

2000\07\18@103816 by moshe

flavicon
face
Thank to all the member that helped me.
Moses

       -----Original Message-----
       From:   Michael Rigby-Jones [SMTP:mrjonesKILLspamspamspamNORTELNETWORKS.COM]
       Sent:   â éåìé 18 2000 12:09
       To:     spam_OUTPICLIST@spam@spamMITVMA.MIT.EDU
       Subject:        Re: [OT]: cscalndr.vbx file

       I don't know where you found it, but I found it at
       ftp://ftp.nlm.nih.gov/voyager/WinVoy/CSCALNDR.VBX

       BTW, I'm pretty sure [file] was never a valid topic class was it?

       Regards

       Mike Rigby-Jones

       > -----Original Message-----
       > From: moshe [SMTP:TakeThisOuTmoshespam_OUTspamGAD-UNIV.COM]
       > Sent: Tuesday, July 18, 2000 11:59 AM
       > To:   KILLspamPICLIST.....spamTakeThisOuTMITVMA.MIT.EDU
       > Subject:      [file]cscalndr.vbx file
       >
       > Dear members.
       > Can anyone tell me, where I found the file - cscalndr.vbx file ??
       > It's very urgent to me.
       >
       > Thank you.
       > Moses.
       >
       > --
       > http://www.piclist.com hint: The list server can filter out
subtopics
       > (like ads or off topics) for you. See
http://www.piclist.com/#topics

       --
       http://www.piclist.com hint: The list server can filter out
subtopics
       (like ads or off topics) for you. See http://www.piclist.com/#topics

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics


'[OT]: VB Bit rotate Routine'
2000\08\19@044542 by John De Villiers
flavicon
face
I have VB 6 Enterprise and for some reason i cannot find a rotate ( RRF,
RLF ) function in it. Does anyone have and idea on how i can do this , or
where i can get a dll/lib/whatever that has this function?

John

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics

2000\08\19@052808 by Tim Hamel

picon face
John,

Having Enterprise, Pro, etc. doesn't make a difference sadly. I WOULD be nice
if there were a bit shift routine. What I do is run a For loop for the amount
of bits I'm dealing with and divide or mulitply by 2. I think that's about as
close as you'll get.

Regards,

Tim Hamel

In a message dated 8/19/00 1:46:20 AM Pacific Daylight Time, TakeThisOuTbbjEraseMEspamRemoveMEPLZ.CO.ZA
writes:

> I have VB 6 Enterprise and for some reason i cannot find a rotate ( RRF,
>  RLF ) function in it. Does anyone have and idea on how i can do this , or
>  where i can get a dll/lib/whatever that has this function?
>
>  John
>

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics


'[EE:] Who stocks that ST VB409 semiconductor?!?'
2000\09\23@110349 by Pat L.
flavicon
face
I am VERY interested in checking out this chip, and others like it.  But so
far, I am unable to locate ANY suppliers of it.

The Harris chips mentioned previously, are no longer in production (so I've
been told).

The VB409 is a relitively new semiconductor, so I would assume they are
still making it.  I've already checked out the usual suspects (digikey,
mouser, jameco, etc..), without any luck.  I've tried to contact ST
directly, but they haven't gotten back to me (And from previous experience,
they probably won't either).

Any help locating a supplier for this part would be greatly appreciated

Thanks in advance.

Pat
spam_OUTop1cwkRemoveMEspam.....flashmail.com


{Original Message removed}

2000\09\24@144137 by Pat L.

flavicon
face
Anybody seeing this message?  I'm still looking for a supplier for that
VB409 that someone mentioned a week ago.

{Original Message removed}


'[PICLIST] VB REFERENCE BOOK'
2000\11\15@035031 by Gugus P Nugroho
picon face
Hi all

I am doing a project that involve communication
between
PIC and Visual Basic. For the project I am planning
to
use PIC 16F84. Can anyone give me some informations
regarding communication between the two and a VB
reference book for me to read.
Thank you.

>Gugus<

__________________________________________________
Do You Yahoo!?
Yahoo! Calendar - Get organized for the holidays!
http://calendar.yahoo.com/

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.


2000\11\15@035101 by Gugus P Nugroho

picon face
Hi all

I am doing a project that involve communication
between
PIC and Visual Basic. For the project I am planning
to
use PIC 16F84. Can anyone give me samo information
regarding coomunication between the two and a VB
reference book for me to read.
Thank you.

>Gugus<

__________________________________________________
Do You Yahoo!?
Yahoo! Calendar - Get organized for the holidays!
http://calendar.yahoo.com/

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.


2000\11\15@040349 by Stein Sem-Jacobsen

picon face
You need to incorporate the MSComm32 module. Its included in the VB 6.0
professional/enterprise edition.

Regards
Stein Sem-Jacobsen
Norway

At 00:41 15.11.00 -0800, you wrote:
{Quote hidden}

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.


2000\11\15@113753 by Douglas Wood

flavicon
face
Take a look at "Serial Port Complete" by Jan Axelson.

Douglas Wood
Software Engineer

-----Original Message-----
From: pic microcontroller discussion list
[spamPICLISTKILLspamspamKILLspamMITVMA.MIT.EDU]On Behalf Of Gugus P Nugroho
Sent: Wednesday, November 15, 2000 2:42 AM
To: spamPICLISTspam_OUTspamMITVMA.MIT.EDU
Subject: VB REFERENCE BOOK


Hi all

I am doing a project that involve communication
between
PIC and Visual Basic. For the project I am planning
to
use PIC 16F84. Can anyone give me some informations
regarding communication between the two and a VB
reference book for me to read.
Thank you.

>Gugus<

__________________________________________________
Do You Yahoo!?
Yahoo! Calendar - Get organized for the holidays!
http://calendar.yahoo.com/

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.


2000\11\15@115008 by M. Adam Davis

flavicon
face
You'll find the source code to a simple VB serial communication program on
my site here:
http://ubasics.com/adam/electronics/ha/software/software.shtml

It goes with my home automation terminal (yes, I'm still plugging away at
it when I have time) which is here:
http://ubasics.com/adam/electronics/ha/

And includes some information that might be useful to you (schematic, C
code for onboard UART, etc)

I hope this helps.

-Adam

Gugus P Nugroho wrote:
{Quote hidden}

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.


'[PIC]: Re: VB REFERENCE BOOK'
2000\11\15@164138 by Stuart O'Reilly

flavicon
face
try http://www.lvr.com
Regards
Stuart

Gugus P Nugroho wrote:
{Quote hidden}

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.


'[PICLIST] VB REFERENCE BOOK'
2000\11\17@231637 by Ajay Nagarkar

picon face
basicaaly u need to connect the 16f84 to the pc thru
the serial port...emulate the serial comm. (no RX,TX
available here) so go to http://www.microchip.com and get the
code for 84.interfacing the serial port in VB is very
simple ... so go ahead ..
all the best !!
ajay

--- Gugus P Nugroho <STOPspamgultiqspam_OUTspamspamBeGoneYAHOO.COM> wrote:
{Quote hidden}

__________________________________________________
Do You Yahoo!?
Yahoo! Calendar - Get organized for the holidays!
http://calendar.yahoo.com/

--
http://www.piclist.com hint: To leave the PICList
spam_OUTpiclist-unsubscribe-requestspamspamBeGonemitvma.mit.edu


2000\11\28@211013 by Gugus P Nugroho

picon face
Hi thank you for your response...I believe there was
some discussion about the serial communication between
PIC and VB. Do you know where can I retrive that
information back or maybe a FAQ site. I try to search
from the uChip site but I still can't find it.
Thank you very much for your time and help.

Regards,
Gugus P Nugroho


--- "M. Adam Davis" <EraseMEadavisspamKILLspamUBASICS.COM> wrote:
> You'll find the source code to a simple VB serial
> communication program on
> my site here:
>
ubasics.com/adam/electronics/ha/software/software.shtml
{Quote hidden}

=====
Gugus P Nugroho

__________________________________________________
Do You Yahoo!?
Yahoo! Shopping - Thousands of Stores. Millions of Products.
http://shopping.yahoo.com/

--
http://www.piclist.com hint: PICList Posts must start with ONE topic:
[PIC]:,[SX]:,[AVR]: ->uP ONLY! [EE]:,[OT]: ->Other [BUY]:,[AD]: ->Ads



'[PICLIST] VB REFERENCE BOOK'
2000\12\01@025305 by Lester Wilson
flavicon
face
You may find the following link useful: http://www.picbasic.co.uk/msg2.htm

The web page supports PIC Basic, but the information re VB is still
applicable, the file "RS232.BS2" was written for a BASIC Stamp-2 but is easy
to modify for the PIC. Everything is defaulted to 9600 BAUD, 8 bits, 1 stop
bit. There are four files devoted to the VB-4 program.
It ran just fine under VB-6, so it should work on VB-5 just as well.
Download the file  RS232.ZIP which is the five files compressed using PKZIP
(4 VB files + 1 PIC basic file). Just uncompress them into a sub-directory
and have a blast. The VB brogram sends out a string consisting of "##"
followed by a number. The number is determined by which button you press on
the control panel. If you send out the number 0, I.E. "##0", the Stamp will
perform a "soft reset". This means it will jump to the top of the program,
set variables to 0, etc. It is sprinkled it with comments



Regards

http://www.picbasic.co.uk
--------------------------------------------
{Original Message removed}

2000\12\01@025726 by Lester Wilson

flavicon
face
home.swbell.net/ruthven/vbasic/page1.html

----- Original Message -----
From: "Gugus P Nugroho" <EraseMEgultiqRemoveMEspamYAHOO.COM>
To: <.....PICLISTspamspam_OUTMITVMA.MIT.EDU>
Sent: Wednesday, November 29, 2000 2:10 AM
Subject: Re: VB REFERENCE BOOK


{Quote hidden}

--
http://www.piclist.com#nomail Going offline? Don't AutoReply us!
email listservTakeThisOuTspamKILLspammitvma.mit.edu with SET PICList DIGEST in the body



'[PIC]: BCD in VB'
2001\02\02@021712 by Francois Robbertze
flavicon
face
I use BCD to Decimal routines in a pic project (because of a DS1302 real time clock). Everything went OK until the PIC run out of Program Memory. I now use the PC(VB) to do the convertions for me and left some space on the pic for other functions...

I have done this by writing the byte in a array "Binary(7)" and return the answer in BCD_Binary or the Binary_BCD as an Integer type.

This code works well, but does anybody know of a better way in Visual Basic?

Regards

Francois

______________________________________
Function BCD_Binary(BCD As Byte) As Integer

Dim Binary(7) As Byte
Dim i As Integer
Dim Temp As Integer

If BCD = 0 Then
  BCD_Binary = 0
  Exit Function
End If

'write BCD into binary array
For i = 0 To 7
Temp = BCD - (2 ^ (7 - i))
   If Temp >= 0 Then
       BCD = BCD - (2 ^ (7 - i))
       Binary(7 - i) = 1
   Else
       Binary(7 - i) = 0
   End If
Next i

'convert
Temp = 0
For i = 0 To 3
Temp = Temp + (Binary(i) * (2 ^ i))
Next i

For i = 4 To 7
Temp = Temp + (10 * (Binary(i) * (2 ^ (i - 4))))
Next i

BCD_Binary = Temp

End Function

Function Binary_BCD(BCD As Byte) As Integer

Dim Binary(7) As Byte
Dim i As Integer
Dim Temp As Integer

Dim tens As Integer
Dim ones As Integer
Dim BCDString As String

If BCD = 0 Then
  Binary_BCD = 0
  Exit Function
End If

BCDString = Val(BCD)
If Val(BCD) >= 10 Then
tens = Val(Mid(BCDString, 1, 1))
ones = Val(Mid(BCDString, 2, 1))
Else
tens = 0
ones = Val(Mid(BCDString, 1, 1))
End If

'write binary into bcd array

For i = 0 To 3
Temp = ones - (2 ^ (3 - i))
   If Temp >= 0 Then
       ones = ones - (2 ^ (3 - i))
       Binary(3 - i) = 1
   Else
       Binary(3 - i) = 0
   End If
Next i

For i = 0 To 3
Temp = tens - (2 ^ (3 - i))
   If Temp >= 0 Then
       tens = tens - (2 ^ (3 - i))
       Binary(7 - i) = 1
   Else
       Binary(7 - i) = 0
   End If
Next i


'convert
Temp = 0
For i = 0 To 7
Temp = Temp + (Binary(i) * (2 ^ i))
Next i

Binary_BCD = Temp

End Function
_______________________________________________


             lllllllllll
            \\  ~ ~ //
            ( @ @ )
o------oOOo-(_)-oOOo-----o
|                                   |
|   Francois Robbertze    |
|    RemoveMEfr10TakeThisOuTspammweb.co.za     |
|                                   |
o--------.oooO-Oooo.-------o

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics


2001\02\02@035511 by Michael Rigby-Jones

flavicon
face
The following code should do what you want, and save a few lines!

Function BDC_binary(BCD as byte) as Byte

' convert packed BCD  byte to binary.

BDC_binary = (((BCD / 16) AND &HFF) * 10) + (BCD AND &HFF)

Exit Function


Function Binary_BCD(Binary as Byte) as Byte

' convert binary to packed BCD

' note integer division (\)
Binary_BCD = ((Binary \ 10) * 16) + (Binary MOD 10)

Exit Function

Regards

Mike

> {Original Message removed}


'[OT]: Where does one find an old VB or Crystal Rep'
2001\03\19@172739 by jamesnewton
picon face
I'm in an interesting position of needing to update an old Crystal Reports
version 2.0 .RPT file that is a part of an old VB application. I desperately
need to change the font that one of the labels is printed in or add a new
label in that font. (long story) The source for the VB program is not
available and upgrading would be cost prohibitive.

Any help with the following questions would be very, very much appreciated.

A) What version of Visual Basic includes Crystal Reports v2.0? I've found a
place where I can buy VB 1.1 through 6.0 (
http://www.emsps.com/oldtools/ )

B) What is the file format of Crystal Reports v2.0 .RPT files? Wotsit has
NADA

C) Is the file format different or the same for more recent versions? E.g.
Can Crystal Reports v8.0 do a "Save as..." in Crystal reports v2.0 format?
Crystal reports

---
James Newton
@spam@jamesnewtonSTOPspamspampiclist.com 1-619-652-0593
PIC/PICList FAQ: http://www.piclist.com or .org

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics


2001\03\20@035346 by Alan B. Pearce

face picon face
Do you know if you are running a 16 bit or 32 bit version of VB? I am not sure
if this will help you, but I have an app that I am modifying done in VB3 (i.e.
16 bit only). I have not been able to find a Crystal Reports version, but it
does say the MSJet DLL files appear to be version 110 as part of the DLL name,
i.e. MSAJT110.DLL and MSAES110.DLL. This may give you a pointer to version
number.

However further browsing of the Office Developers CD that is part of the VB3
Professional Kit I have seems to indicate that Microsoft Jet 1.1 is the normal
release, and on the Developers CD is the files for the Jet 2 engine, so it may
be VB3 that the application is written in.

If you really needed to get at the source code there is a decompiler out on the
web for VB3, called DoDi.

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.



'[OT]: Shelling in VB'
2001\04\06@134732 by Sean Breheny
face picon face
Hi everyone,

Once again, I have a Visual Basic question and you are the most
knowledgeable group I know on this subject.

I'm trying to run an external program from a VB program (the external
program is actually XXCOPY, as mentioned on this list not long ago,
because I am using it for backing stuff up over a network). It is working
well except that I can't find a way to make it wait for the first process
to finish before spawning a new one (so, if I want to sequentially call
XXCOPY 10 times, I instead get 10 copies running simultaneously).

I could probaby do some kind of trick where I have XXCOP log it's output
to a file and then keep checking the file for the last line to be
written, but I thought that possibly VB would have a built-in way of
doing this (I'm currently using the SHELL command and that appears to not
have any option like this).

Thanks,

Sean

--
http://www.piclist.com hint: To leave the PICList
TakeThisOuTpiclist-unsubscribe-requestTakeThisOuTspamRemoveMEmitvma.mit.edu


2001\04\06@174629 by Craig Tucker

flavicon
face
I have used this code before to do something similar before...

If you go to: http://www.mvps.org/vb/ and look in the Samples area for
'Shell32.zip', it has a library with several methods to call and wait for
applications to shell, etc.

Hope that helps.

-Craig Tucker





{Original Message removed}

2001\04\07@043812 by Peter L. Peres

picon face
I think that you are looking for locking. Locking can be done by writing a
temporary file f.ex. and checking that file's presence. If it is present,
the command is likely running. This is not foolproof because the access
should be atomic (between checking whether the files exists and creating
it). A better approach uses a variable in your program that is checked
before each shell is spawned. The variable needs to be global and
'volatile' in the C sense of the word (and you still need to make sure
access is atomic). I don't know how to do that in VB.

There is an elaborate scheme using two flags to attain atomic manipulation
of the second flag when you cannot guarantee atomicity otherwise (by
disabling interrupts).

Peter

--
http://www.piclist.com hint: PICList Posts must start with ONE topic:
[PIC]:,[SX]:,[AVR]: ->uP ONLY! [EE]:,[OT]: ->Other [BUY]:,[AD]: ->Ads


2001\04\07@094444 by Craig Tucker

flavicon
face
I have used this code before to do something similar before...

If you go to: http://www.mvps.org/vb/ and look in the Samples area for
'Shell32.zip', it has a library with several methods to call and wait for
applications to shell, etc.

Hope that helps.

-Craig Tucker





{Original Message removed}

2001\04\10@045146 by P.J. McCauley

picon face
Sean,

Check out http://www.planetsourcecode.com It's in there somewhere. If you
can't find it let me know and I'll see if I can dig it out of one of my
programs.

Joe

{Original Message removed}

'[EE]: WWVB outages'
2001\04\18@175529 by Sean H. Breheny

face picon face
Hi everyone,

I am building a WWVB receiver for my Applied Signal Processing class and
I'm having some trouble that I think some people here may be able to help
with. I had it working fine several days ago in northeast Pennsylvania(I
was getting a strong signal, at least 12dB S/N ratio and I could hear it
loud and clear). When I came back up to New York (Ithaca, central
southern-tier,only 100 miles away) I haven't been able to get it to work
(I've been trying since about 11pm last night and I get no signal at all,
just quiet static, as if the transmitter were off the air). I have checked
over the wiring and I don't think anything has changed. I am also able to
hear weak signals from computer monitors in nearby rooms and my own monitor
saturates the audio output so I think it is working.

First of all, can anyone who has a WWVB receiver or self-setting clock tell
me if you have received a WWVB signal in the last 12 hours(from 9:00 until
21:00 Wednesday 18 April UTC)? They have been doing antenna repairs lately
and have had some outages, so it is possible that they have been off the air.

Secondly, my understanding is that in most of the continental US, WWVB is
received through ground-wave propagation (it's at 60kHz) which should have
no problem entering a valley which is several miles wide, right?I know that
my area is well within the stated coverage area for at least a large part
of the time I have been listening.

Thanks,

Sean

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics


'[OT]: Shelling in VB'
2001\04\18@180602 by Sean H. Breheny

face picon face
Thanks to all those who responded about this, I will check out your
suggestions.

Sean

At 09:50 AM 4/10/01 +0100, you wrote:
>Sean,
>
>Check out http://www.planetsourcecode.com It's in there somewhere. If you
>can't find it let me know and I'll see if I can dig it out of one of my
>programs.
>
>Joe

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics


'[EE]: WWVB outages'
2001\04\18@180609 by James Paul

flavicon
face
Sean,

Is this station located in Colorado?   Have you tried receiving on
the shortwave frequencies?  (5, 10, 15, 20Khz?).  Or what about
WWVH (Hawaii). Of course this is doubtful.   Just a thought.

                                          Regards,

                                         Jim KA9QHR

On Wed, 18 April 2001, "Sean H. Breheny" wrote:

{Quote hidden}

spam_OUTjimspamspam.....jpes.com

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics


2001\04\18@185632 by Lee Jones

flavicon
face
Hi Sean,

> I am building a WWVB receiver for [...] class
>
> First of all, can anyone who has a WWVB receiver or self-setting
> clock tell me if you have received a WWVB signal in the last 12
> hours (from 9:00 until 21:00 Wednesday 18 April UTC)? They have
> been doing antenna repairs lately and have had some outages, so
> it is possible that they have been off the air.

www.boulder.nist.gov/timefreq/stations/wwvboutages.htm
lists station outages.  Latest one listed was 4-14-1.  Don't
know how long it takes them to update that page after they have
an outage.

I personally don't know if they are currently on-air or not.

> Secondly, my understanding is that in most of the continental
> US, WWVB is received through ground-wave propagation (it's at
> 60kHz) which should have no problem entering a valley which is
> several miles wide, right?

I'd expect you'd be able to receive the signal.

Have you tried checking the signal by going to a local Radio
Shack store and forcing one of they WWVB based clocks into a
hunt for signal mode?  The one I own shows current signal
strength when forced (i.e. power cycled or toggled to auto-off
then to auto-on) for about 2 minutes as it's trying to acquire
signal.  Is there a RS in the valley with you?

                                               Lee

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics


2001\04\18@190934 by Sean H. Breheny

face picon face
Hi Lee,

Thanks for your quick reply:

At 03:57 PM 4/18/01 -0700, you wrote:
>www.boulder.nist.gov/timefreq/stations/wwvboutages.htm
>lists station outages.  Latest one listed was 4-14-1.  Don't
>know how long it takes them to update that page after they have
>an outage.

It seems as though it takes them about a day or two (I've been monitoring
that page over the last week), so that page doesn't really help me right now.

>I'd expect you'd be able to receive the signal.

That's what I would think, too.


>Have you tried checking the signal by going to a local Radio
>Shack store and forcing one of they WWVB based clocks into a
>hunt for signal mode?  The one I own shows current signal
>strength when forced (i.e. power cycled or toggled to auto-off
>then to auto-on) for about 2 minutes as it's trying to acquire
>signal.  Is there a RS in the valley with you?

That's a very good idea but my report on this is due tomorrow (so I don't
have time to go to RS now, they will be closing soon for the day anyway) so
I think I will just have to say that I had it working and that presently it
is receiving nothing but it may be due to WWVB itself.

Originally I was supposed to test out a decoder for it, too, in addition to
the receiver, but I will have to test that on a simulated signal if I don't
get anything in an hour or two.

It just bothers me that it isn't receiving anything so I just asked to see
if anyone had any clues or info on whether they are on the air. You said
that you own such a receiver. Would it be possible for you to check it to
see if you are getting anything?

Thanks,

Sean




>                                                 Lee
>
>--
>http://www.piclist.com hint: The list server can filter out subtopics
>(like ads or off topics) for you. See http://www.piclist.com/#topics

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics


2001\04\18@190943 by Sean H. Breheny

face picon face
Hi Jim,

Thanks for the suggestion.

Yes, it's located in Colorado (and is also run by NIST), but this is a
separate station from WWV (which transmits on 5,10,15, and 20 MHz).  WWVB
is intended to provide a single frequency which can reliably be received
during at least part of every day in the whole continental US. That's why
they use such a low frequency, to make the dominant propagation mode ground
wave (although if you look at their coverage diagrams it does appear that
some skip occurs at the edges of the coverage area during some parts of the
day).

So, no, I haven't recently tried listening on the shortwave freqs, but even
if I did, it wouldn't really tell me anything about whether WWVB in on the
air or not.

Of course, it doesn't help that this project is due tomorrow (I did have a
longer time to do it but couldn't really start until about a week ago
because of other work) :-)

I have tried emailing the people who run WWVB to ask if there has been an
outage but I have not yet gotten a response.

Sean



At 03:04 PM 4/18/01 -0700, you wrote:
{Quote hidden}

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics


2001\04\19@120614 by Olin Lathrop

face picon face
> That's a very good idea but my report on this is due tomorrow (so I don't
> have time to go to RS now, they will be closing soon for the day anyway)
so
> I think I will just have to say that I had it working and that presently
it
> is receiving nothing but it may be due to WWVB itself.

Why not bring it to the top of a hill to see if that helps?  Also make sure
the antenna is oriented for reception from the west.  This can make a big
difference.  I have a clock that works on two parallel walls, but not the
other two that are perpendicular to those.  Of course I'm almost in the
worst location for receiving WWVB in the continental US, but you're only a
little closer than I am.


********************************************************************
Olin Lathrop, embedded systems consultant in Littleton Massachusetts
(978) 742-9014, spamBeGoneolinspamspam_OUTembedinc.com, http://www.embedinc.com

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.


2001\04\19@120815 by Olin Lathrop

face picon face
> Have you tried checking the signal by going to a local Radio
> Shack store and forcing one of they WWVB based clocks into a
> hunt for signal mode?  The one I own shows current signal
> strength when forced (i.e. power cycled or toggled to auto-off
> then to auto-on) for about 2 minutes as it's trying to acquire
> signal.  Is there a RS in the valley with you?

I'm in Massachusetts, about 1,500 miles from the transmitter in Boulder.  I
know of several WWVB clocks around here that only receive the signal at
night when there is less interference.  The one in the conference room is a
good example.  If I put a new battery in it in the morning, it just sits
there all day long waiting for a signal, but by next morning its gotten a
signal and is showing the right time.


********************************************************************
Olin Lathrop, embedded systems consultant in Littleton Massachusetts
(978) 742-9014, EraseMEolin.....spamembedinc.com, http://www.embedinc.com

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.


2001\04\19@180748 by Sean H. Breheny

face picon face
Thanks to all who responded to my question. I turned in my project (even
though I am still not getting any signal from WWVB) and explained that the
problem could be due to WWVB itself. Scott Newell (who has a WWVB clock)
told me last night that his clock had not gotten a signal from WWVB in the
last 24 hours, either.

I would still appreciate it if anyone who has a WWVB receiver or clock
could tell me if they are getting any signal.

Actually, I am most of the way up one of the hills on the side of the
valley, so location shouldn't be an issue. I have tried rotating the
antenna around and still no signal from WWVB.

Your location shouldn't be that bad, Olin, because the coverage area
expands at night (presumably due to reduced ionization in the D layer of
the ionosphere, allowing some skip to occur off the E or F layers), and it
looks like it just barely includes Massachusetts during several hours of
the night. I don't think it has to do with reduced noise.

Thanks,

Sean

At 11:50 AM 4/19/01 -0400, you wrote:
{Quote hidden}

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.


2001\04\19@182141 by Dan Larson

flavicon
face
Just curious....

What kind of an antenna is used to broadcast 60Khz ?

That's a wavelength of almost 5 kilometers!, isn't it?

Dan

On Thu, 19 Apr 2001 18:07:58 -0400, Sean H. Breheny wrote:

{Quote hidden}

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.


2001\04\19@185218 by Barry Gershenfeld

picon face
At 05:17 PM 4/19/01 -0600, you wrote:
>Just curious....
>What kind of an antenna is used to broadcast 60Khz ?
>That's a wavelength of almost 5 kilometers!, isn't it?
>Dan

I went to Yahoo!, typed "WWVB" and clicked the first
thing that came up (NIST) and there I was looking at
a picture of the antennas.  Down below in the text
it describes them.

BTW I see in the notes that they are operating at
reduced power (only 37 kW :) but I guess that
would lose you guys in the fringe areas.

Barry

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.


2001\04\19@190456 by Sean H. Breheny

face picon face
Hi Dan,

Their antenna (which is quite large and consists of a radiating downlead
attached to a capacitive hat, all suspended by four non-radiating towers)
is much shorter than even a quarter wave, but they have a very complex
matching system which changes automatically to provide the optimum match
under varying conditions (essentially an automatic antenna tuner). Even so,
they only get about 50% efficiency (from transmitter to radiated power,
IIRC). They actually have two such antenna systems, one oriented to radiate
in two directions, the other in an orthogonal direction, so they overall
get an omnidirectional pattern.

My receiving antenna is only a 10cm long ferrite rod with 122 turns of wire
on it. I was pretty amazed to see that pick up a fairly strong signal from
Colorado (especially since, as an amateur radio operator, I'm used to
resonant dipole antennas).

Sean


At 05:17 PM 4/19/01 -0600, Dan Larson wrote:
>Just curious....
>
>What kind of an antenna is used to broadcast 60Khz ?
>
>That's a wavelength of almost 5 kilometers!, isn't it?
>
>Dan

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.


2001\04\19@190511 by Sean H. Breheny

face picon face
Hi Barry,

Yeah, but they have been operating at 37 kW for a while now, and I was able
to receive them in Pennsylvania a few days ago (getting a clear signal) and
now, only 100 miles away, I get nothing, so it may be something on my end,
but I doubt that it has to do with the reduced power.

Sean

At 03:45 PM 4/19/01 -0700, you wrote:
>BTW I see in the notes that they are operating at
>reduced power (only 37 kW :) but I guess that
>would lose you guys in the fringe areas.
>
>Barry
>
>--
>http://www.piclist.com hint: The PICList is archived three different
>ways.  See http://www.piclist.com/#archives for details.

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.


2001\04\19@191541 by Barry Gershenfeld

picon face
>Hi Barry,
>
>Yeah, but they have been operating at 37 kW for a while now, and I was able
>to receive them in Pennsylvania a few days ago (getting a clear signal) and
>now, only 100 miles away, I get nothing, so it may be something on my end,
>but I doubt that it has to do with the reduced power.
>
>Sean

To that end I was wondering to what extent you can look at
the recieved signal (speaker, signal strength meter, oscilloscope)
since there might be a big 60 KHz signal sitting on that
frequency (being radiated from something in the house, for
example).

I also thought about building an oscillator (or finding it
on a signal generator somewhwere) to test the receiver.  I
said as much in another message but it somehow got put through
the sever's command interpreter and chewed to bits so it may
not show up on the list.

Barry

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.


2001\04\19@195342 by Sean H. Breheny

face picon face
Hi Barry,

I guess I didn't explain enough about my receiver. I just built it myself
(it is a bunch of components on a breadboard) and right now all it does is
give audio output, so I have it going to a speaker. All I hear is static
right now(with a few really weak steady carriers in the background,
presumably from monitors and computers in the surrounding area). Before, I
could hear about the same amount of static, but with a strong WWVB signal
on top of it (very distinctive since it is modulated at a 1Hz rate with PWM).

I don't really need to build an oscillator to test it because my computer
monitor is a nice source of 60kHz emissions :-) Just turning my monitor on
causes so much output from the receiver that the output stage clips (I get
a square wave out). I can also tell that the circuit works because the
noise in the output goes way down when the antenna is disconnected, and the
noise peaks as you tune the local oscillator past 60kHz.

The receiver consists of a ferrite rod type antenna with a capacitor in
parallel to create an LC tank circuit for 60kHz. The output of this goes
into an RF amp based on a PN2222 transistor (gives about a gain of 200),
and then into a very simple mixer (just another PN2222) driven by a 555
acting as a local oscillator (I also have a frequency counter hooked up to
allow me to tune it exactly). The mixer output goes to a sharp active
bandpass filter (gain of 100 and 50Hz bandwidth at 1.18kHz, meaning that I
receive 60kHz at either 58.82 kHz local oscillator or 61.18kHz LO), which
is then followed by just an audio gain stage (gain=150). This is then fed
into a pair of cheap computer speakers.

Originally, I was going to feed this into an ADC and then use a
microcontroller (AVR, shhhh! don't tell anyone ;-) to decode it and display
the time on an LCD, but since I haven't had a signal for a while, I
scrapped that idea and just implemented a simulation of the decoder in MATLAB.

Sean



At 04:08 PM 4/19/01 -0700, you wrote:
{Quote hidden}

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.


2001\04\19@214226 by William Jacobs

flavicon
face
Sean,
   Last night I listened to WWVB on 60 Khz.  It was there, but week compared to
when they did not have the antenna problem.  I also have a clock, but it is still
working.  It may be "close " and not correcting it self however, it did do the
DST correction.

bill .

Sean H. Breheny wrote:

{Quote hidden}

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.


2001\04\20@035323 by Alan B. Pearce

face picon face
>Just curious....
>
>What kind of an antenna is used to broadcast 60Khz ?
>
>That's a wavelength of almost 5 kilometers!, isn't it?
>
>Dan

I remember seeing an article on an antenna for working at 21kHz. It was
about 5 miles long, and they decided to lay it across the ice in Antarctica.
I cannot remember what it was being used for, it may have been research into
radio waves received from deep space or something similar, but I remember
thinking at the time that ice was probably as good an insulation material
they were going to find to support it without heaps of lamp post type poles
for miles.


There is also a time standard transmitter at Rugby in the UK. I am pretty
sure it also works at 60kHz. You can see an aerial farm when driving up the
M1 motorway (freeway to you Americans) that looks very similar to what has
already been described. I believe there is another similar transmitter in
Europe, I think Germany.

--
http://www.piclist.com#nomail Going offline? Don't AutoReply us!
email TakeThisOuTlistserv@spam@spam@spam@mitvma.mit.edu with SET PICList DIGEST in the body


2001\04\20@042037 by Peter L. Peres

picon face
> Their antenna (which is quite large and consists of a radiating
> downlead attached to a capacitive hat, all suspended by four
> non-radiating towers) is much shorter than even a quarter wave, but
> they have a very complex matching system which changes automatically
> to provide the optimum match

Why can't they use four 2.5km segments of power line in a cross ? The
voltage at the ends when resonating would be obscene but power lines are
built to 500kV and more.

Peter

--
http://www.piclist.com#nomail Going offline? Don't AutoReply us!
email TakeThisOuTlistservspamspammitvma.mit.edu with SET PICList DIGEST in the body


2001\04\20@042044 by Peter L. Peres

picon face
>and it looks like it just barely includes Massachusetts during several
>hours of the night. I don't think it has to do with reduced noise.

Don't the Canadians have some sort of clock signal broadcast you could use
instead in Massachusetts ? I think someone had a HF broadcast clock source
at 5, 10, and 15MHz. This may be easier to receive than 60kHz.

Peter

--
http://www.piclist.com#nomail Going offline? Don't AutoReply us!
email KILLspamlistservKILLspamspamspamBeGonemitvma.mit.edu with SET PICList DIGEST in the body


2001\04\20@090732 by Olin Lathrop

face picon face
> What kind of an antenna is used to broadcast 60Khz ?
>
> That's a wavelength of almost 5 kilometers!, isn't it?

5 megameters actually.

Does WWVB really use 60Hz?  I thought it was higher than that.  60Hz sounds
like asking for trouble because of the strong signal from the power grid.


********************************************************************
Olin Lathrop, embedded systems consultant in Littleton Massachusetts
(978) 742-9014, spamBeGoneolinKILLspamspamembedinc.com, http://www.embedinc.com

--
http://www.piclist.com#nomail Going offline? Don't AutoReply us!
email listserv@spam@spamKILLspammitvma.mit.edu with SET PICList DIGEST in the body


2001\04\20@091746 by Sean H. Breheny

face picon face
Hi Olin,

It's 60 kHz, not 60Hz.

I also just realized that I made an error in my description of the
antennas: they are both apparently omnidirectional, so I guess the purpose
of having two is for redundancy? I'm not sure and the web site doesn't
really explain other than to say that the combination of two antennas was
more efficient than just one. Perhaps, but for 65% instead of 50%
efficiency, considering the size of these antennas, I'm surprised it wasn't
more economical to just transmit more power.

Sean

At 08:19 AM 4/20/01 -0400, you wrote:
{Quote hidden}

--
http://www.piclist.com#nomail Going offline? Don't AutoReply us!
email STOPspamlistserv.....spammitvma.mit.edu with SET PICList DIGEST in the body


2001\04\20@091751 by Mg

flavicon
face
> Does WWVB really use 60Hz?  I thought it was higher than that.  60Hz
sounds
> like asking for trouble because of the strong signal from the power grid.

Carrier frequency used is 60kHz. From what I read from the webpage data is
sent at 1bit / sec.. Is this correct?

-Mg

--
http://www.piclist.com#nomail Going offline? Don't AutoReply us!
email spamBeGonelistservRemoveMEspamRemoveMEmitvma.mit.edu with SET PICList DIGEST in the body


2001\04\20@093005 by Thomas C. Sefranek

face picon face
Olin Lathrop wrote:

> > What kind of an antenna is used to broadcast 60Khz ?
> >
> > That's a wavelength of almost 5 kilometers!, isn't it?
>
> 5 megameters actually.
>
> Does WWVB really use 60Hz?

KILLO Hertz, a feww orders of magnitude.

{Quote hidden}

--
 *
 |  __O    Thomas C. Sefranek  spamtcsspamspamspamcmcorp.com
 |_-\<,_   Amateur Radio Operator: WA1RHP
 (*)/ (*)  Bicycle mobile on 145.41, 448.625 MHz

ARRL Instructor, Technical Specialist, VE Contact.
hamradio.cmcorp.com/inventory/Inventory.html
http://www.harvardrepeater.org

--
http://www.piclist.com#nomail Going offline? Don't AutoReply us!
email spamBeGonelistservKILLspamspamKILLspammitvma.mit.edu with SET PICList DIGEST in the body


2001\04\20@095258 by Olin Lathrop

face picon face
> Don't the Canadians have some sort of clock signal broadcast you could use
> instead in Massachusetts ? I think someone had a HF broadcast clock source
> at 5, 10, and 15MHz. This may be easier to receive than 60kHz.

The canadian station I know of is called CHU.  The shortwave CHU signal is a
bit stronger around here than the shortwave WWV signal.  I don't know if the
Canadians have an equivalent of the low frequency WWVB.

However, the automatic clock devices I've seen for sale and the ones I have
all use the WWVB signal.  The ones I have don't provide any choices, but
fortunately do seem to pick up the signal at night.


********************************************************************
Olin Lathrop, embedded systems consultant in Littleton Massachusetts
(978) 742-9014, TakeThisOuTolinspamspamembedinc.com, http://www.embedinc.com

--
http://www.piclist.com#nomail Going offline? Don't AutoReply us!
email spamBeGonelistservspammitvma.mit.edu with SET PICList DIGEST in the body


2001\04\22@011903 by Chris Cox

flavicon
face
Have been watching these WWVB notes about the 60Khz freq. I believe the
Navy talks to subs with a much lower freq and are supposed to have a
cple antennas(east and west) that are buried in mountainsides. All
highly classified of course... We were talking about this back in the
70's and somebody joked that the frequency was so low they resonated the
Earth.

"Thomas C. Sefranek" wrote:
{Quote hidden}

--
http://www.piclist.com hint: PICList Posts must start with ONE topic:
[PIC]:,[SX]:,[AVR]: ->uP ONLY! [EE]:,[OT]: ->Other [BUY]:,[AD]: ->Ads



'[AD]: Need a VB RS232 Guy for a quick mop up proje'
2001\05\16@225546 by James Newton
face picon face
The main developer got called away to Korea and we need a VB GUI, RS232,
"gather and present the data", programmer to slam out some quick code to
talk to a logger and present the data then save it to a data file or so.
Take over part written code or re-write. No DSP. Weird hours ok. Needs to be
in the San Diego (North is best) area. Pretty good quick money. I've got the
logger done but there may be some debugging so you would have to work with
me some... <EVIL GRIN> Timeline is starting middle of next week and
delivering no later than June 1. Should be between 16 and 40 hours total
work. We need to know when you will be available by tomorrow so we can plan
the work schedule.

James Newton
EraseMEjamesnewtonspamBeGonespamspamgeocities.com
1-619-652-0593 phone

--
http://www.piclist.com hint: To leave the PICList
KILLspampiclist-unsubscribe-requestspammitvma.mit.edu


'[AD]: Need a VB RS232 programmer urgently'
2001\05\21@121739 by jamesnewton

face picon face
Ok... This has now reached emergency levels! I can't believe that there
are no PICListers with VB / RS-232 experience who want to make some
extra cash in the San Diego north or L.A. south area.

I've tried local VB groups (no embedded or RS-232), calling friends,
etc...

Does anyone have any other suggestions?

James Newton (PICList Admin #3)
jamesnewtonspam_OUTspamspampiclist.com
1-619-652-0593


James Newton wrote on 01-5-16 20:30:

The main developer got called away to Korea and we need a VB GUI, RS232,
"gather and present the data", programmer to slam out some quick code to
talk to a logger and present the data then save it to a data file or so.
Take over part written code or re-write. No DSP. Weird hours ok. Needs
to be in the San Diego (North is best) area. Pretty good quick money.
I've got the logger done but there may be some debugging so you would
have to work with me some... <EVIL GRIN> Timeline is starting middle of
next week and delivering no later than June 1. Should be between 16 and
40 hours total work. We need to know when you will be available by
tomorrow so we can plan the work schedule.

James Newton
jamesnewtonspamspam@spam@geocities.com
1-619-652-0593 phone

--
http://www.piclist.com hint: To leave the PICList
spamBeGonepiclist-unsubscribe-request.....spammitvma.mit.edu

--
http://www.piclist.com hint: To leave the PICList
.....piclist-unsubscribe-request@spam@spammitvma.mit.edu


2001\05\21@125032 by Chris Carr

flavicon
face
Didn't get the "To" field correctly filled out the first time, sorry James.


{Quote hidden}

--
http://www.piclist.com hint: To leave the PICList
spam_OUTpiclist-unsubscribe-request@spam@spamRemoveMEmitvma.mit.edu


2001\05\21@134809 by Chris Carr

flavicon
face
This is the third attempt. With any luck I will have got the "To" field and
the
Subject Line correct. Should I be wasting all this bandwidth on a very poor
attempt at a joke.

That was a rhetorical question.

Regards Chris
I will now crawl back under my stone and stop annoying everyone.

> Didn't get the "To" field correctly filled out the first time, sorry
James.
>
>
> > Could they be all off line due to a lack of electricity ?
> >
> > 8-)
> > Chris
> >
> > > Ok... This has now reached emergency levels! I can't believe that
there
{Quote hidden}

RS232,
> > > "gather and present the data", programmer to slam out some quick code
to
> > > talk to a logger and present the data then save it to a data file or
so.
> > > Take over part written code or re-write. No DSP. Weird hours ok. Needs
> > > to be in the San Diego (North is best) area. Pretty good quick money.
> > > I've got the logger done but there may be some debugging so you would
> > > have to work with me some... <EVIL GRIN> Timeline is starting middle
of
> > > next week and delivering no later than June 1. Should be between 16
and
{Quote hidden}

--
http://www.piclist.com hint: To leave the PICList
KILLspampiclist-unsubscribe-request.....spamKILLspammitvma.mit.edu


2001\05\21@141643 by Sam Linder

flavicon
face
James:
This email only now just showed up on my system. Your original posts did not
come through on the PIC List. Perhaps they didn't make to anyone else
either?

I do have some experience in the area you mention although I don't know if
I'd have time - already working 50 - 60 hour weeks. If you want to pursue an
offline conversation, I can be reached at (714) 236-8979 x1186.
       Sam....

{Original Message removed}

2001\05\21@143614 by Eric James

picon face
>Ok... This has now reached emergency levels! I can't believe that there
>are no PICListers with VB / RS-232 experience who want to make some
>extra cash in the San Diego north or L.A. south area.
>
>I've tried local VB groups (no embedded or RS-232), calling >friends,
>etc...
>
>Does anyone have any other suggestions?
>
>James Newton (PICList Admin #3)
>jamesnewtonspam_OUTspamspam_OUTpiclist.com
>1-619-652-0593
>

If you are unable to find someone in the CA I would be willing to take the job
from Indiana.

---
Eric James
http://www.piclist.com/member/EFJ-IU-F68
http://basic18.piclist.com/

__________________________________________________
Do You Yahoo!?
Yahoo! Auctions - buy the things you want at great prices
http://auctions.yahoo.com/

--
http://www.piclist.com hint: To leave the PICList
KILLspampiclist-unsubscribe-requestspam@spam@mitvma.mit.edu


2001\05\22@091724 by Olin Lathrop

face picon face
> Ok... This has now reached emergency levels! I can't believe that there
> are no PICListers with VB / RS-232 experience who want to make some
> extra cash in the San Diego north or L.A. south area.

James, I think you'll find that embedded people don't do VB, and VB types
will run away screaming at the slightest smell of hardware.

VB may be useful for quick prototyping of GUIs, but I don't consider it a
serious tool for doing real work.  I often do host side code to support an
embedded project.  Most of the time the customer doesn't care how it's done
as long as it works.  In that case I use code ultimately compiled by MSVC.
If the customer insists on a VB app I tell them to get someone else.


********************************************************************
Olin Lathrop, embedded systems consultant in Littleton Massachusetts
(978) 742-9014, @spam@olinRemoveMEspamembedinc.com, http://www.embedinc.com

--
http://www.piclist.com hint: PICList Posts must start with ONE topic:
[PIC]:,[SX]:,[AVR]: ->uP ONLY! [EE]:,[OT]: ->Other [BUY]:,[AD]: ->Ads


2001\05\22@095325 by Kevin Blain

flavicon
face
At some point earlier on today, Olin said:

> > Ok... This has now reached emergency levels! I can't believe that there
> > are no PICListers with VB / RS-232 experience who want to make some
> > extra cash in the San Diego north or L.A. south area.

I must be the exception to that rule then. However, Guildford, UK is a long
walk from San Diego.

Regards, Kevin

--
http://www.piclist.com hint: PICList Posts must start with ONE topic:
[PIC]:,[SX]:,[AVR]: ->uP ONLY! [EE]:,[OT]: ->Other [BUY]:,[AD]: ->Ads


2001\05\22@100228 by rwyoung

picon face
>Ok... This has now reached emergency levels! I can't believe that there
>are no PICListers with VB / RS-232 experience who want to make some
>extra cash in the San Diego north or L.A. south area.
>
>I must be the exception to that rule then. However, Guildford, UK is a long
>walk from San Diego.
>
>Regards, Kevin

I can do this too.  But I'm not in San Diego or L.A. either.  How about
Kansas? (Where seldom is heard, a discouraging word, for what can an
antelope say...)

Robert Young
YR Consulting  785-842-6211 v/f
rwyoung@spam@spamEraseMEieee.org

_________________________________________________________________
Get your FREE download of MSN Explorer at http://explorer.msn.com

--
http://www.piclist.com hint: PICList Posts must start with ONE topic:
[PIC]:,[SX]:,[AVR]: ->uP ONLY! [EE]:,[OT]: ->Other [BUY]:,[AD]: ->Ads


2001\05\22@101901 by Alan B. Pearce

face picon face
>Ok... This has now reached emergency levels! I can't believe that there
>are no PICListers with VB / RS-232 experience who want to make some
>extra cash in the San Diego north or L.A. south area.
>
>I must be the exception to that rule then. However, Guildford, UK is a long
>walk from San Diego.
>
>Regards, Kevin

Yeah so is Didcot, UK, and I was in Palo Alto just a couple of weeks ago
too.

--
http://www.piclist.com hint: PICList Posts must start with ONE topic:
[PIC]:,[SX]:,[AVR]: ->uP ONLY! [EE]:,[OT]: ->Other [BUY]:,[AD]: ->Ads


2001\05\22@123921 by jamesnewton

face picon face
Totally agree... but this client...

---
James Newton (PICList Admin #3)
spam_OUTjamesnewtonspam_OUTspamRemoveMEpiclist.com 1-619-652-0593
PIC/PICList FAQ: http://www.piclist.com or .org

{Original Message removed}

2001\05\22@165620 by Patrik Husfloen

picon face
I'm another exception to your rule.


----- Original Message ----- From: "Olin Lathrop" <RemoveMEolin_piclistspam.....EMBEDINC.COM>
To: <spamPICLIST@spam@spamMITVMA.MIT.EDU>
Sent: Tuesday, May 22, 2001 2:21 PM
Subject: Re: [AD]: Need a VB RS232 programmer urgently


{Quote hidden}

--
http://www.piclist.com hint: PICList Posts must start with ONE topic:
[PIC]:,[SX]:,[AVR]: ->uP ONLY! [EE]:,[OT]: ->Other [BUY]:,[AD]: ->Ads


2001\05\22@184021 by Dave King

picon face
I used to do that with quickbasic and 8051's. Is the mentioning
of quickbasic showing my antiquity ??;-].

At 10:56 PM 5/22/01 +0200, you wrote:
>I'm another exception to your rule.
>
>
>{Original Message removed}

2001\05\22@185049 by ron

flavicon
face
I agree with Patrick on this one.  Each environment and language has it's value!
Although I very much dislike many MS products, I find VB to be very useful at
times.  Much easier to code than VC.  Nothing against 'C', but MSVC has always
been more complicated to use than VB, for me anyway.  Then, again, I haven't
spent months trying to learn its various quirks.  PIC C is more my speed now.
But PicBasic Pro has worked out well for prototyping some of my PIC hardware...

We have lot's of use for quickly prototyped interfaces to PIC projects!  VB works
fine for this.  In fact, I have to code up a VB app this week which sends
commands to a new PIC command interpreter I need to test!  It's got to be done by
Thursday evening.  I know it would take me longer than a couple of days using
'C'.
Ron

Patrik Husfloen wrote:

> I'm another exception to your rule.
>
> {Original Message removed}

2001\05\22@231548 by michael brown

flavicon
face
----- Original Message -----
From: "Ron Wilder" <.....ronspamTakeThisOuTagileaccesscontrol.com>
To: <EraseMEPICLISTspamKILLspamMITVMA.MIT.EDU>
Sent: Tuesday, May 22, 2001 5:49 PM
Subject: Re: [AD]: Need a VB RS232 programmer urgently


> I agree with Patrick on this one.  Each environment and language has it's
value!
> Although I very much dislike many MS products, I find VB to be very useful
at
> times.  Much easier to code than VC.  Nothing against 'C', but MSVC has
always
> been more complicated to use than VB, for me anyway.

That's because mickysoft didn't invent VB they just bought it and messed it
up. (sorta like Front Page)

> Then, again, I haven't
> spent months trying to learn its various quirks.

Only months?  You must be a fast learner.

> PIC C is more my speed now.
> But PicBasic Pro has worked out well for prototyping some of my PIC
hardware...
>
> We have lot's of use for quickly prototyped interfaces to PIC projects!
VB works
> fine for this.  In fact, I have to code up a VB app this week which sends
> commands to a new PIC command interpreter I need to test!  It's got to be
done by
> Thursday evening.  I know it would take me longer than a couple of days
using
> 'C'.

I totaly agree.  VB is plenty good (professional) enough for most simple
GUI's.  And you don't even have to spend countless hours trying to
understand why one line of code won't work.

{Quote hidden}

there
> > > > are no PICListers with VB / RS-232 experience who want to make some
> > > > extra cash in the San Diego north or L.A. south area.
> > >
> > > James, I think you'll find that embedded people don't do VB, and VB
types
> > > will run away screaming at the slightest smell of hardware.
> > >
> > > VB may be useful for quick prototyping of GUIs, but I don't consider
it a
> > > serious tool for doing real work.  I often do host side code to
support an
> > > embedded project.  Most of the time the customer doesn't care how it's
done
> > > as long as it works.  In that case I use code ultimately compiled by
MSVC.
{Quote hidden}

--
http://www.piclist.com hint: PICList Posts must start with ONE topic:
[PIC]:,[SX]:,[AVR]: ->uP ONLY! [EE]:,[OT]: ->Other [BUY]:,[AD]: ->Ads


2001\05\23@043201 by Alan B. Pearce

face picon face
>That's because mickysoft didn't invent VB they just bought it and messed it
>up. (sorta like Front Page)

Are you sure about that? My experience with it is that it shows its roots
all the way from GWBasic which was developed from the MS 8080 basic. The
original IBM basic in ROM was quite obviously passed through an 8080 to 8086
translator that Intel had available, and MS have developed from there
through GWBasic, QuickBasic and QBasic to VB. Really the only differences
between Basic and VB is the windows interface.

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics


2001\05\23@071947 by michael brown

flavicon
face
----- Original Message -----
From: "Alan B. Pearce" <A.B.Pearcespamspam_OUTRL.AC.UK>
To: <spamPICLIST@spam@spamMITVMA.MIT.EDU>
Sent: Wednesday, May 23, 2001 3:31 AM
Subject: Re: [AD]: Need a VB RS232 programmer urgently


> >That's because mickysoft didn't invent VB they just bought it and messed
it
> >up. (sorta like Front Page)
>
> Are you sure about that? My experience with it is that it shows its roots
> all the way from GWBasic which was developed from the MS 8080 basic. The
> original IBM basic in ROM was quite obviously passed through an 8080 to
8086
> translator that Intel had available, and MS have developed from there
> through GWBasic, QuickBasic and QBasic to VB. Really the only differences
> between Basic and VB is the windows interface.

Check this out:

http://www.rediff.com/news/1999/dec/02rajeev.htm

· MS DOS -- purchased QDOS (Quick and Dirty OS) from the Seattle Computer
Company for a mere $ 50,000.

· Internet Explorer -- based on code licensed from Spyglass, Inc.

· Flight Simulator -- purchased from the Bruce Artwick Organization.

· Powerpoint -- purchased from Forethought, Inc.

· FrontPage -- purchased from Vermeer Technologies.

· FoxPro -- part of Fox Software which was bought out by Microsoft.

· HotMail -- company purchased by Microsoft.

· OLE -- Microsoft settled a patent infringement suit with Wang Labs.

· SQL Server -- based on code purchased from Sybase.

· Visual Basic -- based on code purchased from Cooper Software.

· Visual C++ -- based on the purchased Lattice C compiler.

· Windows -- portions of the interface licensed from Apple Computer;
multitasking technologies were from a company, Dynamical Systems, bought by
Microsoft

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics



'[PICLIST] VB: [PIC]How to make use of realtime clo'
2001\09\25@104335 by hans.nielsen
flavicon
face
part 1 1643 bytes content-type:text/plain; (unknown type 8bit not decoded)


Hi Danie,
I attach some code I have written for the Dallas DS1302 chip, a small and
cheap RTC.
Enjoy!
--------------------------------------------
Hans Nielsen
NIELSEN Elektronik
spam_OUTnielsen.elekTakeThisOuTspamKILLspamwanadoo.fr
-------------------------------------------

{Quote hidden}


part 2 5998 bytes content-type:application/octet-stream; (decode)

part 3 144 bytes
--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics


2001\09\25@123906 by hans.nielsen

flavicon
face
Hi Danie,
I attach some code I have written for the Dallas DS1302 chip, a small and
cheap RTC.
Enjoy!
--------------------------------------------
Hans Nielsen
NIELSEN Elektronik
nielsen.elekTakeThisOuTspam@spam@wanadoo.fr
-------------------------------------------

{Quote hidden}

;**************************************************************************
; RTC1302.ASM
; Real time clock routines
; v 1.0 010502
; Uses a Dallas DS1302 RTC
; NIELSEN Elektronik
; .....nielsen.elekspamspamBeGonewanadoo.fr
;**************************************************************************

; Variables used in the unit
       cblock RTCvar
         Temp0
         sdata
         scount
       endc

; Port pin definitions

#define csRTC   PORTB,0 ; Out, RTC chip select
#define ioRTC   PORTB,5 ; In/Out,  RTC data I/O
#define ckRTC   PORTB,4 ; Out,  RTC data clock

; Sets i/o pin to input for data read from RTC
RTCin   macro
       banksel TRISB           ; select bank 1
       bsf     TRISB,5         ; set RB5 (ioRTC) to input
       banksel PORTB           ; select bank 0
       endm

; Sets i/o pin to output for data write to RTC
RTCout  macro
       banksel TRISB           ; select bank 1
       bcf     TRISB,5         ; set RB5 (ioRTC) to output
       banksel PORTB           ; select bank 0
       endm

;--------------------------------------------------------------------------
; The time registers in DS1302 RTC
; The time is:
; Reg   Pos     Data
; 1     1       second
; 2     2       minute
; 3     3       hour
; 4     4       date
; 5     5       month
; 6     6       day
; 7     7       year
;--------------------------------------------------------------------------
;--------------------------------------------------------------------------
; RTC clock burst mode write, data fetched from RAM
; Provided data:
; sdata         Start RAM location of data to put into RTC
; scount        Number of bytes to write (up to 8)
;--------------------------------------------------------------------------
WriteToRTC
       bsf     csRTC           ; Set RST for RTC
       movlw   b'10111110'     ; load RTC burst write command
       call    RTCwrite        ; RTC shift routine
; send data:
       movf    sdata,w         ; pointer to first RAM data loc.
       movwf   FSR             ; put in File Select Register
       movf    scount,w        ; data bytes count
       movwf   Temp0           ; local counter
SendRTCByte
       movf    INDF,w          ; load data using Indirect Addressing
       call    RTCwrite        ; RTC shift routine
       incf    FSR,f           ; step to next data pos
       decfsz  Temp0,f         ; decrement data counter
       goto    SendRTCByte     ; if not zero, send next byte
       bcf     csRTC           ; Clear RST for RTC
       return

;--------------------------------------------------------------------------
; RTC clock burst mode read, data put in RAM
; Provided data:
; sdata         Start RAM location to place received data
; scount        Number of bytes to read (up to 8)
;--------------------------------------------------------------------------
ReadFromRTC
       bsf     csRTC           ; Set RST for RTC
       movlw   b'10111111'     ; load RTC burst read command
       call    RTCwrite        ; RTC shift routine

; read RTC data to RAM
       RTCin                   ; Set i/o pin RB5 to input for data read from RTC
       bcf     INTCON,RBIE     ; clear PORTB int mask
       movfw   sdata           ; pointer to first RAM data loc.
       movwf   FSR             ; put in File Select Register
       movfw   scount          ; data byte count
       movwf   Temp0           ; local counter
ReadRTCByte
       call    RTCread         ; RTC shift routine
       movwf   INDF            ; save data using Indirect Addressing
       incf    FSR,f           ; step to next data pos
       decfsz  Temp0,f         ; decrement data counter
       goto    ReadRTCByte     ; if not zero, read next byte

       bcf     csRTC           ; Clear RST for RTC
       RTCout                  ; Set i/o pin RB5 to output for data write to SPI and RTC
       return

;--------------------------------------------------------------------------
; RTC data read, shifts 8 bits into inbyte and w
; Data is valid after a falling clock edge.
;--------------------------------------------------------------------------
RTCread
       clrwdt                  ; clear watchdog timer
       movlw   8               ; load loop counter
       movwf   count           ; stash it
RTCrdloop
       bcf     sck             ; clock low, data is now valid
       clrc                    ; preclear carry
       btfsc   ioRTC           ; if i/o line low then skip
       setc                    ; else set carry
       rrf     inbyte,f        ; rotate C in place, LSB bit first
       bsf     sck             ; clock high, i/o 3-stated
       decfsz  count,f         ; do loop counter
       goto    RTCrdloop       ; loop until 8
       movf    inbyte,w        ; put read result in w
       return                  ; all done

;--------------------------------------------------------------------------
; RTC data write, shifts w into RTC
;--------------------------------------------------------------------------
RTCwrite
       clrwdt                  ; clear watchdog timer
       movwf   outbyte         ; put data in shift out variable
       movlw   8               ; load loop counter
       movwf   count           ; stash it
RTCwtloop
       rrf     outbyte,f       ; get bit to send, LSB first
       bcf     sck             ; clock low
       bcf     ioRTC           ; preclear i/o line
       skpnc                   ; if carry low then skip
       bsf     ioRTC           ; else set i/o line
       bsf     sck             ; clock high, data is now clocked in
       decfsz  count,f         ; do loop counter
       goto    RTCwtloop       ; loop until 8
       bsf     sck             ; clock high, i/o 3-stated
       return                  ; all done

;--------------------------------------------------------------------------
; End of include file
;--------------------------------------------------------------------------

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics



'[ot]: VB terminal utility'
2001\10\02@075231 by zantos
flavicon
face
Can anyone suggest where I can find a simple VB terminal utility to send a
small text file to the serial port?
TIA

--
http://www.piclist.com#nomail Going offline? Don't AutoReply us!
email .....listservTakeThisOuTspamEraseMEmitvma.mit.edu with SET PICList DIGEST in the body


2001\10\02@092719 by P.J. McCauley

picon face
There is a sample which came with VB called VbTerm if I recall correctly. It
should do your job.

Joe
{Original Message removed}

2001\10\02@094400 by zantos

flavicon
face
Found it. Thank you very much for your help.

----- Original Message -----
From: "P.J. McCauley" <RemoveMEpmcculeyspamspamKILLspamTCD.IE>
To: <STOPspamPICLISTEraseMEspamMITVMA.MIT.EDU>
Sent: 02 October 2001 14:26
Subject: Re: [ot]: VB terminal utility


> There is a sample which came with VB called VbTerm if I recall correctly.
It
{Quote hidden}

--
http://www.piclist.com#nomail Going offline? Don't AutoReply us!
email spamlistservspamBeGonespammitvma.mit.edu with SET PICList DIGEST in the body



'[EE]: Vbe temperature measurement again'
2002\01\06@185217 by Peter L. Peres
picon face
Hi all,

I made a small test using a thermostat, a thermistor, and a BC547C with C
and B shorted. The test resistors (to put current into the BE junction)
were 4k7 and 47k respectively. They were switched alternatedly (when one
was in the circuit the other was not - not by paralleling 47k with 4k7).

The measurement was done by hand in a block of foam used as thermostat
(jury rigged). The reference was a glass lab thermometer that should be
better than +/- 3C at 100C (I tested it in ice water so the 100C point
should be ok too).

All errors are almost certainly due to measurement error, parallax reading
the glass etc etc. Anyway the trends are clear imho:

- By not using a current source the instrument constant is not clean (last
column).
- It is probably not worth the effort to do this without a proper current
source. The error induced by the changing current is too big. The effort
required to correct this could go into a table lookup for a thermistor.
- I did not try to change devices and see what gives. I will try this with
a proper thermostat and automated measurement. Even so the thermistor
creeps badly (see zero repeat at 20C).

The application note (the one with the baby bottles) was very helpful,
but they CLEARLY used a current source and other parts that made it
somewhat expensive. Any comments are welcome.

Here is a table (it was clobbered together so no comments on quality
please) (YOU WANT TO SEE THIS ON A WIDE SCREEN WITH FIXED FONT):

Thermostat measurements  BC547C with C and B shorted, 5k6 thermistor

vtest=4.99V Rlow=4k7 Rhigh=47k
spamplpRemoveMEspamactcom.co.il 2002

          Temperature Ilow    Vlow     Ihigh    Vhigh    Therm      deltaV     Vt-V(t-10) R(t-10)/Rt mV/K
          Deg. C      uA      mV       uA       mV       Ohms       mV         TEST mV       TEST    273.15

Meas.:     120.0       98      408      924      526      0.156      118        18.00         1.37     0.3001
          110.0       97      429      920      544      0.214      115        22.00         1.38     0.3001
          100.0       97      456      915      566      0.296      110        19.00         1.39     0.2948
           90.0       96      477      911      585      0.410      108        17.00         1.34     0.2974
           80.0       96      498      908      602      0.550      104        19.00         1.41     0.2945
           70.0       95      519      904      621      0.774      102        18.00         1.47     0.2972
           60.0       95      542      900      639      1.140       97        19.00         1.43     0.2912
           50.0       94      563      896      658      1.630       95        17.00         1.47     0.2940
           40.0       94      584      892      675      2.390       91        19.00         1.55     0.2906
           30.0       94      605      889      694      3.700       89        16.00         1.51     0.2936
           20.0       93      626      885      710      5.600       84        16.00         1.57     0.2865
           10.0       93      645      881      726      8.800       81        19.00         1.64     0.2861
            0.0       92      673      876      745     14.400       72        16.00         1.47     0.2636
          -10.0       92      686      874      761     21.200       75

Zero rep.:  20.0       93      623      885      708      5.640


Note  Test columns are to check monotonicity etc
Note1  The dV value at -10C is not in line with the others - could be meas. error

--
http://www.piclist.com hint: To leave the PICList
KILLspampiclist-unsubscribe-requestspam_OUTspamspam_OUTmitvma.mit.edu


2002\01\06@215328 by Tom Messenger

flavicon
face
Hi Peter

I was just looking at the Linear Tech apnote recently about this so your
data was of interest to me. Your conclusion about using a good current
source is certainly on the mark.  The deltas are so small that they are
easily lost if attention to details is not paid. I would think that the
current source needed should not present a problem. Of course, if you are
looking for rock bottom parts cost, it might be.

The theory does look interesting; Jim Williams writes interesting ap notes.
I do believe as he claims that you can do away with calibration from unit
to unit if you do a good implementation here.

Good luck and please let us know how any further work goes on this. Thanks
for taking the time to fill us in.

Best regards,
Tom M.

--
http://www.piclist.com hint: To leave the PICList
piclist-unsubscribe-requestspam_OUTspamTakeThisOuTmitvma.mit.edu


2002\01\07@014909 by Robert A. LaBudde

flavicon
face
At 06:50 PM 1/6/02 -0800, Tom wrote:
>Hi Peter
>
>I was just looking at the Linear Tech apnote recently about this so your
>data was of interest to me. Your conclusion about using a good current
>source is certainly on the mark.  The deltas are so small that they are
>easily lost if attention to details is not paid. I would think that the
>current source needed should not present a problem. Of course, if you are
>looking for rock bottom parts cost, it might be.

When using a diode-wired transistor as a sensor, the principal error arises
from variations in current. The current should be low enough to avoid
voltage drops across the base-spreading resistance and high enough to avoid
shot noise issues. Typically the current used is 50-100 uA.

The current source must be temperature stabilized or a large error will
result. Typically the current source used is a matched transistor pair
wired as a current mirror.

Given the difficulties associated with obtaining high accuracy from
transistor sensors, it's usually better and cheap enough to simply buy a
solid-state sensor package with the details buried internally.

In principle, solid-state sensors are capable of accuracies on the order of
0.01 C if used correctly.

================================================================
Robert A. LaBudde, PhD, PAS, Dpl. ACAFS  e-mail: spamBeGoneralspamspamspamBeGonelcfltd.com
Least Cost Formulations, Ltd.            URL: http://lcfltd.com/
824 Timberlake Drive                     Tel: 757-467-0954
Virginia Beach, VA 23464-3239            Fax: 757-467-2947

"Vere scire est per causas scire"
================================================================

--
http://www.piclist.com hint: PICList Posts must start with ONE topic:
[PIC]:,[SX]:,[AVR]: ->uP ONLY! [EE]:,[OT]: ->Other [BUY]:,[AD]: ->Ads


2002\01\07@163812 by Dave Dilatush

picon face
"Peter L. Peres" <@spam@plpspamspamspam_OUTACTCOM.CO.IL> wrote...

>...Anyway the trends are clear imho:
>
>- By not using a current source the instrument constant is not clean (last
>column).

Even with just your pair of resistors it's not bad, though.  These are
nice results.

>- It is probably not worth the effort to do this without a proper current
>source. The error induced by the changing current is too big. The effort
>required to correct this could go into a table lookup for a thermistor.

Also, this method doesn't product much of an output change per Deg. C;
that's one of its drawbacks.  It isn't necessary to keep the currents
themselves constant, but it is important to have a constant ratio
between the two currents.

>- I did not try to change devices and see what gives. I will try this with
>a proper thermostat and automated measurement. Even so the thermistor
>creeps badly (see zero repeat at 20C).
>
>The application note (the one with the baby bottles) was very helpful,
>but they CLEARLY used a current source and other parts that made it
>somewhat expensive. Any comments are welcome.

I think where this "Delta-Vbe" sensing method shines best is in
situations where the ability to interchange sensors without having to
re-calibrate is extremely important, along with extremely low sensor
cost, but where the cost of the measurement circuitry is relatively
unimportant.  It's ideal for monitoring die temperatures on CPU chips.

Dave

--
http://www.piclist.com hint: PICList Posts must start with ONE topic:
[PIC]:,[SX]:,[AVR]: ->uP ONLY! [EE]:,[OT]: ->Other [BUY]:,[AD]: ->Ads


2002\01\08@024949 by Vasile Surducan

flavicon
face
On Mon, 7 Jan 2002, Dave Dilatush wrote:

>
> I think where this "Delta-Vbe" sensing method shines best is in
> situations where the ability to interchange sensors without having to
> re-calibrate is extremely important, along with extremely low sensor
> cost, but where the cost of the measurement circuitry is relatively
> unimportant.  It's ideal for monitoring die temperatures on CPU chips.

 I wasn't follow this subject but if delta means diference I have some
doubts about the interchangeability of the sensors. Maybe a ratio.
There are five basic methodes of measuring temperature with a transistor:
1. Ib = constant, measuring Vbe, only be junction is used
2. Vbe = constant, measuring Ib, only be junction is used
3. Ib = constant, measuring Ic
4. Ib = constant, measuring Vce
5. Ib = constant, measuring both Vce and Vbe

But all methodes are too complicated if we think to the LM35 family.

regards, Vasile

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics


2002\01\08@063109 by Dave Dilatush

picon face
Vasile Surducan wrote...

>I wasn't follow this subject but if delta means diference I have some
>doubts about the interchangeability of the sensors. Maybe a ratio.

This "delta Vbe" technique is a well established and documented
technique.  Linear Technology, Inc. application note AN45, by Jim
Williams,  discusses this method and shows an example design on page 7,
Figure 11.
Circuits of this type produce a voltage output which is proportional to
the log of the ratio of the two currents times the absolute temperature.

The output shows very little dependency on transistor characteristics or
device type; Williams obtained less than 0.4 degrees C spread over 25
randomly selected 2N3904s and 2N2222s from various manufacturers.

>There are five basic methodes of measuring temperature with a transistor:
>1. Ib = constant, measuring Vbe, only be junction is used
>2. Vbe = constant, measuring Ib, only be junction is used
>3. Ib = constant, measuring Ic
>4. Ib = constant, measuring Vce
>5. Ib = constant, measuring both Vce and Vbe

>But all methodes are too complicated if we think to the LM35 family.

I think that last statement oversimplifies just a bit: there are many
ways to measure temperature, and each method has its strengths,
weaknesses, and a set of applications where its use is appropriate.

The "delta Vbe" method of sensing temperature has two application areas
where it is especially attractive:

1.  When the temperature sensing element MUST be a semiconductor
   junction, such as measuring the die temperature of a CPU chip
   for purposes of cooling control.  The delta-Vbe technique allows
   highly accurate die temperature measurement without any need for
   calibration.

2.  When there is a need for EXTREMELY low sensor cost (but NOT total
   circuit cost), together with a requirement that sensors be
   interchangeable without re-calibration.  For example, I can bond
   a small, cheap transistor to an assembly to monitor its
   temperature during testing or some other process (e.g., potting)
   and then discard it when I'm done, at little expense.

If you'd like to go back and follow the original thread to see how we
got to this discussion, look in the archives for "[PIC]: current
generator with a PIC" by Ashly Dearden on 27 December; that thread will
provide some context.

Dave Dilatush

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics


2002\01\08@063748 by Vasile Surducan

flavicon
face
Dave, thank you for the tips !
Vasile

On Tue, 8 Jan 2002, Dave Dilatush wrote:

{Quote hidden}

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics


2002\01\08@150921 by Peter L. Peres

picon face
> very stable current source to drive transistor sensor

I was half hoping that the math that promises one-point calibration when
using the two-current method would also help if the current would change a
little bit together for the h and l value (it does not help). This was the
point of setting up the experiment as I did.

It is already known from at least two references that the system works
when done properly (and with lots of parts).

Peter

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics


2002\01\08@150952 by Peter L. Peres

picon face
I understand that the constant ratio is very important, I will concentrate
on this point. Also I am trying to make a sensor with gain (f.ex. by
leaving the collector unshorted to B and using it as a current sink on a
timing capacitor - or to drive a second transistor in current mirror style
with 'bad' thermal contact between them).

This is the next planned step. I think that I'll use a single JFET+R
current source, with a split R shunted by a PIC pin when necessary. I have
had good results with those before (<30ppm/C without even trying hard -
maybe I was lucky with the R tempco ;-).

I found very few pointers on beta change with temperature. I'd be grateful
for some ideas ;-).

thanks,

Peter

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics



'[OT]: VB list'
2002\03\18@035050 by Orbit Communications
flavicon
face
Anyone know of a Visual Basic email list or news group ?

Thanks in advance.

Best Regards

David Huisman
-----------------------------------------------------------------------
ORBIT COMMUNICATIONS  Reliable Wireless Solutions (Telemetry, Control, Monitoring ...)
Website : http://www.orbitcoms.com
PO Box 3469 Tuggerah
NSW 2259, AUSTRALIA
Phone: 61-2-4393-3627
Fax  : 61-2-4393-3685
Mobile: 61-413-715-986


---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.323 / Virus Database: 180 - Release Date: 08-Feb-02

--
http://www.piclist.com hint: PICList Posts must start with ONE topic:
[PIC]:,[SX]:,[AVR]: ->uP ONLY! [EE]:,[OT]: ->Other [BUY]:,[AD]: ->Ads


'[OT]: VB 6'
2002\03\19@061458 by Orbit Communications

flavicon
face
Hi,

In support for our hardware devices, we need to deploy some software GUI software. I am having a couple of problems and wonder if someone here with VB6 experience may be able to help (I realize VB is way off topic but there are plenty of very smart people in this forum with a wide variety of experience)


When I deploy an application from VB6 and copy the setup files to CD Rom and
run Setup.exe, I get a message
"an access violation occurred while copying a file" the file concerned is
(MSVCRT.DLL).

If I click Ignore, the application installs fine. Is there any way I can
stop this occurring ?

Also, I am writing a small program to Autorun when the CD is loaded to bring
up a menu that allows the user to choose which program to install. I use the
API call below... The error reported is "Can't find DLL entry point
openprocess in Kernel32

On Error GoTo err

Dim hProcess As Long
Dim RetVal As Long
Dim s1AppToRun As String

s1AppToRun = "c:\Windows\Notepad.exe"

List1.AddItem s1AppToRun

hProcess = openprocess(PROCESS_QUERY_INFORMATION, 1, _
 Shell(s1AppToRun, vbNormalFocus))

err_resume:
Exit Sub

err:
MsgBox Error
Resume Next

(This is the declaration in the MODULE)

Declare Function openprocess Lib "kernel32" _
 (ByVal dwDesiredAccess As Long, ByVal bInheritHandle _
 As Long, ByVal dwProcessID As Long) As Long



Best Regards

David Huisman
-----------------------------------------------------------------------
ORBIT COMMUNICATIONS  Reliable Wireless Solutions (Telemetry, Control, Monitoring ...)
Website : http://www.orbitcoms.com
PO Box 3469 Tuggerah
NSW 2259, AUSTRALIA
Phone: 61-2-4393-3627
Fax  : 61-2-4393-3685
Mobile: 61-413-715-986


---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.338 / Virus Database: 189 - Release Date: 14-Mar-02

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics


2002\03\19@101545 by Paul Hutchinson

flavicon
face
> When I deploy an application from VB6 and copy the setup files to CD Rom
and
> run Setup.exe, I get a message
> "an access violation occurred while copying a file" the file concerned is
> (MSVCRT.DLL).
>
> If I click Ignore, the application installs fine. Is there any way I can
> stop this occurring ?

This sounds like setup.exe is trying to replace MSVCRT.DLL while windows is
running. It should be setting a flag to replace the file during boot time
instead.

I haven't used the built-in setup stuff in a long time, I use the Visual
Studio Installer (free from Microsoft for VB/VC users).

Just tried the built-in setup stuff and I don't get the error so, do you
have VB6 Service Pack 5 installed?

Are you using the Package & Deployment Wizard in the Add-Ins menu to create
the setup? (The P&D Wizard does not load by default you have load it using
the Add-In Manager)


> Also, I am writing a small program to Autorun when the CD is loaded to
bring
> up a menu that allows the user to choose which program to install. I use
the
> API call below... The error reported is "Can't find DLL entry point
> openprocess in Kernel32

I get the same error using the OpenProcess API call. Can you use the
built-in "Shell" command instead of the OpenProcess API call. Like this:

Dim s1AppToRun As String
Dim vntReturnVal As Variant

s1AppToRun = "c:\Windows\Notepad.exe"

List1.AddItem s1AppToRun

vntReturnVal = Shell(s1AppToRun, vbNormalFocus)


Paul

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics


2002\03\19@163818 by michael brown

flavicon
face
> > When I deploy an application from VB6 and copy the setup files to CD Rom
> and
> > run Setup.exe, I get a message
> > "an access violation occurred while copying a file" the file concerned
is
> > (MSVCRT.DLL).
> >
> > If I click Ignore, the application installs fine. Is there any way I can
> > stop this occurring ?
>
> This sounds like setup.exe is trying to replace MSVCRT.DLL while windows
is
> running. It should be setting a flag to replace the file during boot time
> instead.

This file is usually marked read-only for some strange reason.  This could
be causing the message.

michael brown

--
http://www.piclist.com hint: The list server can filter out subtopics
(like ads or off topics) for you. See http://www.piclist.com/#topics



'[EE]: RS232, VB6, Excel, N-Tier'
2002\05\02@050241 by Mike Singer
picon face
In the private e-mail Patrick H. wrote
(reproduced with his permission):
> I have been following the rolling median filter thread
> on the PIC list, I found your neat idea using VBA (MS Excel)
>  very interesting. I have been trying to implement
> a system to read the data from an analytical Lab balance
> fitted with an RS232 port. My approach to date has been
> using VB6 to communicate with the balance and to save
> the data to a text file and then import the text file into Excel.
> It would seem to me to be much more efficient to directly
> import the data in real time to excel, but I could not seem
> to find any sort of comms communication system in vb
> components of Excel. I hope you may be kind enough
> to give me some pointers in the right direction with this problem.

Thanks for the question, Pat.
-----------------------------------------------------------------------
--- First direction:
As you have VB6 and Excel experience, you can use Automation.
Search MSDN on Automation and you'll get a lot of information.
Rather than saving data to a text file and then importing into Excel,
you could programmaticaly insert it into an Excel application from
within a VB6 application. It's an easy and quick way.

--- Second direction:
As you are a VB6 programmer, you can use MS ActiveX technology.
Redevelop your VB6 standart EXE project into ActiveX (I prefer
standalone EXE), so you could utilize it from VB6, MS Office ...
It's not an easy way, especially when you have to work in event
driven fashion.(When ActiveX is to start some sub in a parent app).
To do so you should use "Callbacks" (by events or by callback
interface. I tried both). You need not MSComm controle
in a parent app (Excel for example) , as it was implemented in
ActiveX)

--- Third direction: - .Net - will be later, I hope.

-----------------------------------------------------------------

Shifting to PICs:

I've bought PIC16F876 just for fun 3 month ago, when walked down
a sort of flea market (Ukraine). With no background on microcontrollers
I've assembled a board with this PIC and a board logic on one MAX232,
one 7401, one 7474, some other components. The PIC didn't serve
boad logic, it did application logic.

Then I've made ActiveX EXE, encapsulating
board managing logic and low level programming logic. Now I have
an Excel workbook as a shell communicating with the ActiveX by
commands like "Switch the board to programming mode", "Switch
the board to normal mode", "Programm binary block", "Read binary
block", "Load configuration","Read configuration"...
It lacks programmable power supply now, but I'll do it later.

Now I'm playing with the idea to store all the low and middle level
logic in MS SQL 2000, since a board and ActiveX component seems
to be quite common for all devices with In-Circuit Serial Programming
(ICSP) abilities (MicroChip,Atmel,Philips,TI...). The idea is aiming to
n-tier architecture.

As you see the cost of an _APPLICATION_ board to be assembled
of  blank PIC and then be dynamically reprogrammed through
COM port is one 7401and one 7474, not counting programmable
power supply.

Where am I going to, finally.
Could anybody on the Globe explain me why did not Microchip
propose to customer a cheapest as possible application circuit
scheme, to be assembled by customer, then attached to customer's
computer COM port. Then this board is to be tested and programmed
in on-line over Internet by Microchip server using low-level
programming logic stored on the server in SQL 2000 for example.
The approach could dramatically increase the army of PIC developers.
(China,India - over 2 H of population, smart people)
You need only about ten dollars to assemble an application board,
then attach it to the computer, the Microchip server would do the rest
(test and programm).

   /\
--/   \   /\------------------------------------------->==>
       \/          Mike Singer, Ukraine.

--
http://www.piclist.com hint: PICList Posts must start with ONE topic:
[PIC]:,[SX]:,[AVR]: ->uP ONLY! [EE]:,[OT]: ->Other [BUY]:,[AD]: ->Ads


'[EE]:Vbasic'
2002\05\29@013142 by Salah

flavicon
face
Hello List,
 Anybody knows where to find some Vbasic code about how to read the RS-232
data from the PC serial port which is connected to PIC MPU sending data in
continous way. Any links,ideas are all welcomed.
Regards,
Salah.

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.


2002\05\29@055057 by Mike Singer

picon face
Salah wrote:

>Hello List,
>  Anybody knows where to find some Vbasic code about how to read the RS-232
>data from the PC serial port which is connected to PIC MPU sending data in
>continous way. Any links,ideas are all welcomed.
>Regards,
>Salah.

  Hi, Salah.
  Didn't you see, all PICList heavy-weights dislike M$ software?
You mean MS VB, yeah? Most of the community are extremely
software-ascetic, being EE. Have look at postings in threads:
  "Best small windows developer platform??"
  "You Can Make it if You Try, Roman."
  Personally, I can't afford myself to be a software spartan,
since I have to make my living in any way, so what can I say:
  You are on a right way, Salah. MS VB is a good choice, sure.
As for me, the best way to handle RS-232 from VB is using
MS Comm control.
  Going this way, you absolutely need MSDN, installed on
your computer, particularly "VBREF98.CHM" book. In the chapter
"Controls reference"-"ActiveX controls" it has a lot of documentation
on "MSComm Control" with examples.
  To handle RS-232 from PIC side, if you going to start with 16F87X,
you may read:  "PICmicro MID-RANGE MCU FAMILY", DS31018A,
Section 18. USART
  In addition I'd like to mention Olin Lathrop's posting "Re: [EE]: Class AB
output stage clipping". It goes about electronics, but the idea how to choose
learning curve is the same.

{Quote hidden}

  Great thoughts, by the way.
     Why not to strike them on a PICList  facade wall?

  Good luck.
  Mike.

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.


2002\05\29@100514 by M. Adam Davis

flavicon
face
Serial port communication in VB is almost always done with an activex
control, and that control is usually the MSCOMM control.  IIRC, MSCOMM
control did not come with certian lower version of VB (I belive it has
always been in enterprise and pro, but unsure about standard and
student).  If it is not included in your version then you can get it
wrapped up in someone elses activex control - do a search for it.  If
not then look for other serial port controls.

Once you have that straightened out there are tons of examples for its
use.  My own simple program is here:
http://www.ubasics.com/adam/electronics/ha/software/software.shtml

and a huge resource for any VB fanatic is
http://www.planetsourcecode.com/

Good luck!

-Adam

Salah wrote:

{Quote hidden}

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.


2002\05\29@103226 by tmariner

flavicon
face
Hello Salah,

Virtually every design we have done for the past 15 years has included an RS-232 port and companion Visual Basic program for initial loading, production diagnostics, etc.

I would get any version of VB (although the newest, VB.NET is a bit steeper learning curve) and use a copy of the sample code for Terminal.com (or VBTerm). The ways of including the MSCOMM control on the forms and reacting to the incoming and outgoing messages should become clear.

Other bits of advice:

1. Have a database (probably ACCESS) behind the program. You'll find a million uses for it, both in storing the data and program settings, etc.
2. Leave your communications in ASCII with CR's both ways. That way you can diagnose comms problems before they get to your program.

Tom Mariner

{Original Message removed}

2002\05\29@111202 by Alan B. Pearce

face picon face
>2. Leave your communications in ASCII with CR's
>both ways. That way you can diagnose comms
>problems before they get to your program.

It also means you can use some sort of snooper or even Hyperterminal or
other terminal program to do debugging if you use printable ASCII that makes
(human) sense for the command structure, and Hex or Dec for the values
passed across.

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.


2002\05\29@134920 by Bob Ammerman

picon face
Or, if you have the standard version of VB and thus don't have VB, and if
you are a masochist, then you can do serial comms with the low-level Win32
API, just the way we C++ programmers do ;-)

Bob Ammerman
RAm Systems

{Original Message removed}

2002\05\29@144125 by Peter L. Peres

picon face
On Wed, 29 May 2002, Bob Ammerman wrote:

>Or, if you have the standard version of VB and thus don't have VB, and if
>you are a masochist, then you can do serial comms with the low-level Win32
>API, just the way we C++ programmers do ;-)

No, the masochists use VBComm, normal people use read/write on serial
ports which are like normal DISK FILES on SANE systems so you can read and
write to them like to any file. This even works on MSDOS fyi. Of course
they had to improve things.

Peter

--
http://www.piclist.com hint: The PICList is archived three different
ways.  See http://www.piclist.com/#archives for details.


More... (looser matching)
- Last day of these posts
- In 2002 , 2003 only
- Today
- New search...