Frank
             Please add these to my "wish list"

1.  Max & Min

                 if (condition = true) then
                     variableX = variableX+1  max 22
                       variableY = variableY-1 min 3
                         end if
'this would save
                 if (variableX>22)( then
                     variableX=22
                       end if
2.  End if   elseif
     'twould be nice if the assembler knew what I mean't by endif, end
if,else if, and elseif and turned them all into the right spelling.

3.  More than 1 statement on a line
  If (condition = true) then a=b:c=4:e=3:variableX = 6   'etc etc
         end if
x=1:y=2:t=3:h=4

comments?
neil




[Non-text portions of this message have been removed]

I have used successfully crystals in conventional packages, both low profile
and standard, and in SMD format such as SXE.

Regards,

Mike


----- Original Message -----
From: "Tom Becker" <gtbecker@...>
To: <basicx@yahoogroups.com>
Sent: Monday, September 01, 2003 5:04 AM
Subject: RE: [BasicX] bx35 crystal


> > ... crystal [] "Serial" and "20pf"...
>
> Serial or series?  Crystals are used in series or parallel mode; 20pf
> implies parallel mode.
>

I am writing a program at the moment that accepts data in via a
serial port (Com3) and then carries out a manipulation on that data.

My problem is that if no data turns up the program will continue to
loop around indefinately.  I am sure this is a common problem but I
haven't been able to find any examples of this online.

I am guessing that I need to start this task up from another task.
Put it in the background and if it hasn't returned in a certain
period of time kill the task from a task stack.  Problem is I don't
have any idea how to do this.

Any help/code examples would be greatly appreciated.
Thanks in Advance.
Mitch

This waits for 1/4 second.

   Dim timeout     As Single
   Dim data        As Byte

   timeout = Timer + 0.25
   Do
     If Timer > timeout Then
       Exit Do
     End If
     If StatusQueue(InCom_3) Then
       Call GetQueue(InCom_3, data, 1)
     End If
   Loop

On 1 Sep 2003 at 10:19, mknight73 wrote:

> I am writing a program at the moment that accepts data in via a
> serial port (Com3) and then carries out a manipulation on that data.
>
> My problem is that if no data turns up the program will continue to
> loop around indefinately.  I am sure this is a common problem but I
> haven't been able to find any examples of this online.
>
> I am guessing that I need to start this task up from another task. Put
> it in the background and if it hasn't returned in a certain period of
> time kill the task from a task stack.  Problem is I don't have any
> idea how to do this.
>
> Any help/code examples would be greatly appreciated.
> Thanks in Advance.
> Mitch
>
>
> ------------------------ Yahoo! Groups Sponsor
> ---------------------~--> Buy Ink Cartridges or Refill Kits for Your
> HP, Epson, Canon or Lexmark Printer at Myinks.com. Free s/h on orders
> $50 or more to the US & Canada.
> http://www.c1tracking.com/l.asp?cid=5511
> http://us.click.yahoo.com/l.m7sD/LIdGAA/qnsNAA/dN_tlB/TM
> ---------------------------------------------------------------------~
> ->
>
>
>
> Your use of Yahoo! Groups is subject to
> http://docs.yahoo.com/info/terms/
>
>

---
http://www.laser.com/dhouston/

On Sunday, August 31, 2003, at 07:40  PM, Kevin Terry wrote:

> Something like this maybe it would be better to try to
> get the Basicx to do DMX and use a cheap dimmer pack.
> http://www.proformance.net/Catalog/dmx_dimmer_pack_1001876.htm
>

Good idea, but I don't think the BX can handle the serial speed of DMX.
250K is higher than it can do.
--
Tom Igoe

Thanks for the reply!

I meant series... whoops

I have a few of each and wanted to order the correct item.

Bob

----- Original Message -----
From: "Tom Becker" <gtbecker@...>
To: <basicx@yahoogroups.com>
Sent: Sunday, August 31, 2003 8:04 PM
Subject: RE: [BasicX] bx35 crystal


> > ... crystal [] "Serial" and "20pf"...
>
> Serial or series?  Crystals are used in series or parallel mode; 20pf
> implies parallel mode.
>
> The correct part for the BX-24 is a type CA309, 20pf 7.3728MHz cylindrical
> crystal; it's probably safe to assume that the BX-35 can use the same
> crystal.  You can also use electrically-identical crystals in other
> packages.
>
> DigiKey sells several styles; the cylinder is their part #300-5008-ND.
>
>
http://rocky.digikey.com/scripts/ProductInfo.dll?Site=US&V=300&M=CSA309-7.37
> 28MABJ
>
>
>
> Tom Becker
> --... ...--
> GTBecker@... GTBecker@... www.RighTime.com
> The RighTime Clock Company, Inc., Cape Coral, Florida USA
> +1239 540 5700
>
>
>
>
>
>
>
> Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
>
>

Hi airmaled and Trevor,

thanks for your responses. From what you say using WaitForInterrupt
as a task isn't the right approach. Earlier I tried using it
in the Main loop:

    Debug.Print "Measuring... ";
    Call WaitForInterrupt(bxPinRisingEdge)  'Wait for logic one.
    Call PutTime(0,0,0.0)    'clear the RTC
    Call WaitForInterrupt(bxPinFallingEdge) 'Wait for logic zero.
    Call GetTime(bHour, bMin, sngSecond)    'Check the elapsed time.
    Debug.Print "Seconds: " & CStr(sngSecond)

But it didn't work for me either; I'll try it again.

Trevor, thanks for the PWM solution - since I just need a few precise
pulse rates, I should be able to find few rates that will work -
my 250 Hz, 200 and 150 were just goals.

I'm still curious how to get WaitForInterrupt to work - the above code
seems straightforward to me.

--
Best regards,
Patrick Murphy


Saturday, August 30, 2003, 7:16:02 PM, you wrote:

a> Just a guess... I am thinking that you cannot have two active tasks
a> like this expecting two different interrupt states (rising edge from
a> one task, falling edge from another).  The reason behind my guess is
a> that this is a hardware interrupt.  Registers within the Atmel
a> microcontroller are written with values to tell it when to stop
a> currently running software in order to vector to the interrupt
a> handler.  The first task you invoke tells the Atmel chip to wait for
a> a rising edge while the second task over writes the interrupt
a> registers telling the Atmel to wait for falling edge.  I suspect the
a> one printout you get is from the falling edge task as it was the last
a> task to write the interrupt register.  You never would get an
a> interrupt on a rising edge.  The apparent lockup is because tasks are
a> supposed to be within a DO...LOOP, such as

a> Private Sub Wait4High_Task()
a> DO
a> Call WaitForInterrupt(bxPinRisingEdge) 'Monitors Pin 11
a> LOOP
a> End Sub


a> Private Sub Wait4Low_Task()
a> DO
a>  Call WaitForInterrupt(bxPinFallingEdge)'Monitors Pin 11
a> LOOP
a> End Sub

a> This is what keeps tasks constantly running.  Without the DO...LOOP
a> in tasks, it is started with CALLTASK but then only runs one time (in
a> your case).

Hey Guys,

Well, I've got a new problem. It seems my hardware intterupt no longer
works. I just recently switched to a different computer with the latest
compiler and also put my breadboard design to perfboard and everything
works except the interrupt. I've verified that the pin is actually being
pulled low when the switch is pressed and it is. At first I thought
maybe I had a stack overflow, but then I whipped up the code below and
tried it alone and it was still a no-go. Anything wrong with this code?
Am I overlooking something or was there a change in the latest compiler?
The pin is configured as a pull-up.

Thanks,
Cory
----

Option Explicit
Public Const EncoderPin as byte = 11
Dim StackEncoder (0 to 32) as byte
Dim pulsecount as integer

Public Sub Main()
CallTask "EncoderTask", StackEncoder

Do
Debug.print "nothing.."
Call delay(0.3)
Loop

End Sub

'----------
Public Sub EncoderTask()

Do
Call Waitforinterrupt(bxPinRisingEdge)
Call sleep(0.2)

pulsecount=pulsecount+1
Debug.print "pulse= "; cstr(pulsecount)
Call sleep(0.0)
Loop

End Sub

From: Cory Heisterkamp <cory02@...>

>    [...]
> At first I thought maybe I had a stack overflow,
> but then I whipped up the code below and tried
> it alone and it was still a no-go. Anything
> wrong with this code?
>     [...]
> Dim StackEncoder (0 to 32) as byte
>     [...]
> CallTask "EncoderTask", StackEncoder
>     [...]
> Public Sub EncoderTask()
>     [...]
> Debug.print "pulse= "; cstr(pulsecount)

I'd guess you have a stack overflow here. StackEncoder reserves 33
bytes for the task stack, of which 15 is taken up by the task
frame. That leaves only 18 bytes for everything else, and CStr
probably takes up more than that.

-- Frank Manning
-- NetMedia, Inc.

it will do 400K +. Use an RS485 conversion chip, like the MAX485 and your in
business.
   ----- Original Message -----
   From: Tom Igoe
   To: basicx@yahoogroups.com
   Sent: Monday, September 01, 2003 6:57 AM
   Subject: Re: [BasicX] AC Dimmer PLS help.



   On Sunday, August 31, 2003, at 07:40  PM, Kevin Terry wrote:

   > Something like this maybe it would be better to try to
   > get the Basicx to do DMX and use a cheap dimmer pack.
   > http://www.proformance.net/Catalog/dmx_dimmer_pack_1001876.htm
   >

   Good idea, but I don't think the BX can handle the serial speed of DMX.
   250K is higher than it can do.
   --
   Tom Igoe


         Yahoo! Groups Sponsor
               ADVERTISEMENT




   Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.


[Non-text portions of this message have been removed]

Frank, is there a way I can figure how many bytes to allocate to
StackEncoder? I'm a little fuzzy on the memory allocation and I have
over 600 lines of code. Any pointers? -no pun intended : )

