 |
santienchang
資深會員
註冊日期: May 2011
來 自: 台中
文章數量: 164 |
[求救]
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連線價為突跌破謝謝您!
santienchang 附帶上了此圖片:
|
|
向版主報告此篇 |  |
|
2014-07-28 14:24 |
|
|
|  |
 |
cgjj
總版主

註冊日期: Oct 2003
來 自:
文章數量: 18167 |
回覆: [求救]
引用: 最初由 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?
|
|
向版主報告此篇 |  |
|
2014-07-28 14:55 |
|
|
|  |
 |
santienchang
資深會員
註冊日期: May 2011
來 自: 台中
文章數量: 164 |
回覆: 回覆: [求救]
引用: 最初由 cgjj 發表
以MH或 ML 繪製嗎?
起畫點如何決定 要取 MH? 還是取 ML?
是以MH 與 ML 繪製
以開盤開始.價=>MH顯示 ML .......直到下次價=<ML變成顯示MH循環
以開盤開始.價=<ML顯示 MH .......直到下次價=>MH變成顯示ML循環
上方數值保持顯示.謝謝總板主.
|
|
向版主報告此篇 |  |
|
2014-07-28 22:41 |
|
|
|  |
 |
cgjj
總版主

註冊日期: Oct 2003
來 自:
文章數量: 18167 |
回覆: 回覆: 回覆: [求救]
引用: 最初由 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;
|
|
向版主報告此篇 |  |
|
2014-07-29 09:39 |
|
|
|  |
 |
santienchang
資深會員
註冊日期: May 2011
來 自: 台中
文章數量: 164 |
上方變數值沒顯示?
SS:=(C-1>=MH)-(C+1<=ML);..........這樣加入收過MH+1點?
收破低ML-1點?對嗎?
(SS=-1,MH).........=-1是什麼意思?
謝謝總板主.教導.
|
|
向版主報告此篇 |  |
|
2014-07-29 12:08 |
|
|
|  |
 |
cgjj
總版主

註冊日期: Oct 2003
來 自:
文章數量: 18167 |
引用: 最初由 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
|
|
向版主報告此篇 |  |
|
2014-07-29 12:48 |
|
|
|  |
 |
santienchang
資深會員
註冊日期: May 2011
來 自: 台中
文章數量: 164 |
引用: 最初由 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;
不同周期顯現上方變數值會亂掉?這要從何區修改?讓各
周期顏色各顯現在上方謝謝.
|
|
向版主報告此篇 |  |
|
2014-07-30 01:20 |
|
|
|  |
 |
santienchang
資深會員
註冊日期: May 2011
來 自: 台中
文章數量: 164 |
引用: 最初由 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變數值就錯誤?
希望不受循環影響兩組變數值全顯示出來
謝謝您的協助.
|
|
向版主報告此篇 |  |
|
2014-07-30 09:18 |
|
|
|  |
 |
cgjj
總版主

註冊日期: Oct 2003
來 自:
文章數量: 18167 |
引用: 最初由 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;
|
|
向版主報告此篇 |  |
|
2014-07-30 09:44 |
|
|
|  |
 |
santienchang
資深會員
註冊日期: May 2011
來 自: 台中
文章數量: 164 |
抱歉意開盤後失忽短漏貼部份.請查問題所在謝謝!
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;
|
|
向版主報告此篇 |  |
|
2014-07-30 10:00 |
|
|
|  |
 |
cgjj
總版主

註冊日期: Oct 2003
來 自:
文章數量: 18167 |
引用: 最初由 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 三個關鍵數字,這可能就是問題根源
對錯要問您自己為何如此配置?
|
|
向版主報告此篇 |  |
|
2014-07-30 10:06 |
|
|
|  |
本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。
|
Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved. 聯絡我們
|