奇狐社區論壇 - 增加控時間.畫線

論壇首頁

你可以在這裡編輯你的資料，查看短訊，訂閱主題和論壇參數等等

免費會員註冊

會員列表

論壇幫助

論壇日曆

論壇搜索

加入我的最愛

登出論壇

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

奇狐社區論壇 > 指標公式 > 問題交流 > 增加控時間.畫線

上一主題下一主題

作者

主題

發表新主題

回覆主題

santienchang
資深會員

註冊日期: May 2011
來　　自: 台中
文章數量: 164

增加控時間.畫線

DESP:=BARSLAST(DATE<>REF(DATE,1));
//3K
FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]-12;
FirstSP:=BARSLAST(FirstCK);
BKFT:=MOD(FirstSP,3)=0;
BKFTSP:=BARSLAST(BKFT);
BKLT:=MOD(FirstSP,3)=3-1 or ISLASTBAR;
BKH:=HHV(HIGH,BKFTSP+1);
BKL:=LLV(LOW,BKFTSP+1);
BKH:=SETVAL(BKLT,BKH,-BKFTSP,BKH);
BKL:=SETVAL(BKLT,BKL,-BKFTSP,BKL);
BKNSP:=SUMBARS(BKLT,3);
MAH:=SUM(BKH*BKLT,BKNSP)/3;
MAL:=SUM(BKL*BKLT,BKNSP)/3;
MMH:=MAH+(MAH-BKH)/3;
MML:=MAL-(BKL-MAL)/3;
H3gM:IF(BKH>MMH,MAH,MMH) linethick,color00ff00 shift2;
L3gM:IF(BKL<MML,MAL,MML) linethick,color00ff00 shift2;

LBMH:=LBOUND(H3gM);
IF LBMH>0 then begin
SetNewLB:=LBMH-BKFTSP[LBMH];
x:=SETLBOUND(H3gM,SetNewLB); x:=SETLBOUND(L3gM,SetNewLB);
end;
H3gM:=SETVAL(BKLT,H3gM,-BKFTSP,H3gM);
L3gM:=SETVAL(BKLT,L3gM,-BKFTSP,L3gM);
SH1:=(REF(BKH,4)+REF(BKH,1)*2)/3;
SH2:=(SH1*3+(SH1-REF(BKH,1)))/3;
SHH:IF(SH1<REF(BKH,1),SH1,SH2);
SL1:=(REF(BKL,4)+REF(BKL,1)*2)/3;
SL2:=(SL1*3-(REF(BKL,1)-SL1))/3;
SLL:IF(SL1>REF(BKL,1),SL1,SL2);
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
以上劃線改成如下.謝謝總版主
DESP:=BARSLAST(DATE<>REF(DATE,1));
//3K
FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]-12;
FirstSP:=BARSLAST(FirstCK);
BKFT:=MOD(FirstSP,4)=0;
BKFTSP:=BARSLAST(BKFT);
BKLT:=MOD(FirstSP,4)=4-1 or ISLASTBAR;
BKH:=HHV(HIGH,BKFTSP+1);
BKL:=LLV(LOW,BKFTSP+1);
BKH:=SETVAL(BKLT,BKH,-BKFTSP,BKH);
BKL:=SETVAL(BKLT,BKL,-BKFTSP,BKL);
BKNSP:=SUMBARS(BKLT,3);
MAH:=SUM(BKH*BKLT,BKNSP)/3;
MAL:=SUM(BKL*BKLT,BKNSP)/3;
MMH:=MAH+(MAH-BKH)/3;
MML:=MAL-(BKL-MAL)/3;
H3gM:IF(BKH>MMH,MAH,MMH) linethick,color00ff00 shift2;
L3gM:IF(BKL<MML,MAL,MML) linethick,color00ff00 shift2;

LBMH:=LBOUND(H3gM);
IF LBMH>0 then begin
SetNewLB:=LBMH-BKFTSP[LBMH];
x:=SETLBOUND(H3gM,SetNewLB); x:=SETLBOUND(L3gM,SetNewLB);
end;
H3gM:=SETVAL(BKLT,H3gM,-BKFTSP,H3gM);
L3gM:=SETVAL(BKLT,L3gM,-BKFTSP,L3gM);
SH1:=(REF(BKH,4)+REF(BKH,1)*2)/3;
SH2:=(SH1*3+(SH1-REF(BKH,1)))/3;
SHH:IF(SH1<REF(BKH,1),SH1,SH2);
SL1:=(REF(BKL,4)+REF(BKL,1)*2)/3;
SL2:=(SL1*3-(REF(BKL,1)-SL1))/3;
SLL:IF(SL1>REF(BKL,1),SL1,SL2);

