最新公告
  • 欢迎您光临九毛八公式指标网www.9m8.cn,本站全新改版试运行,期间内容全部免费,欢迎下载!欢迎加入本站VIP
  • 指标排序指标,选出了前5名(源码、贴图、用法)

    正文概述    2024-04-08 00:26:05  

    bk:='A股板块'; //bk赋值为字符串'A股板块'
    yygs:='bias.bias1';//引用的指标,此处可修改为引用其它的指标
    stksum:=STKCOUNT(bk); //板块所包含证券数量
    dcount:=datacount; //K线图上,最后一根K线的位置
    variable:dmstr[stksum]='',var_px[stksum]=0,var_indi[stksum]=0;//定义一个字符串数组用于记录股票代码,元素个数为stksum,初始值为空
    for k=1 to stksum do//以下循环,循环计数器k从1开始每次递增1,直到stksum
    begin
    dm:=stkfromblk(bk,k);//板块bk中第k只证券的证券代码,赋值到字符串变量dm
    dmstr[k]:=dm;//股票代码,记录到字符串数组dmstr的第k个元素中
    temp1:=stkindi(dm,yygs,0,-1);//引用其它个股的指标
    var_px[k]:=temp1[dcount];//记录最后一个周期的指标值,此处可以使用参数,以便得到其它周期的排序
    var_indi[k]:=temp1[dcount];//同上,但准备用于记录排序后的位置
    end;
    Num1:=sortpos(var_indi,1,1,stksum);//计算排序后,按大小排列的位置
    dm_max1:=var_indi[1];//最大值的对应位置
    dm_max2:=var_indi[2];//次大值的对应位置
    dm_max3:=var_indi[3];
    dm_max4:=var_indi[4];
    dm_max5:=var_indi[5];
    dm_max6:=var_indi[6];
    dm_min1:=var_indi[stksum];//最小值的对应位置
    dm_min2:=var_indi[stksum-1];
    max1:=var_px[dm_max1];
    max2:=var_px[dm_max2];
    max3:=var_px[dm_max3];
    max4:=var_px[dm_max4];
    max5:=var_px[dm_max5];
    max6:=var_px[dm_max6];
    min1:=var_px[dm_min1];
    min2:=var_px[dm_min2];
    DRAWTEXTEX(ISLASTBAR,1,10,50,'前5名'),Color1080FA;
    DRAWTEXTEX(ISLASTBAR,1,10,250,'① '+STKNAMEEX(dmstr[dm_max1])+':'+NUMTOSTR(max1,2)),Color0000FF;
    DRAWTEXTEX(ISLASTBAR,1,10,400,'② '+STKNAMEEX(dmstr[dm_max2])+':'+NUMTOSTR(max2,2)),Color0000FF;
    DRAWTEXTEX(ISLASTBAR,1,10,550,'③ '+STKNAMEEX(dmstr[dm_max3])+':'+NUMTOSTR(max3,2)),Color0000FF;
    DRAWTEXTEX(ISLASTBAR,1,10,700,'④ '+STKNAMEEX(dmstr[dm_max4])+':'+NUMTOSTR(max4,2)),Color0000FF;
    DRAWTEXTEX(ISLASTBAR,1,10,850,'⑤ '+STKNAMEEX(dmstr[dm_max5])+':'+NUMTOSTR(max5,2)),Color0000FF;
    DRAWTEXTEX(ISLASTBAR,1,200,50,'后2名'),Color1080FA;
    DRAWTEXTEX(ISLASTBAR,1,200,250,'① '+STKNAMEEX(dmstr[dm_min1])+':'+NUMTOSTR(min1,2)),colorgreen;
    DRAWTEXTEX(ISLASTBAR,1,200,400,'② '+STKNAMEEX(dmstr[dm_min2])+':'+NUMTOSTR(min2,2)),colorgreen;


    九毛八公式指标,一个优质的公式指标平台!
    九毛八公式指标 » 指标排序指标,选出了前5名(源码、贴图、用法) 加入收藏