MenuReverse index

This command causes the menu button identified by index to have it's colors reversed for visual feedback. This is useful to provide visual feedback to a user, indicating that a menu button has been touched.

MenuReverse2 index

This command is exactly the same as the MenuReverse command, but it used for buttons declared with the MenuSet2 command. This command is not available in the CT1712C.

#include "CT18XX"
Dim I As Integer
Dim TX1 As Integer, TY1 As Integer
Contrast 550
On Pad Gosub GETTOUCH
Menuset2 0,3,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)
    Locate 0,0
    Print Dec TX1, " ", Dec TY1
    If Menucheck(0,TX1,TY1) = 1 Then
        Menureverse2 0,3                 ' Notice the '2' at the end of this command
        Ct18beep 20 ' Audio feedback
        I = 0
    End If
    Return

Go CUBLOC home