請教一下小幫手,我試著把選股結果推播到Line用了print指令,但是不知道是那個語法有問題,導致
選股結果與print結果不同,能否麻煩小幫手指點一下呢?謝謝!
input: offset(9999,"不用調整,相容用參數");
input: ratio(1, "增加比例%");
var:sameweek(0);
setbarfreq("W");
settotalbar(3);
if getinfo("FilterMode") = 1 then
sameweek = 0
else if
datediff(GetFielddate("收盤價","D"),GetFielddate("收盤價","W")) < 6
then sameweek = 1 else sameweek = 0;
value1=GetField("大戶持股比例","W",param:=400)[sameweek];
condition1 = close > average(close, 60);
condition2 = close > average(close, 120);
condition3 = volume > 100;
if value1 > (value1[1] * (1 + ratio/100)) and condition1 and condition2 and condition3
then
begin
ret=1;
Print(file("D:\選股\line notify\Strategy\大戶增持"), "選股日期:"+dateToString(date));
Print(file("D:\選股\line notify\Strategy\大戶增持"), "股票名稱:"+SymbolName);
Print(file("D:\選股\line notify\Strategy\大戶增持"), "股票代碼:"+symbol);
Print(file("D:\選股\line notify\Strategy\大戶增持"), "收盤價格:"+numtostr(c, 2));
Print(file("D:\選股\line notify\Strategy\大戶增持"), "增加比例:"+numtostr(Value1-Value1[1], 2));
end;
outputfield(1, Value1-Value1[1], 2, "差異%");
outputfield(2, value1, 2, "大戶比例");
outputfield(3, value1[1], 2, "上周大戶比例");

4 評論