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