到奇狐勝券首頁 奇狐社區論壇 購買奇狐勝券 試用奇狐勝券
 
論壇首頁 你可以在這裡編輯你的資料，查看短訊，訂閱主題和論壇參數等等 免費會員註冊 會員列表 論壇幫助 論壇日曆 論壇搜索 加入我的最愛 登出論壇  
奇狐社區論壇 : Powered by vBulletin version 2.3.0 奇狐社區論壇 > 指標公式 > 問題交流 > [問題]
總頁數 (2): « 1 [2]   上一主題   下一主題
作者
主題 發表新主題    回覆主題
santienchang
資深會員

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

引用:
最初由 cgjj 發表
這要問您自己呀
該段程式碼, 是您自己提供的


DESP:=barslast(date<>ref(date,1));
//3K
FirstCK:=barpos=datacount-DESP[datacount]-2;
FirstSP:=barslast(FirstCK);
BKFT:=MOD(FirstSP,3)=0;
BKFTSP:=barslast(BKFT);
BKLT:=MOD(FirstSP,3)=3-1 or islastbar;
BKH:=HHV(H,BKFTSP+1);
BKL:=LLV(L,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;
H3KM:IF(BKH<>MMH,MAH,MMH),colorFFFFFF;
L3KM:IF(BKL<>MML,MAL,MML),colorFFFFFF;
LBMH:=lbound(H3KM);
IF LBMH>0 then begin
SetNewLB:=LBMH-BKFTSP[LBMH];
x:=SETLBOUND(H3KM,SetNewLB); x:=SETLBOUND(L3KM,SetNewLB);
end;
H3KM:=SETVAL(BKLT,H3KM,-BKFTSP,H3KM);
L3KM:=SETVAL(BKLT,L3KM,-BKFTSP,L3KM);
抱歉!愚拙??想用之前您給我隱藏線段方式
.http://www.chiefox.com.tw/bbs/showt...ht=santienchang
套在上方語法用.謝謝您!

向版主報告此篇 | 查IP位址
Old Post 2014-04-30 14:15
santienchang 現在離線 點選這裡查看 santienchang 的個人資料 點選這裡給 santienchang 傳送一條短訊 查找更多關於 santienchang 的文章 增加 santienchang 至你的好友列表 編輯/刪除訊息 引用回覆
cgjj
總版主

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

引用:
最初由 santienchang 發表
DESP:=barslast(date<>ref(date,1));
//3K
FirstCK:=barpos=datacount-DESP[datacount]-2;
FirstSP:=barslast(FirstCK);
BKFT:=MOD(FirstSP,3)=0;
BKFTSP:=barslast(BKFT);
BKLT:=MOD(FirstSP,3)=3-1 or islastbar;
BKH:=HHV(H,BKFTSP+1);
BKL:=LLV(L,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;
H3KM:IF(BKH<>MMH,MAH,MMH),colorFFFFFF;
L3KM:IF(BKL<>MML,MAL,MML),colorFFFFFF;
LBMH:=lbound(H3KM);
IF LBMH>0 then begin
SetNewLB:=LBMH-BKFTSP[LBMH];
x:=SETLBOUND(H3KM,SetNewLB); x:=SETLBOUND(L3KM,SetNewLB);
end;
H3KM:=SETVAL(BKLT,H3KM,-BKFTSP,H3KM);
L3KM:=SETVAL(BKLT,L3KM,-BKFTSP,L3KM);
抱歉!愚拙??想用之前您給我隱藏線段方式
.http://www.chiefox.com.tw/bbs/showt...ht=santienchang
套在上方語法用.謝謝您!



PARTLINE(H<H3KM,H3KM),color00FF00;
PARTLINE(L>L3KM,L3KM),color00FF00;

向版主報告此篇 | 查IP位址
Old Post 2014-04-30 14:28
cgjj 現在離線 點選這裡查看 cgjj 的個人資料 點選這裡給 cgjj 傳送一條短訊 查找更多關於 cgjj 的文章 增加 cgjj 至你的好友列表 編輯/刪除訊息 引用回覆
santienchang
資深會員

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

引用:
最初由 cgjj 發表
PARTLINE(H<H3KM,H3KM),color00FF00;
PARTLINE(L>L3KM,L3KM),color00FF00;


DESP:=barslast(date<>ref(date,1));
//3K
FirstCK:=barpos=datacount-DESP[datacount]-27;
FirstSP:=barslast(FirstCK);
BKFT:=MOD(FirstSP,3)=0;
BKFTSP:=barslast(BKFT);
BKLT:=MOD(FirstSP,3)=3-1 or islastbar;
BKH:=HHV(H,BKFTSP+1);
BKL:=LLV(L,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),color00ff00;
L3gM:IF(BKL<MML,MAL,MML),color00ff00;
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);

當日盤中多3分鐘階梯上下兩線要從10:06這根開始顯示直到10:30止
9根以後不顯示例如(時分秒=091200始)~(時分秒=093900止)~請板主協助.謝謝!

向版主報告此篇 | 查IP位址
Old Post 2014-10-28 23:29
santienchang 現在離線 點選這裡查看 santienchang 的個人資料 點選這裡給 santienchang 傳送一條短訊 查找更多關於 santienchang 的文章 增加 santienchang 至你的好友列表 編輯/刪除訊息 引用回覆
cgjj
總版主

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

引用:
最初由 santienchang 發表
DESP:=barslast(date<>ref(date,1));
//3K
FirstCK:=barpos=datacount-DESP[datacount]-27;
FirstSP:=barslast(FirstCK);
BKFT:=MOD(FirstSP,3)=0;
BKFTSP:=barslast(BKFT);
BKLT:=MOD(FirstSP,3)=3-1 or islastbar;
BKH:=HHV(H,BKFTSP+1);
BKL:=LLV(L,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),color00ff00;
L3gM:IF(BKL<MML,MAL,MML),color00ff00;
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);

