论坛全局菜单下方 - TICKMILL 285X70论坛全局菜单下方 - ThinkMarkets285X70论坛全局菜单下方 - 荔枝返现285X70论坛全局菜单下方 -  icmarkets285X70
查看:603回复:0
草龙
注册时间2004-12-17
[MT4指标]带点数指示的SC变色指标
楼主发表于:2014-02-28 02:03只看该作者倒序浏览
1楼 电梯直达
电梯直达
带点数指示的SC变色指标 附图指标, mt4指标类型:震荡指标 是否能用在mt4手机版上:否 是否含有未来函数:无 //+------------------------------------------------------------------+ //| Color Stochastic.mq4 | //| mladen | //| | //+------------------------------------------------------------------+ #property copyright "mladen" #property link "" #property indicator_separate_window #property indicator_buffers 4 #property indicator_minimum 0 #property indicator_maximum 100 #property indicator_color1 DimGray #property indicator_style1 STYLE_DOT #property indicator_color2 DimGray #property indicator_color3 Lime #property indicator_color4 Red #property indicator_width3 2 #property indicator_width4 2 //---- input parameters // // nice setings for trend = 35,10,1 // // extern string note1 = "Stochastic settings"; extern int KPeriod = 30; extern int Slowing = 10; extern int DPeriod = 10; extern string note4 = "0=sma, 1=ema, 2=smma, 3=lwma"; extern int MAMethod = 0; extern string note5 = "0=high/low, 1=close/close"; extern int PriceField = 1; extern string note6 = "overbought level"; extern int overBought = 80; extern string note7 = "oversold level"; extern int overSold = 20; //---- buffers // // // // // double KFull; double DFull; double Upper; double Lower; string DR; double avg.rng, rng, sum.rng; //+------------------------------------------------------------------+ //| Custom indicator initialization function | //+------------------------------------------------------------------+ int init() { SetIndexBuffer(0,DFull); SetIndexBuffer(1,KFull); SetIndexBuffer(2,Upper); SetIndexBuffer(3,Lower); SetIndexLabel(1,"Fast"); SetIndexLabel(2,NULL); SetIndexLabel(3,NULL); // // // // // DPeriod = MathMax(DPeriod,1); if (DPeriod==1) { SetIndexStyle(0,DRAW_NONE); SetIndexLabel(0,NULL); } else { SetIndexStyle(0,DRAW_LINE); SetIndexLabel(0,"Slow"); } // // // // // string shortName = "Stochastic ("+KPeriod+","+Slowing+","+DPeriod+","+maDescription(MAMethod)+","+priceDescription(PriceField); if (overBought < overSold) overBought = overSold; if (overBought < 100) shortName = shortName+","+overBought; if (overSold > 0) shortName = shortName+","+overSold; IndicatorShortName(shortName+")"); return(0); } // // // // // int deinit() { return(0); } //+------------------------------------------------------------------+ //| Custom indicator iteration function | //+------------------------------------------------------------------+ int start() { int counted_bars=IndicatorCounted(); int limit; int i; if(counted_bars<0) return(-1); limit=Bars-counted_bars; // // // // // for(i=limit; i>=0; i--) { KFull = iStochastic(NULL,0,KPeriod,DPeriod,Slowing,MAMethod,PriceField,MODE_MAIN,i); DFull = iStochastic(NULL,0,KPeriod,DPeriod,Slowing,MAMethod,PriceField,MODE_SIGNAL,i); // // // // // if (KFull > overBought) { Upper = KFull; Upper[i+1] = KFull[i+1]; } else { Upper = EMPTY_VALUE; if (Upper[i+2] == EMPTY_VALUE) Upper[i+1] = EMPTY_VALUE; } if (KFull < overSold) { Lower = KFull; Lower[i+1] = KFull[i+1]; } else { Lower = EMPTY_VALUE; if (Lower[i+2] == EMPTY_VALUE) Lower[i+1] = EMPTY_VALUE; } } // // // // // Pivot.Plot(); Daily.Range(); comments(); return(0); } //+------------------------------------------------------------------+ //+------------------------------------------------------------------+ string priceDescription(int mode) { string answer; switch(mode) { case 0: answer = "Low/High" ; break; case 1: answer = "Close/Close" ; break; default: answer = "Invalid price field requested"; Alert(answer); } return(answer); } string maDescription(int mode) { string answer; switch(mode) { case MODE_SMA: answer = "SMA" ; break; case MODE_EMA: answer = "EMA" ; break; case MODE_SMMA: answer = "SMMA" ; break; case MODE_LWMA: answer = "LWMA" ; break; default: answer = "Invalid MA mode requested"; Alert(answer); } return(answer); } //+------------------------------------------------------------------+ void Pivot.Plot() { string t1,t2,PPn,s1n,s2n,r1n,r2n,LOPS1n,LOPS2n,HOPS1n,HOPS2n; double PP,s1,s2,r1,r2,LOPS1,LOPS2,HOPS1,HOPS2,H,L,C; PPn="PP "+TimeToStr(CurTime(),TIME_DATE); s1n="S1 "+TimeToStr(CurTime(),TIME_DATE); s2n="S2 "+TimeToStr(CurTime(),TIME_DATE); r1n="R1 "+TimeToStr(CurTime(),TIME_DATE); r2n="R2 "+TimeToStr(CurTime(),TIME_DATE); LOPS1n="LOPS1 "+TimeToStr(CurTime(),TIME_DATE); LOPS2n="LOPS2 "+TimeToStr(CurTime(),TIME_DATE); HOPS1n="HOPS1 "+TimeToStr(CurTime(),TIME_DATE); HOPS2n="HOPS2 "+TimeToStr(CurTime(),TIME_DATE); H=iHigh(Symbol(),PERIOD_D1,1); L=iLow(Symbol(),PERIOD_D1,1); C=iClose(Symbol(),PERIOD_D1,1); LOPS1=iLow(Symbol(),PERIOD_D1,1); LOPS2=iLow(Symbol(),PERIOD_D1,2); HOPS1=iHigh(Symbol(),PERIOD_D1,1); HOPS2=iHigh(Symbol(),PERIOD_D1,2); t1=TimeToStr(CurTime(),TIME_DATE)+" 00:00:00"; t2=TimeToStr(CurTime(),TIME_DATE)+" 23:59:59"; PP=NormalizeDouble((H+L+C)/3,Digits); s1=NormalizeDouble((PP*2)-H,Digits); r1=NormalizeDouble((PP*2)-L,Digits); s2=NormalizeDouble(PP-(r1-s1),Digits); r2=NormalizeDouble(PP+(r1-s1),Digits); ObjectCreate(PPn,OBJ_TREND,0,StrToTime(t1),PP,StrToTime(t2),PP); ObjectSet(PPn,10,false); ObjectSet(PPn,6,Gray); ObjectSet(PPn,7,STYLE_DOT); ObjectSet(PPn,9,true); ObjectCreate(s1n,OBJ_TREND,0,StrToTime(t1),s1,StrToTime(t2),s1); ObjectSet(s1n,10,false); ObjectSet(s1n,6,LightCoral); ObjectSet(s1n,7,STYLE_DOT); ObjectSet(s1n,9,true); ObjectCreate(s2n,OBJ_TREND,0,StrToTime(t1),s2,StrToTime(t2),s2); ObjectSet(s2n,10,false); ObjectSet(s2n,6,Tomato); ObjectSet(s2n,7,STYLE_DOT); ObjectSet(s2n,9,true); ObjectCreate(r1n,OBJ_TREND,0,StrToTime(t1),r1,StrToTime(t2),r1); ObjectSet(r1n,10,false); ObjectSet(r1n,6,LightGreen); ObjectSet(r1n,7,STYLE_DOT); ObjectSet(r1n,9,true); ObjectCreate(r2n,OBJ_TREND,0,StrToTime(t1),r2,StrToTime(t2),r2); ObjectSet(r2n,10,false); ObjectSet(r2n,6,SpringGreen); ObjectSet(r2n,7,STYLE_DOT); ObjectSet(r2n,9,true); ObjectCreate(LOPS1n,OBJ_TREND,0,StrToTime(t1),LOPS1,StrToTime(t2),LOPS1); ObjectSet(LOPS1n,10,false); ObjectSet(LOPS1n,6,LightGreen); ObjectSet(LOPS1n,7,STYLE_DASH); ObjectSet(LOPS1n,9,true); ObjectCreate(LOPS2n,OBJ_TREND,0,StrToTime(t1),LOPS2,StrToTime(t2),LOPS2); ObjectSet(LOPS2n,10,false); ObjectSet(LOPS2n,6,SpringGreen); ObjectSet(LOPS2n,7,STYLE_DASH); ObjectSet(LOPS2n,9,true); ObjectCreate(HOPS1n,OBJ_TREND,0,StrToTime(t1),HOPS1,StrToTime(t2),HOPS1); ObjectSet(HOPS1n,10,false); ObjectSet(HOPS1n,6,LightCoral); ObjectSet(HOPS1n,7,STYLE_DASH); ObjectSet(HOPS1n,9,true); ObjectCreate(HOPS2n,OBJ_TREND,0,StrToTime(t1),HOPS2,StrToTime(t2),HOPS2); ObjectSet(HOPS2n,10,false); ObjectSet(HOPS2n,6,Tomato); ObjectSet(HOPS2n,7,STYLE_DASH); ObjectSet(HOPS2n,9,true); if(Period()>=1440) {ObjectDelete(PPn); ObjectDelete(s1n); ObjectDelete(s2n); ObjectDelete(r1n); ObjectDelete(r2n); ObjectDelete(LOPS1n);ObjectDelete(LOPS2n);ObjectDelete(HOPS1n); ObjectDelete(HOPS2n); }} double Daily.Range() { if(DR==TimeToStr(CurTime(),TIME_DATE)) {return(NormalizeDouble(avg.rng,Digits));} //Print(DR," ",NormalizeDouble(avg.rng,Digits)); rng=0;sum.rng=0;avg.rng=0; for(int i=0;i0) string swap="longs,"; else swap="shorts."; if(MarketInfo(Symbol(),MODE_SWAPLONG)<0 && MarketInfo(Symbol(),MODE_SWAPSHORT)<0) swap="your broker, :("; Comment("Last Tick: ",TimeToStr(CurTime(),TIME_DATE|TIME_SECONDS),"\n", "Swap favors ",swap, " Swap Long ",MarketInfo(Symbol(),MODE_SWAPLONG), ", Swap Short ",MarketInfo(Symbol(),MODE_SWAPSHORT),"\n", "Average Daily Range: ",NormalizeDouble(avg.rng,Digits),"\n", "Current Spread: ",Ask-Bid); } Color%20Stochastic_Pivot.jpgColor%20Stochastic_Pivot.jpg
TK29帖子1楼右侧xm竖版广告90-240
个性签名

