Q:=SCALE*V;//*UNIT
W:=(1-SCALE)*V;//*UNIT
A:=Q-W,NODRAW;
流入:IF (A>0,A,NULL),COLORRED,NODRAW,PRECIS0;
流出:IF (A<0,-A,NULL),COLORGREEN,NODRAW,PRECIS0;
NN:=BACKSET(ISLASTBAR,SUMBARS(A>0||A<0,2));
DRAWNUMBER(A>0&&NN,A/2,A,0,COLORRED),ALIGN1,VALIGN2,FONTSIZE30;//,COLORMAGENTA
DRAWNUMBER(A<0&&NN,A/2,-A,0,COLORGREEN),ALIGN1,VALIGN2,FONTSIZE30;//,COLORGREEN
//DRAWNUMBER(1,L,V,0,COLORWHITE),ALIGN1,VALIGN0;
MM:=BACKSET(ISLASTBAR,SUMBARS(V=REF(V,1)||V>REF(V,1)||V<REF(V,1),2));
DRAWNUMBER(V=REF(V,1)&&MM,A/2,V,0,COLORYELLOW),ALIGN1,VALIGN0;//白色,ALIGN0,VALIGN0;//,FONTSIZE15
DRAWNUMBER(V>REF(V,1)&&MM,A/2,V,0,COLORYELLOW),ALIGN1,VALIGN0,FONTSIZE30;//红色
DRAWNUMBER(V<REF(V,1)&&MM,A/2,V,0,COLORWHITE),ALIGN1,VALIGN0,FONTSIZE30;//蓝色,COLORLIGHTGREY
W:=(1-SCALE)*V;//*UNIT
A:=Q-W,NODRAW;
流入:IF (A>0,A,NULL),COLORRED,NODRAW,PRECIS0;
流出:IF (A<0,-A,NULL),COLORGREEN,NODRAW,PRECIS0;
NN:=BACKSET(ISLASTBAR,SUMBARS(A>0||A<0,2));
DRAWNUMBER(A>0&&NN,L,A,0,COLORRED),ALIGN1,VALIGN0,FONTSIZE15;//,COLORMAGENTA
DRAWNUMBER(A<0&&NN,L,-A,0,COLORGREEN),ALIGN1,VALIGN0,FONTSIZE15;//,COLORGREEN
MM:=BACKSET(ISLASTBAR,SUMBARS(V=REF(V,1)||V>REF(V,1)||V<REF(V,1),2));
DRAWNUMBER(V=REF(V,1)&&MM,H,V,0,COLORYELLOW),ALIGN1,VALIGN2,FONTSIZE15;//白色,ALIGN0,VALIGN0;//,FONTSIZE15
DRAWNUMBER(V>REF(V,1)&&MM,H,V,0,COLORYELLOW),ALIGN1,VALIGN2,FONTSIZE15;//红色
DRAWNUMBER(V<REF(V,1)&&MM,H,V,0,COLORWHITE),ALIGN1,VALIGN2,FONTSIZE15;//蓝色,COLORLIGHTGREY
//////////////////////////////////////////////////////
Q:=SCALE*V;//*UNIT
W:=(1-SCALE)*V;//*UNIT
A:=Q-W,NODRAW;
流入:IF (A>0,A,NULL),COLORRED,NODRAW,PRECIS0;
流出:IF (A<0,-A,NULL),COLORGREEN,NODRAW,PRECIS0;
STICKLINE(A>0,0,A,RGB(128,0,64),0);//红色
STICKLINE(A<0,0,-A,RGB(0,128,64),0); //绿色//,RGB(0,128,0)
//////////////////////////////////////////////////////////////////
NN:=BACKSET(ISLASTBAR,SUMBARS(A>0||A<0,2));
DRAWNUMBER(A>0&&NN,H,A,0,COLORRED),ALIGN1,VALIGN0,FONTSIZE20;//,COLORMAGENTA
DRAWNUMBER(A<0&&NN,H,-A,0,COLORGREEN),ALIGN1,VALIGN0,FONTSIZE20;//,COLORGREEN
W:=(1-SCALE)*V;//*UNIT
A:=Q-W,NODRAW;
流入:IF (A>0,A,NULL),COLORRED,NODRAW,PRECIS0;
流出:IF (A<0,-A,NULL),COLORGREEN,NODRAW,PRECIS0;
STICKLINE(A>0,0,A,RGB(128,0,64),0);//红色
STICKLINE(A<0,0,-A,RGB(0,128,64),0); //绿色//,RGB(0,128,0)
NN:=BACKSET(ISLASTBAR,SUMBARS(A>0||A<0,2));
DRAWNUMBER(A>0&&NN,A,A,0,COLORRED),ALIGN1,VALIGN2,FONTSIZE20;//,COLORMAGENTA
DRAWNUMBER(A<0&&NN,-A,-A,0,COLORGREEN),ALIGN1,VALIGN2,FONTSIZE20;//,COLORGREEN