您现在的位置:程序化交易>> 股票公式>> 通达信>> 通达信公式>>正文内容

阻力、支撑、均线、MACD、量价斩妖分时,分时抓涨停板指标 公式 源码[通达信公式]

指标代码分析及使用建议:

 

该指标包括了阻力、支撑、均线、MACD、量价等多个方面,同时也包含了机构买卖盘、散户买卖盘等实时信息。

阻力和支撑点位可以作为买卖点的参考,均线可以指示整体趋势,MACD可以指示短期趋势,量价可以反映市场情绪,机构买卖盘和散户买卖盘则可以指示主力动向。

在使用该指标时,可以整体考虑各个方面的信息,结合自己的交易策略和市场状况做出操作决策,但同时也需要注意风险控制,避免盲目跟随。

 

源码:

 

XG:HHV(H,480),DOTLINE,COLORCYAN;RQ:=DATETODAY(DATE)-DATETODAY(REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT))+1;JY:=BARSLAST((RQ-REF(RQ,1))!=WEEKDAY-REF(WEEKDAY,1) OR TOTALBARSCOUNT-CURRBARSCOUNT=0)+1;MA1:=REF(C,JY);MA2:=REF(MA1,JY);MA3:=REF(MA2,JY);MA4:=REF(MA3,JY);MA5:=REF(MA4,JY);MA6:=REF(MA5,JY);MA7:=REF(MA6,JY);MA8:=REF(MA7,JY);MA9:=REF(MA8,JY);H1:=MAX(DYNAINFO(3),DYNAINFO(5));L1:=MIN(DYNAINFO(3),DYNAINFO(6));P1:=H1-L1;阻力:L1+P1*8/9,COLORLIRED,DOTLINE;支撑:L1+P1*0.5/9,COLORGREEN,DOTLINE;均线:IF(BETWEEN(C/(SUM(AMOUNT,0)/SUM(VOL*100,0)),1.05,0.95)=0,MA(C,0),(SUM(AMOUNT,0)/SUM(VOL*100,0))),COLORYELLOW,DOTLINE;DIF:=(EMA(CLOSE,12)-EMA(CLOSE,26))+DYNAINFO(3);DEA:=EMA(DIF,9);MACD1:=10*(DIF-DEA);MACD2:=EMA(MACD1,2);{程序化久久公式网 WWW.cxh99.com}STICKLINE(MACD1>=MACD2 AND MACD1>=0,DYNAINFO(3),MACD1+DYNAINFO(3),0,-1),COLORLIGRAY;STICKLINE(MACD1<MACD2 AND MACD1>0,DYNAINFO(3),MACD1+DYNAINFO(3),0,-1),COLORLICYAN;STICKLINE(MACD1>=MACD2 AND MACD1<0,DYNAINFO(3),MACD1+DYNAINFO(3),0,-1),COLORLIGRAY;STICKLINE(MACD1<MACD2 AND MACD1<0,DYNAINFO(3),MACD1+DYNAINFO(3),0,-1),COLORLIGREEN;XX:=SUM(AMOUNT,BARSCOUNT(CLOSE))/SUM(V*100,BARSCOUNT(CLOSE));主力:=EXPMA(CLOSE/XX,20);大户:=EXPMA(CLOSE/XX,60);散户:=EXPMA(CLOSE/XX,120);底:=1;1.022,NODRAW;高:=1.033;DRAWTEXT(CROSS(主力,1.02),C*0.999,' 拉'),COLORMAGENTA;DRAWICON(CROSS(主力,1.04),C,45);DRAWTEXT(CROSS(主力,1.04),C*0.999,' 冲'),COLORRED;A1:=(VOL/CLOSE)/3;A2:=SUM((IF(((A1>40) AND (CLOSE>(REF(CLOSE,1)))),A1,0)),0);A3:=SUM((IF(((A1>40) AND (CLOSE<(REF(CLOSE,1)))),A1,0)),0);A4:=SUM((IF(((A1<40) AND (CLOSE>(REF(CLOSE,1)))),A1,0)),0);A5:=SUM((IF(((A1<40) AND (CLOSE<(REF(CLOSE,1)))),A1,0)),0);A6:=((A2+A3)+A4)+A5;A7:=IF((BARSTATUS=2),((100*A2)/A6),0);A8:=((IF((BARSTATUS=2),((100*A3)/A6),0)));A9:=((IF((BARSTATUS=2),((100*A4)/A6),0)));A10:=((IF((BARSTATUS=2),((100*A5)/A6),0)));DRAWTEXT(LONGCROSS(支撑,C,2),C-0.01,' 买入'),COLOR0000FF;DRAWICON(LONGCROSS(支撑,C,2),C-0.01,1);STICKLINE(LONGCROSS(支撑,C,2),C,阻力,0,-1),COLORCYAN;DRAWTEXT(LONGCROSS(C,阻力,2),C+0.01,' 卖出'),COLORGREEN;DRAWICON(LONGCROSS(C,阻力,2),C+0.01,45);STICKLINE(LONGCROSS(C,阻力,2),C,支撑,0,-1),COLORRED;量价:=(VOL/CLOSE)/3;B2:=SUM((IF(((量价>0.20) AND (CLOSE>(REF(CLOSE,1)))),量价,0)),0);B3:=SUM((IF(((量价>0.20) AND (CLOSE<(REF(CLOSE,1)))),量价,0)),0);B6:=B2+B3;DD1:=1;比:=B2/B3;D1:=YEAR AND MONTH AND DAY;BA1:=STRCAT(CON2STR(YEAR,0),'年');BA2:=STRCAT(CON2STR(MONTH,0),'月');BA3:=STRCAT(CON2STR(DAY,0),'日');BA4:=STRCAT('星期',IF(WEEKDAY=1,'一',IF(WEEKDAY=2,'二',IF(WEEKDAY=3,'三',IF(WEEKDAY=4,'四',IF(WEEKDAY=5,'五',IF(WEEKDAY=6,'六','日')))))));AA:=STRCAT(STRCAT(STRCAT(BA1,BA2),STRCAT(BA3,BA4)),'');DRAWTEXT_FIX(D1,0.905,0,0,AA),COLORGRAY;WA1:=V*C/100;WA2:=SUM((IF(((WA1/8>20) AND (CLOSE>(REF(CLOSE,1)))),WA1,0)),0);WA3:=SUM((IF(((WA1/8>20) AND (CLOSE<(REF(CLOSE,1)))),WA1,0)),0);WA4:=SUM((IF(((WA1/8<20) AND (CLOSE>(REF(CLOSE,1)))),WA1,0)),0);WA5:=SUM((IF(((WA1/8<20) AND (CLOSE<(REF(CLOSE,1)))),WA1,0)),0);WA6:=((A2+A3)+A4)+A5;WA7:=IF((ISLASTBAR),((100*WA2)/WA6),0);WA8:=IF((ISLASTBAR),((100*WA3)/WA6),0);WA9:=IF((ISLASTBAR),((100*WA4)/WA6),0);WA10:=IF((ISLASTBAR),((100*WA5)/WA6),0);机构买盘:=(WA2);机构卖盘:=(WA3);散户买盘:=(WA4);散户卖盘:=(WA5);DRAWTEXT_FIX(1,0.752,1-0.088,0,STRCAT(STRCAT('【机构买盘】',CON2STR(机构买盘,2)),' 万')),COLORRED;DRAWTEXT_FIX(1,0.752,1-0.001,0,STRCAT(STRCAT('【机构卖盘】',CON2STR(机构卖盘,2)),' 万')),COLORGREEN;DRAWTEXT_FIX(1,0.883,1-0.088,0,STRCAT(STRCAT('【散户买盘】',CON2STR(散户买盘,2)),' 万')),COLORMAGENTA;DRAWTEXT_FIX(1,0.883,1-0.001,0,STRCAT(STRCAT('【散户卖盘】',CON2STR(散户卖盘,2)),' 万')),COLORCYAN;{程序化交易 www.cxh99.com }


 

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程

 

 

有思路,想编写各种指标公式,交易模型,选股公式,还原公式的朋友

可联系技术人员 QQ: 262069696  点击在线交流或微信:cxhjy888 进行 有偿收费 编写!(注:由于人数限制,QQ或微信请选择方便的一个联系我们就行,加好友时请简单备注下您的需求,否则无法通过。谢谢您!)

怎么收费,代编流程等详情请点击查阅!

(注:由于人数限制,QQ或微信请选择方便的一个联系我们就行,加好友时请简单备注下您的需求,否则无法通过。谢谢您!)

 


【字体: 】【打印文章】【查看评论

相关文章

    没有相关内容