TLS235R Demo Code for BS2

Steve K

I bought a couple of TSL235R and TLS237 but I cannot find any Demo Code for BS2 it seems that Parallax does not supply demo code on the download site and I do not see any in the forums. I don't know where to start.

Ron Czapala

Welcome to the forums!

Here is some code I had for the old TSL230R Light-to-Frequency converter...

' {$STAMP BS2}
' {$PBASIC 2.5}
'-----Define variables, set status of pins-----
x VAR Word
cnt VAR Word
'-----Constant declarations------
S0 PIN 0 'Sensitivity selection pins
S1 PIN 1
In PIN 2 'TSL230R output pin
'-----Program Start-----
LOW S0 'Set sensitivity pins (S0,S1) to x10
HIGH S1
'-----Main program loop-----
FOR x = 1 TO 2000
  COUNT In, 100, cnt 'COUNT on P2 FOR 100 ms, store value in cnt
  DEBUG HOME, DEC5 cnt 'Display value of cnt as a decimal
NEXT
END

Phil Pilgrim (PhiPi)

The some sample code for the TSL230 in this N&V article:

www.parallax.com/Portals/0/Downloads/docs/cols/nv/vol2/col/nv73.pdf

It should also work with the two devices you have.

-Phil

Steve K

Thank you both Ron Cazpala and Phil Pilgrim I had seen code for the TSL230 but because the pin-out was so different (3 pins on the TSL235 / 7 and 8 pins on the TSL230 ) I didn't even try it. But after you suggested that code I just ignored the sensitivity pins and the code works fine.

Both these code snippets work:
They're pretty much the same
Thanks again

' {$STAMP BS2e}
' {$PBASIC 2.5}
'

---

Define variables, set status of pins

---

x VAR Word
cnt VAR Word
'

---

Constant declarations

---

'S0 PIN 0 'Sensitivity selection pins
'S1 PIN 1
In PIN 8 'TSL230R output pin
'

---

Program Start

---

'LOW S0 'Set sensitivity pins (S0,S1) to x10
'HIGH S1
'

---

Main program loop

---

READER:
FOR x = 1 TO 2000
COUNT In, 100, cnt 'COUNT on P2 FOR 100 ms, store value in cnt
DEBUG HOME, DEC5 cnt 'Display value of cnt as a decimal
NEXT
GOTO READER
END

and
' {$STAMP BS2e}
TSL230 CON 8
light VAR Word
LOOP:
COUNT TSL230,100,light
DEBUG HOME,DEC5 light,CR
PAUSE 100
GOTO LOOP