|
yjl8895
資深會員
註冊日期: Jun 2009
來 自:
文章數量: 170 |
[問題]
版大好:
能否將下列週期的運算,再往後推到最後一支k棒,感激不盡。
AA:=REF(HIGH,8)=HHV(HIGH,2*8+1);
AAA:=FILTER(AA,8);
BB:=BACKSET(AAA,8+1);
CC1:=FILTER(BB,8);
CC:=CC1 OR ISLASTBAR;
AA2:=REF(LOW,8)=LLV(LOW,2*8+1);
AAA2:=FILTER(AA2,8);
BB2:=BACKSET(AAA2,8+1);
CC22:=FILTER(BB2,8);
CC2:=CC22 AND NOT(CC1);
EA:=BACKSET(CC,REF(BARSLAST(CC2),1)+1);
EB:=EA>REF(EA,1); EE:=BACKSET(EB,2);
FF1:=EE>REF(EE,1);
EE2:=BACKSET(FF1 AND COUNT(CC,REF(BARSLAST(CC2),1)+2)=0,REF(BARSLAST(CC2),1)+2);
FF2:=EE2>REF(EE2,1);
EE3:=BACKSET(FF2 AND COUNT(CC,REF(BARSLAST(CC2),1)+2)=0,REF(BARSLAST(CC2),1)+2);
FF3:=EE3>REF(EE3,1);
JS:=IF(CC,COUNT(CC2,REF(BARSLAST(CC),1)+1),0);
G1:=IF(JS=1 AND CC,BARSLAST(FF1),0);
GA:=IF(CC AND REF(LOW,BARSLAST(FF1))>=REF(LOW,BARSLAST(FF2)),BARSLAST(FF2),BARSLAST(FF1));
G2:=IF(JS=2 AND CC,GA,0);
G3:=IF(JS>=3 AND CC,IF(CC AND REF(LOW,GA)>=REF(LOW,BARSLAST(FF3)),BARSLAST(FF3),GA),0);
GG:=G1+G2+G3;
JA:=BACKSET(CC,GG); JB:=JA>REF(JA,1); JJ:=BACKSET(JB,2);
LD:=JJ>REF(JJ,1);
LD1:=LD OR ISLASTBAR;
hEA:=BACKSET(LD1,REF(BARSLAST(CC),1)+1);
hEB:=hEA>REF(hEA,1); hEE:=BACKSET(hEB,2);
hFF1:=hEE>REF(hEE,1);
hEE2:=BACKSET(hFF1 AND COUNT(LD1,REF(BARSLAST(CC),1)+2)=0,REF(BARSLAST(CC),1)+2);
hFF2:=hEE2>REF(hEE2,1);
hEE3:=BACKSET(hFF2 AND COUNT(LD1,REF(BARSLAST(CC),1)+2)=0,REF(BARSLAST(CC),1)+2);
hFF3:=hEE3>REF(hEE3,1);
hJS:=IF(LD1,COUNT(CC1,REF(BARSLAST(LD1),1)+1),0);
hG1:=IF(hJS=1 AND LD1,BARSLAST(hFF1),0);
hGA:=IF(LD1 AND REF(HIGH,BARSLAST(hFF1))<=REF(HIGH,BARSLAST(hFF2)),BARSLAST(hFF2),BARSLAST(hFF1));
hG2:=IF(hJS=2 AND LD1,hGA,0);
hG3:=IF(hJS>=3 AND LD1,IF(LD1 AND REF(HIGH,hGA)<=REF(HIGH,BARSLAST(hFF3)),BARSLAST(hFF3),hGA),0);
hGG:=hG1+hG2+hG3;
hJA:=BACKSET(LD1,hGG); hJB:=hJA>REF(hJA,1); hJJ:=BACKSET(hJB,2);
HH:=hJJ>REF(hJJ,1);
{
DRAWICON(HD,H*1.01,10);
DRAWICON(LD,L*0.995,11);
}
DRAWLINE(LD,LOW,HH,HIGH,0),COLORWHITE,LINETHICK1;
DRAWLINE(HH,HIGH,LD,LOW,0),COLORWHITE,LINETHICK1;
__________________
efef55e3
|
|
向版主報告此篇 | |
|
2015-02-06 12:51 |
|
|
| |
|
cgjj
總版主
註冊日期: Oct 2003
來 自:
文章數量: 17618 |
回覆: [問題]
引用: 最初由 yjl8895 發表
版大好:
能否將下列週期的運算,再往後推到最後一支k棒,感激不盡。
AA:=REF(HIGH,8)=HHV(HIGH,2*8+1);
AAA:=FILTER(AA,8);
BB:=BACKSET(AAA,8+1);
CC1:=FILTER(BB,8);
CC:=CC1 OR ISLASTBAR;
AA2:=REF(LOW,8)=LLV(LOW,2*8+1);
AAA2:=FILTER(AA2,8);
BB2:=BACKSET(AAA2,8+1);
CC22:=FILTER(BB2,8);
CC2:=CC22 AND NOT(CC1);
EA:=BACKSET(CC,REF(BARSLAST(CC2),1)+1);
EB:=EA>REF(EA,1); EE:=BACKSET(EB,2);
FF1:=EE>REF(EE,1);
EE2:=BACKSET(FF1 AND COUNT(CC,REF(BARSLAST(CC2),1)+2)=0,REF(BARSLAST(CC2),1)+2);
FF2:=EE2>REF(EE2,1);
EE3:=BACKSET(FF2 AND COUNT(CC,REF(BARSLAST(CC2),1)+2)=0,REF(BARSLAST(CC2),1)+2);
FF3:=EE3>REF(EE3,1);
JS:=IF(CC,COUNT(CC2,REF(BARSLAST(CC),1)+1),0);
G1:=IF(JS=1 AND CC,BARSLAST(FF1),0);
GA:=IF(CC AND REF(LOW,BARSLAST(FF1))>=REF(LOW,BARSLAST(FF2)),BARSLAST(FF2),BARSLAST(FF1));
G2:=IF(JS=2 AND CC,GA,0);
G3:=IF(JS>=3 AND CC,IF(CC AND REF(LOW,GA)>=REF(LOW,BARSLAST(FF3)),BARSLAST(FF3),GA),0);
GG:=G1+G2+G3;
JA:=BACKSET(CC,GG); JB:=JA>REF(JA,1); JJ:=BACKSET(JB,2);
LD:=JJ>REF(JJ,1);
LD1:=LD OR ISLASTBAR;
hEA:=BACKSET(LD1,REF(BARSLAST(CC),1)+1);
hEB:=hEA>REF(hEA,1); hEE:=BACKSET(hEB,2);
hFF1:=hEE>REF(hEE,1);
hEE2:=BACKSET(hFF1 AND COUNT(LD1,REF(BARSLAST(CC),1)+2)=0,REF(BARSLAST(CC),1)+2);
hFF2:=hEE2>REF(hEE2,1);
hEE3:=BACKSET(hFF2 AND COUNT(LD1,REF(BARSLAST(CC),1)+2)=0,REF(BARSLAST(CC),1)+2);
hFF3:=hEE3>REF(hEE3,1);
hJS:=IF(LD1,COUNT(CC1,REF(BARSLAST(LD1),1)+1),0);
hG1:=IF(hJS=1 AND LD1,BARSLAST(hFF1),0);
hGA:=IF(LD1 AND REF(HIGH,BARSLAST(hFF1))<=REF(HIGH,BARSLAST(hFF2)),BARSLAST(hFF2),BARSLAST(hFF1));
hG2:=IF(hJS=2 AND LD1,hGA,0);
hG3:=IF(hJS>=3 AND LD1,IF(LD1 AND REF(HIGH,hGA)<=REF(HIGH,BARSLAST(hFF3)),BARSLAST(hFF3),hGA),0);
hGG:=hG1+hG2+hG3;
hJA:=BACKSET(LD1,hGG); hJB:=hJA>REF(hJA,1); hJJ:=BACKSET(hJB,2);
HH:=hJJ>REF(hJJ,1);
{
DRAWICON(HD,H*1.01,10);
DRAWICON(LD,L*0.995,11);
}
DRAWLINE(LD,LOW,HH,HIGH,0),COLORWHITE,LINETHICK1;
DRAWLINE(HH,HIGH,LD,LOW,0),COLORWHITE,LINETHICK1;
這東西類似ZIG,有取用未來計算
連到最後一支, 應用上會有意義嗎?
|
|
向版主報告此篇 | |
|
2015-02-06 13:21 |
|
|
| |
|
yjl8895
資深會員
註冊日期: Jun 2009
來 自:
文章數量: 170 |
回覆: 回覆: [問題]
引用: 最初由 cgjj 發表
這東西類似ZIG,有取用未來計算
連到最後一支, 應用上會有意義嗎?
謝謝版大的指教,推浪的人本來就在預設立場,算到最後一支,不過是想把浪潮推得更完整一些,有請。
__________________
efef55e3
|
|
向版主報告此篇 | |
|
2015-02-06 13:39 |
|
|
| |
|
cgjj
總版主
註冊日期: Oct 2003
來 自:
文章數量: 17618 |
回覆: 回覆: 回覆: [問題]
引用: 最初由 yjl8895 發表
謝謝版大的指教,推浪的人本來就在預設立場,算到最後一支,不過是想把浪潮推得更完整一些,有請。
將
DRAWLINE(LD,LOW,HH,HIGH,0),COLORWHITE,LINETHICK1;
DRAWLINE(HH,HIGH,LD,LOW,0),COLORWHITE,LINETHICK1;
改為這樣試試
CK:=barslast(HH)>barslast(LD);
HH[datacount]:=CK[datacount]=1;
LD[datacount]:=CK[datacount]=0;
DRAWLINE(LD,LOW,HH,HIGH,0),COLORWHITE,LINETHICK1;
DRAWLINE(HH,HIGH,LD,LOW,0),COLORWHITE,LINETHICK1;
|
|
向版主報告此篇 | |
|
2015-02-06 14:07 |
|
|
| |
本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。
|
Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved. 聯絡我們
|