奇狐社區論壇
在這個頁面顯示本主題全部的 12 個文章

奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- [求救] (http://www.chiefox.com.tw/bbs/showthread.php?threadid=18714)

由 santienchang 在 2014-07-28 14:24 發表:

[求救]

DESP:=BARSLAST(DATE<>REF(DATE,1));
FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]+3;
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);
//VERTLINE(BKLT) LINEDOT;
BK3SP:=SUMBARS(BKLT,3);
MAH3:=SUM(BKH*BKLT,BK3SP)/3;
MAL3:=SUM(BKL*BKLT,BK3SP)/3;
MMH3:=MAH3+(MAH3-BKH)/3;
MML3:=MAL3-(BKL-MAL3)/3;
MH:IF(BKH>MMH3,MAH3,MMH3),colorFFFFFF;
ML:IF(BKL<MML3,MAL3,MML3),colorFFFFFF;
LBMH:=LBOUND(MH);
IF LBMH>0 then begin
SetNewLB:=LBMH-BKFTSP[LBMH];
x:=SETLBOUND(MH,SetNewLB); x:=SETLBOUND(ML,SetNewLB);
end;
MH:=SETVAL(BKLT,MH,-BKFTSP,MH);
ML:=SETVAL(BKLT,ML,-BKFTSP,ML);

煩總板主幫我改成如圖在多分視窗改為1.~2一循環(=或><即變換顯
示或不顯示).盤中上下線會上仰或下仰以上一3連線價為突跌破謝謝您!

由 cgjj 在 2014-07-28 14:55 發表:

回覆: [求救]

引用:
最初由 santienchang 發表
DESP:=BARSLAST(DATE<>REF(DATE,1));
FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]+3;
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);
//VERTLINE(BKLT) LINEDOT;
BK3SP:=SUMBARS(BKLT,3);
MAH3:=SUM(BKH*BKLT,BK3SP)/3;
MAL3:=SUM(BKL*BKLT,BK3SP)/3;
MMH3:=MAH3+(MAH3-BKH)/3;
MML3:=MAL3-(BKL-MAL3)/3;
MH:IF(BKH>MMH3,MAH3,MMH3),colorFFFFFF;
ML:IF(BKL<MML3,MAL3,MML3),colorFFFFFF;
LBMH:=LBOUND(MH);
IF LBMH>0 then begin
SetNewLB:=LBMH-BKFTSP[LBMH];
x:=SETLBOUND(MH,SetNewLB); x:=SETLBOUND(ML,SetNewLB);
end;
MH:=SETVAL(BKLT,MH,-BKFTSP,MH);
ML:=SETVAL(BKLT,ML,-BKFTSP,ML);

煩總板主幫我改成如圖在多分視窗改為1.~2一循環(=或><即變換顯
示或不顯示).盤中上下線會上仰或下仰以上一3連線價為突跌破謝謝您!


以 MH 或 ML 繪製嗎?
起畫點如何決定 要取 MH? 還是取 ML?

由 santienchang 在 2014-07-28 22:41 發表:

回覆: 回覆: [求救]

引用:
最初由 cgjj 發表
以MH或 ML 繪製嗎?
起畫點如何決定 要取 MH? 還是取 ML?

是以MH 與 ML 繪製
以開盤開始.價=>MH顯示 ML .......直到下次價=<ML變成顯示MH循環
以開盤開始.價=<ML顯示 MH .......直到下次價=>MH變成顯示ML循環
上方數值保持顯示.謝謝總板主.

由 cgjj 在 2014-07-29 09:39 發表:

回覆: 回覆: 回覆: [求救]

引用:
最初由 santienchang 發表
是以MH 與 ML 繪製
以開盤開始.價=>MH顯示 ML .......直到下次價=<ML變成顯示MH循環
以開盤開始.價=<ML顯示 MH .......直到下次價=>MH變成顯示ML循環
上方數值保持顯示.謝謝總板主.


DESP:=BARSLAST(DATE<>REF(DATE,1));
FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]+3;
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);
//VERTLINE(BKLT) LINEDOT;
BK3SP:=SUMBARS(BKLT,3);
MAH3:=SUM(BKH*BKLT,BK3SP)/3;
MAL3:=SUM(BKL*BKLT,BK3SP)/3;
MMH3:=MAH3+(MAH3-BKH)/3;
MML3:=MAL3-(BKL-MAL3)/3;
MH:=IF(BKH>MMH3,MAH3,MMH3),colorFFFFFF;
ML:=IF(BKL<MML3,MAL3,MML3),colorFFFFFF;
LBMH:=LBOUND(MH);
IF LBMH>0 then begin
SetNewLB:=LBMH-BKFTSP[LBMH];
x:=SETLBOUND(MH,SetNewLB); x:=SETLBOUND(ML,SetNewLB);
end;
MH:=SETVAL(BKLT,MH,-BKFTSP,MH);
ML:=SETVAL(BKLT,ML,-BKFTSP,ML);
SS:=(C>=MH)-(C<=ML);
SS:=ref(SS,barslast(SS<>0));
PARTLINE(SS=1,ML) colorgreen;
PARTLINE(SS=-1,MH) colorred;

