大智慧长量柱指标(源码)

Q:=1;
AAA:=((SUM(VOL,5) / 3) * Q);
量能线:=MA(AAA,3);
K5:=(VOL > (REF(HHV(VOL,10),1) * 2));
DRAWTEXT((K5 > 0),(VOL * 1.3),''),colorFF00FF;
STICKLINE((K5 > 0),0,VOL,6,0),coloryellow;
量能异动:(VOL > 量能线),colorred;
DRAWICON((VOL > 量能线),量能线,11);
DRAWICON(((CLOSE > REF(CLOSE,1)) AND (VOL > 量能线)),V*1.15,10);
{黑洞};
VOL,VOLSTICK;
MA1:=MA(V,1);
MA5:MA(VOL,5),COLORWHITE;
MA10:=MA(VOL,10);
MA60:=MA(VOL,60);
N1:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
{DRAWTEXT(CROSS(MA5,MA60) AND C>=N1,MA1*1.1,'★叉！'),COLORyellow;}
黑洞:=MA1<MA5 AND MA1<MA60{ AND MA5>MA60};
风险:={MA1<MA5 AND }C<N1;
回暖:=C>N1;
FILLRGN(MA5*0.95,MA5*1.25,黑洞 ,RGB(0,255,0));{绿色}
FILLRGN(MA5,MA5*1.15,风险,RGB(255,255,0));{黄色}
FILLRGN(MA5,MA5*1.09,回暖 AND NOT(风险) AND NOT(黑洞),RGB(255,0,0));{红色};
成交量:VOL,PRECIS2,LINETHICK0;
成交额:AMOUNT/10000,PRECIS2,LINETHICK0;
DRAWFLAGTEXT(1,V,'<*t=80FF00*><*c=0000FF*><*p=95*>'+datestr(date)+'\n'+'<*t=E7FFFF*><*c=111100*><*p=95*>'+'成交量 '+成交量+'<*t=E7FFFF*><*c=0000FF*><*p=95*>'+' 成交额'+NUMTOSTRN(成交额,2)+'万元');