分享

缠论分型分笔指标副图源码图解|通达信股票公式 股票软件公式

 camille_2008 2015-05-23
顶:=BBI+3*STD(BBI,13),COLOR004AFF;
  底:=BBI-3*STD(BBI,13),COLOR67FF00;
  DRAWBAND(BBI,RGB(97,95,00),顶,RGB(97,95,00));
  DRAWBAND(BBI,RGB(25,75,150),底,RGB(25,75,250));
  {MA1:MA(CLOSE,M1);
  MA2:MA(CLOSE,M2),COLORGREEN;
  MA3:MA(CLOSE,M3),COLORRED;
  MA4:MA(CLOSE,M4),COLORYELLOW;}
  KU1:=IF(HIGH=HHV(HIGH,3),1,0);
  KD1:=IF(LOW=LLV(LOW,3),1,0);
  UL:=IF(REF(KU1,2)=1 AND REF(KU1,1)=0
  AND KU1=0,REF(HIGH,2),REF(HIGH,2+BARSLAST(REF(KU1,2)=1
  AND REF(KU1,1)=0 AND KU1=0)));
  DL:=IF(REF(KD1,2)=1 AND REF(KD1,1)=0
  AND KD1=0,REF(LOW,2),REF(LOW,2+BARSLAST(REF(KD1,2)=1
  AND REF(KD1,1)=0 AND KD1=0)));
  HV:=H>UL AND H>REF(H,1) ;
  LV:=L<DL AND L<REF(L,1) ;
  GP:=BARSLAST(HV);
  DP:=BARSLAST(LV);
  IP:=IF(GP=0,DP,GP)>3;
  HHV1:=HV AND IP AND H>=HHV(H,BARSLAST(LV));
  LV1:=LV AND IP AND L<=LLV(L,BARSLAST(HV));
  DRAWLINE(LV1,LOW,HHV1, HIGH,0),COLORYELLOW,LINETHICK2;
  DRAWLINE(HHV1,HIGH,LV1, LOW,0),COLORMAGENTA,LINETHICK2;
  {缠论分型分笔}
  STICKLINE(CLOSE> REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORRED;
  STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR000055;
  STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR000077;
  STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR000099;
  STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLOR0000BB;
  STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLOR0000DD;
  STICKLINE(CLOSE> REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLOR0000FF;
  STICKLINE(CLOSE= REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORWHITE;
  STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR555555;
  STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR777777;
  STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR999999;
  STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORBBBBBB;
  STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORDDDDDD;
  STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLORFFFFFF;
  STICKLINE(CLOSE< REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORCYAN;
  STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR990000;
  STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLORCC0000;
  STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLORFF4400;
  STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORFF8800;
  STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORFFCC00;
  STICKLINE(CLOSE< REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLORCYAN;
  {笔底分型 选股 预警 确保向下笔成立后的底分型}
  V00:= HIGH<REF(HIGH,1) AND LOW<REF(LOW,1);
  V01:= HIGH<REF(HIGH,1) AND LOW>REF(LOW,1);
  V02:= HIGH>REF(HIGH,1) AND LOW<REF(LOW,1);
  V03:= HIGH>REF(HIGH,1) AND LOW>REF(LOW,1);
  V04:= REF(HIGH,2) < HIGH AND REF(LOW,2) < LOW
  AND REF(HIGH,2) > REF(HIGH,1) AND REF(LOW,2) < REF(LOW,1);
  V1:= COUNT(V00,6)>=3 AND COUNT(V01 OR V02,5)=0 AND LLVBARS(LOW,6) = 1 AND
  HHVBARS(HIGH,6) >= 5 AND V03;
  V2:= COUNT(V00,7)>=3 AND COUNT(V01 OR V02,6)=1 AND LLVBARS(LOW,7) = 2 AND
  HHVBARS(HIGH,7) >= 6 AND V04;
  V3:= COUNT(V00,7)>=3 AND COUNT(V01 OR V02,6)=1 AND LLVBARS(LOW,7) = 1 AND
  HHVBARS(HIGH,7) >= 6 AND V03;
  V4:= COUNT(V00,8)>=3 AND COUNT(V01 OR V02,7)<=2 AND LLVBARS(LOW,8) = 2 AND
  HHVBARS(HIGH,8) >= 7 AND V04;
  V5:= COUNT(V00,8)>=3 AND COUNT(V01 OR V02,7)<=2 AND LLVBARS(LOW,8) = 1 AND
  HHVBARS(HIGH,8) >= 7 AND V03;
  V6:= COUNT(V00,9)>=3 AND COUNT(V01 OR V02,8)<=3 AND LLVBARS(LOW,9) = 2 AND
  HHVBARS(HIGH,9) >= 8 AND V04;
  V7:= COUNT(V00,9)>=3 AND COUNT(V01 OR V02,8)<=3 AND LLVBARS(LOW,9) = 1 AND
  HHVBARS(HIGH,9) >= 8 AND V03;
  V8:= COUNT(V00,10)>=3 AND COUNT(V01 OR V02,9)<=4 AND LLVBARS(LOW,10) = 2 AND
  HHVBARS(HIGH,10) >= 9 AND V04;
  V9:= COUNT(V00,10)>=3 AND COUNT(V01 OR V02,9)<=4 AND LLVBARS(LOW,10) = 1 AND
  HHVBARS(HIGH,10) >= 9 AND V03;
  V10:= COUNT(V00,11)>=3 AND COUNT(V01 OR V02,10)<=5 AND LLVBARS(LOW,11) = 2 AND
  HHVBARS(HIGH,11) >= 10 AND V04;
  XG:= V1 OR V2 OR V3 OR V4 OR V5 OR V6 OR V7 OR V8 OR V9 OR V10;
  DRAWICON(FILTER(XG=1,5),L*0.97,1);
  {笔顶分型 选股 预警 确保向上笔成立后的顶分型}
  HV00:= HIGH>REF(HIGH,1) AND LOW>REF(LOW,1);
  HV01:= HIGH<REF(HIGH,1) AND LOW>REF(LOW,1);
  HV02:= HIGH>REF(HIGH,1) AND LOW<REF(LOW,1);
  HV03:= HIGH<REF(HIGH,1) AND LOW<REF(LOW,1);
  HV04:= REF(HIGH,2) > HIGH AND REF(LOW,2) > LOW AND REF(HIGH,2) > REF(HIGH,1) AND
  REF(LOW,2) < REF(LOW,1);
  HV1:= COUNT(HV00,6)>=3 AND COUNT(HV01 OR HV02,5)=0 AND HHVBARS(HIGH,6) = 1 AND
  LLVBARS(LOW,6) >= 5 AND HV03;
  HV2:= COUNT(HV00,7)>=3 AND COUNT(HV01 OR HV02,6)=1 AND HHVBARS(HIGH,7) = 2 AND
  LLVBARS(LOW,7) >= 6 AND HV04;
  HV3:= COUNT(HV00,7)>=3 AND COUNT(HV01 OR HV02,6)=1 AND HHVBARS(HIGH,7) = 1 AND
  LLVBARS(LOW,7) >= 6 AND HV03;
  HV4:= COUNT(HV00,8)>=3 AND COUNT(HV01 OR HV02,7)<=2 AND HHVBARS(HIGH,8) = 2 AND
  LLVBARS(LOW,8) >= 7 AND HV04;
  HV5:= COUNT(HV00,8)>=3 AND COUNT(HV01 OR HV02,7)<=2 AND HHVBARS(HIGH,8) = 1 AND
  LLVBARS(LOW,8) >= 7 AND HV03;
  HV6:= COUNT(HV00,9)>=3 AND COUNT(HV01 OR HV02,8)<=3 AND HHVBARS(HIGH,9) = 2 AND
  LLVBARS(LOW,9) >= 8 AND HV04;
  HV7:= COUNT(HV00,9)>=3 AND COUNT(HV01 OR HV02,8)<=3 AND HHVBARS(HIGH,9) = 1 AND
  LLVBARS(LOW,9) >= 8 AND HV03;
  HV8:= COUNT(HV00,10)>=3 AND COUNT(HV01 OR HV02,9)<=4 AND HHVBARS(HIGH,10) = 2
  AND LLVBARS(LOW,10) >= 9 AND HV04;
  HV9:= COUNT(HV00,10)>=3 AND COUNT(HV01 OR HV02,9)<=4 AND HHVBARS(HIGH,10) = 1
  AND LLVBARS(LOW,10) >= 9 AND HV03;
  HV10:= COUNT(HV00,11)>=3 AND COUNT(HV01 OR HV02,10)<=5 AND HHVBARS(HIGH,11) = 2
  AND LLVBARS(LOW,11) >= 10 AND HV04;
  HXG:=HV1 OR HV2 OR HV3 OR HV4 OR HV5 OR HV6 OR HV7 OR HV8 OR HV9 OR HV10;
  DRAWICON(FILTER(HXG=1,3),H*1.01,2);

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约