Data Sheet

5
'Stretch Sensor Test for Scale
b VAR BYTE
start:
Pot 1, 255, b 'Read RB1 (read scale)
SerOut 0,4, [254,1] 'Clear LCD screen
Pause 2
SerOut 0,4, [" ",#b] 'Send POT value on Pin RB0
Pause 100 'wait .1 second
GoTo start 'do it again
The program above provided a number output of 160, which is
used in the next program to provide the best range of values.
' Stretch Sensor
B VAR BYTE
start:
Pot 1, 160, b 'Read sensor on pin RB1
SerOut 0,4, [254,1] 'Clear LCD screen
Pause 2
SerOut 0,4, [" ",#b] 'Send POT value on Pin RB0
Pause 100 'wait .1 second
GoTo start 'do it again