非常感谢逍遥聖手老师提供的源码，逍遥聖手老师通达信版分时主图堪称完美，现将大智慧版修改版发出来供喜欢的同学们参考。
说明：1、必须先建立副图，公式名称必须写 MK 以便明框主图公式中Y.D.Z.K赋值语句引用。
2、在逍遥聖手老师大智慧版的基础上添加了压力线、强势线、平衡线、支撑线，与通达信版比较
从开盘到收盘分时主图均不显示压力线、强势线、平衡线、支撑线文字。
3、添加了杨明明老师分享的分时成交量抓涨停公式源码。
4、去掉 长线、红多、绿空线 。添加长线、红多、绿空先后，主图图形变形， 压力线、强势线、平衡线、支撑线 均不显示。
说明：1、必须先建立副图，公式名称必须写 MK 以便明框主图公式中Y.D.Z.K赋值语句引用。
2、在逍遥聖手老师大智慧版的基础上添加了压力线、强势线、平衡线、支撑线，与通达信版比较
从开盘到收盘分时主图均不显示压力线、强势线、平衡线、支撑线文字。
3、添加了杨明明老师分享的分时成交量抓涨停公式源码。
{www.9m8.cn}mk-副图}
明Y:REF(EMA(H,5)+EMA((H-L),5),1);
明D:REF(EMA(H,5),1);
明Z:REF((C*3+H*2+L*2+O)/8,1);
明K:REF(EMA(L,5),1);
{www.9m8.cn}明框-主图}
明Y:=REF(EMA(H,5)+EMA((H-L),5),1);
明D:=REF(EMA(H,5),1);
明Z:=REF((C*3+H*2+L*2+O)/8,1);
明K:=REF(EMA(L,5),1);
{www.9m8.cn}均价:SUM(V*C,0)/SUM(V,0),COLOR00F7F7,DOTLINE;}
Y:= MK.明Y#DAY
D:= MK.明D#DAY
Z:= MK.明Z#DAY
K:= MK.明K#DAY
{www.9m8.cn}KJ1:REFDATE(Y,DATE),COLOR00AEAE;}
KJ2:HORILINE(D,D,D),COLORRED,LINETHICK2;
KJ4:HORILINE(Z,Z,Z),COLORYELLOW,LINETHICK2;
KJ5:HORILINE(K,K,K),COLORWHITE,LINETHICK2;
KJ6:HORILINE(Y,Y,Y),COLORGREEN,LINETHICK2;
{www.9m8.cn}HORILINE(H =HHV(H,n),H,H =HHV(H,n)),DASHLINE;}
{www.9m8.cn}DRAWNUMBER(ISLASTBAR,KJ1,KJ1),COLOR00AEAE;}
HORILINE(KJ2,KJ2,KJ2),COLORRED;
DRAWTEXT(KJ2,KJ2*(1-0.002),'压力线'),COLORYELLOW;
HORILINE(KJ4,KJ4,KJ4),COLORYELLOW;
DRAWTEXT(KJ4,KJ4,'强势线'),COLORYELLOW;
HORILINE(KJ5,KJ5,KJ5),COLORMAGENTA;
DRAWTEXT(KJ5,KJ5*0.96,'平衡线'),COLORYELLOW;
HORILINE(KJ6,KJ6,KJ6),COLORWHITE;
DRAWTEXT(KJ6,KJ6*(1+0.002),'支撑线'),COLORYELLOW;
现价:=C;
均价:=SUM(V*C,0)/SUM(V,0);
MM:=0;
{www.9m8.cn}IF PFFIN(4251,0) 0 THEN BEGIN;}
{www.9m8.cn}MM:=PFFIN(4251,0);}
流通盘:=CAPITAL-MM/100;
DBHS:=IF(CAPITAL 2000000,V/CAPITAL*100,V/流通盘*100);
标准量:=IF(COUNT(V 流通盘/1000,0) 0,流通盘/1000,0);
{www.9m8.cn}STICKLINE(C REF(C,1),0,VOL,5,0),COLORGREEN;
STICKLINE(C REF(C,1),0,VOL,5,0),COLOR4040FF;
STICKLINE(C=REF(C,1),0,VOL,5,0),COLORWHITE;}
总量:=SUM(V,0);
最大量:=HHV(V,0);
最大换手:=HHV(DBHS,240);
{www.9m8.cn}STICKLINE(C REF(C,1) AND V REF(最大量,1) AND TIME 94200,0,VOL,5,0),COLORGREEN,LINETHICK2;
STICKLINE(C REF(C,1) AND V REF(最大量,1) AND TIME 94200,0,VOL,5,0),COLORRED,LINETHICK2;
STICKLINE(C=REF(C,1) AND V REF(最大量,1) AND TIME 94200,0,VOL,5,0),COLORWHITE,LINETHICK2;
STICKLINE(V REF(最大量,1)*1.5 AND C REF(C,1) AND DBHS 0.15 AND TIME 94500,0,VOL,5,0),COLORYELLOW,LINETHICK2;
STICKLINE(C REF(C,1) AND DBHS 0.22 AND TIME 94200,0,VOL,5,0),COLOR66FFFF,LINETHICK2;}
LXTP:=((V REF(V,1) AND DBHS =0.1 AND REF(V,1) REF(最大量,2)) OR (V REF(最大量,1) AND DBHS =0.08 AND REF(V,2) REF(最大量,3))) AND C REF(C,1);
LXTP1:=((V REF(V,1)*0.9 AND DBHS =0.1 AND REF(V,1) REF(最大量,2)) OR (V REF(最大量,1)*0.9 AND DBHS =0.1 AND REF(V,2) REF(最大量,3))) AND C REF(C,1);
DRAWTEXT(LXTP1,均价,'↖★'),COLORYELLOW,LINETHICK3;
DRAWTEXT(LXTP,现价,'↖★'),COLORRED,LINETHICK3;
