[求助]修改指標(biāo)成文華財(cái)經(jīng) [文華財(cái)經(jīng)]
-
咨詢內(nèi)容：
?老師，發(fā)現(xiàn)帝納波利點(diǎn)位交易法的一個(gè)指標(biāo)公式（博弈版），請(qǐng)轉(zhuǎn)成文華財(cái)經(jīng)的；如下源碼
DDD:DATE,LINETHICK0,COLORWHITE;
A1:=IF(D=1, REF(H,BARSLAST(DATE=A_TIME)), IF(D=2, REF(L,BARSLAST(DATE=ATIME)), 0));
B1:=IF(D=1, REF(L,BARSLAST(DATE=B_TIME)), IF(D=2, REF(H,BARSLAST(DATE=BTIME)), 0));
C1:=IF(D=1, REF(H,BARSLAST(DATE=C_TIME)), IF(D=2, REF(L,BARSLAST(DATE=CTIME)), 0));
入場(chǎng)點(diǎn)1:=0.618*(A1-B1)+B1,COLORRED;
入場(chǎng)點(diǎn)2:=0.5*(A1-B1)+B1,COLORRED;
入場(chǎng)點(diǎn)3:=0.382*(A1-B1)+B1,COLORRED;
OP:B1-A1+C1,COLORYELLOW,LINETHICK0;
COP:0.618*(B1-A1)+C1,COLORYELLOW,LINETHICK0;
XOP:1.618*(B1-A1)+C1,COLORYELLOW,LINETHICK0;
PARTLINE(DD=10 AND DATE>= B_TIME AND D=1, 入場(chǎng)點(diǎn)1), COLORRED;
PARTLINE(DD=10 AND DATE>= B_TIME AND D=1, 入場(chǎng)點(diǎn)2), COLORRED;
PARTLINE(DD=10 AND DATE>= B_TIME AND D=1, 入場(chǎng)點(diǎn)3), COLORRED;
PARTLINE(DD=10 AND DATE>= BTIME AND D=2, 入場(chǎng)點(diǎn)1), COLORRED;
PARTLINE(DD=10 AND DATE>= BTIME AND D=2, 入場(chǎng)點(diǎn)2), COLORRED;
PARTLINE(DD=10 AND DATE>= BTIME AND D=2, 入場(chǎng)點(diǎn)3), COLORRED;
DRAWNUMBER(FILTER(DD=10 AND DATE>= B_TIME AND D=1,300),入場(chǎng)點(diǎn)1,0.618,3),ALIGN2;
DRAWNUMBER(FILTER(DD=10 AND DATE>= B_TIME AND D=1,300),入場(chǎng)點(diǎn)2,0.5,1),ALIGN2;
DRAWNUMBER(FILTER(DD=10 AND DATE>= B_TIME AND D=1,300),入場(chǎng)點(diǎn)3,0.382,3),ALIGN2;
DRAWNUMBER(FILTER(DD=10 AND DATE>= BTIME AND D=2,300),入場(chǎng)點(diǎn)1,0.618,3),ALIGN2;
DRAWNUMBER(FILTER(DD=10 AND DATE>= BTIME AND D=2,300),入場(chǎng)點(diǎn)2,0.5,1),ALIGN2;
DRAWNUMBER(FILTER(DD=10 AND DATE>= BTIME AND D=2,300),入場(chǎng)點(diǎn)3,0.382,3),ALIGN2;
PARTLINE(DD=10 AND DATE>= C_TIME AND D=1, OP), COLORYELLOW;
PARTLINE(DD=10 AND DATE>= C_TIME AND D=1, COP), COLORYELLOW;
PARTLINE(DD=10 AND DATE>= C_TIME AND D=1, XOP), COLORYELLOW;
PARTLINE(DD=10 AND DATE>= CTIME AND D=2, OP), COLORYELLOW;
PARTLINE(DD=10 AND DATE>= CTIME AND D=2, COP), COLORYELLOW;
PARTLINE(DD=10 AND DATE>= CTIME AND D=2, XOP), COLORYELLOW;
{PARTLINE(DD=10 AND DATE>= ATIME AND D=2, A1), COLORWHITE;
PARTLINE(DD=10 AND DATE>= A_TIME AND D=1, A1), COLORWHITE;
}
DRAWTEXT(FILTER(DD=10 AND DATE>= C_TIME AND D=1,300),OP,'OP'),ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= C_TIME AND D=1,300),COP,'COP'),ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= C_TIME AND D=1,300),XOP,'XOP'),ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= CTIME AND D=2,300),OP,'OP'),ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= CTIME AND D=2,300),COP,'COP'),ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= CTIME AND D=2,300),XOP,'XOP'),ALIGN2;
STICKLINE(FILTER(DD=10 AND DATE>= C_TIME AND D=1,300),L,XOP,0.01,0),COLORGREEN;
STICKLINE(FILTER(DD=10 AND DATE>= CTIME AND D=2,300),L,XOP,0.01,0),COLORGREEN;
DRAWTEXT(FILTER(DD=10 AND DATE>= A_TIME AND D=1,300),A1,'A'),ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= B_TIME AND D=1,300),B1,'B'),ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= C_TIME AND D=1,300),C1,'C'),ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= ATIME AND D=2,300),A1,'A'),ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= BTIME AND D=2,300),B1,'B'),ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= CTIME AND D=2,300),C1,'C'),ALIGN2;
POLYLINE((DATE=A_TIME OR DATE=B_TIME) AND D=1,IF(DATE=A_TIME, H, L)),COLORGREEN;
POLYLINE((DATE=B_TIME OR DATE=C_TIME) AND D=1,IF(DATE=B_TIME, L, H)),COLORGREEN;
POLYLINE((DATE=ATIME OR DATE=BTIME) AND D=2,IF(DATE=ATIME, L, H)),COLORGREEN;
POLYLINE((DATE=BTIME OR DATE=CTIME) AND D=2,IF(DATE=BTIME, H, L)),COLORGREEN; ??
?來源:程序化99
-
文華技術(shù)人員：
前8行是參數(shù)，需要您對(duì)照其他軟件源碼進(jìn)行修改：
?
D:=1;
DD:=10;
ATIME:=180211;
BTIME:=180212;
CTIME:=180213;
AATIME:=180211;
BBTIME:=180212;
CCTIME:=180213;
DDD:=DATE,NODRAW,COLORWHITE;
A1:=IF(D=1, REF(H,BARSLAST(DATE=ATIME)), IF(D=2, REF(L,BARSLAST(DATE=ATIME)), 0));
B1:=IF(D=1, REF(L,BARSLAST(DATE=BTIME)), IF(D=2, REF(H,BARSLAST(DATE=BTIME)), 0));
C1:=IF(D=1, REF(H,BARSLAST(DATE=CTIME)), IF(D=2, REF(L,BARSLAST(DATE=CTIME)), 0));
入場(chǎng)點(diǎn)1:=0.618*(A1-B1)+B1,COLORRED;
入場(chǎng)點(diǎn)2:=0.5*(A1-B1)+B1,COLORRED;
入場(chǎng)點(diǎn)3:=0.382*(A1-B1)+B1,COLORRED;
OP:B1-A1+C1,COLORYELLOW,NODRAW;
COP:0.618*(B1-A1)+C1,COLORYELLOW,NODRAW;
XOP:1.618*(B1-A1)+C1,COLORYELLOW,NODRAW;
PARTLINE1(DD=10 AND DATE>= BTIME AND D=1, 入場(chǎng)點(diǎn)1), COLORRED;
PARTLINE1(DD=10 AND DATE>= BTIME AND D=1, 入場(chǎng)點(diǎn)2), COLORRED;
PARTLINE1(DD=10 AND DATE>= BTIME AND D=1, 入場(chǎng)點(diǎn)3), COLORRED;
PARTLINE1(DD=10 AND DATE>= BBTIME AND D=2, 入場(chǎng)點(diǎn)1), COLORRED;
PARTLINE1(DD=10 AND DATE>= BBTIME AND D=2, 入場(chǎng)點(diǎn)2), COLORRED;
PARTLINE1(DD=10 AND DATE>= BBTIME AND D=2, 入場(chǎng)點(diǎn)3), COLORRED;
DRAWNUMBER1(FILTER(DD=10 AND DATE>= BTIME AND D=1,300),入場(chǎng)點(diǎn)1,0.618,3),ALIGN2;
DRAWNUMBER1(FILTER(DD=10 AND DATE>= BTIME AND D=1,300),入場(chǎng)點(diǎn)2,0.5,1),ALIGN2;
DRAWNUMBER1(FILTER(DD=10 AND DATE>= BTIME AND D=1,300),入場(chǎng)點(diǎn)3,0.382,3),ALIGN2;
DRAWNUMBER1(FILTER(DD=10 AND DATE>= BBTIME AND D=2,300),入場(chǎng)點(diǎn)1,0.618,3),ALIGN2;
DRAWNUMBER1(FILTER(DD=10 AND DATE>= BBTIME AND D=2,300),入場(chǎng)點(diǎn)2,0.5,1),ALIGN2;
DRAWNUMBER1(FILTER(DD=10 AND DATE>= BBTIME AND D=2,300),入場(chǎng)點(diǎn)3,0.382,3),ALIGN2;
PARTLINE1(DD=10 AND DATE>= CTIME AND D=1, OP), COLORYELLOW;
PARTLINE1(DD=10 AND DATE>= CTIME AND D=1, COP), COLORYELLOW;
PARTLINE1(DD=10 AND DATE>= CTIME AND D=1, XOP), COLORYELLOW;
PARTLINE1(DD=10 AND DATE>= CCTIME AND D=2, OP), COLORYELLOW;
PARTLINE1(DD=10 AND DATE>= CCTIME AND D=2, COP), COLORYELLOW;
PARTLINE1(DD=10 AND DATE>= CCTIME AND D=2, XOP), COLORYELLOW;
DRAWTEXT(FILTER(DD=10 AND DATE>= CTIME AND D=1,300),OP,'P',ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= CTIME AND D=1,300),COP,'OP',ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= CTIME AND D=1,300),XOP,'OP',ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= CCTIME AND D=2,300),OP,'P',ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= CCTIME AND D=2,300),COP,'OP',ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= CCTIME AND D=2,300),XOP,'OP',ALIGN2;
STICKLINE(FILTER(DD=10 AND DATE>= CTIME AND D=1,300),L,XOP,0.01,0),COLORGREEN;
STICKLINE(FILTER(DD=10 AND DATE>= CCTIME AND D=2,300),L,XOP,0.01,0),COLORGREEN;
DRAWTEXT(FILTER(DD=10 AND DATE>= ATIME AND D=1,300),A1,'',ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= BTIME AND D=1,300),B1,'',ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= CTIME AND D=1,300),C1,'',ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= AATIME AND D=2,300),A1,'',ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= BBTIME AND D=2,300),B1,'',ALIGN2;
DRAWTEXT(FILTER(DD=10 AND DATE>= CCTIME AND D=2,300),C1,'',ALIGN2;
POLYLINE1((DATE=ATIME OR DATE=BTIME) AND D=1,IF(DATE=ATIME, H, L)),COLORGREEN;
POLYLINE1((DATE=BTIME OR DATE=CTIME) AND D=1,IF(DATE=BTIME, L, H)),COLORGREEN;
POLYLINE1((DATE=AATIME OR DATE=BBTIME) AND D=2,IF(DATE=AATIME, L, H)),COLORGREEN;
POLYLINE1((DATE=BBTIME OR DATE=CCTIME) AND D=2,IF(DATE=BBTIME, H, L)),COLORGREEN;
有思路，想編寫各種指標(biāo)公式，程序化交易模型，選股公式，預(yù)警公式的朋友
可聯(lián)系技術(shù)人員 QQ: 511411198 或微信：cxhjy888 進(jìn)行 有償 編寫！（不貴！點(diǎn)擊查看價(jià)格！）
相關(guān)文章
-
沒有相關(guān)內(nèi)容
會(huì)員登錄/注冊(cè)