![background image](http://html.mh-extra.com/html/omron/nt20/nt20_user-manual_744538259.webp)
238
Key to Programs
Section 6-8
2360 *ESC.H ’
Notify touch switch (number)
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
2370 IF R.CODE$<>”H” THEN GOTO *ESC.J
2380 PRINT ”Pressed touch switch number : ”;VAL(”&H”+MID$(RCV$,3,3))
2390 PRINT:GOTO *RCV.END
2400 *ESC.J ’
Notify touch switch (bit)
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
2410 IF R.CODE$<>”J” THEN GOTO *ESC.S
2420 PRINT ”Pressed touch switch number : ”;
2430 TS=0
2440 FOR I=0 TO 13
2450 S=VAL(”&H”+MID$(RCV$,3+I*2,2))
2460 FOR J=0 TO 7
2470 IF (S MOD 2)=1 THEN PRINT TS;” ”;
2480 S=S¥2:TS=TS+1
2490 NEXT J,I
2500 PRINT:PRINT:GOTO *RCV.END
2510 *ESC.S ’
Notify lamp and touch switch status
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
2520 IF R.CODE$<>”S” THEN GOTO *RCV.ERR
2530 PRINT ”Lamp/touch switch number : ”;VAL(”&H”+MID$(RCV$,4,2))
2540 M=VAL(MID$(RCV$,3,1))
2550 IF M=0 THEN M$=”OFF” ELSE IF M=1 THEN M$=”ON” ELSE M$=”INVERSE”
2560 PRINT ”Display status
: ”;M$
2570 PRINT:GOTO *RCV.END
2580 ’
2590 *RCV.ERR
2600 PRINT ”Receive data error”
2610 PRINT
2620 ’
2630 *RCV.END
2640 RY=CSRLIN
2650 LOCATE SX,SY
2660 *NORCV
2670 RETURN
2680 ’
2690 *ESC.0 ’
Display specified screen
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
2700 LOCATE 43,0:INPUT ”Screen number : ”,M
2710 M$=RIGHT$(”000”+HEX$(M),4)
2720 SEND$=SEND$+M$
2730 RETURN
2740 *ESC.X ’
Screen # enquiry
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
2750 RETURN
2760 *ESC.B ’
Write character screen
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
2770 LOCATE 43,0:INPUT ”Character-screen memory table entry number : ”,M
2780 LOCATE 43,1:PRINT ”Write character string (32 CHARACTERS MAX.) ––>”
2790 LOCATE 43,2:INPUT C$
2800 M$=RIGHT$(”0”+HEX$(M),2)
2810 C$=LEFT$(C$,32):L$=RIGHT$(”0”+HEX$(LEN(C$)),2)
Summary of Contents for NT20
Page 1: ...Programmable Terminal Cat No V091 E1 01 NT20 USER S MANUAL ...
Page 2: ...NT series Programmable Terminal User s Manual Produced March 2007 ...
Page 3: ...iv ...
Page 5: ...vi ...
Page 9: ...x TABLE OF CONTENTS ...
Page 15: ...xvi ...
Page 21: ...xxii EC Directives 6 ...
Page 37: ...16 Before Operating Section 1 6 ...
Page 153: ...132 Transferring the Resource Data Section 3 11 ...
Page 185: ...164 Numeral Setting Section 4 8 ...
Page 267: ...246 Key to Programs Section 6 8 ...
Page 281: ...260 Specifications Appendix A ...
Page 285: ...264 Transporting and Storing PTs Appendix C ...
Page 303: ...282 Function Restrictions Depending on the Support Tool Appendix I ...
Page 307: ...286 Index ...
Page 309: ...288 Revision History ...