我只是组合一下,不是原创,所组合的都是论坛老师的精华指标,感觉不错,和大家分享一下。适用于分时。 {想法是要快人一步,当然反应快即意味着不稳定} DIF:EMA(CLOSE,12)-EMA(CLOSE,26),NODRAW; DEA:EMA(DIF,9),NODRAW; MACD:(DIF-DEA)*2,COLORSTICK,COLORRED; {以下是COPY的,来源于理想论坛} ES:=REF(EMA(C,26),1); EP:=REF(EMA(C,12),1); DI:=REF(DIF,1); DIF穿零价:((12+1)*(26-1)*ES-(26+1)*(12-1)*EP)/(2*(26+1)-2*(12+1)),NODRAW,COLORWHITE; DIF拐点价:((12-1)*EP/(12+1)-(26-1)*ES/(26+1)-DI)*(26+1)*(12+1)/(2*(12+1)-2*(26+1)),COLORYELLOW,NODRAW; {以下是自己的} TJ1:=DEA<0 AND CROSS(DIF,DEA);{零下金叉} TJ2:=BARSLAST(CROSS(0,DIF));{下跌起点到现在的周期数} TJ3:=DEA<0 AND COUNT(TJ1,TJ2+1)>1;{从下跌起点算起,零下金叉两次以上} TJ4:=DEA<0 AND MACD>0 AND REF(MACD,1)>0 AND REF(MACD,1)<REF(MACD,2) AND MACD>REF(MACD,1);{零下且MACD为正时,DIF,DEA收敛后发散} TJ5:=BARSLAST(TJ1);{上一次零下金叉到现在的周期数} TJ6:=DEA<0 AND TJ3 AND COUNT(TJ4,TJ5+1)>0,NODRAW;{零下两次金叉后发生至少一次收敛后发散} TJ7:=DEA<0 AND COUNT(TJ6,TJ2)>0,NODRAW;{满足条件6的周期} TJ8:=DEA<0 AND COUNT(TJ1,TJ2+1)>2;{从下跌起点算起,零下金叉三次以上} TJ9:=DEA<0 AND COUNT(TJ8,TJ2)>0,NODRAW;{满足条件8的周期} TJ10:=TJ7 AND DIF>0 AND DIF>REF(DIF,1) AND DEA<0;{条件6信号加强} TJ11:=TJ9 AND DIF>0 AND DIF>REF(DIF,1) AND DEA<0;{条件8信号加强} TJ12:=DIF>0 AND DEA>0 AND REF(MACD,1) AND REF(MACD,2)<0 AND MACD>REF(MACD,1) AND REF(MACD,1)<REF(MACD,2);{零上且DIF,DEA反向收敛} STJ1:=DIF>0 AND MACD>0 AND REF(MACD,1)>0 AND REF(MACD,1)>REF(MACD,2) AND MACD<REF(MACD,1);{零上MACD为正时,DIF,DEA发生收敛} STJ2:=BARSLAST(CROSS(DIF,0)),NODRAW;{上涨起点到现在的周期数} STJ3:=BARSLAST(CROSS(DIF,DEA));{上一次金叉以来到现在的周期数} STJ4:=DIF>0 AND COUNT(STJ1,STJ2)>1 AND COUNT(STJ1,STJ3)>1 AND STJ1;{从上涨起点算起,发生零上收敛两次以上} STJ5:=DIF>0 AND COUNT(STJ1,STJ2)>2 AND COUNT(STJ1,STJ3)>2 AND STJ1;{从上涨起点算起,发生零上收敛三次以上} STJ6:=DIF>0 AND COUNT(STJ1,STJ2)>3 AND COUNT(STJ1,STJ3)>3 AND STJ1;{从上涨起点算起,发生零上收敛四次以上} STJ7:=DIF>0 AND COUNT(STJ1,STJ2)<2 AND CROSS(DEA,DIF);{从上涨起点算起,零上收敛一次即出现死叉} STJ8:=COUNT(CROSS(DIF,DEA),STJ2)>0 AND STJ1;{零上金叉后出现零上收敛} STJ9:=DIF>0 AND REF(CROSS(DIF,DEA),1) AND CROSS(DEA,DIF);{零上金叉后随即死叉} STJ10:=COUNT(DIF>0 AND (STJ4 OR STJ7 OR STJ8 OR STJ9),STJ2); STJ11:=DIF>0 AND MACD<0 AND REF(MACD,2)<0 AND MACD<REF(MACD,1) AND REF(MACD,1)>REF(MACD,2);{零上二次向下发散} 减仓提示:STJ10,NODRAW,COLORGREEN; 清仓提示:STJ10>4,NODRAW,COLORYELLOW; DRAWICON(STJ4,DIF*1.03,2); STICKLINE(STJ5,0,MACD,2,1),COLORGREEN; DRAWICON(STJ5,DIF*1.03,2); STICKLINE(STJ6,0,MACD,2,0),COLORGREEN; DRAWICON(STJ6,DIF*1.03,2); STICKLINE(STJ7,0,MACD,2,0),COLORGREEN; DRAWICON(STJ7,DEA*1.03,2); STICKLINE(STJ8,0,MACD,2,0),COLORBLUE; DRAWICON(STJ8,DIF*1.03,2); STICKLINE(STJ9,0,MACD,2,0),COLORBLUE; DRAWICON(STJ9,DEA*1.03,2); DRAWTEXT(STJ10>4 AND (STJ4 OR STJ7 OR STJ8 OR STJ9),DIF*1.1,'逃'),COLORMAGENTA; STICKLINE(STJ11,0,DIF,0,-1),COLORBLUE; {以下是COPY的,来源于理想论坛} J1:="MACD.DIF"(12,26,9);J2:="MACD.DEA"(12,26,9); J3:="KDJ.K"(9,3,3);J4:="KDJ.D"(9,3,3); J5:="RSI.RSI1"(6,12,24);J6:="RSI.RSI2"(6,12,24); A1:=BARSLAST(REF(CROSS(J1,J2),1)); B1:=REF(C,A1+1)>C AND REF(J1,A1+1)<J1 AND CROSS(J1,J2); A2:=BARSLAST(REF(CROSS(J3,J4),1)); B2:=REF(C,A2+1)>C AND REF(J3,A2+1)<J3 AND CROSS(J3,J4); A3:=BARSLAST(REF(CROSS(J5,J6),1)); B3:=REF(C,A3+1)>C AND REF(J5,A3+1)<J5 AND CROSS(J5,J6); C1:=BARSLAST(REF(CROSS(J2,J1),1)); D1:=REF(C,C1+1)<C AND REF(J1,C1+1)>J1 AND CROSS(J2,J1); C2:=BARSLAST(REF(CROSS(J4,J3),1)); D2:=REF(C,C2+1)<C AND REF(J3,C2+1)>J3 AND CROSS(J4,J3); C3:=BARSLAST(REF(CROSS(J6,J5),1)); D3:=REF(C,C3+1)<C AND REF(J5,C3+1)>J5 AND CROSS(J6,J5); MACD底背离:=FILTER(B1>0,5); DRAWTEXT(MACD底背离,REF(J1,A1+1),'♂M底背'),COLORYELLOW; KDJ底背离:=FILTER(B2>0,5); DRAWTEXT(KDJ底背离,0,'♂K底背'),COLORWHITE; RSI底背离:=FILTER(B3>0,5); DRAWTEXT(RSI底背离,REF(J1,A1+3),'♂R底背'),COLORFFCC66; MACD顶背离:=FILTER(D1>0,5); DRAWTEXT(MACD顶背离,DIF+0.01,'♀M顶背'),COLOR0066FF; KDJ顶背离:=FILTER(D2>0,5); DRAWTEXT(KDJ顶背离,REF(J1,D1+2),'♀K顶背'),COLOR0000FF; RSI顶背离:=FILTER(D3>0,5); DRAWTEXT(RSI顶背离,REF(J1,D1+3),'♀R顶背'),COLORFF00FF; DIF; DEA; DRAWTEXT(CROSS(DIF,DEA) AND DEA>0,DEA,'↖加油'),COLORGREEN; DRAWTEXT(CROSS(DIF,DEA)AND DEA<0 AND MACD底背离,DEA,'↖底部')COLORGREEN; {天使涨吧} AA:=BARSLAST(TIME=100000); CC:=REF(HHV(C,0),AA+1); VV:=REF(HHV(V,0),AA+1); ZF:=CC/DYNAINFO(3)<1.05; XG10:=CROSS(C,CC) AND V>VV AND ZF; AA1:=BARSLAST(TIME=110000); CC1:=REF(HHV(C,0),AA1+1); VV1:=REF(HHV(V,0),AA1+1); ZF1:=CC1/DYNAINFO(3)<1.05; XG11:=CROSS(C,CC1) AND V>VV1 AND ZF1; XG:=XG10 AND XG11; 涨吧:= XG11 OR XG; DRAWTEXT(涨吧=1, DIF,'¥涨吧'),COLORGREEN; {开量冲板2} 资金:=C*IF(PERIOD=0 AND MINUTE=31,VOL,0),COLORSTICK;{√} 冲板线:=(CAPITAL/100)*1/20,COLORCYAN,LINETHICK1; 单量必板线:=资金>1000;{分时图单量超1000万资金}; 单量冲板线:=资金>冲板线 AND 资金<1000;{分时图单量超500万资金}; DRAWICON(单量必板线 AND DYNAINFO(4)/DYNAINFO(3)>1.01,0,12);{1000万处画仙人指} DRAWICON(单量冲板线 AND DYNAINFO(4)/DYNAINFO(3)>1.01,0,23);{500万处画十字星,以示警戒}; 虎:= (EXPMA(CLOSE,500)-REF(EXPMA(CLOSE,500),1))/REF(EXPMA(CLOSE,500),1)*100, COLORSTICK; 主力:=EXPMA( (EXPMA(CLOSE,500)-REF(EXPMA(CLOSE,500),1))/REF(EXPMA(CLOSE,500),1)*100,120)-0.0004,LINETHICK5,COLORMAGENTA; 散户:=EXPMA( (EXPMA(CLOSE,500)-REF(EXPMA(CLOSE,500),1))/REF(EXPMA(CLOSE,500),1)*100,200),LINETHICK5,COLORGREEN; DRAWICON(CROSS(EXPMA(虎,120)-0.0004,EXPMA(虎,200)),EXPMA(虎,200)*1,13); DRAWICON(CROSS(EXPMA(虎,200),EXPMA(虎,120)-0.0004),EXPMA(虎,200)*1,12); 吸:IF(DIF>-0.4, DIF,DRAWNULL),LINETHICK3,COLORRED; 拉:IF(DIF>0 AND DIF<REF(DIF,1), DIF,DRAWNULL),LINETHICK3,COLORGREEN; 派:IF(DIF<0 AND DIF>REF(DIF,1), DIF,DRAWNULL),LINETHICK3,COLORFF00FF; 落:IF(DIF<0 AND DIF<REF(DIF,1), DIF,DRAWNULL),LINETHICK3,COLORWHITE; |
评论内容只代表网友观点,与本站立场无关!
本网提供的公式文件说明:
* alg格式飞狐股票公式,可以用飞狐交易师或者交易师软件导入;
* fnc格式大智慧新一代公式指标,可以用大智慧股票软件使用,少部分可以用分析家股票软件引入使用;
* exp格式大智慧经典版股票公式,仅可以用大智慧经典版股票软件引入使用;
* tni和tnc格式通达信股票公式,仅可以用通达信新引入使用,例如可以用通达信股票软件引入使用;
* tne,tn6格式通达信公式,可以用通达信公式编辑器5.0版导入,推荐通达信金融终端版本;
* hxf格式同花顺股票公式,仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!
* 关于股票公式时间限制,如果在引入大智慧公式,交易师公式或者飞狐公式的时候,发现公式名称栏是空白的,这时候调整电脑时间到1997年,又能出现公式名称,并且能正常显示,可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式,通达信公式,同花顺公式,操盘手公式,飞狐公式,博易大师公式,金字塔公式,文华公式和交易师公式等等公式的密码,本网可帮恢复源码,有.偿.服.务无意勿扰,点击在线咨询联系我。
* 关于股票公式源码编辑
本网提供的源码,一般都可以编辑成公式,如果不明白公式的编辑,在本页右侧教程录像可参考,或者找公式教程资料学习,请搜索:教程
* 如果您发现软件内容或者链接错误,请点击报告错误谢谢!
* 站内提供的所有软件包含源码均是由网上搜集,若侵犯了你的版权利益,请联系通知我们!