0
//+------------------------------------------------------------------+
//| #MTF_Supertrend.mq4 |
//| Copyright © 2017, MetaQuotes Software Corp. |
//| www.metaquotes.net |
//+------------------------------------------------------------------+
#property copyright «MTF SuperTrend | Copyright © 2017»
#property link «fxprosystems.com»

#property indicator_chart_window
#property indicator_buffers 4
#property indicator_color1 Lime
#property indicator_color2 Magenta

//---- input parameters
/*************************************************************************
PERIOD_M1 1
PERIOD_M5 5
PERIOD_M15 15
PERIOD_M30 30
PERIOD_H1 60
PERIOD_H4 240
PERIOD_D1 1440
PERIOD_W1 10080
PERIOD_MN1 43200
You must use the numeric value of the timeframe that you want to use
when you set the TimeFrame' value with the indicator inputs.
— PRICE_CLOSE 0 Close price.
PRICE_OPEN 1 Open price.
PRICE_HIGH 2 High price.
PRICE_LOW 3 Low price.
PRICE_MEDIAN 4 Median price, (high+low)/2.
PRICE_TYPICAL 5 Typical price, (high+low+close)/3.
PRICE_WEIGHTED 6 Weighted close price, (high+low+close+close)/4.
You must use the numeric value of the Applied Price that you want to use
when you set the 'applied_price' value with the indicator inputs.
**************************************************************************/

extern int TimeFrame=0;
extern bool AlertsMessage = true;
extern bool AlertsSound = false;
extern bool AlertsEmail = false;
extern bool AlertsMobile = false;

datetime TimeBar;
//--------------------------------+
double TrendUp[];
double TrendDown[];
int st = 0;
//extern int SlowerEMA = 6;

double ExtMapBuffer1[];
double ExtMapBuffer2[];

//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
//---- indicators

SetIndexStyle(0, DRAW_LINE, 1,3);
SetIndexBuffer(0, ExtMapBuffer1);
SetIndexStyle(1, DRAW_LINE, 1,3);
SetIndexBuffer(1, ExtMapBuffer2);
/*SetIndexStyle(0, DRAW_ARROW, EMPTY);
SetIndexArrow(0, 159);
SetIndexBuffer(0, TrendUp);
SetIndexStyle(1, DRAW_ARROW, EMPTY);
SetIndexArrow(1, 159);
SetIndexBuffer(1, TrendDown);*/
/*for(int i = 0; i < Bars; i++) {
TrendUp[i] = NULL;
TrendDown[i] = NULL;
}*/
//---- name for DataWindow and indicator subwindow label
switch(TimeFrame)
{
case 1: string TimeFrameStr=«Period_M1»; break;
case 5: TimeFrameStr=«Period_M5»; break;
case 15: TimeFrameStr=«Period_M15»; break;
case 30: TimeFrameStr=«Period_M30»; break;
case 60: TimeFrameStr=«Period_H1»; break;
case 240: TimeFrameStr=«Period_H4»; break;
case 1440: TimeFrameStr=«Period_D1»; break;
case 10080: TimeFrameStr=«Period_W1»; break;
case 43200: TimeFrameStr=«Period_MN1»; break;
default: TimeFrameStr=«Current Timeframe»;
}
IndicatorShortName(«Supertrend(»+st+") ("+TimeFrameStr+")");

return(0);

}
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
//----
/*for(int i = 0; i < Bars; i++) {
TrendUp[i] = NULL;
TrendDown[i] = NULL;
}*/
//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start()
{
datetime TimeArray[];
int i,shift,limit,y=0,counted_bars=IndicatorCounted();
// Plot defined timeframe on to current timeframe
ArrayCopySeries(TimeArray,MODE_TIME,Symbol(),TimeFrame);
limit=Bars-counted_bars;
for(i=0,y=0;i<limit;i++)
{
if (Time[i]<TimeArray[y]) y++;
/***********************************************************
Add your main indicator loop below. You can reference an existing
indicator with its iName or iCustom.
Rule 1: Add extern inputs above for all neccesary values
Rule 2: Use 'TimeFrame' for the indicator timeframe
Rule 3: Use 'y' for the indicator's shift value
**********************************************************/
ExtMapBuffer1[i]=iCustom(NULL,TimeFrame,«Supertrend»,0,y);
ExtMapBuffer2[i]=iCustom(NULL,TimeFrame,«Supertrend»,1,y);
}
//-------------------------------------------------------------------+
if(AlertsMessage || AlertsSound || AlertsEmail || AlertsMobile)
{
string message1 = (WindowExpertName()+" * "+Symbol()+" "+PeriodString()+" * MTF SuperTrend_Signal: Trend_UP!");
string message2 = (WindowExpertName()+" * "+Symbol()+" "+PeriodString()+" * MTF SuperTrend_Signal: Trend_DN!");
if(TimeBar!=Time[0] && ExtMapBuffer1[0]!=0 && ExtMapBuffer1[0]!=EMPTY_VALUE)
{
if (AlertsMessage) Alert(message1);
if (AlertsSound) PlaySound(«alert2.wav»);
if (AlertsEmail) SendMail(Symbol()+" — "+WindowExpertName()+" — ",message1);
if (AlertsMobile) SendNotification(message1);
TimeBar=Time[0];
}
if(TimeBar!=Time[0] && ExtMapBuffer2[0]!=0 && ExtMapBuffer2[0]!=EMPTY_VALUE)
{
if (AlertsMessage) Alert(message2);
if (AlertsSound) PlaySound(«alert2.wav»);
if (AlertsEmail) SendMail(Symbol()+" — "+WindowExpertName()+" — ",message2);
if (AlertsMobile) SendNotification(message2);
TimeBar=Time[0];
}
}
//-------------------------------------------------------------------+
return(0);
}
//-------------------------------------------------------------------+
string PeriodString()
{
switch (_Period)
{
case PERIOD_M1: return(«M1»);
case PERIOD_M5: return(«M5»);
case PERIOD_M15: return(«M15»);
case PERIOD_M30: return(«M30»);
case PERIOD_H1: return(«H1»);
case PERIOD_H4: return(«H4»);
case PERIOD_D1: return(«D1»);
case PERIOD_W1: return(«W1»);
case PERIOD_MN1: return(«MN1»);
}
return(«M» + string(_Period));
}
avatar

