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

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

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<REF(C,1)/1.1,REF(C,1)/1.1,AL);撑:IF(NL<M,CDP-(CDP-M)*0.618,NL)NODRAW;底:IF(AL<REF(C,1)/1.1,REF(C,1)/1.1,AL)NODRAW;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 ANDcrOSS(多方力度,空方力度);红支撑: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);