奇狐社區論壇 - 開盤時缺口中值及上下緣

奇狐社區論壇 : Powered by vBulletin version 2.3.0

奇狐社區論壇 > 指標公式 > 問題交流 > 開盤時缺口中值及上下緣

上一主題下一主題

作者

主題

ivancclai
資深會員

註冊日期: Apr 2017
來　　自: New Taipei city
文章數量: 243

開盤時缺口中值及上下緣

版主大大你好

開盤時缺口處理我不悔處理

1. 若沒有缺口, 不處理的判讀
2. 缺口畫線處理, 缺口中值及上下緣

// ================= 隔日線 =====================================
IF DATATYPE =1 THEN BEGIN //1分K
DECK:=Tradedate<>ref(Tradedate,1) or Time = 84600;
End;
IF DATATYPE =2 THEN BEGIN //5分K
DECK:=Tradedate<>ref(Tradedate,1) or Time = 85000;
End;
IF DATATYPE =3 THEN BEGIN //15分K
DECK:=Tradedate<>ref(Tradedate,1) or Time=90000;
End;
IF DATATYPE =4 THEN BEGIN //30分K
DECK1:=Tradedate<>ref(Tradedate,1) or Time=91500;
End;
IF DATATYPE =5 THEN BEGIN //60分K
DECK:=Tradedate<>ref(Tradedate,1) or Time=94500;
End;

DESP:=BARSLAST(DECK);
IF DATAPERIOD < 7 THEN BEGIN // <60分K
VERTLINE(DECK) Color008888 linedot; //標示換交易日(垂直分隔線)
KLINE(O,H,L,C,0);
END;
// ======================================================================

缺口中線 REF(HIGH,DESP) +(REF(LOW,DESP-1))) / 2 , colorFF3300 , LINETHICK2; // 藍色
開盤缺口上緣 : REF(LOW,DESP-1) COLORFFFFFF ;
開盤缺口下緣 : REF(HIGH,DESP) COLORFFFFFF;
DRAWTEXT(DECK,缺口中線,' 缺口中線 = ')colorFF3300, LINETHICK1,ALIGN2 PXUP35;
DRAWNUMBER(DECK,缺口中線,缺口中線,0) ALIGN1 , colorFFFFFF PXUP35;
DRAWNUMBER(ISLASTBAR,缺口中線,缺口中線,0) SHIFT1,colorFF3300;
DRAWTEXT(ISLASTBAR,缺口中線,'缺口中線') SHIFT5,colorFF3300;

EXPLAINEX(1>0,'缺口中線= ',缺口中線,0,0) COLORFFFFFF;

//************************************************************************

我寫會不對如圖

ivancclai 附帶上了此圖片:

向版主報告此篇 |

2023-11-11 14:29

cgjj
總版主

註冊日期: Oct 2003
來　　自:
文章數量: 18091

回覆: 開盤時缺口中值及上下緣

引用:
最初由 ivancclai 發表
版主大大你好

開盤時缺口處理我不悔處理

1. 若沒有缺口, 不處理的判讀
2. 缺口畫線處理, 缺口中值及上下緣

// ================= 隔日線 =====================================
IF DATATYPE =1 THEN BEGIN //1分K
DECK:=Tradedate<>ref(Tradedate,1) or Time = 84600;
End;
IF DATATYPE =2 THEN BEGIN //5分K
DECK:=Tradedate<>ref(Tradedate,1) or Time = 85000;
End;
IF DATATYPE =3 THEN BEGIN //15分K
DECK:=Tradedate<>ref(Tradedate,1) or Time=90000;
End;
IF DATATYPE =4 THEN BEGIN //30分K
DECK1:=Tradedate<>ref(Tradedate,1) or Time=91500;
End;
IF DATATYPE =5 THEN BEGIN //60分K
DECK:=Tradedate<>ref(Tradedate,1) or Time=94500;
End;

DESP:=BARSLAST(DECK);
IF DATAPERIOD < 7 THEN BEGIN // <60分K
VERTLINE(DECK) Color008888 linedot; //標示換交易日(垂直分隔線)
KLINE(O,H,L,C,0);
END;
// ======================================================================

缺口中線 :(REF(HIGH,DESP) +(REF(LOW,DESP-1))) / 2 , colorFF3300 , LINETHICK2; // 藍色
開盤缺口上緣 : REF(LOW,DESP-1) COLORFFFFFF ;
開盤缺口下緣 : REF(HIGH,DESP) COLORFFFFFF;
DRAWTEXT(DECK,缺口中線,' 缺口中線 = ')colorFF3300, LINETHICK1,ALIGN2 PXUP35;
DRAWNUMBER(DECK,缺口中線,缺口中線,0) ALIGN1 , colorFFFFFF PXUP35;
DRAWNUMBER(ISLASTBAR,缺口中線,缺口中線,0) SHIFT1,colorFF3300;
DRAWTEXT(ISLASTBAR,缺口中線,'缺口中線') SHIFT5,colorFF3300;

EXPLAINEX(1>0,'缺口中線= ',缺口中線,0,0) COLORFFFFFF;

//************************************************************************

我寫會不對如圖

SWCK:=Tradedate<>ref(Tradedate,1) or IsRegularFBar;
VERTLINE(SWCK and datatype<7) Color008888 linedot; //隔日線
KLINE(O,H,L,C,0);

SWSP:=barslast(SWCK);
缺口:((ref(H,1)<L)+(ref(L,1)>H)*2)*SWCK; {1.上, 2.下}
開盤缺口上緣:ref(ref(L,缺口-1)*(缺口>0),SWSP) linethick0;
開盤缺口下緣:ref(ref(H,2-缺口)*(缺口>0),SWSP) linethick0;
缺口中線:(開盤缺口上緣+開盤缺口下緣)/2 colorFF3300 linethick0;
DWCK:=SWSP>0 and ref(缺口>0,SWSP);
PARTLINE(DWCK,缺口中線) colorFF3300;
PARTLINE(DWCK,開盤缺口上緣) COLORFFFFFF;
PARTLINE(DWCK,開盤缺口下緣) COLORFFFFFF;
DRAWTEXT(缺口>0,缺口中線,' 缺口中線 = ') colorFF3300, LINETHICK1,ALIGN2 PXUP25;
DRAWNUMBER(缺口>0,缺口中線,缺口中線,0) ALIGN1 colorFF3300 PXUP25;

向版主報告此篇 |

2023-11-12 11:42