[Ayuda] Script del Mando Clasico para el GlovePie en Wii

Wence 28 oct 2009 20:15

D'oh!

2.044 mensajes
desde jul 2007
en Streets Of Philadelphia

Hola estoy usando el WiiMote y el Mando Clasico por Bluetooth con el PC. Pero no encuentro ningun Script lo suficientemente bueno para usar el Mando Clasico con el GlovePie, tengo ahora mismo el siguiente Script:

if Wiimote.HasClassic then
   Wiimote.Leds=2
   Key.LeftCtrl = Classic.b
   Key.Alt = Classic.a
   Key.Z = Classic.y
   Key.X = Classic.x
   Key.Q = Classic.LFull
   Key.W = Classic.ZL
   Key.A = Classic.ZR
   Key.S = Classic.RFull
   Key.Enter = Classic.Plus or Wiimote.Plus
   Key.Esc = Classic.Home
   Key.Spacebar = Classic.Minus
   Key.Up = Classic.Up
   Key.Down = Classic.Down
   Key.Left = Classic.Left or Wiimote.Up
   Key.Right = Classic.Right or Wiimote.Down
   Key.F6 = Wiimote.Right and Wiimote.one and not Wiimote.two //save+quit
   Key.F7 = Wiimote.Right and not Wiimote.one and Wiimote.two //reset
   Key.F8 = Wiimote.Right and Wiimote.one and Wiimote.two //quit zc
   if Wiimote.b and Wiimote.Right and (Wiimote.one or Wiimote.two)
      wait 10 ms
      Key.Enter = True
   end if
   Key.F12 = Wiimote.a //snapshot
else         
   Wiimote.Leds=1
   Key.LeftCtrl = WiiMote.One
   Key.Alt = WiiMote.Two
   Key.Z = WiiMote.a
   Key.X = WiiMote.b
   Key.Enter = WiiMote.Plus
   Key.Esc = WiiMote.Home
   Key.Spacebar = WiiMote.Minus
   Key.Up = WiiMote.Right
   Key.Down = WiiMote.Left
   Key.Left = WiiMote.Up
   Key.Right = WiiMote.Down
end if

Pero no puedo usar los Joysticks, que es lo que me interesa, me podeis decir que tengo que poner en el Glove Pie para usar el Joystick izquierdo como las flechas de direccion y el derecho como el raton.

NEO117 29 oct 2009 02:01

Arrecho :P

1.056 mensajes
desde abr 2007
en Venezuela

Página web de NEO117

1 valoración positiva

Trata agregando estas lineas a ver. Tambien recomiendo que te busques el PPJoy y un tutorial.

//Joystick movement
If Any.Joy1Y > 0.6
S = True
Wait 1ms
S = False
EndIf
If Any.Joy1Y > 0.4 and < 0.6
S = True
Wait 10ms
S = False
EndIf
If Any.Joy1Y > 0.2 and < 0.4
S = True
Wait 35ms
S = False
EndIf

If Any.Joy1Y < -0.6
W = True
Wait 1ms
W = False
EndIf
If Any.Joy1Y < -0.4 and > -0.6
W = True
Wait 10ms
W = False
EndIf
If Any.Joy1Y < -0.2 and > -0.4
W = True
Wait 35ms
W = False
EndIf

If Any.Joy1X < -0.6
A = True
Wait 1ms
A = False
EndIf
If Any.Joy1X < -0.4 and > -0.6
A = True
Wait 10ms
A = False
EndIf
If Any.Joy1X < -0.2 and > -0.4
A = True
Wait 35ms
A = False
EndIf

If Any.Joy1X > 0.6
D = True
Wait 1ms
D = False
EndIf
If Any.Joy1X > 0.4 and < 0.6
D = True
Wait 10ms
D = False
EndIf
If Any.Joy1X > 0.2 and < 0.4
D = True
Wait 35ms
D = False
EndIf

//Joystick aiming
If Any.Joy2X < -0.2 or Any.Joy2X > 0.2
Mouse.DirectInputX = Mouse.DirectInputX + (30)*(Any.Joy2X)
EndIf

If Any.Joy2Y < -0.2 or Any.Joy2Y > 0.2
Mouse.DirectInputY = Mouse.DirectInputY + (30)*(Any.Joy2Y)
EndIf

Wence 29 oct 2009 18:46

D'oh!

2.044 mensajes
desde jul 2007
en Streets Of Philadelphia

NEO117 escribió:Trata agregando estas lineas a ver. Tambien recomiendo que te busques el PPJoy y un tutorial.

//Joystick movement If Any.Joy1Y > 0.6 S = True Wait 1ms S = False EndIf If Any.Joy1Y > 0.4 and < 0.6 S = True Wait 10ms S = False EndIf If Any.Joy1Y > 0.2 and < 0.4 S = True Wait 35ms S = False EndIf If Any.Joy1Y < -0.6 W = True Wait 1ms W = False EndIf If Any.Joy1Y < -0.4 and > -0.6 W = True Wait 10ms W = False EndIf If Any.Joy1Y < -0.2 and > -0.4 W = True Wait 35ms W = False EndIf If Any.Joy1X < -0.6 A = True Wait 1ms A = False EndIf If Any.Joy1X < -0.4 and > -0.6 A = True Wait 10ms A = False EndIf If Any.Joy1X < -0.2 and > -0.4 A = True Wait 35ms A = False EndIf If Any.Joy1X > 0.6 D = True Wait 1ms D = False EndIf If Any.Joy1X > 0.4 and < 0.6 D = True Wait 10ms D = False EndIf If Any.Joy1X > 0.2 and < 0.4 D = True Wait 35ms D = False EndIf //Joystick aiming If Any.Joy2X < -0.2 or Any.Joy2X > 0.2 Mouse.DirectInputX = Mouse.DirectInputX + (30)*(Any.Joy2X) EndIf If Any.Joy2Y < -0.2 or Any.Joy2Y > 0.2 Mouse.DirectInputY = Mouse.DirectInputY + (30)*(Any.Joy2Y) EndIf

Muchisimas gracias, era lo que buscaba.