%>
INPUT:NUM(13,1,999),SHORT(3,1,999),LONG(5,1,999);
ZF:=H-L;
CB:=AMOUNT/VOL/100;
DV1:=IF(ZF>0 AND C>CB, ((H-C)/(H-CB))*((H-C)/(H-CB))*((H-CB)/ZF*VOL) ,0);
UV1:=IF(ZF>0 AND C>CB, VOL-DV1 ,0);
UV2:=IF(ZF>0 AND C<CB, ((C-L)/(CB-L))*((C-L)/(CB-L))*((CB-L)/ZF*VOL) ,0);
DV2:=IF(ZF>0 AND C<CB, VOL-UV2 ,0);
UV3:=IF(ZF=0 AND C>REF(C,1), VOL,0);
DV3:=IF(ZF=0 AND C<REF(C,1), VOL,0);
UV:=UV1+UV2+UV3;
DV:=DV1+DV2+DV3;
CBX:(UV-DV)/VOL,linethick0;
STICKLINE(CBX>0,0,CBX,8,0),Color0984FF;
STICKLINE(CBX>0,0,CBX,6,0),Color2D96FF;
STICKLINE(CBX>0,0,CBX,4,0),Color53A9FF;
STICKLINE(CBX>0,0,CBX,2,0),Color80BFFF;
STICKLINE(CBX>0,0,CBX,1,0),ColorA4D1FF;
STICKLINE(CBX<0,0,CBX,8,0),Color00F700;
STICKLINE(CBX<0,0,CBX,6,0),Color1EFF1E;
STICKLINE(CBX<0,0,CBX,4,0),Color51FF51;
STICKLINE(CBX<0,0,CBX,2,0),Color75FF75;
STICKLINE(CBX<0,0,CBX,1,0),ColorA4FFA4;
CBX1:EMA(SUM(CBX,NUM),2),COLORMAGENTA;
CBX2:EMA(CBX1,SHORT),coloryellow;
CBX3:EMA(CBX1,LONG),ColorFF8000;
N日红:COUNT(cbx>=0,5),LINETHICK0;
十日红:COUNT(cbx>=0,10),LINETHICK0;
二十日红:COUNT(cbx>=0,20),LINETHICK0;
连续红:COUNT(cbx>0 and ref(cbx,1)>0,55),LINETHICK0;
{股票教程网-http://bkqg.net承接通达信软件和公式破解,普通加密破解,完全加密破解,导入密码破解,时间限制破解,公式编写,可按您的要求写公式指标,价格按难度不同报价,有需要可以找我们}