t

O

o

I

o

o

?

o o

c

o o

I

)

o

T

o

t

o a o o o o o e a o o o o e o o

)

t

o o a o o

Ia

perrormancecheck procedure- 4g4A/4g4Apservrcevor. 1

11120REM

 

 

 

 

 

 

 

 

 

 

1 1 1 3 0R E M

 

 

 

 

 

 

 

 

 

 

1I 140REM

 

 

 

 

 

 

 

 

 

 

12OOO

 

ADDRESSED

 

 

 

 

 

REM"

 

 

 

 

 

 

 

 

 

 

 

AS LISTENER,

 

 

 

12010 pRtNT,...49xp ADDRESSEb-

TALKER

 

 

 

"'

 

 

 

 

 

 

 

ndlisreneR...*tr

 

 

 

 

@32+Al:76.zg,se,6s,id,-eJ

 

 

 

I ?9?9I/-BvTE

 

 

 

 

 

 

 

 

12030T6-1

 

 

 

 

 

 

 

 

 

 

12040

 

 

 

 

 

 

 

 

 

 

cosuB 19390

 

 

 

 

 

 

 

 

12050INPUT

 

 

 

 

 

 

 

 

 

@A1:vg

 

 

 

 

 

 

 

 

r_$*gEG(v$,1

 

 

 

 

 

 

 

 

1?ggg

 

6,1

 

 

 

 

 

 

 

 

 

)

 

 

 

 

 

 

 

12070tF T$:"L,'THENi210o

 

 

 

 

 

12080

 

 

 

 

 

 

 

 

 

 

PR]NT"J'"'49XP

 

 

 

Jr'

 

12090

 

 

ADDRESSED

 

 

 

 

 

 

 

AS LISTENER

FAIL"iGS

cO TO 19530

 

 

 

 

 

 

 

 

12100pRtNT"'.*4gxp ADDRESSED

 

 

 

 

 

 

:',tNtr;TM

AS TALKER......_,

 

] ?1I n!]

@A1

 

 

soM;stc;sf

 

 

 

 

 

 

 

 

 

d,wel,r_onooz"

12120INPUT

 

 

 

 

 

 

 

 

 

@A1:V $

 

 

 

 

 

 

 

 

r$-sEG(v$,16,1)

 

 

 

 

 

 

1?139

 

 

 

 

 

 

 

 

 

 

12140tFT$-"T"

 

 

 

 

 

 

 

 

 

 

THENi3ooo

 

 

 

 

 

 

O"'49XP

 

 

 

rA.

 

.irtr

12150PRINT

ADDRESSED

 

12160cO TO19530

 

 

 

ASTALKER

FAIL

 

12170REM

 

 

 

 

 

 

 

 

 

 

12180REM

 

 

 

 

 

 

 

 

 

 

12190REM

 

 

 

 

 

 

 

 

 

 

12200REM

 

 

 

 

 

 

 

 

 

 

't2210

 

 

 

 

 

 

 

 

 

 

FEM

 

 

 

 

 

 

 

 

 

 

13OOOREM*"

 

SERIALPOLL*..

 

 

 

 

 

pRtNT'.".

 

poLL.........spD/spE

 

 

 

13010

 

 

 

 

 

 

 

 

sERtAL

 

 

*rr

 

 

 

13020WBYTEG)95,63,24,64+4l: 13030RBYTER

13040WBYTE@95.25:

13050lFR-0 ORR-l6 THEN.t3080

SERTALPOLL... *..cn

lgggqtltryT'J."FAIL 13070GOTO 19530

13080T6:3

13090cosuB 19390

13100REM

1 3 1 1 0R E M 13120REM 13130REM 13140REM

14OOOREM"'GPIBTNTERFACE PANELSWITCHTEST"' REAR

14010PAGE

14011WBYTE 20. @32+A1, 63:

14020A1*2

14030GOSUB19000

1 4 0 4 0 P R N T0'! _ 0 L 0 ! _ 0 0 0 1 0 " 14050cosuB 19070

14060GOSUB19190

14070PAGE

't4080 A1-a

14090cosuB 19000

1 4 1 0 0 P R N T0" ! _ 0 ! _ o L 0 0 1 0 0 , 14110GOSUB.t9070

14120GOSUB19190 14130PAGE 14140A1:8

141s0cosuB 19000

1 4 1 6 0 P R I N T0" ! _ 0 ! _ o ! _ 0 1 0 0 0 , 14170GOSUB19070

14180GOSUB19190

4-43

I

Page 91
Image 91
Tektronix 494AP service manual A o o