A.5
SNM15
Dip-Switches setting
Digicom SpA
210 REM 4) Character length. E.g: 7, 8 bits
220 REM 5) Number of stop bits. E.g: 1, 1.5, 2
230 REM 1
2 3 4 5
240 OPEN “com2:1200,e,7,1,rs,cs,ds,cd” AS #1
260 IF EOF(1) THEN 270 ELSE GOSUB 340
270 A$=INKEY$: IF A$=”” THEN GOTO 260
280 IF ASC(A$)=FINE THEN CLOSE: SYSTEM
290 PRINT#1,$;
300 GOTO 260
340 REM I$=INPUT$(LOC(1),#1)
350 REM PRINT I$
360 REM RETURN
370 REM IF ERR=57 AND ERL=240 THEN RESUME NEXT
380 REM IF ERR=57 AND ERL=340 THEN RESUME NEXT