[MT4指标]k线时间指示BarTimer
k线时间指示BarTimer
主图指标
mt4指标类型:趋势指标
是否能用在mt4手机版上:否
是否含有未来函数:无
//+------------------------------------------------------------------+
//| BarTimer.mq4 |
//| Copyright ? 2008, Art Royal s.r.o. |
//| Author: Vasyl Gumenyak |
//| http://www.jiport.com/ |
//+------------------------------------------------------------------+
#property copyright "Copyright ? 2008, Art Royal s.r.o."
#property link "http://www.jiport.com/"
#property indicator_chart_window
#property indicator_buffers 0
extern string FontName="Arial";
extern int FontSize=14;
extern color FontColor=White;
extern int Corner=0;// values [0-3] - 铒铕睇? 筱铍
extern int XDistance=250;// x 疣耨蝾?龛? 铗 铒铕眍泐 筱豚
extern int YDistance=0;// y 疣耨蝾?龛? 铗 铒铕眍泐 筱豚
int lenbase;
string s_base=":...:...:...:...:";// 耱痤赅 潆? 纛痨桊钼囗?? 桧滂赅蝾疣 ? 镱腌箜觐?
int init()
{
lenbase=StringLen(s_base);
return(0);
}
int deinit()
{
if (ObjectFind("BarTimer") != -1) ObjectDelete("BarTimer");
return(0);
}
//+------------------------------------------------------------------+
//| 镱腌箜铌 铗戾鬣弪 蝈牦 邋 镱腩驽龛? 镱 怵屐屙? |
//| 铗眍耔蝈朦眍 磬鬣豚 ? 觐眦? 蝈牦 泐 徉疣, |
//| 漕镱腠栩咫 ? 溧弪?? 漕?? 怵屐屙? |
//| 镳铠邃 泐 铗 磬鬣豚 徉疣 ? 镳铞屙蜞? |
//+------------------------------------------------------------------+
int start()
{
int i=0,sec=0;
double pc=0.0;
string time="",s_end="",s_beg="";
if (ObjectFind("BarTimer") == -1) {// 羼腓 钺 牝 礤 磬殇屙 - 耦玟噱? ? 玎溧屐 镟疣戾蝠?
ObjectCreate("BarTimer" , OBJ_LABEL,0,0,0);
ObjectSet("BarTimer", OBJPROP_XDISTANCE, XDistance);
ObjectSet("BarTimer", OBJPROP_YDISTANCE, YDistance);
ObjectSet("BarTimer", OBJPROP_CORNER, Corner);
}
sec=TimeCurrent()-Time[0];// 怵屐? ? 皴牦礓圊 铗 磬鬣豚 徉疣
i=(lenbase-1)*sec/(Period()*60);// 镱玷鲨? 镱腌箜赅
pc=100.0*sec/(Period()*60);// 怵屐? 铗 磬鬣豚 徉疣 ? 镳铞屙蜞?
if(i>lenbase-1) i=lenbase-1;// 忸珈铈眍 桤腓 栝 觐眚痤朦 沭囗桷?
if(i>0) s_beg=StringSubstr(s_base,0,i);
if(iBarTimer.jpg