home *** CD-ROM | disk | FTP | other *** search
/ Enigma Amiga Life 113 / EnigmaAmiga113CD.iso / software / sviluppo / glquake_src / in_amigajoy.c < prev    next >
Encoding:
C/C++ Source or Header  |  2000-01-30  |  10.0 KB  |  388 lines
  1. /* 
  2. Copyright (C) 1996-1997 Id Software, Inc. 
  3.  
  4. This program is free software; you can redistribute it and/or 
  5. modify it under the terms of the GNU General Public License 
  6. as published by the Free Software Foundation; either version 2 
  7. of the License, or (at your option) any later version. 
  8.  
  9. This program is distributed in the hope that it will be useful, 
  10. but WITHOUT ANY WARRANTY; without even the implied warranty of 
  11. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.   
  12.  
  13. See the GNU General Public License for more details. 
  14.  
  15. You should have received a copy of the GNU General Public License 
  16. along with this program; if not, write to the Free Software 
  17. Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA. 
  18.  
  19. */ 
  20.  
  21. // Input-Sub-Module for Joystick
  22.  
  23. /*
  24.             Portability
  25.             ===========
  26.  
  27.             This file should compile under all Amiga-based Kernels,
  28.             including WarpUP, 68k and PowerUP. There might be some
  29.             changes in the OS-Includes included needed (for example
  30.             adding inline-includes for EGCS or something like that).
  31.  
  32.             Steffen Haeuser (MagicSN@Birdland.es.bawue.de)
  33. */
  34.  
  35. #include "quakedef.h" 
  36.  
  37. #include <libraries/lowlevel.h> 
  38. #include <proto/exec.h> 
  39. #include <proto/lowlevel.h> 
  40. #include <intuition/intuition.h>
  41. #include <intuition/intuitionbase.h> 
  42.  
  43. cvar_t  joy_advanced={"joy_advanced","0",true};
  44. cvar_t  joy_forwardthreshold={"joy_forwardthreshold","0.15",true};
  45. cvar_t  joy_sidethreshold={"joy_sidethreshold","0.15",true};
  46. cvar_t  joy_pitchthreshold={"joy_pitchthreshold","0.15",true};
  47. cvar_t  joy_pitchsensitivity={"joy_pitchsensitivity","1",true};
  48. cvar_t  joy_yawsensitivity={"joy_yawsensitivity","-1",true};
  49.  
  50. cvar_t  joy_side_reverse={"joy_side_reverse","0",true};
  51. cvar_t  joy_up_reverse={"joy_up_reverse","0",true};
  52. cvar_t  joy_forward_reverse={"joy_forward_reverse","0",true};
  53.  
  54. cvar_t joy_forwardsensitivity={"joy_forwardsensitivity","-1",true};
  55. cvar_t joy_sidesensitivity={"joy_sidesensitivity","-1",true};
  56.  
  57. cvar_t joy_force0={"joy_force0","AUTOSENSE",true};
  58. cvar_t joy_force1={"joy_force1","AUTOSENSE",true};
  59. cvar_t joy_force2={"joy_force2","AUTOSENSE",true};
  60. cvar_t joy_force3={"joy_force3","AUTOSENSE",true};
  61. cvar_t joy_onlypsx={"joy_onlypsx","0",true};
  62.  
  63. extern int psxused;
  64.  
  65. struct TheJoy
  66. {
  67.   int mv_a;
  68.   int mv_b;
  69.   int axis;
  70.   int value;
  71.   int nvalue;
  72. };
  73.  
  74. struct JoyType
  75. { 
  76.   char *Name;
  77.   ULONG Type;
  78. }; 
  79.  
  80.  
  81. static struct TheJoy tj;
  82. static int ack0 = -1, ack1 = -1;
  83. static int Port;
  84. static int JoyState[4];
  85. static int stick=1;
  86.  
  87. extern struct Screen *QuakeScreen;
  88. extern struct IntuitionBase *IntuitionBase;
  89.  
  90. static struct JoyType jt[] =
  91. { 
  92.   "GAMECTRL", SJA_TYPE_GAMECTLR,
  93.   "MOUSE",    SJA_TYPE_MOUSE,
  94.   "JOYSTICK", SJA_TYPE_JOYSTK,
  95.   "AUTOSENSE",SJA_TYPE_AUTOSENSE,
  96.   NULL,       0,
  97. }; 
  98.  
  99.  
  100.  
  101. int StringToType(char *type)
  102. { 
  103.   int i = 0;
  104.   while (i<4)
  105.   {
  106.     if (0 == stricmp(type, jt[i].Name)) return jt[i].Type;
  107.     i++;
  108.   }
  109.   return SJA_TYPE_AUTOSENSE;
  110. } 
  111.  
  112. void ResetJoystick(void)
  113. { 
  114.   int Port;
  115.   for (Port = 0; Port < 4; ++Port)
  116.   {
  117.     JoyState[Port] = (ULONG)JP_TYPE_NOTAVAIL;
  118.     SetJoyPortAttrs(Port, SJA_Type, SJA_TYPE_AUTOSENSE, TAG_DONE);
  119.   }
  120. } 
  121.  
  122.  
  123. void IN_InitJoy()
  124. {
  125.   int numdevs;
  126.   cvar_t *cv;
  127.   char strValue[256];
  128.   float f;
  129.  
  130.   Cvar_RegisterVariable(&joy_advanced);
  131.   Cvar_RegisterVariable(&joy_forwardthreshold);
  132.   Cvar_RegisterVariable(&joy_sidethreshold);
  133.   Cvar_RegisterVariable(&joy_pitchthreshold);
  134.   Cvar_RegisterVariable(&joy_pitchsensitivity);
  135.   Cvar_RegisterVariable(&joy_yawsensitivity);
  136.   Cvar_RegisterVariable(&joy_forward_reverse);
  137.   Cvar_RegisterVariable(&joy_side_reverse);
  138.   Cvar_RegisterVariable(&joy_up_reverse);
  139.   Cvar_RegisterVariable(&joy_sidesensitivity);
  140.   Cvar_RegisterVariable(&joy_forwardsensitivity);
  141.   Cvar_RegisterVariable(&joy_force0);
  142.   Cvar_RegisterVariable(&joy_force1);
  143.   Cvar_RegisterVariable(&joy_force2);
  144.   Cvar_RegisterVariable(&joy_force3);
  145.   Cvar_RegisterVariable(&joy_onlypsx);
  146.  
  147.   f = Cvar_VariableValue("in_initjoy");
  148.   if (!Cvar_FindVar("in_initjoy")) f=1.0;
  149.   if ( !f) return;
  150.   
  151.   if (joy_onlypsx.value) return;
  152.   
  153.   stick=1;
  154.  
  155.   numdevs=-1;
  156.   if (LowLevelBase)
  157.   {
  158.     int MyPort=0;
  159.     ResetJoystick();
  160.     for (MyPort=0;MyPort<4;MyPort++)
  161.     {
  162.       JoyState[MyPort] = (int)(ReadJoyPort(MyPort));
  163.       if ((JoyState[MyPort]!=JP_TYPE_NOTAVAIL)&&(!(JoyState[MyPort]&JP_TYPE_MOUSE)))
  164.       {
  165.         numdevs=MyPort;
  166.         break;
  167.       }
  168.     }
  169.   }
  170.   tj.mv_a=32768;
  171.   tj.mv_b=32768;
  172.  
  173.   if (numdevs == -1)
  174.     return;
  175.   else Port=numdevs;
  176.  
  177.   Con_Printf ("\nAmiga joystick available\n");
  178.   strcpy(strValue,Cvar_VariableString("joy_force0"));
  179.   if (strlen(strValue)==0) strcpy(strValue,"AUTOSENSE");
  180.   SetJoyPortAttrs(0, SJA_Type,   StringToType(strValue), TAG_DONE);
  181.   Con_Printf("Joystick Port 0 is %s\n", strValue);
  182.  
  183.   strcpy(strValue,Cvar_VariableString("joy_force1"));
  184.   if (strlen(strValue)==0) strcpy(strValue,"AUTOSENSE");
  185.   SetJoyPortAttrs(1, SJA_Type,   StringToType(strValue), TAG_DONE);
  186.   Con_Printf("Joystick Port 1 is %s\n", strValue);
  187.  
  188.   strcpy(strValue,Cvar_VariableString("joy_force2"));
  189.   if (strlen(strValue)==0) strcpy(strValue,"AUTOSENSE");
  190.   SetJoyPortAttrs(2, SJA_Type,   StringToType(strValue), TAG_DONE);
  191.   Con_Printf("Joystick Port 2 is %s\n", strValue);
  192.  
  193.   strcpy(strValue,Cvar_VariableString("joy_force3"));
  194.   if (strlen(strValue)==0) strcpy(strValue,"AUTOSENSE");
  195.   SetJoyPortAttrs(3, SJA_Type,   StringToType(strValue), TAG_DONE);
  196.   Con_Printf("Joystick Port 3 is %s\n", strValue);
  197. }
  198.  
  199. void IN_ShutdownJoystick(void) 
  200. { 
  201.   if (LowLevelBase)
  202.   {
  203.     if (!ack1) SystemControl(SCON_RemCreateKeys,1,TAG_END);
  204.     if (!ack0) SystemControl(SCON_RemCreateKeys,0,TAG_END);
  205.     ResetJoystick();
  206.   }
  207. } 
  208.  
  209. void RawValuePointer()
  210. { 
  211.   int button=0;
  212.   int dir=0;
  213.   int joytype;
  214. #ifndef GLQUAKE
  215.   if (IntuitionBase->FirstScreen != QuakeScreen) return;
  216. #endif 
  217.   if ( ( JoyState[ Port ] = ReadJoyPort(Port)) != JP_TYPE_NOTAVAIL )
  218.   {
  219.     button=(JoyState[ Port ]) & (JP_BUTTON_MASK);
  220.     dir = (JoyState[ Port ]) & (JP_DIRECTION_MASK);
  221.     tj.nvalue=0;
  222.     joytype=JoyState[Port]&JP_TYPE_MASK;
  223.     if ((joytype&JP_TYPE_JOYSTK)&&(joytype&JP_TYPE_GAMECTLR)) joytype=JP_TYPE_GAMECTLR;
  224.     if (((joytype&JP_TYPE_JOYSTK)||(joytype&JP_TYPE_GAMECTLR))==0) joytype=JP_TYPE_JOYSTK;
  225.     switch(joytype)
  226.     {
  227.       case JP_TYPE_GAMECTLR:
  228.       {
  229.         if (stick) stick=0;
  230.         if (button&JPF_BUTTON_RED) tj.value=tj.value|1;
  231.         else if (tj.value&1)
  232.         {
  233.           tj.value=tj.value&~1;
  234.           tj.nvalue|=1;
  235.         }
  236.         if (button&JPF_BUTTON_YELLOW) tj.value=tj.value|4;
  237.         else if (tj.value&4)
  238.         {
  239.           tj.value=tj.value&~4;
  240.           tj.nvalue|=4;
  241.         }
  242.         if (button&JPF_BUTTON_GREEN) tj.value=tj.value|8;
  243.         else if (tj.value&8)
  244.         {
  245.           tj.value=tj.value&~8;
  246.           tj.nvalue|=8;
  247.         }
  248.         if (button&JPF_BUTTON_BLUE) tj.value=tj.value|2;
  249.         else if (tj.value&2)
  250.         {
  251.           tj.value=tj.value&~2;
  252.           tj.nvalue|=2;
  253.         }
  254.         if (button&JPF_BUTTON_FORWARD) tj.value=tj.value|16;
  255.         else if (tj.value&16)
  256.         {
  257.           tj.value=tj.value&~16;
  258.           tj.nvalue|=16;
  259.         }
  260.         if (button&JPF_BUTTON_REVERSE) tj.value=tj.value|32;
  261.         else if (tj.value&32)
  262.         {
  263.           tj.value=tj.value&~32;
  264.           tj.nvalue|=32;
  265.         }
  266.         if (button&JPF_BUTTON_PLAY) tj.value=tj.value|64;
  267.         else if (tj.value&64)
  268.         {
  269.           tj.value=tj.value&~64;
  270.           tj.nvalue|=64;
  271.         }
  272.         if (dir&JPF_JOY_UP) tj.mv_a=0;
  273.         else if (dir&JPF_JOY_DOWN) tj.mv_a=65536;
  274.         else tj.mv_a=32768;
  275.         if (dir&JPF_JOY_LEFT) tj.mv_b=0;
  276.         else if (dir&JPF_JOY_RIGHT) tj.mv_b=65536;
  277.         else tj.mv_b=32768;
  278.       }
  279.       break;
  280.       case JP_TYPE_JOYSTK :
  281.       {
  282.         if (button&JPF_BUTTON_RED) tj.value=tj.value|1;
  283.         else if (tj.value&1)
  284.         {
  285.           tj.value=tj.value&~1;
  286.           tj.nvalue|=1;
  287.         }
  288.         if (dir&JPF_JOY_UP) tj.mv_a=0;
  289.         else if (dir&JPF_JOY_DOWN) tj.mv_a=65536;
  290.         else tj.mv_a=32768;
  291.         if (dir&JPF_JOY_LEFT) tj.mv_b=0;
  292.         else if (dir&JPF_JOY_RIGHT) tj.mv_b=65536;
  293.         else tj.mv_b=32768;
  294.       }
  295.       break;
  296.     }
  297.   }
  298. }
  299.  
  300. void IN_JoyMove (usercmd_t *cmd) 
  301. { 
  302.   float   speed, aspeed;
  303.   int   fAxisValue;
  304.   int key_index;
  305.  
  306.   if (!LowLevelBase) return;
  307.   if (joy_onlypsx.value) return;
  308.   
  309.   if (in_speed.state & 1) speed = cl_movespeedkey.value;
  310.   else speed = 1;
  311.   aspeed = speed * host_frametime;
  312.  
  313.   RawValuePointer();
  314.   fAxisValue= tj.mv_a;
  315.   fAxisValue -= 32768;
  316.   fAxisValue /= 32768;
  317.  
  318.   if ((joy_advanced.value == 0.0) && (in_mlook.state & 1))
  319.   {
  320.     if (fabs(fAxisValue) > joy_pitchthreshold.value)
  321.     {
  322.       if (m_pitch.value < 0.0) cl.viewangles[PITCH] -= (fAxisValue * joy_pitchsensitivity.value) * aspeed * cl_pitchspeed.value;
  323.       else cl.viewangles[PITCH] += (fAxisValue * joy_pitchsensitivity.value) * aspeed * cl_pitchspeed.value;
  324.     }
  325.   }
  326.   else cmd->forwardmove += (fAxisValue * joy_forwardsensitivity.value) * speed * cl_forwardspeed.value;
  327.  
  328.   fAxisValue = tj.mv_b;
  329.   fAxisValue -= 32768;
  330.   fAxisValue /= 32768;
  331.   cl.viewangles[YAW] -= (fAxisValue * 0.5 * joy_pitchsensitivity.value) * aspeed * cl_pitchspeed.value;
  332.   if (tj.value&1)
  333.   {
  334.     key_index = K_JOY1;
  335.     Key_Event(key_index+3,true);
  336.   }
  337.   else
  338.   {
  339.     if (tj.nvalue&1)
  340.     {
  341.       key_index = K_JOY1;
  342.       Key_Event(key_index+3,false);
  343.     }
  344.   }
  345.   if (stick) return;
  346.   if (tj.value&2)
  347.   {
  348.     key_index = K_JOY1;
  349.     Key_Event(key_index,true);
  350.   }
  351.   else
  352.   {
  353.     if (tj.nvalue&2)
  354.     {
  355.       key_index = K_JOY1;
  356.       Key_Event(key_index,false);
  357.     }
  358.   }
  359.   if (tj.value&4)
  360.   {
  361.     key_index = K_JOY1;
  362.     Key_Event(key_index+2,true);
  363.   }
  364.   else
  365.   {
  366.     if (tj.nvalue&4)
  367.     {
  368.       key_index = K_JOY1;
  369.       Key_Event(key_index+2,false);
  370.     }
  371.   }
  372.   if (tj.value&8)
  373.   {
  374.     key_index = K_JOY1;
  375.     Key_Event(key_index+1,true);
  376.   }
  377.   else
  378.   {
  379.     if (tj.nvalue&8)
  380.     {
  381.       key_index = K_JOY1;
  382.       Key_Event(key_index+1,false);
  383.     }
  384.   }
  385.   if (tj.value&16) cmd->sidemove -= (joy_sidesensitivity.value) * speed * cl_sidespeed.value;
  386.   if (tj.value&32) cmd->sidemove += (joy_sidesensitivity.value) * speed * cl_sidespeed.value;
  387. } 
  388.