Maintenance
-
4g4[l4g4Ap
Servlce
Vot.
1
1320
T1-t1+1
1330
Next
i
13a0
S1:0
1350
Print
1360
Print
1370
Print
1380
For i-1
to 10
1390
Gosub
5000
1400
lf z-0
then
goto
1400
1410
Print
s1;'-
Settings
from
Data
File
";t1
1424
Goto 1440
14i10
Print
s1
;"-........
not
written.
FIL';TI;,.
not
used"
1440
S1-sl+1
1450
T1-t1+1
1460
Next
i
1470
Print
#al:i$
1480
Print
1490
Print
1500
Print
1530
Print
1540
Print
o*r
FINISHED
*rn
1550
Goto 10000
2000
!This
routine
moves
data from
the
spEcrRUM
ANALYZER
to TAPE
2010
Delete
var
i$
2020
Dim
i$
to
700
2030
Print
#at:"SET?"
2040
Input
#al:i$
2050 Dir
2060
Print
2070
Print'WARNING!
This could
overwrite
existing
files!"
2080
Print
'Enter
the Number
of
the last
tape file:
',f
2090
Input
t1
2100
Gosub
9000
2110
Print
2120
Print
2130
Print #a1:"BVtEW
OFF,'
2140
W1:0
2150
For
i-l
to
g
2160
Gosub
3000
2170
Gosub
7000
2180
lf
z-0
then
goto
2210
21
90
Print
wl;':
Waveform
sent
to
File
FlL,,;tl
22A0
Goto2220
2210
Print
wl;":.,......
skipped
over.
FlL";t1;',
is
empty*
2224
Wl:w1f1
2230
T1-tl+1
2240
Next
i
2250
Print
#a1:i$
2260
|
Settings
are
sent
to tape
2270
S1-o
2280 Print
2290
Print
2300 Print
2310
For i-1
to
10
2320
Gosub
4000
2330
lf
z:0
then
goto
2360
2340 Print
sl;"-
Settings
sent
to File FlL,,;tl
2350
Goto 2370
2360
Print
sl
;"-
........
skipped
over.
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
t
e
o
o
a
o
o
o
a
o
o