牛熊分界线指标公式源码 神奇牛熊分界指标公式

牛熊分界线指标公式源码

操盘线:MA(C,4),COLORRED,LINETHICK3;

安全线:MA(C,17),COLORGRAY,LINESTICK,LINETHICK1;

牛熊分界线:

MA(C,200),COLORYELLOW,CIRCLEDOT,LINETHICK1;

DRAWTEXT(CROSS(安全线,操盘线)

,H*1.01,'←S 卖出'), COLOR00FF00,LINETHICK9;

DRAWTEXT(CROSS(操盘线,安全线),L*0.99,'←B 买入'),COLORYELLOW,LINETHICK9;

STICKLINE(CROSS(操盘线,安全线) AND

BACKSET(CLOSE>操盘线,2) AND (操盘线>安全线) AND

(CLOSE>安全线),OPEN,CLOSE,2,1),COLORYELLOW;

STICKLINE(CROSS(安全线,操盘线) AND

BACKSET(CLOSE<操盘线,2) AND

(操盘线<安全线),OPEN,CLOSE,2,1),COLORLIGREEN;

DRAWICON(CROSS( 操 盘 线 , 安 全 线 ),L*0.98,9);DRAWICON(CROSS( 安 全 线 , 操 盘

线),H*1,2);

神奇牛熊分界指标公式

    N1:=18;N2:=50;N3:=89;N4:=180;

    DRAWBAND(MA(C,18),RGB(185,20,30),MA(C,50),RGB(0,100,100));DRAWKLINE(H,O,L,C);

    风控:=1;

    高:=REFDATE(HHV(H,180),DATE)*1.05;

    低:=REFDATE(LLV(L,180),DATE)*0.95;

    A11:=MA(C,18);

    A12:=MA(C,50);

    A13:=MA(C,89);

    A14:=IF((MA(C,180)<=高ANDMA(C,180)>=低)ORC>=MA(C,180),MA(C,180),DRAWNULL);

    股票:=ISLASTBARANDA11>A12ANDA12>A13ANDA13>IF(A14=DRAWNULL,0,A14)ANDC>A11ORISLASTBARANDA11>A12ANDC>=A11;

    量化:=ISLASTBARANDA11>A12ANDC0,0.005,0.06,0,'主题投资：'),COLORFF00FF,LINETHICK2;

    DRAWTEXT_FIX(C>0,0.078,0.06,0,EXTERNSTR(0,2)),COLORFF00FF,LINETHICK2;

    ZD:=100*(C-REF(C,1))/REF(C,1);

    涨停:=ZD>=9.90;

    STICKLINE((涨停>0ANDC=H),O,H,3,0),LINETHICK3,COLORYELLOW;

    大阳线:=ZD>=5.00ANDZD<9.90;

    STICKLINE((大阳线>0ANDC<=H),O,C,3,0),LINETHICK3,COLORFF00FF;

    STICKLINE(CROSS(MA(C,18),MA(C,50))ANDC<=MA(C,18)*1.03,H,C,0.05,0),COLOR0000FF;

    STICKLINE(CROSS(MA(C,18),MA(C,50))ANDC<=MA(C,18)*1.03,C,O,3,0),COLOR0066FF;

    STICKLINE(CROSS(MA(C,18),MA(C,50))ANDC<=MA(C,18)*1.03,O,L,0.05,0),COLOR0099FF;

    STICKLINE(CROSS(MA(C,18),MA(C,50))ANDC<=MA(C,18)*1.03ANDC<O,O,(C-O)/2+O,3,0),COLORFFFF80;

    STICKLINE(CROSS(MA(C,18),MA(C,50))ANDC>MA(C,18)*1.03ANDC>O,C,(C-O)/2+O,3,0),COLORRED;

    STICKLINE(CROSS(MA(C,18),MA(C,50))ANDC>MA(C,18)*1.03ANDC>O,O,(C-O)/2+O,3,0),COLORYELLOW;

    STICKLINE(CROSS(MA(C,18),MA(C,50))ANDC>MA(C,18)*1.03ANDC>O,C,H,0.5,0),COLORRED;

    STICKLINE(CROSS(MA(C,18),MA(C,50))ANDC>MA(C,18)*1.03ANDC<O,C,(C-O)/2+O,3,0),COLORRED;

    STICKLINE(CROSS(MA(C,18),MA(C,50))ANDC>MA(C,18)*1.03ANDC<O,O,(C-O)/2+O,3,0),COLORFFFF80;

    STICKLINE(CROSS(MA(C,18),MA(C,50))ANDC>MA(C,18)*1.03ANDC<O,O,H,0.5,0),COLORFFFF80;

    STICKLINE(CROSS(MA(C,18),MA(C,50))ANDC>MA(C,18)*1.03ANDC<O,C,L,0.5,0),COLORRED;

    STICKLINE(CROSS(MA(C,18),MA(C,50))ANDC<MA(C,18)ANDC>=O,C,(C-O)/2+O,3,0),COLORYELLOW;

    STICKLINE(CROSS(MA(C,18),MA(C,50))ANDC<MA(C,18)ANDC>=O,O,(C-O)/2+O,3,0),COLORRED;

    STICKLINE(CROSS(MA(C,18),MA(C,50))ANDC<MA(C,18)ANDC>=O,C,H,0.5,0),COLORYELLOW;

    STICKLINE(CROSS(MA(C,18),MA(C,50))ANDC<MA(C,18)ANDC<O,C,(C-O)/2+O,3,0),COLORYELLOW;

    STICKLINE(CROSS(MA(C,18),MA(C,50))ANDC<MA(C,18)ANDC<O,O,(C-O)/2+O,3,0),COLORFFFF80;

    STICKLINE(CROSS(MA(C,18),MA(C,50))ANDC<MA(C,18)ANDC<O,O,H,0.5,0),COLORFFFF80;

    STICKLINE(CROSS(MA(C,18),MA(C,50))ANDC<MA(C,18)ANDC<O,C,L,0.5,0),COLORYELLOW;

    年:=YEAR,NODRAW;

    月:=MONTH,NODRAW;

    星期:=WEEKDAY,NODRAW;

    日1:=DATETODAY(DATE);

    上市日:=REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT);

    自然日:=日1-DATETODAY(上市日)+1;

    ZB:=(自然日-REF(自然日,1))!=星期-REF(星期,1)

    ORTOTALBARSCOUNT-CURRBARSCOUNT=0;

    本周第几天:=BARSLAST(ZB)+1;

    本月第几天:=BARSLAST(年*100+月!=REF(年*100+月,1))+1;

    MA1:=REF(C,本周第几天);

    MA2:=REF(MA1,本周第几天);

    MA3:=REF(MA2,本周第几天);

    MA4:=REF(MA3,本周第几天);

    五周价:=(C+MA1+MA2+MA3+MA4)/5;

    五周:REFDATE(五周价,DATE),COLOR9E9E21,LINETHICK1;

    CC:=IF(CURRBARSCOUNT<18,CONST(REF(C,1)),DRAWNULL),COLORWHITE;

    止赢:1.05*CC,COLORYELLOW,NODRAW;

    止损:0.97*CC,COLORFF00FF,NODRAW;