//#include "trop.h"
#include "tfxparam.h"
#include "perlinnoise.h"
#include "stdfx.h"
#include "tspectrumparam.h"
 
class CloudsFx : public TStandardZeraryFx
{
	FX_PLUGIN_DECLARATION(CloudsFx)
	TIntEnumParamP m_type;
	TDoubleParamP m_size;
	TDoubleParamP m_min;
	TDoubleParamP m_max;
	TDoubleParamP m_evol;
	TSpectrumParamP m_colors;
 
public:
	CloudsFx()
		: m_type(new TIntEnumParam(PNOISE_CLOUDS, "Clouds")), m_size(100.0), m_min(0.0), m_max(1.0), m_evol(0.0)
	{
		bindParam(this, "type", m_type);
		m_type->addItem(PNOISE_WOODS, "Marble/Wood");
		bindParam(this, "size", m_size);
		bindParam(this, "min", m_min);
		bindParam(this, "max", m_max);
		bindParam(this, "evolution", m_evol);
		TSpectrum::ColorKey colors[] = {
			TSpectrum::ColorKey(0, TPixel32::White),
			TSpectrum::ColorKey(1, TPixel32::Transparent)};
		m_colors = TSpectrumParamP(tArrayCount(colors), colors);
		bindParam(this, "colors", m_colors);
		m_size->setValueRange(0, 200);
		m_min->setValueRange(0, 1.0);
		m_max->setValueRange(0, 1.0);
	}
 
	~CloudsFx(){};
 
	bool doGetBBox(double, TRectD &bbox, const TRenderSettings &info)
	{
		bbox = TConsts::infiniteRectD;
		return true;
	};
 
	void doCompute(TTile &tile, double frame, const TRenderSettings &ri);
 
	bool canHandle(const TRenderSettings &info, double frame) { return false; }
	//TAffine handledAffine(const TRenderSettings& info, double frame) {return TAffine();}
};
 
//==================================================================
 
void CloudsFx::doCompute(
	TTile &tile,
	double frame,
	const TRenderSettings &ri)
{
	double scale = sqrt(fabs(ri.m_affine.det()));
	int type = m_type->getValue();
	double min = m_min->getValue(frame);
	double max = m_max->getValue(frame);
	double evolution = m_evol->getValue(frame);
	double size = m_size->getValue(frame) / ri.m_shrinkX;
	size = fabs(size);
	if (size < 0.01)
		size = 0.01;
	TPointD pos = tile.m_pos;
 
	doClouds(
		tile.getRaster(),
		m_colors,
		pos, evolution, size, min, max, type, scale, frame);
}
 
FX_PLUGIN_IDENTIFIER(CloudsFx, "cloudsFx");