数浪强弱主图指标 (源码)

PL5:=ZIG(3,5);
EN1:=pl5 REF(pl5,1) AND REF(pl5,1) =REF(pl5,2) AND REF(pl5,2) =REF(pl5,3);
EX1:=pl5 REF(pl5,1) AND REF(pl5,1) =REF(pl5,2) AND REF(pl5,2) =REF(pl5,3);
PL10:=ZIG(3,10);
EN2:=pl10 REF(pl10,1) AND REF(pl10,1) =REF(pl10,2) AND REF(pl10,2) =REF(pl10,3);
EX2:=pl10 REF(pl10,1) AND REF(pl10,1) =REF(pl10,2) AND REF(pl10,2) =REF(pl10,3);
PL20:=ZIG(3,20);
EN3:=pl20 REF(pl20,1) AND REF(pl20,1) =REF(pl20,2) AND REF(pl20,2) =REF(pl20,3);
EX3:=pl20 REF(pl20,1) AND REF(pl20,1) =REF(pl20,2) AND REF(pl20,2) =REF(pl20,3);
走强1:=BARSLAST(PL5 REF(PL5,1));
走弱1:=BARSLAST(PL5 REF(PL5,1));
走强2:=BARSLAST(PL10 REF(PL10,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);
{www.9m8.cn 九毛八公式指标网 股票软件下载网_大智慧指标公式}
DRAWTEXT(EN1 AND DTJZ5=1,L*0.98,'㈠'),COLORFFFF00;
DRAWTEXT(EX1 AND DTJD5=2,H*1.02,'㈡'),COLORFFFF00;
DRAWTEXT(EN2 AND ZTJZ5=1,L*0.98,'㈢'),COLORFFFF00;
DRAWTEXT(EX1 AND PL10 REF(PL10,1) AND ZTJD5=1,H*1.02,'⑴'),COLOR0000FF;
DRAWTEXT(EN1 AND PL10 REF(PL10,1) AND ZTJZ5=2,L*0.98,'⑵'),COLOR0000FF;
DRAWTEXT(EX1 AND PL10 REF(PL10,1) AND ZTJZ5=2,H*1.02,'⑶'),COLOR0000FF;
DRAWTEXT(EN1 AND PL10 REF(PL10,1) AND ZTJZ5=3,L*0.98,'⑷'),COLOR0000FF;
DRAWTEXT(EX2 AND PL20 REF(PL20,1) AND ZTJD10=1,H*1.02,'⑸'),COLOR0000FF;
DRAWTEXT(EN2 AND DTJZ10=1,L*0.9,'Ⅰ'),colorred;
DRAWTEXT(EX2 AND DTJD10=2,H*0.9,'Ⅱ'),colorred;
DRAWTEXT(EN3 AND ZTJZ10=1,L*0.9,'Ⅲ'),colorred;
DRAWTEXT(EX2 AND PL20 REF(PL20,1) AND ZTJD10=1,H*1.06,'①'),LINETHICK2,COLOR00FFFF;
DRAWTEXT(EN2 AND PL20 REF(PL20,1) AND ZTJZ10=2,L*0.94,'②'),LINETHICK2,COLOR00FFFF;
DRAWTEXT(EX2 AND PL20 REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,H*1.06,'③'),LINETHICK2,COLOR00FFFF;
DRAWTEXT(EN2 AND PL20 REF(PL20,1) AND ZTJZ10=3,L*0.94,'④'),LINETHICK2,COLOR00FFFF;