NN:=BARSLAST(DATE<>REF(DATE,1))+1;
KH:=HHV(NN,300);
VERTLINE(DATE<>REFX(DATE,1)&&ISLASTBAR<>1&&KH<>1,COLORBLUE);
QQ:=OPI-REF(OPI,1);
K1:=IFELSE(CLOSE>OPEN&&QQ>=0,QQ,0);
KK1:=IFELSE(CLOSE<OPEN&&QQ<0,QQ,0);
KKK1:=IFELSE(CLOSE=OPEN,QQ*0.5,0);
K2:=IFELSE(CLOSE<OPEN&&QQ>=0,QQ,0);
KK2:=IFELSE(CLOSE>OPEN&&QQ<0,QQ,0);
DO:=SUM(K1,NN)+SUM(KK1,NN)+SUM(KKK1,NN);
KO:=SUM(K2,NN)+SUM(KK2,NN)+SUM(KKK1,NN);
N4:=IFELSE(NN<=4,NN,4);
VK1:=IFELSE(CLOSE>=OPEN,VOL,0);
VK2:=IFELSE(CLOSE<=OPEN,VOL,0);
VDO:=SUM(VK1,N4);
VKO:=SUM(VK2,N4);
VDK:=VDO-VKO;
STICKLINE(VDK>=0,VDK,0,COLORRED,0);
STICKLINE(VDK<=0,VDK,0,COLORCYAN,0);
CC:=SUM(QQ,NN);
DRAWNUMBER(ISLASTBAR&&CC>0,0,CC,0,COLORMAGENTA);
DRAWNUMBER(ISLASTBAR&&CC<0,0,CC,0,COLORBLUE);
W:=MOD(NN,5);
J:=BACKSET(ISLASTBAR,5);
文华码改成金字塔码,谢谢!
NN:=BARSLAST(DATE<>REF(DATE,1))+1;
KH:=HHV(NN,300);
VERTLINE(DATE<>REFX(DATE,1) and ISLASTBAR<>1 and KH<>1,COLORBLUE);
QQ:=OPENINT-REF(OPENINT,1);
K1:=IF(CLOSE>OPEN and QQ>=0,QQ,0);
KK1:=IF(CLOSE<OPEN and QQ<0,QQ,0);
KKK1:=IF(CLOSE=OPEN,QQ*0.5,0);
K2:=IF(CLOSE<OPEN and QQ>=0,QQ,0);
KK2:=IF(CLOSE>OPEN and QQ<0,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:=VDO-VKO;
STICKLINE(VDK>=0,VDK,0,8,0)COLORRED;
STICKLINE(VDK<=0,VDK,0,8,0)COLORCYAN;
CC:=SUM(QQ,NN);
DRAWNUMBER(ISLASTBAR&&CC>0,0,CC,0),COLORMAGENTA;
DRAWNUMBER(ISLASTBAR&&CC<0,0,CC,0),COLORBLUE;
W:=MOD(NN,5);
J:=BACKSET(ISLASTBAR,5);