阅尽天下指标
搬砖开始,始于2014

广告
TK30+TK31帖子一樓廣告
TK30+TK31帖子一樓廣告

本站免责声明:

1、本站所有广告及宣传信息均与韬客无关,如需投资请依法自行决定是否投资、斟酌资金安全及交易亏损风险;

2、韬客是独立的、仅为投资者提供交流的平台,网友发布信息不代表韬客的观点与意思表示,所有因网友发布的信息而造成的任何法律后果、风险与责任,均与韬客无关;

3、金融交易存在极高法律风险,未必适合所有投资者,请不要轻信任何高额投资收益的诱导而贸然投资;投资保证金交易导致的损失可能超过您投入的资金和预期。请您考虑自身的投资经验及风险承担能力,进行合法、理性投资;

4、所有投资者的交易帐户应仅限本人使用,不应交由第三方操作,对于任何接受第三方喊单、操盘、理财等操作的投资和交易,由此导致的任何风险、亏损及责任由投资者个人自行承担;

5、韬客不隶属于任何券商平台,亦不受任何第三方控制,韬客不邀约客户投资任何保证金交易,不接触亦不涉及投资者的任何资金及账户信息,不代理任何交易操盘行为,不向客户推荐任何券商平台,亦不存在其他任何推荐行为。投资者应自行选择券商平台,券商平台的任何行为均与韬客无关。投资者注册及使用韬客即表示其接受和认可上述声明,并自行承担法律风险。

版权所有:韬客外汇论坛 www.talkfx.com 联络我们:[email protected]