Ver Mensaje Individual
  #6  
Antiguo 13-07-2015
Avatar de cesarsoftware
cesarsoftware cesarsoftware is offline
Miembro
 
Registrado: nov 2006
Posts: 241
Reputación: 18
cesarsoftware Va por buen camino
Bueno, si a alguien le interesa, que espero que si, me respondo a mi mismo

Antes usaba esta funcion para obtener cada posicion de seno y un tiempo determinado me daba mas o menos puntos de seno.
Código Delphi [-]
Result := amplitud * Sin(velocidad / (2 * PI) * frecuencia);

Ahora lo que he echo es
Código Delphi [-]
factor := (2 * PI) / numeroMovimientos;
n := 0;
For s := 1 To numeroMovimientos do // puntos de seno = milisegundos de duracion
begin
posicion := amplitud * (Cos((n + 1) * factor) - 1); // n es ordinal de los milisegundos a avanzar
Inc(n);
 ......

(http://fotos.miarroba.es/cesarleo/207-cosenosimple/)

E incluso con varios ciclos

(http://fotos.miarroba.es/cesarleo/208-cosenotriple/)

El truco, aparte de la frecuencia, es que el seno comienza en 0 (cero) y el coseno en la posicón máxima de amplitud

De nada,
Un saludo.
__________________
Disfruta de la vida ahora, vas a estar muerto mucho tiempo.

Última edición por ecfisa fecha: 13-07-2015 a las 22:34:10. Razón: agregar imágenes
Responder Con Cita