Sample 10: Digital Output Control
This program can be used to control the state of each digital output.
#include "CT18XX"
Dim TX1 As Integer
Dim TY1 As Integer
Dim Ixx As Integer
Basic_FORM1
Byteout 4,0
Byteout 5,0
Byteout 6,0
On Pad Gosub TouchOccur
Do
Loop
TouchOccur:
TX1 = Sys(10)
TY1 = Sys(11)
Ct18beep 10
If Menucheck(0,TX1,TY1) = 1 Then
Menureverse2 0,1
Reverse 32
Elseif Menucheck(1,TX1,TY1) = 1 Then
Menureverse2 1,1
Reverse 33
Elseif Menucheck(2,TX1,TY1) = 1 Then
Menureverse2 2,1
Reverse 34
Elseif Menucheck(3,TX1,TY1) = 1 Then
Menureverse2 3,1
Reverse 35
Elseif Menucheck(4,TX1,TY1) = 1 Then
Menureverse2 4,1
Reverse 40
Elseif Menucheck(5,TX1,TY1) = 1 Then
Menureverse2 5,1
Reverse 41
Elseif Menucheck(6,TX1,TY1) = 1 Then
Menureverse2 6,1
Reverse 42
Elseif Menucheck(7,TX1,TY1) = 1 Then
Menureverse2 7,1
Reverse 43
Elseif Menucheck(8,TX1,TY1) = 1 Then
Menureverse2 8,1
Reverse 44
Elseif Menucheck(9,TX1,TY1) = 1 Then
Menureverse2 9,1
Reverse 45
Elseif Menucheck(10,TX1,TY1) = 1 Then
Menureverse2 10,1
Reverse 46
Elseif Menucheck(11,TX1,TY1) = 1 Then
Menureverse2 11,1
Comfile Technology, Inc
CT1820 User's Manual
84 Of 93
Содержание CUTOUCH CT1820
Страница 4: ...Chapter 1 Overview Comfile Technology Inc CT1820 User s Manual 4 Of 93 ...
Страница 7: ...The CT1820 s Appearance Comfile Technology Inc CT1820 User s Manual 7 Of 93 ...
Страница 8: ...Comfile Technology Inc CT1820 User s Manual 8 Of 93 ...
Страница 9: ...Comfile Technology Inc CT1820 User s Manual 9 Of 93 ...
Страница 12: ...Comfile Technology Inc CT1820 User s Manual 12 Of 93 ...
Страница 17: ...Comfile Technology Inc CT1820 User s Manual 17 Of 93 ...
Страница 19: ...Chapter 2 I O Comfile Technology Inc CT1820 User s Manual 19 Of 93 ...
Страница 29: ...Comfile Technology Inc CT1820 User s Manual 29 Of 93 ...
Страница 32: ...Chapter 3 Command Reference Comfile Technology Inc CT1820 User s Manual 32 Of 93 ...
Страница 41: ...Chapter 4 Touch Input Comfile Technology Inc CT1820 User s Manual 41 Of 93 ...
Страница 52: ...Chapter 5 ModPort I O Expansion Comfile Technology Inc CT1820 User s Manual 52 Of 93 ...
Страница 61: ...Chapter 6 Sample Programs Comfile Technology Inc CT1820 User s Manual 61 Of 93 ...
Страница 87: ...Chapter 7 Panel Mounting Comfile Technology Inc CT1820 User s Manual 87 Of 93 ...
Страница 88: ...Dimensions Comfile Technology Inc CT1820 User s Manual 88 Of 93 ...
Страница 89: ...Comfile Technology Inc CT1820 User s Manual 89 Of 93 ...
Страница 90: ...Panel Cutout Comfile Technology Inc CT1820 User s Manual 90 Of 93 ...