MenuSet index, style, x1, y1, x2, y2

index value must be a number from 0 through 49. style specifies the style of the button as shown below.

x1, y1, x2, y2 are the x and y screen coordinates of the upper-left and lower-right corners of the button, respectively.

Menuset 0, 2, 10,10,30,20

MenuSet index, style, x1, y1, x2, y2

This command is exactly the same as the MenuSet command, but can draw different styles. This command is not available in the CT1712C.

x1, y1, x2, y2 are the x and y screen coordinates of the upper-left and lower-right corners of the button, respectively.

#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