Merci mais tu te trompe!
Je vous fourni les scripts crée perso par moi de chez moi en personne!
En faite cest script emul les comande du casque a détécteur de mouvement(je ne me rappelle plus du nom)et la souris!
Bon jeux!
Les scripts:faite copier/coler dans le bloc note ou n'importe quelle editeur de texte et renomer le premier:irtraking.PIE
Et le deuxieme:ir_mouse.PIE
Bon voila les scripts comme promi!
1er script:(casque)
// VR920 Default TrackIR script
// Use this to play TrackIR Enhanced games with a Vuzix VR920.
// Here is a list of free game demos you can download:
//
blablabla/trackir/04-community/community-free-game
-demos-and-utilities.html
// or the complete list of TrackIR games is here:
//
blablabla/trackir/03-enhanced-games/enhanced-games
-all.html
PIE.FrameRate = 120Hz
if FakeTrackIR.ProfileID=332DH then
FakeTrackIR.yaw = (vr920.Yaw - var.offset)
FakeTrackIR.pitch = vr920.Pitch+20 degrees
FakeTrackIR.roll = -vr920.Roll
else if FakeTrackIR.ProfileID=3A35H or FakeTrackIR.ProfileID=3A38H then
// Arvoch Conflict and Evochron Alliance use a different range
FakeTrackIR.yaw = (vr920.Yaw - var.offset)*2
FakeTrackIR.pitch = vr920.Pitch*2
FakeTrackIR.roll = -vr920.Roll*10
else
FakeTrackIR.yaw = (vr920.Yaw - var.offset)
FakeTrackIR.pitch = vr920.Pitch
FakeTrackIR.roll = -vr920.Roll
end if
// Uncomment the next line to enable voice command:
//if said('recenter') then var.offset = vr920.yaw
// status display
debug = 'HMD='+VR920.Exists+', Game='+IntToHex(FakeTrackIR.ProfileId)+'H, TrackIR='+FakeTrackIR.active
2em:(souris/arme)
// Wiimote mouse script for Windows desktop
// Requires a sensor bar
var.ButtonFreezeTime = 250ms
var.PointerBump = KeepDown(Pressed(wiimote.A),var.ButtonFreezeTime) or KeepDown(Pressed(wiimote.B),var.ButtonFreezeTime)
Wiimote.Led1 = true
// Mouse movement
if wiimote.PointerVisible but not var.PointerBump then
mouse.x = wiimote.PointerX
mouse.y = wiimote.PointerY
end if
// Mouse Buttons
mouse.LeftButton = Wiimote.A and KeepDown(Wiimote.PointerVisible,0.5s)
mouse.RightButton = Wiimote.B and KeepDown(Wiimote.PointerVisible,0.5s)
mouse.MiddleButton = Wiimote.Home and KeepDown(Wiimote.PointerVisible,0.5s)
mouse.XButton1 = Wiimote.Minus
mouse.XButton2 = Wiimote.Plus
// Mouse Wheel
if wiimote.Up then
mouse.WheelUp = true
wait 30ms
mouse.WheelUp = false
wait 30ms
end if
if wiimote.Down then
mouse.WheelDown = true
wait 30ms
mouse.WheelDown = false
wait 30ms
end if
Testez et vous me direz si sa vous plai ou pas!!!
Enjoy les amis!