Onderwerp: nmea repeater : wensen?

double twindspeed(double wspeed,double wangle,double speed)
{
	double a , bb , b , angle ;
	angle = (wangle / 180) * PI ;
	a = wspeed * sin(angle);
	b = wspeed * cos(angle);
	bb = b - speed;
	return 	sqrt(pow(a,2)+pow(bb,2));
}
double twindangle(double wspeed,double wangle,double speed)
{
	double a , bb , b , angle ;
	angle = (wangle / 180) * PI ;
	a = wspeed * sin(angle);
	b = wspeed * cos(angle);
	bb = b - speed;
	angle = atan(a/bb)*180/PI ;
	if (angle < 0) angle = 180 + angle ;
	return 	angle ;
}

=== MWV - Wind Speed and Angle ===

-------------------------------
1   2 3   4 5
|   | |   | |
$--MWV,x.x,a,x.x,a*hh<CR><LF>
-------------------------------

Field Number:

1. Wind Angle, 0 to 360 degrees
2. Reference, R = Relative, T = True
3. Wind Speed
4. Wind Speed Units, K/M/N
5. Status, A = Data Valid
6. Checksum

=== VWR - Relative Wind Speed and Angle ===

------------------------------------------
1  2  3  4  5  6  7  8 9
|  |  |  |  |  |  |  | |
$--VWR,x.x,a,x.x,N,x.x,M,x.x,K*hh<CR><LF>
------------------------------------------

Field Number:

1. Wind direction magnitude in degrees
2. Wind direction Left/Right of bow
3. Speed
4. N = Knots
5. Speed
6. M = Meters Per Second
7. Speed
8. K = Kilometers Per Hour
9. Checksum

If ( wspeed == 0 && speed > 0 ) angle = 180 ;

if ( wangle == 0 && wspeed < speed ) angle = 180 ;

if ( bb == 0) angle = 90 ;