通达信一阳定乾坤主图指标公式源码

　　通达信一阳定乾坤主图指标公式源码

　　YM11:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));

　　YM12:=(100 - ((90 * (HHV(HIGH,14) - CLOSE)) / (HHV(HIGH,14) - LLV(LOW,14))));

　　YM13:=(100 - MA(((100 * (HHV(HIGH,6) - CLOSE)) / (HHV(HIGH,6) - LLV(LOW,6))),34));

　　DIR2:=Abs(CLOSE-REF(CLOSE,10));

　　VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),10);

　　ER2:=DIR2/VIR2;

　　CS2:=ER2*(0.8-2/24)+2/24;

　　CQ2:=CS2*CS2;

　　ACB2:=EMA(DMA(CLOSE,CQ2),2),COLORGREEN,LINETHICK2;

　　ACB3:=IF(ACB2/REF(ACB2,1)>0.997,ACB2,DRAWNULL),COLORYELLOW,LINETHICK2;

　　ACB4:=IF(ACB2/REF(ACB2,1)>1.001,ACB2,DRAWNULL),COLORRED,LINETHICK2;

　　PT:=REF(H,1)-REF(L,1);

　　CDP:=(REF(H,1)+REF(L,1)+REF(C,1)*2)/4;

　　AH:=CDP+PT;

　　AL:=CDP-PT;

　　NH:=CDP*2-REF(L,1);

　　NL:=CDP*2-REF(H,1);

　　强:IF(AH>REF(C,1)*1.1,REF(C,1)*1.1,AH)NODRAW;

　　阻:IF(NH>强,(强-CDP)*0.618+CDP,NH)NODRAW,COLORCYAN;

　　M:=IF(AL

　　撑:IF(NL

　　底:IF(AL

　　STICKLINE(((OPEN < CLOSE) AND (YM12 < MA(YM13,6))),(CLOSE * 0.998),(OPEN * 1.002),2,0),COLORRED;

　　A1:=EMA(C,14)COLORWHITE,LINETHICK1;

　　A1X:=(A1-REF(A1,1))/REF(A1,1)*100,NODRAW;

　　突破:=REF(EMA(C,14),1),NODRAW;

　　距离:=(C-突破)/突破*100,NODRAW;

　　量比:=V/REF(MA(V,1),1);

　　多方力度:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1),COLOR00FFFF,LINETHICK2;

　　空方力度:=100*(HHV(HIGH,55)-CLOSE)/(HHV(HIGH,55)-LLV(LOW,55))COLOR00EC00,LINETHICK1;

　　GS:=(CLOSE-LLV(LOW,33))/(HHV(HIGH,33)-LLV(LOW,33))*100;

　　K:=SMA(GS,3,1);

　　D:=SMA(K,3,1);

　　J:=3*K-2*D;

　　YM1:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);

　　YM2:=EMA(YM1,8);

　　YM3:=3*SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,5,1),3,1);

　　趋势线:=(MA(CLOSE,5)+MA(CLOSE,10)+MA(CLOSE,15)+MA(CLOSE,20))/4;

　　牛熊线:=MA(CLOSE,26);

　　生命线:=EMA(CLOSE,55);

　　ABC1:=MAX(MAX(趋势线,牛熊线),生命线);

　　CBA1:=MIN(MIN(趋势线,牛熊线),生命线);

　　红钻石:C/REF(C,1)>1.03 AND 量比>1.1 AND crOSS(多方力度,空方力度);

　　红支撑:IF(A1X>=0,REF(EMA(C,14),BARSLAST(CROSS(A1X,0))+1),DRAWNULL)COLORRED,LINETHICK2;

　　绿压力:IF(A1X<0,REF(EMA(C,14),BARSLAST(CROSS(0,A1X))+1),DRAWNULL)COLORGREEN,LINETHICK2;

　　STICKLINE(红钻石,C,O,2,0)COLORYELLOW;

　　DRAWICON(红钻石,L,25);