反應趨勢現況的系統

代碼:

if datatype>5 then exit;

X :"trs.x2#DAY",linethick0;

B1 :"trs.b2#DAY",linethick0;

S1 :"trs.s2#DAY",linethick0;

HBOP :"trs.hbop2#DAY",linethick0;

LBOP:"trs.lbop2#DAY",linethick0;

VAR1:=DATEREF(DATE,1);

VAR2:=BARSLAST(VAR1);

PARTLINE(VAR2>0,X),COLORyellow,linethick2;

PARTLINE(VAR2>0,B1),COLORcyan,pointdot;

PARTLINE(VAR2>0,S1),COLORMAGENTA,pointdot;

PARTLINE(VAR2>0,HBOP),COLORred,pointdot;

PARTLINE(VAR2>0,LBOP),COLORgreen,pointdot;

vertline(refx(VAR1,1)),colorwhite,pointdot;

drawtext(islastbar,X,X:+numtostr(X,2)),coloryellow,shift1;

drawtext(islastbar,B1,B1:+numtostr(B1,2)),colorcyan,shift1;

drawtext(islastbar,S1,S1:+numtostr(S1,2)),colormagenta,shift1;

drawtext(islastbar,HBOP,HBOP:+numtostr(HBOP,2)),colorred,shift1;

drawtext(islastbar,LBOP,LBOP:+numtostr(LBOP,2)),colorgreen,shift1;