由 santienchang 在 2014-07-29 12:08 發表:

上方變數值沒顯示?
SS:=(C-1>=MH)-(C+1<=ML);..........這樣加入收過MH+1點?
收破低ML-1點?對嗎?
(SS=-1,MH).........=-1是什麼意思?
謝謝總板主.教導.

由 cgjj 在 2014-07-29 12:48 發表:

引用:
最初由 santienchang 發表
上方變數值沒顯示?
SS:=(C-1>=MH)-(C+1<=ML);..........這樣加入收過MH+1點?
收破低ML-1點?對嗎?
(SS=-1,MH).........=-1是什麼意思?
謝謝總板主.教導.


Re: 上方變數值沒顯示?

將
MH:=IF(BKH>MMH3,MAH3,MMH3),colorFFFFFF;
ML:=IF(BKL<MML3,MAL3,MML3),colorFFFFFF;
改為
MH:IF(BKH>MMH3,MAH3,MMH3) colorred linethick0;
ML:IF(BKL<MML3,MAL3,MML3) colorgreen linethick0;

Re: 這樣加入收過MH+1點? 收破低ML-1點?對嗎?
改這樣 (C>=MH+1)-(C<=ML-1)
會比 (C-1>=MH)-(C+1<=ML)
來的更直覺些...

Re:-1是什麼意思?
代表該處要畫 MH

由 santienchang 在 2014-07-30 01:20 發表:

引用:
最初由 cgjj 發表
Re: 上方變數值沒顯示?

將
MH:=IF(BKH>MMH3,MAH3,MMH3),colorFFFFFF;
ML:=IF(BKL<MML3,MAL3,MML3),colorFFFFFF;
改為
MH:IF(BKH>MMH3,MAH3,MMH3) colorred linethick0;
ML:IF(BKL<MML3,MAL3,MML3) colorgreen linethick0;

Re: 這樣加入收過MH+1點? 收破低ML-1點?對嗎?
改這樣 (C>=MH+1)-(C<=ML-1)
會比 (C-1>=MH)-(C+1<=ML)
來的更直覺些...

Re:-1是什麼意思?
代表該處要畫 MH

這樣明白.
用同樣語法套不同周期在同多分窗使用?
MH:IF(BKH>MMH3,MAH3,MMH3) colorred linethick0;
ML:IF(BKL<MML3,MAL3,MML3) colorgreen linethick0;
不同周期顯現上方變數值會亂掉?這要從何區修改?讓各
周期顏色各顯現在上方謝謝.

由 cgjj 在 2014-07-30 08:35 發表:

引用:
最初由 santienchang 發表
這樣明白.
用同樣語法套不同周期在同多分窗使用?
MH:IF(BKH>MMH3,MAH3,MMH3) colorred linethick0;
ML:IF(BKL<MML3,MAL3,MML3) colorgreen linethick0;
不同周期顯現上方變數值會亂掉?這要從何區修改?讓各
周期顏色各顯現在上方謝謝.


何謂亂掉? 何謂 "套不同周期在同多分窗" ....
請詳述，如此簡短敘述很難理解您在說什麼
建議舉實例說明

由 santienchang 在 2014-07-30 09:18 發表:

引用:
最初由 cgjj 發表
何謂亂掉? 何謂 "套不同周期在同多分窗" ....
請詳述，如此簡短敘述很難理解您在說什麼
建議舉實例說明

