QuadTech 1865, Инструкция по эксплуатации, Страница: 69 / 87

Operation Page 69 of 87
FOR i = 1 TO 30000: NEXT i
PRINT #2, "fetc?"
GOSUB cget
s$ = INPUT$(x, #2)
PRINT "res at 100 volts is "; s$;
PRINT #2, "system:lock 0"
END
cget:
' subroutine to get serial input loop
' until first character is received
DO WHILE (LOC(2) = 0)
LOOP
' then get the rest of the string
y = x + LOC(2)
DO WHILE (x <> y)
y = x
FOR j = 1 TO 300: NEXT j
x = LOC(2)
LOOP
RETURN
2.7.7 Results to Printer
The 1865 can be setup to output to an RS-232 or IEEE printer. Results format is the
same as results to floppy, refer to paragraph 2.6.3.6.
RS-232 RS-232 must be selected on I/O Menus and format set IEEE must also
be selected for Talk mode and Disable state.
IEEE IEEE must be selected on I/O Menus and set for Address, Talk mode
and Enable state.