請吧這個文華指標改成博易的,謝謝 [博易POBO]
咨詢內容:
?//M:=5;
//N:=10;
A1:=REF(HIGH,N)=HHV(HIGH,2*N+1);
B1:=FILTER(A1,N);
C1:=BACKSET(B1,N+1);
D1:=FILTER(C1,N);
//{高點}
A2:=REF(LOW,N)=LLV(LOW,2*N+1);
B2:=FILTER(A2,N);
C2:=BACKSET(B2,N+1);
D2:=FILTER(C2,N);
//{低點}
E1:=(REF(LLV(LOW,2*N),1)+REF(HHV(HIGH,2*N),1))/2;
E2:=(HIGH+LOW)/2;
H1:=(D1 AND NOT((D2 AND E1>=E2))) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
L1:=(D2 AND NOT((D1 AND E1<E2))),NODRAW;
H2:=D1 AND NOT((D2 AND E1>=E2));
X1:=REF(BARSLAST(H1),1)+1;
F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(LOW,X1)+1);
//LLVBARS(IF(L1,LOW,N000),X1)+1,NODRAW;
//DRAWTEXT(X1,L,'X1');
//DRAWTEXT(F1,H,'F1');
G1:=F1>REF(F1,1);
I1:=BACKSET(G1,1);
LD:=I1>REF(I1,1);
L2:=LD OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
X2:=REF(BARSLAST(L2),1)+1;
F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(H,X2)+1);
G2:=F2>REF(F2,1);
I2:=BACKSET(G2,1);
HD:=I2>REF(I2,1);
K1:=BACKSET(HD&&H>HV(H,BARSLAST(LD)),BARSLAST(LD));
K2:=BACKSET(LD&&L<LV(L,BARSLAST(HD)),BARSLAST(HD));
HH:=HD&&NOT(LD)&&REFX1(K1<>1,1);
LL:=LD&&NOT(HD)&&REFX1(K2<>1,1);
//{過濾后高點}
DRAWLINE1(LL,L,HH,H,0),COLORRED,POINTDOT;
DRAWLINE1(HH,H,LL,L,0),COLORGREEN,POINTDOT;
DRAWNUMBER1(HH,H+M*MINPRICE,H-VALUEWHEN(LL,L),0),COLORGRAY;
DRAWNUMBER1(LL,L-M*MINPRICE,L-VALUEWHEN(HH,H),0),VALIGN0,COLORGRAY;
N:=10;
A1:=REF(HIGH,N)=HHV(HIGH,2*N+1);
B1:=FILTER(A1,N);
C1:=BACKSET(B1,N+1);
D1:=FILTER(C1,N);
//{高點}
A2:=REF(LOW,N)=LLV(LOW,2*N+1);
B2:=FILTER(A2,N);
C2:=BACKSET(B2,N+1);
D2:=FILTER(C2,N);
//{低點}
E1:=(REF(LLV(LOW,2*N),1)+REF(HHV(HIGH,2*N),1))/2;
E2:=(HIGH+LOW)/2;
H1:=(D1 AND NOT((D2 AND E1>=E2))) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
L1:=(D2 AND NOT((D1 AND E1<E2))),NODRAW;
H2:=D1 AND NOT((D2 AND E1>=E2));
X1:=REF(BARSLAST(H1),1)+1;
F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(LOW,X1)+1);
//LLVBARS(IF(L1,LOW,N000),X1)+1,NODRAW;
//DRAWTEXT(X1,L,'X1');
//DRAWTEXT(F1,H,'F1');
G1:=F1>REF(F1,1);
I1:=BACKSET(G1,1);
LD:=I1>REF(I1,1);
L2:=LD OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
X2:=REF(BARSLAST(L2),1)+1;
F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(H,X2)+1);
G2:=F2>REF(F2,1);
I2:=BACKSET(G2,1);
HD:=I2>REF(I2,1);
K1:=BACKSET(HD&&H>=HHV(H,BARSLAST(LD)),BARSLAST(LD));
K2:=BACKSET(LD&&L<=LLV(L,BARSLAST(HD)),BARSLAST(HD));
HH:=HD&&NOT(LD)&&REFX(K1<>1,1);
LL:=LD&&NOT(HD)&&REFX(K2<>1,1);
//{過濾后高點}
DRAWLINE(LL,L,HH,H,0),COLORRED,POINTDOT;
DRAWLINE(HH,H,LL,L,0),COLORGREEN,POINTDOT;
DRAWNUMBER(HH,H+M,H-VALUEWHEN(LL,L),0),COLORGRAY; 來源 程序化久久網
請吧這個文華指標改成博易的,謝謝
這個是標出波浪的峰谷點差和連接線的主圖附加指標?//M:=5;
//N:=10;
A1:=REF(HIGH,N)=HHV(HIGH,2*N+1);
B1:=FILTER(A1,N);
C1:=BACKSET(B1,N+1);
D1:=FILTER(C1,N);
//{高點}
A2:=REF(LOW,N)=LLV(LOW,2*N+1);
B2:=FILTER(A2,N);
C2:=BACKSET(B2,N+1);
D2:=FILTER(C2,N);
//{低點}
E1:=(REF(LLV(LOW,2*N),1)+REF(HHV(HIGH,2*N),1))/2;
E2:=(HIGH+LOW)/2;
H1:=(D1 AND NOT((D2 AND E1>=E2))) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
L1:=(D2 AND NOT((D1 AND E1<E2))),NODRAW;
H2:=D1 AND NOT((D2 AND E1>=E2));
X1:=REF(BARSLAST(H1),1)+1;
F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(LOW,X1)+1);
//LLVBARS(IF(L1,LOW,N000),X1)+1,NODRAW;
//DRAWTEXT(X1,L,'X1');
//DRAWTEXT(F1,H,'F1');
G1:=F1>REF(F1,1);
I1:=BACKSET(G1,1);
LD:=I1>REF(I1,1);
L2:=LD OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
X2:=REF(BARSLAST(L2),1)+1;
F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(H,X2)+1);
G2:=F2>REF(F2,1);
I2:=BACKSET(G2,1);
HD:=I2>REF(I2,1);
K1:=BACKSET(HD&&H>HV(H,BARSLAST(LD)),BARSLAST(LD));
K2:=BACKSET(LD&&L<LV(L,BARSLAST(HD)),BARSLAST(HD));
HH:=HD&&NOT(LD)&&REFX1(K1<>1,1);
LL:=LD&&NOT(HD)&&REFX1(K2<>1,1);
//{過濾后高點}
DRAWLINE1(LL,L,HH,H,0),COLORRED,POINTDOT;
DRAWLINE1(HH,H,LL,L,0),COLORGREEN,POINTDOT;
DRAWNUMBER1(HH,H+M*MINPRICE,H-VALUEWHEN(LL,L),0),COLORGRAY;
DRAWNUMBER1(LL,L-M*MINPRICE,L-VALUEWHEN(HH,H),0),VALIGN0,COLORGRAY;
?
?來源:程序化99網( www.tumamayizhan.com )
博易技術人員: M:=5;N:=10;
A1:=REF(HIGH,N)=HHV(HIGH,2*N+1);
B1:=FILTER(A1,N);
C1:=BACKSET(B1,N+1);
D1:=FILTER(C1,N);
//{高點}
A2:=REF(LOW,N)=LLV(LOW,2*N+1);
B2:=FILTER(A2,N);
C2:=BACKSET(B2,N+1);
D2:=FILTER(C2,N);
//{低點}
E1:=(REF(LLV(LOW,2*N),1)+REF(HHV(HIGH,2*N),1))/2;
E2:=(HIGH+LOW)/2;
H1:=(D1 AND NOT((D2 AND E1>=E2))) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
L1:=(D2 AND NOT((D1 AND E1<E2))),NODRAW;
H2:=D1 AND NOT((D2 AND E1>=E2));
X1:=REF(BARSLAST(H1),1)+1;
F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(LOW,X1)+1);
//LLVBARS(IF(L1,LOW,N000),X1)+1,NODRAW;
//DRAWTEXT(X1,L,'X1');
//DRAWTEXT(F1,H,'F1');
G1:=F1>REF(F1,1);
I1:=BACKSET(G1,1);
LD:=I1>REF(I1,1);
L2:=LD OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;
X2:=REF(BARSLAST(L2),1)+1;
F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(H,X2)+1);
G2:=F2>REF(F2,1);
I2:=BACKSET(G2,1);
HD:=I2>REF(I2,1);
K1:=BACKSET(HD&&H>=HHV(H,BARSLAST(LD)),BARSLAST(LD));
K2:=BACKSET(LD&&L<=LLV(L,BARSLAST(HD)),BARSLAST(HD));
HH:=HD&&NOT(LD)&&REFX(K1<>1,1);
LL:=LD&&NOT(HD)&&REFX(K2<>1,1);
//{過濾后高點}
DRAWLINE(LL,L,HH,H,0),COLORRED,POINTDOT;
DRAWLINE(HH,H,LL,L,0),COLORGREEN,POINTDOT;
DRAWNUMBER(HH,H+M,H-VALUEWHEN(LL,L),0),COLORGRAY; 來源 程序化久久網
有思路,想編寫各種指標公式,交易模型,選股公式,還原公式的朋友
可聯系技術人員 QQ: 262069696 或微信號:cxh99cxh99 進行 有償收費 編寫!
(注:由于人數限制,QQ或微信請選擇方便的一個聯系我們就行,加好友時請簡單備注下您的需求,否則無法通過。謝謝您!)
相關文章
-
沒有相關內容