咨詢內(nèi)容：

麻煩老師修改，謝謝。

高低點:=1;
STEP_:=13/2;
RFX:=MIN (STEP_, (DATACOUNT-1)-BARPOS);?
FP:=INTPART(MAX(FRACPART(H)*1000, FRACPART(L)*1000));
DIGIT:=(MOD(FP,10)>0) + (MOD(FP,100)>0) + (MOD(FP, 1000)>0);
A:=IF(FILTER(H+0.001 > REFX(HHV(H,STEP_*2), RFX), RFX), H, 0);
B:=IF(FILTER(L-0.001 < REFX(LLV(L,STEP_*2), RFX), RFX), L, 0);
ADT:=BARSLAST(A>0);
BDT:=BARSLAST(B>0);
AH0:=REF(H,ADT);
BL0:=REF(L,BDT);
HL:=AH0-BL0;
DRAWNUMBER(A, A, A, DIGIT), ALIGN1, VALIGN2,COLOR0000FF;
DRAWNUMBER(B, B, B, DIGIT), ALIGN1, VALIGN0,COLOR00FF00;
?
上圖高低點能不能在高點位置向下畫一個45度線，低點為準向上出現(xiàn)一個45度線。 <!-- 咨詢內(nèi)容：

附件 :

-->

?

?來源:程序化99網(wǎng)（ www.tumamayizhan.com ）

博易技術人員： 高低點:=1;
STEP_:=13/2;
RFX:=MIN (STEP_, (DATACOUNT-1)-BARPOS);?
FP:=INTPART(MAX(FRACPART(H)*1000, FRACPART(L)*1000));
DIGIT:=(MOD(FP,10)>0) + (MOD(FP,100)>0) + (MOD(FP, 1000)>0);
A:=IF(FILTER(H+0.001 > REFX(HHV(H,STEP_*2), RFX), RFX), H, 0);
B:=IF(FILTER(L-0.001 < REFX(LLV(L,STEP_*2), RFX), RFX), L, 0);
ADT:=BARSLAST(A>0);
BDT:=BARSLAST(B>0);
AH0:=REF(H,ADT);
BL0:=REF(L,BDT);
HL:=AH0-BL0;
DRAWNUMBER(A, A, A, DIGIT), ALIGN1, VALIGN2,COLOR0000FF;
DRAWNUMBER(B, B, B, DIGIT), ALIGN1, VALIGN0,COLOR00FF00;

DRAWSL(FILTERX(A,BARPOS),H,-4.5,0,0);
DRAWSL(FILTERX(B,BARPOS),L,4.5,0,0); 非常感謝老師，能不能把45度線改成速阻線呢？再次麻煩老師。 來源 程序化久久網(wǎng)