home *** CD-ROM | disk | FTP | other *** search
/ Enigma Amiga Life 113 / EnigmaAmiga113CD.iso / software / sviluppo / quake_src / in_amigajoy.c < prev    next >
C/C++ Source or Header  |  2000-06-17  |  10KB  |  376 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. #pragma amiga-align
  38. #include <libraries/lowlevel.h> 
  39. #include <proto/exec.h> 
  40. #include <proto/lowlevel.h> 
  41. #include <intuition/intuition.h>
  42. #include <intuition/intuitionbase.h> 
  43. #pragma default-align
  44.  
  45. cvar_t  joy_advanced={"joy_advanced","0",true};
  46. cvar_t  joy_forwardthreshold={"joy_forwardthreshold","0.15",true};
  47. cvar_t  joy_sidethreshold={"joy_sidethreshold","0.15",true};
  48. cvar_t  joy_pitchthreshold={"joy_pitchthreshold","0.15",true};
  49. cvar_t  joy_pitchsensitivity={"joy_pitchsensitivity","1",true};
  50. cvar_t  joy_yawsensitivity={"joy_yawsensitivity","-1",true};
  51.  
  52. cvar_t  joy_side_reverse={"joy_side_reverse","0",true};
  53. cvar_t  joy_up_reverse={"joy_up_reverse","0",true};
  54. cvar_t  joy_forward_reverse={"joy_forward_reverse","0",true};
  55.  
  56. cvar_t joy_forwardsensitivity={"joy_forwardsensitivity","-1",true};
  57. cvar_t joy_sidesensitivity={"joy_sidesensitivity","-1",true};
  58.  
  59. cvar_t joy_force0={"joy_force0","AUTOSENSE",true};
  60. cvar_t joy_force1={"joy_force1","AUTOSENSE",true};
  61. cvar_t joy_force2={"joy_force2","AUTOSENSE",true};
  62. cvar_t joy_force3={"joy_force3","AUTOSENSE",true};
  63. cvar_t joy_onlypsx={"joy_onlypsx","0",true};
  64.  
  65. extern int psxused;
  66.  
  67. struct TheJoy
  68. {
  69.   int mv_a;
  70.   int mv_b;
  71.   int axis;
  72.   int value;
  73.   int nvalue;
  74. };
  75.  
  76. struct JoyType
  77. { 
  78.   char *Name;
  79.   ULONG Type;
  80. }; 
  81.  
  82.  
  83. static struct TheJoy tj;
  84. static int ack0 = -1, ack1 = -1;
  85. static int Port;
  86. static int JoyState[4];
  87. static int stick=1;
  88.  
  89. extern struct Screen *QuakeScreen;
  90. extern struct IntuitionBase *IntuitionBase;
  91.  
  92. static struct JoyType jt[] =
  93. { 
  94.   "GAMECTRL", SJA_TYPE_GAMECTLR,
  95.   "MOUSE",    SJA_TYPE_MOUSE,
  96.   "JOYSTICK", SJA_TYPE_JOYSTK,
  97.   "AUTOSENSE",SJA_TYPE_AUTOSENSE,
  98.   NULL,       0,
  99. }; 
  100.  
  101.  
  102.  
  103. int StringToType(char *type)
  104. { 
  105.   int i = 0;
  106.   while (i<4)
  107.   {
  108.     if (0 == stricmp(type, jt[i].Name)) return jt[i].Type;
  109.     i++;
  110.   }
  111.   return SJA_TYPE_AUTOSENSE;
  112. } 
  113.  
  114. void ResetJoystick(void)
  115. { 
  116.   int Port;
  117.   for (Port = 0; Port < 4; ++Port)
  118.   {
  119.     JoyState[Port] = (ULONG)JP_TYPE_NOTAVAIL;
  120.     SetJoyPortAttrs(Port, SJA_Type, SJA_TYPE_AUTOSENSE, TAG_DONE);
  121.   }
  122. } 
  123.  
  124.  
  125. void IN_InitJoy()
  126. {
  127.   int numdevs;
  128.   cvar_t *cv;
  129.   char strValue[256];
  130.   float f;
  131.  
  132.   f = Cvar_VariableValue("in_initjoy");
  133.   if (!Cvar_FindVar("in_initjoy")) f=1.0;
  134.   if ( !f) return;
  135.   
  136.   if (joy_onlypsx.value) return;
  137.   
  138.   stick=1;
  139.  
  140.   numdevs=-1;
  141.   if (LowLevelBase)
  142.   {
  143.     int MyPort=0;
  144.     ResetJoystick();
  145.     for (MyPort=0;MyPort<4;MyPort++)
  146.     {
  147.       JoyState[MyPort] = (int)(ReadJoyPort(MyPort));
  148.       if ((JoyState[MyPort]!=JP_TYPE_NOTAVAIL)&&(!(JoyState[MyPort]&JP_TYPE_MOUSE)))
  149.       {
  150.         numdevs=MyPort;
  151.         break;
  152.       }
  153.     }
  154.   }
  155.   tj.mv_a=32768;
  156.   tj.mv_b=32768;
  157.  
  158.   if (numdevs == -1)
  159.     return;
  160.   else Port=numdevs;
  161.  
  162.   Con_Printf ("\nAmiga joystick available\n");
  163.   strcpy(strValue,Cvar_VariableString("joy_force0"));
  164.   if (strlen(strValue)==0) strcpy(strValue,"AUTOSENSE");
  165.   SetJoyPortAttrs(0, SJA_Type,   StringToType(strValue), TAG_DONE);
  166.   Con_Printf("Joystick Port 0 is %s\n", strValue);
  167.  
  168.   strcpy(strValue,Cvar_VariableString("joy_force1"));
  169.   if (strlen(strValue)==0) strcpy(strValue,"AUTOSENSE");
  170.   SetJoyPortAttrs(1, SJA_Type,   StringToType(strValue), TAG_DONE);
  171.   Con_Printf("Joystick Port 1 is %s\n", strValue);
  172.  
  173.   strcpy(strValue,Cvar_VariableString("joy_force2"));
  174.   if (strlen(strValue)==0) strcpy(strValue,"AUTOSENSE");
  175.   SetJoyPortAttrs(2, SJA_Type,   StringToType(strValue), TAG_DONE);
  176.   Con_Printf("Joystick Port 2 is %s\n", strValue);
  177.  
  178.   strcpy(strValue,Cvar_VariableString("joy_force3"));
  179.   if (strlen(strValue)==0) strcpy(strValue,"AUTOSENSE");
  180.   SetJoyPortAttrs(3, SJA_Type,   StringToType(strValue), TAG_DONE);
  181.   Con_Printf("Joystick Port 3 is %s\n", strValue);
  182. }
  183.  
  184. void IN_ShutdownJoystick(void) 
  185. { 
  186.   if (LowLevelBase)
  187.   {
  188.     if (!ack1) SystemControl(SCON_RemCreateKeys,1,TAG_END);
  189.     if (!ack0) SystemControl(SCON_RemCreateKeys,0,TAG_END);
  190.     ResetJoystick();
  191.   }
  192. } 
  193.  
  194. void RawValuePointer()
  195. { 
  196.   int button=0;
  197.   int dir=0;
  198.   int joytype;
  199.  
  200.   if (IntuitionBase->FirstScreen != QuakeScreen) return;
  201.  
  202.   if ( ( JoyState[ Port ] = ReadJoyPort(Port)) != JP_TYPE_NOTAVAIL )
  203.   {
  204.     button=(JoyState[ Port ]) & (JP_BUTTON_MASK);
  205.     dir = (JoyState[ Port ]) & (JP_DIRECTION_MASK);
  206.     tj.nvalue=0;
  207.     joytype=JoyState[Port]&JP_TYPE_MASK;
  208.     if ((joytype&JP_TYPE_JOYSTK)&&(joytype&JP_TYPE_GAMECTLR)) joytype=JP_TYPE_GAMECTLR;
  209.     if (((joytype&JP_TYPE_JOYSTK)||(joytype&JP_TYPE_GAMECTLR))==0) joytype=JP_TYPE_JOYSTK;
  210.     switch(joytype)
  211.     {
  212.       case JP_TYPE_GAMECTLR:
  213.       {
  214.         if (stick) stick=0;
  215.         if (button&JPF_BUTTON_RED) tj.value=tj.value|1;
  216.         else if (tj.value&1)
  217.         {
  218.           tj.value=tj.value&~1;
  219.           tj.nvalue|=1;
  220.         }
  221.         if (button&JPF_BUTTON_YELLOW) tj.value=tj.value|4;
  222.         else if (tj.value&4)
  223.         {
  224.           tj.value=tj.value&~4;
  225.           tj.nvalue|=4;
  226.         }
  227.         if (button&JPF_BUTTON_GREEN) tj.value=tj.value|8;
  228.         else if (tj.value&8)
  229.         {
  230.           tj.value=tj.value&~8;
  231.           tj.nvalue|=8;
  232.         }
  233.         if (button&JPF_BUTTON_BLUE) tj.value=tj.value|2;
  234.         else if (tj.value&2)
  235.         {
  236.           tj.value=tj.value&~2;
  237.           tj.nvalue|=2;
  238.         }
  239.         if (button&JPF_BUTTON_FORWARD) tj.value=tj.value|16;
  240.         else if (tj.value&16)
  241.         {
  242.           tj.value=tj.value&~16;
  243.           tj.nvalue|=16;
  244.         }
  245.         if (button&JPF_BUTTON_REVERSE) tj.value=tj.value|32;
  246.         else if (tj.value&32)
  247.         {
  248.           tj.value=tj.value&~32;
  249.           tj.nvalue|=32;
  250.         }
  251.         if (button&JPF_BUTTON_PLAY) tj.value=tj.value|64;
  252.         else if (tj.value&64)
  253.         {
  254.           tj.value=tj.value&~64;
  255.           tj.nvalue|=64;
  256.         }
  257.         if (dir&JPF_JOY_UP) tj.mv_a=0;
  258.         else if (dir&JPF_JOY_DOWN) tj.mv_a=65536;
  259.         else tj.mv_a=32768;
  260.         if (dir&JPF_JOY_LEFT) tj.mv_b=0;
  261.         else if (dir&JPF_JOY_RIGHT) tj.mv_b=65536;
  262.         else tj.mv_b=32768;
  263.       }
  264.       break;
  265.       case JP_TYPE_JOYSTK :
  266.       {
  267.         if (button&JPF_BUTTON_RED) tj.value=tj.value|1;
  268.         else if (tj.value&1)
  269.         {
  270.           tj.value=tj.value&~1;
  271.           tj.nvalue|=1;
  272.         }
  273.         if (dir&JPF_JOY_UP) tj.mv_a=0;
  274.         else if (dir&JPF_JOY_DOWN) tj.mv_a=65536;
  275.         else tj.mv_a=32768;
  276.         if (dir&JPF_JOY_LEFT) tj.mv_b=0;
  277.         else if (dir&JPF_JOY_RIGHT) tj.mv_b=65536;
  278.         else tj.mv_b=32768;
  279.       }
  280.       break;
  281.     }
  282.   }
  283. }
  284.  
  285. void IN_JoyMove (usercmd_t *cmd) 
  286. { 
  287.   float   speed, aspeed;
  288.   int   fAxisValue;
  289.   int key_index;
  290.  
  291.   if (!LowLevelBase) return;
  292.   if (joy_onlypsx.value) return;
  293.   
  294.   if (in_speed.state & 1) speed = cl_movespeedkey.value;
  295.   else speed = 1;
  296.   aspeed = speed * host_frametime;
  297.  
  298.   RawValuePointer();
  299.   fAxisValue= tj.mv_a;
  300.   fAxisValue -= 32768;
  301.   fAxisValue /= 32768;
  302.  
  303.   cmd->forwardmove += (fAxisValue * joy_forwardsensitivity.value) * speed * cl_forwardspeed.value;
  304. #if 0
  305.   if ((joy_advanced.value == 0.0) && (in_mlook.state & 1))
  306.   {
  307.     if (fabs(fAxisValue) > joy_pitchthreshold.value)
  308.     {
  309.       if (m_pitch.value < 0.0) cl.viewangles[PITCH] -= (fAxisValue * joy_pitchsensitivity.value) * aspeed * cl_pitchspeed.value;
  310.       else cl.viewangles[PITCH] += (fAxisValue * joy_pitchsensitivity.value) * aspeed * cl_pitchspeed.value;
  311.     }
  312.   }
  313.   else cmd->forwardmove += (fAxisValue * joy_forwardsensitivity.value) * speed * cl_forwardspeed.value;
  314. #endif
  315.  
  316.   fAxisValue = tj.mv_b;
  317.   fAxisValue -= 32768;
  318.   fAxisValue /= 32768;
  319.   cl.viewangles[YAW] -= (fAxisValue * 0.5 * joy_pitchsensitivity.value) * aspeed * cl_pitchspeed.value;
  320.   if (tj.value&1)
  321.   {
  322.     key_index = K_JOY1;
  323.     Key_Event(key_index+3,true);
  324.   }
  325.   else
  326.   {
  327.     if (tj.nvalue&1)
  328.     {
  329.       key_index = K_JOY1;
  330.       Key_Event(key_index+3,false);
  331.     }
  332.   }
  333.   if (stick) return;
  334.   if (tj.value&2)
  335.   {
  336.     key_index = K_JOY1;
  337.     Key_Event(key_index,true);
  338.   }
  339.   else
  340.   {
  341.     if (tj.nvalue&2)
  342.     {
  343.       key_index = K_JOY1;
  344.       Key_Event(key_index,false);
  345.     }
  346.   }
  347.   if (tj.value&4)
  348.   {
  349.     key_index = K_JOY1;
  350.     Key_Event(key_index+2,true);
  351.   }
  352.   else
  353.   {
  354.     if (tj.nvalue&4)
  355.     {
  356.       key_index = K_JOY1;
  357.       Key_Event(key_index+2,false);
  358.     }
  359.   }
  360.   if (tj.value&8)
  361.   {
  362.     key_index = K_JOY1;
  363.     Key_Event(key_index+1,true);
  364.   }
  365.   else
  366.   {
  367.     if (tj.nvalue&8)
  368.     {
  369.       key_index = K_JOY1;
  370.       Key_Event(key_index+1,false);
  371.     }
  372.   }
  373.   if (tj.value&16) cmd->sidemove -= (joy_sidesensitivity.value) * speed * cl_sidespeed.value;
  374.   if (tj.value&32) cmd->sidemove += (joy_sidesensitivity.value) * speed * cl_sidespeed.value;
  375. } 
  376.