咨詢內容：

麻煩老師將文華源碼改為彭博用！！

SJTJ:=1;
DK:= SJTJ AND H>REF(HHV(HIGH,7),1);
KK:= SJTJ AND L<REF(LLV(LOW,7),1);
DK1:=BARSLAST(DK);
KK1:=BARSLAST(KK);
DK2:=BARSLAST(CROSS(KK1,DK1));
KK2:=BARSLAST(CROSS(DK1,KK1));
HS:=DK2<KK2;
LS:=KK2<DK2;
W2:=OPEN-CLOSE;
HT:=IF(OPEN>CLOSE,OPEN,CLOSE);
LT:=IF(OPEN<CLOSE,OPEN,CLOSE);
STICKLINE(W2>0 AND HS,OPEN,CLOSE,2,0),COLORRED;
STICKLINE(W2>0 AND HS,OPEN,H,0.0,0),COLORRED;
STICKLINE(W2>0 AND HS,C,L,0.0,0),COLORRED;
STICKLINE(W2<=0 AND HS,OPEN,CLOSE,2,1),COLORRED;
STICKLINE(W2<=0 AND HS,O,L,0.0,0),COLORRED;
STICKLINE(W2<=0 AND HS,C,H,0.0,0),COLORRED;
STICKLINE(W2>0 AND LS,OPEN,CLOSE,2,0),COLORGREEN;
STICKLINE(W2>0 AND LS,OPEN,H,0.0,0),COLORGREEN;
STICKLINE(W2>0 AND LS,C,L,0.0,0),COLORGREEN;
STICKLINE(W2<=0 AND LS,OPEN,CLOSE,2,1),COLORGREEN;
STICKLINE(W2<=0 AND LS,C,H,0.0,0),COLORGREEN;
STICKLINE(W2<=0 AND LS,O,L,0.0,0),COLORGREEN;
DRAWTEXT(HS=1 AND REF(LS,1),LOW*0.997,'多'),COLORYELLOW;
DRAWTEXT(LS=1 AND REF(HS,1),H*1.003,'空'),COLORYELLOW;
YZX:=IF(HS,REF(LLV(LOW,7),1),REF(HHV(HIGH,7),1));
多方莊線:IF(HS,YZX,NULL),LINETHICK1,COLORRED;
空方莊線:IF(LS,YZX,NULL),LINETHICK1,COLORGREEN;
DRAWNUMBER1(ISLASTBAR ,YZX,YZX,2),COLORYELLOW;

?

?來源:程序化99網（ www.kzuj.com.cn ）

博易技術人員： SJTJ:=1;
?DK:= SJTJ AND H>REF(HHV(HIGH,7),1);
?KK:= SJTJ AND L<REF(LLV(LOW,7),1);
?DK1:=BARSLAST(DK);
?KK1:=BARSLAST(KK);
?DK2:=BARSLAST(CROSS(KK1,DK1));
?KK2:=BARSLAST(CROSS(DK1,KK1));
?HS:=DK2<KK2;
?LS:=KK2<DK2;
?W2:=OPEN-CLOSE;
?HT:=IF(OPEN>CLOSE,OPEN,CLOSE);
?LT:=IF(OPEN<CLOSE,OPEN,CLOSE);
?STICKLINE(W2>0 AND HS,OPEN,CLOSE,2,0),COLORRED;
?STICKLINE(W2>0 AND HS,OPEN,H,0.0,0),COLORRED;
?STICKLINE(W2>0 AND HS,C,L,0.0,0),COLORRED;
?STICKLINE(W2<=0 AND HS,OPEN,CLOSE,2,1),COLORRED;
?STICKLINE(W2<=0 AND HS,O,L,0.0,0),COLORRED;
?STICKLINE(W2<=0 AND HS,C,H,0.0,0),COLORRED;
?STICKLINE(W2>0 AND LS,OPEN,CLOSE,2,0),COLORGREEN;
?STICKLINE(W2>0 AND LS,OPEN,H,0.0,0),COLORGREEN;
?STICKLINE(W2>0 AND LS,C,L,0.0,0),COLORGREEN;
?STICKLINE(W2<=0 AND LS,OPEN,CLOSE,2,1),COLORGREEN;
?STICKLINE(W2<=0 AND LS,C,H,0.0,0),COLORGREEN;
?STICKLINE(W2<=0 AND LS,O,L,0.0,0),COLORGREEN;
?DRAWTEXT(HS=1 AND REF(LS,1),LOW*0.997,'多'),COLORYELLOW;
?DRAWTEXT(LS=1 AND REF(HS,1),H*1.003,'空'),COLORYELLOW;
?YZX:=IF(HS,REF(LLV(LOW,7),1),REF(HHV(HIGH,7),1));
多方莊線:IF(HS,YZX,DRAWNULL),LINETHICK1,COLORRED;
空方莊線:IF(LS,YZX,DRAWNULL),LINETHICK1,COLORGREEN;
?DRAWNUMBER(ISLASTBAR ,YZX,YZX,2),COLORYELLOW; 您好，直接可以使用，無需修改。 來源 程序化久久網