通达信好牛的附图 源码
通达信好牛的附图 源码
{股海网提供：www.guhai.com.cn}复制内容到剪贴板
- AAA:=(3*C+H+L+O)/6;
- 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;
- VAR2:(HHV(VAR1,5)+HHV(VAR1,10)+HHV(VAR1,20))/3;
- VAR3:(LLV(VAR1,5)+LLV(VAR1,10)+LLV(VAR1,20))/3;
- VAR4:(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3;
- VAR5:(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3;
- VAR6:(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3;
- {CROSS(VAR1,VAR6);
- DRAWICON(VAR1>VAR6,VAR1,1);};
- C,COLORRED;
- TY:=C;
- A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1); HD:=FILTER(C1,10);
- A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1); LD:=FILTER(C2,10);
- A:=REF(C,BARSLAST(HD)); B:=REF(L,BARSLAST(LD));
- T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
- T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
- 顶:IF(T1,A,A),COLORYELLOW,POINTDOT;
- 底:IF(T2,B,B),COLORGREEN,POINTDOT;
