通达信一致上涨主图指标公式源码

N:=102;
M:=7;DRAWKLINE(H,O,L,C);
GSPT:=MA((2*CLOSE+HIGH+LOW)/4,5);
启动点1:GSPT*N/100;
启动点2:GSPT*(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);
GSPT10:=MA(CLOSE,8),COLORRED;
GSPT12:=MA(CLOSE,12),COLORRED;
X_10:=((ATAN((GSPT10 - REF(GSPT10,1))) * 3.1416) * 10);
X_12:=((ATAN((GSPT12 - REF(GSPT12,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((((GSPT12 <= GSPT10) AND (X_12 >= 1)) AND (X_10 >= 1)),GSPT10,GSPT12,4,0),COLORRED;
STICKLINE((((GSPT12 >= GSPT10) AND (X_10 <= 1)) AND (X_10 <= 1)),GSPT10,GSPT12,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;