通达信主控板眼黑底未加密选股指标公式源码

通达信主控板眼黑底未加密选股指标公式源码

源码正文：

获利分界线1:=50{XG51};
创多日高收:=120{XG51};
指涨跌小于:=-1{XG51};
100,COLORWHITE{XG51};
90,COLOR400080,DOTLINE{XG51};
80,COLOR400080,DOTLINE{XG51};
70,COLOR0000FF,LINETHICK3{XG51};
0,COLORCYAN{XG51};

获利分界线1,COLORCYAN,DOTLINE{XG51};
归零比例:WINNER(CLOSE)*100,COLORRED{XG51};
{XG51};
成本90:(COST(95)-COST(5))/(COST(99.99999))*100,COLORWHITE,NODRAW{XG51};
成本70:(COST(85)-COST(15))/(COST(99.99999))*100,COLORWHITE,NODRAW{XG51};
指数涨跌:=(INDEXC-REF(INDEXC,1))/REF(INDEXC,1)*100{XG51};
组合:C=HHV(C,创多日高收) AND BARSSINCE(C)>创多日高收 AND 指数涨跌<=指涨跌小于,COLORRED,NODRAW{XG51};
STICKLINE(组合,0,90,2,0),COLORYELLOW{XG51};
价A:=ZTPRICE(REF(C,1),0.1){XG51};
价B:=ZTPRICE(REF(C,1),0.2){XG51};
价C:=DTPRICE(REF(C,1),0.1){XG51};
价D:=DTPRICE(REF(C,1),0.2){XG51};
ZTJ:=IF(STR2CON(CODE)>=687999,价B,IF(CODELIKE('30')=0,价A,IF((YEAR*10000+MONTH*100+DAY)>=20200824,价B,价A))){XG51};
DTJ:=IF(STR2CON(CODE)>=687999,价D,IF(CODELIKE('30')=0,价C,IF((YEAR*10000+MONTH*100+DAY)>=20200824,价D,价C))){XG51};
ZT:=C>=ZTJ AND C=H AND COUNT(C<ZTJ,BARSSINCE(C))>=1{XG51};
主均线:=ma(C,60){XG51};
打拐:(ZT) AND 主均线>REF(主均线,1) AND REF(主均线<=REF(主均线,1),1),COLORWHITE,NODRAW{XG51};
STICKLINE(打拐,0,90,2.6,0),COLORWHITE{XG51};
年:=YEAR;月:=MONTH;日:=DAY{XG51};
同年同月:=年=REFX(年,1) AND 月=REFX(月,1){XG51};
同年增月:=年=REFX(年,1) AND 月<REFX(月,1){XG51};
跨年缩月:=年 < REFX(年,1) AND 月 > REFX(月,1){XG51};
星期变小:=WEEkdAY>=REFX(WEEKDAY,1){XG51};
停牌过七:=同年同月 AND REFX(日,1)>(日+7){XG51};
月转变大:=同年增月 AND (日-REFX(日,1))<=7{XG51};
跨年变小:=跨年缩月 AND (日-REFX(日,1))<=7{XG51};
周末:=星期变小 OR 停牌过七 OR 月转变大 OR 跨年变小{XG51};
月末:=同年增月 OR (年 < REFX(年,1) AND 月 > REFX(月,1)){XG51};
TTZ:=REF(BArslAST(周末),1)+1{XG51};
TTY:=REF(BARSLAST(月末),1)+1{XG51};
月价:=IF(月末,C,0){XG51};
TIMEY3:=REF(SUMBARS(月末,3),1)+1{XG51};
月4和:=SUM(月价,TIMEY3){XG51};
月5均:=(C+REF(月4和,TTY))/5{XG51};
前月5:=REF(月5均,TTY),NODRAW{XG51};
板月拐:ZT AND 月5均>前月5 AND REF(月5均<前月5,TTY),COLORBLUE,NODRAW{XG51};
STICKLINE(板月拐,0,70,1,0),COLORMAGENTA{XG51};
DRAWTEXT(板月拐,52,'月'),COLORBLUE{XG51};
周价:=IF(周末,C,0){XG51};
TIMEZ3:=REF(SUMBARS(周末,3),1)+1{XG51};
周4和:=SUM(周价,TIMEZ3){XG51};
周5均:=(C+REF(周4和,TTZ))/5{XG51};
TIMEZ8:=REF(SUMBARS(周末,8),1)+1{XG51};
周9和:=SUM(周价,TIMEZ8){XG51};
周10均:=(C+REF(周9和,TTZ))/10{XG51};
板周金:ZT AND crOSS(周5均,周10均),COLORFF00FF,NODRAW{XG51};
STICKLINE(板周金,0,70,1,0),COLORFF00FF{XG51};
DRAWTEXT(板周金,63,'周'),COLORFF00FF{X!G.5_1!C!N!{};

通达信OBV解析未加密选股指标公式源码

源码正文：

M:=30{XG51};
N:=10{XG51};
VA:=IF(CLOSE>REF(CLOSE,1),vol,-VOL){XG51};
obv1:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0){XG51};
ma130:=MA(OBV,M){XG51};
DRAWBAND(MA130,RGB(0,0,80),OBV1,RGB(160,0,000)){XG51};
A1:=REF(OBV1,N)=HHV(OBV1,2*N+1){XG51};
B1:=FILTER(A1,N){XG51};
C1:=BacKSET(B1,N+1){XG51};
D1:=FILTER(C1,N){XG51};
T线:REF(OBV,BArslAst(D1)),COLORFF00FF,NODRAW{XG51};
STICKLINE(C>0,T线,T线,6,0),COLORFF6600{XG51};
DRAWICON(crOSS(OBV,T线),T线*0.99,1){XG51};
OBV:SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0){XG51};
MA30:MA(OBV,M){X=G*5^1=C=N={};