430 CALL IBRD (CNT%, MSG$)
440 PRINT “MINIMUM =”; LEFT$(MSG$, IBCNT%)
450 ‘
460 ‘ —— Mean ——
470 WRT$ = “:CALC:AVER:TYPE MEAN; :CALC:IMM?”
480 CALL IBWRT (CNT%, WRT$)
490 MSG$ = SPACE$(255)
500 CALL IBRD (CNT%, MSG$)
510 PRINT “MEAN =”; LEFT$(MSG$, IBCNT%)
520 ‘
530 ‘ —— Standard deviation ——
540 WRT$ = “:CALC:AVER:TYPE SDEV; :CALC:IMM?”
550 CALL IBWRT (CNT%, WRT$)
560 MSG$ = SPACE$(255)
570 CALL IBRD (CNT%, MSG$)
580 PRINT “STANDARD DEVIATION =”; LEFT$(MSG$, IBCNT%)
590 END
Programming Examples
4-12 GW-Basic for National Instruments PC-IIA, Setting Up the Interface
