A:=MOD(DAYBARPOS,12)=1;//全天框
B:=BARSLAST(A);
DRAWLINE3(A&&REF(C>REF(O,B),1),REF(HHV(H,B+1),1),1,1,REF(LLV(L,B+1),1),1,0),RGB(255,0,255),DOT;
DRAWLINE3(A&&REF(C>REF(O,B),1),REF(HHV(H,B+1),1),REF(B+1,1),1,REF(LLV(L,B+1),1),REF(B+1,1),0),RGB(255,0,255),DOT;
DRAWLINE3(A&&REF(C>REF(O,B),1),REF(HHV(H,B+1),1),1,1,REF(HHV(H,B+1),1),REF(B+1,1),0),RGB(255,0,255),DOT;
DRAWLINE3(A&&REF(C>REF(O,B),1),REF(LLV(L,B+1),1),1,1,REF(LLV(L,B+1),1),REF(B+1,1),0),RGB(255,0,255),DOT;
DRAWLINE3(A&&REF(C<=REF(O,B),1),REF(HHV(H,B+1),1),1,1,REF(LLV(L,B+1),1),1,0),COLORLIGHTGREEN,DOT;
DRAWLINE3(A&&REF(C<=REF(O,B),1),REF(HHV(H,B+1),1),REF(B+1,1),1,REF(LLV(L,B+1),1),REF(B+1,1),0),COLORLIGHTGREEN,DOT;
DRAWLINE3(A&&REF(C<=REF(O,B),1),REF(HHV(H,B+1),1),1,1,REF(HHV(H,B+1),1),REF(B+1,1),0),COLORLIGHTGREEN,DOT;
DRAWLINE3(A&&REF(C<=REF(O,B),1),REF(LLV(L,B+1),1),1,1,REF(LLV(L,B+1),1),REF(B+1,1),0),COLORLIGHTGREEN,DOT;
DRAWLASTBARLINE(C>REF(O,B),HHV(H,B+1),-1*(HHV(B,BARPOS)-B),1,LLV(L,B+1),-1*(HHV(B,BARPOS)-B),0),COLORMAGENTA,DOT;
DRAWLASTBARLINE(C>REF(O,B),HHV(H,B+1),BARSLAST(A),1,LLV(L,B+1),BARSLAST(A),0),COLORMAGENTA,DOT;
DRAWLASTBARLINE(C>REF(O,B),HHV(H,B+1),0,1,HHV(H,B+1),BARSLAST(A),0),COLORMAGENTA,DOT;
DRAWLASTBARLINE(C>REF(O,B),LLV(L,B+1),0,1,LLV(L,B+1),BARSLAST(A),0),COLORMAGENTA,DOT;
DRAWLASTBARLINE(C>REF(O,B),HHV(H,B+1),0,1,HHV(H,B+1),-1*(HHV(B,BARPOS)-B),0),COLORMAGENTA,DOT;
DRAWLASTBARLINE(C>REF(O,B),LLV(L,B+1),0,1,LLV(L,B+1),-1*(HHV(B,BARPOS)-B),0),COLORMAGENTA,DOT;
DRAWLASTBARLINE(C<=REF(O,B),HHV(H,B+1),-1*(HHV(B,BARPOS)-B),1,LLV(L,B+1),-1*(HHV(B,BARPOS)-B),0),COLORCYAN,DOT;
DRAWLASTBARLINE(C<=REF(O,B),HHV(H,B+1),BARSLAST(A),1,LLV(L,B+1),BARSLAST(A),0),COLORCYAN,DOT;
DRAWLASTBARLINE(C<=REF(O,B),HHV(H,B+1),0,1,HHV(H,B+1),BARSLAST(A),0),COLORCYAN,DOT;
DRAWLASTBARLINE(C<=REF(O,B),LLV(L,B+1),0,1,LLV(L,B+1),BARSLAST(A),0),COLORLIGHTGREEN,DOT;
DRAWLASTBARLINE(C<=REF(O,B),HHV(H,B+1),0,1,HHV(H,B+1),-1*(HHV(B,BARPOS)-B),0),COLORCYAN,DOT;
DRAWLASTBARLINE(C<=REF(O,B),LLV(L,B+1),0,1,LLV(L,B+1),-1*(HHV(B,BARPOS)-B),0),COLORCYAN,DOT;