飞狐交易师指标公式示例

  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

input:n(3,1,100),qj(0,0,50),m(0,0,1), inidate(600,1,1000),Z_DOT(33,3,100),show(4,0,6);
IF SHOW<=3 THEN
DRAWGBK(DATE>900101,COLORRGB(95,95,95),COLORRGB(0,0,0),1);

IF SHOW<=3 OR SHOW=6 THEN BEGIN
STICKLINE(c>o,l,h,0,0),colorred;
STICKLINE(c>o,c,o,8,1),colorred;
STICKLINE(c<=o,l,h,0,0),colorgreen;
STICKLINE(c<=o,c,o,8,1),colorgreen;
END ;

{变量定义和过渡}

HD_N:="HDLD.TP"(N,M,INIDATE);
LD_N:="HDLD.DN"(N,M,INIDATE);
VALUE_DOT_N:="HDLD.VALUE_DOT"(N,M,INIDATE);
BAR_DOT_N:="HDLD.BAR_DOT"(N,M,INIDATE);

HD_Z:="HDLD.TP"(Z_DOT,M,INIDATE);
LD_Z:="HDLD.DN"(Z_DOT,M,INIDATE);
VALUE_DOT_Z:="HDLD.VALUE_DOT"(Z_DOT,M,INIDATE);
BAR_DOT_Z:="HDLD.BAR_DOT"(Z_DOT,M,INIDATE);



{定义序列变量}
FH:=HIGH;
FL:=CLOSE;
FLL:=LOW;
SELL:=0*FH;

IN_H:= SELL;
IN_L:= SELL;
突变周期:SELL;
ANGLEX16_H:=SELL; //向下角度线的16x1线的斜率
ANGLEX16_L:=SELL; //向上角度线的16x1线的斜率


if show >1 and show<=4 then BEGIN
养鸡: SELL,,colorred;
养狗: SELL,,COLORYELLOW;
牛熊: SELL,,colorff,Linethick2;
End ;

IF SHOW>5 THEN BEGIN
MID : MA(CLOSE,26),COLORWHITE;//,LINEDOT;
UPPER: MID + 2*STD(CLOSE, 26),COLORYELLOW;//,LINEDOT;
LOWER: MID - 2*STD(CLOSE, 26), COLORMAGENTA;//,LINEDOT;
END;
////

{突破的计算}

FC:=C;
支撑位:FC*0,colorwhite, POINTDOT,LINETHICK2;
压力位:FC*0,colorgreen, POINTDOT,LINETHICK2;
前支:=fc*0;
前压:=fc*0;
临界点:=FC*0,colorwhite, POINTDOT,LINETHICK3;
低点:=FC*0,colorgreen, POINTDOT,LINETHICK3;

