NT20S Bedienershandbuch

Kapitel 6 – Funktionen der Schnittstelle RS–232C
3380 IF TS.B(I*8+J)=1 THEN M=M+2^J
3390 NEXT J
3400 SEND$=SEND$+RIGHT$(”0”+HEX$(M),2)
3410 NEXT I
3420 COLOR 0
3430 RETURN
3440 *ESC.Q ’ . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Display lamps and touch switches (number)
3450 LOCATE 43,0:PRINT ”Display specification”
3460 LOCATE 43,1:PRINT ” 0 : OFF”
3470 LOCATE 43,2:PRINT ” 1 : ON”
3480 LOCATE 43,3:PRINT ” 2 : Inverse flashing (lamps only)”
3490 LOCATE 43,4:PRINT ” 3 : All ON”
3500 *QAGAIN
3510 LOCATE 43,5:INPUT ” : ”,M$
3520 IF M$”0” AND M$”1” AND M$”2” AND M$”3” THEN GOTO *QAGAIN
3530 LOCATE 43,6:INPUT ”Lamp/touch switch number : ”,N
3540 N$=RIGHT$(”00”+HEX$(N),2)
3550 SEND$=SEND$+M$+N$
3560 RETURN
3570 *ESC.R ’ . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Enquire lamp and touch switch status
3580 LOCATE 43,0:INPUT ”Lamp/touch switch number : ”,N
3590 N$=RIGHT$(”00”+HEX$(N),2)
3600 SEND$=SEND$+N$
3610 RETURN
3620 *ESC.U ’ . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Disable inputs
3630 SEND$=SEND$+”0”
3640 RETURN
3650 *ESC.V ’ . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Enables inputs
3660 SEND$=SEND$+”0”
3670 RETURN
3680 *ESC.P ’ . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Display screen
3690 LOCATE 43,0:PRINT ”Controlled item”
3700 LOCATE 43,1:PRINT ” 0 : Display”
3710 LOCATE 43,2:PRINT ” 1 : No display
3720 *PAGAIN
3730 LOCATE 43,3:INPUT ” : ”,M$
3740 IF M$”0” AND M$”1” THEN GOTO *PAGAIN
3750 SEND$=SEND$+M$
3760 RETURN
3770 *ESC.T ’ . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Buzzer control
3780 LOCATE 43,0:PRINT ”Controlled item”
3790 LOCATE 43,1:PRINT ” 0 : Stop buzzer”
3800 LOCATE 43,2:PRINT ” 1 : Continuous buzzer”
3810 LOCATE 43,3:PRINT ” 2 : Intermittent buzzer”
3820 *TAGAIN
3830 LOCATE 43,4:INPUT ” : ”,M$
3840 IF M$”0” AND M$”1” AND M$”2” THEN GOTO *TAGAIN
3850 SEND$=SEND$+M$
176