通达信【逆时钟八角图】改编为【操盘提示】主图,源码
《逆时钟八角图》,感觉很醒目,于是乎将其改编为在主图中以文字形式进行提示,如有对回到未来58老师不恭之处,敬请谅解!如有侵权,请版主删除。改编后,由于信号太多,其中加了过滤,随机选了几只个股,感觉准确度尚可(请看一附图)。只是,本人才疏学浅,源码中的 买入 、 加仓 信号怎么也出不来,望专家老师们加以修正指点,在此先谢了!
{改造为【操盘提示】}
MA5:MA(CLOSE,5);
MA10:MA(CLOSE,10);
MA20:MA(CLOSE,20);
MA60:MA(CLOSE,60);
价涨幅1:=(C-REF(C,1))/REF(C,1);
量涨幅1:=(V-REF(V,1))/REF(V,1);
价涨幅:=SUM(价涨幅1,0);
量涨幅:=SUM(量涨幅1,0);
条件1:=CROSS(价涨幅,0) OR CROSS(价涨幅,量涨幅);
条件2:=V MA(V,20);
条件3:=C/REF(C,1)*100-100 -5 AND C/REF(C,1)*100-100
条件4:=CURRBARSCOUNT=1;
条件5:=V/MA(V,20)
上升观望:=C REF(C,1) AND V REF(V,1);
DRAWTEXT(FILTER(上升观望=1,5),L*0.98,'上升'),COLORRED;
买入信号:=条件1+条件2+条件3;
DRAWTEXT(买入信号=3,L*0.98,'买入'),COLOR8000FF;
加仓信号:=买入信号+条件5;
DRAWTEXT(加仓信号=4,L*0.98,'加仓'),COLORYELLOW;
阳转:=C MA(C,60) AND C REF(C,1) AND V MA(V,5);
DRAWTEXT(FILTER(阳转=1,5),L*0.99,'阳转'),COLOR0088FF;
警戒:=C REF(C,1) AND V MA(V,5);
DRAWTEXT(FILTER(警戒=1,5),L*0.99,'警戒'),COLORFF00FF;
卖出信号:=C REF(C,1) AND V REF(V,1);
DRAWTEXT(FILTER(卖出信号=1,5),H*1.02,'卖出'),COLORFF8840;
清仓信号:=C REF(C,1) AND V REF(V,1) AND C MA(C,5);
DRAWTEXT(FILTER(清仓信号=1,3),H*1.02,'清仓'),COLOR00FF00;
D1:=YEAR AND MONTH AND DAY;
AA1:=STRCAT(CON2STR(YEAR,0),'年');
AA2:=STRCAT(CON2STR(MONTH,0),'月');
AA3:=STRCAT(CON2STR(DAY,0),'日');
AA4:=STRCAT('【',IF(WEEKDAY=1,'一',IF(WEEKDAY=2,'二',IF(WEEKDAY=3,'三',IF(WEEKDAY=4,'四',IF(WEEKDAY=5,'五',IF(WEEKDAY=6,'六','日')))))));
AA:=STRCAT(STRCAT(STRCAT(AA1,AA2),STRCAT(AA3,AA4)),'】');
DRAWTEXT_FIX(D1,0,1,0,AA),COLORGREEN;
DRAWTEXT_FIX(1,0,0.76,0,DYBLOCK),COLORRED;{所属地域};
DRAWTEXT_FIX(1,0.09,0.76,0,HYBLOCK),COLORYELLOW;{所属行业};
DRAWTEXT_FIX(1,0,0.85,0,'【概念】:'),COLOR00A5FF;
DRAWTEXT_FIX(1,0.08,0.85,0,GNBLOCK),COLOR00A5FF;{概念};