通达信建仓副图指标 源码

以下是通达信建仓副图指标 源码

连天数:=3;
连天数1:=2;
第一15F:0.6 DOTLINE COLORRED;
第二30F:0.85 DOTLINE COLORRED;
第三60F:1.15 DOTLINE COLORRED;
 DIF:=EMA(CLOSE,12)-EMA(CLOSE,26) COLORRED;
 DEA:=EMA(DIF,9) COLORGREEN;
 MACD:=(DIF-DEA)*2,COLORSTICK;

建仓:(DIF<0 AND DEA<0 AND MACD<0 AND MACD>=REF(MACD,1))OR(MACD>0 AND MACD>=REF(MACD,1))OR(DIF>0 AND DEA>0 AND DIF>REF(DIF,1) AND DEA>REF(DEA,1) AND MACD<0 AND MACD>=REF(MACD,1)) NODRAW;

F15A:=MAX(MA(C,5),MA(C,10));
 F15B:=MIN(MA(C,5),MA(C,10));
行F15:=C>F15A;
停F15:=C<F15B;
望F15:=C>=F15B AND C<=F15A;

 F30A:=MAX(MA(C,10),MA(C,20));
 F30B:=MIN(MA(C,10),MA(C,20));
行F30:=C>F30A;
停F30:=C<F30B;
望F30:=C>=F30B AND C<=F30A;

 F60A:=MAX(MA(C,20),MA(C,28));
 F60B:=MIN(MA(C,20),MA(C,28));
行F60:=C>F60A;
停F60:=C<F60B;
望F60:=C>=F60B AND C<=F60A;
选股:建仓 AND 行F15 AND 行F30 AND 行F60 NODRAW;
 TYP:=(HIGH+LOW+CLOSE)/3;
 CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
 STICKLINE(C<F15B,1.15,1.2,4,0),COLORLIRED,LINETHICK2;
 STICKLINE(C<F15B,1.15,1.2,4,0),COLORYELLOW,LINETHICK2;

 STICKLINE(C<F30A,0.85,0.9,4,0),COLORLIRED,LINETHICK2;
 STICKLINE(C<F30B,0.85,0.9,4,0),COLORYELLOW,LINETHICK2;

 STICKLINE(C<F60A,0.6,0.65,4,0),COLORLIRED,LINETHICK2;
 STICKLINE(C<F60B,0.6,0.65,4,0),COLORYELLOW,LINETHICK2;

 STICKLINE(C>0,0.2,0.4,4,0),COLORGREEN,LINETHICK2;

STICKLINE(建仓=1,0.2,0.4,4,0),COLORLIRED,LINETHICK2;
火箭:SUM(建仓,3)>0 AND SUM(C<F30A,3)>0 AND SUM(C<F60A,3)>0 AND C>REF(C,1) AND C>MA(C,5) AND EVERY(MA(C,5)>REF(MA(C,5),1),3) STICK;

ZTTJ:=STRCAT(‘红色多单，绿色空单，黄色级别空单，第一行15分钟,第二行30分钟，第三行60分钟，第四行日线:’,0);
 DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0,0,ZTTJ),COLORYELLOW;
涨停价:=ZTPRICE(REF(C,1),0.1);
涨停1:=C>=涨停价;
最高连板:HHV(BARSLAST(NOT(涨停1)),375) NODRAW;
概念:DRAWTEXT_FIX(ISLASTBAR,1,1,1,GNBLOCK);
线5:=MA(C,5);
线10:=MA(C,10);
线20:=MA(C,20);
连5:=EVERY(线5>REF(线5,1),连天数)>0;
连10:=EVERY(线10>REF(线10,1),连天数)>0;
连20:=EVERY(线20>REF(线20,1),连天数)>0;
图形:=线5>线10 AND 线10>线20;
连图形:=EVERY(图形,连天数)>0;

连5A:=EVERY(线5>REF(线5,1),连天数1)>0;
连10A:=EVERY(线10>REF(线10,1),连天数1)>0;
连20A:=EVERY(线20>REF(线20,1),连天数1)>0;
连图形A:=EVERY(图形,连天数1)>0;

条件1:连5A AND 连10A AND 连20A AND 连图形A AND C>线5 COLORRED STICK;
条件:连5 AND 连10 AND 连20 AND 连图形 AND C>线5;
 DRAWRECTREL(470,0,1500,390,RGB(10,0,0));{活动框};
最高价:=HIGH;
最低价:=LOW;
比:=(H-L)/L*100;
低:=(C-L)/L*100;
图比:=低/比*100;
 DRAWRECTREL(470,0,500,390,RGB(0,255,0));
 DRAWRECTREL(470,CONST(IF(C<F15B,0,0)),500,390,RGB(255,0,0));

DRAWTEXT_FIX(1,1,0.01,1,STRCAT(STRCAT(’15分钟：’,CON2STR(IF(C<F15B,0,1),0)),’成仓位’)),COLORWHITE;
 DRAWTEXT_FIX(1,1,0.11,1,STRCAT(STRCAT(’30分钟：’,CON2STR(IF(C<F30B,0,2),0)),’成仓位’)),COLORWHITE;
 DRAWTEXT_FIX(1,1,0.22,1,STRCAT(STRCAT(’60分钟：’,CON2STR(IF(C<F60B,0,4),0)),’成仓位’)),COLORWHITE;
 DRAWTEXT_FIX(1,1,0.34,1,STRCAT(STRCAT(‘240分钟：’,CON2STR(IF(建仓=1,6,0),0)),’成仓位’)),COLORWHITE;
 DRAWTEXT(建仓=1 AND(条件1 OR 条件 OR 火箭),1.1,’建’),COLORYELLOW;
 DRAWTEXT(建仓=1 AND(条件1 OR 条件 OR 火箭),1,’仓’),COLORYELLOW;