doh! Thanks. Works great! Here's my final code for others to use as reference.
B0 var byte
scale var byte
LED var PORTB.1
Potpin var PORTB.2
for scale = 1 to 255
LCDout $FE, 1, "Wait for Calibration", $FE, $C0, "Current Scale=", DEC scale
pot Potpin, scale, B0
If (B0 > 253) then
goto calibrated
endif
next scale
Lcdout $FE, 1, "Increase R or C"
stop
calibrated:
lcdout $FE, 1, "Use Scale=", DEC scale, $FE, $C0, "Have a nice day"
high led
end
Bookmarks