all-stochastic

all-stochastic

开心版 无广告 101

更新日期:2022-02-19 分类标签: 语言:中文 平台:没限制

6 人已下载 手机查看

all-stochastic

//+------------------------------------------------------------------+
//| All Stochastic.mq4 |
//| made by : mladen |
//+------------------------------------------------------------------+
#property copyright "this is public domain software"
#property link "www.forex-tsd.com"
#define indicatorName "All Stochastic"

//
//
//
//
//

#property indicator_separate_window
#property indicator_minimum 0
#property indicator_maximum 100
#property indicator_buffers 2
#property indicator_color1 Gold
#property indicator_color2 Red
#property indicator_style2 STYLE_DOT
#property indicator_level1 20
#property indicator_level3 80
#property indicator_levelcolor DimGray

//---- input parameters
//
//
//
//
//

extern int Kperiod = 5;
extern int Dperiod = 3;
extern int Slowing = 3;
extern int MAMethod = 0;
extern int PriceField = 0;
extern string __ = "Chose timeframes (as in periodicity bar)";
extern string timeFrames = "M1;M5;M15;M30;H1;H4;D1;W1;MN";
extern int barsPerTimeFrame = 35;
extern bool shiftRight = False;
extern bool currentFirst = False;
extern color txtColor = Silver;
extern color separatorColor = DimGray;

//---- buffers
//
//
//
//
//

double ExtMapBuffer1[];
double ExtMapBuffer2[];

//
//
//
//
//

string shortName;
string labels[];
int periods[];
int Shift;

//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+

int init()
{
if (shiftRight) Shift = 1;
else Shift = 0;
barsPerTimeFrame = MathMax(barsPerTimeFrame,15);
shortName = indicatorName+" ("+Kperiod+","+Dperiod+","+Slowing+")";
IndicatorShortName(shortName);

//
//
//
//
//

SetIndexBuffer(0,ExtMapBuffer1);
SetIndexBuffer(1,ExtMapBuffer2);

SetIndexShift(0,Shift*(barsPerTimeFrame+1));
SetIndexShift(1,Shift*(barsPerTimeFrame+1));
SetIndexLabel(0,"Stochastic");
SetIndexLabel(1,"Signal");

//
//
//
//
//

timeFrames = StringUpperCase(StringTrimLeft(StringTrimRight(timeFrames)));
if (StringSubstr(timeFrames,StringLen(timeFrames),1) != ";")
timeFrames = StringConcatenate(timeFrames,";");

//
//
//
//
//

int s = 0;
int i = StringFind(timeFrames,";",s);
int time;
string current;
while (i > 0)
{
current = StringSubstr(timeFrames,s,i-s);
time = stringToTimeFrame(current);
if (time > 0) {
ArrayResize(labels ,ArraySize(labels)+1);
ArrayResize(periods,ArraySize(periods)+1);
labels[ArraySize(labels)-1] = current;
periods[ArraySize(periods)-1] = time; }
s = i + 1;
i = StringFind(timeFrames,";",s);
}

//
//
//
//
//

if(currentFirst)
for (i=1;i<ArraySize(periods);i++)
if (Period()==periods[i])
{
string tmpLbl = labels[i];
int tmpPer = periods[i];

//
//
//
//
//

for (int k=i ;k>0; k--) {
labels[k] = labels[k-1];
periods[k] = periods[k-1];
}
labels[0] = tmpLbl;
periods[0] = tmpPer;
}
return(0);
}

//+------------------------------------------------------------------+
//| Custom indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
for(int l=0;l<ArraySize(periods);l++) {
ObjectDelete(indicatorName+l);
ObjectDelete(indicatorName+l+"label");
}
return(0);
}

//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+

int start()
{
string separator;
int window=WindowFind(shortName);
int k=0;

//
//
//
//
//

for(int p=0; p<ArraySize(periods);p++)
{
for(int i=0; i<barsPerTimeFrame;i++,k++)
{
ExtMapBuffer1[k] = iStochastic(NULL,periods[p],Kperiod,Dperiod,Slowing,MAMethod,PriceField,0,i);
ExtMapBuffer2[k] = iStochastic(NULL,periods[p],Kperiod,Dperiod,Slowing,MAMethod,PriceField,1,i);
}
ExtMapBuffer1[k] =EMPTY_VALUE;
ExtMapBuffer2[k] =EMPTY_VALUE;
k += 1;

//
//
//
//
//

separator = indicatorName+p;
if(ObjectFind(separator)==-1)
ObjectCreate(separator,OBJ_TREND,window,0,0);
ObjectSet(separator,OBJPROP_TIME1,barTime(k-Shift*(barsPerTimeFrame+1)-1));
ObjectSet(separator,OBJPROP_TIME2,barTime(k-Shift*(barsPerTimeFrame+1)-1));
ObjectSet(separator,OBJPROP_PRICE1, 0);
ObjectSet(separator,OBJPROP_PRICE2,100);
ObjectSet(separator,OBJPROP_COLOR ,separatorColor);
ObjectSet(separator,OBJPROP_WIDTH ,2);
separator = indicatorName+p+"label";
if(ObjectFind(separator)==-1)
ObjectCreate(separator,OBJ_TEXT,window,0,0);
ObjectSet(separator,OBJPROP_TIME1,barTime(k-Shift*(barsPerTimeFrame+1)-5));
ObjectSet(separator,OBJPROP_PRICE1,100);
ObjectSetText(separator,labels[p],9,"Arial",txtColor);
}

//
//
//
//
//

SetIndexDrawBegin(0,Bars-k);
SetIndexDrawBegin(1,Bars-k);
return(0);
}

//+------------------------------------------------------------------+
//+ Custom functions and procedures +
//+------------------------------------------------------------------+

int barTime(int a)
{
if(a<0)
return(Time[0]+Period()*60*MathAbs(a));
else return(Time[a]);
}

//+------------------------------------------------------------------+
//+ +
//+------------------------------------------------------------------+
//
//
//
//
//

int stringToTimeFrame(string TimeFrame)
{
int TimeFrameInt=0;
if (TimeFrame=="M1") TimeFrameInt=PERIOD_M1;
if (TimeFrame=="M5") TimeFrameInt=PERIOD_M5;
if (TimeFrame=="M15") TimeFrameInt=PERIOD_M15;
if (TimeFrame=="M30") TimeFrameInt=PERIOD_M30;
if (TimeFrame=="H1") TimeFrameInt=PERIOD_H1;
if (TimeFrame=="H4") TimeFrameInt=PERIOD_H4;
if (TimeFrame=="D1") TimeFrameInt=PERIOD_D1;
if (TimeFrame=="W1") TimeFrameInt=PERIOD_W1;
if (TimeFrame=="MN") TimeFrameInt=PERIOD_MN1;
return(TimeFrameInt);
}

//
//
//
//
//

string StringUpperCase(string str)
{
string s = str;
int lenght = StringLen(str) - 1;
int chart;

while(lenght >= 0)
{
chart = StringGetChar(s, lenght);

//
//
//
//
//

if((chart > 96 && chart < 123) || (chart > 223 && chart < 256))
s = StringSetChar(s, lenght, chart - 32);
else
if(chart > -33 && chart < 0)
s = StringSetChar(s, lenght, chart + 224);

//
//
//
//
//

lenght--;
}

//
//
//
//
//

return(s);
}

相关资源

暂无评论

暂无评论...