资金流量【飞狐5.0】
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;【大智慧I】
{手动输入参数：NUM（1，999，13），SHORT（1，999，3），LONG（1，999，5）}
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,COLORSTICK;
STICKLINE(CBX>0,0,CBX,4,0),Color0984FF;
STICKLINE(CBX>0,0,CBX,5,0),Color2D96FF;
STICKLINE(CBX>0,0,CBX,2,0),Color53A9FF;
STICKLINE(CBX>0,0,CBX,1,0),Color80BFFF;
STICKLINE(CBX>0,0,CBX,0,0),ColorA4D1FF;
STICKLINE(CBX<0,0,CBX,4,0),Color00F700;
STICKLINE(CBX<0,0,CBX,3,0),Color1EFF1E;
STICKLINE(CBX<0,0,CBX,2,0),Color51FF51;
STICKLINE(CBX<0,0,CBX,1,0),Color75FF75;
STICKLINE(CBX<0,0,CBX,0,0),ColorA4FFA4;
CBX1:EMA(SUM(CBX,NUM),2),COLORred;
CBX2:EMA(CBX1,SHORT),coloryellow;
CBX3:EMA(CBX1,LONG),ColorFF8000;【大智慧II】
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)/CAPITAL*1000000,linethick0;
STICKLINE(CBX>0,0,CBX,8,0),Color041CEC;
STICKLINE(CBX>0,0,CBX,6,0),Color0F26FB;
STICKLINE(CBX>0,0,CBX,4,0),Color2439FB;
STICKLINE(CBX>0,0,CBX,2,0),Color485AFB;
STICKLINE(CBX>0,0,CBX,1,0),Color6473FB;
STICKLINE(CBX<0,0,CBX,8,0),ColorCD690E;
STICKLINE(CBX<0,0,CBX,6,0),ColorEF7B12;
STICKLINE(CBX<0,0,CBX,4,0),ColorF08728;
STICKLINE(CBX<0,0,CBX,2,0),ColorF29540;
STICKLINE(CBX<0,0,CBX,1,0),ColorF5A963;
CBX1:EMA(SUM(CBX,NUM),2),COLORMAGENTA;
CBX2:EMA(CBX1,SHORT),coloryellow;
CBX3:EMA(CBX1,LONG),colorgreen;
【通达信】
{手动输入参数：NUM（1，999，13），SHORT（1，999，3），LONG（1，999，5）}
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)/CAPITAL*1000000,LINETHICK0;
STICKLINE(CBX>0,0,CBX,3,0),COLOR041CEC;
STICKLINE(CBX>0,0,CBX,3,0),COLOR0F26FB;
STICKLINE(CBX>0,0,CBX,2,0),COLOR2439FB;
STICKLINE(CBX>0,0,CBX,1,0),COLOR485AFB;
STICKLINE(CBX>0,0,CBX,0,0),COLOR6473FB;
STICKLINE(CBX<0,0,CBX,3,0),COLORCD690E;
STICKLINE(CBX<0,0,CBX,3,0),COLOREF7B12;
STICKLINE(CBX<0,0,CBX,2,0),COLORF08728;
STICKLINE(CBX<0,0,CBX,1,0),COLORF29540;
STICKLINE(CBX<0,0,CBX,0,0),COLORF5A963;
CBX1:EMA(SUM(CBX,NUM),2),COLORMAGENTA;
CBX2:EMA(CBX1,SHORT),COLORYELLOW;
CBX3:EMA(CBX1,LONG),COLORGREEN;
{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
