老師您好,謝謝您,請(qǐng)您幫我改一下指標(biāo),謝謝 [博易POBO]
咨詢內(nèi)容:
LONG:=26;
M:=9;
CAPITAL:=GETPRICE1('流通股本');
CURRBARSCOUNT:=DATACOUNT-BARPOS+1; ?
DIF:=EMA(CLOSE,SHORT) - EMA(CLOSE,LONG);
DEA:=EMA(DIF,M);
MACD:=2*(DIF-DEA);
KK:=IF(DIF>DEA,5,-5);
JCSC:=(M-1)/(M+1)*DEA/(1-2/(M+1));
{計(jì)算出金叉死叉時(shí)的DIFF值}
DD:=(MACD/2+(DEA*(M-1)/(M+1)))/(1-2/(M+1));
{計(jì)算出明日MACD=MACD時(shí)的DIFF值}
DIF拐頭價(jià):(DIF*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1))),COLORGREEN,LINETHICK1,POINTDOT;
金死叉價(jià):(JCSC*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1))),NODRAW;
柱變向價(jià):=(DD*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1))),COLORYELLOW,POINTDOT;
黃銖消失見(jiàn)頂:=IF(柱變向價(jià)>=DIF拐頭價(jià),柱變向價(jià),NULL),COLORYELLOW,CIRCLEDOT,LINETHICK1;
拐頭價(jià):IF(DIF拐頭價(jià)<柱變向價(jià),DIF拐頭價(jià),NULL), COLORRED,LINETHICK4;
DRAWNUMBER1(DIF<DEA,DIF拐頭價(jià),BARSLAST(CROSS(DEA,DIF))+1,0),COLORCYAN,NODRAW;
DRAWNUMBER1(DIF>DEA,DIF拐頭價(jià),BARSLAST(CROSS(DIF,DEA))+1,0),COLORWHITE,NODRAW;
ZJ:拐頭價(jià),COLOR0000FF;
HY:=金死叉價(jià),COLORFF00FF;
IF(ZJ > REF(ZJ,1),ZJ,NULL),COLORRED,LINETHICK2;
IF(ZJ < REF(ZJ,1),ZJ,NULL),COLORGREEN,LINETHICK2;
IF(HY > REF(HY,1),HY,NULL),COLORMAGENTA,LINETHICK2,NODRAW;
IF(HY < REF(HY,1),HY,NULL),COLORBLUE,LINETHICK2,NODRAW;
STICKLINE(C>ZJ AND C>O,H,C,0,0 ),COLORRED;
STICKLINE(C>ZJ AND C>O,L,O,0,0 ),COLORRED;
STICKLINE(C>ZJ AND C>O,O,C,2.8,1),COLORRED;
STICKLINE(C>ZJ AND C<=O,H,L,0,0 ),COLORRED;
STICKLINE(C>ZJ AND C<=O,O,C,2.8,0),COLORRED;
STICKLINE(CLOSE = ZJ,H,L,3,0),COLORWHITE;
STICKLINE(CLOSE < ZJ,H,L,0,0),COLORYELLOW;
STICKLINE(CLOSE < ZJ,O,C,2.5,0),COLORYELLOW;
STICKLINE(C<HY AND C>O,H,C,0,0),COLORCYAN;
STICKLINE(C<HY AND C>O,O,L,0,0),COLORCYAN;
STICKLINE(C<HY AND C>O,O,C,2.8,1),COLORCYAN;
STICKLINE(C<HY AND C<=O,H,L,0,0),COLORCYAN;
STICKLINE(C<HY AND C<=O,O,C,2.8,0),COLORCYAN;
HD0:=CROSS(DIF,DEA);
金收:REF(L,BARSLAST(HD0)),COLORYELLOW,DOT;
DRAWNUMBER1(ISLASTBAR,金收,金收,0),COLORCYAN;
LD0:=CROSS(DEA,DIF);
死收:REF(H,BARSLAST(LD0)),COLOR00FF00,DOT;
{分時(shí)中的收盤標(biāo)記}
IF(HOUR=15,H*1.008,NULL),POINTDOT,COLORFFFAAA,LINETHICK7;
IF(HOUR=15,H*1.008,NULL),POINTDOT,COLOR000FFF,LINETHICK5;
HSL:=V/CAPITAL*100;
DRAWNUMBER1(CURRBARSCOUNT=1 AND HSL,C,HSL,0),COLOR00FFFF;
AMOUNT:=AVPRICE*V;
分時(shí)均價(jià):AMOUNT/VOL/100,COLORWHITE,NODRAW;
?
LONG:=26;
M:=9;
CURRBARSCOUNT:=DATACOUNT-BARPOS+1; ?
DIF:=EMA(CLOSE,SHORT) - EMA(CLOSE,LONG);
DEA:=EMA(DIF,M);
MACD:=2*(DIF-DEA);
KK:=IF(DIF>DEA,5,-5);
JCSC:=(M-1)/(M+1)*DEA/(1-2/(M+1));
{計(jì)算出金叉死叉時(shí)的DIFF值}
DD:=(MACD/2+(DEA*(M-1)/(M+1)))/(1-2/(M+1));
{計(jì)算出明日MACD=MACD時(shí)的DIFF值}
DIF拐頭價(jià):(DIF*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1))),COLORGREEN,LINETHICK1,POINTDOT;
金死叉價(jià):(JCSC*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1))),NODRAW;
柱變向價(jià):=(DD*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1))),COLORYELLOW,POINTDOT;
黃銖消失見(jiàn)頂:=IF(柱變向價(jià)>=DIF拐頭價(jià),柱變向價(jià),DRAWNULL),COLORYELLOW,CIRCLEDOT,LINETHICK1;
拐頭價(jià):IF(DIF拐頭價(jià)<柱變向價(jià),DIF拐頭價(jià),DRAWNULL), COLORRED,LINETHICK4;
DRAWNUMBER(DIF<DEA,DIF拐頭價(jià),BARSLAST(CROSS(DEA,DIF))+1,0),COLORCYAN,NODRAW;
DRAWNUMBER(DIF>DEA,DIF拐頭價(jià),BARSLAST(CROSS(DIF,DEA))+1,0),COLORWHITE,NODRAW;
ZJ:拐頭價(jià),COLOR0000FF;
HY:=金死叉價(jià),COLORFF00FF;
IF(ZJ > REF(ZJ,1),ZJ,DRAWNULL),COLORRED,LINETHICK2;
IF(ZJ < REF(ZJ,1),ZJ,DRAWNULL),COLORGREEN,LINETHICK2;
IF(HY > REF(HY,1),HY,DRAWNULL),COLORMAGENTA,LINETHICK2,NODRAW;
IF(HY < REF(HY,1),HY,DRAWNULL),COLORBLUE,LINETHICK2,NODRAW;
STICKLINE(C>ZJ AND C>O,H,C,0,0 ),COLORRED;
STICKLINE(C>ZJ AND C>O,L,O,0,0 ),COLORRED;
STICKLINE(C>ZJ AND C>O,O,C,2.8,1),COLORRED;
STICKLINE(C>ZJ AND C<=O,H,L,0,0 ),COLORRED;
STICKLINE(C>ZJ AND C<=O,O,C,2.8,0),COLORRED;
STICKLINE(CLOSE = ZJ,H,L,3,0),COLORWHITE;
STICKLINE(CLOSE < ZJ,H,L,0,0),COLORYELLOW;
STICKLINE(CLOSE < ZJ,O,C,2.5,0),COLORYELLOW;
STICKLINE(C<HY AND C>O,H,C,0,0),COLORCYAN;
STICKLINE(C<HY AND C>O,O,L,0,0),COLORCYAN;
STICKLINE(C<HY AND C>O,O,C,2.8,1),COLORCYAN;
STICKLINE(C<HY AND C<=O,H,L,0,0),COLORCYAN;
STICKLINE(C<HY AND C<=O,O,C,2.8,0),COLORCYAN;
HD0:=CROSS(DIF,DEA);
金收:REF(L,BARSLAST(HD0)),COLORYELLOW,POINTDOT;
DRAWNUMBER(ISLASTBAR,金收,金收,0),COLORCYAN;
LD0:=CROSS(DEA,DIF);
死收:REF(H,BARSLAST(LD0)),COLOR00FF00,POINTDOT;
{分時(shí)中的收盤標(biāo)記}
IF(HOUR=15,H*1.008,DRAWNULL),POINTDOT,COLORFFFAAA,LINETHICK7;
IF(HOUR=15,H*1.008,DRAWNULL),POINTDOT,COLOR000FFF,LINETHICK5;
HSL:=V/CAPITAL*100;
DRAWNUMBER(CURRBARSCOUNT=1 AND HSL,C,HSL,0),COLOR00FFFF;
分時(shí)均價(jià):AMOUNT/VOL/100,COLORWHITE,NODRAW; 謝謝老師;感謝 來(lái)源 程序化久久網(wǎng)
老師您好,謝謝您,請(qǐng)您幫我改一下指標(biāo),謝謝
SHORT:=12;LONG:=26;
M:=9;
CAPITAL:=GETPRICE1('流通股本');
CURRBARSCOUNT:=DATACOUNT-BARPOS+1; ?
DIF:=EMA(CLOSE,SHORT) - EMA(CLOSE,LONG);
DEA:=EMA(DIF,M);
MACD:=2*(DIF-DEA);
KK:=IF(DIF>DEA,5,-5);
JCSC:=(M-1)/(M+1)*DEA/(1-2/(M+1));
{計(jì)算出金叉死叉時(shí)的DIFF值}
DD:=(MACD/2+(DEA*(M-1)/(M+1)))/(1-2/(M+1));
{計(jì)算出明日MACD=MACD時(shí)的DIFF值}
DIF拐頭價(jià):(DIF*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1))),COLORGREEN,LINETHICK1,POINTDOT;
金死叉價(jià):(JCSC*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1))),NODRAW;
柱變向價(jià):=(DD*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1))),COLORYELLOW,POINTDOT;
黃銖消失見(jiàn)頂:=IF(柱變向價(jià)>=DIF拐頭價(jià),柱變向價(jià),NULL),COLORYELLOW,CIRCLEDOT,LINETHICK1;
拐頭價(jià):IF(DIF拐頭價(jià)<柱變向價(jià),DIF拐頭價(jià),NULL), COLORRED,LINETHICK4;
DRAWNUMBER1(DIF<DEA,DIF拐頭價(jià),BARSLAST(CROSS(DEA,DIF))+1,0),COLORCYAN,NODRAW;
DRAWNUMBER1(DIF>DEA,DIF拐頭價(jià),BARSLAST(CROSS(DIF,DEA))+1,0),COLORWHITE,NODRAW;
ZJ:拐頭價(jià),COLOR0000FF;
HY:=金死叉價(jià),COLORFF00FF;
IF(ZJ > REF(ZJ,1),ZJ,NULL),COLORRED,LINETHICK2;
IF(ZJ < REF(ZJ,1),ZJ,NULL),COLORGREEN,LINETHICK2;
IF(HY > REF(HY,1),HY,NULL),COLORMAGENTA,LINETHICK2,NODRAW;
IF(HY < REF(HY,1),HY,NULL),COLORBLUE,LINETHICK2,NODRAW;
STICKLINE(C>ZJ AND C>O,H,C,0,0 ),COLORRED;
STICKLINE(C>ZJ AND C>O,L,O,0,0 ),COLORRED;
STICKLINE(C>ZJ AND C>O,O,C,2.8,1),COLORRED;
STICKLINE(C>ZJ AND C<=O,H,L,0,0 ),COLORRED;
STICKLINE(C>ZJ AND C<=O,O,C,2.8,0),COLORRED;
STICKLINE(CLOSE = ZJ,H,L,3,0),COLORWHITE;
STICKLINE(CLOSE < ZJ,H,L,0,0),COLORYELLOW;
STICKLINE(CLOSE < ZJ,O,C,2.5,0),COLORYELLOW;
STICKLINE(C<HY AND C>O,H,C,0,0),COLORCYAN;
STICKLINE(C<HY AND C>O,O,L,0,0),COLORCYAN;
STICKLINE(C<HY AND C>O,O,C,2.8,1),COLORCYAN;
STICKLINE(C<HY AND C<=O,H,L,0,0),COLORCYAN;
STICKLINE(C<HY AND C<=O,O,C,2.8,0),COLORCYAN;
HD0:=CROSS(DIF,DEA);
金收:REF(L,BARSLAST(HD0)),COLORYELLOW,DOT;
DRAWNUMBER1(ISLASTBAR,金收,金收,0),COLORCYAN;
LD0:=CROSS(DEA,DIF);
死收:REF(H,BARSLAST(LD0)),COLOR00FF00,DOT;
{分時(shí)中的收盤標(biāo)記}
IF(HOUR=15,H*1.008,NULL),POINTDOT,COLORFFFAAA,LINETHICK7;
IF(HOUR=15,H*1.008,NULL),POINTDOT,COLOR000FFF,LINETHICK5;
HSL:=V/CAPITAL*100;
DRAWNUMBER1(CURRBARSCOUNT=1 AND HSL,C,HSL,0),COLOR00FFFF;
AMOUNT:=AVPRICE*V;
分時(shí)均價(jià):AMOUNT/VOL/100,COLORWHITE,NODRAW;
?
?
?來(lái)源:程序化99網(wǎng)( www.weiqiv.net.cn )
博易技術(shù)人員: SHORT:=12;LONG:=26;
M:=9;
CURRBARSCOUNT:=DATACOUNT-BARPOS+1; ?
DIF:=EMA(CLOSE,SHORT) - EMA(CLOSE,LONG);
DEA:=EMA(DIF,M);
MACD:=2*(DIF-DEA);
KK:=IF(DIF>DEA,5,-5);
JCSC:=(M-1)/(M+1)*DEA/(1-2/(M+1));
{計(jì)算出金叉死叉時(shí)的DIFF值}
DD:=(MACD/2+(DEA*(M-1)/(M+1)))/(1-2/(M+1));
{計(jì)算出明日MACD=MACD時(shí)的DIFF值}
DIF拐頭價(jià):(DIF*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1))),COLORGREEN,LINETHICK1,POINTDOT;
金死叉價(jià):(JCSC*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1))),NODRAW;
柱變向價(jià):=(DD*(SHORT+1)*(LONG+1)-(LONG+1)*(SHORT-1)*EMA(C,SHORT)+(SHORT+1)*(LONG-1)*EMA(C,LONG))/(2*((LONG+1)-(SHORT+1))),COLORYELLOW,POINTDOT;
黃銖消失見(jiàn)頂:=IF(柱變向價(jià)>=DIF拐頭價(jià),柱變向價(jià),DRAWNULL),COLORYELLOW,CIRCLEDOT,LINETHICK1;
拐頭價(jià):IF(DIF拐頭價(jià)<柱變向價(jià),DIF拐頭價(jià),DRAWNULL), COLORRED,LINETHICK4;
DRAWNUMBER(DIF<DEA,DIF拐頭價(jià),BARSLAST(CROSS(DEA,DIF))+1,0),COLORCYAN,NODRAW;
DRAWNUMBER(DIF>DEA,DIF拐頭價(jià),BARSLAST(CROSS(DIF,DEA))+1,0),COLORWHITE,NODRAW;
ZJ:拐頭價(jià),COLOR0000FF;
HY:=金死叉價(jià),COLORFF00FF;
IF(ZJ > REF(ZJ,1),ZJ,DRAWNULL),COLORRED,LINETHICK2;
IF(ZJ < REF(ZJ,1),ZJ,DRAWNULL),COLORGREEN,LINETHICK2;
IF(HY > REF(HY,1),HY,DRAWNULL),COLORMAGENTA,LINETHICK2,NODRAW;
IF(HY < REF(HY,1),HY,DRAWNULL),COLORBLUE,LINETHICK2,NODRAW;
STICKLINE(C>ZJ AND C>O,H,C,0,0 ),COLORRED;
STICKLINE(C>ZJ AND C>O,L,O,0,0 ),COLORRED;
STICKLINE(C>ZJ AND C>O,O,C,2.8,1),COLORRED;
STICKLINE(C>ZJ AND C<=O,H,L,0,0 ),COLORRED;
STICKLINE(C>ZJ AND C<=O,O,C,2.8,0),COLORRED;
STICKLINE(CLOSE = ZJ,H,L,3,0),COLORWHITE;
STICKLINE(CLOSE < ZJ,H,L,0,0),COLORYELLOW;
STICKLINE(CLOSE < ZJ,O,C,2.5,0),COLORYELLOW;
STICKLINE(C<HY AND C>O,H,C,0,0),COLORCYAN;
STICKLINE(C<HY AND C>O,O,L,0,0),COLORCYAN;
STICKLINE(C<HY AND C>O,O,C,2.8,1),COLORCYAN;
STICKLINE(C<HY AND C<=O,H,L,0,0),COLORCYAN;
STICKLINE(C<HY AND C<=O,O,C,2.8,0),COLORCYAN;
HD0:=CROSS(DIF,DEA);
金收:REF(L,BARSLAST(HD0)),COLORYELLOW,POINTDOT;
DRAWNUMBER(ISLASTBAR,金收,金收,0),COLORCYAN;
LD0:=CROSS(DEA,DIF);
死收:REF(H,BARSLAST(LD0)),COLOR00FF00,POINTDOT;
{分時(shí)中的收盤標(biāo)記}
IF(HOUR=15,H*1.008,DRAWNULL),POINTDOT,COLORFFFAAA,LINETHICK7;
IF(HOUR=15,H*1.008,DRAWNULL),POINTDOT,COLOR000FFF,LINETHICK5;
HSL:=V/CAPITAL*100;
DRAWNUMBER(CURRBARSCOUNT=1 AND HSL,C,HSL,0),COLOR00FFFF;
分時(shí)均價(jià):AMOUNT/VOL/100,COLORWHITE,NODRAW; 謝謝老師;感謝 來(lái)源 程序化久久網(wǎng)
有思路,想編寫各種指標(biāo)公式,程序化交易模型,選股公式,預(yù)警公式的朋友
可聯(lián)系技術(shù)人員 QQ: 262069696 或微信:cxhjy888 進(jìn)行 有償收費(fèi) 編寫!(注:由于人數(shù)限制,QQ或微信請(qǐng)選擇方便的一個(gè)聯(lián)系我們就行,謝謝您!)
相關(guān)文章
-
沒(méi)有相關(guān)內(nèi)容