Guest User

Untitled

a guest
Jun 25th, 2018
103
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.57 KB | None | 0 0
  1. //====WIIMOTE===
  2. mouse.DirectInputPos += [(wiimote.PointerX-1/2)*14, (wiimote.PointerY-1/2)*9]
  3.  
  4. Mouse.LeftButton = Wiimote.B
  5. Mouse.RightButton = Nunchuck.Z
  6.  
  7. Mouse.WheelUp = Wiimote.Minus
  8. Mouse.WheelDown = Wiimote.Plus
  9.  
  10. Key.E = Wiimote.A
  11. Key.Escape = Wiimote.Home
  12.  
  13. Key.F5 = Wiimote.Up
  14. Key.R = Wiimote.Left
  15. Key.Q = Wiimote.Right
  16. Key.F = Wiimote.Down
  17.  
  18. //====NUNCHUCK====
  19. W = ( Wiimote.Nunchuk.JoyY < -.2 )
  20. A = ( Wiimote.Nunchuk.JoyX < -.2 )
  21. S = ( Wiimote.Nunchuk.JoyY > .2 )
  22. D = ( Wiimote.Nunchuk.JoyX > .2 )
  23. Key.Shift = Nunchuck.C
  24.  
  25. if Nunchuck.shakiness > 15 then
  26. Key.Space = true
  27. wait 30ms
  28. Key.Space = false
  29. wait 2000ms
  30. end if
  31.  
  32. if Wiimote.One && Wiimote.Two then
  33. (Key.Shift && Key.P && Key.I && Key.E) = true
  34. end if
  35.  
  36. //====LED Battery Counter====
  37. var.Batt = wiimote.Battery / 48
  38.  
  39. if true then
  40. wait 5 seconds
  41.  
  42. Wiimote.Report15 = 0x80 | Int(wiimote.Rumble)
  43. end if
  44.  
  45. var.Blink = 500ms
  46.  
  47. debug = "Battery level: " + 100*48*var.Batt/192 + "%"
  48.  
  49. if 0<=var.Batt<=0.25 then
  50. Wiimote.Leds = 1
  51. wait var.Blink
  52. Wiimote.Leds = 0
  53. wait var.Blink
  54. elseif 0.25 < var.Batt<=1 then
  55. Wiimote.Leds = 1
  56. elseif 1 < var.Batt<=1.25 then
  57. Wiimote.Leds = 3
  58. wait var.Blink
  59. Wiimote.Leds = 1
  60. wait var.Blink
  61. elseif 1.25 < var.Batt<=2 then
  62. Wiimote.Leds = 3
  63. elseif 2 < var.Batt<=2.25 then
  64. Wiimote.Leds = 7
  65. wait var.Blink
  66. Wiimote.Leds = 3
  67. wait var.Blink
  68. elseif 2.25 < var.Batt<=3 then
  69. Wiimote.Leds = 7
  70. elseif 3 < var.Batt<=3.25 then
  71. Wiimote.Leds = 15
  72. wait var.Blink
  73. Wiimote.Leds = 7
  74. wait var.Blink
  75. elseif 3.25 < var.Batt<=4 then
  76. Wiimote.Leds = 15
  77. else
  78. Wiimote.Leds = 0
  79. endif
Add Comment
Please, Sign In to add comment