2015-01-11 16:42:31 +00:00
|
|
|
/*
|
|
|
|
* Author: commy2
|
|
|
|
* Get the compass direction the wind is blowing from.
|
|
|
|
*
|
2015-09-20 23:07:49 +00:00
|
|
|
* Arguments:
|
|
|
|
* None
|
|
|
|
*
|
|
|
|
* Return Value:
|
|
|
|
* Wind cardinal direction <STRING>
|
2015-01-11 16:42:31 +00:00
|
|
|
*
|
2015-09-20 23:07:49 +00:00
|
|
|
* Public: Yes
|
2015-01-11 16:42:31 +00:00
|
|
|
*/
|
2015-01-13 19:56:02 +00:00
|
|
|
#include "script_component.hpp"
|
2015-01-11 16:42:31 +00:00
|
|
|
|
2015-09-20 23:07:49 +00:00
|
|
|
localize ([
|
|
|
|
LSTRING(S),
|
|
|
|
LSTRING(SSW),
|
|
|
|
LSTRING(SW),
|
|
|
|
LSTRING(WSW),
|
|
|
|
LSTRING(W),
|
|
|
|
LSTRING(WNW),
|
|
|
|
LSTRING(NW),
|
|
|
|
LSTRING(NNW),
|
|
|
|
LSTRING(N),
|
|
|
|
LSTRING(NNE),
|
|
|
|
LSTRING(NE),
|
|
|
|
LSTRING(ENE),
|
|
|
|
LSTRING(E),
|
|
|
|
LSTRING(ESE),
|
|
|
|
LSTRING(SE),
|
|
|
|
LSTRING(SSE),
|
|
|
|
LSTRING(S)
|
|
|
|
] select (round (windDir / 360 * 16))) // return
|