Cygwin support, using SDL.
[btb/d2x.git] / unused / win95 / tactile.c
1 /*
2 THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
3 SOFTWARE CORPORATION ("PARALLAX").  PARALLAX, IN DISTRIBUTING THE CODE TO
4 END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
5 ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
6 IN USING, DISPLAYING,  AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
7 SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
8 FREE PURPOSES.  IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
9 CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES.  THE END-USER UNDERSTANDS
10 AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.  
11 COPYRIGHT 1993-1999 PARALLAX SOFTWARE CORPORATION.  ALL RIGHTS RESERVED.
12 */
13
14
15 #pragma off (unreferenced)
16 static char rcsid[] = "$Id: tactile.c,v 1.1.1.1 2001-01-19 03:30:15 bradleyb Exp $";
17 #pragma on (unreferenced)
18
19
20 #include "types.h"
21
22 #include "iforce.h"
23 #include "tactile.h"
24
25 //@@#include "win\cyberimp.h"
26
27 #include "mono.h"
28 #include "vecmat.h"
29
30
31
32 int TactileStick=0;
33 void CloseTactileStick (void);
34
35 int Tactile_open (int port)
36  {
37   switch (TactileStick)
38    {
39          case TACTILE_IMMERSION:
40         #if defined (__NT__) 
41                 if (!IForce_Init(port)) {
42                         TactileStick = 0;
43                 }
44         #endif
45                 break;
46
47 //@@    case TACTILE_CYBERNET:
48 //@@            if (!CyberImpactInit()) {       
49 //@@                    mprintf((0, "Unable to initialize CyberImpact Device.\n"));
50 //@@                    atexit(CyberImpactClose);
51 //@@            }
52 //@@            else {
53 //@@                    mprintf((0, "CyberImpact Device initialized.\n"));
54 //@@                    TactileStick = 0;
55 //@@            }       
56 //@@            break;
57
58          default:
59                 break;
60         }
61         return (TactileStick);
62  }      
63
64 #define MAX_FORCE (i2f(10))
65
66 void Tactile_apply_force (vms_vector *force_vec,vms_matrix *orient)
67  {  
68     int feedforce;
69     fix feedmag,tempfix=0;
70     vms_angvec feedang;
71     vms_vector feedvec;
72          unsigned short tempangle;
73          int realangle;
74                  
75     if (TactileStick==TACTILE_IMMERSION)
76           {
77                  vm_vec_rotate (&feedvec,force_vec,orient);
78                  vm_extract_angles_vector(&feedang,&feedvec);
79                  feedmag=vm_vec_mag_quick (force_vec);  
80             feedforce=f2i(fixmuldiv (feedmag,i2f(100),MAX_FORCE));
81                                 
82                  mprintf ((0,"feedforce=%d\n",feedforce));
83                
84                  if (feedforce<0)
85                         feedforce=0;
86                  if (feedforce>100)
87                 feedforce=100;
88                         
89                  tempangle=(unsigned short)feedang.h;                           
90                  tempfix=tempangle;
91                         
92                  realangle=f2i(fixmul(tempfix,i2f(360)));
93                  realangle-=180;
94                  if (realangle<0)
95                         realangle+=360; 
96         
97                  Jolt (feedforce,realangle,feedforce*7);
98           }
99                         
100
101  }
102
103 void Tactile_jolt (int mag,int angle,int duration)
104  {
105   if (TactileStick==TACTILE_IMMERSION)
106         {
107          Jolt (mag,angle,duration);
108         }
109  }
110                         
111 void Tactile_Xvibrate (int mag,int freq)
112  {
113   if (TactileStick==TACTILE_IMMERSION)
114    {
115     XVibration (mag,mag,freq);
116    }
117  }
118
119 void Tactile_Xvibrate_clear ()
120  {
121   if (TactileStick==TACTILE_IMMERSION)
122    {
123     XVibrationClear();
124    }    
125  }  
126
127 void Tactile_do_collide ()
128  {
129  }
130
131 void CloseTactileStick ()
132  {
133   int i=0;      
134   if (TactileStick==TACTILE_IMMERSION)
135    {
136     while (i<5)
137      {
138       if (CloseStick())
139                  break;
140                 i++;
141           }
142         }
143  }
144