尋找除息日當天漲幅大於5%的標的

  •   311 
  • 最後發表   Txxing  2025 一月 22
Txxing 發文於   2025/01/21

以下是程式

value1 = GetBarOffset(GetField("除權息日期"));

value2 = close[value1] / close[value1+1]; 

condition1 = value2 >= 1.05; 

if condition1 then ret = 1;

 

outputField(1,GetField("除權息日期"));

 

outputField(2,value1);

value1輸出值沒問題,但value2輸出值幾乎都是10。

排序方式: 標準 | 最新
虎科大許教授 發文於   2025/01/22

//讀取超過除權息日期至今的K棒,例如一年的資料

setTotalBar(250);

  • 按讚來自於
  • 25xting
XQ小幫手 發文於   2025/01/22

Hi Txxing,

這邊提供不用調整資料讀取筆數(SetTotalBar)的程式碼範例,供您參考,如下

input:_PriceChangeRatio(5,"當天漲幅大於 X %");
var:idx(0);

condition1 = GetField("日期", "D") > GetField("除息日期","最新");
condition2 = GetField("除息日期","最新") > 0;

if currentBar = gettotalBar then 
    while condition1 and condition2
        if GetField("日期", "D")[idx] > GetField("除息日期","最新") then idx += 1 else break;

ret = condition1 and condition2 and GetField("漲跌幅", "D")[idx] > _PriceChangeRatio;

outputField1(GetField("漲跌幅", "D")[idx],"除息當日漲跌幅");
outputField2(GetField("除息日期","最新"),"除息當日日期");

篩選出來的結果如下圖,或附檔圖,以上提供參考,謝謝。

附加文件

  • 按讚來自於
  • 25xting
發表回覆
Close