奇狐社區論壇 - [問題]自訂K線

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

奇狐社區論壇 > 指標公式 > 問題交流 > [問題]自訂K線

總頁數 (2): « 1 [2]

上一主題下一主題

作者

主題

Markchu7
資深會員

註冊日期: Nov 2007
來　　自:
文章數量: 1496

有值就OK!繪製K線部分可自行處理,
請問總版主:最新指導回覆中的XO,XH,XL,XC是指五分周期的值吧?所以我必須要用五XO,五XH,五XL,五XC來代替才不會與一分鐘周期的XO,XH,XL,XC混淆是嗎?(因為會在同一個公式中)
感謝總版主!

向版主報告此篇 |

2011-09-28 13:23

cgjj
總版主

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

引用:
最初由 Markchu7 發表
有值就OK!繪製K線部分可自行處理,
請問總版主:最新指導回覆中的XO,XH,XL,XC是指五分周期的值吧?所以我必須要用五XO,五XH,五XL,五XC來代替才不會與一分鐘周期的XO,XH,XL,XC混淆是嗎?(因為會在同一個公式中)
感謝總版主!

把一分鐘的改名會簡單些唷(程式短)

向版主報告此篇 |

2011-09-28 13:25

Markchu7
資深會員

註冊日期: Nov 2007
來　　自:
文章數量: 1496

哈哈也對!謝!

向版主報告此篇 |

2011-09-28 14:11

Markchu7
資深會員

註冊日期: Nov 2007
來　　自:
文章數量: 1496

XC:=(O+H+L+C)/4;
XO:=O; CC:=C;
for i=2 to datacount do begin
XO[i]:=(XO[i-1]+CC[i-1])/2;
end;
XH:=MAX(MAX(H,XO),XC);
XL:=MIN(MIN(L,XO),XC);

請問總版主:以上源碼如果是用在當沖5分鐘線要如何修改?謝謝!

向版主報告此篇 |

2012-09-07 10:31

cgjj
總版主

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

引用:
最初由 Markchu7 發表
XC:=(O+H+L+C)/4;
XO:=O; CC:=C;
for i=2 to datacount do begin
XO[i]:=(XO[i-1]+CC[i-1])/2;
end;
XH:=MAX(MAX(H,XO),XC);
XL:=MIN(MIN(L,XO),XC);

請問總版主:以上源碼如果是用在當沖5分鐘線要如何修改?謝謝!

您現貼的這一段程式, 無論是那種週期都能用(都可執行)
不懂您要問什麼?

向版主報告此篇 |

2012-09-07 12:38

Markchu7
資深會員

註冊日期: Nov 2007
來　　自:
文章數量: 1496

跨日圖形如貼圖,我的意思是不跨日,以每天的開盤價為首K之XO,畫當日之圖形,請總版主指導!謝謝!
以下為貼圖源碼:
XC:(O+H+L+C)/4,LINETHICK;
XO:O,LINETHICK; CC:=C;
for i=2 to datacount do begin
XO[i]:=(XO[i-1]+CC[i-1])/2;
end;
XH:MAX(MAX(H,XO),XC),LINETHICK;
XL:MIN(MIN(L,XO),XC),LINETHICK;

VERTLINE(DATE<>REF(DATE,1)),LINEDOT,COLORBLACK;

STICKLINE(XC>=XO,XH,XL,0.1,0),COLORRED;
STICKLINE(XC<XO,XH,XL,0.1,0),COLORBLUE;
STICKLINE(XC>=XO,XC,XO,8,0),COLORRED;
STICKLINE(XC<XO,XC,XO,8,0),COLORBLUE;

Markchu7 附帶上了此圖片:

向版主報告此篇 |

2012-09-07 13:08

cgjj
總版主

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

引用:
最初由 Markchu7 發表
跨日圖形如貼圖,我的意思是不跨日,以每天的開盤價為首K之XO,畫當日之圖形,請總版主指導!謝謝!
以下為貼圖源碼:
XC:(O+H+L+C)/4,LINETHICK;
XO:O,LINETHICK; CC:=C;
for i=2 to datacount do begin
XO[i]:=(XO[i-1]+CC[i-1])/2;
end;
XH:MAX(MAX(H,XO),XC),LINETHICK;
XL:MIN(MIN(L,XO),XC),LINETHICK;

VERTLINE(DATE<>REF(DATE,1)),LINEDOT,COLORBLACK;

STICKLINE(XC>=XO,XH,XL,0.1,0),COLORRED;
STICKLINE(XC<XO,XH,XL,0.1,0),COLORBLUE;
STICKLINE(XC>=XO,XC,XO,8,0),COLORRED;
STICKLINE(XC<XO,XC,XO,8,0),COLORBLUE;

DECK:=DATE<>REF(DATE,1);
XC:(O+H+L+C)/4,LINETHICK;
XO:O,LINETHICK; CC:=C;
for i=2 to datacount do begin
if DECK[i]=0 then XO[i]:=(XO[i-1]+CC[i-1])/2;
end;
XH:MAX(MAX(H,XO),XC),LINETHICK;
XL:MIN(MIN(L,XO),XC),LINETHICK;
VERTLINE(DECK),LINEDOT,COLORBLACK;

STICKLINE(XC>=XO,XH,XL,0.1,0),COLORRED;
STICKLINE(XC<XO,XH,XL,0.1,0),COLORBLUE;
STICKLINE(XC>=XO,XC,XO,8,0),COLORRED;
STICKLINE(XC<XO,XC,XO,8,0),COLORBLUE;

向版主報告此篇 |

2012-09-07 14:08