【通达信免费源码】阳胜进阴胜出+小倍阳（源码主副图和选股贴图）

真阴线:=C<=REF(C,1) AND C<=O;
假阳线:=C<=REF(C,1) AND C>=O;
阴线:=真阴线>0 OR 假阳线>0;
阴线天数:=BARSLAST(阴线);
阴线实体最高价:=MAX(REF(C,阴线天数),REF(O,阴线天数));
阴线成交量:=REF(V,阴线天数);
阳胜条件:=阴线天数>0 AND C>=阴线实体最高价 AND V>=阴线成交量;
阳胜:=IF(阳胜条件>0 AND REF(阳胜条件,1)=0,10,0);
真阳线:=C>=REF(C,1) AND C>=O;
假阴线:=C>=REF(C,1) AND C<=O;
阳线:=真阳线>0 OR 假阴线>0;
阳线天数:=BARSLAST(阳线);
阳线实体最低价:=MIN(REF(C,阳线天数),REF(O,阳线天数));
阳线成交量:=REF(V,阳线天数);
阴胜条件:=阳线天数>0 AND C<=阳线实体最低价 AND V>=阳线成交量*0.9;
阴胜:=IF(阴胜条件>0 AND REF(阴胜条件,1)=0,10,0),COLORWHITE;

阳胜进:=IF(阳胜>0,20,0),COLORRED;
阴胜出:=IF(阴胜>0,20,0);
DRAWTEXT(阳胜进>0,LOW*0.98,'阳'),COLOR00FFFF,LINETHICK3;
DRAWTEXT(阴胜出>0,HIGH*1.02,'阴'),COLORGREEN,LINETHICK3;
MA(CLOSE,5);
MA(CLOSE,10);
MA(CLOSE,24);
MA(CLOSE,72);

{阳胜进阴胜出副图公式}
真阴线:=C<=REF(C,1) AND C<=O;
假阳线:=C<=REF(C,1) AND C>=O;
阴线:=真阴线>0 OR 假阳线>0;
阴线天数:=BARSLAST(阴线);
阴线实体最高价:=MAX(REF(C,阴线天数),REF(O,阴线天数));
阴线成交量:=REF(V,阴线天数);
阳胜条件:=阴线天数>0 AND C>=阴线实体最高价 AND V>=阴线成交量;
阳胜:=IF(阳胜条件>0 AND REF(阳胜条件,1)=0,10,0);
真阳线:=C>=REF(C,1) AND C>=O;
假阴线:=C>=REF(C,1) AND C<=O;
阳线:=真阳线>0 OR 假阴线>0;
阳线天数:=BARSLAST(阳线);
阳线实体最低价:=MIN(REF(C,阳线天数),REF(O,阳线天数));
阳线成交量:=REF(V,阳线天数);
阴胜条件:=阳线天数>0 AND C<=阳线实体最低价 AND V>=阳线成交量*0.9;
阴胜:=IF(阴胜条件>0 AND REF(阴胜条件,1)=0,10,0),COLORWHITE;
阳胜进:=IF(阳胜>0,1.5,0),COLORRED;
阴胜出:=IF(阴胜>0,1,0);
XG1:阳胜进,LINESTICK COLORRED;
XG2:阴胜出,STICK LINETHICK2 COLORBLUE;

{小倍阳副图公式}
AA1:=REF(CLOSE,2)<REF(OPEN,2);
AA21:=REF(CLOSE,1)<REF(OPEN,1);
AA22:=REF(CLOSE,1)>REF(OPEN,1);
AA2:=AA21 OR AA22;
AA3:=REF(VOL,1)<REF(VOL,2);
AA4:=VOL>REF(VOL,2);
AA:=AA1 AND AA2 AND AA3 AND AA4;
BB1:=VOL/REF(VOL,1)>1.8;
BB2:=VOL/REF(VOL,1)<2.5;
BB:=BB1 AND BB2;
CC:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>0.02;
小倍阳:=AA AND BB AND CC;
STICKLINE(小倍阳,VOL*0.01,VOL*1,1,0),COLORMAGENTA;
DRAWTEXT(小倍阳,VOL*0.9,'↙小倍阳'),COLORYELLOW;

{小倍阳选股公式}
AA1:=REF(CLOSE,2)<REF(OPEN,2);
AA21:=REF(CLOSE,1)<REF(OPEN,1);
AA22:=REF(CLOSE,1)>REF(OPEN,1);
AA2:=AA21 OR AA22;
AA3:=REF(VOL,1)<REF(VOL,2);
AA4:=VOL>REF(VOL,2);
AA:=AA1 AND AA2 AND AA3 AND AA4;
BB1:=VOL/REF(VOL,1)>1.8;
BB2:=VOL/REF(VOL,1)<2.5;
BB:=BB1 AND BB2;
CC:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>0.02;
小倍阳:AA AND BB AND CC;