Agilent Technologies E1326B Uživatelský manuál Strana 230

  • Stažení
  • Přidat do mých příruček
  • Tisk
  • Strana
    / 291
  • Tabulka s obsahem
  • KNIHY
  • Hodnocené. / 5. Na základě hodnocení zákazníků
Zobrazit stránku 229
380 !This subprogram calls Read_status to check status bit 1 to determine
390 !when an error code is in the Query Response register.
400 SUB Qry_ready
410 REPEAT
420 CALL Read_status(Status,Rdy,Done,Indardy,Qryrdy,Noerr,Pass_fail)
430 UNTIL Qryrdy
440 SUBEND
450 !
This subprogram calls Read_status to check status bit 6 to determine
460 !if an error has occurred. If there is an error, the code is written to the
470 !Query Response register and then is read from the register.
480 SUB Err_chk(Noerr)
490 COM Base_addr
500 CALL Read_status(Status,Rdy,Done,Indardy,Qryrdy,Noerr,Pass_fail)
510 IF Noerr THEN Ok
520 WRITEIO -16,Base_addr+8;15
530 CALL Qry_ready
540 Errcode=READIO(-16,Base_addr+8)
550 Errcode=BINAND(Errcode,255)
560 PRINT “Error Code:”;Errcode
570 Ok:SUBEND
580 !
This subprogram generates an error by specifying a parameter opcode of 7
590 !for the function parameter. (This is a parameter out of range.)
600 SUB Error_gen
610 COM Base_addr
620 WRITEIO -16,Base_addr+8;4
630 CALL Wait_not_bsy
640 WRITEIO -16,Base_addr+10;7
650 CALL Wait_done
660 CALL Err_chk(Noerr)
670 SUBEND
Appendix C HP E1326B/E1411B Multimeter Register-Based Programming 231
Zobrazit stránku 229
1 2 ... 225 226 227 228 229 230 231 232 233 234 235 ... 290 291

Komentáře k této Příručce

Žádné komentáře