金银成交量－精品通达信指标公式源码分享

VOLUME:VOL,VOLSTICK;

MA1:=MA(VOL,5),COLORYELLOW;

MA2:=MA(VOL,10),COLORWHITE;

MA3:=MA(VOL,20),COLORWHITE;

MA4:=MA(VOL,40),COLORMAGENTA;

换手:=V*100/CAPITAL;

{---------------------------------------------------}

新股成交量:IF(BARSCOUNT(CLOSE)<40,VOL,DRAWNULL),VOLSTICK;

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

成交量（手）:VOL,COLORWHITE,LINETHICK0;

调整周期:IF(MA1<MA4,BARSLAST(CROSS(MA4,MA1))+1,BARSLAST(CROSS(MA4,MA1))-BARSLAST(CROSS(MA1,MA4))),NODRAW;

调整总换手:IF(MA1<MA4,SUM(换手,BARSLAST(CROSS(MA4,MA1))+1),SUM(换手,BARSLAST(CROSS(MA4,MA1))+1)-SUM(换手,BARSLAST(CROSS(MA1,MA4))+1)),NODRAW;

调整均换手:调整总换手/调整周期,NODRAW;

虚拟成交量:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW;

放量上涨:C/REF(C,1)>=1.01 AND V/REF(V,1)>=1.5 AND V>MA(V,5) AND REF(V,1)/REF(MA(V,5),1)<=1.8,NODRAW;

{-------------------------------------------------------------}

STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,虚拟成交量,0,4,-1),COLOR00C0C0;

ZHUDONGMAIPAN:=IF(C>OPEN,AA*(HIGH-LOW),IF(C<OPEN,AA*((HIGH-OPEN)+(C-LOW)),VOL/2));

ZHUDONGMAIPANG:=IF(C>OPEN,0-AA*((HIGH-C)+(OPEN-LOW)),IF(C<OPEN,0-AA*(HIGH-LOW),0-VOL/2));

STICKLINE(ZHUDONGMAIPAN>ZHUDONGMAIPANG AND MA1>=MA4,VOL,0,3,0),COLOR0000AA;

STICKLINE(ZHUDONGMAIPAN>ZHUDONGMAIPANG AND MA1>=MA4,ZHUDONGMAIPAN,0,2.5,0),COLOR0000BB ;

STICKLINE(ZHUDONGMAIPAN>ZHUDONGMAIPANG AND MA1>=MA4,ZHUDONGMAIPAN,0,1.5,0),COLOR0000CC ;

STICKLINE(ZHUDONGMAIPAN>ZHUDONGMAIPANG AND MA1>=MA4,ZHUDONGMAIPAN,0,1,0),COLOR0000EE;

STICKLINE(ZHUDONGMAIPANG<ZHUDONGMAIPAN AND MA1>=MA4,ZHUDONGMAIPAN,ZHUDONGMAIPAN+ABS(ZHUDONGMAIPANG),3,0),COLOR7B7B00;

STICKLINE(ZHUDONGMAIPANG<ZHUDONGMAIPAN AND MA1>=MA4,ZHUDONGMAIPAN,ZHUDONGMAIPAN+ABS(ZHUDONGMAIPANG),2.5,0),COLOR909000;

STICKLINE(ZHUDONGMAIPANG<ZHUDONGMAIPAN AND MA1>=MA4,ZHUDONGMAIPAN,ZHUDONGMAIPAN+ABS(ZHUDONGMAIPANG),1.5,0),COLORA8A800;

STICKLINE(ZHUDONGMAIPANG<ZHUDONGMAIPAN AND MA1>=MA4,ZHUDONGMAIPAN,ZHUDONGMAIPAN+ABS(ZHUDONGMAIPANG),1,0),COLORCECE00;

STICKLINE(ZHUDONGMAIPAN>ZHUDONGMAIPANG AND MA1<MA4,0,ZHUDONGMAIPAN,3,0),COLORRED;

STICKLINE(ZHUDONGMAIPAN>ZHUDONGMAIPANG AND MA1<MA4,0,ZHUDONGMAIPAN,2.5,0),COLOR0066FF;

STICKLINE(ZHUDONGMAIPAN>ZHUDONGMAIPANG AND MA1<MA4,0,ZHUDONGMAIPAN,1.5,0),COLOR0099FF;

STICKLINE(ZHUDONGMAIPAN>ZHUDONGMAIPANG AND MA1<MA4,0,ZHUDONGMAIPAN,1,0),COLORYELLOW;

STICKLINE(ZHUDONGMAIPANG<ZHUDONGMAIPAN AND MA1<MA4,ZHUDONGMAIPAN,ZHUDONGMAIPAN+ABS(ZHUDONGMAIPANG),3,0),COLOR007B00;

STICKLINE(ZHUDONGMAIPANG<ZHUDONGMAIPAN AND MA1<MA4,ZHUDONGMAIPAN,ZHUDONGMAIPAN+ABS(ZHUDONGMAIPANG),2.5,0),COLOR009000;

STICKLINE(ZHUDONGMAIPANG<ZHUDONGMAIPAN AND MA1<MA4,ZHUDONGMAIPAN,ZHUDONGMAIPAN+ABS(ZHUDONGMAIPANG),1.5,0),COLOR00A800;

顶:=HHV(V,90); 

底:=LLV(V,90);

地:=底+(顶-底)*0.06;

下:=底+(顶-底)*0.28; 

中:=底+(顶-底)*0.50; 

上:=底+(顶-底)*0.75; 

【金】:REFDATE(地,DATE),COLOR00FFFF;

【银】:REFDATE(下,DATE),COLORFFFFFF;

【铜】:REFDATE(中,DATE),COLORLIRED;

【铁】:REFDATE(上,DATE),COLORRED;

【顶】:REFDATE(HHV(V,90),DATE),COLORCYAN;