标题：[求助] 请帮忙找出一月内最大的10个收盘价

 请老师帮忙编写实现以下语句:
    找出 一月内最大的10个收盘价，并求出平均值。谢谢。

rummode:0;

variable:n[10]=0;
ss:=0;
nn:=barslast(month<>ref(month,1))+1;

for i=1 to 10 do begin
 n[i]:=large(h,nn,i);
end

for k=1 to 10 do begin
 ss:=ss+n[k];
end

pj:ss/10;

 

 

 要求k线图上至少要显示一个月以上的数据

  太感谢了，但是这个公式不能被其他公式引用吗，为什么我将它做成公式后用refindiex函数不能显示 pj 的值呢？代码如下
   
    tj1:stkindiex('','formula9.cjmd',0,6,0,100);

 其中的cjmd 就是 pj

   太感谢了，但是这个公式不能被其他公式引用吗，为什么我将它做成公式后用stkfindiex函数不能显示 pj 的值呢？代码如下
   
    tj1:stkindiex('','formula9.pj',0,6,0,100);

首先我前面的公式要保证是逐k线运行，其次当前使用周期要有一个月以上的数据显示在k线图上