【通达信分享源码】精品指标公式－五行-主图HD

{公式名称: 五行-主图HD

参数数量: 3

参数1: NA, 最小: 1, 最大: 500, 缺省: 5

参数2: NB, 最小: 1, 最大: 500, 缺省: 30

参数3: NC, 最小: 1, 最大: 500, 缺省: 100

公式类型: 技术指标公式-其他类型

画线方法: 主图叠加

公式源码:}

公式规属:DRAWTEXT_FIX(ISLASTBAR,0.99,2,3,1),COLORYELLOW;

VAR1:=IF(DATE<1200504,1,0);

VAR2:=CLOSE/REF(CLOSE,1)>1.097 AND OPEN=CLOSE AND CLOSE=HIGH;

VAR3:=REF(CLOSE,1);

VAR4:=IF((CLOSE-VAR3)*100/VAR3>=10-0.01*100/VAR3,1,0);

前板:BARSLAST(VAR4),NODRAW,COLORYELLOW;

百板:COUNT(VAR4,100),NODRAW,COLORYELLOW;

实二:IF(CLOSE<REF(CLOSE,1),(OPEN+CLOSE)/2,(OPEN+CLOSE)/2),NODRAW,COLORWHITE;

虚二:IF(CLOSE<REF(CLOSE,1),(HIGH+LOW)/2,(HIGH+LOW)/2),NODRAW,COLORWHITE;

三一:IF(CLOSE<REF(CLOSE,1),OPEN-(OPEN-CLOSE)/3,CLOSE+(OPEN-CLOSE)/3),NODRAW,COLORYELLOW;

三二:IF(CLOSE<REF(CLOSE,1),OPEN-(OPEN-CLOSE)*2/3,CLOSE+(OPEN-CLOSE)*2/3),NODRAW,COLORYELLOW;

高:HIGH,NODRAW,COLORWHITE;

低:LOW,NODRAW,COLORWHITE;

开:OPEN,NODRAW,COLORWHITE;

收:CLOSE,NODRAW,COLORWHITE;

振:(HIGH-LOW)/LOW*100,NODRAW,COLORWHITE;

引:(MIN(CLOSE,OPEN)-LOW)/LOW*100,NODRAW,COLORWHITE;

VAR5:=IF(HIGH/LOW>1.04 AND CLOSE/OPEN>1.04,CLOSE,MIN(HIGH,CLOSE));

VAR6:=IF(HIGH/LOW>1.04 AND CLOSE/REF(CLOSE,1)>1.04,实二,MAX(LOW,OPEN));

VAR7:=IF(HIGH/LOW>1.04 AND OPEN/CLOSE>1.04,实二,MIN(HIGH,OPEN));

VAR8:=IF(HIGH/LOW>1.04 AND OPEN/CLOSE>1.04,OPEN,MIN(LOW,OPEN));

VAR9:=IF(CLOSE>OPEN,VAR5,VAR7);

VAR10:=IF(CLOSE>OPEN,VAR6,VAR8);

VAR11:=CLOSE=LOW AND REF(CLOSE,1)/CLOSE>=1.095;

VAR12:=SUM(AMOUNT,1)/SUM(VOL,1)/100;

VAR13:=IF(CLOSE/REF(CLOSE,1)*100-100>=4.3,1,0) AND IF(CLOSE/REF(CLOSE,1)*100-100<=9.96,1,0) AND IF(CLOSE-OPEN>OPEN-LOW,1,0) AND IF(VAR12/REF(CLOSE,1)>1.02,1,0) AND (HIGH-CLOSE)/CLOSE<0.03 AND (OPEN-LOW)/LOW<0.02 AND CLOSE>OPEN AND VOL>REF(VOL,1);

STICKLINE(VAR13,OPEN,CLOSE,(-1),0),COLOR6B238E;

VAR14:=IF(CLOSE/REF(CLOSE,1)*100-100<=(-4),1,0) AND IF(CLOSE/REF(CLOSE,1)*100-100>=(-9.96),1,0) AND IF(VAR12/REF(CLOSE,1)<(-1.02),1,0);

STICKLINE(VAR14,OPEN,CLOSE,(-1),0),COLORRED;

STICKLINE(VAR4,OPEN,CLOSE,(-1),0),COLORMAGENTA;

STICKLINE(VAR11,OPEN,CLOSE,(-1),0),COLORWHITE;

STICKLINE(VAR4,HIGH,LOW,0,0),COLORMAGENTA;