當日盤中多3分鐘階梯上下兩線要從10:06這根開始顯示直到10:30止
9根以後不顯示例如(時分秒=091200始)~(時分秒=093900止)~請板主協助.謝謝! 


原碼:


DESP:=barslast(date<>ref(date,1));

//3K

FirstCK:=barpos=datacount-DESP[datacount]-27;

FirstSP:=barslast(FirstCK);

BKFT:=MOD(FirstSP,3)=0;

BKFTSP:=barslast(BKFT);

BKLT:=MOD(FirstSP,3)=3-1 or islastbar;

BKH:=HHV(H,BKFTSP+1);

BKL:=LLV(L,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),color00ff00 linethick0;

L3gM:IF(BKL<MML,MAL,MML),color00ff00 linethick0;

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);

PARTLINE(time>100600 and time<=103000,H3gM) color00ff00;

PARTLINE(time>100600 and time<=103000,L3gM) color00ff00;

向版主報告此篇 | 查IP位址
Old Post 2014-10-29 09:29
cgjj 現在離線 點選這裡查看 cgjj 的個人資料 點選這裡給 cgjj 傳送一條短訊 查找更多關於 cgjj 的文章 增加 cgjj 至你的好友列表 編輯/刪除訊息 引用回覆
santienchang
資深會員

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

謝謝板主協助.!感恩!

向版主報告此篇 | 查IP位址
Old Post 2014-10-31 16:23
santienchang 現在離線 點選這裡查看 santienchang 的個人資料 點選這裡給 santienchang 傳送一條短訊 查找更多關於 santienchang 的文章 增加 santienchang 至你的好友列表 編輯/刪除訊息 引用回覆
santienchang
資深會員

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