upx1:=if( (c>ref(c,1) or (c=ref(c,1) and (ref(c,2)refx(c,1),c,0);
upx2:=if( (cref(c,1) or (ref(c,2)=ref(c,1) and ref(c,3)>ref(c,2))))) and c
临界点:=ref(c,BARSLAST(upx1));
低点:=ref(c,BARSLAST(upx2));
箱顶S:hhv(临界点,n),coloryellow,POINTDOT,LINETHICK4;//color995555,
箱顶L:hhv(临界点,Z_DOT),COLORGRAY,POINTDOT,LINETHICK4;
箱底S:llv(低点,n),color555599,POINTDOT,LINETHICK4;
箱底L:llv(低点,Z_DOT),colorblue,POINTDOT,LINETHICK4;


x1:=LLV(临界点,n);
x10:=HHV(临界点,n);
t0:=BARSLAST(c=x1);
t00:=BARSLAST(c=x10);
x2:=HHV(低点,N);
t2:=BARSLAST(c=x2);
tp2:=if(c=x2 and ref(低点,1)=x2 and refx(c,1)
B1:=BARSSINCE(c=x1);
B2:=BARSSINCE(c=x2);
BBF:=IF(B1>=B2,B2,B1);

突破:=if(c>x1 and ref(c,1)<=x1 and ref(临界点,1)=x1 and refx(c,1)>x1 and refx(c,2)>x1 and refx(c,3)>x1 ,1,0),LINETHICK0;
tp1:=if(c>x1 and ref(c,1)<=x1 and ref(临界点,1)=x1 and refx(c,1)>x1 and refx(c,2)>x1 and refx(c,3)>x1 ,x1,0);//,LINETHICK0;
tp10:=if(c>x10 and ref(c,1)<=x10 and ref(临界点,1)=x10 and refx(c,1)>x10 and refx(c,2)>x10 and refx(c,3)>x10 ,x10,0);
VARIABLE:INI=0,J=0;
INI:=DATACOUNT-BBF[DATACOUNT];

for I=INI+1 TO DATACOUNT DO BEGIN

IF 支撑位[I-1]>0 AND FC[I]>支撑位[I-1] THEN BEGIN 支撑位[I]:=支撑位[I-1] ;前支[I]:=前支[I-1] ;END

; //
IF tp1[I]>支撑位[I] AND tp1[I]>0 THEN BEGIN 前支[I]:=支撑位[I];支撑位[I]:=tp1[I];END;
IF 支撑位[I-1]>0 AND FC[I]<=支撑位[I-1] AND 前支[I-1]<支撑位[I-1] THEN BEGIN
支撑位[I]:=前支[I-1] ;J:=I-1;
WHILE((前支[J-1]>=前支[J] OR 前支[J-1]>=FC[I] OR 前支[J-1]>=支撑位[I] ) AND J>=INI+1 ) DO BEGIN
J:=J-1;
END;

前支[I]:=前支[J-1] ;
END;

IF tp2[I]>0 THEN BEGIN 前压[I]:=压力位[I];压力位[I]:=tp2[I];END;
IF 压力位[I-1]>0 AND FC[I]< 压力位[I-1] THEN BEGIN 前压[I]:=前压[I-1] ;压力位[I]:= 压力位[I-1] ;END;
IF tp2[I]< 压力位[I] AND tp2[I]>0 THEN BEGIN 前压[I]:=压力位[I];压力位[I]:=tp2[I];END;
IF 压力位[I-1]>0 AND FC[I]>= 压力位[I-1] AND 前压[I-1]>压力位[I-1] THEN BEGIN
压力位[I]:=前压[I-1];J:=I-1;
WHILE((前压[J-1]<=前压[J] OR 前压[J-1]<=FC[I] OR 前压[J-1]<=压力位[I] ) AND J>=INI+1 ) DO BEGIN
J:=J-1;
END;
前压[I]:=前压[J-1] ;

END;

END;

////

{趋势线的计算}
VARIABLE:HC=0,KH=0,KL=0,INI_N=0,INI_HL=0;{定义循环中实用的变量}

INI_N:=IF(DATACOUNT<=inidate,DATACOUNT-3,inidate); {定义循环起始位置}




FOR I=DATACOUNT-INI_N+2*Z_DOT+1 TO DATACOUNT-1 DO BEGIN

//FOR I=Z_DOT+N+1 TO DATACOUNT-1 DO BEGIN


// 支撑[I]:=支撑[I-1];压力[I]:=压力[I-1];
ANGLEX16_H[I]:=ANGLEX16_H[I-1]; ANGLEX16_L[I]:=ANGLEX16_L[I-1];
IF HD_N[I]>0 THEN 压力[I]:=FL[I];//VALUE_DOT_N[I] ;

IF LD_N[I]>0 THEN 支撑[I]:=FL[I];//VALUE_DOT_N[I] ;

IF BAR_DOT_Z[I]>0 THEN BEGIN

KH:=0; KL:=0;
FOR J=I+1 TO DATACOUNT DO BEGIN
IF (HD_Z[I]>0 AND HD_Z[J]>0) OR (LD_Z[I]>0 AND LD_Z[J]>0) THEN BREAK;

IF ( BAR_DOT_N[J]>0) THEN BEGIN

HC:=(VALUE_DOT_Z[I]-VALUE_DOT_N[J])/(BAR_DOT_Z[I]-BAR_DOT_N[J])*100,PRECISION4; {找到符合相应斜率的趋势线 }
IF HD_Z[I]>0 AND KH>HC THEN KH:=HC;
IF LD_Z[I]>0 AND KL

END;
END;
IF HD_Z[I]>0 THEN ANGLEX16_H[I]:=KH;

IF LD_Z[I]>0 THEN ANGLEX16_L[I]:=KL;

END;
END;



//DRAWSL(HD_Z>0 ,VALUE_DOT_Z,ANGLEX16_H/100,0,3),COLORGRAY,LINEDOT;
//DRAWSL(LD_Z>0 ,VALUE_DOT_Z,ANGLEX16_L/100,0,3),COLORGRAY,LINEDOT;


DRAWSL(HD_Z>0 AND ANGLEX16_H<>0 ,VALUE_DOT_Z,ANGLEX16_H/(2*100),0,3),COLORGRAY,LINEDOT;
DRAWSL(LD_Z>0 AND ANGLEX16_L<>0 ,VALUE_DOT_Z,ANGLEX16_L/(2*100),0,3),COLORGRAY,LINEDOT;

DRAWSL(HD_Z>0 AND ANGLEX16_H<>0 ,VALUE_DOT_Z,ANGLEX16_H/(4*100),0,3),COLORGRAY,LINEDOT;
DRAWSL(LD_Z>0 AND ANGLEX16_L<>0 ,VALUE_DOT_Z,ANGLEX16_L/(4*100),0,3),COLORGRAY,LINEDOT;

DRAWSL(HD_Z>0 AND ANGLEX16_H<>0 ,VALUE_DOT_Z,ANGLEX16_H/(8*100),0,3),COLORGRAY,LINEDOT;
DRAWSL(LD_Z>0 AND ANGLEX16_L<>0 ,VALUE_DOT_Z,ANGLEX16_L/(8*100),0,3),COLORGRAY,LINEDOT;

DRAWSL(HD_Z

>0 AND ANGLEX16_H<>0 ,VALUE_DOT_Z,ANGLEX16_H/(16*100),0,3),COLORGRAY;
DRAWSL(LD_Z>0 AND ANGLEX16_L<>0 ,VALUE_DOT_Z,ANGLEX16_L/(16*100),0,3),COLORGRAY;

DRAWSL(HD_Z>0 AND ANGLEX16_H<>0 ,VALUE_DOT_Z,ANGLEX16_H/(32*100),0,3),COLORGRAY,LINEDOT;
DRAWSL(LD_Z>0 AND ANGLEX16_L<>0 ,VALUE_DOT_Z,ANGLEX16_L/(32*100),0,3),COLORGRAY,LINEDOT;

DRAWSL(HD_Z>0 AND ANGLEX16_H<>0 ,VALUE_DOT_Z,ANGLEX16_H/(64*100),0,3),COLORGRAY,LINEDOT;
DRAWSL(LD_Z>0 AND ANGLEX16_L<>0 ,VALUE_DOT_Z,ANGLEX16_L/(64*100),0,3),COLORGRAY,LINEDOT;

DRAWSL(HD_Z>0 AND ANGLEX16_H<>0 ,VALUE_DOT_Z,ANGLEX16_H/(128*100),0,3),COLORGRAY,LINEDOT;
DRAWSL(LD_Z>0 AND ANGLEX16_L<>0 ,VALUE_DOT_Z,ANGLEX16_L/(128*100),0,3),COLORGRAY,LINEDOT;

//DRAWSL(HD_Z>0 AND ANGLEX16_H<>0 ,VALUE_DOT_Z,ANGLEX16_H/(256*100),0,3),COLORGRAY,LINEDOT;
//DRAWSL(LD_Z>0 AND ANGLEX16_L<>0 ,VALUE_DOT_Z,ANGLEX16_L/(256*100),0,3),COLORGRAY,LINEDOT;

{交叉点的计算}

CROSS_DOT:=SELL;
CROSS_BAR:=SELL;
CROSS_VALUE:=SELL;
WEILAI_DOT:=SELL;
WEILAI_BAR:=SELL;
WEILAI_VALUE:=SELL;

VARIABLE:XIE_I=0,XIE_J=0,BAR_A=0,V_A=0,XIEA=0,BAR_B=0,V_B=0,XIEB=0,X2=0,Y2=0,WL=0,WN=0,I1=0,I2=0,I3=0, J1=0,J2=0,J3=0,IZ1=0,IZ2=0,IZ3=0, JZ1=0,JZ2=0,JZ3=0,INI_HL=0,VX=0,VY=0;

IN_H:= BARSSINCE(ANGLEX16_H<>0); {计算起始计数的点,以第一个角度线的极点起始}
IN_L:= BARSSINCE(ANGLEX16_L<>0);
IF IN_H[DATACOUNT]> IN_L[DATACOUNT] THEN INI_HL:= DATACOUNT- IN_H[DATACOUNT]-2*N-1 ; ELSE
INI_HL:= DATACOUNT- IN_L[DATACOUNT]-2*N-1 ;
FOR I= INI_HL TO DATACOUNT-1 DO BEGIN

IF BAR_DOT_Z[I]>0 THEN BEGIN
IF HD_Z[I]>0 THEN XIE_I:=ANGLEX16_H[I] ;
IF LD_Z[I]>0 THEN XIE_I:=ANGLEX16_L[I] ;

I1:=VALUE_DOT_Z[I]; I2:=0;
J1:=VALUE_DOT_Z[I]; J2:=0;
IZ1:=VALUE_DOT_Z[I]; IZ2:=0;
JZ1:=VALUE_DOT_Z[I]; JZ2:=0;

FOR J=I DOWNTO INI_HL DO BEGIN
I3:=0 ; J3:=0 ; IZ3:=0 ; JZ3:=0 ;
IF BAR_DOT_N[J]>0 THEN BEGIN
IF HD_Z[I]>0 AND LD_N[J]>0 AND VALUE_DOT_N[J]IF LD_Z[I]>0 AND HD_N[J]>0 AND VALUE_DOT_N[J]>I1*1.05 THEN BEGIN I1:=VALUE_DOT_N[J] ; I2:= I2+1 ; I3:=1 ;END;
IF HD_Z[I]>0 AND HD_N[J]>0 AND VALUE_DOT_N[J]IF LD_Z[I]>0 AND LD_N[J]>0 AND VALUE_DOT_N[J]>J1*1.05 THEN BEGIN J1:=VALUE_DOT_N[J] ; J2:= J2+1 ; J3:=1 ;END;
IF I3=1 THEN V_B:=I1 ;ELSE IF J3=1 THEN V_B:=J1 ;

IF HD_Z[I]>0 AND LD_Z[J]>0 AND VALUE_DOT_Z[J]IF LD_Z[I]>0 AND HD_Z[J]>0 AND VALUE_DOT_Z[J]>IZ1*1.05 THEN BEGIN IZ1:=VALUE_DOT_Z[J] ; IZ2:= IZ2+1 ; IZ3:=1 ;END;
IF HD_Z[I]>0 AND HD_Z[J]>0 AND VALUE_DOT_Z[J]IF LD_Z[I]>0 AND LD_Z[J]>0 AND VALUE_DOT_Z[J]>JZ1*1.05 THEN BEGIN JZ1:=VALUE_DOT_Z[J] ; JZ2:= JZ2+1 ; JZ3:=1 ;END;
IF IZ3=1 THEN V_B:=IZ1 ;ELSE IF JZ3=1 THEN V_B:=JZ1 ;



IF (

I2<2 OR J2<2) AND (I3=1 OR J3=1) OR ((IZ2<2 OR JZ2<2) AND (IZ3=1 OR JZ3=1)) THEN BEGIN

BAR_A:=BAR_DOT_Z[I]; V_A:=VALUE_DOT_Z[I]; XIEA:=XIE_I/100; BAR_B:=BAR_A;{ V_B:=I1 ;} XIEB:= 0;
FOR K=1 TO 5 DO BEGIN
X2:=(V_A-V_B+BAR_B*XIEB-BAR_A*XIEA)/(XIEB-XIEA);//BAR_C
Y2:=( XIEA*XIEB*(BAR_A-BAR_B)+V_B*XIEA-V_A*XIEB )/(XIEA-XIEB);//VALUE_C
X2:=ROUND(X2); x3:= (X2-BAR_A)/Z_DOT;
IF X2>BAR_A+Z_DOT+1 AND XIEA<>0 THEN BEGIN //AND x3<2
IF X2<=DATACOUNT THEN BEGIN

CROSS_DOT[X2]:=CROSS_DOT[X2]+1;
CROSS_BAR[X2]:=X2;
CROSS_VALUE[X2]:=Y2;
END;{FOR IF X2<=DATACOUNT } ELSE IF X2WL:=0;WN:=1;X2:=ROUND(X2);
WHILE WL=0 DO BEGIN
IF WEILAI_DOT[WN]=0 THEN BEGIN
WEILAI_DOT[WN]:=WEILAI_DOT[WN]+1;
WEILAI_BAR[WN]:=X2;
WEILAI_VALUE[WN]:=Y2;
WL:=1;
END;{FOR IF WEILAI_DOT[WN]=0} ELSE BEGIN
IF WEILAI_DOT[WN]>0 THEN BEGIN
IF WEILAI_BAR[WN]=X2 THEN BEGIN
WEILAI_DOT[WN]:=WEILAI_DOT[WN]+1;
WL:=1;
END ;{ FOR IF WEILAI_BAR[WN]=X2} ELSE WN:=WN+1;
// END;
END; // FOR IF WEILAI_DOT[WN]>0
END; // FOR ELSE BEGIN
END; //FOR WHILE WL=0 DO
END; //FOR ELSE IF X2END;//FOR IF X2>=BAR_A+N+1
XIEA:=XIEA/2;
END; // FOR K=1

END; //IF I2<2
END; //FOR IF BAR_DOT_Z[J]>0
END; //FOR J=I DOWNTO
END; //FOR IF BAR_DOT_N[I]>0
END;// FOR I=Z_DOT+1






if show >0 then VERTLINE(BARPOS=DATACOUNT-INI_N),COLORwhite,LINEDASH,LINETHICK2;
if show >2 then VERTLINE(CROSS_DOT=1 AND( REF(CROSS_DOT,1)=0 AND REFX(CROSS_DOT,1)=0)),LINEDOT,COLORGRAY;
if show >1 then VERTLINE(CROSS_DOT>=2 OR (CROSS_DOT=1 AND( REF(CROSS_DOT,1)=1 AND REFX(CROSS_DOT,1)=1)) ),LINEDASH,COLOR559955;
//if show >1 then DRAWTEXT( CROSS_DOT,CROSS_VALUE,'+'),COLOR999999,ALIGN0;

{对未来最近的10交叉点进行排序好显示}
VARIABLE:S1=0,S2=0,S3=0,S4=0,S5=0,S6=0,S7=0,S8=0,S9=0,S10=0,SRED=0;
WN:=1; WL:=DATACOUNT;
WHILE WEILAI_DOT[WN]>0 DO BEGIN
SRED:=0;
IF WEILAI_DOT[WN]>=2 THEN SRED:=100;
IF WEIL

AI_BAR[WN]-WL=1 THEN S1:=WN+SRED;
IF WEILAI_BAR[WN]-WL=2 THEN S2:=WN+SRED;
IF WEILAI_BAR[WN]-WL=3 THEN S3:=WN+SRED;
IF WEILAI_BAR[WN]-WL=4 THEN S4:=WN+SRED;
IF WEILAI_BAR[WN]-WL=5 THEN S5:=WN+SRED;
IF WEILAI_BAR[WN]-WL=6 THEN S6:=WN+SRED;
IF WEILAI_BAR[WN]-WL=7 THEN S7:=WN+SRED;
IF WEILAI_BAR[WN]-WL=8 THEN S8:=WN+SRED;
IF WEILAI_BAR[WN]-WL=9 THEN S9:=WN+SRED;
IF WEILAI_BAR[WN]-WL=10 THEN S10:=WN+SRED;
IF WEILAI_BAR[WN]-WL=11 THEN S11:=WN+SRED;
IF WEILAI_BAR[WN]-WL=12 THEN S12:=WN+SRED;
IF WEILAI_BAR[WN]-WL=13 THEN S13:=WN+SRED;
IF WEILAI_BAR[WN]-WL=14 THEN S14:=WN+SRED;
IF WEILAI_BAR[WN]-WL=15 THEN S15:=WN+SRED;
WN:=WN+1;
END;

if S1 >100 then VERTLINE(ISLASTBAR),LINEDOT,COLORRED,SHIFT1 ;ELSE IF S1 >=1 THEN VERTLINE(ISLASTBAR),LINEDOT,COLORBLUE,SHIFT1 ;
if S2 >100 then VERTLINE(ISLASTBAR),LINEDOT,COLORRED,SHIFT2 ;ELSE IF S2 >=1 THEN VERTLINE(ISLASTBAR),LINEDOT,COLORBLUE,SHIFT2 ;
if S3 >100 then VERTLINE(ISLASTBAR),LINEDOT,COLORRED,SHIFT3 ;ELSE IF S3 >=1 THEN VERTLINE(ISLASTBAR),LINEDOT,COLORBLUE,SHIFT3 ;
if S4 >100 then VERTLINE(ISLASTBAR),LINEDOT,COLORRED,SHIFT4 ;ELSE IF S4 >=1 THEN VERTLINE(ISLASTBAR),LINEDOT,COLORBLUE,SHIFT4 ;
if S5 >100 then VERTLINE(ISLASTBAR),LINEDOT,COLORRED,SHIFT5 ;ELSE IF S5 >=1 THEN VERTLINE(ISLASTBAR),LINEDOT,COLORBLUE,SHIFT5 ;
if S6 >100 then VERTLINE(ISLASTBAR),LINEDOT,COLORRED,SHIFT6 ;ELSE IF S6 >=1 THEN VERTLINE(ISLASTBAR),LINEDOT,COLORBLUE,SHIFT6 ;
if S7 >100 then VERTLINE(ISLASTBAR),LINEDOT,COLORRED,SHIFT7 ;ELSE IF S7 >=1 THEN VERTLINE(ISLASTBAR),LINEDOT,COLORBLUE,SHIFT7 ;
if S8 >100 then VERTLINE(ISLASTBAR),LINEDOT,COLORRED,SHIFT8 ;ELSE IF S8 >=1 THEN VERTLINE(ISLASTBAR),LINEDOT,COLORBLUE,SHIFT8 ;
if S9 >100 then VERTLINE(ISLASTBAR),LINEDOT,COLORRED,SHIFT9 ;ELSE IF S9 >=1 THEN VERTLINE(ISLASTBAR),LINEDOT,COLORBLUE,SHIFT9 ;
if S10>100 then VERTLINE(ISLASTBAR),LINEDOT,COLORRED,SHIFT10 ;ELSE IF S10 >=1 THEN VERTLINE(ISLASTBAR),LINEDOT,COLORBLUE,SHIFT10;
if S11>100 then VERTLINE(ISLASTBAR),LINEDOT,COLORRED,SHIFT11 ;ELSE IF S11 >=1 THEN VERTLINE(ISLASTBAR),LINEDOT,COLORBLUE,SHIFT11;
if S12>100 then VERTLINE(ISLASTBAR),LINEDOT,COLORRED,SHIFT12 ;ELSE IF S12 >=1 THEN VERTLINE(ISLASTBAR),LINEDOT,COLORBLUE,SHIFT12;
if S13>100 then VERTLINE(ISLASTBAR),LINEDOT,COLORRED,SHIFT13 ;ELSE IF S13 >=1 THEN VERTLINE(ISLASTBAR),LINEDOT,COLORBLUE,SHIFT13;
if S14>100 then VERTLINE(ISLASTBAR),LINEDOT,COLORRED,SHIFT14 ;ELSE IF S14 >=1 THEN VERTLINE(ISLASTBAR),LINEDOT,COLORBLUE,SHIFT14;
if S15>100 then VERTLINE(ISLASTBAR),LINEDOT,COLORRED,SHIFT15 ;ELSE IF S15 >=1 THEN VERTLINE(ISLASTBAR),LINEDOT,COLORBLUE,SHIFT15;


突变周期:= if(s1,1,if(s2,2,if(s3,3,if(s4,4,if(s5,5,if(s6,6,if(s7,7,if(s8,8,if(s9,9,0))))))))),COLORRED,LINETHICK0;

{

//BOLL
IF SHOW>1 and show<=4 THEN BEGIN
MID := MA(CLOSE,BOLL_M),COLORWHITE,LINEDOT;
UPPER:= MID + BOLL_N*STD(CLOSE, BOLL_M);//,COLORYELLOW,LINEDOT;
LOWER:= MID -

BOLL_N*STD(CLOSE, BOLL_M);//, COLORMAGENTA,LINEDOT;
PARTLINE(1,UPPER),COLORYELLOW,LINEDOT;

PARTLINE(1,LOWER),COLORMAGENTA,LINEDOT;
END;
}
{突破的计算}
upx1:=if( (c>ref(c,1) or (c=ref(c,1) and (ref(c,2)refx(c,1),c,0);
upx2:=if( (cref(c,1) or (ref(c,2)=ref(c,1) and ref(c,3)>ref(c,2))))) and c
临界点:=ref(c,BARSLAST(upx1)),POINTDOT,LINETHICK3;//
低点:=ref(c,BARSLAST(upx2)),colorgreen,POINTDOT,LINETHICK3;
x1:=LLV(临界点,n);
t0:=BARSLAST(c=x1);

突破:=if(c>x1 and ref(c,1)<=x1 and ref(临界点,1)=x1 and refx(c,1)>x1 and refx(c,2)>x1 and refx(c,3)>x1 ,1,0),LINETHICK0;
突破失败:=if(ref(c,1)>x1 and c<=x1 and 临界点>x1 ,1,0),LINETHICK0;

止损率:=(c-临界点)/临界点*100;//,colorred,LINETHICK0;
止盈率:=(c-低点)/低点*100;//,colorgreen,linethick0;


//义阳量能

TTJ:=BARSLAST((VOL>=ref(ma(v,3),1)*2));

K0:=TTJ=0;
K1:=SUMBARS(K0,1);
STICKLINE(K1<=5,REF(C,K1-1)*1.002,REF(C,K1-1),10,0),POINTDOT,colorred;//COLORYELLOW;
义阳:IF (K1>0 AND C>REF(C,K1-1),1,0),COLORRED,LINETHICK0;


//--均线系统
if show >1 and show<=4 then BEGIN
养鸡:=EMA(CLOSE,14);//,colorred;
partline(养鸡养狗:=EMA(CLOSE,25);//,COLORYELLOW;
partline(养狗牛熊:=EMA(CLOSE,250);//,Linethick2,colorff;
partline(牛熊END;

//--超跌狙击
if show >2 and show<=4 then BEGIN
varx:=EMA((CLOSE+OPEN)/2,3);
鸡笼:=EMA(varx,80)*0.87,LINEDASHDOT,colorffff00;
狗笼:=鸡笼*0.85,LINEDASHDOT,colorff00ff;
partline(鸡笼<=ref(鸡笼,1),鸡笼),LINEDASHDOT,colorffff00;
partline(鸡笼>ref(鸡笼,1),鸡笼),color00ffff;
partline(狗笼<=ref(狗笼,1),狗笼),LINEDASHDOT,colorffffcc;
partline(狗笼>ref(狗笼,1),狗笼),colorff00ff;

END;

HIGH1:=IF(REFX(BAR_DOT_N,QJ)>0 OR REF(BAR_DOT_N,QJ),HHV(HIGH,QJ+1),0);
LOW1:=IF(REFX(BAR_DOT_N,QJ)>0 OR REF(BAR_DOT_N,QJ),LLV(L,QJ+1),0);


x1:=high1+(high1-low1)*0.92 ;
x2:=x1+(x1-high1)*0.33 ;
x3:=x2+(x2-x1)*2.03 ;
x4:=x3+(x3-x2)*0.96 ;
x5:=x4+(x4-x3)*0.59 ;
x6:=x5+(x5-x4)*1.29 ;
x7:=x6+(x6-x5)*1.20 ;
x8:=x7+(x7-x6)*0.85 ;
y1:=low1-(high1-low1)*0.92 ;
y2:=y1-(low1-y1)*0.33 ;
y3:=y2-(y1-y2)*2.03 ;
y4:=y3-(y2-y3)*0.96 ;
y5:=y4-(y3-y4)*0.59 ;
y6:=y5-(y4-y5)*1.29 ;
y7:=y6-(y5-y6)*1.20 ;
y8:=y7-(y6-y7)*0.85 ;

DRAWTEXT( REFX(HD_N,QJ)>0 OR REF(HD_N,QJ)>0,y3,'+'),COLORYELLOW,ALIGN0;
DRAWNUMBER( REFX(HD_Z,QJ)>0 OR REF(HD_Z,QJ)>0,Y3*0.95,Y8,2),COLORGREEN,ALIGN0;

DRAWTEXT( REFX(LD_N,QJ)>0 OR REF(LD_N,QJ)>0,X3,'+'),COLORYELLOW,ALIGN0;
DRAWNUMBER( REFX(LD_Z,QJ)>0 OR REF(LD_Z,QJ)>0,X3*1.05,X8,2),COLORRED,ALIGN0;
{
TL1:=REF(Y3, BARSLAST(HD_Z)-QJ);
TL1B:=REF(Y8, BARSLAST(HD_Z)-QJ);
TL2:=BARSLAST(LTL2B:=BARSLAST(LTL3:=IF(TL2=0 AND REF(TL2,1)>0,BARSLAST(HD_Z),0);
TL3B:=IF(TL2B=0 AND REF(TL2B,1)>0

,BARSLAST(HD_Z),0);
DRAWNUMBER( TL3>0,L*0.95,BARSLAST(HD_Z),0),COLORGREEN,ALIGN0;
DRAWNUMBER( TL3B>0,L*0.95,BARSLAST(HD_Z),0),COLORGREEN,ALIGN0;

TH1:=REF(X3, BARSLAST(LD_Z)-QJ);
TH1B:=REF(X8, BARSLAST(LD_Z)-QJ);
TH2:=BARSLAST(H>TH1 );
TH2B:=BARSLAST(H>TH1B );

TH3:=IF(TH2=0 AND REF(TH2,1)>0,BARSLAST(LD_Z),0);
TH3B:=IF(TH2B=0 AND REF(TH2B,1)>0,BARSLAST(LD_Z),0);
DRAWNUMBER( TH3>0,H*1.05,BARSLAST(LD_Z),0),COLORRED,ALIGN0;
DRAWNUMBER( TH3B>0,H*1.05,BARSLAST(LD_Z),0),COLORRED,ALIGN0;
}

相关文档
最新文档