Ludaed68

  • 23 сентября 2022, 09:02
0
//+------------------------------------------------------------------+
//| V-T&B Alert.mq4 |
//| Don Lawson (don_forex) |
//+------------------------------------------------------------------+
#property copyright «V-T&B Alert Copyright © 2019-2020, MetaQuotes Software Corp.»
#property link «http: //www.metaquotes.net/»
//----
#property indicator_chart_window
#property indicator_buffers 2
#property indicator_color1 clrDeepSkyBlue
#property indicator_color2 clrRed
//+------------------------------+
enum MYENUM
{
Var0,
Var1
};
//+------------------------------+
extern double WickRatio =0.5;
extern double WickPercent =50;
extern int JuicePeriod =7;
extern int JuiceLevelForAlert=5;
extern color ArrowsUpColor = DeepSkyBlue;
extern color ArrowsDnColor = Red;
extern int ArrowsUpCode = 233;
extern int ArrowsDnCode = 234;
extern int ArrowsSize = 1;
extern int DistanceFromCandle=1;
extern bool Notify=false;
extern bool UseNew=true;
extern bool AlertsMessage = true;
extern bool AlertsSound = false;
extern bool AlertsEmail = false;
extern bool AlertsMobile = false;
//+--------------------------------+
input MYENUM SIGNAL_BAR = Var0;