//6K
FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]-81;
FirstSP:=BARSLAST(FirstCK);
BKFT:=MOD(FirstSP,9)=0;
BKFTSP:=BARSLAST(BKFT);
BKLT:=MOD(FirstSP,9)=9-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;
H6KM:IF(BKH<>MMH,MAH,MMH),linethick0;
L6KM:IF(BKL<>MML,MAL,MML),linethick0;
LBMH:=LBOUND(H6KM);
IF LBMH>0 then begin
SetNewLB:=LBMH-BKFTSP[LBMH];
x:=SETLBOUND(H6KM,SetNewLB); x:=SETLBOUND(L6KM,SetNewLB);
end;
H6KM:=SETVAL(BKLT,H6KM,-BKFTSP,H6KM);
L6KM:=SETVAL(BKLT,L6KM,-BKFTSP,L6KM);
PARTLINE(TIME>093900 and TIME<=103300,H6KM) color00FFFF;
PARTLINE(TIME>093900 and TIME<=103300,L6KM) color00FFFF;
((PARTLINE(TIME>112700 and TIME<=134200,H6KM) color00FFFF;))
((PARTLINE(TIME>112700 and TIME<=134200,L6KM) color00FFFF;))
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
可以再增加下面這一段時間顯示嗎?謝謝!

向版主報告此篇 | 查IP位址
Old Post 2014-12-02 13:28
santienchang 現在離線 點選這裡查看 santienchang 的個人資料 點選這裡給 santienchang 傳送一條短訊 查找更多關於 santienchang 的文章 增加 santienchang 至你的好友列表 編輯/刪除訊息 引用回覆
cgjj
總版主

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

引用:
最初由 santienchang 發表
//6K
FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]-81;
FirstSP:=BARSLAST(FirstCK);
BKFT:=MOD(FirstSP,9)=0;
BKFTSP:=BARSLAST(BKFT);
BKLT:=MOD(FirstSP,9)=9-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;
H6KM:IF(BKH<>MMH,MAH,MMH),linethick0;
L6KM:IF(BKL<>MML,MAL,MML),linethick0;
LBMH:=LBOUND(H6KM);
IF LBMH>0 then begin
SetNewLB:=LBMH-BKFTSP[LBMH];
x:=SETLBOUND(H6KM,SetNewLB); x:=SETLBOUND(L6KM,SetNewLB);
end;
H6KM:=SETVAL(BKLT,H6KM,-BKFTSP,H6KM);
L6KM:=SETVAL(BKLT,L6KM,-BKFTSP,L6KM);
PARTLINE(TIME>093900 and TIME<=103300,H6KM) color00FFFF;
PARTLINE(TIME>093900 and TIME<=103300,L6KM) color00FFFF;
((PARTLINE(TIME>112700 and TIME<=134200,H6KM) color00FFFF;))
((PARTLINE(TIME>112700 and TIME<=134200,L6KM) color00FFFF;))
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
可以再增加下面這一段時間顯示嗎?謝謝!


您不是已經寫出來了嗎? (把多餘的括號去除即可)

向版主報告此篇 | 查IP位址
Old Post 2014-12-02 13:57
cgjj 現在離線 點選這裡查看 cgjj 的個人資料 點選這裡給 cgjj 傳送一條短訊 查找更多關於 cgjj 的文章 增加 cgjj 至你的好友列表 編輯/刪除訊息 引用回覆
santienchang
資深會員

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

FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]-81;
FirstSP:=BARSLAST(FirstCK);
BKFT:=MOD(FirstSP,9)=0;
BKFTSP:=BARSLAST(BKFT);
BKLT:=MOD(FirstSP,9)=9-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;
H6KM:IF(BKH<>MMH,MAH,MMH),linethick0;
L6KM:IF(BKL<>MML,MAL,MML),linethick0;
LBMH:=LBOUND(H6KM);
IF LBMH>0 then begin
SetNewLB:=LBMH-BKFTSP[LBMH];
x:=SETLBOUND(H6KM,SetNewLB); x:=SETLBOUND(L6KM,SetNewLB);
end;
H6KM:=SETVAL(BKLT,H6KM,-BKFTSP,H6KM);
L6KM:=SETVAL(BKLT,L6KM,-BKFTSP,L6KM);
PARTLINE(TIME>084800 and TIME<=134500,H6KM) color00FFFF;
PARTLINE(TIME>084800 and TIME<=134500,L6KM) color00FFFF

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
請教總板主
如在多3分圖使用多組?例如:
BKFT:=MOD(FirstSP,3)=0;
BKFTSP:=BARSLAST(BKFT);
BKLT:=MOD(FirstSP,3)=3-1 or ISLASTBAR
開始3.6.9.12.15.18.21.24.27........等等多組可以把語法簡化嗎?
太多組跑不動.謝謝!

