HSP程式交易論壇 >> 程式交易 >> 論壇主區 >> 經驗交流與分享 >> Choppy Market Index Function
Choppy Market Index Function
Hunta,2009-08-25 09:17:02
[SIZE=3]轉貼pop616大:[/SIZE]
[SIZE=3]{Choppy Market Index Function
This function returns a value from 0 to 100.
A lower value denotes higher market indecisiveness (choppiness),
whereas a higher value denotes a trending market.
The only input is the number of bars that we look back.}
Inputs: periodLength(Numeric);
Vars: num(0),denom(1);
if(periodLength<>0) then
begin
denom = Highest(High,periodLength) - Lowest(Low,periodLength);
num = Close[periodLength-1]- Close;
num = AbsValue(num);
ChoppyMarketIndex = 0.0;
if(denom<>0) then ChoppyMarketIndex = num/denom*100;
end;
出自~程式交易聚寶盆-藍色投機客 [/SIZE]
Hunta,2009-08-25 09:19:05
程式碼如下:
10 自訂技術指標[ #1 , CMI ]
20
30 Vl = 15
40 Vd = 5分_區間最高價( Vl ) - 5分_區間最低價( Vl )
50 Ve = Vl - 1
60 Vn = 前Ve_5分_收盤價 - 5分_收盤價
70 Vn = Abs( Vn )
80 Vc = Vn / Vd * 100
90 Vb = 前1K線_Vc
100 直線[ ( 0 , Vc ) - (-1 , Vb ) , 技術1 , #1 , CMI , 寬度: 1 , 樣式: 0 , 顏色: 16777215 ]
執行結果如下:
[IMGA=0,absMiddle]http://www.huntasoft.com/hsp/pic/0825-1.jpg[/IMGA]
下載程式碼 [URL=http://www.huntasoft.com/hsp/0060.rda]http://www.huntasoft.com/hsp/0060.rda[/URL]
pop616,2009-08-25 14:59:30
多謝版大
97 1 8: 此主題共有3帖 此頁3帖 每頁12帖
[查看完整模式] LeadBBS 5.0 耗時85.9毫秒 請求3次
|