北沙博弈（非发布版）

DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);

DEA:=EMA(DIF,9);

MACD:=(DIF-DEA)*2;

VA11:=HHVBARS(H,BARSLAST(MACD<0)+1);

VA22:=CROSS(BACKSET(CROSS(0,MACD),REF(VA11,1)+2),0.5);

NOTEXT价格高点:DRAWLINE(VA22,H,REF(VA22,1),REF(H,1),1),COLORLIBLUE,DOTLINE;{在价格画线}

VA33:=LLVBARS(L,BARSLAST(MACD>0)+1);

VA44:=CROSS(BACKSET(CROSS(MACD,0),REF(VA33,1)+2),0.5);

NOTEXT价格低点:DRAWLINE(VA44,L,REF(VA44,1),REF(L,1),1),COLORYELLOW,DOTLINE;{在价格画线}

VA1:=HHVBARS(MACD,BARSLAST(MACD<0)+1);

VA2:=CROSS(BACKSET(CROSS(0,MACD) OR (ISLASTBAR AND MACD>0),REF(VA1,1)+2),0.5);

前高:=DRAWLINE(VA2,MACD,REF(VA2,1),REF(MACD,1),1),COLORWHITE;

VA3:=LLVBARS(MACD,BARSLAST(MACD>0)+1);

VA4:=CROSS(BACKSET(CROSS(MACD,0) OR (ISLASTBAR AND MACD<0),REF(VA3,1)+2),0.5);

前低:=DRAWLINE(VA4,MACD,REF(VA4,1),REF(MACD,1),1),COLORYELLOW;

指标高点:=IF(COUNT(MACD>0,BARSLAST(VA2))=BARSLAST(VA2),DRAWLINE(VA2,H,REF(VA2,1),REF(H,1),1),

DRAWNULL),COLORYELLOW,LINETHICK2;

STICKLINE(MACD>0 AND C>指标高点 AND O>指标高点,C,O,1,0),COLORRED;

STICKLINE(MACD>0 AND C>指标高点 AND O<指标高点,C,指标高点,1,0),COLORRED;

STICKLINE(MACD>0 AND MACD>前高,C,O,1,0),COLORYELLOW;

STICKLINE(REFX(VA2,1) OR REFX(VA4,1),C,O,1,0),COLORLIRED;

JC:=CROSS(DIF,DEA);

JTS:=BARSLAST(DIF<DEA);

SC:=CROSS(DEA,DIF);

STS:=BARSLAST(DIF>DEA);

NOTEXT红柱起点:IF(JTS>0,DRAWLINE(JC,L,REF(JC,1),REF(L,1),1),DRAWNULL),COLORMAGENTA,LINETHICK2;

NOTEXT绿柱起点:IF(STS>0,DRAWLINE(SC,H,REF(SC,1),REF(H,1),1),DRAWNULL),COLORGREEN,LINETHICK2;

JGGD:=DRAWLINE(SC,H,REF(SC,1),REF(H,1),1);

WW:=BARSLAST(VA4)<=REF(IF(VA4,BARSNEXT(JC),DRAWNULL),BARSLAST(VA4));

指标低点:=IF(WW,DRAWLINE(VA4,L,REF(VA4,1),REF(L,1),1),DRAWNULL),COLORWHITE,LINETHICK2;

STICKLINE(MAX(C,O)<NOTEXT价格低点,C,O,1,0),COLORWHITE;

STICKLINE(MAX(C,O)>NOTEXT价格低点 AND MIN(C,O)<NOTEXT价格低点,NOTEXT价格低点,MIN(C,O),1,0),COLORWHITE;

STICKLINE(NOTEXT红柱起点<NOTEXT价格低点 AND MAX(C,O)>NOTEXT红柱起点 AND MIN(C,O)<NOTEXT红柱起点,NOTEXT红柱起点,MIN(C,O),1,0),COLORMAGENTA;

STICKLINE(NOTEXT红柱起点<NOTEXT价格低点 AND MAX(C,O)<NOTEXT红柱起点,C,O,1,0),COLORMAGENTA;

DRAWNUMBER(ISLASTBAR,NOTEXT绿柱起点,NOTEXT绿柱起点),COLORWHITE;

DRAWNUMBER(ISLASTBAR,NOTEXT红柱起点,NOTEXT红柱起点),COLORYELLOW;

