改成文华可用 (文华财经)

投资者咨询:改成文华可用 (文华财经)
来源:文华财经  日期:2021-1-22 9:38
 

NN:=BARSLAST(DATE<REF(DATE,1) OR DATE>REF(DATE,1))+1;
 KH:=HHV(NN,300);
 QQ:=VOLINSTK-REF(VOLINSTK,1);
 SJTJ:=DATE<1590301;
 K1:=IF(CLOSE>OPEN&&QQ>=0 && SJTJ,QQ,0);
 KK1:=IF(CLOSE<OPEN&&QQ<0 && SJTJ,QQ,0);
 KKK1:=IF(CLOSE=OPEN,QQ*0.5,0);
 K2:=IF(CLOSE<OPEN&&QQ>=0 && SJTJ,QQ,0);
 KK2:=IF(CLOSE>OPEN&&QQ<0 && SJTJ,QQ,0);
 DO:=SUM(K1,NN)+SUM(KK1,NN)+SUM(KKK1,NN);
 KO:=SUM(K2,NN)+SUM(KK2,NN)+SUM(KKK1,NN);
 N4:=IF(NN<=4,NN,4);
 VK1:=IF(CLOSE>=OPEN,VOL,0);
 VK2:=IF(CLOSE<=OPEN,VOL,0);
 VDO:=SUM(VK1,N4);
 VKO:=SUM(VK2,N4);
 VDK:=DO-KO;
 CC:=SUM(QQ,NN);
 STICKLINE(VDK>=0,VDK,0,2,0),COLORRED;
 STICKLINE(VDK<=0,VDK,0,2,0),COLORCYAN;
多头增仓:DO COLORMAGENTA,,LINETHICK4;
空头增仓:KO COLORGREEN,,LINETHICK4;
日增仓(仓差):CC COLORYELLOW,,NODRAW;
 DRAWNUMBER(ISLASTBAR,DO,DO),COLORMAGENTA;
 DRAWNUMBER(ISLASTBAR,KO,KO),COLORGREEN;
 {W:=MOD(NN,5);
 J:=(ISLASTBAR,5);
 DRAWNUMBER(W=0&&J=0,DO,DO),COLORMAGENTA;
 DRAWNUMBER(W=0&&J=0,KO,KO),COLORGREEN;

DRAWNUMBER(ISLASTBAR&&CC>0,0,CC),COLORYELLOW;
 DRAWNUMBER(ISLASTBAR&&CC<0,0,CC),COLORBLUE;};

 
技术人员回复
日期:2021-1-22 9:40
 参考:

NN:=BARSLAST(DATE<REF(DATE,1) OR DATE>REF(DATE,1))+1;
 KH:=HHV(NN,300);
 QQ:=OPI-REF(OPI,1);
 SJTJ:=1;
 K1:=IF(CLOSE>OPEN&&QQ>=0 && SJTJ,QQ,0);
 KK1:=IF(CLOSE<OPEN&&QQ<0 && SJTJ,QQ,0);
 KKK1:=IF(CLOSE=OPEN,QQ*0.5,0);
 K2:=IF(CLOSE<OPEN&&QQ>=0 && SJTJ,QQ,0);
 KK2:=IF(CLOSE>OPEN&&QQ<0 && SJTJ,QQ,0);
 DO:=SUM(K1,NN)+SUM(KK1,NN)+SUM(KKK1,NN);
 KO:=SUM(K2,NN)+SUM(KK2,NN)+SUM(KKK1,NN);
 N4:=IF(NN<=4,NN,4);
 VK1:=IF(CLOSE>=OPEN,VOL,0);
 VK2:=IF(CLOSE<=OPEN,VOL,0);
 VDO:=SUM(VK1,N4);
 VKO:=SUM(VK2,N4);
 VDK:=DO-KO;
 CC:=SUM(QQ,NN);
 STICKLINE(VDK>=0,VDK,0,2,0),COLORRED;
 STICKLINE(VDK<=0,VDK,0,2,0),COLORCYAN;
多头增仓:DO,COLORMAGENTA,LINETHICK4;
空头增仓:KO,COLORGREEN,LINETHICK4;
日增仓(仓差):CC,COLORYELLOW,NODRAW;
 DRAWNUMBER1(ISLASTBAR,DO,DO,2),COLORMAGENTA;
 DRAWNUMBER1(ISLASTBAR,KO,KO,2),COLORGREEN;
 W:=MOD(NN,5);
 J:=BACKSET(ISLASTBAR,5);
 DRAWNUMBER1(W=0&&J=0,DO,DO,2),COLORMAGENTA;
 DRAWNUMBER1(W=0&&J=0,KO,KO,2),COLORGREEN;

DRAWNUMBER1(ISLASTBAR&&CC>0,0,CC,2),COLORYELLOW;
 DRAWNUMBER1(ISLASTBAR&&CC<0,0,CC,2),COLORBLUE;