#include "CT18XX"
Ramclear
Ct18contrast 150
On Pad Gosub ProcessTouch
Dim TX1 As Integer
Dim TY1 As Integer
Dim CurrentScreen As Byte
#define _MAINMENU 0
#define _SUBMENU1 1
#define _SUBMENU2 2
#define _SUBMENU3 3
#define _SUBMENU4 4
MAIN
CurrentScreen = _MAINMENU
Do
If CurrentScreen = _MAINMENU Then
Set Onpad Off
DisplayTime
Set Onpad On
Endif
Delay 250
Loop
ProcessTouch:
TX1 = Sys(10)
TY1 = Sys(11)
Select Case CurrentScreen
Case _MAINMENU
ProcessMainMenu
Case _SUBMENU1
ProcessSubMenu1
Case _SUBMENU2
ProcessSubMenu2
Case _SUBMENU3
ProcessSubMenu3
Case _SUBMENU4
ProcessSubMenu4
End Select
Return
End
Sub ProcessMainMenu()
If Menucheck(0,TX1,TY1) = 1 Then
FlashMenu 0
CurrentScreen = _SUBMENU1
Cls
SUBMENU1
Elseif Menucheck(1,TX1,TY1) = 1 Then
FlashMenu 1
CurrentScreen = _SUBMENU2
Cls
Comfile Technology, Inc
CT1820 User's Manual
73 Of 93
Summary of Contents for CUTOUCH CT1820
Page 4: ...Chapter 1 Overview Comfile Technology Inc CT1820 User s Manual 4 Of 93 ...
Page 7: ...The CT1820 s Appearance Comfile Technology Inc CT1820 User s Manual 7 Of 93 ...
Page 8: ...Comfile Technology Inc CT1820 User s Manual 8 Of 93 ...
Page 9: ...Comfile Technology Inc CT1820 User s Manual 9 Of 93 ...
Page 12: ...Comfile Technology Inc CT1820 User s Manual 12 Of 93 ...
Page 17: ...Comfile Technology Inc CT1820 User s Manual 17 Of 93 ...
Page 19: ...Chapter 2 I O Comfile Technology Inc CT1820 User s Manual 19 Of 93 ...
Page 29: ...Comfile Technology Inc CT1820 User s Manual 29 Of 93 ...
Page 32: ...Chapter 3 Command Reference Comfile Technology Inc CT1820 User s Manual 32 Of 93 ...
Page 41: ...Chapter 4 Touch Input Comfile Technology Inc CT1820 User s Manual 41 Of 93 ...
Page 52: ...Chapter 5 ModPort I O Expansion Comfile Technology Inc CT1820 User s Manual 52 Of 93 ...
Page 61: ...Chapter 6 Sample Programs Comfile Technology Inc CT1820 User s Manual 61 Of 93 ...
Page 87: ...Chapter 7 Panel Mounting Comfile Technology Inc CT1820 User s Manual 87 Of 93 ...
Page 88: ...Dimensions Comfile Technology Inc CT1820 User s Manual 88 Of 93 ...
Page 89: ...Comfile Technology Inc CT1820 User s Manual 89 Of 93 ...
Page 90: ...Panel Cutout Comfile Technology Inc CT1820 User s Manual 90 Of 93 ...