向版主報告此篇 |

查IP位址

Old Post

2017-06-30 13:45

santienchang 現在離線

點選這裡給 santienchang 傳送一條短訊

查找更多關於 santienchang 的文章

增加 santienchang 至你的好友列表

編輯/刪除訊息

引用回覆

cgjj
總版主

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

回覆: 增加控時間.畫線

引用:
最初由 santienchang 發表
DESP:=BARSLAST(DATE<>REF(DATE,1));
//3K
FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]-12;
FirstSP:=BARSLAST(FirstCK);
BKFT:=MOD(FirstSP,3)=0;
BKFTSP:=BARSLAST(BKFT);
BKLT:=MOD(FirstSP,3)=3-1 or ISLASTBAR;
BKH:=HHV(HIGH,BKFTSP+1);
BKL:=LLV(LOW,BKFTSP+1);
BKH:=SETVAL(BKLT,BKH,-BKFTSP,BKH);
BKL:=SETVAL(BKLT,BKL,-BKFTSP,BKL);
BKNSP:=SUMBARS(BKLT,3);
MAH:=SUM(BKH*BKLT,BKNSP)/3;
MAL:=SUM(BKL*BKLT,BKNSP)/3;
MMH:=MAH+(MAH-BKH)/3;
MML:=MAL-(BKL-MAL)/3;
H3gM:IF(BKH>MMH,MAH,MMH) linethick,color00ff00 shift2;
L3gM:IF(BKL<MML,MAL,MML) linethick,color00ff00 shift2;

LBMH:=LBOUND(H3gM);
IF LBMH>0 then begin
SetNewLB:=LBMH-BKFTSP[LBMH];
x:=SETLBOUND(H3gM,SetNewLB); x:=SETLBOUND(L3gM,SetNewLB);
end;
H3gM:=SETVAL(BKLT,H3gM,-BKFTSP,H3gM);
L3gM:=SETVAL(BKLT,L3gM,-BKFTSP,L3gM);
SH1:=(REF(BKH,4)+REF(BKH,1)*2)/3;
SH2:=(SH1*3+(SH1-REF(BKH,1)))/3;
SHH:IF(SH1<REF(BKH,1),SH1,SH2);
SL1:=(REF(BKL,4)+REF(BKL,1)*2)/3;
SL2:=(SL1*3-(REF(BKL,1)-SL1))/3;
SLL:IF(SL1>REF(BKL,1),SL1,SL2);
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
以上劃線改成如下.謝謝總版主
DESP:=BARSLAST(DATE<>REF(DATE,1));
//3K
FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]-12;
FirstSP:=BARSLAST(FirstCK);
BKFT:=MOD(FirstSP,4)=0;
BKFTSP:=BARSLAST(BKFT);
BKLT:=MOD(FirstSP,4)=4-1 or ISLASTBAR;
BKH:=HHV(HIGH,BKFTSP+1);
BKL:=LLV(LOW,BKFTSP+1);
BKH:=SETVAL(BKLT,BKH,-BKFTSP,BKH);
BKL:=SETVAL(BKLT,BKL,-BKFTSP,BKL);
BKNSP:=SUMBARS(BKLT,3);
MAH:=SUM(BKH*BKLT,BKNSP)/3;
MAL:=SUM(BKL*BKLT,BKNSP)/3;
MMH:=MAH+(MAH-BKH)/3;
MML:=MAL-(BKL-MAL)/3;
H3gM:IF(BKH>MMH,MAH,MMH) linethick,color00ff00 shift2;
L3gM:IF(BKL<MML,MAL,MML) linethick,color00ff00 shift2;

