¿LEGO NXT el control con wiimote (60 / 63 paso)

Paso 60: programa

Si var.run == FALSE entonces
var.Run = TRUE
HidePie
var.Hidden = TRUE
endif

Si ((DoubleClicked(Wiimote.Home) y Wiimote.HasClassic == FALSE) o DoubleClicked(Home) o DoubleClicked(Wiimote.Classic.Home)) y (var.hidden == true) entonces
ShowPie
var.Hidden = FALSE
elseif ((DoubleClicked(Wiimote.Home) y Wiimote.HasClassic == FALSE) o DoubleClicked(Home) o DoubleClicked(Wiimote.Classic.Home)) y (var.hidden == FALSE) entonces
HidePie
var.Hidden = TRUE
endif

var.Home = SingleClicked(Wiimote.Home)
Si var.home y var.on luego
var.on = FALSE
elseif var.home y var.on = FALSE then
var.on = TRUE
endif

Key.u = wiimote.a
Key.j = wiimote.b
Key.t = wiimote. Más
Key.g = wiimote.minus
Key.y = wiimote.right
Key.h = wiimote. Izquierda
var.err = 15 //edit para intervalos de cambio. (0 - 180) son valores posibles

Si ((wiimote.roll > var.err) & & (wiimote.pitch <-(var.err)))
Key.w = false
Key.d = false
Key.s = false
Key.a = false
Key.e = true
Key.c = false
Key.z = false
Key.q = false
otra cosa
Key.e = false
endif

Si ((wiimote.roll > var.err) & & (wiimote.pitch > var.err))
Key.w = false
Key.d = false
Key.s = false
Key.a = false
Key.e = false
Key.c = true
Key.z = false
Key.q = false
otra cosa
Key.c = false
endif

Si ((wiimote.roll <-(var.err)) & & (wiimote.pitch <-(var.err)))
Key.w = false
Key.d = false
Key.s = false
Key.a = false
Key.e = false
Key.c = false
Key.z = false
Key.q = true
otra cosa
Key.q = false
endif

Si ((wiimote.roll <-(var.err)) & & (wiimote.pitch > var.err))
Key.w = false
Key.d = false
Key.s = false
Key.a = false
Key.e = false
Key.c = false
Key.z = true
Key.q = false
otra cosa
Key.z = false
endif

Si ((Abs(wiimote.roll) < = var.err) & & (wiimote.pitch > var.err))
Key.w = false
Key.d = false
Key.s = true
Key.a = false
Key.e = false
Key.c = false
Key.z = false
Key.q = false
otra cosa
Key.s = false
endif

Si ((wiimote.roll > var.err) & & (Abs(wiimote.pitch) < = var.err))
Key.w = false
Key.d = true
Key.s = false
Key.a = false
Key.e = false
Key.c = false
Key.z = false
Key.q = false
otra cosa
Key.d = false
endif

Si ((Abs(wiimote.roll) < = var.err) & & (wiimote.pitch <-(var.err)))
Key.w = true
Key.d = false
Key.s = false
Key.a = false
Key.e = false
Key.c = false
Key.z = false
Key.q = false
otra cosa
Key.w = false
endif

Si ((wiimote.roll <-(var.err)) & & (Abs(wiimote.pitch) < = var.err))
Key.w = false
Key.d = false
Key.s = false
Key.a = true
Key.e = false
Key.c = false
Key.z = false
Key.q = false
otra cosa
Key.a = false
endif

Si (((Abs(wiimote.roll) < = var.err) & & (Abs(wiimote.pitch) < = var.err)) || ((Abs(wiimote.roll) < = var.err) & & (Abs(wiimote.pitch) < = var.err)))
Key.w = false
Key.d = false
Key.s = false
Key.a = false
Key.e = false
Key.c = false
Key.z = false
Key.q = false
endif

Wiimote.Led1 = var.on
Wiimote.Led2 = true
Wiimote.Led3 = var.on
Wiimote.Led4 = true

Si Wiimote.Battery < = 10 y var.warned == FALSE entonces
Decir "Batería baja"
var.warned = TRUE
endif
var.bat = Wiimote.Battery / 192 * 100
debug =' batería = '+ var.bat+'%'