通达信新快速短线副图源码

以下是通达信新快速短线副图源码

P1:=5;P2:=4;

N:=38;M:=2;

VAR1:=LLV(LOW,P1);

VAR2:=HHV(HIGH,P1);

VAR3:=(2*CLOSE+HIGH+LOW)/4;

VAR4:=LLV(LOW,34);

VARA:=HHV(HIGH,10);

VARB:=EMA((VAR3-VAR4)/(VARA-VAR4)*100,13);

VARC:=EMA(0.667*REF(VARB,1)+0.333*VARB,2);

OO:=VARB-VARC;

STICKLINE(OO> 0,VARB,VARC,5,0),COLORRED;

STICKLINE(OO< 0,VARB,VARC,3,1),COLORGREEN;

风险:=98 ;

警戒:85 ;

启动:20 ;

强弱分界:55 ;

{快速LF: EMA((CLOSE-VAR1)/(VAR2-VAR1)*100,P2), COLORRED,LINETHICK2;

OK: EMA(0.667*REF(快速LF,1)+0.333*快速LF,2) , COLORYELLOW;}

LOWV:=LLV(LOW,N);

HIGHV:=HHV(HIGH,N);

RSV:=EMA((CLOSE-LOWV)/(HIGHV-LOWV)*100,M);

K:MA(RSV,M),COLORYELLOW,LINETHICK2;

D:MA(K,M),COLORGRAY;

IF(K< REF(K,1),K,DRAWNULL),COLORGREEN,LINETHICK2;

IF(K> REF(K,1),K,DRAWNULL),COLORRED,LINETHICK2;

总股本:=FINANCE(1)/100000000,NODRAW,COLORRED;

流通股本:=FINANCE(7)/100000000,NODRAW;

未流通比:=(总股本-流通股本)/总股本*100,NODRAW;

现价:C,NODRAW,COLORRED;

全流价:C*流通股本/总股本,COLORGREEN,NODRAW;

H股:FINANCE(6)/100000000,NODRAW;

B股:FINANCE(5)/100000000,NODRAW;

VAR8:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));

买:=IF(CLOSE> OPEN,VAR8*(HIGH-LOW),IF(CLOSE< OPEN,VAR8*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLORRED,POINTDOT;

卖:=-IF(CLOSE> OPEN,0-VAR8*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE< OPEN,0-VAR8*(HIGH-LOW),0-VOL/2)),COLOR00FF00,POINTDOT;

主买%:买/VOL*100,COLORYELLOW,NODRAW;

买入参考:=CROSS(K,D);

DRAWICON(买入参考 AND K> D,K-0.1,1);

卖出参考:=CROSS(D,K);

DRAWICON(卖出参考 AND D> K,D+1.1,9);