DESP:=BARSLAST(DATE<>REF(DATE,1));
FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]-9;
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);
//VERTLINE(BKLT) LINEDOT;
BK3SP:=SUMBARS(BKLT,3);
MAH3:=SUM(BKH*BKLT,BK3SP)/3;
MAL3:=SUM(BKL*BKLT,BK3SP)/3;
MMH3:=MAH3+(MAH3-BKH)/3;
MML3:=MAL3-(BKL-MAL3)/3;
MH:IF(BKH>MMH3,MAH3,MMH3)colorred linethick0;
ML:IF(BKL<MML3,MAL3,MML3)colorred linethick0;
LBMH:=LBOUND(MH);
IF LBMH>0 then begin
SetNewLB:=LBMH-BKFTSP[LBMH];
x:=SETLBOUND(MH,SetNewLB); x:=SETLBOUND(ML,SetNewLB);
end;
MH:=SETVAL(BKLT,MH,-BKFTSP,MH);
ML:=SETVAL(BKLT,ML,-BKFTSP,ML);
SS:=(C-1>=MH+1)-(C+1<=ML-1);
SS:=REF(SS,BARSLAST(SS<>0));
PARTLINE(SS=1,ML) color0000ff;
PARTLINE(SS=-1,MH) color0000ff;


DESP:=BARSLAST(DATE<>REF(DATE,1));
FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]-15;
FirstSP:=BARSLAST(FirstCK);
BKFT:=MOD(FirstSP,5)=0;
BKFTSP:=BARSLAST(BKFT);
BKLT:=MOD(FirstSP,5)=5-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);
//VERTLINE(BKLT) LINEDOT;
BK3SP:=SUMBARS(BKLT,3);
MAH3:=SUM(BKH*BKLT,BK3SP)/3;
MAL3:=SUM(BKL*BKLT,BK3SP)/3;
MMH3:=MAH3+(MAH3-BKH)/3;
MML3:=MAL3-(BKL-MAL3)/3;
MH:=IF(BKH>MMH3,MAH3,MMH3)colorred colorwhite;
早盤開出5K.正確3K.ML變數值就錯誤?
希望不受循環影響兩組變數值全顯示出來
謝謝您的協助.

由 cgjj 在 2014-07-30 09:44 發表:

引用:
最初由 santienchang 發表
DESP:=BARSLAST(DATE<>REF(DATE,1));
FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]-9;
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);
//VERTLINE(BKLT) LINEDOT;
BK3SP:=SUMBARS(BKLT,3);
MAH3:=SUM(BKH*BKLT,BK3SP)/3;
MAL3:=SUM(BKL*BKLT,BK3SP)/3;
MMH3:=MAH3+(MAH3-BKH)/3;
MML3:=MAL3-(BKL-MAL3)/3;
MH:IF(BKH>MMH3,MAH3,MMH3)colorred linethick0;
ML:IF(BKL<MML3,MAL3,MML3)colorred linethick0;
LBMH:=LBOUND(MH);
IF LBMH>0 then begin
SetNewLB:=LBMH-BKFTSP[LBMH];
x:=SETLBOUND(MH,SetNewLB); x:=SETLBOUND(ML,SetNewLB);
end;
MH:=SETVAL(BKLT,MH,-BKFTSP,MH);
ML:=SETVAL(BKLT,ML,-BKFTSP,ML);
SS:=(C-1>=MH+1)-(C+1<=ML-1);
SS:=REF(SS,BARSLAST(SS<>0));
PARTLINE(SS=1,ML) color0000ff;
PARTLINE(SS=-1,MH) color0000ff;


DESP:=BARSLAST(DATE<>REF(DATE,1));
FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]-15;
FirstSP:=BARSLAST(FirstCK);
BKFT:=MOD(FirstSP,5)=0;
BKFTSP:=BARSLAST(BKFT);
BKLT:=MOD(FirstSP,5)=5-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);
//VERTLINE(BKLT) LINEDOT;
BK3SP:=SUMBARS(BKLT,3);
MAH3:=SUM(BKH*BKLT,BK3SP)/3;
MAL3:=SUM(BKL*BKLT,BK3SP)/3;
MMH3:=MAH3+(MAH3-BKH)/3;
MML3:=MAL3-(BKL-MAL3)/3;
MH:=IF(BKH>MMH3,MAH3,MMH3)colorred colorwhite;
早盤開出5K.正確3K.ML變數值就錯誤?
希望不受循環影響兩組變數值全顯示出來
謝謝您的協助.


那是您前面貼的此段程式第二部分配置錯誤所導致的問題

並非是這兩行所引起
MH:IF(BKH>MMH3,MAH3,MMH3) colorred linethick0;
ML:IF(BKL<MML3,MAL3,MML3) colorgreen linethick0;

由 santienchang 在 2014-07-30 10:00 發表:

抱歉意開盤後失忽短漏貼部份.請查問題所在謝謝!
DESP:=BARSLAST(DATE<>REF(DATE,1));
FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]-9;
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);
//VERTLINE(BKLT) LINEDOT;
BK3SP:=SUMBARS(BKLT,3);
MAH3:=SUM(BKH*BKLT,BK3SP)/3;
MAL3:=SUM(BKL*BKLT,BK3SP)/3;
MMH3:=MAH3+(MAH3-BKH)/3;
MML3:=MAL3-(BKL-MAL3)/3;
MH:IF(BKH>MMH3,MAH3,MMH3)colorred linethick0;
ML:IF(BKL<MML3,MAL3,MML3)colorred linethick0;
LBMH:=LBOUND(MH);
IF LBMH>0 then begin
SetNewLB:=LBMH-BKFTSP[LBMH];
x:=SETLBOUND(MH,SetNewLB); x:=SETLBOUND(ML,SetNewLB);
end;
MH:=SETVAL(BKLT,MH,-BKFTSP,MH);
ML:=SETVAL(BKLT,ML,-BKFTSP,ML);
SS:=(C-1>=MH+1)-(C+1<=ML-1);
SS:=REF(SS,BARSLAST(SS<>0));
PARTLINE(SS=1,ML) color0000ff;
PARTLINE(SS=-1,MH) color0000ff;


DESP:=BARSLAST(DATE<>REF(DATE,1));
FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]-15;
FirstSP:=BARSLAST(FirstCK);
BKFT:=MOD(FirstSP,5)=0;
BKFTSP:=BARSLAST(BKFT);
BKLT:=MOD(FirstSP,5)=5-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);
//VERTLINE(BKLT) LINEDOT;
BK3SP:=SUMBARS(BKLT,3);
MAH3:=SUM(BKH*BKLT,BK3SP)/3;
MAL3:=SUM(BKL*BKLT,BK3SP)/3;
MMH3:=MAH3+(MAH3-BKH)/3;
MML3:=MAL3-(BKL-MAL3)/3;
MH:=IF(BKH>MMH3,MAH3,MMH3)colorred colorwhite;
ML:=IF(BKL<MML3,MAL3,MML3)colorred colorwhite;
LBMH:=LBOUND(MH);
IF LBMH>0 then begin
SetNewLB:=LBMH-BKFTSP[LBMH];
x:=SETLBOUND(MH,SetNewLB); x:=SETLBOUND(ML,SetNewLB);
end;
MH:=SETVAL(BKLT,MH,-BKFTSP,MH);
ML:=SETVAL(BKLT,ML,-BKFTSP,ML);
SS:=(CLOSE>=MH+1)-(CLOSE<=ML-1);
SS:=REF(SS,BARSLAST(SS<>0));
PARTLINE(SS=1,ML) color666666;
PARTLINE(SS=-1,MH) color666666;

由 cgjj 在 2014-07-30 10:06 發表:

引用:
最初由 santienchang 發表
抱歉意開盤後失忽短漏貼部份.請查問題所在謝謝!


DESP:=BARSLAST(DATE<>REF(DATE,1));
FirstCK:=BARPOS=DATACOUNT-DESP[DATACOUNT]-15;
FirstSP:=BARSLAST(FirstCK);
BKFT:=MOD(FirstSP,5)=0;
BKFTSP:=BARSLAST(BKFT);
BKLT:=MOD(FirstSP,5)=5-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);
//VERTLINE(BKLT) LINEDOT;
BK3SP:=SUMBARS(BKLT,3);
MAH3:=SUM(BKH*BKLT,BK3SP)/3;
MAL3:=SUM(BKL*BKLT,BK3SP)/3;
MMH3:=MAH3+(MAH3-BKH)/3;
MML3:=MAL3-(BKL-MAL3)/3;
MH:=IF(BKH>MMH3,MAH3,MMH3)colorred colorwhite;
ML:=IF(BKL<MML3,MAL3,MML3)colorred colorwhite;
LBMH:=LBOUND(MH);
IF LBMH>0 then begin
SetNewLB:=LBMH-BKFTSP[LBMH];
x:=SETLBOUND(MH,SetNewLB); x:=SETLBOUND(ML,SetNewLB);
end;
MH:=SETVAL(BKLT,MH,-BKFTSP,MH);
ML:=SETVAL(BKLT,ML,-BKFTSP,ML);
SS:=(CLOSE>=MH+1)-(CLOSE<=ML-1);
SS:=REF(SS,BARSLAST(SS<>0));
PARTLINE(SS=1,ML) color666666;
PARTLINE(SS=-1,MH) color666666;


這一段
您用了 15, 5, 3 三個關鍵數字，這可能就是問題根源
對錯要問您自己為何如此配置?
全部時間均為台灣時間, 現在時間為17:46
在這個頁面顯示本主題全部的 12 個文章


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