Cory


Frank Manning wrote:
>
> From: Cory Heisterkamp <cory02@...>
>
> >    [...]
> > At first I thought maybe I had a stack overflow,
> > but then I whipped up the code below and tried
> > it alone and it was still a no-go. Anything
> > wrong with this code?
> >     [...]
> > Dim StackEncoder (0 to 32) as byte
> >     [...]
> > CallTask "EncoderTask", StackEncoder
> >     [...]
> > Public Sub EncoderTask()
> >     [...]
> > Debug.print "pulse= "; cstr(pulsecount)
>
> I'd guess you have a stack overflow here. StackEncoder reserves 33
> bytes for the task stack, of which 15 is taken up by the task
> frame. That leaves only 18 bytes for everything else, and CStr
> probably takes up more than that.
>
> -- Frank Manning
> -- NetMedia, Inc.

From: Neil Jepsen <njepsen@...>

> Please add these to my "wish list"
>
> 1.  Max & Min
>
>                 if (condition = true) then
>                     variableX = variableX+1  max 22
>                       variableY = variableY-1 min 3
>                         end if
> 'this would save
>                 if (variableX>22)( then
>                     variableX=22
>                       end if

OK, good idea. We could define something like min and max
functions for the system library.

> 2.  End if   elseif
>     'twould be nice if the assembler knew what I mean't
> by endif, end if,else if, and elseif and turned them
> all into the right spelling.

Endif is a tough one, because the compiler would have to know for
sure that your intent is not to call a procedure or function
called "endif". "Else If" is probably easy.

IMHO the challenge with allowing the compiler to automatically
modify source code is to do it in such a way as not to drive the
user crazy. VB6 drives me crazy when it does stuff like that.

> 3.  More than 1 statement on a line
>  If (condition = true) then a=b:c=4:e=3:variableX = 6   'etc etc
>         end if
> x=1:y=2:t=3:h=4

Good idea. I'll put that on the to-do list.

-- Frank Manning
-- NetMedia, Inc.

Great Frank.Thanks.  The max and min  is something that would be very
useful for me.  The end if and elseif  is not important. It just catches
me out sometimes because I forget which has the space and which does
not. No big deal.
The multiple statements might make the code a little shorter and maybe
more readible?
neil

Frank Manning wrote:

>  From: Neil Jepsen <njepsen@...>
>
> > Please add these to my "wish list"
> >
> > 1.  Max & Min
> >
> >                 if (condition = true) then
> >                     variableX = variableX+1  max 22
> >                       variableY = variableY-1 min 3
> >                         end if
> > 'this would save
> >                 if (variableX>22)( then
> >                     variableX=22
> >                       end if
>
> OK, good idea. We could define something like min and max
> functions for the system library.
>
> > 2.  End if   elseif
> >     'twould be nice if the assembler knew what I mean't
> > by endif, end if,else if, and elseif and turned them
> > all into the right spelling.
>
> Endif is a tough one, because the compiler would have to know for
> sure that your intent is not to call a procedure or function
> called "endif". "Else If" is probably easy.
>
> IMHO the challenge with allowing the compiler to automatically
> modify source code is to do it in such a way as not to drive the
> user crazy. VB6 drives me crazy when it does stuff like that.
>
> > 3.  More than 1 statement on a line
> >  If (condition = true) then a=b:c=4:e=3:variableX = 6   'etc etc
> >         end if
> > x=1:y=2:t=3:h=4
>
> Good idea. I'll put that on the to-do list.
>
> -- Frank Manning
> -- NetMedia, Inc.
>
>
>                    Yahoo! Groups Sponsor
                         ADVERTISEMENT
                          [click here]

>
> Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.


[Non-text portions of this message have been removed]

From: Cory Heisterkamp <cory02@...>

> Frank, is there a way I can figure how many bytes
> to allocate to StackEncoder? I'm a little fuzzy
> on the memory allocation and I have over 600
> lines of code.

There's a section in the OS reference manual on measuring a task's
stack usage. Also check out message 13718 (28 May 2003) which has
an example of how to display the amount of stack space being taken
up by a couple of tasks.

-- Frank Manning
-- NetMedia, Inc.

Kiko,

Are you trying to tie this to an existing control system?

How will the BX-24 get input to know what level of output you need?

How many dimmers circuits do you want to drive from one CPU?

I can supply a zero crossing detector circuit that will put out a pulse very
near zero crossing.  I wouldn't waste CPU time detecting zero crossing from an
analog input.  But, then what is the CPU to do except wait until Zero Crossing
to then wait a certain period of time then pulse a digital output?

18 years ago I built hardware (op-amps & comparators) based dimmers that used
D/A converters to drive the dimmer circuit.  That's pretty easy and cheap.  But
-- not near as cool as digital control.  I've been thinking about tackling a
similar project for my ultra cheap church.

Do you already know how to translate from 5 volt logic to 120 or 220 VAC high
power switching?
That's easy but not necessarily cheap.

Paul Little
in Texas


   ----- Original Message -----
   From: Kiko Lobo
   To: basicx@yahoogroups.com
   Sent: Sunday, August 31, 2003 7:49 AM
   Subject: [BasicX] AC Dimmer PLS help.


   I am trying to figure out a way to efficiently dim high wattage
   circuits in AC for theater lighting from basicX.


[Non-text portions of this message have been removed]

Frank,

I finally got the Atmel AT25HP512 64k EEPROM from Digikey and modified my BX24
to use the extra memory. I added the DIP version, since I'm still waiting for
the LDAP package. I've uploaded a photo to show how I attached the DIP 64k
EEPROM.
It's in  the photo section of the files area called  bx24 + 64k eeprom.

The memory seems to works fine. I'm already becoming verbose with my code with
so much extra memory available!

thanks to Netmedia for adding this option in the latest release, any word on
when the production 64k version of the BX24 will be available.

thanks
Ronald



---------------------------------
Do you Yahoo!?
Yahoo! SiteBuilder - Free, easy-to-use web site design software

[Non-text portions of this message have been removed]

> ... already becoming verbose...

Oh, oh; code bloat ahead!

Remember, Bill Gates said that no one would ever need more than 640K, then
somebody gave him 2MB of RAM and a 5MB drive;  he got lazy and we got
"features".  Watch out, you don't want to end up like him, do you?


Tom Becker
--... ...--
GTBecker@... GTBecker@... www.RighTime.com
The RighTime Clock Company, Inc., Cape Coral, Florida USA
+1239 540 5700

Well, looks like it's not a stack overflow but some sort of problem with
the bx-24. Pin 11 is unresponsive to any input. Very strange as
everything else works just fine. I'm not sure when or how it could have
been damaged but I guess I'm SOL.

Cory

Frank Manning wrote:
>
> From: Cory Heisterkamp <cory02@...>
>
> >    [...]
> > At first I thought maybe I had a stack overflow,
> > but then I whipped up the code below and tried
> > it alone and it was still a no-go. Anything
> > wrong with this code?
> >     [...]
> > Dim StackEncoder (0 to 32) as byte
> >     [...]
> > CallTask "EncoderTask", StackEncoder
> >     [...]
> > Public Sub EncoderTask()
> >     [...]
> > Debug.print "pulse= "; cstr(pulsecount)
>
> I'd guess you have a stack overflow here. StackEncoder reserves 33
> bytes for the task stack, of which 15 is taken up by the task
> frame. That leaves only 18 bytes for everything else, and CStr
> probably takes up more than that.
>
> -- Frank Manning
> -- NetMedia, Inc.

From: Dave Houston <dhouston1@...>

> This waits for 1/4 second.
>
>   Dim timeout     As Single
>   Dim data        As Byte
>
>   timeout = Timer + 0.25
>   Do
>     If Timer > timeout Then
>       Exit Do
>     End If
>     If StatusQueue(InCom_3) Then
>       Call GetQueue(InCom_3, data, 1)
>     End If
>   Loop

Or you can use the new timeout version of GetQueue, which was
added to the system library at Dave's request. Code would look
something like this:

     Const Timeout As Single = 0.25
     Dim Data As Byte
     Dim TimedOut As Boolean
     Call GetQueue(InCom_3, Data, 1, Timeout, TimedOut)
     If (TimedOut) Then
         '[...]
     End If

-- Frank Manning
-- NetMedia, Inc.

Hi,
     I would like to monitor two pulse train signals, but there is only
one pin 11 which I can use with WaitForInterrupt.  Is there a way to
monitor two pulse train signals without suspending the processor?
Thanks very much!

                                                           joeo

From: Joseph Obernberger <joelori@...>

> I would like to monitor two pulse train signals, but
> there is only one pin 11 which I can use with
> WaitForInterrupt.  Is there a way to monitor two
> pulse train signals without suspending the processor?

I haven't tried it, but there may be a way to use pin 12 with
Timer1, in addition to WaitForInterrupt. Check out
Edge_Capture_App_Note.pdf in the BasicX distribution.

-- Frank Manning
-- NetMedia, Inc.

On 3 Sep 2003 at 16:07, Frank Manning wrote:

> From: Joseph Obernberger <joelori@...>
>
> > I would like to monitor two pulse train signals, but
> > there is only one pin 11 which I can use with
> > WaitForInterrupt.  Is there a way to monitor two
> > pulse train signals without suspending the processor?
>
> I haven't tried it, but there may be a way to use pin 12 with
> Timer1, in addition to WaitForInterrupt. Check out
> Edge_Capture_App_Note.pdf in the BasicX distribution.

I have tried it. There's a lot more overhead than with p11 and the
time reported between rising edges is not very consistent. It does
work as long as the time between edges is on the order of 1mS.

Of course, it could also be that my code could use some tweaking.

     For n = 0 To 32
       Register.TCCR1A = 0
       Register.TCCR1B = 0
       Register.TCNT1H = 0
       Register.TCNT1L = 0
       Register.TIFR = ICF1
       Register.TIFR = TOV1
       Register.TCCR1B = ICES1                 'rising edge
       Register.TCCR1B = Register.TCCR1B + 2   '1.085uS per count
       Do
         TIFRcopy = Register.TIFR
       Loop Until ((TIFRcopy And ICF1) = ICF1)
       LoByte = Register.ICR1L
       HiByte = Register.ICR1H
       PulseTrain(n) = CInt(HiByte) * 256 + CInt(LoByte)
     Next---
http://www.laser.com/dhouston/

Thanks Frank,
     Unfortunately, the program uses COM1 and COM3 for datalogging and
for a serial display.  Is there any hardware solution?
Thanks for any ideas!!
                                                        joeo

Frank Manning wrote:

>From: Joseph Obernberger <joelori@...>
>
>
>
>>I would like to monitor two pulse train signals, but
>>there is only one pin 11 which I can use with
>>WaitForInterrupt.  Is there a way to monitor two
>>pulse train signals without suspending the processor?
>>
>>
>
>I haven't tried it, but there may be a way to use pin 12 with
>Timer1, in addition to WaitForInterrupt. Check out
>Edge_Capture_App_Note.pdf in the BasicX distribution.
>
>-- Frank Manning
>-- NetMedia, Inc.
>
>
>
>
>
>Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
>
>
>
>
>

From: Joseph Obernberger <joelori@...>

> Frank Manning wrote:
>
>> I haven't tried it, but there may be a way to use pin 12
>> with Timer1, in addition to WaitForInterrupt. Check out
>> Edge_Capture_App_Note.pdf in the BasicX distribution.
>
> Unfortunately, the program uses COM1 and COM3 for
> datalogging and for a serial display.  [...]

This should be OK. Timer1 doesn't confict with the serial ports --
the edge capture app note is incorrect about conflicts with Timer1
and Com3.

Actually Com3 uses Timer2, not Timer1.

-- Frank Manning
-- NetMedia, Inc.

Ronald,

Care to help some of us lurkers by sharing a code snippet or two of
your implementation of the 64K eeprom?

TIA,
Paul Dubinsky

I picked up some small LED Clusters that run off of 12vdc.  The pdf file is
at http://www.deathappeal.com/ledcluster.pdf  but I copied the contents at
the end of this message.

I would like to use my BasicX to fade and blink these clusters.  I have a
12v source already so it's just a matter of figuring how to hook them up and
control them.  I used PWM to dim a normal LED but not something like this.
Any suggestions would be appreciated?

TIA
David

-----[PDF contents]--------
You must use current limiting resistors on the LEDs.
The red LEDs (red wire) 30 mA. Absolute maximum ratings.
The green LEDs (green wire) 60 mA. Absolute maximum ratings.
White wire + voltage.
Green wire 60-70 ohm 2watt resistor to negative.
Red wire 80-100 ohm 2 watt resistor to negative.
The red LEDs are wired in series.
The green LEDs are 2 banks of 5 wired in parallel.
Some resistor experimentation may be done for
optimum performance, not to exceed the absolute
maximum ratings above.

Hello David

Where did you get the LED Clusters???
Do you have any more specs???
I am looking for some ultra bright Red LED Modules with a very wide beam.
One spec I saw was 130 degree beam width.

Thanks...
Ted

----- Original Message -----
From: "David E. Basile" <dbasile@...>
To: <basicx@yahoogroups.com>
Sent: Friday, September 05, 2003 5:29 AM
Subject: [BasicX] 12v LED Cluster


> I picked up some small LED Clusters that run off of 12vdc.  The pdf file
is
> at http://www.deathappeal.com/ledcluster.pdf  but I copied the contents at
> the end of this message.
>
> I would like to use my BasicX to fade and blink these clusters.  I have a
> 12v source already so it's just a matter of figuring how to hook them up
and
> control them.  I used PWM to dim a normal LED but not something like this.
> Any suggestions would be appreciated?
>
> TIA
> David
>
> -----[PDF contents]--------
> You must use current limiting resistors on the LEDs.
> The red LEDs (red wire) 30 mA. Absolute maximum ratings.
> The green LEDs (green wire) 60 mA. Absolute maximum ratings.
> White wire + voltage.
> Green wire 60-70 ohm 2watt resistor to negative.
> Red wire 80-100 ohm 2 watt resistor to negative.
> The red LEDs are wired in series.
> The green LEDs are 2 banks of 5 wired in parallel.
> Some resistor experimentation may be done for
> optimum performance, not to exceed the absolute
> maximum ratings above.
>
>
>
>
>
> Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
>
>

Ted,

I got these off ebay.  I'm not doing anything hitech with them and planned
on using them for a animatronic head in place of the eyes.

The guy has them all the time for $3.99 and has some listed now
http://cgi.ebay.com/ws/eBayISAPI.dll?ViewItem&item=2555649504&category=7287.
The pdf listed shows some of the tech info but from his auction listing he
has this info listed below.  If you do get some and have a way to hook them
up please let me know (novice and old guy here).  Thanks.

David

---[Ebay listing]----

These LED modules were used in the manufacturing of highway signs. You know
they have to be bright, so on-coming traffic can see them in bright
sun-light. We bought the signs (288 modules per sign) and removed the water
tight modules. The module is 1" in diameter and measures 1 1/4" measuring
the main body and 1 1/2" if you measure from the extended visor. They come
with 6 T1-3/4 red high brightness and 10 T1-3/4 yellow green high brightness
LEDs in a cluster. The red and the green LEDs can be powered separately. The
clusters run off of 12 to 15 volts and draw 90mA if both sets of LEDs are
hooked up. Easily mountable with an M3.0x8.0 screw. The Luminous intensity
is 7700 mcd and I guarantee you can see the cluster from 2 blocks away

----- Original Message -----
From: "Ted Maczulat" <tmaczulat@...>
To: <basicx@yahoogroups.com>; <dbasile@...>
Sent: Friday, September 05, 2003 10:36 AM
Subject: Re: [BasicX] 12v LED Cluster


> Hello David
>
> Where did you get the LED Clusters???
> Do you have any more specs???
> I am looking for some ultra bright Red LED Modules with a very wide beam.
> One spec I saw was 130 degree beam width.
>
> Thanks...
> Ted
>
> ----- Original Message -----
> From: "David E. Basile" <dbasile@...>
> To: <basicx@yahoogroups.com>
> Sent: Friday, September 05, 2003 5:29 AM
> Subject: [BasicX] 12v LED Cluster
>
>
> > I picked up some small LED Clusters that run off of 12vdc.  The pdf file
> is
> > at http://www.deathappeal.com/ledcluster.pdf  but I copied the contents
at
> > the end of this message.
> >
> > I would like to use my BasicX to fade and blink these clusters.  I have
a
> > 12v source already so it's just a matter of figuring how to hook them up
> and
> > control them.  I used PWM to dim a normal LED but not something like
this.
> > Any suggestions would be appreciated?
> >
> > TIA
> > David
> >
> > -----[PDF contents]--------
> > You must use current limiting resistors on the LEDs.
> > The red LEDs (red wire) 30 mA. Absolute maximum ratings.
> > The green LEDs (green wire) 60 mA. Absolute maximum ratings.
> > White wire + voltage.
> > Green wire 60-70 ohm 2watt resistor to negative.
> > Red wire 80-100 ohm 2 watt resistor to negative.
> > The red LEDs are wired in series.
> > The green LEDs are 2 banks of 5 wired in parallel.
> > Some resistor experimentation may be done for
> > optimum performance, not to exceed the absolute
> > maximum ratings above.
> >
> >
> >
> >
> >
> > Your use of Yahoo! Groups is subject to
http://docs.yahoo.com/info/terms/
> >
> >
>
>
>
>
>
> Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
>
>

Hi David!

You should be able to control them pretty easily using a few resistors and a
transistor. Basically, you use the transistor as a switch to connect the LED
to ground.

Connect a resistor, maybe 5k-10k, between a pin on the BX24 and the base of
the transistor. Connect the current limiting resistor between the collector
and the lead fom the LED cluster thats supposed to connect to ground. Then
connect the transistor's emitter to ground. (forgive me if I got the
collector and emitter backwards - I'm a computer guy)

You'll need to find an NPN transistor rated at least twice as high as the
current in the specs. In some catalogs, the spec is called "I ce". I've used
a 3909 from Radio Shack (comes in a pack of ten) for similar loads, but you
may have to connect two in parrallel to handle the load -- sorry, I don't
have the specs handy. They're cheap, and I try to keep some handy on my
workbench.

Good luck!

Sloan

----- Original Message -----
From: "David E. Basile" <dbasile@...>
To: <basicx@yahoogroups.com>
Sent: Friday, September 05, 2003 8:29 AM
Subject: [BasicX] 12v LED Cluster


> I picked up some small LED Clusters that run off of 12vdc.  The pdf file
is
> at http://www.deathappeal.com/ledcluster.pdf  but I copied the contents at
> the end of this message.
>
> I would like to use my BasicX to fade and blink these clusters.  I have a
> 12v source already so it's just a matter of figuring how to hook them up
and
> control them.  I used PWM to dim a normal LED but not something like this.
> Any suggestions would be appreciated?
>
> TIA
> David
>
> -----[PDF contents]--------
> You must use current limiting resistors on the LEDs.
> The red LEDs (red wire) 30 mA. Absolute maximum ratings.
> The green LEDs (green wire) 60 mA. Absolute maximum ratings.
> White wire + voltage.
> Green wire 60-70 ohm 2watt resistor to negative.
> Red wire 80-100 ohm 2 watt resistor to negative.
> The red LEDs are wired in series.
> The green LEDs are 2 banks of 5 wired in parallel.
> Some resistor experimentation may be done for
> optimum performance, not to exceed the absolute
> maximum ratings above.
>
>
>
>
>
> Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
>
>
>

Sloan,

Novice speaking... According to some of the specs I found on the 3909 it
will handle (P-FET 20V 10MA 0.3W) so if the max rating of the red leds is
30ma and max for the green is 60ma I would still need a transistor that
would handle that correct.  Even if the 3909 in parrallel would not be
enough.. correct?

Again, I'm assuming but I would need a transistor that would handle at least
120ma. (2 x the max current draw).  Is my assumption right?

Thanks.
David
----- Original Message -----
From: "Sloan Thrasher" <sloan@...>
To: <basicx@yahoogroups.com>
Sent: Friday, September 05, 2003 11:16 AM
Subject: Re: [BasicX] 12v LED Cluster


> Hi David!
>
> You should be able to control them pretty easily using a few resistors and
a
> transistor. Basically, you use the transistor as a switch to connect the
LED
> to ground.
>
> Connect a resistor, maybe 5k-10k, between a pin on the BX24 and the base
of
> the transistor. Connect the current limiting resistor between the
collector
> and the lead fom the LED cluster thats supposed to connect to ground. Then
> connect the transistor's emitter to ground. (forgive me if I got the
> collector and emitter backwards - I'm a computer guy)
>
> You'll need to find an NPN transistor rated at least twice as high as the
> current in the specs. In some catalogs, the spec is called "I ce". I've
used
> a 3909 from Radio Shack (comes in a pack of ten) for similar loads, but
you
> may have to connect two in parrallel to handle the load -- sorry, I don't
> have the specs handy. They're cheap, and I try to keep some handy on my
> workbench.
>
> Good luck!
>
> Sloan
>
> ----- Original Message -----
> From: "David E. Basile" <dbasile@...>
> To: <basicx@yahoogroups.com>
> Sent: Friday, September 05, 2003 8:29 AM
> Subject: [BasicX] 12v LED Cluster
>
>
> > I picked up some small LED Clusters that run off of 12vdc.  The pdf file
> is
> > at http://www.deathappeal.com/ledcluster.pdf  but I copied the contents
at
> > the end of this message.
> >
> > I would like to use my BasicX to fade and blink these clusters.  I have
a
> > 12v source already so it's just a matter of figuring how to hook them up
> and
> > control them.  I used PWM to dim a normal LED but not something like
this.
> > Any suggestions would be appreciated?
> >
> > TIA
> > David
> >
> > -----[PDF contents]--------
> > You must use current limiting resistors on the LEDs.
> > The red LEDs (red wire) 30 mA. Absolute maximum ratings.
> > The green LEDs (green wire) 60 mA. Absolute maximum ratings.
> > White wire + voltage.
> > Green wire 60-70 ohm 2watt resistor to negative.
> > Red wire 80-100 ohm 2 watt resistor to negative.
> > The red LEDs are wired in series.
> > The green LEDs are 2 banks of 5 wired in parallel.
> > Some resistor experimentation may be done for
> > optimum performance, not to exceed the absolute
> > maximum ratings above.
> >
> >
> >
> >
> >
> > Your use of Yahoo! Groups is subject to
http://docs.yahoo.com/info/terms/
> >
> >
> >
>
>
>
>
>
> Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
>
>