//+------------------------------------------------------------------+
//| Àíäðåé Îïåéäà Êîììåíòàòîð |
//+------------------------------------------------------------------+
#property copyright "Îïåéäà Àíäðåé"
#property link "itrytobenotlinked"
//----
#property indicator_chart_window
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
IndicatorShortName("Comentator");
return(0);
}
//+------------------------------------------------------------------+
//| Custor indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start()
{
int i=0;
// Demarker
double valDem=iDeMarker(NULL, 0, 13, 0);
string commentDem="DeMarker: ";
string commentDemAdd=" Íåò äàííûõ";
//----
if (valDem < 0.30)
commentDemAdd= " Îæèäàåòñÿ ðàçâîðîò öåí Ââåðõ";
if (valDem > 0.70)
commentDemAdd= " Îæèäàåòñÿ ðàçâîðîò öåí Âíèç";
commentDem=commentDem + commentDemAdd;
//ATR
double valATR=iATR(NULL, 0, 12, 0);
string commentATR="ATR: ";
commentATR=commentATR + " Âåðîÿòíîñòü ñìåíû òðåíäà " + valATR;
//AÑ
string commentAC="AC: ";
string commentACAdd="Íåò äàííûõ ";
string commentACAdd0="Íåò äàííûõ ";
string commentACAdd1="Íåò äàííûõ ";
string commentACAdd2="Íåò äàííûõ ";
double valAC0=iAC(NULL, 0, 0);
double valAC1=iAC(NULL, 0, 1);
//----
if (valAC1 < valAC0)
commentACAdd="Íå æåëàòåëüíî ïðîäàâàòü";
if (valAC1 > valAC0)
commentACAdd="Íå æåëàòåëüíî ïîêóïàòü";
bool theeRedUpper=true;
for(i=2; i>=0; i--)
{
if(iAC(NULL, 0, i) < iAC(NULL, 0, i+1))
{
if(iAC(NULL, 0, i)<=0)
theeRedUpper=false;
}
else
theeRedUpper=false;
}
if (theeRedUpper==true)
commentACAdd0="Êîðîòêàÿ ïîçèöèÿ";
//----
bool theeGreenDown=true;
for(i=2; i>=0; i--)
{
if(iAC(NULL, 0, i) > iAC(NULL, 0, i+1))
{
if(iAC(NULL, 0, i)>=0)
theeGreenDown=false;
}
else
theeGreenDown=false;
}
if (theeGreenDown==true)
commentACAdd0="Äëèííàÿ ïîçèöèÿ";
//----
bool twoRedUpper=true;
for(i=1; i>=0; i--)
{
if(iAC(NULL, 0, i) > iAC(NULL, 0, i+1))
twoRedUpper=false;
}
if (twoRedUpper==true)
commentACAdd2="Êîðîòêàÿ ïîçèöèÿ";
//----
bool twoGreenDown=true;
for(i=2; i>=0; i--)
{
if(iAC(NULL, 0, i) < iAC(NULL, 0, i+1))
twoGreenDown=false;
}
if (twoGreenDown==true)
commentACAdd2="Äëèííàÿ ïîçèöèÿ";
if (iAC(NULL, 0, 0) < 0)
{
if (theeRedUpper==true)
commentACAdd1="Âîçìîæíà ïîêóïêà, ";
if (theeGreenDown==true)
commentACAdd1="Âîçìîæíà ïîêóïêà, ";
if (twoRedUpper==true)
commentACAdd2="Âîçìîæíà ïðîäàæà, ";
}
if (iAC(NULL, 0, 0) > 0)
{
if (theeRedUpper==true)
commentACAdd1="Âîçìîæíà ïðîäàæà, ";
if (theeGreenDown==true)
commentACAdd1="Âîçìîæíà ïðîäàæà, ";
if (twoGreenDown==true)
commentACAdd2="Âîçìîæíà ïîêóïêà, ";
}
commentAC=commentAC
+ "\n" + " " +commentACAdd
+ "\n" + " " + commentACAdd1+ commentACAdd0
+ "\n" + " " + commentACAdd2
;
//CCI
double valCCI=iCCI(NULL,0,12,PRICE_MEDIAN,0);
string commentCCI="CCI: ";
string commentCCIAdd=" Íåò äàííûõ ";
//----
if (valCCI > 100)
commentCCIAdd= " Cîñòîÿíèå ïåðåêóïëåííîñòè (âåðîÿòíîñòü êîððåêòèðóþùåãî ñïàäà) ";
if (valCCI < -100)
commentCCIAdd= " Cîñòîÿíèå ïåðåïðîäàííîñòè (âåðîÿòíîñòü êîððåêòèðóþùåãî ïîäúåìà) ";
commentCCI= commentCCI + commentCCIAdd + valCCI;
//MFI
double valMFI=iMFI(NULL,0,14,0);
string commentMFI="MFI: ";
string commentMFIAdd=" Íåò äàííûõ ";
//----
if (valMFI > 80)
commentMFIAdd= " ïîòåíöèàëüíîàÿ âåðøèíà ðûíêà ";
if (valMFI < 20)
commentMFIAdd= " ïîòåíöèàëüíîàå îñíîâàíèå ðûíêà ";
commentMFI= commentMFI + commentMFIAdd + valMFI;
//WPR
double valWPR=iWPR(NULL,0,14,0);
string commentWPR="R%: ";
string commentWPRAdd=" Íåò äàííûõ ";
//----
if (valWPR < -80)
commentWPRAdd= " ñîñòîÿíèå ïåðåïðîäàííîñòè (ðàçóìíî äîæäàòüñÿ ïîâîðîòà öåí ââåðõ) ";
if (valWPR > -20)
commentWPRAdd= " ñîñòîÿíèå ïåðåêóïëåííîñòè (ðàçóìíî äîæäàòüñÿ ïîâîðîòà öåí âíèç) ";
commentWPR= commentWPR + commentWPRAdd + valWPR;
//STOCH
double valSTOCH=0;
string commentSTOCH="Stoch: ";
string commentSTOCHAdd=" Íåò äàííûõ ";
//----
if(iStochastic(NULL,0,5,3,3,MODE_SMA,0,MODE_MAIN,0)>iStochastic(NULL,0,5,3,3,MODE_SMA,0,MODE_SIGNAL,0))
commentSTOCHAdd= " Âîçìîæíà ïîêóïêà";
if(iStochastic(NULL,0,5,3,3,MODE_SMA,0,MODE_MAIN,0)<iStochastic(NULL,0,5,3,3,MODE_SMA,0,MODE_SIGNAL,0))
commentSTOCHAdd= " Âîçìîæíà ïðîäàæà";
commentSTOCH= commentSTOCH + commentSTOCHAdd;
//Momentum
double valMom=0;
string commentMom="Momentum: ";
string commentMomAdd=" Íåò äàííûõ ";
//----
if((iMomentum(NULL,0,14,PRICE_CLOSE,1) < 100) && (iMomentum(NULL,0,14,PRICE_CLOSE,0) > 100))
commentMomAdd= " Ñèãíàë ê ïîêóïêå";
if((iMomentum(NULL,0,14,PRICE_CLOSE,1) > 100) && (iMomentum(NULL,0,14,PRICE_CLOSE,0) < 100))
commentMomAdd= " Ñèãíàë ê ïðîäàæå";
commentMom= commentMom + commentMomAdd;
//----
Comment("Èíäèêàòîðû\n"
+commentSTOCH + "\n"
+commentWPR + "\n"
+commentMFI + "\n"
+commentDem + "\n"
+commentCCI + "\n"
+commentATR + "\n"
+commentMom + "\n"
+commentAC + "\n"
);
return(0);
}
//+------------------------------------------------------------------+
Sample
Analysis
Market Information Used:
Indicator Curves created:
Indicators Used:
DeMarker indicator
Indicator of the average true range
Bill Williams Accelerator/Decelerator oscillator
Commodity channel index
Money flow index
Larry William percent range indicator
Stochastic oscillator
Momentum indicator
Custom Indicators Used:
Order Management characteristics:
Other Features: