通达信简明主图源码、无未来

{笑雅*主图}
B1:=MA(C,1);
B2:SMA(SMA(SMA(B1,2,1),2,1),2,1),COLORRED;
BM2:MA(B2,2),COLORGREEN;
伊巴:=EMA(CLOSE,8),COLORWHITE;
百佳:=EMA(SLOPE(C,15)*20+伊巴,40),LINETHICK2;
VAR101:=(C+H+O+L)/4;
没黑马:=EXPMEMA(VAR101,3),COLORGREEN,LINETHICK2;
线上赢:MA(没黑马,13),COLORLIBLUE,LINETHICK2;
IF( 线上赢>REF( 线上赢,1), 线上赢,DRAWNULL),COLORMAGENTA,LINETHICK2;
STICKLINE(伊巴-百佳<0,BM2,线上赢,0.05,-1), COLORGREEN;
STICKLINE(百佳< 线上赢, 线上赢,百佳,0.5,0), COLORLIBLUE;
STICKLINE(伊巴-百佳>=0,BM2,线上赢,0.5,0),COLORLIRED;

X1:=(C+L+H)/1.5;
X2:=EMA(X1,3);
X3:=EMA(X2,2.5);
DRAWICON(CROSS(X2,X3) AND B2>线上赢,线上赢,9),COLORRED;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
短趋势线:=MA(CLOSE,13),COLORRED,LINETHICK3;
中线:=MA(CLOSE,33),LINETHICK1;
中趋势线:=MA(CLOSE,55),LINETHICK1,COLORGRAY;

上极限:=((C-REF(MA(CLOSE,20),1))/20+短趋势线)*1.20;
DRAWTEXT(CROSS(CLOSE,上极限),H*1.02,'减仓'),COLORLIGREEN;
DRAWTEXT(CROSS(CLOSE,MA(C,13)) AND 短趋势线<REF(短趋势线 ,1) AND 短趋势线<中趋势线 ,H*1.02,'减仓'),COLORLIGREEN;

VAR1:=((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100+(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100)/3;
DRAWTEXT(VAR1>9 AND FILTER(VAR1<REF(VAR1,1),5),H*1.02,'减仓'),COLORGREEN;
DRAWTEXT(VAR1>20 AND FILTER(VAR1<REF(VAR1,1),5),H*1.04,'卖出'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,HIGH,HYBLOCK);