Tektronix DM 5010, Инструкция по эксплуатации

Страница: 116 / 347

DM 5010 Instrument Interfacing Guide
4041:
100
110
120
130
140
150
160
170
180
190
200
210
220
230
240
250
260
270
280
290
300
310
320
330
340
350
360
370
380
390
400
410
420
430
440
450
460
470
480
490
500
510
520
530
540
550
560
570
580
590
600
610
620
630
640
650
660
670
680
690
700
710
720
• • ’
‘ !...............
..........................
vn ntAbUhtHtN I rnUlihR"
............................
I Ba Jim Kimball/ GPI Marketing, 9/24/82, revised 11/18/82
i
! Copyright (c) 1982, Tektronix, Inc. Ail rights reserved. This
! software is provided on an "as is" basis without warranty of any
! kind. It is not supported.
i
I This software may be reproduced without prior permission, in whole or
! in
part. Copies must include the above copyright and warranty notice.
!
I REQUIRED EQUIPMENT:
! DM 5010 in TM 5000 mainframe.
! Program assumes no other instruments on
the GPIB.
! 4041 (VI.1) — console may be either front panel or terminal (comm:).
! PURPOSE:
! Inputs four readings, using four different DM 5010 acquisition modes.
! Prints readings on 4041 printer.
t
! OPERATING PROCEDURE:
! Connect 4041 and TM 5000 mainframe with GPIB cable.
! DM 5010 must be set for primary address of 16 or change line Addr_set
! Enter and type run (no other program segment required) contains main program)
! Console may be either "FRTP:" or "COMM:"
i
I PROGRAM LABELS:
I
I Initset: prepares DM 5010 for measurement and queries id
> Runmode: reads whatever measurement is available
f Trigread: triggers a reading with the INPUT statement
! Dtread: reads on GET trigger in device trigger mode
! Average: gets average of 20 DM 5010 readings using SEND
! PoI I dm: general purpose srq handler
i
In i t var a I I
Print "'■'GDM 5010 making measurements."
Addr set: dmm=16 ! This is factory-set primary address
Open ♦lOl:
"
pt
in :" I Open LU for 4041 printer
Lons measure ! Long floating point handles l.E+99 if DMM overranges
Integer dmm,status,address
On srq then gosub polldm 1 Links srq handler
Enable srq ! Enables srq interrupt
t
In i tset:
Input
Print
!
Runmode :
Input
Print
)
Tr i gread:
Input
Print
i
Expand to cover measurement needs
Query DM id
Print
response on 4041 printer
print ♦dmm:"mode run"
♦dmm:measure I
♦ 101: "Cent i nuous Mode", measure
Get whatever
print ♦dmm:"mode trig"
♦ dmm:measure * INPUT statement talks
♦101: “ Triggered Mode" ,measure
reading is available
DMM, triggers reading
i
!
Dtread: print ♦dmm:"dt trig"
Na i t 0.4 I
Mbyte get(dmm) ,atn(unI) !
Input ♦dmmimeasure !
Let DM set
up
for GET
Send GET to DM 5010 to start reading
Gets reading as soon as ready