当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：Q分时主图（通达信公式 分时主图 源码 测试图）
软件名称：[B]Q分时主图（通达信公式 分时主图 源码 测试图）[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：7.00 KB
官方主页：Home Page
更新时间：2020-05-12 08:44:10
软件简介:
这个分时公式，需要一个引用公式，也在附件里提供了，下载后，两个公式都导入，不要改名。
{放到前面，这样不会覆盖其它画线}
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分时显示}
{FS_K := (KDJ.K#MIN30 / 100.0 ), NODRAW;
{FS_D := KDJ.D#MIN30, NODRAW;
DRAWTEXT(CROSS(FS_K, FS_D) AND FS_K<60, C, '30买');
DRAWTEXT(CROSS(FS_D, FS_K) AND FS_K>40, C, '30死');
};
CUR_SELL1:="Q_MA.CUR_SELL#DAY", NODRAW;
CUR_BUY1:="Q_MA.CUR_BUY#DAY", NODRAW;
DRAWTEXT_FIX(1, 0.80, 0.18, 0, STRCAT('总卖:', CON2STR(CUR_SELL1, 0)) ),COLORBLUE;
DRAWTEXT_FIX(1, 0.80, 0.25, 0, STRCAT('总买:', CON2STR(CUR_BUY1, 0)) ),COLORBLUE;
[url=http://www.70822.com/soft/sort013/sort05/down-147564.html]Q分时主图（通达信公式 分时主图 源码 测试图）[/url]