LBMH:=LBOUND(H3gM);
IF LBMH>0 then begin
SetNewLB:=LBMH-BKFTSP[LBMH];
x:=SETLBOUND(H3gM,SetNewLB); x:=SETLBOUND(L3gM,SetNewLB);
end;
H3gM:=SETVAL(BKLT,H3gM,-BKFTSP,H3gM);
L3gM:=SETVAL(BKLT,L3gM,-BKFTSP,L3gM);
SH1:=(REF(BKH,4)+REF(BKH,1)*2)/3;
SH2:=(SH1*3+(SH1-REF(BKH,1)))/3;
SHH:IF(SH1<REF(BKH,1),SH1,SH2);
SL1:=(REF(BKL,4)+REF(BKL,1)*2)/3;
SL2:=(SL1*3-(REF(BKL,1)-SL1))/3;
SLL:IF(SL1>REF(BKL,1),SL1,SL2);

你都貼出改後的原碼了，還需要協助什麼

向版主報告此篇 |

查IP位址

Old Post

2017-06-30 15:27

cgjj 現在離線

點選這裡給 cgjj 傳送一條短訊

查找更多關於 cgjj 的文章

增加 cgjj 至你的好友列表

編輯/刪除訊息

引用回覆

santienchang
資深會員

註冊日期: May 2011
來　　自: 台中
文章數量: 164

回覆: 回覆: 增加控時間.畫線

引用:
最初由 cgjj 發表
你都貼出改後的原碼了，還需要協助什麼

抱歉!

H3gM:=SETVAL(BKLT,H3gM,-BKFTSP,H3gM)linethick;;
L3gM:=SETVAL(BKLT,L3gM,-BKFTSP,L3gM)linethick;
SS:=(CLOSE>=H3gM+4)-(CLOSE<=L3gM-4);
SS:=REF(SS,BARSLAST(SS<>0));
RML:=REF(L3gM,BARSLAST(L3gM<>REF(L3gM,1))+1);
RMH:=REF(H3gM,BARSLAST(H3gM<>REF(H3gM,1))+1);
CK:=SUM(TIME>084500 and TIME<=100600,2)=2;
PARTLINE(SS=1 and L3gM>RML-1 and CK,L3gM),color00ff00 shift1;
PARTLINE(SS=-1 and H3gM<RMH+1 and CK,H3gM),color00ff00 shift1;

向版主報告此篇 |

查IP位址

Old Post

2017-06-30 15:39

santienchang 現在離線

點選這裡給 santienchang 傳送一條短訊

查找更多關於 santienchang 的文章

增加 santienchang 至你的好友列表

編輯/刪除訊息

引用回覆

cgjj
總版主

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

回覆: 回覆: 回覆: 增加控時間.畫線

引用:
最初由 santienchang 發表
抱歉!

H3gM:=SETVAL(BKLT,H3gM,-BKFTSP,H3gM)linethick;;
L3gM:=SETVAL(BKLT,L3gM,-BKFTSP,L3gM)linethick;
SS:=(CLOSE>=H3gM+4)-(CLOSE<=L3gM-4);
SS:=REF(SS,BARSLAST(SS<>0));
RML:=REF(L3gM,BARSLAST(L3gM<>REF(L3gM,1))+1);
RMH:=REF(H3gM,BARSLAST(H3gM<>REF(H3gM,1))+1);
CK:=SUM(TIME>084500 and TIME<=100600,2)=2;
PARTLINE(SS=1 and L3gM>RML-1 and CK,L3gM),color00ff00 shift1;
PARTLINE(SS=-1 and H3gM<RMH+1 and CK,H3gM),color00ff00 shift1;

@@ 不要只給程式碼
你沒有描述問題需求，要做什麼?怎樣做?，無從幫起!!!

向版主報告此篇 |

查IP位址

Old Post

2017-06-30 15:46

cgjj 現在離線

點選這裡給 cgjj 傳送一條短訊

查找更多關於 cgjj 的文章

增加 cgjj 至你的好友列表

編輯/刪除訊息

引用回覆

santienchang
資深會員

註冊日期: May 2011
來　　自: 台中
文章數量: 164

[IMG]http://[/IMG]

如圖示請幫忙.謝謝感恩!

santienchang 附帶上了此圖片:

向版主報告此篇 |

查IP位址

Old Post

2017-07-03 14:11

santienchang 現在離線

點選這裡給 santienchang 傳送一條短訊

查找更多關於 santienchang 的文章

增加 santienchang 至你的好友列表

編輯/刪除訊息

引用回覆

cgjj
總版主

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

引用:
最初由 santienchang 發表
[IMG]http://[/IMG]

如圖示請幫忙.謝謝感恩!

