//Usage Instructions:
//Up - go up one story
//Down - go down one story
//Left - open or close the subscription list
//Right - open the story in a new tab/window
//1 - go up one line (Up arrow on the keyboard)
//2 - go down one line (Down arrow on the keyboard)
//B - Close the current tab/window
//- - Star the current item
//+ - Share the current item
//Home - Mark the current item as unread
//A open the "Go To Tag" menu
//While the Go To Tag menu is open, the up and down keys
//on the Wiimote move up and down one tag in the menu.
//B will cancel out of the menu
//Pushing A again will select that tag.
//To go back to viewing all items, just shake the Wiimote.

keyboard.shift && keyboard.s = wiimote1.plus
keyboard.s = wiimote1.minus
keyboard.m = wiimote1.Home
keyboard.U = wiimote1.Left
keyboard.V = wiimote1.Right
keyboard.g && keyboard.a = Wiimote1.RelAccX >= 15

if (Wiimote1.Two) then
   press(key.down);
else
   release(key.down);
endif
if (Wiimote1.One) then
   press(key.Up);
else
   release(key.Up);
endif

//Toggle Code borrowed from http://www.wiili.org/index.php/GlovePIE:PowerPoint_Remote_Operations
//Modified a bit.
if pressed(wiimote.A) && (var.toggleA != 1) then
   var.activeToggleA = 1;
endif

if pressed(wiimote.A)&& (var.toggleA == 1) then
   var.activeToggleA = -1;
endif

var.toggleA = (1 * var.activeToggleA);

if (var.activeToggleA == 1) then
   keyboard.g && keyboard.t = wiimote.A
else
   keyboard.enter = wiimote.A
end if

if (var.toggleA == 1) then
   keyboard.Up = wiimote1.Up
   keyboard.Down = wiimote1.Down
   keyboard.escape = wiimote1.B
else
   keyboard.K = wiimote1.Up
   keyboard.J = wiimote1.Down
   keyboard.ctrl && keyboard.w = wiimote1.B
end if

//The following code indicates that the Wiimote is connected properly.
//The LED's will bounce back and forth from left to right.
//KITT code from http://www.wiili.org/forum/glovepie-wii-mote-scripts-t360.html
//I've modified it a bit to match my own tastes.
if 0 = 0 then
  if var.kitt = 0 then
    wiimote.Leds = 1
  endif
  if var.kitt = 1 then
    wiimote.Leds = 2
  endif
  if var.kitt = 2 then
    wiimote.Leds = 4
  endif
  if var.kitt = 3 then
    wiimote.Leds = 8
  endif
  if var.kitt = 4 then
    wiimote.Leds = 8
  endif
  if var.kitt = 5 then
    wiimote.Leds = 4
  endif
  if var.kitt = 6 then
    wiimote.Leds = 2
  endif
  if var.kitt = 7 then
    wiimote.Leds = 1
  endif
  wait .25 s
  var.kitt = (var.kitt + 1) % 8
endif