Scope Adjustment Program for TI Graphing Calculators

I wrote this program for use on a TI-83. I'm not sure if it will work as written on newer models. You input the range, the click values for your scope, and how many inches you need to move the impacts, and it spits out the number of clicks. Works good with high quality scopes, but the click values for cheaper scopes don't always turn out to be exactly what the manufacturer says they are.

Notes are in italics, you do not need to program the notes, and you probably couldn't if you tried. "clrhome" commands are optional, but I think it makes a cleaner running program. If you can manage to add to the program so that it rounds the click adjustment number (B, in this program) to a whole number, I'd like to know how you did it.

clrhome
disp "ENTER RANGE"
disp "IN YARDS"
prompt R
clrhome
disp "CLICK VALUE" These lines determine scope adjustments
disp "4 FOR 1/4" Typical hunting/plinking scopes have 1/4 MOA adjustments
disp "8 FOR 1/8" Target scopes have 1/8 MOA adjustments
prompt C
clrhome
disp "ENTER ADJUSTMENT" If you are off to the left (or right, up or down) by three inches, type "3" then "enter"
disp "IN INCHES"
prompt A
clrhome
(100/R)*C*A->B Push "STO" button next to the "1" button to get "->" arrow
disp B
disp "clicks to adjust"
disp A
disp "inches at"
disp R
disp "yards"