麻煩老師修改,謝謝。 [博易POBO]
咨詢內容:
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度線,低點為準向上出現一個45度線。
<!-- 咨詢內容:
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度線改成速阻線呢?再次麻煩老師。 來源 程序化久久網
麻煩老師修改,謝謝。
高低點:=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度線,低點為準向上出現一個45度線。

附件 :
-->?
?來源:程序化99網( m.kzuj.com.cn )
博易技術人員: 高低點:=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度線改成速阻線呢?再次麻煩老師。 來源 程序化久久網
有思路,想編寫各種指標公式,交易模型,選股公式,還原公式的朋友
可聯系技術人員 QQ: 262069696 或微信號:cxh99cxh99 進行 有償收費 編寫!
(注:由于人數限制,QQ或微信請選擇方便的一個聯系我們就行,加好友時請簡單備注下您的需求,否則無法通過。謝謝您!)
相關文章
-
沒有相關內容