請問要用雷達警示高低點10%的個股 但沒有跳出警示 ?程式碼如下
// 定義變數
vars: dayHigh(0), dayLow(0), priceRange(0), canDayTrade(true);
// 檢查是否為新的一天,如果是,則更新當日高點和低點
if GetField("Date") <> GetField("Date")[1] then begin
dayHigh = GetField("High", "D"); // 初始化當日高點為當日最高價
dayLow = GetField("Low", "D"); // 初始化當日低點為當日最低價
end;
// 更新當日高點和低點
if GetField("High", "D") > dayHigh then begin
dayHigh = GetField("High", "D");
end;
if GetField("Low", "D") < dayLow then begin
dayLow = GetField("Low", "D");
end;
// 計算當日高低點差距的百分比
priceRange = (dayHigh - dayLow) / dayHigh * 100;
// 檢查當日是否可以現股當沖
canDayTrade = GetSymbolInfo("買賣現沖");
// 檢查當日高低點差距是否超過 10% 且當日不可以現股當沖
if priceRange >= 10 and not canDayTrade then begin
// 用 Print 來輸出警示訊息
Print("警示:當日價格波動已達 10%,且禁止現股當沖,請注意風險!");
end;
8 評論