 |
peter109
資深會員
註冊日期: Dec 2004
來 自: Taipei
文章數量: 1893 |
互相 互相啦
希望能加減有所幫助
條件句咱沒法
哪位改善吧
感恩唷
__________________
至誠能勝天下至偽
至拙能勝天下至巧
|
|
向版主報告此篇 |  |
|
2005-10-27 20:37 |
|
|
|  |
 |
kkkkkk
資深會員
註冊日期: Dec 2003
來 自:
文章數量: 291 |
且學習一下總版主的循環
a:MA(CLOSE,10)COLORwhite;
b:MA(CLOSE,30)COLORyellow;
金叉:IF(CROSS(a,b),barpos,0),linethick0;
前金叉:ref(金叉,ref(BARSLAST(金叉),1)+1) LINETHICK0;
後金叉:c*0,linethick0;
for NPos=lbound(金叉) to ubound(金叉) do begin
if 金叉[NPos]>1 then begin
for ZPos=NPos+1 to ubound(金叉) do begin
if 金叉[ZPos]>0 then begin
for S=NPos to ZPos-1 do begin
後金叉[S]:=金叉[ZPos];
end;
break;
end;
end;
end;
end;
vertline(cross(a,b));
ba:=barslast(cross(a,b)),linethick0,colorwhite;
n:=if(後金叉=0,0,ref((後金叉-金叉)*(ba=0),barslast((後金叉-金叉)*(ba=0))));
x:if(後金叉=0,0,if(ba=0,0,n-ba)),linethick0,colorwhite;
|
|
向版主報告此篇 |  |
|
2006-05-17 08:32 |
|
|
|  |
 |
hwyhon
資深會員

註冊日期: Sep 2004
來 自: 台中
文章數量: 332 |
感謝K 大的解答
vertline(cross(a,b));
ba:=barslast(cross(a,b)),linethick0,colorwhite;
n:=if(後金叉=0,0,ref((後金叉-金叉)*(ba=0),barslast((後金叉-金叉)*(ba=0))));
x:if(後金叉=0,0,if(ba=0,0,n-ba)),linethick0,colorwhite;
奇狐內建函數就差這函數
簡單的幾句
解答了用奇狐來的多年困惑
您真是強
不輸專業人員
謝謝
|
最後由 hwyhon 在 2006-05-17 13:30 編輯 |
向版主報告此篇 |  |
|
2006-05-17 13:26 |
|
|
|  |
本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。
|
Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved. 聯絡我們
|