咨詢內(nèi)容:
麻煩老師修改,謝謝。
高低點(diǎn):=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;
?
上圖高低點(diǎn)能不能在高點(diǎn)位置向下畫一個(gè)45度線,低點(diǎn)為準(zhǔn)向上出現(xiàn)一個(gè)45度線。

<!--
咨詢內(nèi)容: 附件 :
-->
?
?來(lái)源:程序化99網(wǎng)( m.kzuj.com.cn )
博易技術(shù)人員:
高低點(diǎn):=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度線改成速阻線呢?再次麻煩老師。
來(lái)源 程序化久久網(wǎng)