通达信底部形态主图指标公式源码

N:=102;
M:=7;
VARG:=MA((2*CLOSE+HIGH+LOW)/4,5);
启动点1:VARG*N/100;
启动点2:VARG*(200-N)/100;
CC:=Abs((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
DD:=DMA(CLOSE,CC);
启动点3:(1+M/100)*DD;
启动点4:(1-M/100)*DD;
一致上涨:=IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100);
VARG10:=MA(CLOSE,8),COLORRED;
VARG12:=MA(CLOSE,12),COLORRED;
X_10:=((ATAN((VARG10 - REF(VARG10,1))) * 3.1416) * 10);
X_12:=((ATAN((VARG12 - REF(VARG12,1))) * 3.1416) * 10);
MA13:=MA(CLOSE,13);
X1:=(C+L+H)/3;
X_13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;
EMA8:=EMA(C,8);
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
macd:=(DIF-DEA)*2;
XG:=MACD>0;
STICKLINE((((VARG12 <= VARG10) AND (X_12 >= 1)) AND (X_10 >= 1)),VARG10,VARG12,4,0),COLORRED;
STICKLINE((((VARG12 >= VARG10) AND (X_10 <= 1)) AND (X_10 <= 1)),VARG10,VARG12,4,0),COLOR00FF00;
DRAWICON(FILTER(X_13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10) AND XG,L*1,9);
STICKLINE(FILTER(X_13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10) AND XG,C,O,2,0),COLORRED;
DRAWTEXT(FILTER(X_13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10)AND XG,EMA8,'-----一致上涨'),COLORYELLOW;