咨詢內容：

幫我改到現貨板上

AADATE:=DATE<331231;
/*DRAWGBK(C>0, RGB(0,10,10),RGB(88,0,0),0,?',0);
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORRED;
*/
XH25:=REFX1(MA(H,25),25/2);
XHH25:=REFX1(XH25,25/2);
XL25:=REFX1(MA(L,25),25/2);
XLL25:=REFX1(XL25,25/2);
//ZK1:=(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),DOT,COLORBLUE;
ZK1:(XHH25-XLL25)*1+XHH25,DOT,COLORBLUE;
//ZD1:=XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,LINETHICK2,COLORRED;
ZD1:XLL25-(XHH25-XLL25)*1,LINETHICK2,COLORRED;
ZD2:=EMA(ZD1,25),LINETHICK2;
鴻鳴上軌:IF(AADATE,ZK1,NULL),DOT,COLORYELLOW;
鴻鳴中軌:IF(AADATE,ZD1,NULL),LINETHICK2,COLORRED;
鴻鳴下軌:IF(AADATE,EMA(ZD1,25),NULL),LINETHICK2,COLORCYAN;
//DRAWBAND(ZD1,RGB(55,0,0),ZD2,RGB(0,91,0));
FILLRGN(ZD1>ZD2,ZD1,ZD2,RGB(55,0,0));
FILLRGN(ZD1<ZD2,ZD1,ZD2,RGB(0,91,0));
DRAWKLINE1(H,O,L,C);
STICKLINE(IF(AADATE,ZD1>LOW AND ZD1<HIGH,NULL),ZD1,MIN(MIN(OPEN,CLOSE),ZD1),2,0),COLORYELLOW;
STICKLINE(IF(AADATE,ZD1>MIN(C,O) AND ZD1<MAX(C,O),NULL),ZD1,MIN(OPEN,CLOSE),2,0),COLORYELLOW;
STICKLINE(IF(AADATE,ZD1>HIGH,NULL),OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE(IF(AADATE,ZD1>HIGH,NULL),HIGH,LOW,0,0),COLORYELLOW;
A1:=(VOL/C)/2,NODRAW;

?

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

博易技術人員： AADATE:=DATE<331231;
XH25:=REFX(MA(H,25),25/2);
XHH25:=REFX(XH25,25/2);
XL25:=REFX(MA(L,25),25/2);
XLL25:=REFX(XL25,25/2);
ZK1:(XHH25-XLL25)*1+XHH25,POINTDOT,COLORBLUE;
ZD1:XLL25-(XHH25-XLL25)*1,LINETHICK2,COLORRED;
ZD2:=EMA(ZD1,25),LINETHICK2;
鴻鳴上軌:IF(AADATE,ZK1,DRAWNULL),POINTDOT,COLORYELLOW;
鴻鳴中軌:IF(AADATE,ZD1,DRAWNULL),LINETHICK2,COLORRED;
鴻鳴下軌:IF(AADATE,EMA(ZD1,25),DRAWNULL),LINETHICK2,COLORCYAN;
FILLRGN(ZD1>ZD2,ZD1,ZD2),COLOR000037;
FILLRGN(ZD1<ZD2,ZD1,ZD2),COLOR005B00;
DRAWKLINE(H,O,L,C);
STICKLINE(IF(AADATE,ZD1>LOW AND ZD1<HIGH,DRAWNULL),ZD1,MIN(MIN(OPEN,CLOSE),ZD1),2,0),COLORYELLOW;
STICKLINE(IF(AADATE,ZD1>MIN(C,O) AND ZD1<MAX(C,O),DRAWNULL),ZD1,MIN(OPEN,CLOSE),2,0),COLORYELLOW;
STICKLINE(IF(AADATE,ZD1>HIGH,DRAWNULL),OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE(IF(AADATE,ZD1>HIGH,DRAWNULL),HIGH,LOW,0,0),COLORYELLOW;
A1:=(VOL/C)/2,NODRAW;
?
博易云可以使用，老版本目前不支持服務，您可以試一下這個公式。如果不能使用，可以咨詢給您軟件的公司升級到新版本 來源 程序化久久網