vroman/edivc
SHA256
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

Revision de tan

Browse source
This commit is contained in:
Víctor Román Archidona 2002-12-20 19:04:31 +00:00
parent 486d4607b2
commit 03a4d87eea
2 changed files with 19 additions and 32 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
dlls/src/math/CHANGE_LOG.txt
View file

@ -1,4 +1,5 @@
19/12/2002 19/12/2002
---------- ----------
* Creamos el CHANGE_LOG.txt para la libreria math de eDIV (Daijo) * Optimizada la rutina tan (CicTec)
* Añadidas las funciones: fixtoi8, fixtoi16, itofix8 y itofix16 (CicTec) * Añadidas las funciones: fixtoi8, fixtoi16, itofix8 y itofix16 (CicTec)
* Creamos el CHANGE_LOG.txt para la libreria math de eDIV (Daijo)

46
dlls/src/math/math.c
View file

@ -16,7 +16,10 @@
* You should have received a copy of the GNU General Public License * You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software * along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*
* $Id$
*/ */
#include <stdio.h> #include <stdio.h>
#include <time.h> #include <time.h>
#include <math.h> #include <math.h>
@ -113,8 +116,8 @@ int eDIV_rand_seed(FUNCTION_PARAMS){
int eDIV_sin(FUNCTION_PARAMS){ int eDIV_sin(FUNCTION_PARAMS){
int a=getparm(); int a=getparm();
a=prepara_angulo(a); a=prepara_angulo(a);
if(a<=90000) return seno[a]; if(a<=90000) return seno[a];
if(a<=180000) return seno[180000-a]; if(a<=180000) return seno[180000-a];
if(a<=270000) return -seno[a-180000]; if(a<=270000) return -seno[a-180000];
return -seno[360000-a]; return -seno[360000-a];
} }
@ -122,7 +125,7 @@ int eDIV_sin(FUNCTION_PARAMS){
int eDIV_cos(FUNCTION_PARAMS){ int eDIV_cos(FUNCTION_PARAMS){
int a=getparm(); int a=getparm();
a=prepara_angulo(a); a=prepara_angulo(a);
if(a<=90000) return seno[90000-a]; if(a<=90000) return seno[90000-a];
if(a<=180000) return -seno[a-90000]; if(a<=180000) return -seno[a-90000];
if(a<=270000) return -seno[270000-a]; if(a<=270000) return -seno[270000-a];
return seno[a-270000]; return seno[a-270000];
@ -132,31 +135,11 @@ int eDIV_tan(FUNCTION_PARAMS){
int b,c; int b,c;
int a=getparm(); int a=getparm();
a=prepara_angulo(a); a=prepara_angulo(a);
if(a<=90000) if(a<=90000) { b= seno[a]; c= seno[90000-a]; }
b=seno[a]; else if(a<=180000){ b= seno[180000-a]; c=-seno[a-90000]; }
else else if(a<=270000){ b=-seno[a-180000]; c=-seno[270000-a]; }
if(a<=180000) else { b=-seno[360000-a]; c= seno[a-270000]; }
b=seno[180000-a]; return ((c==0)?(0x7FFFFFFF):((int)(b/c)));
else
if(a<=270000)
b=-seno[a-180000];
else
b=-seno[360000-a];
if(a<=90000)
c=seno[90000-a];
else
if(a<=180000)
c=-seno[a-90000];
else
if(a<=270000)
c=-seno[270000-a];
else
c=seno[a-270000];
if(c==0)
return 0x7FFFFFFF;
else
return ((int)(b/c));
return 0 ;
} }
int eDIV_get_angle(FUNCTION_PARAMS){ int eDIV_get_angle(FUNCTION_PARAMS){
@ -422,7 +405,7 @@ float eDIV_fxmid(FUNCTION_PARAMS){
/* Entrypoints */ /* Entrypoints */
void first_load(FUNCTION_PARAMS){ void first_load(FUNCTION_PARAMS){
int i ; int i;
/* Calculamos los senos del 0 al 90000C */ /* Calculamos los senos del 0 al 90000C */
for(i=0; i<90000; i++) for(i=0; i<90000; i++)
seno[i]=ftomil((float)sin((i/1000)*PIOVER180)); seno[i]=ftomil((float)sin((i/1000)*PIOVER180));
@ -432,7 +415,7 @@ void first_load(FUNCTION_PARAMS){
/* Funciones internas de la DLL */ /* Funciones internas de la DLL */
int ftomil(float n){ int ftomil(float n){
return((int)(n*1000)); return ((int)(n*1000));
} }
int prepara_angulo(int n){ int prepara_angulo(int n){
@ -440,3 +423,6 @@ int prepara_angulo(int n){
if(n<0) n=n+360000; if(n<0) n=n+360000;
return n; return n;
} }