Kenwood DCS-8200 Instruction Manual page 113

Programmable digital storage oscilloscope
Table of Contents

Advertisement

400
MASKX = &H4800
410
CALL
IBWAIT ( DCSX, MASKX )
420
FOR 1=0 TO 500 : NEXT I
430
I F ( IBSTAX AND &H800 ) <> 0 GOTO 490
440
PRINT "W0UT1,1,1,0,10"
450
GOTO 540
460
'
470
' Rece i ve dev i ce s t a t u s
480
'
490
CALL IBRSP ( DCSX SPRX )
500
PRINT "CS-UNIT STATUS = ";HEX$ ( SPRX )
510
'
520
' End p r o c e s s
530
'
540
CALL IBLOC ( DCSX )
550
END
560
'
570
PRINT "IBFIND ERROR"
580
END
Program example 4
O b j e c t c h a n n e l : C H I
Memory
: A c q u i s i t i o n memory
D a t a f o r m a t
: A S C I I
Memory a d d r e s s : From a d d r e s s number 0
Number o f d a t a : 20 words
The
d a t a r e a d o u t i n t h i s p r o g r a m example i s d i s p l a y e d on t h e CRT s c r e e n .
100
'
110 '
120
' *
130
'*
Computer
:
IBM PC / AT ( R )
't
140
I / F
: N a t i o n a l I n s t r u m e n t s ( R ) GP-IB ( IEEE-488 )
150
'*
160 '
170
'
UP
180
' S e t
190
'
200
CLEAR ,60000! : IBINIT1=60000! : IBINIT2=IBINIT1+3
210
BLOAD "\bib.m", IBINIT1
220
CALL I B I N I T 1 ( IBFIND, IBTRG. IBCLR, IBPCT, I B S I C , IBLOC, IBPPC, IBBNA, IBONL, IBRSC, IBSRE, IBRSV, IBPAD, IBSAD,
I B I S T , IBDMA, I BEOS, IBTMO, IBEOT, IBRDF, IBWRTF, IBTRAP, IBDEV, IBLN )
230
CALL I B I N I T 2 ( IBGTS, IBCAC. IBWAIT, IBPOKE, IBWRT, IBWRTA, IBCMD, IBCMDA, IBRD, IBRDA, IBSTOP, IBRPP, IBRSP,
I BO! AG, IBXTRC, IBRD). IBWRTI, IBRDIA, IBWRT I A, IBSTAX, IBERRX, IBCNTX )
240
'
250
' I n i t i a l i z e
260
'
270
UDNAMES = " d c s "
280
CALL
IBFIND ( UDNAMES, DCSX )
290
I F DCSX < 0 THEN GOTO 600
300
CALL
IBCLR ( DCSX )
310
ON ERROR GOTO 570
320
'
330
VX = 7 : CALL
IBTMO
340
VX = 1 : CALL
IBEOT
ExampIe of reading out the waveform data of the DCS-8200
with the control ler.
nmmtnttntmtnnnnmmn*mnmnnmmnmnn
DCS Remote C o n t r o l
Example Program No.4
nnwnnnmunumttnnmtnntnnmntnmmmnt
( DCSX, VX )
( DCSX, VX )
' Timeout or SRO
' On SRO go t o "Device S t a t u s "
' P r i n t DCS command
' P r i n t DCS-UNIT STATUS
' Send d e v i c e
l o c a l
*
*
*
*
' Send d e v i c e c l e a r
' Time o u t
' End o f s t r i n g w i t h EOI
107

Advertisement

Table of Contents
loading

Table of Contents