【通达信免费源码】简单实用主图，进来瞧瞧不后悔（源码 说明 用

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

 

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

 

VAR3:=(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;

 

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

 

AMA3:IF(AMA2/REF(AMA2,1)>0.997,AMA2,DRAWNULL),COLORYELLOW,LINETHICK2;

 

AMA4:IF(AMA2/REF(AMA2,1)>1.001,AMA2,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 (VAR2 < MA(VAR3,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;