如下程式碼如何修正 ?

  •   103 
  • 最後發表   XQYi  2024 六月 06
XQYi 發文於   2024/06/06

如何找出最接近的價位並標示,作為支撐壓力的提醒

假設有20個價位,

想要從裡面自動找出高於和低於收盤價最接近和次接近的4個價位,

壓力1、壓力2、支撐1、支撐2 及標示,該如何寫?

XQYi 發文於   2024/06/06

以下測試的程式碼可以正確執行

但是將 變數的數值 改成函數如 

round(average(Close,60),2); 

round(average(close, 20),2);

則無法正確抓出數值為何?

 

Vars:  i(0), maxLessThan9(-999999), minGreaterThan13(999999);

array: values[18](0);

values[1] = 50;

values[2] = 48 ;

values[3] = 39 ;

values[4] = 41;

values[5] = 55;

values[6] = 30 ;

values[7] = 40 ;

values[8] = 60;

values[9] = 45;

values[10] = 41;

values[11] = 35;

values[12] = 56;

values[13] = 43;

values[14] = 38;

values[15] = 21;

values[16] = 37;

values[17] = 65;

values[18] = 70;

 

//a19=round(GetField("控盤者成本線"),2);

 

 

For i = 1 to 18 begin

    if values[i] < values[11]  then begin

        if values[i] > maxLessThan9 then

            maxLessThan9 = values[i];

    end;

    

    if values[i] > values[10] then begin

        if values[i] < minGreaterThan13 then

            minGreaterThan13 = values[i];

    end;

end;

 

Plot1(maxLessThan9, "小于values[11]的最大值");

Plot2(minGreaterThan13, "大于values[10]的最小值");

 

發表回覆
Close