很抱歉，你的描述實在無法看懂
不確定您要做什麼，故恕難協助

向版主報告此篇 |

查IP位址

Old Post

2017-07-03 15:21

cgjj 現在離線

點選這裡給 cgjj 傳送一條短訊

查找更多關於 cgjj 的文章

增加 cgjj 至你的好友列表

編輯/刪除訊息

引用回覆

santienchang
資深會員

註冊日期: May 2011
來　　自: 台中
文章數量: 164

我要如圖K棒最高價突破過上線5點
.顯示下線.不顯示上線.
反之K棒最低價跌破過下線5點
顯示上線.不顯示下線.
謝謝!總版主

santienchang 附帶上了此圖片:

向版主報告此篇 |

查IP位址

Old Post

2017-07-13 00:30

santienchang 現在離線

點選這裡給 santienchang 傳送一條短訊

查找更多關於 santienchang 的文章

增加 santienchang 至你的好友列表

編輯/刪除訊息

引用回覆

cgjj
總版主

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

引用:
最初由 santienchang 發表
我要如圖K棒最高價突破過上線5點
.顯示下線.不顯示上線.
反之K棒最低價跌破過下線5點
顯示上線.不顯示下線.
謝謝!總版主

上線和下線都是用大K最終值向前畫水平線的
也就是說，水平梯線它有用到未來數據

在這樣的情況下
直接用水平梯線當根數值，去和當根K棒價格比較高低是沒有意義的

向版主報告此篇 |

查IP位址

Old Post

2017-07-13 08:52

cgjj 現在離線

點選這裡給 cgjj 傳送一條短訊

查找更多關於 cgjj 的文章

增加 cgjj 至你的好友列表

編輯/刪除訊息

引用回覆

santienchang
資深會員

註冊日期: May 2011
來　　自: 台中
文章數量: 164

引用:
最初由 cgjj 發表
上線和下線都是用大K最終值向前畫水平線的
也就是說，水平梯線它有用到未來數據

在這樣的情況下
直接用水平梯線當根數值，去和當根K棒價格比較高低是沒有意義的

水平延伸未來區是主觀參考用!
當下這階數遽是上階計算出成固定值.與
當下大K做比對+-5.這樣可以嗎?
感謝指導

向版主報告此篇 |

查IP位址

Old Post

2017-07-13 13:59

santienchang 現在離線

點選這裡給 santienchang 傳送一條短訊

查找更多關於 santienchang 的文章

增加 santienchang 至你的好友列表

編輯/刪除訊息

引用回覆

cgjj
總版主

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

引用:
最初由 santienchang 發表
水平延伸未來區是主觀參考用!
當下這階數遽是上階計算出成固定值.與
當下大K做比對+-5.這樣可以嗎?
感謝指導

那必需你原來算的東西，本身就符合這特性才可行

向版主報告此篇 |

查IP位址

Old Post

2017-07-13 14:27

cgjj 現在離線

點選這裡給 cgjj 傳送一條短訊

查找更多關於 cgjj 的文章

增加 cgjj 至你的好友列表

編輯/刪除訊息

引用回覆

santienchang
資深會員

註冊日期: May 2011
來　　自: 台中
文章數量: 164

引用:
最初由 cgjj 發表
那必需你原來算的東西，本身就符合這特性才可行

末6行就是這樣計算的.
要如何顯示與不顯示?.謝謝先!

向版主報告此篇 |

查IP位址

Old Post

2017-07-13 23:19

santienchang 現在離線

點選這裡給 santienchang 傳送一條短訊

查找更多關於 santienchang 的文章

增加 santienchang 至你的好友列表

編輯/刪除訊息

引用回覆

cgjj
總版主

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

引用:
最初由 santienchang 發表
末6行就是這樣計算的.
要如何顯示與不顯示?.謝謝先!

您給的程序
H3gM:=SETVAL(BKLT,H3gM,-BKFTSP,H3gM)linethick;;
L3gM:=SETVAL(BKLT,L3gM,-BKFTSP,L3gM)linethick;
SS:=(CLOSE>=H3gM+4)-(CLOSE<=L3gM-4);
SS:=REF(SS,BARSLAST(SS<>0));
RML:=REF(L3gM,BARSLAST(L3gM<>REF(L3gM,1))+1);
RMH:=REF(H3gM,BARSLAST(H3gM<>REF(H3gM,1))+1);
CK:=SUM(TIME>084500 and TIME<=100600,2)=2;
PARTLINE(SS=1 and L3gM>RML-1 and CK,L3gM),color00ff00 shift1;
PARTLINE(SS=-1 and H3gM<RMH+1 and CK,H3gM),color00ff00 shift1;
畫的線並沒有那樣算唷，請看清楚~~

