Hi all,

I've written a small script for Glovepie to control Foobar with your Wiimote. This requires the specified keys to be set in Foobar.

CODE

//Wiimote Foobar2000 Control with special effects :D
//Created By AxaliaN
//You must configure global keyboard shortcuts in foobar for this.
//
//Controls:
//
// Wiimote Key - Command - Keyboard Shortcut in Foobar
// Up - Volume Up - Control + Shift + Alt + Numpad 9 (pgUp)
// Down - Volume Down - Control + Shift + Alt + Numpad 3 (pgDn)
// Left - Previous - Control + Shift + Alt + Numpad 4 (Left)
// Right - Next - Control + Shift + Alt + Numpad 6 (Right)
// A - Play/Pause - Control + Shift + Alt + Numpad 8 (Up)
// B - Stop - Control + Shift + Alt + Numpad 2 (Down)
// Home - Mute - Control + Shift + Alt + Numpad 1 (End)

Control && Shift && Alt && Numpad1 = Wiimote.Home
Control && Shift && Alt && Numpad2 = Wiimote.B
Control && Shift && Alt && Numpad3 = WiiMote.Down
Control && Shift && Alt && Numpad4 = Wiimote.Left
Control && Shift && Alt && Numpad6 = Wiimote.Right
Control && Shift && Alt && Numpad8 = Wiimote.A
Control && Shift && Alt && Numpad9 = Wiimote.Up

if Wiimote.Home then
   wiimote.Rumble = 1
   wait 10 ms
   wiimote.rumble = 0
endif

if Wiimote.B then
   wiimote.Rumble = 1
   wait 10 ms
   wiimote.rumble = 0
endif

if Wiimote.Down then
   wiimote.Rumble = 1
   wait 10 ms
   wiimote.rumble = 0
endif

if Wiimote.Left then
   wiimote.Rumble = 1
   wait 10 ms
   wiimote.rumble = 0
endif

if Wiimote.Right then
   wiimote.Rumble = 1
   wait 10 ms
   wiimote.rumble = 0
endif

if Wiimote.A then
   wiimote.Rumble = 1
   wait 10 ms
   wiimote.rumble = 0
endif

if Wiimote.Up then
   wiimote.Rumble = 1
   wait 10 ms
   wiimote.rumble = 0
endif

var.KITTspeed= 0.1

if wiimote.Up or wiimote.Down or wiimote.A or wiimote.B or wiimote.Right or wiimote.Left or wiimote.Home then
   if 0 = 0 then
     if var.kitt = 0 then
      wiimote.Leds = 1
      endif
    if var.kitt = 1 then
      wiimote.Leds = 3
      endif
    if var.kitt = 2 then
      wiimote.Leds = 6
      endif
    if var.kitt = 3 then
      wiimote.Leds = 12
      endif
    if var.kitt = 4 then
      wiimote.Leds = 8
      endif
    if var.kitt = 5 then
      wiimote.Leds = 12
      endif
    if var.kitt = 6 then
      wiimote.Leds = 6
      endif
    if var.kitt = 7 then
      wiimote.Leds = 3
    endif
    wait var.KITTspeed
    var.kitt = (var.kitt + 1) % 8
  endif
endif