通达信底部区域追涨主图指标 源码

N:=30;
M:=95;
V1:EMA(CLOSE,5),COLORYELLOW;
V2:EMA(EMA(CLOSE,29)*1.01,10),COLORFFCC66;
DRAWICON(CROSS(V1,V2),V2,1);
V3:EMA(CLOSE,10),COLORFF00FF;
V4:EMA(EMA(CLOSE,60)*0.99,10),COLOR0099FF;
DRAWICON(CROSS(V3,V4),V4,1);
VAR1:=AMOUNT/VOL/100;
庄家运作成本: MA(CLOSE,18),COLORWHITE;
庄家平均成本: EMA(EMA(VAR1,2),30),COLOR00FF00;
庄家底仓成本: EMA(EMA(VAR1,13),95),COLORBLUE;
无穷成本均线: DMA(CLOSE,VOL/CAPITAL),COLORBLUE;
STICKLINE(C>=O,C,O,7,0),COLORRED;
STICKLINE(C>=O,C,O,4,0),COLOR7070FF{B0B0FF};
STICKLINE(C>=O,C,O,2,0),COLORYELLOW;
STICKLINE(C>=O,H,L,0,0),COLORYELLOW;
STICKLINE(C<=O,C,O,7,0),COLORFF2020;
STICKLINE(C<=O,C,O,4,0),COLORFF6600;
STICKLINE(C<=O,C,O,2,0),{COLORCYAN;}COLORFFCC66;
STICKLINE(C<=O,H,L,0,0),{COLORCYAN}COLORFFCC66;
VAR326:=IF(CLOSE>REF(CLOSE,1),88,0);
VAR327:=IF(CLOSE/REF(CLOSE,1)>1.050 AND HIGH/CLOSE<1.010 AND VAR326>0, 91, 0);
STICKLINE(VAR327>90,L*0.99,L*0.95,4,0),COLORYELLOW;
DRAWTEXT(VAR327>90,LOW*0.95,'追涨'),COLORYELLOW;

VARM2:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100;
VARM3:=SMA(SMA(VARM2,9,4),9,4)/7.777777;
VARM4:=EMA(VARM3,5);
VARM5:=3*VARM3-2*VARM4;
AAM:=CROSS(VARM5,VARM3) AND VARM3<1.7777777 AND C>O;
VARM6:=(2*CLOSE+HIGH+LOW)/4;
VARM7:=LLV(LOW,13);
VARM8:=HHV(HIGH,13);
VARM9:=EMA((VARM6-VARM7)/(VARM8-VARM7)*100,13);
VARMA:=EMA(0.667*REF(VARM9,1)+0.333*VARM9,2);
DRAWTEXT(AAM,L,'区域底部'),COLORMAGENTA;