股资源-股票学习站-学炒股-股票课程-炒股教程-分析选股指标-入门基础知识

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
    上一主题 下一主题

    [大智慧] 「指标」你需要用的全在这里(源码略作修改重新上传了所有附件)


        [-----复制链接-----]

    金币
    0
    楼主
    2024-3-21 22:29:01
    【资料名称】:你需要用的全在这里(源码略作修改重新上传了所有附件)介绍
    【资料描述】:

    你需要用的全在这里(源码略作修改重新上传了所有附件)

    先把我自己的K线图和分时图放上,大家看图觉得有用可以看下面的指标源码,图上有的下面都有了。


    K线界面



    分时界面





    1.K线主图:这个主图能添加6条均线,并在左上角显示总股本、市盈率、流通A股、每股收益、主营增长、获利盘、每股收益、资产收益、所属板块信息,并能自动提示跳空缺口及缺口价格。随光标移动会有浮标提示股价及需要关注的信息。当股价运行在强势区间时,背景会呈现紫红色。

    {K线主图} (N1,N2,N3,N4,N5,N6需自定义你想要的天数)
    DRAWGBK((MA(C,5)>EMA(C,25)) AND (MA(C,10)>EMA(C,25)) AND (C>EMA(C,25)),STRIP(RGB(200,100,150),RGB(5,2,5),0));
    MA1:MA(C,N1),COLORWHITE;
    MA2:MA(C,N2),COLORYELLOW;
    MA3:EMA(C,N3),COLORMAGENTA;
    MA4:EMA(C,N4),COLORGREEN;
    MA5:EMA(C,N5),COLORCYAN;
    MA6:EMA(C,N6),COLORRED;
    a1:=BIGORDER(1) - BIGORDER(2);
    a2:=(BIGORDER(1,3)) - (BIGORDER(2,3));
    a3:=((DYNAINFO(104) - DYNAINFO(105)) / VOL) * 100;
    a4:=WINNER(CLOSE) * 100;
    a5:=DYNAINFO(102) - DYNAINFO(103);
    a6:=DYNAINFO(101);
    a7:=SUM((((a1 * VOL) / CAPITAL) * 100),5);
    a8:=FINANCE2(35);
    a9:=FINANCE2(37);
    a10:=FINANCE2(3);
    a11:=DYNAINFO(39);
    a12:=FINANCE2(11);
    a13:=FINANCE2(10);
    a14:=PFFIN(1609,0);
    a15:=FINANCE2(5);
    DRAWFLAGTEXT((CLOSE > 0),CLOSE,'…… '+STKNAME+' ('+STKLABEL+')'+' …… 价:'+NUMTOSTRN(CLOSE,3)),colorYellow;
    DRAWFLAGTEXT((a4 <= 15),CLOSE,'获 利 盘:'+NUMTOSTRN(a4,2)+'%'+' 关注下方支撑'),colorRed;
    DRAWFLAGTEXT(((a4 > 15) AND (a4 < 50)),CLOSE,'获 利 盘:'+NUMTOSTRN(a4,2)+'%'+' 关注上方筹码');
    DRAWFLAGTEXT((a4 >= 50),CLOSE,'获 利 盘:'+NUMTOSTRN(a4,2)+'%'+' 关注能否创新高'),colorYellow;
    DRAWTEXTABS(20,62,'主营范围:'+F10TEXT((F10FIND('主营范围',1)),10)),colorYellow;
    DRAWTEXTABS(20,49,'所属板块:'+BKNAME),color00A1FF;
    DRAWTEXTABS(240,10,'净利增长:'+NUMTOSTRN(a13,0)+'%'),color00a1ff;
    DRAWTEXTABS(140,10,'市 盈 率:'+NUMTOSTRN(a11,2)),color00a1ff;
    DRAWTEXTABS(20,10,'总 股 本:'+NUMTOSTRN((a8 / 10000),2)+'亿股'),color00a1ff;
    DRAWTEXTABS(240,23,'主营增长:'+NUMTOSTRN(a12,0)+'%'),color00a1ff;
    DRAWTEXTABS(140,23,'每股收益:'+NUMTOSTRN(a10,3)),color00a1ff;
    DRAWTEXTABS(20,23,'流通 A股:'+NUMTOSTRN((a9 / 10000),2)+'亿股'),color00a1ff;
    DRAWTEXTABS(240,36,'资产收益:'+NUMTOSTRN(a15,0)+'%'),color00a1ff;
    DRAWTEXTABS(140,36,'每股净资:'+NUMTOSTRN(FINANCE2(4),2)),color00a1ff;
    DRAWTEXTABS(20,36,'获 利 盘:'+NUMTOSTRN(a4,2)+'%'),color00a1ff;
    {向下跳空缺口}
    I1:=0;
    flag1:=0;
    while I1<BARSLAST(DISPSTATUS=1)-BARSLAST(DISPSTATUS=2)
    DO
    IF REF(H,I1)<REF(L,I1+1) AND REF(L,I1+1)>HHV(H,I1+1)
    THEN BEGIN FLAG1:=1;
    S1:=I1;
    I1:=BARSLAST(DISPSTATUS=1);
    END
    ELSE I1:=I1+1;
    STICKLINE(FLAG1,REF(L,S1+1),HHV(H,S1+1),(s1+1)*20,0),Colorgray,ALIGN1,LAYER7;
    DRAWTEXT(flag1,REF(L,s1+1),NUMTOSTRN(ref(h,s1+1),2)+'-'+NUMTOSTRN(hhV(h,S1+1),2)),ALIGN2,COLOR00ffff;
    {向上跳空缺口}

    I:=0;
    flag:=0;
    while I<BARSLAST(DISPSTATUS=1)-BARSLAST(DISPSTATUS=2)
    DO
    IF REF(L,I)>REF(H,I+1) AND REF(H,I+1)<LLV(LOW,I+1)
    THEN BEGIN FLAG:=1;
    S:=I;
    I:=BARSLAST(DISPSTATUS=1);
    END
    ELSE I:=I+1;
    STICKLINE(FLAG,REF(h,S+1),LLV(LOW,S+1),20*(s+1),500),Colorgray,ALIGN1,LAYER7;
    DRAWTEXT(FLAG,REF(H,s+1),NUMTOSTRN(ref(h,s+1),2)+'-'+NUMTOSTRN(LLV(LOW,S+1),2)),ALIGN2,COLOR00ffff;


    2.虚拟成交量:能在一天的开始虚拟出全天成交量

    {虚拟成交}

    sj:=0;
    if CURRENTDATE=date then {BARSTATUS=2}
    sj:=if(CURRENTTIME>= 93000 and CURRENTTIME<=113000,(TIMETOT0(CURRENTTIME)-34200)/60,
    if(CURRENTTIME> 113000 and CURRENTTIME< 130000,120,
    if(CURRENTTIME>=130000 and CURRENTTIME<=150000,(TIMETOT0(CURRENTTIME)-46800)/60+120,
    if(CURRENTTIME> 150000,240,1))));
    VOL,VOLSTICK;
    if DATATYPE=8 then
    STICKLINE(sj>0,vol,vol*240/sj,7,1),color00c0c0;
    MA5:MA(VOL,5),colorwhite;
    MA10:MA(VOL,10),coloryellow;
    MA20:MA(VOL,20),colormagenta;

    3,分时主图:我一直不知道怎么在分时界面自动叠加对应大盘指数,在网上查了好多别人的方法,但是发现那些方法虽然能把指数线画上去,但是相对位置却不正确,比如大盘明明低开低走,叠加的大盘线却在涨幅超过2%的地方,虽然走势形态正确,但是相对个股走势线的位置不对容易产生误判,所以最后把上证和深证分时图分开做了两个不同模版,精确还原指数线并叠加在正确位置。

    在使用主图叠加指标前,需要先建立一个名为 MAB 的指标,不要改名,保存即可,因为分时主图要引用这个指标中的数据。

    公式建立好后,在分时界面点“存为模版”,分别建立“上证”,“深证”两个模版,看哪个市场的股票就点一下相对模版,这样就能正确精准的叠加对应大盘线,只要在刚创立好时点一次就行,以后你看该市场的股票时便会自动调用对应模版。

    该模版在分时左上角显示MA5,MA10,EMA25均线价格和所属行业,右上角显示昨高和昨低的价格,下面分时成交量处显示所属板块、流通盘、同比增长、每股收益、每股市盈信息。

    使用非付费行情的同学,因为免费软件不是全推行情,是请求数据,所以你有时会发现分时大盘线会是一条直线,这是你只要按一下键盘上的:“F3”和“F4”键,读出上证指数和深证成指的指数走势,再切换回个股分时,指数线就正常了。

    {上证分时}

    a1:=DYNAINFO(3);
    a2:='sh000001';
    昨收:=hhv(STKINDI(a2,'MAB.昨收#day'),0);
    开盘:=HHv(STKINDI(a2,'MAB.开盘#day'),0);
    收盘:=if(time>093000,STKINDI(a2,'MAB.收盘#min1'),开盘);
    叠加指数:=(收盘/昨收-1)*a1+a1;
    POLYLINE(C,叠加指数),colorCYAN,linethick1;
    POLYLINE(C,C),LINETHICK2,COLORblack;
    最新:C,PRECIS2,COLORWHITE,LAYER0;
    所属板块:=BKNAME;
    每股市盈率:=DYNAINFO(39);
    每股收益:=FINANCE2(3);
    流通盘大小:=FINANCE2(37)/1000000*100;
    同比增长:=FINANCE2(10);
    DRAWTEXTREL(0,765,'同比增长:'+NUMTOSTRN(同比增长,2)+'%'),LINETHICK1,ColorCYAN;
    DRAWTEXTREL(0,695,'流 通 盘:'+NUMTOSTRN(流通盘大小,2)+'亿'),LINETHICK1,ColorCYAN;
    DRAWTEXTREL(180,695,'每股收益:'+NUMTOSTRN(每股收益,2)+'元'),ColorCYAN;
    DRAWTEXTREL(180,765,'每股市盈:'+NUMTOSTRN(每股市盈率,1)+'倍'),ColorCYAN;
    DRAWTEXTREL(0,625,'所属板块:'+所属板块),COLORCYAN;
    MA5:="MAB.MA5#day";
    MA10:="MAB.MA10#day";
    MA25:="MAB.MA25#day";
    MA30:="MAB.MA30#day";
    MA60:="MAB.MA60#day";
    MA100:="MAB.MA100#day";
    MA200:="MAB.MA200#day";
    MA300:="MAB.MA300#day";
    MA400:="MAB.MA400#day";
    MA5P:=(MA5-DYNAINFO(3))/DYNAINFO(3)*100;
    MA10P:=(MA10-DYNAINFO(3))/DYNAINFO(3)*100;
    MA25P:=(MA25-DYNAINFO(3))/DYNAINFO(3)*100;
    MA30P:=(MA30-DYNAINFO(3))/DYNAINFO(3)*100;
    MA60P:=(MA60-DYNAINFO(3))/DYNAINFO(3)*100;
    DRAWTEXTREL( 0,10,' 5日线: '+NUMTOSTRN(MA5,2)+'元 '+NUMTOSTRN(MA5P,1)+'%'),colorwhite;
    DRAWTEXTREL( 0,60 ,'10日线: '+NUMTOSTRN(MA10,2)+'元 '+NUMTOSTRN(MA10P,1)+'%'),COLORyellow;
    DRAWTEXTREL( 0,110 ,'25日线: '+NUMTOSTRN(MA25,2)+'元 '+NUMTOSTRN(MA25P,1)+'%'),ColorMAGENTA;
    DRAWTEXTREL( 690,10 ,'昨高点: '+NUMTOSTRN(MA30,2)+'元 '+NUMTOSTRN(MA30P,1)+'%'),COLORred;
    DRAWTEXTREL( 690,60 ,'昨低点: '+NUMTOSTRN(MA60,2)+'元 '+NUMTOSTRN(MA60P,1)+'%'),Colorgreen;
    板块:=IFS(INBLOCK('工程建筑'),'工程建筑',
    IFS(INBLOCK('电力'),'电力',
    IFS(INBLOCK('计算机'),'计算机',
    IFS(INBLOCK('电子信息'),'电子信息',
    IFS(INBLOCK('房地产'),'房地产',
    IFS(INBLOCK('纺织服装'),'纺织服装',
    IFS(INBLOCK('钢铁'),'钢铁',
    IFS(INBLOCK('供水供气'),'供水供气',
    IFS(INBLOCK('化工化纤'),'化工化纤',
    IFS(INBLOCK('电器'),'电器',
    IFS(INBLOCK('交通设施'),'交通设施',
    IFS(INBLOCK('银行类'),'银行类',
    IFS(INBLOCK('旅游酒店'),'旅游酒店',
    IFS(INBLOCK('煤炭石油'),'煤炭石油',
    IFS(INBLOCK('酿酒食品'),'酿酒食品',
    IFS(INBLOCK('农林牧渔'),'农林牧渔',
    IFS(INBLOCK('商业连锁'),'商业连锁',
    IFS(INBLOCK('建材'),'建材',
    IFS(INBLOCK('其他行业'),'其他行业',
    IFS(INBLOCK('交通工具'),'交通工具',
    IFS(INBLOCK('机械'),'机械',
    IFS(INBLOCK('医药'),'医药',
    IFS(INBLOCK('外贸'),'外贸',
    IFS(INBLOCK('教育传媒'),'教育传媒',
    IFS(INBLOCK('仪电仪表'),'仪电仪表',
    IFS(INBLOCK('有色金属'),'有色金属',
    IFS(INBLOCK('造纸印刷'),'造纸印刷',
    IFS(INBLOCK('券商'),'券商',
    IFS(INBLOCK('电力设备'),'电力设备',
    IFS(INBLOCK('通信'),'通信',
    IFS(INBLOCK('运输物流'),'运输物流',
    IFS(INBLOCK('海峡西岸'),'海峡西岸',
    IFS(INBLOCK('保险'),'保险','')
    ))))))))))))))))))))))))))))))));
    DRAWTEXTABS(0,70,'行业板块: '+板块),color00a1ff;
    上证指数:INDEXC,PRECIS0,ColorCYAN,LINETHICK0;

    {深证分时}

    a1:=DYNAINFO(3);
    a2:='SZ399001';
    昨收:=hhv(STKINDI(a2,'MAB.昨收#day'),0);
    开盘:=HHv(STKINDI(a2,'MAB.开盘#day'),0);
    收盘:=if(time>093000,STKINDI(a2,'MAB.收盘#min1'),开盘);
    叠加指数:=(收盘/昨收-1)*a1+a1;
    POLYLINE(C,叠加指数),colorcyan,linethick1;
    POLYLINE(C,C),LINETHICK2,COLORblack;
    最新:C,PRECIS2,COLORWHITE,LAYER0;
    所属板块:=BKNAME;
    每股市盈率:=DYNAINFO(39);
    每股收益:=FINANCE2(3);
    流通盘大小:=FINANCE2(37)/1000000*100;
    同比增长:=FINANCE2(10);
    DRAWTEXTREL(0,765,'同比增长:'+NUMTOSTRN(同比增长,2)+'%'),LINETHICK1,colorcyan;
    DRAWTEXTREL(0,695,'流 通 盘:'+NUMTOSTRN(流通盘大小,2)+'亿'),LINETHICK1,colorcyan;
    DRAWTEXTREL(180,695,'每股收益:'+NUMTOSTRN(每股收益,2)+'元'),colorcyan;
    DRAWTEXTREL(180,765,'每股市盈:'+NUMTOSTRN(每股市盈率,1)+'倍'),colorcyan;
    DRAWTEXTREL(0,625,'所属板块:'+所属板块),COLORCYAN;
    MA5:="MAB.MA5#day";
    MA10:="MAB.MA10#day";
    MA25:="MAB.MA25#day";
    MA30:="MAB.MA30#day";
    MA60:="MAB.MA60#day";
    MA100:="MAB.MA100#day";
    MA200:="MAB.MA200#day";
    MA300:="MAB.MA300#day";
    MA400:="MAB.MA400#day";
    MA5P:=(MA5-DYNAINFO(3))/DYNAINFO(3)*100;
    MA10P:=(MA10-DYNAINFO(3))/DYNAINFO(3)*100;
    MA25P:=(MA25-DYNAINFO(3))/DYNAINFO(3)*100;
    MA30P:=(MA30-DYNAINFO(3))/DYNAINFO(3)*100;
    MA60P:=(MA60-DYNAINFO(3))/DYNAINFO(3)*100;
    DRAWTEXTREL( 0,10,' 5日线: '+NUMTOSTRN(MA5,2)+'元 '+NUMTOSTRN(MA5P,1)+'%'),colorwhite;
    DRAWTEXTREL( 0,60 ,'10日线: '+NUMTOSTRN(MA10,2)+'元 '+NUMTOSTRN(MA10P,1)+'%'),COLORyellow;
    DRAWTEXTREL( 0,110 ,'25日线: '+NUMTOSTRN(MA25,2)+'元 '+NUMTOSTRN(MA25P,1)+'%'),ColorMAGENTA;
    DRAWTEXTREL( 690,10 ,'昨高点: '+NUMTOSTRN(MA30,2)+'元 '+NUMTOSTRN(MA30P,1)+'%'),COLORred;
    DRAWTEXTREL( 690,60 ,'昨低点: '+NUMTOSTRN(MA60,2)+'元 '+NUMTOSTRN(MA60P,1)+'%'),Colorgreen;
    板块:=IFS(INBLOCK('工程建筑'),'工程建筑',
    IFS(INBLOCK('电力'),'电力',
    IFS(INBLOCK('计算机'),'计算机',
    IFS(INBLOCK('电子信息'),'电子信息',
    IFS(INBLOCK('房地产'),'房地产',
    IFS(INBLOCK('纺织服装'),'纺织服装',
    IFS(INBLOCK('钢铁'),'钢铁',
    IFS(INBLOCK('供水供气'),'供水供气',
    IFS(INBLOCK('化工化纤'),'化工化纤',
    IFS(INBLOCK('电器'),'电器',
    IFS(INBLOCK('交通设施'),'交通设施',
    IFS(INBLOCK('银行类'),'银行类',
    IFS(INBLOCK('旅游酒店'),'旅游酒店',
    IFS(INBLOCK('煤炭石油'),'煤炭石油',
    IFS(INBLOCK('酿酒食品'),'酿酒食品',
    IFS(INBLOCK('农林牧渔'),'农林牧渔',
    IFS(INBLOCK('商业连锁'),'商业连锁',
    IFS(INBLOCK('建材'),'建材',
    IFS(INBLOCK('其他行业'),'其他行业',
    IFS(INBLOCK('交通工具'),'交通工具',
    IFS(INBLOCK('机械'),'机械',
    IFS(INBLOCK('医药'),'医药',
    IFS(INBLOCK('外贸'),'外贸',
    IFS(INBLOCK('教育传媒'),'教育传媒',
    IFS(INBLOCK('仪电仪表'),'仪电仪表',
    IFS(INBLOCK('有色金属'),'有色金属',
    IFS(INBLOCK('造纸印刷'),'造纸印刷',
    IFS(INBLOCK('券商'),'券商',
    IFS(INBLOCK('电力设备'),'电力设备',
    IFS(INBLOCK('通信'),'通信',
    IFS(INBLOCK('运输物流'),'运输物流',
    IFS(INBLOCK('海峡西岸'),'海峡西岸',
    IFS(INBLOCK('保险'),'保险','')
    ))))))))))))))))))))))))))))))));
    DRAWTEXTABS(0,70,'行业板块: '+板块),color00a1ff;
    深证成指:INDEXC,PRECIS0,colorcyan,LINETHICK0;

    {MAB}

    MA5:MA(CLOSE,5),PRECIS2;
    MA10:MA(CLOSE,10),PRECIS2;
    MA25:EMA(CLOSE,25),PRECIS2;
    MA30:ref(h,1),PRECIS2;
    MA60:ref(l,1),PRECIS2;
    VAR0A:=EMA(EMA(EMA(CLOSE,2),2),2);
    TLAMSENR:=MAX(MAX((HIGH-LOW),ABS((REF(CLOSE,1)-HIGH))),ABS((REF(CLOSE,1)-LOW)));
    ATR:=MA(TLAMSENR,13);
    VAR1A:=(REF(CLOSE,1)-REF(ATR,1));
    MA400:(HHV(VAR1A,12)),PRECIS2;
    VAR1:=EMA(AMOUNT/VOL/100,3);
    MA100:EMA(VAR1,88),PRECIS2;
    MA200:EMA(VAR1,88)*0.85,PRECIS2;
    MA300:MA200*0.87,PRECIS2;

    收盘:c;
    开盘:o;
    昨收:DYNAINFO(3);

    4.太极量,这是在理想中找的加密指标,直接引用即可。

     

    5.分时副图中那个很好看的渐变色MACD。
    {RFMACD}
    DIF:EMA(CLOSE,12)-EMA(CLOSE,26);
    DEA:EMA(DIF,9);
    MACD:(DIF-DEA)*2,COLORSTICK;
    STICKLINE((MACD > 0),0,MACD,1,0),COLOR0000CC;
    STICKLINE((MACD > 0),0,MACD*0.9,1,0),COLOR0000EE;
    STICKLINE((MACD > 0),0,MACD*0.8,1,0),COLOR0011FF;
    STICKLINE((MACD > 0),0,MACD*0.7,1,0),COLOR0033FF;
    STICKLINE((MACD > 0),0,MACD*0.6,1,0),COLOR0055FF;
    STICKLINE((MACD > 0),0,MACD*0.5,1,0),COLOR0077FF;
    STICKLINE((MACD > 0),0,MACD*0.4,1,0),COLOR0099FF;
    STICKLINE((MACD > 0),0,MACD*0.3,1,0),COLOR00BBFF;
    STICKLINE((MACD > 0),0,MACD*0.2,1,0),COLOR00DDFF;
    STICKLINE((MACD > 0),0,MACD*0.1,1,0),COLOR00FFFF;
    STICKLINE((MACD < 0),0,MACD,1,0),COLORCC0033;
    STICKLINE((MACD < 0),0,MACD*0.9,1,0),COLOREE0033;
    STICKLINE((MACD < 0),0,MACD*0.8,1,0),COLORFF1133;
    STICKLINE((MACD < 0),0,MACD*0.7,1,0),COLORFF3333;
    STICKLINE((MACD < 0),0,MACD*0.6,1,0),COLORFF5533;
    STICKLINE((MACD < 0),0,MACD*0.5,1,0),COLORFF7733;
    STICKLINE((MACD < 0),0,MACD*0.4,1,0),COLORFF9933;
    STICKLINE((MACD < 0),0,MACD*0.3,1,0),COLORFFBB33;
    STICKLINE((MACD < 0),0,MACD*0.2,1,0),COLORFFDD33;
    STICKLINE((MACD < 0),0,MACD*0.1,1,0),COLORFFFF33;
    喜欢简单省事的朋友,可以直接下载下面的文件,然后全部引入,这里包括了我文中提到的所有指标,你只要引入并调用就好了,我没有加密,你下载后仍可看到源码。太极量这个指标由于是别人加密的,你需要到本文最下方单独下载引入。
     



    gd15355


    【下载地址隐藏】:                    点:回复可见地址
    游客,如果您要查看本帖隐藏内容请回复


    回复

    举报

    发新帖

    GMT+8, 2025-2-26 00:08

    快速回复 返回顶部 返回列表