幫我改到現(xiàn)貨版上 [博易POBO]
咨詢內(nèi)容:
DRAWGBK(C>0, RGB(0,10,10),RGB(88,0,0),0,'0',0);
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORRED;
ZK1:=(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),DOTLINE,COLORBLUE;
ZD1:=XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,LINETHICK2,COLORRED;
ZD2:=EMA(ZD1,25),LINETHICK2;
鴻鳴上軌:IF(AADATE,(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),DRAWNULL),DOTLINE,COLORYELLOW;
鴻鳴中軌:IF(AADATE,XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,DRAWNULL),LINETHICK2,COLORRED;
鴻鳴下軌:IF(AADATE,EMA(ZD1,25),DRAWNULL),LINETHICK2,COLORCYAN;
DRAWBAND(ZD1,RGB(55,0,0),ZD2,RGB(0,91,0));
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:=(DVOL/C)/2,NODRAW;
ZK1:=(EMA(EMA(H,25),25)-EMA(EMA(L,25),25))*1+EMA(EMA(H,25),25),COLORBLUE;
ZD1:=EMA(EMA(L,25),25)-(EMA(EMA(H,25),25)-EMA(EMA(L,25),25))*1,LINETHICK2,COLORRED;
ZD2:=EMA(ZD1,25),LINETHICK2;
鴻鳴上軌:IF(AADATE,(EMA(EMA(H,25),25)-EMA(EMA(L,25),25))*1+EMA(EMA(H,25),25),DRAWNULL),COLORYELLOW;
鴻鳴中軌:IF(AADATE,EMA(EMA(L,25),25)-(EMA(EMA(H,25),25)-EMA(EMA(L,25),25))*1,DRAWNULL),LINETHICK2,COLORRED;
鴻鳴下軌:IF(AADATE,EMA(ZD1,25),DRAWNULL),LINETHICK2,COLORCYAN;
FILLRGN2(ZD1,ZD2,ZD1>ZD2,COLOR000037,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; 現(xiàn)貨版不能用,5.4上能用再說(shuō)和原版差異很大 來(lái)源 程序化久久網(wǎng)
幫我改到現(xiàn)貨版上
AADATE:=DATE<1991230;DRAWGBK(C>0, RGB(0,10,10),RGB(88,0,0),0,'0',0);
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORRED;
ZK1:=(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),DOTLINE,COLORBLUE;
ZD1:=XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,LINETHICK2,COLORRED;
ZD2:=EMA(ZD1,25),LINETHICK2;
鴻鳴上軌:IF(AADATE,(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),DRAWNULL),DOTLINE,COLORYELLOW;
鴻鳴中軌:IF(AADATE,XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,DRAWNULL),LINETHICK2,COLORRED;
鴻鳴下軌:IF(AADATE,EMA(ZD1,25),DRAWNULL),LINETHICK2,COLORCYAN;
DRAWBAND(ZD1,RGB(55,0,0),ZD2,RGB(0,91,0));
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:=(DVOL/C)/2,NODRAW;
?
?來(lái)源:程序化99網(wǎng)( www.kzuj.com.cn )
博易技術(shù)人員: AADATE:=DATE<1991230;ZK1:=(EMA(EMA(H,25),25)-EMA(EMA(L,25),25))*1+EMA(EMA(H,25),25),COLORBLUE;
ZD1:=EMA(EMA(L,25),25)-(EMA(EMA(H,25),25)-EMA(EMA(L,25),25))*1,LINETHICK2,COLORRED;
ZD2:=EMA(ZD1,25),LINETHICK2;
鴻鳴上軌:IF(AADATE,(EMA(EMA(H,25),25)-EMA(EMA(L,25),25))*1+EMA(EMA(H,25),25),DRAWNULL),COLORYELLOW;
鴻鳴中軌:IF(AADATE,EMA(EMA(L,25),25)-(EMA(EMA(H,25),25)-EMA(EMA(L,25),25))*1,DRAWNULL),LINETHICK2,COLORRED;
鴻鳴下軌:IF(AADATE,EMA(ZD1,25),DRAWNULL),LINETHICK2,COLORCYAN;
FILLRGN2(ZD1,ZD2,ZD1>ZD2,COLOR000037,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; 現(xiàn)貨版不能用,5.4上能用再說(shuō)和原版差異很大 來(lái)源 程序化久久網(wǎng)
有思路,想編寫(xiě)各種指標(biāo)公式,交易模型,選股公式,還原公式的朋友
可聯(lián)系技術(shù)人員 QQ: 262069696 或微信號(hào):cxh99cxh99 進(jìn)行 有償收費(fèi) 編寫(xiě)!
(怎么收費(fèi),代編流程等詳情請(qǐng)點(diǎn)擊閱讀!)
(注:由于人數(shù)限制,QQ或微信請(qǐng)選擇方便的一個(gè)聯(lián)系我們就行,加好友時(shí)請(qǐng)簡(jiǎn)單備注下您的需求,否則無(wú)法通過(guò)。謝謝您!)
相關(guān)文章
-
沒(méi)有相關(guān)內(nèi)容