通达信好牛的附图 源码

 通达信好牛的附图 源码

{牛牛指标网提供：www.tdx001.com}复制内容到剪贴板

1. AAA:=(3*C+H+L+O)/6;   
2. VAR1:(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36;   
3. VAR2:(HHV(VAR1,5)+HHV(VAR1,10)+HHV(VAR1,20))/3;   
4. VAR3:(LLV(VAR1,5)+LLV(VAR1,10)+LLV(VAR1,20))/3;   
5. VAR4:(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3;   
6. VAR5:(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3;   
7. VAR6:(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3;   
8. {CROSS(VAR1,VAR6);   
9. DRAWICON(VAR1>VAR6,VAR1,1);};   
10.   
11. C,COLORRED;   
12.   
13. TY:=C;   
14. A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1); HD:=FILTER(C1,10);   
15. A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1); LD:=FILTER(C2,10);   
16. A:=REF(C,BARSLAST(HD)); B:=REF(L,BARSLAST(LD));   
17. T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;   
18. T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);   
19. 顶:IF(T1,A,A),COLORYELLOW,POINTDOT;   
20. 底:IF(T2,B,B),COLORGREEN,POINTDOT;   

748277333.jpg