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

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
    上一主题 下一主题

    [通达信] 「指标」自用主图《赛俩目平安》有码有图有附件


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

    积分
    11061
    楼主
    2024-3-11 12:20:04
    【资料名称】:自用主图《赛俩目平安》有码有图有附件介绍
    【资料描述】:

    自用主图《赛俩目平安》有码有图有附件

    以尊贵的赛俩目向您问候!凭吉庆的古尔邦节为您祝福,愿伊斯兰的光芒永远照亮您的生活,愿真主的平安日夜伴随你的身旁,祝各民族兄弟亲如一家和穆平安,阿米乃!!!
    发一个赛俩目平安 主图
    说明主要用的是千钧老师和一品等老师源码改编.
    在此再次感谢理想的各位老师!!!

    需要建一个引用公式
    {千钧引用}
    ZZ:=(REF(HHV(H,3),1)+REF(LLV(L,3),1))/2;
    A:=IF(C>ZZ,VOL,0);
    B:=IF(C<ZZ,VOL,0);
    A1:=IF(C>ZZ,INDEXA,0);
    B1:=IF(C<ZZ,INDEXA,0);
    总0:IF(FINANCE(1)=0,(A1-B1),(A-B));

    主图源码如下:
    参数
    n1 0 100 5;
    m 0 100 10;
    n 0 240 90;


    玄:=1+(BARSLAST(YEAR!=REF(YEAR,1) OR DATETODAY(DATE)=1));
    悟斋:=IF(PERIOD=5,玄,DRAWNULL);
    主1:=LLV(L,悟斋);
    底:CONST(主1),NODRAW,COLOR00FF00;
    RC:=底;
    DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26),COLORBLACK;
    DIFFA:=(RC+DIFF*3);
    DEA:=EMA(DIFF,9),COLORMAGENTA;
    DEAA:=(RC+DEA*3);
    MACD:=(DIFF-DEA)*4;
    STICKLINE(MACD>0,RC,RC+MACD,1,0),COLORRED;
    STICKLINE(MACD<0,RC,RC+MACD,1,0),COLOR008000;
    N:=8;
    M:=REF(CLOSE,1);
    A:=SMA(MAX(CLOSE-M,0),N,1)/SMA(ABS(CLOSE-M),N,1)*100,COLORYELLOW,LINETHICK1;
    B0:=A=DRAWLINE(A>=HHV(A,N),A,A<=LLV(A,N),1,A),COLOR00FF00;
    B1:=A=DRAWLINE(A>=HHV(A,N),A,A<=LLV(A,N),A,1),COLOR00FF00;
    B2:= A<REF(A,1);
    B3:=A>REF(1,A);
    AA10:=MA(C,N1);
    BB10:=ATAN((AA10-REF(AA10,1)))*180/3.1416;
    AA:=CONST(HHV(H,N));
    AAA:=CONST(LLV(L,N));
    OO:=IF(PERIOD=5,MA(O,22),IF(PERIOD=6,MA(O,10),MA(O,6)));
    J:="KDJ.J#DAY";
    CC:=IF(PERIOD=5,MA(C,22),IF(PERIOD=6,MA(C,10),MA(C,6)));
    HS:=VOL/CAPITAL*100;
    JJ:=(H+L+C)/3;QJ0:=VOL/IF(H=L,4,H-L);
    QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(C,O)),QJ0*(MIN(O,C)-L));
    QJ2:=IF(CAPITAL=0,QJ0*(MIN(O,C)-L),QJ0*(JJ-MIN(C,O)));
    QJ3:=QJ0*(H-MAX(O,C));QJ4:=QJ0*(MAX(C,O)-JJ);
    QJ5:=QJ1+QJ2;QJ6:=QJ3+QJ4;
    DD:=(QJ5-QJ6)/(QJ5+QJ6)*100;
    DDX:=((QJ1+QJ2)-(QJ3+QJ4))/SUM(VOL,10)*100;DDZ:=DD*17;
    DDY:=((QJ2+QJ4)-(QJ1+QJ3))/SUM(VOL,10)*100;
    BB:=(CROSS(J,0)AND ((DDX>0 AND DDY>0) OR DDZ>400));
    主:=QJ1+QJ2;散:=QJ3+QJ4;
    BBD:=EMA("千钧引用.总0#WEEK",2)/SUM(IF(CAPITAL=0,REF(INDEXA,1),REF(VOL,1)),5)*100;
    XH1:=REF(BBD,1)<-15 AND BBD>REF(BBD,1) AND BBD>-10;
    XH2:=REF(BBD,1)>=15 AND BBD<REF(BBD,1) AND BBD<10;
    五日线夹角:ATAN((MA(C,5)/REF(MA(C,5),1)-1)*100)*57.3,COLOREEEEEE,NODRAW;
    十三日线夹角:ATAN((MA(C,13)/REF(MA(C,13),1)-1)*100)*57.3,COLOR00DDEE,NODRAW;
    二十三日线夹角:ATAN((MA(C,23)/REF(MA(C,23),1)-1)*100)*57.3,COLOREE00EE,NODRAW;
    三十四日线夹角:ATAN((MA(C,34)/REF(MA(C,34),1)-1)*100)*57.3,COLOR00EE00,NODRAW;
    六十八日线夹角:ATAN((MA(C,68)/REF(MA(C,68),1)-1)*100)*57.3,COLOREEDD00,NODRAW;
    二五零日线夹角:ATAN((MA(C,250)/REF(MA(C,250),1)-1)*100)*57.3,COLORFF8800,NODRAW;
    STICKLINE(C>=REF(C,1),H,L,0,1),COLOR0000FF;
    STICKLINE(C>=REF(C,1),C,O,2.8,0),COLOR0000BB;
    STICKLINE(C>=REF(C,1),C,O,2,0),COLOR0000DD;
    STICKLINE(C>=REF(C,1),C,O,1.2,0),COLOR0000EE;
    STICKLINE(C>=REF(C,1),C,O,0.4,0),COLOR0000FF;
    STICKLINE(C<REF(C,1),H,L,0,1),COLORFFFF00;
    STICKLINE(C<REF(C,1),C,O,2.8,0),COLOR999900;
    STICKLINE(C<REF(C,1),C,O,2,0),COLORBBBB00;
    STICKLINE(C<REF(C,1),C,O,1.2,0),COLORDDDD00;
    STICKLINE(C<REF(C,1),C,O,0.4,0),COLORFFFF00;
    STICKLINE(BBD>0,CC,OO,2,0),COLORFF00FF;
    STICKLINE(BBD<0,CC,OO,2,0),COLOR00FF00;
    T0:=CONST(IF(VOL>REF(VOL,1) AND MA(VOL,5)>REF(MA(VOL,5),1),1,0));
    T1:=CONST(IF(VOL<REF(VOL,1) AND MA(VOL,5)>REF(MA(VOL,5),1),1,0));
    T2:=CONST(IF(VOL>REF(VOL,1) AND MA(VOL,5)<REF(MA(VOL,5),1),1,0));
    T3:=CONST(IF(VOL<REF(VOL,1) AND MA(VOL,5)<REF(MA(VOL,5),1),1,0));

    AA20:=MA(C,M);
    BB20:=ATAN((AA20-REF(AA20,1)))*180/3.1416;
    C1:=DRAWICON(B1 AND B2,A,9);
    C2:=DRAWICON(B0 AND B3,A,15);
    {DRAWICON(FILTER(C1>0,1),L*0.98,1);}
    DRAWICON(FILTER(C2>0,1),H*1.01,15);
    T4:=CONST(IF(主>REF(主,1) AND 主>散 AND IF(CAPITAL=0,HS>1.3,HS>5),1,0));
    T5:=CONST(IF(主<REF(主,1) AND 主>散 AND IF(CAPITAL=0,HS>0.5 AND HS<1.3,HS>3 AND HS<=5),1,0));
    T6:=CONST(IF(主>REF(主,1) AND 主<散 AND IF(CAPITAL=0,HS<1.3 AND HS>0.5,HS<5 AND HS>3),1,0));
    T7:=CONST(IF(主<REF(主,1) AND 主<散 AND IF(CAPITAL=0,HS<1.3,HS<3 AND HS>=1),1,0));
    DRAWTEXT(T0=1 AND CURRBARSCOUNT=N/2,AA-(AA*0.03),'■成交大于昨日,有继续增大趋势'),COLORFF00FF;
    DRAWTEXT(T1=1 AND CURRBARSCOUNT=N/2,AA-(AA*0.03),'■成交小于昨日,但有放大迹象'),COLOR00DDFF;
    DRAWTEXT(T2=1 AND CURRBARSCOUNT=N/2,AA-(AA*0.03),'■成交大于昨日,但有缩小迹象'),COLORFFFF00;
    DRAWTEXT(T3=1 AND CURRBARSCOUNT=N/2,AA-(AA*0.03),'■成交小于昨日,且有缩小迹象'),COLORFFBB00;
    DRAWTEXT(T4=1 AND CURRBARSCOUNT=N/2+30,AA-(AA*0.03),'■资金比较活跃,大资金活动明显'),COLOR00FFFF;
    DRAWTEXT(T5=1 AND CURRBARSCOUNT=N/2+30,AA-(AA*0.03),'■资金开始积极,大资金温和进场'),COLOR00DDFF;
    DRAWTEXT(T6=1 AND CURRBARSCOUNT=N/2+9,AA-(AA*0.03),'■散乱资金积极,散户行为明显'),COLORFFDD00;
    海面:MA(C,60),COLORFFFFFF,NODRAW;
    乘风:MA(C,8),COLORYELLOW,LINETHICK1,NODRAW;
    破浪:EMA(C,21),LINETHICK2,COLORMAGENTA;
    IF(破浪>海面,海面,DRAWNULL),COLOR0000FF,LINETHICK2;
    IF(乘风>=破浪,乘风,DRAWNULL),COLORYELLOW,LINETHICK1;
    IF(乘风>破浪 AND 乘风<=REF(乘风,1),乘风,DRAWNULL),COLORCYAN,LINETHICK1;
    IF(破浪<=REF(破浪,1),破浪,DRAWNULL),COLORGREEN,LINETHICK2;
    AA1:=COUNT(CROSS(EMA(C,21),MA(C,8)),30)=1;
    BB1:=COUNT(CROSS(EMA(C,21),MA(C,60)),30)=1;
    CC1:=REF(BARSLAST(AA1 AND BB1),1);
    DD1:=CC1 AND CROSS(MA(C,8),EMA(C,21));
    DRAWTEXT(DD1,(LOW * 0.99),'←乘风推进'){,,COLORRED};{,COLOR80FFFF;}
    DRAWICON(XH1,L*0.986,25);
    DRAWICON(XH2,H*1.02,19);
    DRAWTEXT(BB,L*0.985,'★赚点钱玩'),COLOR00FFFF;

    ST:=(CLOSE/OPEN-1)*100;
    Z,:=(C/REF(C,1)-1)*100;
    SX1:=ST>3 AND ST=HHV(ST,6);
    SX2:=Z,>3 AND Z,=HHV(Z,,6);
    SX3:=Z,>=9 AND CLOSE=HIGH;
    赛俩目:IF(SX1 OR SX2 OR SX3,1,0),COLOR0000FF,NODRAW;
    DYSJ:=BARSLAST(赛俩目);
    跟踪:IF(DYSJ<=13 AND COUNT(C>REF(L,DYSJ),DYSJ)>=DYSJ-1,DYSJ,0),COLOR00FFFF,NODRAW;
    关注:IF(DYSJ>=4 AND COUNT(C>REF(C,DYSJ),3)>=3,REF(C,DYSJ),REF(L,DYSJ)),COLORFFFFFF,NODRAW;
    IF(关注=REF(L,DYSJ),REF(C,DYSJ),REF(L,DYSJ)),COLOR00FFFF,NODRAW;
    BF1:=LOW<关注*1.01 AND COUNT(LOW<关注*1.01,跟踪)=1;
    BF2:=LOW<关注 AND COUNT(LOW<关注,跟踪)=1;
    平安:IF(BF1 OR BF2,1,0),COLOR00FF00,NODRAW;
    DRAWICON(赛俩目,L*0.99,18);
    DRAWTEXT(赛俩目,LOW*0.982,'‖赛俩目'),COLORRED;{,COLOR00FFFF;}
    DRAWTEXT(平安,LOW*0.981,'≌平安'),COLOR00FF00;{≌}
    STICKLINE(C>0,关注,关注,5,-1),COLORFFFFFF;
    支撑:STICKLINE(跟踪,关注,关注,3,0),COLORFF00FF;
     


     




     



    gd10949


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


    回复

    举报

    发新帖

    GMT+8, 2025-2-24 07:13

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