咨詢內容：

文華改博易大師

NN:=BARSLAST(DATE<>REF(DATE,1))+1;
KH:=HHV(NN,300);
VERTLINE(DATE<>REFX(DATE,1) AND ISLASTBAR<>1 AND KH<>1,COLORBLUE);
QQ:=OPI-REF(OPI,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,COLORRED,0);
//STICKLINE(VDK<=0,VDK,0,COLORCYAN,0);
CC:=SUM(QQ,NN);
DRAWNUMBER(ISLASTBAR AND CC>0,0,CC,0,COLORMAGENTA);
DRAWNUMBER(ISLASTBAR AND CC<0,0,CC,0,COLORBLUE);
POLYLINE(CLOSE>0,DO,COLORRED);
POLYLINE(CLOSE>0,KO,COLORGREEN);
W:=MOD(NN,5);
J:=BACKSET(ISLASTBAR,5);
DRAWNUMBER(ISLASTBAR,DO,DO,0,COLORYELLOW);
DRAWNUMBER(ISLASTBAR,KO,KO,0,COLORGREEN);
DRAWNUMBER(W=0 AND J=0,DO,DO,0,COLORYELLOW);
DRAWNUMBER(W=0 AND J=0,KO,KO,0,COLORGREEN);

?

?來源:程序化99網（ www.weiqiv.net.cn ）

博易技術人員： VERTLINE(DATE<>REFX(DATE,1) AND ISLASTBAR<>1 AND KH<>1,COLORBLUE);?? 老師提示說語法錯誤，麻煩一下再。謝謝 OPI:=AMOUNT;
NN:=BARSLAST(DATE<>REF(DATE,1))+1;
KH:=HHV(NN,300);
VERTLINE(DATE<>REFX(DATE,1)ANDISLASTBAR<>1ANDKH<>1,1),COLORBLUE;
QQ:=OPI-REF(OPI,1);
K1:=IF(CLOSE>OPENANDQQ>=0,QQ,0);
KK1:=IF(CLOSE<OPENANDQQ<0,QQ,0);
KKK1:=IF(CLOSE=OPEN,QQ*0.5,0);
K2:=IF(CLOSE<OPENANDQQ>=0,QQ,0);
KK2:=IF(CLOSE>OPENANDQQ<0,QQ,0);
DO1:=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,COLORRED,0);
//STICKLINE(VDK<=0,VDK,0,COLORCYAN,0);
CC:=SUM(QQ,NN);
DRAWNUMBER(ISLASTBARANDCC>0,0,CC,0),COLORMAGENTA;
DRAWNUMBER(ISLASTBARANDCC<0,0,CC,0),COLORBLUE;
POLYLINE(CLOSE>0,DO1),COLORRED;
POLYLINE(CLOSE>0,KO),COLORGREEN;
W:=MOD(NN,5);
J:=BACKSET(ISLASTBAR,5);
DRAWNUMBER(ISLASTBAR,DO1,DO1,0),COLORYELLOW;
DRAWNUMBER(ISLASTBAR,KO,KO,0),COLORGREEN;
DRAWNUMBER(W=0ANDJ=0,DO1,DO1,0),COLORYELLOW;
DRAWNUMBER(W=0ANDJ=0,KO,KO,0),COLORGREEN; 來源 程序化久久網