//#include "trop.h"
#include "tfxparam.h"
#include "perlinnoise.h"
#include "stdfx.h"
#include "tspectrumparam.h"
 
class CloudsFx final : 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) override {
    bbox = TConsts::infiniteRectD;
    return true;
  };
 
  void doCompute(TTile &tile, double frame, const TRenderSettings &ri) override;
 
  bool canHandle(const TRenderSettings &info, double frame) override {
    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");