![COMFILE CUTOUCH CT1820 Скачать руководство пользователя страница 70](http://html1.mh-extra.com/html/comfile/cutouch-ct1820/cutouch-ct1820_user-manual_2641084070.webp)
Include files make it easy to change the interface of a program without a lot of cut and paste operations
within the main code.
The following program is exactly same as Sample 4 except an include file is used for the virtual keypad:
#include "CT18XX"
Dim TX1 As Integer, TY1 As Integer
Dim I As Integer
Ct18contrast 150
On Pad Gosub GETTOUCH
NUMKEY
' Calls subroutine in CT005.inc to draw the user interface
I =0
Do
Loop
GETTOUCH:
TX1 = Sys(10)
TY1 = Sys(11)
If Menucheck(0,TX1,TY1) = 1 Then
I = I << 4
I = I + 1
CT18beep 20
Elseif Menucheck(1,TX1,TY1) = 1 Then
I = I << 4
I = I + 2
CT18beep 20
Elseif Menucheck(2,TX1,TY1) = 1 Then
I = I << 4
I = I + 3
CT18beep 20
Elseif Menucheck(3,TX1,TY1) = 1 Then
I = I << 4
I = I + 4
CT18beep 20
Elseif Menucheck(4,TX1,TY1) = 1 Then
I = I << 4
I = I + 5
CT18beep 20
Elseif Menucheck(5,TX1,TY1) = 1 Then
I = I << 4
I = I + 6
CT18beep 20
Elseif Menucheck(6,TX1,TY1) = 1 Then
I = I << 4
I = I + 7
CT18beep 20
Elseif Menucheck(7,TX1,TY1) = 1 Then
I = I << 4
I = I + 8
CT18beep 20
Elseif Menucheck(8,TX1,TY1) = 1 Then
I = I << 4
I = I + 9
CT18beep 20
Elseif Menucheck(9,TX1,TY1) = 1 Then
I = I << 4
CT18beep 20
Elseif Menucheck(10,TX1,TY1) = 1 Then
I = 0
CT18beep 20
End If
Comfile Technology, Inc
CT1820 User's Manual
70 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 ...