相關標簽:

?

看了黑馬區班長王小松的實戰一招鮮，有一招是乖離率劃線的，雖然必須與其他多個公式合用才能確定買賣點，不過本人還是覺得很好。可惜沒有原碼，在網上找來這個大智慧的原碼（見下面），在廣發通達信版上測試通不過，提示不認識barstatus，后續語句怎樣還不知道。本人不懂大智慧，通達信里好象也沒有這個BARSTATUS函數，請各位老師或理想同學幫改成通達信能用的原碼，謝謝。

{12日乖離率劃趨勢線}
bb: (CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100,COLORWHITE;{12日乖離率}
A1:=REF(bb,2)=HHV(bb,2*2+1); B1:=FILTER(A1,2); C1:=BACKSET(B1,2+1); D1:=FILTER(C1,2);
A2:=REF(bb,2)=LLV(bb,2*2+1); B2:=FILTER(A2,2); C2:=BACKSET(B2,2+1); D2:=FILTER(C2,2);
H1:=(D1 AND NOT(D2)) OR BARSTATUS=2 OR BARSCOUNT(C)=1;
L1:=(D2 AND NOT(D1)); H2:=D1 AND NOT(D2);X1:=REF(BARSLAST(H1),1)+1;
F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,L,10000),X1));
G1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:=I1>REF(I1,1);
L2:=LD OR BARSTATUS=2 OR BARSCOUNT(C)=1;
X2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,H,0),X2));
G2:=F2>REF(F2,1); I2:=BACKSET(G2,2); HD:=I2>REF(I2,1);
R1:=BACKSET(BARSTATUS=2,BARSLAST(HD)+1); S1:=R1>REF(R1,1);
R2:=BACKSET(S1,REF(BARSLAST(HD),1)+2); S2:=R2>REF(R2,1);
壓力線:linevalue(S2,bb,S1,bb,0,0),colorred;
DRAWICON(ref(bb,1)<=壓力線 and bb>壓力線,壓力線,4),ALIGN1;
突破:bb>=壓力線,LINETHICK0;{http://www.weiqiv.net.cn}<!--++ plugin_code qcomic begin-->



改成通達信的源碼是：
{12日乖離率劃趨勢線}
BB: (CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100,COLORWHITE;{12日乖離率}
A1:=REF(BB,2)=HHV(BB,2*2+1);
B1:=FILTER(A1,2);
C1:=BACKSET(B1,2+1);
D1:=FILTER(C1,2);
A2:=REF(BB,2)=LLV(BB,2*2+1);
B2:=FILTER(A2,2);
C2:=BACKSET(B2,2+1);
D2:=FILTER(C2,2);
H1:=(D1 AND NOT(D2)) OR ISLASTBAR=1 OR BARSCOUNT(C)=1;
L1:=(D2 AND NOT(D1));
H2:=D1 AND NOT(D2);
X1:=REF(BARSLAST(H1),1)+1;
F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,L,10000),X1));
G1:=F1>REF(F1,1);
I1:=BACKSET(G1,2);
LD:=I1>REF(I1,1);
L2:=LD OR ISLASTBAR=1 OR BARSCOUNT(C)=1;
X2:=REF(BARSLAST(L2),1)+1;
F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,H,0),X2));
G2:=F2>REF(F2,1);
I2:=BACKSET(G2,2);
HD:=I2>REF(I2,1);
R1:=BACKSET(ISLASTBAR=1,BARSLAST(HD)+1);
S1:=R1>REF(R1,1);
R2:=BACKSET(S1,REF(BARSLAST(HD),1)+2);
S2:=R2>REF(R2,1);
壓力線:DRAWLINE(S2,BB,S1,BB,0),COLORRED;
DRAWICON(REF(BB,1)<=壓力線 AND BB>壓力線,壓力線,5);
突破:BB>=壓力線,LINETHICK0;{http://www.weiqiv.net.cn}<!--++ plugin_code qcomic begin--><!--++ plugin_code qcomic end-->
<!--++ plugin_code qcomic end-->

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?