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

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
    上一主题 下一主题

    [通达信] 「指标」通达信凯恩斯工作线主图指标 源码


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

    22万

    主题

    22万

    帖子

    14

    精华

    积分
    11040
    楼主
    2023-11-30 14:11:44
    【资料名称】:通达信凯恩斯工作线主图指标 源码介绍
    【资料描述】:

    通达信凯恩斯工作线主图指标 源码






    X0:=IF(C>=REF(C,1),AMOUNT/10000,0);
    X1:=IF(C<REF(C,1),AMOUNT/10000,0);
    DD:=(X0-X1);
    EE:=VOL/SUM(VOL,55);
    LC:=REF(CLOSE,1);
    JH:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
    CP:=FILTER(CROSS(75,JH),11);
    ZP:=FILTER(CROSS(JH,25),22);
    DP:=IF(C>1000,(DD/10000000000)/EE,DD/(FINANCE(33)*FINANCE(37)/4))*100;
    七天线:MA(C,7),COLORFFFFFF;
    工作线:EMA(C,14),POINTDOT,LINETHICK4,COLORYELLOW;
    生命线:MA(C,22),LINETHICK2,COLORFF00FF;
    季线:MA(C,66),LINETHICK2,COLOR0000FF;
    半年线:MA(C,120),LINETHICK2,COLORFFFF00;
    长期趋势线:MA(C,240),CIRCLEDOT,COLOREEBBEE;
    A0:=ZP;
    A1:=CP;
    A2:=DP;
    STICKLINE((A2>=2.1),H,L,0,1),COLORGREEN;
    STICKLINE(((A2>=2.1) AND (C>REF(C,1))),O,C,3,1),COLORGREEN;
    STICKLINE(((A2>=2.1) AND (C<REF(C,1))),C,O,3,0),COLORGREEN;
    STICKLINE(((A2>0) AND (A2<5)),H,L,0,1),COLORRED;
    STICKLINE((((A2>0) AND (A2<5)) AND (C>REF(C,1))),O,C,3,0),COLORRED;
    STICKLINE((((A2>0) AND (A2<5)) AND (C<REF(C,1))),C,O,3,1),COLORRED;
    STICKLINE(((C>=工作线) AND (C>REF(C,1))),H,L,0,1),COLORRED;
    STICKLINE(((C>=工作线) AND (C>REF(C,1))),O,C,3,1),COLORRED;
    STICKLINE(((C>=工作线) AND (C<REF(C,1))),H,L,0,0),COLORRED;
    STICKLINE(((C>=工作线) AND (C<REF(C,1))),O,C,3,0),COLORRED;
    STICKLINE(((C<工作线) AND (C>REF(C,1))),H,L,0,1),COLORGREEN;
    STICKLINE(((C<工作线) AND (C>REF(C,1))),O,C,3,1),COLORGREEN;
    STICKLINE(((C<工作线) AND (C<REF(C,1))),H,L,0,0),COLORGREEN;
    STICKLINE(((C<工作线) AND (C<REF(C,1))),O,C,3,0),COLORGREEN;
    DRAWTEXT(A0,L,' ̄ ̄'),LINETHICK2,COLORFFFFFF;
    DRAWTEXT(A0,L*0.999,' B-B'),LINETHICK5,COLORFFFFFF;
    DRAWTEXT(A1,H,' ̄ ̄'),LINETHICK2,COLORCYAN;
    DRAWTEXT(A1,H*1.001,' S-S'),LINETHICK5,COLORCYAN;
    STICKLINE(A1,C,O,3,0),COLORFFFF00;
    STICKLINE(A1,H,L,0,0),COLORFFFF00;
    STICKLINE(A0,C,O,3,0),COLORFFFFFF;
    STICKLINE(A0,H,L,0,0),COLORFFFFFF;
    STICKLINE((A2>=10 AND A2<30),C,O,0,0),COLORFFBBFF;
    STICKLINE((A2>=10 AND A2<30),C,O,2,0),COLORMAGENTA;
    STICKLINE((A2>=10 AND A2<30),C,O,2.6,0),COLORFF22FF;
    STICKLINE((A2>=10 AND A2<30),C,O,2.2,0),COLORFF44FF;
    STICKLINE((A2>=10 AND A2<30),C,O,1.8,0),COLORFF66FF;
    STICKLINE((A2>=10 AND A2<30),C,O,1.4,0),COLORFF88FF;
    STICKLINE((A2>=10 AND A2<30),C,O,1,0),COLORFF99FF;
    STICKLINE((A2>=10 AND A2<30),C,O,0.6,0),COLORFFAAFF;
    STICKLINE((A2>=10 AND A2<30),C,O,0,0),COLORFFBBFF;
    A3:=EMA((((SLOPE(C,21)) * 20) + C),68);
    A4:=EMA(C,10);
    A5:=REF(C,2);
    A6:=((SMA((MAX((C - A5),0)),6,1)) / (SMA(ABS((C - A5)),6,1))) * 100;
    A7:=IF(((A6 < (REF(A6,1))) AND (A6 > 79)),A6,0);
    DRAWTEXT((CROSS(A4,A3)),L,'△'),LINETHICK2,COLORYELLOW;
    DRAWTEXT(A7,H,'○'),LINETHICK3,COLORGREEN;
    A8:=LLV(L,21);
    A9:=HHV(H,21);
    A10:=EMA((((CLOSE - A8) / (A9 - A8)) * 100),5);
    A11:=EMA((((CLOSE - A8) / (A9 - A8)) * 50),13);
    A12:=EMA(((0.667 * (REF(A10,1))) + (0.333 * A10)),2);
    A13:=LLV(L,55);
    A14:=HHV(H,34);
    A15:=EMA((((C - A13) / (A14 - A13)) * 100),3);
    A16:=(A11 + A15) / 2;
    A17:=EMA(((0.667 * (REF(A15,1))) + (0.333 * A10)),2);
    A18:=EMA(A16,5);
    A19:=EMA(((0.667 * (REF(A18,1))) + (0.333 * A18)),2);
    A20:=CROSS(A10,A11);
    A21:=(CROSS(A10,A19)) AND (A19 < 30);
    A22:=A21 * 0.6;
    DRAWTEXT((A22 = 0.6),L,'◇'),COLORYELLOW;
    DRAWTEXT((A20 = 1),L,'◇'),COLORWHITE;



    gd55152


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






    上一篇:「指标」通达信不错的MACD副图指标 源码
    下一篇:「指标」通达信波段藏宝图主图指标 源码
    回复

    举报

    QQ|

    GMT+8, 2024-11-10 11:19

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