Sample 2
This sample program is similar the previous sample program, but adds a "RESET" button to restart the
count at 0.
32 41
RESET
#include "CT18XX"
Dim I As Integer
Ct18contrast 150
' LCD contrast setting
Dim TX1 As Integer, TY1 As Integer
Contrast 550
On Pad Gosub GETTOUCH
Menuset 0,2,120,155,195,200
Menutitle 0,20,14,"RESET"
Do
Locate 15,6
Print DEC5 I
Incr I
Delay 200
Loop
GETTOUCH:
TX1 = Sys(10)
TY1 = Sys(11)
If Menucheck(0,TX1,TY1) = 1 Then
CT18beep 20
' Audio feedback
I = 0
End If
Return
Set Pad
is used to configure the dedicated kepad/touchpad port.
On Pad
is used to assign an interrupt
service routine to jump to when a touch event occurs.
Comfile Technology, Inc
CT1820 User's Manual
63 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 ...