博易技術人員: 白色為今日開盤價, 黃色為昨日收盤價,暗金色為當日日內均線,不需要就自己去掉. 測試版本為博易v5.4.3?
DP:= DATAPERIOD;
高低點:=1;
STEP_:= 20/2+1;
RFX:= MIN (STEP_, (DATACOUNT-1)-BARPOS); 新版BUG:='refx, ref函數有錯誤與舊版不兼容';
FP:= INTPART(MAX(FRACPART(H)*1000, FRACPART(L)*1000));
DIGIT:= (MOD(FP,10)>0) + (MOD(FP,100)>0) + (MOD(FP, 1000)>0);
HH:= IF(FILTER(H+0.001 > REFX(HHV(H,STEP_*2), RFX), RFX), H, 0);
LL:= IF(FILTER(L-0.001 < REFX(LLV(L,STEP_*2), RFX), RFX), L, 0);
DRAWNUMBER(HH, HH, HH, DIGIT), ALIGN1, VALIGN2, COLORGRAY;
DRAWNUMBER(LL, LL, LL, DIGIT), ALIGN1, VALIGN0, COLORGRAY;
日內均線:=1;
ISNEWDAY:= REF(HOUR,1)=15 AND HOUR<>15;
CNT:= BARSLAST(ISNEWDAY)+1;
DBARS:= SUM(1, CNT);
DVOL_:= SUM(VOL, CNT);
DVC:= SUM(VOL*(H+O+L+C)/4, CNT);
DMAC:= DVC/DVOL_;
PARTLINE((BETWEEN(DP,0,4) OR DP=13) AND CNT<>1, DMAC), COLOR008080;
昨日和今日開:=1;
PARTLINE(CNT >= 2, REF(O, CNT-1)), COLORWHITE;
PARTLINE(CNT >= 2, REF(C, CNT)), COLORYELLOW;
技術交流Q群: 231695646, LINETHICK0, PRECIS0, COLOR008080;