End Sub
Sub Beeper(Num As Byte)
Dim i As Byte
For i = 1 To Num
CT18beep 20
Wait 200
Next
End Sub
Sub FlashMenu(Num As Byte)
Menureverse Num
Delay 150
Menureverse Num
End Sub
Sub DisplayTime()
Glocate 16,220
Font 0,0
Dprint
Dp(Bcd2bin(Rtcread(2)),2,1),":",Dp(Bcd2bin(Rtcread(1)),2,1),":",Dp(Bcd2bin(Rtcread(0)),
2,1)
End Sub
Sub MAIN()
Font 6,1
Style 0,0,0
Glocate 96,24
Gprint "Main Menu"
Font 0,1
Menuset 0,2,40,96,144,128
Menutitle 0,20,8,"Submenu 1"
Menuset 1,2,168,96,280,128
Menutitle 1,24,8,"Submenu 2"
Menuset 2,2,40,152,144,184
Menutitle 2,20,8,"Submenu 3"
Menuset 3,2,168,152,280,184
Menutitle 3,24,8,"Submenu 4"
Linestyle 0
Dotsize 0,0
Color 1
Box 80,16,232,56
Font 4,0
End Sub
Sub SUBMENU1()
Font 6,1
Style 0,0,0
Glocate 96,24
Gprint "Submenu 1"
Linestyle 0
Dotsize 0,0
Color 1
Box 80,16,232,56
Font 2,1
Menuset 0,2,88,88,224,120
Menutitle 0,22,8,"Beep 1 time"
Menuset 1,2,0,208,72,239
Menutitle 1,10,7,"<BACK"
Font 4,0
Comfile Technology, Inc
CT1820 User's Manual
75 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 ...