Maintenance-

4g4[l4g4Ap ServlceVot.1

1320 T1-t1+1

1330

Nexti

 

13a0 S1:0

 

1350 Print

 

1360 Print

 

1370 Print

 

1380 Fori-1 to 10

1390

Gosub5000

1400

lf z-0 then goto 1400

1410

Prints1;'-Settingsfrom DataFile";t1

1424

Goto1440

14i10 Prints1;"-........ notwritten.FIL';TI;,.

1440

 

not used"

S1-sl+1

1450

T1-t1+1

1460

Nexti

 

1470 Print#al:i$

1480 Print

 

1490 Print

 

1500 Print

 

1530 Printo*r

*rn

1540 Print

FINISHED

1550 Goto10000

2000 !This routinemovesdatafromthe spEcrRUM ANALYZERto TAPE

2010 Deletevar i$

 

 

2020 Dimi$ to 700

 

 

2030 Print#at:"SET?"

 

 

2040 Input#al:i$

 

 

2050 Dir

 

 

 

2060 Print

 

 

 

2070 Print'WARNING!

 

 

 

 

Thiscouldoverwrite

2080

'Enter

 

existingfiles!"

Print

the Numberof the lasttapefile:',f

2090 Inputt1

 

 

 

2100 Gosub9000

 

 

2110 Print

 

 

 

2120 Print

 

 

 

2130 Print#a1:"BVtEW

 

2140 W1:0

 

OFF,'

 

 

 

 

2150 Fori-l to g

 

 

 

2160

Gosub3000

 

 

2170

Gosub7000

 

 

2180

lf z-0 thengoto2210

 

2190 Printwl;': Waveformsentto FileFlL,,;tl

22A0

Goto2220

 

 

2210 Printwl;":.,...... skippedover.FlL";t1;',is empty*

2224

Wl:w1f1

 

 

 

2230

T1-tl+1

 

 

 

2240

Next i

 

 

 

2250 Print#a1:i$

 

 

2260 Settingsare sentto tape

 

2270 S1-o

 

 

 

2280 Print

 

 

 

2290 Print

 

 

 

2300 Print

 

 

 

2310 Fori-1 to 10

 

 

2320

Gosub4000

 

 

2330 lf z:0 thengoto 2360

 

2340 Printsl;"- Settingssentto FileFlL,,;tl

2350

Goto2370

 

 

2360

Printsl ;"-

........skippedover.FlL";t1

 

 

 

 

;,'is empty.,'

6-64

 

 

 

 

o o e o

o a

o o o o o a

t

a

o

I

o o a

O

a o a o o o

I

o

t

a

t

o o

te

o o a o o o a o o

Page 188
Image 188
Tektronix 494AP service manual O o o a, E o, A o o o A o o o a o o, Finished