MT4软件---监控多周期面板指标源码001-2

艾云策略

关注

已于 2023-11-08 10:06:56 修改 · 761 阅读

原创 ·

本内容遵循 CC 4.0 BY-SA 版权协议

· GEO检测

MT4软件---外汇多品种、多周期的监控切换面板指标同时监控、快速切换货币兑，黄金、原油等外汇多品种、多周期的面板指标。阅读详情

想要找一些外汇MT4的指标，附有源码，交易的时候可以辅助，编写指标的时候可以参考学习，想改善的时候，可以编辑。

INFOBOARD ：信息面板

FRACTAL TREND 的意思是“分形趋势”。
在技术分析中，分形是一种指示价格反转或形成趋势的重要图形模式。它由一系列连续的高低点组成，具有特定的结构和形态。
分形通常用于识别市场的趋势和关键转折点。当价格形成新的高点或低点时，分形图形会在价格图表上绘制出来。这些分形图形可以帮助交易者判断市场走势的方向和可能的逆转点。
FRACTAL TREND 是指利用分形模式来识别和跟踪市场的趋势。通过分析和比较不同时间周期的分形模式，交易者可以确定市场的长期趋势和短期波动，并基于这些信息做出相应的交易决策。
在这里插入图片描述

指标源码

#property copyright “艾云策略”
#property link “W/Q:289876878”
#property indicator_chart_window

#import “user32.dll”
int PostMessageW(int hWnd,int Msg,int wParam,int lParam);
int RegisterWindowMessageW(string lpString);
#import

extern string Version_140=“微信/QQ:289876878”;
extern int Corner=1;
extern int Offset_X = 1;
extern int Offset_Y = 21;
extern bool All_Other_Objects_To_Background=true;
extern int Days_For_ATR=100;

extern bool Show_Symbol_and_Timeframe=1;
extern bool Show_Price_and_Spread=1;
extern bool Show_Time_and_Tick = 1;
extern bool Show_Fractal_Trend = 1;
extern bool Show_Average_Hi_Lo = 1;
extern bool Show_Today_Hi_Lo=1;
extern bool Show_Hi_Lo_to_Spread=1;
extern bool Show_Current_Bar_Hi_Lo=1;
extern bool Show_Previous_Bar_Hi_Lo=1;
extern bool Show_Tickvalue = 1;
extern bool Show_Stoplevel = 1;
extern bool Show_Swap=1;

extern color Background_Color=C’40,40,40’;
extern color Text_Color=C’220,220,220’;
extern color Text_Label_Color=C’120,120,120’;
extern color Up_Color=Green;
extern color Middle_Color=Yellow;
extern color Down_Color=Red;

double old_price,old_spread;
string timeframe;
string tick=“n”;
int di,po,ti;

string info_font=“Verdana”;
int info_fontsize=8;

