{自动通道线,有长期和短期} TY:=(C+L+H)/3; DD:=FILTER(BACKSET(FILTER(REF(TY,10)=HHV(TY,2*10+1),10),10+1),10); LL:=FILTER(BACKSET(FILTER(REF(TY,10)=LLV(TY,2*10+1),10),10+1),10); UU:=BACKSET(BARSTATUS=2 ,BARSLAST(LL)+1); VV:=UU>REF(UU,1); WW:=BACKSET(VV,REF(BARSLAST(LL),1)+2); XX:=WW>REF(WW,1); DRAWLINE(XX,L,VV,L,1),ColorFFA500,LINEDASH,LINETHICK1; UU2:=BACKSET(BARSTATUS=2 ,BARSLAST(DD)+1); VV2:=UU2>REF(UU2,1); WW2:=BACKSET(VV2,REF(BARSLAST(DD),1)+2); XX2:=WW2>REF(WW2,1); DRAWLINE(XX2,H,VV2,H,1),ColorFFA500,LINEDASH,LINETHICK1; D:=FILTER(BACKSET(FILTER(REF(TY,21)=HHV(TY,2*21+1),21),21+1),21); L5:=FILTER(BACKSET(FILTER(REF(TY,21)=LLV(TY,2*21+1),21),21+1),21); U:=BACKSET(BARSTATUS=2 ,BARSLAST(L5)+1); V5:=U>REF(U,1); W:=BACKSET(V5,REF(BARSLAST(L5),1)+2); X:=W>REF(W,1); DRAWLINE(X,L,V5,L,1),ColorMagenta,LINEDASH,LINETHICK1; U2:=BACKSET(BARSTATUS=2 ,BARSLAST(D)+1); V2:=U2>REF(U2,1); W2:=BACKSET(V2,REF(BARSLAST(D),1)+2); X2:=W2>REF(W2,1); DRAWLINE(X2,H,V2,H,1),ColorMagenta,LINEDASH,LINETHICK1; |
|