When the
Coding for
20 GOSUB 100
100 O=INP(&H379) :IF 0<128 THEN 100
110 OUT &H378,1 : OUT &H37A, 5 :OUT &H37A,4
120 RETURN
Coding for
20 GOSUB 100
100 O=INP(&H3BD) :IF 0<128 THEN 100
110 OUT &H3BC,I :OUT &H3BE,5 :OUT &H3BE,4
120 RETURN
L
b
c
27
When the
Coding for
20 GOSUB 100
100 O=INP(&H379) :IF 0<128 THEN 100
110 OUT &H378,1 : OUT &H37A, 5 :OUT &H37A,4
Coding for
20 GOSUB 100
100 O=INP(&H3BD) :IF 0<128 THEN 100
110 OUT &H3BC,I :OUT &H3BE,5 :OUT &H3BE,4
120 RETURN
L
b
c
27