Mouse 2 Joypad - GameCreators Forum

Author

Message

MSon

20

Years of Service

User Offline

Joined: 13th Jul 2004

Location: Earth, (I Think).

Posted: 26th May 2005 03:11 Edited at: 26th May 2005 03:22

Link

I'm Using PS2 Controller, And the Second Analog is Controlled By
Control Device Z() for the y Axes And
JoyStick Twist Z for the x Axes...

I'm currently controling the mouse with it like this...

+ Code Snippet

` Mushroom 2 - JoyMouse Controls
  If Control Device Z() <  -150 Then Position Mouse MouseX(),MouseY()+(Control Device Z()/70)-(Run#*2)
  If Control Device Z() >   150 Then Position Mouse MouseX(),MouseY()+(Control Device Z()/70)+(Run#*2)
  If Joystick Twist Z() < 25000 Then Position Mouse MouseX()-(Joystick Twist Z()/1000)-Run#,MouseY()
  If Joystick Twist Z() > 45000 Then Position Mouse MouseX()+(Joystick Twist Z()/1000)+Run#,MouseY()

BUT its Slow And acts kind off strange...

I doubt anyone knows but is there a simply way to control the mouse with the joypad like this?

Try This Code...

+ Code Snippet

         Perform CheckList For Control Devices
         Set Control Device CheckList String$(1)
         Empty CheckList

Do
` Mushroom 2 - JoyMouse Controls
  If Control Device Z() <  -150 Then Position Mouse MouseX(),MouseY()+(Control Device Z()/70)-(Run#*2)
  If Control Device Z() >   150 Then Position Mouse MouseX(),MouseY()+(Control Device Z()/70)+(Run#*2)
  If Joystick Twist Z() < 25000 Then Position Mouse MouseX()-(Joystick Twist Z()/1000)-Run#,MouseY()
  If Joystick Twist Z() > 45000 Then Position Mouse MouseX()+(Joystick Twist Z()/1000)+Run#,MouseY()

Loop

Back to top

Profile PM Email Website

Shadow Light

21

Years of Service

User Offline

Joined: 13th Sep 2003

Location: W. Ks USA

Posted: 27th May 2005 18:22

Link

Are you trying to simply move the mouse curser inside of a DB program or are you trying to use a joystick as a mouse for everyday computing?
If your working on an everyday alternative to mousing around, then Great minds think alike. ;P Otherwise, there is most certainly better ways of accomplishing your goal of joymousing.

Also, are could try doing this:

+ Code Snippet

MX = MOUSEX()
MY = MOUSEY()
IF JOYSTICK Z() < -150 THEN DEC MY
IF JOYSTICK Z() > 150 THEN INC MY
IF JOYSTICK TWIST Z() < 250000 THEN DEC MX
IF JOYSTICK TWIST Z() > 450000 THEN INC MX
POSITION MOUSE MX,MY

Now all that you'd need is a way to emulate mouseclicks and we'd all trade in our mice for joypads. Anyway, hope this helps.

To Fragg or Not To Fragg....
Yea right. Let's FRAGG EM ALL!!!!

Back to top

Profile PM Email

MSon

20

Years of Service

User Offline

Joined: 13th Jul 2004

Location: Earth, (I Think).

Posted: 7th Jun 2005 07:51 Edited at: 7th Jun 2005 08:04

Link

Thanks for the help but im Using it a different way So It Returns a Value Like Control Device X(), (Ie: -1000 To 1000)

xOffSet# = 2000 / 60000 * JoyStick Twist Z() - 1000 / 200

Dark Basic won't do this Calculation for some reason so you have to do this

xOffSet# = 0.0333 * JoyStick Twist Z() - 1000 / 200

Back to top

Profile PM Email Website

Sorry your browser is not supported!

DarkBASIC Professional Discussion / Mouse 2 Joypad