[MT4指标]蜡烛信号指示
主图指标
蜡烛信号指示
体现各种信号
是否含有未来函数:无
//+------------------------------------------------------------------+
//| Candle_Signal.mq4 |
//| Copyright ? 2006, MetaQuotes Software Corp. |
//| http://www.metaquotes.net |
//+------------------------------------------------------------------+
#property copyright \"Copyright ? 2006, MetaQuotes Software Corp.\"
#property link \" cja \"
//----
#property indicator_chart_window
//----
extern int PIP_Difference=15;
extern int PERIOD=240;//0 = all timeframes
extern string IIIIIIIIIIIIIIIIIIIIIIIII=\"<<<< Alert TEXT on Screen >>>>>>>>>>>>>>>>>\";
extern bool Show_AlertTEXT=true;
extern string IIIIIIIIIIIIIIIIIIIIIIIIII=\"<<<< POP/UP Alert >>>>>>>>>>>>>>>>>>>>>>>>\";
extern bool AlertON=true;
extern int Shift_UP_DN=0;
extern int Shift_Left_Right=0;
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
//---- indicators
//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
//----
ObjectsDeleteAll(0,OBJ_LABEL);
//----
return(0);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start()
{
int counted_bars=IndicatorCounted();
//----
double CURR,PIPS,PPIPS,TARGET_UP,TARGET_DN;
//double OPEN = iOpen(NULL,30,0);
// double CLOSE = iClose(NULL,30,0);
double CUROPEN=iOpen(NULL,PERIOD,0);
double PREVCLOSE=iClose(NULL,PERIOD,1);
PIPS= (PREVCLOSE-Bid);
PPIPS= (PREVCLOSE+Ask);
TARGET_UP=((PREVCLOSE+PIP_Difference*Point));
TARGET_DN=((PREVCLOSE-PIP_Difference*Point));
string PRC1=\"\";
//PRICE = iMA(Symbol(),0,1,0,MODE_EMA,PRICE_CLOSE,0);
if(Show_AlertTEXT==true)
{
string CandleSignal=\"\",CandleSignal2=\"\",CandleSignal3=\"\"; color col,col2,col3;
//----
CandleSignal=\"Currently Signals Pending .................................\"; col= C\'250,250,0\';
if((Ask)>=(PREVCLOSE+PIP_Difference*Point)){CandleSignal=\"ALERT : PRICE Above Previous CLOSE By [ \"+(DoubleToStr(PIP_Difference,Digits-4))+\" ] \"+\"\";
col=C\'0,225,0\';
}
if((Bid)<=(PREVCLOSE-PIP_Difference*Point)){CandleSignal=\"ALERT : PRICE Below Previous CLOSE By [ \"+(DoubleToStr(PIP_Difference,Digits-4))+\" ] \"+\"\";
col=C\'250,0,0\';
}
if((Ask)>=(PREVCLOSE)){CandleSignal2=\"Upper Entry Target [ \"+(DoubleToStr(TARGET_UP,Digits))+\" ] \"+\"\";
col2=C\'180,225,0\';
}
if((Bid)<=(PREVCLOSE)){CandleSignal2=\"Lower Entry Target [ \"+(DoubleToStr(TARGET_DN,Digits))+\" ] \"+\"\";
col2=C\'250,100,0\';
}
// Determin whether Open above/Below Previous Close
if((CUROPEN)>=(PREVCLOSE)){CandleSignal3=\"OPEN > PREV / CLOSE\"+\"\";
col3=C\'0,225,0\';
}
if((CUROPEN)<(PREVCLOSE)){CandleSignal3=\"OPEN < PREV / CLOSE\"+\"\";
col3=C\'250,0,0\';
}
ObjectCreate(\"CandleSignal\", OBJ_LABEL, 0, 0, 0);
ObjectSetText(\"CandleSignal\", CandleSignal, 12,\"Arial Bold\", col);
ObjectSet(\"CandleSignal\", OBJPROP_CORNER, 0);
ObjectSet(\"CandleSignal\", OBJPROP_XDISTANCE, 250+Shift_Left_Right);
ObjectSet(\"CandleSignal\", OBJPROP_YDISTANCE, 20+Shift_UP_DN);
//----
ObjectCreate(\"CandleSignal2\", OBJ_LABEL, 0, 0, 0);
ObjectSetText(\"CandleSignal2\", CandleSignal2, 12,\"Arial Bold\", col2);
ObjectSet(\"CandleSignal2\", OBJPROP_CORNER, 0);
ObjectSet(\"CandleSignal2\", OBJPROP_XDISTANCE, 250+Shift_Left_Right);
ObjectSet(\"CandleSignal2\", OBJPROP_YDISTANCE, 52+Shift_UP_DN);
//----
ObjectCreate(\"CandleSignal3\", OBJ_LABEL, 0, 0, 0);
ObjectSetText(\"CandleSignal3\", CandleSignal3, 7,\"Arial Bold\", col3);
ObjectSet(\"CandleSignal3\", OBJPROP_CORNER, 0);
ObjectSet(\"CandleSignal3\", OBJPROP_XDISTANCE, 362+Shift_Left_Right);
ObjectSet(\"CandleSignal3\", OBJPROP_YDISTANCE, 8+Shift_UP_DN);
//----
ObjectCreate(\"Signal1\", OBJ_LABEL, 0, 0, 0);
ObjectSetText(\"Signal1\",\"Signal Auto Display\", 9, \"Arial\", Silver);
ObjectSet(\"Signal1\", OBJPROP_CORNER, 0);
ObjectSet(\"Signal1\", OBJPROP_XDISTANCE, 250+Shift_Left_Right);
ObjectSet(\"Signal1\", OBJPROP_YDISTANCE, 5+Shift_UP_DN);
//----
ObjectCreate(\"Signal2\", OBJ_LABEL, 0, 0, 0);
ObjectSetText(\"Signal2\",\"Target TF = [ \"+PERIOD+\" ]\", 9, \"Arial\", Silver);
ObjectSet(\"Signal2\", OBJPROP_CORNER, 0);
ObjectSet(\"Signal2\", OBJPROP_XDISTANCE, 250+Shift_Left_Right);
ObjectSet(\"Signal2\", OBJPROP_YDISTANCE, 37+Shift_UP_DN);
//----
double Price1=iMA(Symbol(),0,1,0,MODE_EMA,PRICE_CLOSE,0);
PRC1=DoubleToStr(Price1,Digits);
//----
ObjectCreate(\"Signalprice\", OBJ_LABEL, 0, 0, 0);
ObjectSetText(\"Signalprice\",\"\"+PRC1+\"\", 30, \"Arial\", col);
ObjectSet(\"Signalprice\", OBJPROP_CORNER, 0);
ObjectSet(\"Signalprice\", OBJPROP_XDISTANCE,250+Shift_Left_Right);
ObjectSet(\"Signalprice\", OBJPROP_YDISTANCE, 70+Shift_UP_DN);
}
if (AlertON==true)
{
if((Ask)>=(PREVCLOSE+PIP_Difference*Point)){ if (BarChanged())
{
Alert(Symbol(),\" M\",Period(),\" ALERT : PRICE Above CLOSE By [ \"+(DoubleToStr(PIP_Difference,Digits-4))+\" ] \"+\"\");
}
}
if((Bid)<=(PREVCLOSE-PIP_Difference*Point)){ if (BarChanged())
{
Alert(Symbol(),\" M\",Period(),\" ALERT : PRICE Below CLOSE By [ \"+(DoubleToStr(PIP_Difference,Digits-4))+\" ] \"+\"\");
}
}
}
//----
return(0);
}
//+------------------------------------------------------------------+
bool BarChanged()
{
static datetime dt=0;
if (dt!=Time[0])
{
dt=Time[0];
return(true);
}
return(false);
}
//---- done
return(0);
//+------------------------------------------------------------------+
发表于:2014-10-15 15:06只看该作者
4楼
额。。。。。。。
韬客社区www.talkfx.co
发表于:2014-10-26 06:16只看该作者
5楼
韬客社区www.talkfx.co
发表于:2015-04-26 06:28只看该作者
7楼
感谢无私分享感谢无私分享
韬客社区www.talkfx.co
发表于:2016-06-20 00:20只看该作者
10楼
谢谢分享
韬客社区www.talkfx.co
发表于:2016-07-10 03:13只看该作者
11楼
收下了,谢谢
韬客社区www.talkfx.co
发表于:2016-07-10 06:58只看该作者
12楼
呵呵呵呵
韬客社区www.talkfx.co
发表于:2016-07-29 11:27只看该作者
14楼
dddddddddddddd
发表于:2016-08-02 01:34只看该作者
15楼
感谢分享
韬客社区www.talkfx.co
发表于:2016-08-06 18:15只看该作者
16楼
看看撒
韬客社区www.talkfx.co
发表于:2016-08-06 23:45只看该作者
17楼
怎么用,能说说吗
发表于:2016-08-09 13:27只看该作者
18楼
试试看看
韬客社区www.talkfx.co
发表于:2016-09-15 03:08只看该作者
21楼
回复下载
韬客社区www.talkfx.co