datetime TimeBar;
//+--------------------------------+
double VTop[];
double VBottom[];
int Level=5;
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
//---- indicators
SetIndexEmptyValue(0, 0.0);
SetIndexStyle(0, DRAW_ARROW,EMPTY,ArrowsSize,ArrowsDnColor);
SetIndexArrow(0, ArrowsDnCode);
SetIndexBuffer(0, VTop);
SetIndexEmptyValue(1, 0.0);
SetIndexStyle(1, DRAW_ARROW,EMPTY,ArrowsSize,ArrowsUpColor);
SetIndexArrow(1, ArrowsUpCode);
SetIndexBuffer(1, VBottom);
//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
//----
//----
return(0);
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void SetVTop(int index)
{
double Juice, JuiceLevel;
// Check for Juice
JuiceLevel=Level*Point;
if (Period()==5)JuiceLevel=JuiceLevel/2;
//----
Juice=iStdDev (NULL,0,JuicePeriod,MODE_EMA,0,PRICE_CLOSE,index)-JuiceLevel;
if (Juice > JuiceLevelForAlert*Point) {
VTop[index]=High[index]+ 5*DistanceFromCandle*Point;
if (Notify) PlaySound(«V-Top.wav»);
}
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void SetVBottom(int index)
{
double Juice, JuiceLevel;
// Check for Juice
JuiceLevel=Level*Point;
if (Period()==5)JuiceLevel=JuiceLevel/2;
//----
Juice=iStdDev (NULL,0,JuicePeriod,MODE_EMA,0,PRICE_CLOSE,index)-JuiceLevel;
if (Juice > JuiceLevelForAlert*Point)
{
VBottom[index]=Low[index]- 5*DistanceFromCandle*Point;
if (Notify) PlaySound(«V-Bottom.wav»);
}
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start()
{
int limit, i,State;
double WickPenetration;
double BullWickPenHi,BullWickPenLow;
double BearWickPenHi,BearWickPenLow;
double BullWickHi,BullWickLow,BullBody;
double BearWickHi,BearWickLow,BearBody;
int counted_bars=IndicatorCounted();
//---- check for possible errors
if(counted_bars<0) return(-1);
//---- last counted bar will be recounted
if(counted_bars>0) counted_bars--;
limit=Bars-counted_bars;
//----
WickPenetration=WickPercent/100.0;
for(i=1; i<=limit; i++)
{
bool CurrentBull =false,
CurrentBear =false,
Bull =false,
Bear =false,
HiWick =false,
LoWick =false;
//----
if (Open[i-1]<Close[i-1])
CurrentBull=true;
else
CurrentBear=true;
if (Open[i]<Close[i])
Bull=true;
else
Bear=true;
//----
BullWickHi=High[i] — Close[i];
BullWickLow=Open[i] — Low[i];
BullBody=Close[i] — Open[i];
BearWickHi=High[i] — Open[i];
BearWickLow=Close[i] — Low[i];
BearBody=Open[i] — Close[i];
// Check for VTOP
if (High[i] > High[i+1])
{
if (Bull)
{
if ((BullWickHi > BullBody * WickRatio))// && (BullWickHi > BullWickLow)
HiWick=true;
}
if (Bear)
{
if ((BearWickHi > BearBody * WickRatio))// && (BearWickHi > BearWickLow)
HiWick=true;
}
}
// Check for VBottom
if (Low[i] < Low[i+1])
{
if (Bull)
{
if ((BullWickLow > BullBody * WickRatio))// && (BullWickLow > BullWickHi)
LoWick=true;
}
if (Bear)
{
if ((BearWickLow > BearBody * WickRatio))// && (BearWickLow > BearWickHi)
LoWick=true;
}
}
// Set up State Table
if (CurrentBear && Bull) State=1;
if (CurrentBear && Bear) State=2;
if (CurrentBull && Bull) State=3;
if (CurrentBull && Bear) State=4;
// Set Arrow
if (HiWick)
{
BullWickPenHi=Close[i] + BullWickHi * WickPenetration;
BearWickPenHi=Open[i] + BearWickHi * WickPenetration;
switch(State)
{
case 1: // CurrentBear && Bull
if (UseNew)
{
if(Open[i-1] < BullWickPenHi) SetVTop(i);
}
else
{
SetVTop(i);
}

break;
case 2: // CurrentBear && Bear
if (UseNew)
{
if (Open[i-1] < BearWickPenHi) SetVTop(i);
}
else
{
SetVTop(i);
}
break;
case 3: // CurrentBull && Bull
if (UseNew)
{
if (Close[i-1] < BullWickPenHi) SetVTop(i);
}
else
{
SetVTop(i);
}
break;
case 4: // CurrentBull && Bear
if (UseNew)
{
if (Close[i-1] < BearWickPenHi) SetVTop(i);
}
else
{
SetVTop(i);
}
break;
}
}
if (LoWick)
{
BullWickPenLow=Open[i] — BullWickLow * WickPenetration;
BearWickPenLow=Close[i] — BearWickLow * WickPenetration;
//----
switch(State)
{
case 1: // CurrentBear && Bull
if (UseNew)
{
if (Close[i-1] > BullWickPenLow) SetVBottom(i);
}
else
{
SetVBottom(i);
}
break;
case 2: // CurrentBear && Bear
if (UseNew)
{
if (Close[i-1] > BearWickPenLow) SetVBottom(i);
}
else
{
SetVBottom(i);
}
break;
case 3: // CurrentBull && Bull
if (UseNew)
{
if (Open[i-1] > BullWickPenLow) SetVBottom(i);
}
else
{
SetVBottom(i);
}
break;
case 4: //CurrentBull && Bear)
if (UseNew)
{
if (Open[i-1] > BearWickPenLow) SetVBottom(i);
}
else
{
SetVBottom(i);
}
break;
}
}
}
//======================================================================================================
if(AlertsMessage || AlertsSound || AlertsEmail || AlertsMobile)
{
string message1 = StringConcatenate(Symbol(), " M", Period()," ", " V-T&B Alert: BUY!");
string message2 = StringConcatenate(Symbol(), " M", Period()," ", " V-T&B Alert: SELL!");

if(TimeBar!=Time[0] && VTop[SIGNAL_BAR]>=VBottom[SIGNAL_BAR] && VTop[SIGNAL_BAR+1]<VBottom[SIGNAL_BAR+1])
{
if(AlertsMessage)
Alert(message1);
if(AlertsSound)
PlaySound(«alert2.wav»);
if(AlertsEmail)
SendMail(Symbol()+" — "+WindowExpertName()+" — ",message1);
if(AlertsMobile)
SendNotification(message1);
TimeBar=Time[0];
}
if(TimeBar!=Time[0] && VTop[SIGNAL_BAR]<=VBottom[SIGNAL_BAR] && VTop[SIGNAL_BAR+1]>VBottom[SIGNAL_BAR+1])
{
if(AlertsMessage)
Alert(message2);
if(AlertsSound)
PlaySound(«alert2.wav»);
if(AlertsEmail)
SendMail(Symbol()+" — "+WindowExpertName()+" — ",message2);
if(AlertsMobile)
SendNotification(message2);
TimeBar=Time[0];

}

}
return(0);
}
//+------------------------------------------------------------------+
//| Period String |
//+------------------------------------------------------------------+
string PeriodString()
{
switch(_Period)
{
case PERIOD_M1:
return(«M1»);
case PERIOD_M5:
return(«M5»);
case PERIOD_M15:
return(«M15»);
case PERIOD_M30:
return(«M30»);
case PERIOD_H1:
return(«H1»);
case PERIOD_H4:
return(«H4»);
case PERIOD_D1:
return(«D1»);
case PERIOD_W1:
return(«W1»);
case PERIOD_MN1:
return(«MN1»);
default:
return(«M»+(string)_Period);
}
return(«M»+(string)_Period);
}
//+--------------------------------------+
avatar

Ludaed68

  • 30 августа 2020, 11:48
0
Добрый день!
Андрей, Вы не забыли о моей просьбе? С ув Евгений
avatar

Ludaed68

  • 17 марта 2020, 18:18
0
Добрый день! Андрей Вы не забыли о моей просьбе? С ув Евгений
avatar

Ludaed68

  • 29 февраля 2020, 09:17
0
Спасибо очень буду признателен
avatar

Ludaed68

  • 26 февраля 2020, 20:14
0
Eng ludaed — transl french lus — russian-начитанный. Шарик ты балбес!
avatar

Ludaed68

  • 26 февраля 2020, 16:14
0
Я не хочу объяснять ничего, чтобы опять вызвать у Вас дебильный смех, но с помощью настроек в коде можно добиться желаемого.
avatar

Ludaed68

  • 26 февраля 2020, 15:45