810 WAIT 7000
820 ENTER 708 ; A ! 265; send resistance raadlng.
830 BEEP 2,200 @ OUTPUT 727 ;-A” ;A; “X”
! 617;send cal value.
840 WAIT 3000
850 NEXT I
860 PRINT ‘OHMS RFiNGES CALIBRATED:”
870 PRINT “20Gohm, ZGohm, 200Mohm, ?BMohm, ZMohm, 200kohm, 20kohm~
880 BEEP @ DISP @ DISP “DO YOU WISH TO PERMbNENTLY STORECAL CONSTflNTS (Y/N)7-
890 INPUT B5
900 CLEAR 0 IF B$=“Y” THEN 940
910 DISP “CAL CONSTANTS NOT STORED.’ 6’ DISP
920 OISP -ALTERED RfiNGES TEMPORARILY CAL- IBRATED.*
930 GOT0 970
940 OUTPUT 727 ;“LlX”
! 617; store cai constants.
350 DISP -IF JUMPER IN ‘ENABLE’ POSITION..”
960 DISP @ DISP -ALL FUNCTIONS/RANGES PERMANENTLYCALIBRATED.’
970 END
617 CALIBRATION PROGRAM (Cont.)
A-16