//--------------------------------------------------------------------
// Copyright(C)2009, ForexTradingLaboratory
// http://www.ftlabo.com/index.php
// ono@ftlabo.com
// Rev.000
//--------------------------------------------------------------------

#property copyright "Copyright(C)2010, ForexTradingLaboratory"
#property link      "http://www.ftlabo.com/"

//パラメータ
#property indicator_chart_window

//プログラム名
extern string Program               = "Add Alert and SendMail";
extern string Rev                   = "Rev.000";
extern string Copyright             = "Copyright(C)2010, ForexTradingLaboratory";
extern string URL                   = "http://www.ftlabo.com/";
extern string EMail                 = "info@ftlabo.com";
extern string IndiName              = "";
extern int    Mode                  = 0;
extern int    SignalShift           = 0;
extern bool   IsUseAlert            = true;
extern string AlertText             = "Alert!!";
extern bool   IsUseMail             = true;
extern string MailSubject           = "Indicator Signal Subject";
extern string MailBody              = "Signal Body";
extern bool   VoidSetting           = true;
extern double Para1                 = 0;
extern double Para2                 = 0;
extern double Para3                 = 0;
extern double Para4                 = 0;
extern double Para5                 = 0;
extern double Para6                 = 0;
extern double Para7                 = 0;
extern double Para8                 = 0;
extern double Para9                 = 0;
extern double Para10                = 0;
extern double Para11                = 0;
extern double Para12                = 0;
extern double Para13                = 0;
extern double Para14                = 0;
extern double Para15                = 0;
extern double Para16                = 0;
extern double Para17                = 0;
extern double Para18                = 0;
extern double Para19                = 0;
extern double Para20                = 0;

bool Done = false;
//--------------------------------------------------------------------
// expert initialization function
//--------------------------------------------------------------------
int init()
{   
   return(0);
}

//+-------------------------------------------------------------------
//| expert deinitialization function
//+-------------------------------------------------------------------
int deinit()
  {
   return(0);
  }
//+-------------------------------------------------------------------
//| expert start function
//+-------------------------------------------------------------------
int start()
  {
   bool isNewCandle = CheckNewCandle();
   
   double cstm;
   if(VoidSetting) cstm = iCustom(NULL, 0, IndiName, Mode, SignalShift);
   else            cstm = iCustom(NULL, 0, IndiName, Para1, Para2, Para3, Para4, Para5, Para6, Para7, Para8, Para9, Para10, Para11, Para12, Para13, Para14, Para15, Para16, Para17, Para18, Para19, Para20, Mode, SignalShift);
   
   if(isNewCandle)Done=false;
   
   if(cstm!=EMPTY_VALUE && !Done){
      if(IsUseAlert)Alert(AlertText);
      if(IsUseMail)SendMail(MailSubject, MailBody);
      Done = true;
   }
   
   return(0);
  }

//---------------------------------------------------------------------------//

bool CheckNewCandle(){
   static datetime beforeTime;
   
   if(beforeTime != Time[0]){
      beforeTime = Time[0];
      return(true);
   }
   return(false);
}