|
[求救]請教版主∼KD指標跨週期狀態在不同分析週期下的調整
版主您好
以下公式是在主圖上顯示四個KD指標的週期狀態,這是我搜尋您之前的回覆文章得到的
引用處
http://www.chiefox.com.tw/bbs/showt...=kd%AB%FC%BC%D0
請問您,在分析週期以日線顯示時,帶入此公式,左上角的跨週期顯示皆為正確,但若將分析週期以周線顯示之時,左上角的跨週期顯示就會是日．周正確,但月與季的箭頭方向與三角形（鈍化）顯示就是錯誤的,若放到月．季線的分析週期下也會產生其他週期的顯示錯誤
冒昧請問您,是否是抓取資料的錯誤？又該在不同分析週期之下做如何的公式修改,還請您指教,謝謝您！！
日K:"KD.K"(9,3,3) linethick;
日D:"KD.D"(9,3,3) linethick;
週K:"WKD.WK"(9,3,3,1,3,0) linethick;
週D:"WKD.WD"(9,3,3,1,3,0) linethick;
月K:"wKD.wK"(9,3,3,1,4,0) linethick;
月D:"wKD.wD"(9,3,3,1,4,0) linethick;
季K:"wKD.wK"(9,3,3,1,5,0) linethick;
季D:"wKD.wD"(9,3,3,1,5,0) linethick;
PP:=DATACOUNT;
日UD:=SGN(日K-日D)+1;
日TB:=SGN((SUM(日K>80,3)=3)-(SUM(日K<20,3)=3))+1;
日UD:=日UD[PP];
日TB:=日TB[PP];
日UDS:=STRMID('↓ ↑',日UD*2+1,2);
日TBS:=STRMID('▼ ▲',日TB*2+1,2);
週UD:=SGN(週K-週D)+1;
週TB:=SGN((SUM(週K>80,3)=3)-(SUM(週K<20,3)=3))+1;
週UD:=週UD[PP];
週TB:=週TB[PP];
週UDS:=STRMID('↓ ↑',週UD*2+1,2);
週TBS:=STRMID('▼ ▲',週TB*2+1,2);
月UD:=SGN(月K-月D)+1;
月TB:=SGN((SUM(月K>80,3)=3)-(SUM(月K<20,3)=3))+1;
月UD:=月UD[PP];
月TB:=月TB[PP];
月UDS:=STRMID('↓ ↑',月UD*2+1,2);
月TBS:=STRMID('▼ ▲',月TB*2+1,2);
季UD:=SGN(季K-季D)+1;
季TB:=SGN((SUM(季K>80,3)=3)-(SUM(季K<20,3)=3))+1;
季UD:=季UD[PP];
季TB:=季TB[PP];
季UDS:=STRMID('↓ ↑',季UD*2+1,2);
季TBS:=STRMID('▼ ▲',季TB*2+1,2);
DRAWTEXTEX(1,0,5,2,'日： 週： 月： 季： ') COLORRED;
DRAWTEXTEX(日UD=0,0,5,2,' '+日UDS) COLORGREEN;
DRAWTEXTEX(日TB=0,0,5,2,' '+日TBS) COLORGREEN;
DRAWTEXTEX(日UD=2,0,5,2,' '+日UDS) COLORWHITE;
DRAWTEXTEX(日TB=2,0,5,2,' '+日TBS) COLORWHITE;
SpaceS:=' ';
DRAWTEXTEX(週UD=0,0,5,2,SpaceS+' '+週UDS) COLORGREEN;
DRAWTEXTEX(週TB=0,0,5,2,SpaceS+' '+週TBS) COLORGREEN;
DRAWTEXTEX(週UD=2,0,5,2,SpaceS+' '+週UDS) COLORWHITE;
DRAWTEXTEX(週TB=2,0,5,2,SpaceS+' '+週TBS) COLORWHITE;
SpaceS2:=SpaceS+SpaceS;
DRAWTEXTEX(月UD=0,0,5,2,SpaceS2+' '+月UDS) COLORGREEN;
DRAWTEXTEX(月TB=0,0,5,2,SpaceS2+' '+月TBS) COLORGREEN;
DRAWTEXTEX(月UD=2,0,5,2,SpaceS2+' '+月UDS) COLORWHITE;
DRAWTEXTEX(月TB=2,0,5,2,SpaceS2+' '+月TBS) COLORWHITE;
SpaceS3:=SpaceS2+SpaceS;
DRAWTEXTEX(季UD=0,0,5,2,SpaceS3+' '+季UDS) COLORGREEN;
DRAWTEXTEX(季TB=0,0,5,2,SpaceS3+' '+季TBS) COLORGREEN;
DRAWTEXTEX(季UD=2,0,5,2,SpaceS3+' '+季UDS) COLORWHITE;
DRAWTEXTEX(季TB=2,0,5,2,SpaceS3+' '+季TBS) COLORWHITE;
|
2013-09-10 01:57
