愿赌服输 分时通达信指标 改为大智慧L2 -

大智慧版的愿赌服输分时指标，可惜没有前40分钟的，还请高手再优化一下。

A1:=AMOUNT/VOL/100;
A2:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
A3:=SUM(AMOUNT,40)/A1/100;
A4:=SUM(AMOUNT,80)/A1/100;
B1:=DMA(A2,VOL/A3);
B2:=DMA(A2,VOL/A4);
B3:=(CLOSE-B1)/B1*100;
B4:=(CLOSE-B2)/B2*100;
控盘:1,COLORYELLOW,LINETHICK1;
风险:-1,COLORGREEN,LINETHICK2;
现价:C,LINETHICK0;
DRAWTEXT(DISPSTATUS=2 AND C,4,' 愿赌服输四段分时'),COLOR0000BB;
DRAWTEXT(DISPSTATUS=2 AND C,3,' 操作选择正确时段'),COLOR0000BB;
DRAWTEXT(DISPSTATUS=2 AND C,2,' 黄线上方谨慎看多'),COLOR0000BB;
DRAWTEXT(DISPSTATUS=2 AND C,-1.5,' 绿线下方保持警惕'),COLOR0000BB;
DRAWTEXT(DISPSTATUS=2 AND C,-2.5,' 严格遵守操作纪律'),COLOR0000BB;
DRAWTEXT(DISPSTATUS=2 AND C,-3.5,' 心态平衡投资顺利'),COLOR0000BB;
均价:SUM(现价*V,240)/SUM(V,240),COLORYELLOW,LINETHICK0;
回调认同:EMA(EMA(C,20),13),LINETHICK0;
分时压力:MA(REF(HHV(C,30),1),2),LINETHICK0;
分时支撑:MA(REF(LLV(C,30),1),2),LINETHICK0;
STICKLINE(FILTER(C,29)>0,-1,1,0.5,0),LINETHICK0;
STICKLINE(FILTER(C,59)>0,-1,1,0.5,0),COLORMAGENTA;
STICKLINE(B4>0,0,B4,1,0),COLORYELLOW;
STICKLINE(B3>0,0,B3,1,0),COLORRED;
STICKLINE(B3<=0,0,B3,1,0),COLORGREEN;