Tabla de contenido
Publicidad
Para ver el estado de los botones, utilice la función
Esta función vuelve a un entero de 32 bits.
Los ocho bits más bajos de este valor de retorno representan el estado de los ocho botones. El bit correspondiente
se pone en « 1 » si pulsa un botón.
Puede usar Visual Basic's
Ejemplo: Los últimos ocho bits del valor son 10000011 al pulsar los botones SW1, SW2 y SW8.
En este ejemplo de código, integer i incluye el valor de estado del botón.
Se controla cada bit para ver si es « 1 » ó « 0 ». Si el bit tiene el valor « 1 », quiere decir que el botón
correspondiente es pulsado. Se visualiza el texto « DOWN » para este botón
Dim i As Integer
i = ReadAllDigital()
' check the individual bits of i to detect the pressed buttons
If (i And 1) > 0 Then Label3.Text = "SW1 = Pressed" Else Label3.Text = "SW1 = Released"
If (i And 2) > 0 Then Label4.Text = "SW2 = Pressed" Else Label4.Text = "SW2 = Released"
If (i And 4) > 0 Then Label5.Text = "SW3 = Pressed" Else Label5.Text = "SW3 = Released"
If (i And 8) > 0 Then Label6.Text = "SW4 = Pressed" Else Label6.Text = "SW4 = Released"
If (i And 16) > 0 Then Label7.Text = "SW5 = Pressed" Else Label7.Text = "SW5 = Released"
If (i And 32) > 0 Then Label8.Text = "SW6 = Pressed" Else Label8.Text = "SW6 = Released"
If (i And 64) > 0 Then Label9.Text = "SW7 = Pressed" Else Label9.Text = "SW7 = Released"
If (i And 128) > 0 Then Label10.Text = "SW8 = Pressed" Else Label10.Text = "SW8 = Released"
PASO 11
Después de haber terminado la evolución de este proyecto, ciérrelo. Luego, abra el proyecto « Set_LED» para
saber cómo iluminar y apagar los LEDs del EDU05.
EDU05 Procedimiento de prueba & programar en Visual Basic 2010 (Versión 1.0)
ReadAllDigital().
And
operator para enmascarar los otros bits y para controlar el valor de un bit individual.
Velleman NV
Legen Heirweg 33
9890 Gavere, Belgium
www.velleman.eu
.
15
15
Publicidad
Tabla de contenido
