前面的寫法需要再完善一下
若 134500 改為其他時間(例如:133000), 就不適用了
完善後的程式如下:
v5.0 版寫法
DESP:=barslast(date<>ref(date,1))+1;
OPDE:=OptionLastDay('FITX1');
CkXX:=date>=1081217 and date=ref(OPDE,DESP) or barpos=0; //處理新制
OPDE:=if(CkXX,ref(OPDE,DESP),OPDE);
ROPDE:=SETVAL(DESP=1,OPDE,-ref(DESP,1),OPDE);
LastTS:=(OPDE<>ROPDE or DATEDIFF(DATE,OPDE)=0) and (Time>=134500 or datatype=6);
VERTLINE(LastTS) linedot;
v5.1 版寫法
DESP:=barslast(date<>ref(date,1))+1;
OPDE:=OptionLastDay('FITX1');
ROPDE:=SETVAL(DESP=1,OPDE,-ref(DESP,1),OPDE);
LastTS:=(OPDE<>ROPDE or DATEDIFF(DATE,OPDE)=0) and (Time>=134500 or datatype=6);
VERTLINE(LastTS) linedot;
|