VAR15:=(OPEN-CLOSE)/OPEN>0.02 AND CLOSE<REF(CLOSE,1);

STICKLINE(VAR15,(CLOSE+OPEN)/2,(CLOSE+OPEN)/2,2,1),COLORRED;

VAR16:=(CLOSE-OPEN)/OPEN>0.03 AND CLOSE>REF(CLOSE,1);

STICKLINE(VAR16,(CLOSE+OPEN)/2,(CLOSE+OPEN)/2,2,1),COLORYELLOW;

VAR17:=振>REF(振,1) AND VOL<REF(VOL,1) AND REF(CLOSE<REF(CLOSE,1),1);

VAR18:=CLOSE=HIGH AND CLOSE/REF(CLOSE,1)>1.095 AND CLOSE=OPEN AND LOW<CLOSE;

DRAWICON(VAR18,HIGH+0.2,13),COLORRED;

VAR19:=HIGH/REF(CLOSE,1)>1.095 AND CLOSE<HIGH;

DRAWICON(VAR19,HIGH+0.2,14),COLORRED;

VAR20:=TOPRANGE(VOL);

VAR21:=HIGH/REF(LOW,60)<1.6 AND HIGH/REF(LOW,20)<1.5 AND CLOSE/REF(LOW,4)<1.45 AND HIGH/REF(LOW,10)<1.5 AND COUNT(VAR4,5)<=3 AND COUNT(VAR4,50)<=5;

VAR22:=OPEN/REF(CLOSE,1)>1.07 AND CLOSE<OPEN AND VAR20>60 AND COUNT(VAR4,4)<3 AND VAR21;

VAR23:=REF(VAR4,1) AND OPEN/REF(CLOSE,1)>1.01 AND CLOSE<OPEN AND VAR20>60 AND COUNT(VAR4,4)<3 AND VAR21;

VAR24:=REF(VAR4,1) AND HIGH/REF(CLOSE,1)>1.07 AND CLOSE>OPEN AND VAR20>100 AND VAR21;

VAR25:=OPEN/REF(CLOSE,1)>1.01 AND CLOSE<OPEN AND VOL<REF(VOL,1) AND REF(VAR4,1) AND VAR21;

VAR26:=COUNT(VAR2,4)=1 AND VAR20>80 AND VAR21;

VAR27:=COUNT(VAR4,4)=1 AND VAR20>100 AND VAR21;

VAR28:=COUNT(VAR4,30)<3 AND VAR4 AND VAR20<100 AND CLOSE>OPEN;

VAR29:=COUNT(VAR2,3)<=3 AND COUNT(VAR2,3)>1 AND VAR4 AND VAR20>200 AND COUNT(VAR4,5)<4;

DRAWICON(VAR22 OR VAR23 OR VAR24 OR VAR25 OR VAR26 OR VAR27 OR VAR28 OR VAR29 AND VAR1,HIGH+0.05,9),COLORRED;

GHA:IF(CURRBARSCOUNT<=CONST(REF(HHVBARS(VOL,NA),1)+1)+1,CONST(REF(VAR9,REF(HHVBARS(VOL,NA),1)+1)),DRAWNULL),COLORRED;

GLA:IF(CURRBARSCOUNT<=CONST(REF(HHVBARS(VOL,NA),1)+1)+1,CONST(REF(VAR10,REF(HHVBARS(VOL,NA),1)+1)),DRAWNULL),COLORGREEN;

GHB:IF(CURRBARSCOUNT<=CONST(REF(HHVBARS(VOL,NB),1)+1)+1,CONST(REF(VAR9,REF(HHVBARS(VOL,NB),1)+1)),DRAWNULL),COLORRED,LINETHICK2;

GLB:IF(CURRBARSCOUNT<=CONST(REF(HHVBARS(VOL,NB),1)+1)+1,CONST(REF(VAR10,REF(HHVBARS(VOL,NB),1)+1)),DRAWNULL),COLORGREEN,LINETHICK2;

GHC:IF(CURRBARSCOUNT<=CONST(REF(HHVBARS(VOL,NC),1)+1)+1,CONST(REF(VAR9,REF(HHVBARS(VOL,NC),1)+1)),DRAWNULL),DOTLINE,COLORRED;

GLC:IF(CURRBARSCOUNT<=CONST(REF(HHVBARS(VOL,NC),1)+1)+1,CONST(REF(VAR10,REF(HHVBARS(VOL,NC),1)+1)),DRAWNULL),DOTLINE,COLORGREEN;