====== Menuset ======
''MenuSet index, style, x1, y1, x2, y2''
| index | Menu index number |
| style | Button style ( 0 ~ 2) |
| x1, y1, x2, y2 | Menu button's screen coordinates |
index value must be a number from 0 through 49. style specifies the style of the button as shown below.
{{ :cubloc:menuset:menuset.png?nolink |}}
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
====== Menuset2 ======
''MenuSet index, style, x1, y1, x2, y2''
| index | Menu index number |
| style | Button style ( 0 ~ 2) |
| x1, y1, x2, y2 | Menu button's screen coordinates |
This command is exactly the same as the MenuSet command, but can draw different styles. This
command is not available in the CT1712C.
{{ :cubloc:menuset:menuset2.png?nolink |}}
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
[[cubloc:index#system_library:|Go CUBLOC home]]