Stepping and Scanning 9-13
Programming example
The following program fragment performs a five measurement internal scan. The five
readings are stored in the buffer and displayed on the computer CRT.
CALL SEND(7,“*rst”,status%) 'Restore *RST defaults.
CALL SEND(7,“:samp:coun 5”,status%) 'Set sample count to 5.
CALL SEND(7,“:rout:scan:int:cco 4”,status%) 'Set channel 1 count to 4.
CALL SEND(7,“:rout:scan:lsel int”,status%) 'Enable internal scan.
CALL SEND(7,“:read?”,status%) 'Trigger scan and request
'readings.
reading$ = SPACE$ (80)
CALL ENTER (reading$,length%,7,status%) 'Address 2182 to talk.
PRINT reading$ 'Display the 5 readings on
'the CRT.