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

 找回密码
 注册账号

QQ登录

只需一步,快速开始

搜索
    楼主: 股票学习站

    启爆K线、黑马营、回马枪主图叠加公式源码:

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

    21万

    主题

    21万

    帖子

    13

    精华

    积分
    10873
    2015-12-1 04:52:00 显示全部楼层

    __ZBT
    _COMM
    _PAR
    _VAR TYX2, D1, D2, D3, D4
    _ZB OPEN, CLOSE, HIGH, LOW
    _LOCAL
    _RES YK, GK, 红旗
    _DEF 0.000
    _CODE
    IF REF(COUNT(CLOSE<MA(REF(HHV((CLOSE+LOW+OPEN+HIGH)/4,40),1),3),5)=5,1) & CLOSE>MA(REF(HHV((CLOSE+LOW+OPEN+HIGH)/4,40),1),3) & CLOSE>OPEN
    THEN YK=1;
    ELSE YK=0;
    ENDIF;
    TYX2=MA(REF(HHV((CLOSE+LOW+OPEN+HIGH)/4,10),1),3);
    IF REF(COUNT(CLOSE<TYX2,5)=5,1) & CLOSE>TYX2 & CLOSE>OPEN
    THEN GK=1;
    ELSE GK=0;
    ENDIF;
    KLINE(OPEN,HIGH,LOW,CLOSE,CLRYELLOW,YK=0);
    KLINE(OPEN,(OPEN+CLOSE)/2,OPEN,(OPEN+CLOSE)/2,clrBlue,GK=0);
    KLINE((OPEN+CLOSE)/2,CLOSE,(OPEN+CLOSE)/2,CLOSE,clrWHITE,GK=0);
    D1=CLOSE=HHV(CLOSE,89);
    D2=BLAST(D1,0);
    IF D2>0
    THEN D3=REF(CLOSE,D2);
    ELSE D3=REF(CLOSE,D2);
    ENDIF;
    D4=CROSSUP(CLOSE,REF(D3,1));
    IF D4 & COUNT(D4,5)=1
    THEN 红旗=1;
    ELSE 红旗=0;
    ENDIF;
    DRAWTEXT(LOW*0.95,红旗=1,CLRYELLOW,posBottom,posMid,"五\n面\n八\n面\n彩\n旗\n");
    DRAWICON(icn24,红旗=1,LOW,posBottom,posMid,clrPurple);

    __END
    黑马营系列主图叠加指标公式源码:
    __ZBT
    _COMM
    _PAR
    _VAR VAR1, VAR2, VAR3, E1, VAE1, VAE2, VAR4
    _ZB CLOSE, HIGH, OPEN, LOW, CYS13, CYS34, VOL, 流通盘, CYR13
    _LOCAL
    _RES 回马枪A, 回马枪B, 黑马营
    _DEF 0.000
    _CODE
    VAR1=CHOOSE(CLOSE>REF(CLOSE,1),(3*HIGH+4*CLOSE+3*OPEN+2*LOW)/12,(2*HIGH+4*CLOSE+3*OPEN+3*LOW)/12);
    VAR2=EMA(VAR2,VAR1,8);
    VAR3=EMA(VAR3,VAR1,25);
    VAR4=EMA(VAR4,VAR1,3);
    回马枪A=(REF(CLOSE/REF(CLOSE,1),3)>1.099 | REF(CLOSE/REF(CLOSE,1),6)>1.099 | REF(CLOSE/REF(CLOSE,1),4)>1.099 | REF(CLOSE/REF(CLOSE,1),5)>1.099  | REF(CLOSE/REF(CLOSE,1),2)>1.099)
    & CROSSUP(VAR2,LOW) & EMA (E1,VAR3,3);
    IF( 回马枪A)
    THEN 回马枪A=1;
    ELSE 回马枪A=0;
    ENDIF;
    //CURVELINE(回马枪A,clrSky);
    DRAWTEXT(LOW*0.98,回马枪A=1,clrSky,posBottom,posMid,"枪A");
    DRAWICON(icn24,回马枪A=1,LOW,posBottom,posMid,clrSky);
    vae1=EMA(vae1,VAR1,25);
    vae2=EMA(vae2,VAR1,8);
    回马枪B=CHOOSE((CROSSUP(VAE1,Low) & MA(Close,5)>MA(Close,30) & HHV(CYS13,10)>10 & HHV(CYS34,15)>18 & vae2>VAE1),15,0);
    IF( 回马枪B)
    THEN 回马枪B=1;
    ELSE 回马枪B=0;
    ENDIF;
    //CURVELINE(回马枪B,clrYellow);
    DRAWTEXT(LOW*0.98,回马枪B=1,clrGreen,posBottom,posMid,"枪B");
    DRAWICON(icn24,回马枪B=1,LOW,posBottom,posMid,clrGreen);
    黑马营=(CLOSE/REF(CLOSE,1)>1.03 & VOL/流通盘*100>2.5& VAR4>VAR2 & VAR4>VAR3 & CLOSE>VAR4 & (COSTD(CLOSE-CLOSE*0.01/100,0)-COSTD(CLOSE-CLOSE*20/100,0))*100>50
    & CYR13>1) | (CYS13>11 & CYS13<30 & CYR13>1 & CLOSE/REF(CLOSE,1)>1.03);
    IF( 黑马营)
    THEN 黑马营=1;
    ELSE 黑马营=0;
    ENDIF;
    //CURVELINE(黑马营,clrPurple);
    DRAWTEXT(LOW*0.98,黑马营=1,CLRYELLOW,posBottom,posMid,"黑\n马\n营\n");
    DRAWICON(icn24,黑马营=1,LOW,posBottom,posMid,clrPurple);
    TITLE("[黑马营:",黑马营,"]",clrPurple,"[回马枪A:",回马枪A,"]",clrSky,"[回马枪B:",回马枪B,"]",clrYellow);


    回复

    举报

    QQ|

    GMT+8, 2024-3-29 19:08

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