向版主報告此篇 |

查IP位址

Old Post

2017-07-14 08:48

cgjj 現在離線

點選這裡給 cgjj 傳送一條短訊

查找更多關於 cgjj 的文章

增加 cgjj 至你的好友列表

編輯/刪除訊息

引用回覆

santienchang
資深會員

註冊日期: May 2011
來　　自: 台中
文章數量: 164

一次給多個動作.有亂掉抱歉!

第一樓原碼是您協助的.確實是我要的昨區計算右移今開盤區(請再查閱如不是請指正?)

因第一樓漏貼.所要的動作.所以再補上第三樓這段(我要像這樣在盤中用時間控制顯示或不顯示上下階梯線)
在此很感謝總版主熱心幫忙.感恩!

向版主報告此篇 |

查IP位址

Old Post

2017-07-17 00:15

santienchang 現在離線

點選這裡給 santienchang 傳送一條短訊

查找更多關於 santienchang 的文章

增加 santienchang 至你的好友列表

編輯/刪除訊息

引用回覆

santienchang
資深會員

註冊日期: May 2011
來　　自: 台中
文章數量: 164

簡言說目前一樓原碼階梯是開盤畫到收盤
如今要增加一動作:如何在
08:45~10:06顯示階梯線.其他時間不顯示階梯線

向版主報告此篇 |

查IP位址

Old Post

2017-07-17 00:33

santienchang 現在離線

點選這裡給 santienchang 傳送一條短訊

查找更多關於 santienchang 的文章

增加 santienchang 至你的好友列表

編輯/刪除訊息

引用回覆

cgjj
總版主

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

引用:
最初由 santienchang 發表
簡言說目前一樓原碼階梯是開盤畫到收盤
如今要增加一動作:如何在
08:45~10:06顯示階梯線.其他時間不顯示階梯線

原碼:DESP:=BARSLAST(DATE<>REF(DATE,1));
//3K
FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]-12;
FirstSP:=BARSLAST(FirstCK);
BKFT:=MOD(FirstSP,3)=0;
BKFTSP:=BARSLAST(BKFT);
BKLT:=MOD(FirstSP,3)=3-1 or ISLASTBAR;
BKH:=HHV(HIGH,BKFTSP+1);
BKL:=LLV(LOW,BKFTSP+1);
BKH:=SETVAL(BKLT,BKH,-BKFTSP,BKH);
BKL:=SETVAL(BKLT,BKL,-BKFTSP,BKL);
SH1:=(REF(BKH,4)+REF(BKH,1)*2)/3;
SH2:=(SH1*3+(SH1-REF(BKH,1)))/3;
SHH:IF(SH1<REF(BKH,1),SH1,SH2) colorred linethick;
SL1:=(REF(BKL,4)+REF(BKL,1)*2)/3;
SL2:=(SL1*3-(REF(BKL,1)-SL1))/3;
SLL:IF(SL1>REF(BKL,1),SL1,SL2) colorgreen linethick;
CK:=SUM(TIME>084500 and TIME<=100600,2)=2;
PARTLINE(CK,SHH) colorred;
PARTLINE(CK,SLL) colorgreen;

向版主報告此篇 |

查IP位址

Old Post

2017-07-17 08:52

cgjj 現在離線

點選這裡給 cgjj 傳送一條短訊

查找更多關於 cgjj 的文章

增加 cgjj 至你的好友列表

編輯/刪除訊息

引用回覆

全部時間均為台灣時間, 現在時間為01:35

發表新主題

回覆主題

上一主題下一主題

顯示可列印版本 |

訂閱此主題

論壇跳轉:

主題評分:

論壇規定:

你不可以發表新主題
你不可以回覆文章
你不可以上傳附件
你不可以編輯自己的文章

HTML語法禁止
vB 語法核准
表情符號核准
貼圖語法[IMG]核准

本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。

Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行製作 Copyright 2003-. All Rights Reserved. 聯絡我們