int tf[]={1,5,15,30,60,240,1440};
string tf_label[]={“M1”,“M5”,“M15”,“M30”,“H1”,“H4”,“D1”};
int tf_lab_ofset[]={4,4,2,2,4,4,4};
int xp[4],yo[10],lo[3];
int x,y,ofs_sema=23;;
//±-----------------------------------------------------------------+
//| |
//±-----------------------------------------------------------------+
int init()
{

int ylen=3;
int TitleX,TitleY,WebX,WebY,extend_board,offset_col;
int symlen=StringLen(Symbol());

if(All_Other_Objects_To_Background)
{
int hwnd=WindowHandle(Symbol(),Period());
int msg=RegisterWindowMessageW(“MetaTrader4_Internal_Message”);
PostMessageW(hwnd,msg,2,1);
}

if(Show_Symbol_and_Timeframe)
{
if(symlen>7)
{
extend_board=symlen-6;
offset_col=symlen*5;
}
ylen+=3;
}

if(Show_Price_and_Spread) ylen+=3;
if(Show_Time_and_Tick) ylen+=3;
if(Show_Fractal_Trend) ylen+=4;
if(Show_Average_Hi_Lo) ylen+=1;
if(Show_Today_Hi_Lo) ylen+=1;
if(Show_Hi_Lo_to_Spread) ylen+=1;
if(Show_Current_Bar_Hi_Lo) ylen+=1;
if(Show_Previous_Bar_Hi_Lo) ylen+=1;
if(Show_Tickvalue) ylen+=1;
if(Show_Stoplevel) ylen+=1;
if(Show_Swap) ylen+=2;

if(Corner>3) Corner=1;

switch(Corner)
{
case 0: x = Offset_X;
y = Offset_Y;
TitleX = x+42;
TitleY = y+3;
WebX = x+60;
WebY = y+21;
xp[0] = x+132+offset_col;
xp[1] = x+10;
xp[2] = x+10;
xp[3] = x+123;
yo[0] = y+40;
yo[1] = 14;
yo[2] = 26;
yo[3] = 6;
yo[4] = 0;
yo[5] = 10;
yo[6] = 14;
yo[7] = 24;
yo[8] = 45;
yo[9] = 14;
lo[0] = -32;
lo[1] = -28;
lo[2] = 10;

  CreateBox("XBoard_Main",x,y,14+extend_board,ylen);

  break;

  case 1:  x = Offset_X;
  y = Offset_Y;
  TitleX = x+42;
  TitleY = y+3;
  WebX = x+60;
  WebY = y+21;
  xp[0] = x+10;
  xp[1] = x+80;
  xp[2] = x+74;
  xp[3] = x+10;
  yo[0] = y+40;
  yo[1] = 14;
  yo[2] = 26;
  yo[3] = 6;
  yo[4] = 0;
  yo[5] = 10;
  yo[6] = 14;
  yo[7] = 24;
  yo[8] = 45;
  yo[9] = 14;
  lo[0] = -32;
  lo[1] = -28;
  lo[2] = 10;

  CreateBox("XBoard_Main",x,y,14+extend_board,ylen);

  ArraySetAsSeries(tf,true);
  ArraySetAsSeries(tf_label,true);
  ArraySetAsSeries(tf_lab_ofset,true);

  break;

  case 2:  x = Offset_X;
  y = Offset_Y-(25-ylen)*14;
  TitleX = x+42;
  TitleY = y+3+330;
  WebX = x+60;
  WebY = y+325;
  xp[0] = x+132+offset_col;
  xp[1] = x+10;
  xp[2] = x+10;
  xp[3] = x+123;
  yo[0] = y+295;
  yo[1] = -30;
  yo[2] = -10;
  yo[3] = 9;
  yo[4] = 12;
  yo[5] = -29;
  yo[6] = -300;
  yo[7] = -4;
  yo[8] = -28;
  yo[9] = -14;
  lo[0] = 24;
  lo[1] = 22;
  lo[2] = -11;

  CreateBox("XBoard_Main",x,y+(25-ylen)*14,14+extend_board,ylen);

  break;

  case 3:  x = Offset_X;
  y = Offset_Y-(25-ylen)*14;
  TitleX = x+42;
  TitleY = y+3+330;
  WebX = x+60;
  WebY = y+325;
  xp[0] = x+10;
  xp[1] = x+80;
  xp[2] = x+75;
  xp[3] = x+10;
  yo[0] = y+295;
  yo[1] = -30;
  yo[2] = -10;
  yo[3] = 9;
  yo[4] = 12;
  yo[5] = -29;
  yo[6] = -300;
  yo[7] = -4;
  yo[8] = -28;
  yo[9] = -14;
  lo[0] = 24;
  lo[1] = 22;
  lo[2] = -11;

  CreateBox("XBoard_Main",x,y+(25-ylen)*14,14+extend_board,ylen);

  ArraySetAsSeries(tf,true);
  ArraySetAsSeries(tf_label,true);
  ArraySetAsSeries(tf_lab_ofset,true);

  break;
 }

switch(Period())
{
case 1 : timeframe = “M1”; break;
case 5 : timeframe = “M5”; break;
case 15 : timeframe = “M15”; break;
case 30 : timeframe = “M30”; break;
case 60 : timeframe = “H1”; break;
case 240 : timeframe = “H4”; break;
case 1440 : timeframe = “D1”; break;
case 10080 : timeframe = “W1”; break;
case 43200 : timeframe = “MN1”; break;
default : timeframe = Period()+" Min"; break;
}

switch(Digits)
{
case 0: di = 0; po = 1; ti = 1; break;
case 1: di = 1; po = 1; ti = 10; break;
case 2: di = 0; po = 100; ti = 1; break;
case 3: di = 1; po = 100; ti = 10; break;
case 4: di = 0; po = 10000; ti = 1; break;
case 5: di = 1; po = 10000; ti = 10; break;
default: di= Digits;
}

CreateText(“XBoard_Title”,TitleX,TitleY,“INFOBOARD”,11,“Arial Black”,Text_Color);
CreateText(“XBoard_Web”,WebX,WebY,“微信/QQ:289876878”,7,“Arial”,Text_Color);

return(0);
}
//±-----------------------------------------------------------------+
//| |
//±-----------------------------------------------------------------+
int deinit()
{

for(int i=ObjectsTotal(); i>=0; i–)
{
if(StringSubstr(ObjectName(i),0,7)==“XBoard_”)
{
ObjectDelete(ObjectName(i));
}
}
return(0);
}
//±-----------------------------------------------------------------+
//| |
//±-----------------------------------------------------------------+
int start()
{

int i,c,a;
double uplevel,dolevel,new_price,new_spread,avg;

if(All_Other_Objects_To_Background)
{
for(i=ObjectsTotal(); i>=0; i–)
{
if(StringSubstr(ObjectName(i),0,7)!=“XBoard_”)
{
ObjectSet(ObjectName(i),OBJPROP_BACK,1);
}
}
}

y=yo[0];

for(a=1; a<11; a++) CreateText(“XBoard_Line1”+““+a,a*16+x-3,y+lo[0],””,20,“Verdana”,Text_Label_Color);

if(Show_Symbol_and_Timeframe)
{
CreateText(“XBoard_Tf”,xp[0],y,timeframe,16,“Verdana”,Text_Color);
CreateText(“XBoard_Symbol”,xp[1],y,Symbol(),16,“Verdana”,Text_Color);
y+=yo[2];

  CreateText("XBoard_Tf_label",xp[0],y,"TF",6,"Verdana",Text_Label_Color);
  CreateText("XBoard_Symbol_label",xp[1],y,"SYMBOL",6,"Verdana",Text_Label_Color);
  y+=yo[1];
 }

if(Show_Price_and_Spread)
{

  new_price=Bid;

  if(old_price<new_price) 
    {
     CreateText("XBoard_Price",xp[1],y,DoubleToStr(new_price,Digits),16,"Verdana",Up_Color);
       } else if(old_price>new_price) {
     CreateText("XBoard_Price",xp[1],y,DoubleToStr(new_price,Digits),16,"Verdana",Down_Color);
       } else {
     CreateText("XBoard_Price",xp[1],y,DoubleToStr(new_price,Digits),16,"Verdana",Middle_Color);
    }

  old_price=new_price;

  new_spread=(Ask-Bid)*po;

  if(old_spread<new_spread) 
    {
     CreateText("XBoard_Spread",xp[0],y,DoubleToStr(new_spread,di),16,"Verdana",Up_Color);
       } else if(old_spread>new_spread) {
     CreateText("XBoard_Spread",xp[0],y,DoubleToStr(new_spread,di),16,"Verdana",Down_Color);
       } else {
     CreateText("XBoard_Spread",xp[0],y,DoubleToStr(new_spread,di),16,"Verdana",Middle_Color);
    }

  old_spread=new_spread;

  y+=yo[2];
  CreateText("XBoard_Spread_label",xp[0],y,"SPREAD",6,"Verdana",Text_Label_Color);
  CreateText("XBoard_Price_label",xp[1],y,"BID PRICE",6,"Verdana",Text_Label_Color);
  y+=yo[1];
 }

if(Show_Time_and_Tick)
{

  CreateText("XBoard_Tick",xp[0],y,tick,18,"Wingdings",Text_Color);

  datetime closetime=Time[0]+(Time[0]-Time[1])-TimeCurrent();
  string TimeRemain = TimeToStr(closetime,TIME_SECONDS);
  if(TimeRemain=="invalid time" || StringFind(TimeRemain,"-",0)>=0 || StringLen(TimeRemain)==0 || TimeRemain==" ") 
    {
     TimeRemain= "Waiting...";
    }

  CreateText("XBoard_Time",xp[1],y,TimeRemain,16,"Verdana",Text_Color);

  if(tick=="n") 
    {
     tick= "o";
       } else {
     tick="n";
    }

  y+=yo[2];
  CreateText("XBoard_Tick_label",xp[0],y,"TICK",6,"Verdana",Text_Label_Color);
  CreateText("XBoard_Time_label",xp[1],y,"TIME REMAIN",6,"Verdana",Text_Label_Color);
  y+=yo[1];
 }

if(Show_Symbol_and_Timeframe || Show_Price_and_Spread || Show_Time_and_Tick)
{
for(a=1; a<11; a++) CreateText(“XBoard_Line2”+““+a,a*16+x-3,y+lo[1],””,20,“Verdana”,Text_Label_Color);
y+=yo[3];
} else {
y+=yo[4];
}

if(Show_Fractal_Trend)
{

  CreateText("XBoard_Fractal_label",x+57,y,"FRACTAL TREND",6,"Verdana",Text_Label_Color);
  y+=yo[5];

  for(i=0; i<7; i++) 
    {

     CreateText("XBoard_Segment_"+i,x+16+ofs_sema*i,y,CharToStr(108),20,"Wingdings",Gray);
     CreateText("XBoard_Segment_Label_"+i,x+16+tf_lab_ofset[i]+ofs_sema*i,y+yo[7],tf_label[i],6,"Verdana",Text_Label_Color);

     for(c=3; c<200; c++) 
       {
        if(iHigh(Symbol(),tf[i],c) >= iHigh(Symbol(),tf[i],c+1) &&
           iHigh(Symbol(),tf[i],c) >= iHigh(Symbol(),tf[i],c+2) &&
           iHigh(Symbol(),tf[i],c) >= iHigh(Symbol(),tf[i],c-1) &&
           iHigh(Symbol(),tf[i],c) >= iHigh(Symbol(),tf[i],c-2))
           break;
       }
     uplevel=iHigh(Symbol(),tf[i],c);

     for(c=3; c<200; c++) 
       {
        if(iLow(Symbol(),tf[i],c) <= iLow(Symbol(),tf[i],c+1) &&
           iLow(Symbol(),tf[i],c) <= iLow(Symbol(),tf[i],c+2) &&
           iLow(Symbol(),tf[i],c) <= iLow(Symbol(),tf[i],c-1) &&
           iLow(Symbol(),tf[i],c) <= iLow(Symbol(),tf[i],c-2))
           break;
       }
     dolevel=iLow(Symbol(),tf[i],c);

     if(Bid<dolevel) ObjectSet("XBoard_Segment_"+i,OBJPROP_COLOR,Down_Color);
     if(Bid>=dolevel && Bid<=uplevel) ObjectSet("XBoard_Segment_"+i,OBJPROP_COLOR,Middle_Color);
     if(Bid>uplevel) ObjectSet("XBoard_Segment_"+i,OBJPROP_COLOR,Up_Color);
    }

  for(a=1; a<11; a++) CreateText("XBoard_Line3"+"_"+a,a*16+x-3,y+lo[2],"_",20,"Verdana",Text_Label_Color);
  y+=yo[8];
 }

if(Show_Average_Hi_Lo)
{
for(i=1; i<=Days_For_ATR; i++)
{
avg+=iHigh(Symbol(),1440,i)-iLow(Symbol(),1440,i);
}
double PrevHiLo=(avg/Days_For_ATR)*po;
CreateText(“XBoard_ATR”,xp[3],y,DoubleToStr(PrevHiLo,di),info_fontsize,“Verdana”,Text_Color);
CreateText(“XBoard_ATR_label”,xp[2],y,Days_For_ATR+" Days ATR:",info_fontsize,“Verdana”,Text_Color);
y+=yo[9];
}

if(Show_Today_Hi_Lo)
{
double TodayHiLo=(iHigh(Symbol(),1440,0)-iLow(Symbol(),1440,0))*po;
CreateText(“XBoard_TodayHiLo”,xp[3],y,DoubleToStr(TodayHiLo,di),info_fontsize,“Verdana”,Text_Color);
CreateText(“XBoard_TodayHiLo_label”,xp[2],y,“Today Hi-Lo:”,info_fontsize,“Verdana”,Text_Color);
y+=yo[9];
}

if(Show_Hi_Lo_to_Spread)
{
double HiLoToSpread=PrevHiLo/NormalizeDouble((Ask-Bid)*po,di);
CreateText(“XBoard_ATRToSpread”,xp[3],y,DoubleToStr(HiLoToSpread,2)+“X”,info_fontsize,“Verdana”,Text_Color);
CreateText(“XBoard_ATRToSpread_label”,xp[2],y,“ATR/Spread Ratio:”,info_fontsize,“Verdana”,Text_Color);
y+=yo[9];
}

if(Show_Current_Bar_Hi_Lo)
{
double BarHiLo=(High[0]-Low[0])*po;
CreateText(“XBoard_CurrentBarHiLo”,xp[3],y,DoubleToStr(BarHiLo,di),info_fontsize,“Verdana”,Text_Color);
CreateText(“XBoard_CurrentBarHiLo_label”,xp[2],y,“Current Bar Hi-Lo:”,info_fontsize,“Verdana”,Text_Color);
y+=yo[9];
}

if(Show_Previous_Bar_Hi_Lo)
{
double PrevBarHiLo=(High[1]-Low[1])*po;
CreateText(“XBoard_PrevBarHiLo”,xp[3],y,DoubleToStr(PrevBarHiLo,di),info_fontsize,“Verdana”,Text_Color);
CreateText(“XBoard_PrevBarHiLo_label”,xp[2],y,“Prev Bar Hi-Lo:”,info_fontsize,“Verdana”,Text_Color);
y+=yo[9];
}

if(Show_Tickvalue)
{
CreateText(“XBoard_Tickvalue”,xp[3],y,DoubleToStr(MarketInfo(Symbol(),MODE_TICKVALUE)*ti,3),info_fontsize,“Verdana”,Text_Color);
CreateText(“XBoard_Tickvalue_label”,xp[2],y,“Tickvalue:”,info_fontsize,“Verdana”,Text_Color);
y+=yo[9];
}

if(Show_Stoplevel)
{
CreateText(“XBoard_Stoplevel”,xp[3],y,DoubleToStr(MarketInfo(Symbol(),MODE_STOPLEVEL),3),info_fontsize,“Verdana”,Text_Color);
CreateText(“XBoard_Stoplevel_label”,xp[2],y,“Stoplevel:”,info_fontsize,“Verdana”,Text_Color);
y+=yo[9];
}

if(Show_Swap)
{
CreateText(“XBoard_SwapLong”,xp[3],y,DoubleToStr(MarketInfo(Symbol(),MODE_SWAPLONG),Digits),info_fontsize,“Verdana”,Text_Color);
CreateText(“XBoard_SwapLong_label”,xp[2],y,“Swap Long:”,info_fontsize,“Verdana”,Text_Color);
y+=yo[9];

  CreateText("XBoard_SwapShort",xp[3],y,DoubleToStr(MarketInfo(Symbol(),MODE_SWAPSHORT),Digits),info_fontsize,"Verdana",Text_Color);
  CreateText("XBoard_SwapShort_label",xp[2],y,"Swap Short:",info_fontsize,"Verdana",Text_Color);
 }

return(0);
}
//±-----------------------------------------------------------------+
//| |
//±-----------------------------------------------------------------+
void CreateText(string label,int posx,int posy,string text,int fontsize,string font,color fontcolor)
{
ObjectDelete(label);
ObjectCreate(label,OBJ_LABEL,0,0,0);
ObjectSet(label,OBJPROP_CORNER,Corner);
ObjectSet(label,OBJPROP_XDISTANCE,posx);
ObjectSet(label,OBJPROP_YDISTANCE,posy);
ObjectSet(label,OBJPROP_BACK,false);
ObjectSetText(label,text,fontsize,font,fontcolor);
}
//±-----------------------------------------------------------------+
//| |
//±-----------------------------------------------------------------+
void CreateBox(string name,int xpos,int ypos,int xsize,int ysize)
{
for(int a=0; a<xsize; a++)
{
for(int b=0; b<ysize; b++)
{
CreateText(name+““+a+””+b,a13+xpos,b14+ypos,CharToStr(110),18,“Wingdings”,Background_Color);
}
}
}
//±-----------------------------------------------------------------+