以下是通达信停复牌大旗指标副图 贴图 源码)
通达信停复牌大旗指标副图 贴图 源码)：
复牌:(DAY-IF(WEEKOFYEAR=REF(WEEKOFYEAR,1),1,3) REF(DAY,1)ORWEEKOFYEAR-1 REF(WEEKOFYEAR,1))ANDDYNAINFO(8)
停牌:(DAY-IF(WEEKOFYEAR=REF(WEEKOFYEAR,1),1,3) REF(DAY,1)ORWEEKOFYEAR-1 REF(WEEKOFYEAR,1))ANDDYNAINFO(8)=0;
BAR:=CALCSTOCKINDEX('999999','引用',1);
ZRRS1:=DATETODAY(DATE)-DATETODAY(REF(DATE,1))-1;
JYRS1:=REF(BAR,1)-BAR-1;
TODAY:=ISLASTBARANDV=0;
JYRS:=IF(TODAY,JYRS1+1,JYRS1);
ZRRS:=IF(TODAY,ZRRS1+1,ZRRS1);
FP:=JYRS
FPB:=BARSLAST(FP);
最近停牌日期:=REF(DATE,FPB+1),NODRAW,COLORWHITE;{次日停牌}
最近复牌日期:=IF(TODAY,DRAWNULL,REF(DATE,FPB)),NODRAW,COLORWHITE;
停牌自然日日数:=REF(ZRRS,FPB),NODRAW,COLOR00AAFF;
停牌交易日数:=REF(JYRS,FPB),NODRAW,COLOR00AAFF;
最近停牌:=VARCAT(VAR2STR(REF(DATE+19000000,1),0),'次日起停牌');
最近复牌:=VARCAT(VAR2STR(DATE+19000000,0),'复牌');
停牌日:=VARCAT(VARCAT('停牌',VAR2STR(停牌自然日日数,0)),'天,');
交易日:=VARCAT(VARCAT('含',VAR2STR(停牌交易日数,0)),'个交易日');
复牌天数:IF(V 0,FPB+1,0),NODRAW;
DPSQ:=INDEXC =REF(INDEXC,复牌天数);
DPXQ:=INDEXC REF(INDEXC,复牌天数);
上幅:=IF(FPANDDPSQ,(INDEXC/REF(INDEXC,复牌天数))*100-100,0);
大盘下幅:=IF(FPANDDPXQ,(INDEXC/REF(INDEXC,复牌天数))*100-100,0);
上幅:=VARCAT(VARCAT('大盘向上幅度:',VAR2STR(大盘上幅,2)),'%');
下幅:=VARCAT(VARCAT('大盘向下幅度:',VAR2STR(大盘下幅,2)),'%');
现价涨幅:C/REF(C,复牌天数)*100-100,NODRAW;
大盘涨幅:INDEXC/REF(INDEXC,复牌天数)*100-100,NODRAW;
对比幅:现价涨幅-大盘涨幅,NODRAW,COLORLIGRAY;
STICKLINE(FPANDV 0,-5,12,1,0),COLORRED;
STICKLINE(FPANDV=0,-5,12,1,0),COLORLIBLUE;
DRAWTEXT(FPANDV 0,10,最近停牌),COLORYELLOW;
DRAWTEXT(FPANDV 0,8,最近复牌),COLORYELLOW;
DRAWTEXT(FPANDDPSQ,4,上幅),COLORYELLOW;
DRAWTEXT(FPANDDPXQ,4,下幅),COLORGREEN;
DRAWTEXT(FPANDV 0,6,VARCAT(停牌日,交易日)),COLORYELLOW;
DRAWTEXT(FPANDV=0,10,最近停牌),COLORWHITE;
DRAWTEXT(FPANDV=0,8,'尚未复牌'),COLORWHITE;
DRAWTEXT(FPANDV=0,6,VARCAT(停牌日,交易日)),COLORWHITE;
DRAWGBK(C 0,RGB(0,0,00),RGB(0,0,0),0,'11',0);
ma10:MA(C,10);
MA60:MA(C,60);
VAR6:=((Abs((OPEN-CLOSE))/(HIGH-LOW))*);
VAR7:=(((HIGH-IF((CLOSE OPEN),CLOSE,OPEN))/(HIGH-LOW))*VOL);
VAR8:=(((IF((CLOSE OPEN),OPEN,CLOSE)-LOW)/(HIGH-LOW))*VOL);
VAR9:=IF(((VOL/CAPITAL) 0.001),1,EXP(ABS(LOG(((VOL/CAPITAL)*100)))));
加仓:VAR6 =VAR7ANDVAR6 =VAR8ANDCLOSE OPEN,NODRAW,COLORRED;
减仓:VAR6 =VAR7ANDVAR6 =VAR8ANDCLOSE OPEN,NODRAW,COLORBLUE;
洗盘:VAR8 VAR6ANDVAR8 VAR7,NODRAW,COLORWHITE;
高抛:VAR7 VAR6ANDVAR7 VAR8,NODRAW,COLORMAGENTA;
地量:VAR9 2ANDVOL MA(VOL,5)/2,NODRAW,COLORGREEN;
DRAWKLINE(H,O,L,C);
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);
前期高位:REF(H,BArslAst(HD)),COLORFF00FF,POINTDOT,LINETHICK3;
前期低位:REF(L,BARSLAST(LD)),COLORGREEN,POINTDOT,LINETHICK3;
STICKLINE(加仓,O,C,1,0),COLORRED;
STICKLINE(洗盘,O,C,1,0),COLORWHITE;
STICKLINE(减仓,O,C,1,0),COLORBLUE;
STICKLINE(高抛,O,C,1,0),COLORMAGENTA;
STICKLINE(地量,O,C,1,0),COLORGREEN;
JJ:=(3*C+H+L+O)/6;
VAR1:=(8*JJ+7*REF(JJ,1)+6*REF(JJ,2)+5*REF(JJ,3)+4*REF(JJ,4)+3*REF(JJ,5)+2*REF(JJ,6)+REF(JJ,8))/36;
TJ1:=VOL=HHV(VOL,10)ANDVOL 2*REF(VOL,1)ANDCLOSE VAR1ANDC REF(C,1);
LJL:=FILTER(TJ1,5);
STICKLINE(CLOSE,REF(LOW,BARSLAST(LJL)),REF(LOW,BARSLAST(LJL)),1,0),COLORRED;
STICKLINE(CLOSE,REF(CLOSE,BARSLAST(LJL)),REF(CLOSE,BARSLAST(LJL)),1,0),COLORYELLOW;
STICKLINE(LJL,OPEN,CLOSE,1,0),COLORYELLOW;
DRAWTEXT_FIX(1,0.0,0.0,0,'蓝芯-低位深度洗盘或高位出货坚决'),COLORBLUE,LINETHICK1;
DRAWTEXT_FIX(1,0.00,0.06,0,'白芯-主力轻度洗盘'),COLORWHITE,LINETHICK1;
DRAWTEXT_FIX(1,0.00,0.12,0,'棕芯-出现了近期相对地量'),COLORGREEN,LINETHICK1;
DRAWTEXT_FIX(1,0.00,0.18,0,'粉芯-主力在做高抛低吸或低吸高抛'),COLORFF00FF,LINETHICK1;
DRAWTEXT_FIX(1,0.00,0.24,0,'红芯-主力吸筹进货积极主动'),COLORRED,LINETHICK1;
DRAWTEXT_FIX(1,0.00,0.3,0,'黄芯-主力吸筹进货强并且出现黄金柱'),COLORYELLOW,LINETHICK1;
DRAWTEXT_FIX(C 0,0.004,1,0,DYBLOCK),COLORYELLOW,LINETHICK2;
DRAWTEXT_FIX(C 0,0.06,1,0,HYBLOCK),COLORRED,LINETHICK2;
DRAWTEXT_FIX(C 0,0.12,1,0,EXTERNSTR(0,1)),COLORWHITE,LINETHICK2;
EN1:=zig(3,5) REF(ZIG(3,5),1)ANDREF(ZIG(3,5),1) =REF(ZIG(3,5),2)ANDREF(ZIG(3,5),2) =REF(ZIG(3,5),3);
PL10:=ZIG(3,10);
走强2:=BARSLAST(PL10 REF(PL10,1));
ZTJZ5:=IF(PL10 REF(PL10,1),COUNT(EN1,走强2),0);
追2:=EN1ANDPL10 REF(PL10,1)ANDZTJZ5=2;
追4:=EN1ANDPL10 REF(PL10,1)ANDZTJZ5=3;
DRAWTEXT(追2OR追4,LOW*0.978,'追'),COLORYELLOW;
PL5:=ZIG(3,5);
EX1:=ZIG(3,5) REF(ZIG(3,5),1)ANDREF(ZIG(3,5),1) =REF(ZIG(3,5),2)ANDREF(ZIG(3,5),2) =REF(ZIG(3,5),3);
EN2:=ZIG(3,10) REF(ZIG(3,10),1)ANDREF(ZIG(3,10),1) =REF(ZIG(3,10),2)ANDREF(ZIG(3,10),2) =REF(ZIG(3,10),3);
EX2:=ZIG(3,10) REF(ZIG(3,10),1)ANDREF(ZIG(3,10),1) =REF(ZIG(3,10),2)ANDREF(ZIG(3,10),2) =REF(ZIG(3,10),3);
PL20:=ZIG(3,20);
EN3:=ZIG(3,20) REF(ZIG(3,20),1)ANDREF(ZIG(3,20),1) =REF(ZIG(3,20),2)ANDREF(ZIG(3,20),2) =REF(ZIG(3,20),3);
EX3:=ZIG(3,20) REF(ZIG(3,20),1)ANDREF(ZIG(3,20),1) =REF(ZIG(3,20),2)ANDREF(ZIG(3,20),2) =REF(ZIG(3,20),3);
PL40:=ZIG(3,40);
走强1:=BARSLAST(PL5 REF(PL5,1));
走弱1:=BARSLAST(PL5 REF(PL5,1));
走弱2:=BARSLAST(PL10 REF(PL10,1));
走强3:=BARSLAST(PL20 REF(PL20,1));
走弱3:=BARSLAST(PL20 REF(PL20,1));
{ZTJZ5:=IF(PL10 REF(PL10,1),COUNT(EN1,走强2),0);}
ZTJD5:=IF(PL10 REF(PL10,1),COUNT(EX1,走强2),0);
DTJZ5:=IF(PL10 REF(PL10,1),COUNT(EN1,走弱2),0);
DTJD5:=IF(PL10 REF(PL10,1),COUNT(EX1,走弱2),0);
ZTJZ10:=IF(PL20 REF(PL20,1),COUNT(EN2,走强3),0);
ZTJD10:=IF(PL20 REF(PL20,1),COUNT(EX2,走强3),0);
DTJZ10:=IF(PL20 REF(PL20,1),COUNT(EN2,走弱3),0);
DTJD10:=IF(PL20 REF(PL20,1),COUNT(EX2,走弱3),0);
DRAWTEXT(EN1ANDDTJZ5=1,L*0.98,'反弹低点'),COLORLIRED;
DRAWTEXT(EX1ANDDTJD5=2,H*1.02,'反弹高点！'),COLORLIBLUE;
DRAWTEXT(EN2ANDZTJZ5=1,L*0.98,'底'),COLORYELLOW;
DRAWTEXT(EX1ANDPL10 REF(PL10,1)ANDZTJD5=1,H*1.02,'减仓'),COLORFFFF00;
DRAWTEXT(EN1ANDPL10 REF(PL10,1)ANDZTJZ5=2,L*0.98,'----买'),COLOR0000FF;
DRAWTEXT(EX1ANDPL10 REF(PL10,1)ANDZTJZ5=2,H*1.02,'短卖'),COLORGREEN;
DRAWTEXT(EN1ANDPL10 REF(PL10,1)ANDZTJZ5=3,L*0.98,'----短买'),COLOR0000FF;
DRAWTEXT(EX2ANDPL20 REF(PL20,1)ANDZTJD10=1,H*1.02,'短卖'),COLORGREEN;
DRAWTEXT(EN2ANDDTJZ10=1,L*0.96,'Ⅰ'),COLORFF00FF;
DRAWTEXT(EX2ANDDTJD10=2,H*1.03,'Ⅱ'),COLORFF6000;
DRAWTEXT(EN3ANDZTJZ10=1,L*0.95,'Ⅲ'),COLORYELLOW;
DRAWTEXT(EX2ANDPL20 REF(PL20,1)ANDZTJD10=1,H*1.06,'①'),LINETHICK3,COLORFFFF00;
DRAWTEXT(EN2ANDPL20 REF(PL20,1)ANDZTJZ10=2,L*0.96,'②'),LINETHICK3,COLORYELLOW;
DRAWTEXT(EX2ANDPL20 REF(PL20,1)ANDZTJD10=2OR(ZTJD10=0ORZTJD10=2)ANDEX2,H*1.02,'清仓!'),LINETHICK3,COLORWHITE;
DRAWTEXT(EN2ANDPL20 REF(PL20,1)ANDZTJZ10=3,L*0.96,'④'),LINETHICK3,COLORYELLOW;
DRAWTEXT(EN1ANDPL10 REF(PL10,1)ANDZTJZ5=3,L*0.95,'⑷'),COLORYELLOW;
EMA13:=EMA(C,13);
EMA34:=EMA(C,34);
EMA55:=EMA(C,55);
EMA120:=EMA(C,120);
cr1:=(C-REF(C,1))/REF(C,1)*100
CR2:=V MA(V,5)*0.6;
CR3:=COUNT(CROSS(EMA13,EMA55),3)=1;
CR4:=ABS(EMA34-EMA55)/EMA55 0.03;
CR5:=EMA55 =EMA120ANDEMA55 =REF(EMA55,1);
CR6:=FILTER(CR1ANDCR2ANDCR3ANDCR4ANDCR5,2);
DRAWTEXT(CR6,C*0.98,'风险'),COLORWHITE;
通达信停复牌大旗指标副图 贴图 源码)截图
