Q分时主图（通达信公式分时主图源码测试图）

显示全部楼层 · 2022-6-27 18:46:43

这个分时公式，需要一个引用公式，也在附件里提供了，下载后，两个公式都导入，不要改名。

{放到前面，这样不会覆盖其它画线}

MA30:=EMA(CLOSE,30);

强弱:=EMA(CLOSE,900);

STICKLINE((MA30>强弱),MA30,强弱,1,0),COLOR0000FF;

STICKLINE((MA30<强弱),MA30,强弱,1,0),COLOR00FF00;

H11:=MAX(DYNAINFO(3),DYNAINFO(5));

L11:=MIN(DYNAINFO(3),DYNAINFO(6));

P11:=H11-L11;

阻力:=L11+P11*7/8,COLOR00DD00;

支撑:=L11+P11*0.5/8,COLOR00DD00;

现价:=CLOSE,COLORWHITE,LINETHICK1;

QMA1:="Q_MA.MA1#DAY", NODRAW;

QMA5:="Q_MA.MA5#DAY", NODRAW, LINETHICK3, COLORRED;

{QMA10:="Q_MA.MA10#DAY", CROSSDOT,LINETHICK4, COLORGREEN; {COLORLIRED;}

QMA10:="Q_MA.MA10#DAY", NODRAW;

{如果分时图上，10日均线偏离太远，就不显示了，否则分时显示百分比有点大}

MA5_2: IF( ABS((QMA1-QMA5)/QMA1 ) < 0.06, QMA5, C), LINETHICK2, COLORRED;

DRAWTEXT(ISLASTBAR, MA5_2, STRCAT(' 5日线: ',CON2STR(MA5_2,2))),COLORRED;

MA10_2: IF( ABS((QMA1-QMA10)/QMA1 ) < 0.06, QMA10, C), LINETHICK2, COLORGREEN;

DRAWTEXT(ISLASTBAR, MA10_2, STRCAT(' 10日线: ',CON2STR(MA10_2,2))),COLORGREEN;

{低部显示}

SBL1 := STRCAT('1.地区：', DYBLOCK);

SBL2 := STRCAT(' 2.行业：', HYBLOCK);

SBL3 := STRCAT(' 3.主题投资：', EXTERNSTR(0,1));

SBL4 := STRCAT(' ', ZDBLOCK);

SBL41 := STRCAT(' 4.概念: ', GNBLOCK);

SBL5 := STRCAT(STRCAT(STRCAT(SBL1, SBL2), SBL4), SBL41);

{DRAWTEXT_FIX(ISLASTBAR, 0, 0.75, 0, SBL5),COLORFF6000;}

总股本:=STRCAT(STRCAT('总股本: ',CON2STR(TOTALCAPITAL/1000000,2)),'亿');

{流通盘:=STRCAT(STRCAT(' 流通盘: ',CON2STR(CAPITAL/1000000,2)),'亿');}

全流通:=STRCAT(' 流通比: ',CON2STR((CAPITAL/1000000)/(TOTALCAPITAL/1000000),2));

流通值:=(CAPITAL/1000000)*C;

市值:=STRCAT(STRCAT(' 流通: ',CON2STR(流通值,2)),'亿');

股本市值:=STRCAT('市值: ',STRCAT(STRCAT(STRCAT(总股本,全流通),市值),''));

{DRAWTEXT_FIX(ISLASTBAR,0.005,0.115,0,股本市值),COLORBLUE;}

DRAWTEXT_FIX(流通值>100, 0, 0.85, 0, 股本市值),COLORGREEN; {大于100亿显示绿色}

DRAWTEXT_FIX(流通值<=100, 0, 0.85, 0, 股本市值),COLORRED; {小于100亿显示红色}

{显示上涨与下跌家数}

上涨家数:=STRCAT('沪深：上涨家数: ', CON2STR(DYNAINFO(60), 0));

下跌家数:= STRCAT(' 下跌家数', CON2STR(DYNAINFO(61),0));

差:=STRCAT(' 差：', CON2STR(DYNAINFO(60)-DYNAINFO(61), 0));

大盘1:=STRCAT(上涨家数, STRCAT(下跌家数, 差) );

DRAWTEXT_FIX(DYNAINFO(60)-DYNAINFO(61) > 10, 0.0, 0.001, 0, 大盘1), COLORRED;

DRAWTEXT_FIX(DYNAINFO(60)-DYNAINFO(61) < 10, 0.0, 0.001, 0, 大盘1), COLORGREEN;

{显示总卖总买

总卖:=STRCAT('总卖', CON2STR(CUR_SELLORDER, 0) );

总买:=STRCAT('总买', CON2STR(CUR_BUYORDER, 0) );

DRAWTEXT_FIX(1, 0.7, 0.7, 0, STRCAT(总卖,总买) );

}

{上证指数:="Q_大盘分时.A#DAY";}

{上证指数:=1;}

{DRAWTEXT_FIX(1, 0.0, 0.1, 0, STRCAT('大盘指数:',CON2STR(上证指数,2))),COLORBLUE;}

{STICKLINE(CROSS(支撑,现价),支撑,阻力,1,0),COLORRED; }

{DRAWTEXT(LONGCROSS(支撑,现价,2),支撑*1.001,'吸吸吸'),COLORRED;{吸}

DRAWICON(LONGCROSS(支撑,现价,2), 支撑*0.99, 9),COLORRED;{低吸}

DRAWICON(LONGCROSS(现价,阻力,2), 现价, 15),COLORGREEN;{抛，跑路};

DRAWTEXT_FIX(1, 0.65, 0.9, 0, '此函数有未来，新手不要用。。。'),COLORBLUE;

{坤隆个股T+0分时买卖.TNE}

个股基数:=自适应参数.GGS1#DAY;

个股基数2:=自适应参数.GGB1#DAY;

RSV:=(CLOSE-LLV(LOW,89))/(HHV(HIGH,89)-LLV(LOW,89))*100;

K:=SMA(RSV,14,1);

D:=SMA(K,5,1);

J:=3*K-2*D;

K1:=EMA(RSV,14);

D1:=EMA(D,5);

J1:=3*K1-2*D1;

JJX:=SUM(AMOUNT,0)/SUM(VOL,0)/100;

H1:=C>REF(C,1) AND C/JJX>1.06;

L1:=C<REF(C,1) AND C/JJX<0.94;

DRAWICON(CROSS(个股基数2,K1) AND EVERY(K1<D1,10) AND D1<REF(D1,1) OR FILTER(L1,400) {OR (REF(D1,1)=0 AND REF(K1,1)=0 AND REF(J1,1)=0 AND J1>K1)},C*0.995, 13);

DRAWICON(CROSS(K1,个股基数) AND EVERY(K1>D1,10) AND D1>REF(D1,1) OR FILTER(H1,400),C*1.005, 14);

{小飞T+0增强版.TNE" }

均价3:=SUM(C*V,240)/SUM(V,240),COLORYELLOW,LINETHICK1;

TT:=BARSCOUNT(C);均:=MA(C,TT);

上均线:=均+2*STD(C,3);下均线:=均-2*STD(C,3);

时长:=TIME>93000;涨幅:=C/REF(C,1)>1.02;跌幅:=C/REF(C,1)<0.98;

横盘:=((HHV(C,TT)-LLV(C,TT))/C)<0.05;YY:=SMA(VOL,30,1);

放量:=(YY-LLV(LLV(YY,1),30))/(HHV(HHV(YY,1),30)-LLV(LLV(YY,1),30))>0.95;

涨跌幅:=涨幅 OR 跌幅;

横涨1:=涨跌幅=0 AND 横盘 AND 放量 AND CROSS(均价3,均);

DRAWTEXT(FILTER(横涨1,10),C,'突'), COLORRED;

DRAWICON(FILTER(横涨1,10),均价3,1);

XX:=SUM(AMOUNT,BARSCOUNT(CLOSE))/SUM(V*100,BARSCOUNT(CLOSE));

主力:=EXPMA(CLOSE/XX,20);大户:=EXPMA(CLOSE/XX,60);散户:=EXPMA(CLOSE/XX,120);

底:=1;1.02,NODRAW;高:=1.03;

AA:=主力>大户 AND 主力>1.003 AND 大户>散户 AND C>EXPMA(C,20) AND EXPMA(C,10)>EXPMA(C,20) AND EXPMA(C,20)>EXPMA(C,60);

DRAWICON(主力>大户 AND 大户>散户 AND C>EXPMA(C,20) AND EXPMA(C,10)>EXPMA(C,20) AND EXPMA(C,20)>EXPMA(C,60) AND 主力=HHV(主力,30) AND CROSS(主力,1.003),C,38);

DRAWTEXT(主力>大户 AND 大户>散户 AND C>EXPMA(C,20) AND EXPMA(C,10)>EXPMA(C,20) AND EXPMA(C,20)>EXPMA(C,60) AND 主力=HHV(主力,30) AND CROSS(主力,1.003),C*0.999,'-主力'),COLORBLUE;

{DRAWICON(CROSS(主力,1.02),C,24);}

DRAWTEXT(CROSS(主力,1.02),C*0.999,'--拉升'),COLORRED;

{DRAWICON(CROSS(主力,1.04),C,6);}

DRAWTEXT(CROSS(主力,1.04),C*0.999,'--冲涨停'),COLORRED;

{DRAWICON(CROSS(散户,主力),C,6);}

DRAWTEXT(CROSS(散户,主力),C*0.9995,'--小心'),COLORBLUE;

{DRAWICON(CROSS(散户,大户),C,6);}

DRAWTEXT(CROSS(散户,大户),C*0.9995,'--走弱'),COLORBLUE;

均价:SUM(V*C,0)/SUM(V,0), LINETHICK3, COLORFF00FF; {粉色};

{昨高点:REF(HIGH,1), LINETHICK2, COLORFF00FF; //这样显示是今天的均线};

CC:C, LINETHICK2, COLORBLUE; {价咯线显示成蓝色};

{KDJ分时显示}