'example Basic Stamp code that reads an FSR using RCTIME

fsr  var   byte
temp  var   word


loop:
        'set the pin (pin 15) high
        high 15

        'wait for it to discharge (counterintuitive, perhaps)
        pause 1

        'measure how long it takes to charge
        rctime 15, 1, fsr

        'print out the value
        debug "val = ", DEC fsr, cr

goto loop