向版主報告此篇 | 查IP位址
Old Post 2015-01-06 14:25
santienchang 現在離線 點選這裡查看 santienchang 的個人資料 點選這裡給 santienchang 傳送一條短訊 查找更多關於 santienchang 的文章 增加 santienchang 至你的好友列表 編輯/刪除訊息 引用回覆
cgjj
總版主

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

引用:
最初由 santienchang 發表
FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]-81;
FirstSP:=BARSLAST(FirstCK);
BKFT:=MOD(FirstSP,9)=0;
BKFTSP:=BARSLAST(BKFT);
BKLT:=MOD(FirstSP,9)=9-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;
H6KM:IF(BKH<>MMH,MAH,MMH),linethick0;
L6KM:IF(BKL<>MML,MAL,MML),linethick0;
LBMH:=LBOUND(H6KM);
IF LBMH>0 then begin
SetNewLB:=LBMH-BKFTSP[LBMH];
x:=SETLBOUND(H6KM,SetNewLB); x:=SETLBOUND(L6KM,SetNewLB);
end;
H6KM:=SETVAL(BKLT,H6KM,-BKFTSP,H6KM);
L6KM:=SETVAL(BKLT,L6KM,-BKFTSP,L6KM);
PARTLINE(TIME>084800 and TIME<=134500,H6KM) color00FFFF;
PARTLINE(TIME>084800 and TIME<=134500,L6KM) color00FFFF

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
請教總板主
如在多3分圖使用多組?例如:
BKFT:=MOD(FirstSP,3)=0;
BKFTSP:=BARSLAST(BKFT);
BKLT:=MOD(FirstSP,3)=3-1 or ISLASTBAR
開始3.6.9.12.15.18.21.24.27........等等多組可以把語法簡化嗎?
太多組跑不動.謝謝!


既然放太多組跑不動，就改放少組一點
需求 vs 效能 必需要有所取捨

向版主報告此篇 | 查IP位址
Old Post 2015-01-06 18:33
cgjj 現在離線 點選這裡查看 cgjj 的個人資料 點選這裡給 cgjj 傳送一條短訊 查找更多關於 cgjj 的文章 增加 cgjj 至你的好友列表 編輯/刪除訊息 引用回覆
santienchang
資深會員

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

引用:
最初由 cgjj 發表
既然放太多組跑不動，就改放少組一點
需求 vs 效能 必需要有所取捨


原想說是倍數週期有簡易代數語法.
雖未達所需.還是謝謝您!並祝總板主
及奇狐同仁~~.新年快樂!身心健康!~~~

向版主報告此篇 | 查IP位址
Old Post 2015-01-06 20:50
santienchang 現在離線 點選這裡查看 santienchang 的個人資料 點選這裡給 santienchang 傳送一條短訊 查找更多關於 santienchang 的文章 增加 santienchang 至你的好友列表 編輯/刪除訊息 引用回覆
全部時間均為台灣時間, 現在時間為06:19 發表新主題    回覆主題
總頁數 (2): « 1 [2]   上一主題   下一主題
顯示可列印版本 | 訂閱此主題

論壇跳轉:
主題評分:

論壇規定:
你不可以發表新主題
你不可以回覆文章
你不可以上傳附件
你不可以編輯自己的文章 		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.  聯絡我們