Thanks sayzer...I changed it to a gosub, and it freaked out because when it returns to the loop in still increments scale. So I tried goto calibrated and the LCD at least shows scale=, but it says "scale=r" WTF?

Here's what I've got. BTW, thanks again for all of your help. I'm already miles ahead just from reading your posts.

B0 var byte
scale var byte
LED var PORTB.1
Potpin var PORTB.2

for scale = 1 to 255

LCDout $FE, 1, "calibrating", $FE, $C0, "Scale=", DEC scale, "B0=", DEC B0
pot Potpin, scale, B0
If (B0 > 253) then
goto calibrated
endif
Pause 1000
next scale

Lcdout $FE, 1, "Increase R or C"
stop
calibrated:
lcdout $FE, 1, "Scale=", scale

end