Performance
Check
procedure
_
4g4Ll4g4Ap
Service
Vol.
1
14190
PAGE
14200
A1-16
14210
GOSUB
19000
14220PR|NT"
0
L0l0
l_1o0oo.
14230
GOSUB
19070
14240
GOSUB
19190
14250
REM
14260
REM
14270
REM
14280
REM
14290
REM
15000
REM
.,
nLFr
oR
,EOl.
swlTcH
.,"
15010
PAGE
15020
41:1
15030
cosuB
19000
15040PR|NT.
0 to
L
1
!_0OOO1"
1s050
GosuB
19070
15060
PRINT
"JJTESTTNG
"EOt''SwtTcH"
15070
cosuB
19190
1
5080 WBYTE
@32+A1
:73,68,63,1
0
15090INPUT
@A1:T$
1
51 00 r$-sEG
cr$,1
,9)
15110lF
T$-"lD
TEK/49,
THEN
15140
1
51 20 PRINT
U*LF"
.OR'
uEOl"'swlTcH
15130
GO
TO
19530
1
51
40
T6-2
15150
GOSUB
19390
15160
REM
15170
REM
15180
REM
15190
REM
15200
REM
16000
REM
'"
TALK
ONLY
MODE
""
16010
PAGE
16020
cosuB
19000
16030PR|NT"
0
!_
1
!_0
!_oooo1'
16040
cosuB
19070
16050
PRTNT
!{JTEST|NG
TALK
ONLY"
16060INPUT
@A1:V$
16070
I7-POS (V$,"rrNe
oFF",l)
160801F
t7<>0
THEN
17000
16090
PRINT
''JJJTALK
ONLY
MODE
O"
FAIL
rr'GT
16100
co To
19530
16110
REM
16120
REM
16130
REM
16140
REM
16150
REM
17OOO
REM
'"
LISTEN
ONLY
MODE
"'
17010
PAGE
17020
GOSUB
19000
17030PR|NT'
1!_
0!_
0
!_00001"
17040
cosuB
19070
17050
pRtNT
"JJJTESTTNG
LISTEN
ONLY"
17060
PRINT
@A1:"tNt',
17070
T6-0.5
17080
GOSUB
19390
1 7090
WBYTE
92,69,70,32,_48
17100
PAGE
17110
GOSUB
19000
4-44
o
O
o
t
o
o
o
o
c
c
o
t
?
o
o
I
o
t
I
I
o
o
o
o
I
o
o
o
o
I
o
a
o
o
a
o
o
a
I
o
o
o
,
O