NAME

Rinchi::CIGIPP::WeatherConditionsResponse - Perl extension for the Common Image Generator Interface - Weather Conditions Response data packet. data packet. =head1 SYNOPSIS

  use Rinchi::CIGIPP::WeatherConditionsResponse;
  my $wthr_resp = Rinchi::CIGIPP::WeatherConditionsResponse->new();

  $packet_type = $wthr_resp->packet_type();
  $packet_size = $wthr_resp->packet_size();
  $request_ident = $wthr_resp->request_ident(41);
  $humidity = $wthr_resp->humidity(45);
  $air_temperature = $wthr_resp->air_temperature(76.992);
  $visibility_range = $wthr_resp->visibility_range(36.303);
  $horizontal_wind_speed = $wthr_resp->horizontal_wind_speed(47.571);
  $vertical_wind_speed = $wthr_resp->vertical_wind_speed(45.084);
  $wind_direction = $wthr_resp->wind_direction(0.137);
  $barometric_pressure = $wthr_resp->barometric_pressure(89.194);

DESCRIPTION

The Weather Conditions Response packet is sent in response to an Environmental Conditions Request packet whose Request Type attribute specifies Weather Conditions. The packet describes atmosphere properties at the requested geodetic position.

EXPORT

None by default.

#==============================================================================

new $wthr_resp = Rinchi::CIGIPP::WeatherConditionsResponse->new()

Constructor for Rinchi::WeatherConditionsResponse.

sub packet_type()

 $value = $wthr_resp->packet_type();

Data Packet Identifier.

This attribute identifies this data packet as the Weather Conditions Response packet. The value of this attribute must be 109.

sub packet_size()

 $value = $wthr_resp->packet_size();

Data Packet Size.

This attribute indicates the number of bytes in this data packet. The value of this attribute must be 32.

sub request_ident([$newValue])

 $value = $wthr_resp->request_ident($newValue);

Request ID.

This attribute identifies the environmental conditions request to which this response packet corresponds.

sub humidity([$newValue])

 $value = $wthr_resp->humidity($newValue);

Humidity.

This attribute indicates the humidity at the requested location.

sub air_temperature([$newValue])

 $value = $wthr_resp->air_temperature($newValue);

Air Temperature.

This attribute indicates the air temperature, measured in degrees Celcius, at the requested location.

sub visibility_range([$newValue])

 $value = $wthr_resp->visibility_range($newValue);

Visibility Range.

This attribute indicates the visibility range, measured in meters, at the requested location.

sub horizontal_wind_speed([$newValue])

 $value = $wthr_resp->horizontal_wind_speed($newValue);

Horizontal Wind Speed.

This attribute indicates the local wind speed, measured in meters/second, parallel to the ellipsoid-tangential reference plane.

sub vertical_wind_speed([$newValue])

 $value = $wthr_resp->vertical_wind_speed($newValue);

Vertical Wind Speed.

This attribute indicates the local vertical wind speed, measured in meters/second. Note: A positive value indicates an updraft, while a negative value indicates a downdraft.

sub wind_direction([$newValue])

 $value = $wthr_resp->wind_direction($newValue);

Wind Direction.

This attribute indicates the local wind direction.

Note: This is the direction from which the wind is blowing.

Datum: True North

sub barometric_pressure([$newValue])

 $value = $wthr_resp->barometric_pressure($newValue);

Barometric Pressure.

This attribute indicates the atmospheric pressure at the requested location.

sub pack()

 $value = $wthr_resp->pack();

Returns the packed data packet.

sub unpack()

 $value = $wthr_resp->unpack();

Unpacks the packed data packet.

sub byte_swap()

 $obj_name->byte_swap();

Byte swaps the packed data packet.

SEE ALSO

Refer the the Common Image Generator Interface ICD which may be had at this URL: http://cigi.sourceforge.net/specification.php

AUTHOR

Brian M. Ames, <bmames@apk.net>

COPYRIGHT AND LICENSE

Copyright (C) 2009 by Brian M. Ames

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.6 or, at your option, any later version of Perl 5 you may have available.