W:DRAWTEXT(NOTEXT红柱起点<NOTEXT价格低点 AND O<NOTEXT红柱起点 AND C>NOTEXT红柱起点 AND MACD>REF(MACD,1) AND REF(C,1)<NOTEXT红柱起点 AND JTS>1,L*0.99,'W'),COLORWHITE;

X:DRAWTEXT(JC AND NOTEXT红柱起点>JGGD,L*0.99,'X'),COLORWHITE;

J:DRAWTEXT(NOT(WW) AND C>NOTEXT绿柱起点 AND O<NOTEXT绿柱起点,L*0.99,'J'),COLORWHITE;

Z:DRAWTEXT(WW AND C>NOTEXT绿柱起点 AND O<NOTEXT绿柱起点,L*0.99,'Z'),COLORWHITE;

{E:=DRAWTEXT(SC AND NOTEXT绿柱起点<JGDD,NOTEXT绿柱起点*1.007,'E'),COLORWHITE;

F:=DRAWTEXT(VA4 AND 指标低点>JGGD,H*1.007,'F'),COLORWHITE;}

S:DRAWTEXT(MACD>0 AND MACD>前高 AND MACD>REF(MACD,1) AND C<REF(C,1),H*1.007,'S'),COLORWHITE;

D:DRAWTEXT(MACD>0 AND MACD>前高,L*0.99,'D');

M:DRAWTEXT(MACD>0 AND MACD>REF(MACD,1) AND REF(MACD,5)>0 AND C<REF(C,1) AND

C<NOTEXT红柱起点,L*0.99,'M'),COLORWHITE;

DRAWTEXT_FIX(C>0,0,0.89,0,'M :'),COLORYELLOW;

DRAWTEXT_FIX(C>0,0.025,0.89,0,'卖是傻子'),COLORYELLOW;

DRAWTEXT_FIX(C>0,0,1,0,'W :'),COLORYELLOW;

DRAWTEXT_FIX(C>0,0.025,1,0,'挖坑结束、还需确认'),COLORYELLOW;

DRAWTEXT_FIX(C>0,0.2,1,0,'X :'),COLORYELLOW;

DRAWTEXT_FIX(C>0,0.225,1,0,'小心筑顶、红柱保护'),COLORYELLOW;

DRAWTEXT_FIX(C>0,0.4,1,0,'J :'),COLORYELLOW;

DRAWTEXT_FIX(C>0,0.425,1,0,'简单骗术、时间和谐'),COLORYELLOW;

DRAWTEXT_FIX(C>0,0.6,1,0,'Z :'),COLORYELLOW;

DRAWTEXT_FIX(C>0,0.625,1,0,'再涨一段、注意真假'),COLORYELLOW;

{DRAWTEXT_FIX(C>0,0.8,1,0,'E :'),COLORYELLOW;

DRAWTEXT_FIX(C>0,0.825,1,0,'离场观望'),COLORYELLOW;

DRAWTEXT_FIX(C>0,0,1,0,'F :'),COLORYELLOW;

DRAWTEXT_FIX(C>0,0.025,1,0,'多头猛进'),COLORYELLOW;}

DRAWTEXT_FIX(C>0,0.9,1,0,'S :'),COLORYELLOW;

DRAWTEXT_FIX(C>0,0.925,1,0,'傻子才卖'),COLORYELLOW;

DRAWTEXT_FIX(C>0,0.79,1,0,'D :'),COLORYELLOW;

DRAWTEXT_FIX(C>0,0.815,1,0,'等着数钱'),COLORYELLOW;

DA:=YEAR AND MONTH AND DAY;

AAA:=STRCAT(CON2STR(YEAR,0),'年');

AAB:=STRCAT(CON2STR(MONTH,0),'月');

AA33:=STRCAT(CON2STR(DAY,0),'日');

AA4:=STRCAT('【',IF(WEEKDAY=1,'一',IF(WEEKDAY=2,'二',IF(WEEKDAY=3,'三',IF(WEEKDAY=4,'四',IF(WEEKDAY=5,'五',IF(WEEKDAY=6,'六','日')))))));

AA1:=STRCAT(STRCAT(STRCAT(AAA,AAB),STRCAT(AA33,AA4)),'】');

DRAWTEXT_FIX(DA,0,0,0,AA1),COLORGREEN;

北沙博弈（非发布版）

相关推荐