乘周末有空把“T+0分时主图”适当简化一下，用于手机通达信上（也可以用于电脑）。考虑到手机内存关系，把可以精简的都去掉，能显示关键的就行，由于手机通达信软件还不完善，买卖盘彩条不能显示，如这一项不要的可以去掉：源码中空行一下的{买卖盘彩条}源码删掉即可。希望能对朋友们有帮助。
MA30:=EMA(CLOSE,30);
强弱:EMA(CLOSE,900);
STICKLINE((MA30>强弱),MA30,强弱,0.1,0),COLORRED;
STICKLINE((MA30<强弱),MA30,强弱,0.1,0),COLORGREEN;
DRAWTEXT(ISLASTBAR AND C,C,STRCAT('←',CON2STR(C,2))),COLORYELLOW;
均价:=SUM(C*V,240)/SUM(V,240),COLORYELLOW,LINETHICK2;
CZ:=BARSCOUNT(C);前高:=REF(HHV(H,CZ),1);
突破:=CROSS(C,REF(HHV(H,CZ),1)) AND C/均价<1.09 AND CZ>1 AND CZ<240;
DRAWTEXT(CROSS(C,REF(HHV(H,CZ),1)) AND C/均价<1.09 AND CZ>=1 AND CZ<240,前高,'突'),COLORMAGENTA;
主扫:=COUNT(突破,13)>=3 AND CROSS(C,REF(HHV(H,CZ),1));
DRAWTEXT(主扫,前高, '←扫盘'),COLORYELLOW;
全买:=CROSS(C,REF(HHV(H,CZ),1)) AND HHVBARS(VOL,CZ)=0 AND C/均价<1.09 AND CZ>1 AND CZ<240 AND BARSLAST(主扫)>=21;DRAWTEXT(全买 ,前高, '←全仓'),COLORCYAN;
VAR1:=EMA(EMA(C,13),13);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;JJ:=DYNAINFO(11);
能量:=(EMA(C,8)-EMA(C,55))*10;空头:=EMA(能量,3);
TJ1:=(C-JJ)/JJ<-0.03;
TJ2:=控盘>REF(控盘,1) AND 控盘<-0.2;TJ3:=CROSS(能量,空头) AND 能量<-0.3;TJ4:=FILTER(TJ1 AND TJ2 AND TJ3,13);
DRAWTEXT(TJ4,C*0.999,'←有庄'),COLORRED;
H1:=MAX(DYNAINFO(3),DYNAINFO(5));
L1:=MIN(DYNAINFO(3),DYNAINFO(6));
P1:=H1-L1;阻:L1+P1*7/8,COLORGREEN;
撑:L1+P1*0.5/8,COLORMAGENTA;中:(撑+阻)/2,COLORWHITE,POINTDOT;
DRAWICON(LONGCROSS(撑,C,2),C,34);
DRAWICON(LONGCROSS(C,阻,2),C,35);
STICKLINE(LONGCROSS(撑,C,2),撑,中,1,0),COLORCC00FF;
STICKLINE(LONGCROSS(C,阻,2),阻,中,1,0),COLOR33FF33;
底买:STICKLINE(C<撑,撑,C,2,0),COLORRED;
STICKLINE(LONGCROSS(撑,C,2),撑,(撑-中)/5+撑,2,0),COLORYELLOW;
DRAWTEXT(LONGCROSS(撑,C,2),(撑-中)/5+撑,'底'),COLORYELLOW;
STICKLINE(LONGCROSS(C,阻,2),阻,阻-(撑-中)/5,2,0),COLORLIRED;
DRAWTEXT(LONGCROSS(C,阻,2),阻-(撑-中)/5,'顶'),COLORLIRED;
DRAWTEXT(CURRBARSCOUNT=8,阻+0.003,'顶'),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=8,撑-0.003,'底'),COLORLIRED;
DRAWTEXT(CURRBARSCOUNT=8,(撑+阻)/2,'中'),COLORWHITE;
顶:HHV(H,480),COLORRED,DOTLINE;
底:LLV(L,480),COLORGREEN,DOTLINE;
DRAWNUMBER(FILTER(CROSS(C,DYNAINFO(3)*1.1-0.01),60),C*0.99,TIME);
DRAWNUMBER(FILTER(CROSS(C,DYNAINFO(3)*1.1-0.01),60),C*0.98,C),COLORYELLOW;
DRAWTEXT_FIX(1,0.1,0.88,0,'市盈率:'),COLORLIBLUE;
DRAWNUMBER_FIX(1,0.2,0.88,0,CONST(DYNAINFO(39))),COLORLIBLUE;
DRAWTEXT_FIX(1,0.1,0.98,0,'市净