市盈率:C/FINANCE(33),NODRAW,COLORFFFF00;
DIF:=EMA(CLOSE,10)-EMA(CLOSE,22);
DE:=EMA(DIF,7.5);
MACDA:=2*(DIF-DE),;
HZL:=CROSS(MACDA,0);
LZH:=CROSS(0,MACDA);
BC:=BARSLAST(HZL OR LZH)+1;
ZGHZ:=IF(MACDA 0,HHV(MACDA,BC),0);
ZGLZ:=IF(MACDA 0,LLV(MACDA,BC),0);
DRAWBAND(ZGHZ,RGB(105,77,77),0,RGB(77,77,77));
DRAWBAND(ZGLZ,RGB(80,0,0),0,RGB(66,88,66));
DIFF:EMA(CLOSE,10)-EMA(CLOSE,22),COLORFFFFFF;
DEA:EMA(DIFF,7.5),COLOR00FFFF;
MACD:2*(DIFF-DEA), COLORSTICK,LINETHICK0;
STICKLINE(MACD 0 AND MACD REF(MACD,1),0,MACD,1.5,1),COLORRED;
STICKLINE(MACD 0 AND MACD REF(MACD,1),0,MACD,1.5,0),COLOR90FF00;
STICKLINE(MACD 0 AND MACD REF(MACD,1),0,MACD,1.5,1),COLOREFFF00;
STICKLINE(MACD 0 AND MACD REF(MACD,1),0,MACD,1.5,0),COLORFFAAFF;
STICKLINE(MACD 0 AND MACD=HHV(MACD,BARSLAST(MACD 0)) AND MACD =REFX(MACD,1) AND MACD =REFX(MACD,2),MACD,MACD*0.5,0.6,1),COLOR00F0FF;
STICKLINE(MACD 0 AND MACD=LLV(MACD,BARSLAST(MACD 0)) AND MACD =REFX(MACD,1) AND MACD =REFX(MACD,2),MACD,MACD*0.5,0.6,1),COLORFFAAFF;
A1:=LLV(MACD,30);
A2:=A1=MACD;
A3:=BARSLAST(A2);
A4:=REF(MACD,A3);
B1:=HHV(MACD,30);
B2:=B1=MACD;
B3:=BARSLAST(B2);
B4:=REF(MACD,B3);
STICKLINE(A3,A4,A4,10,0),COLOR999999;{MACD最低柱线的最高位置画线}
STICKLINE(B3,B4,B4,10,0),COLOR999999;{MACD最高柱线的最高位置画线}
:TROUGHBARS(3,3,1),COLOR0000FF,NODRAW;
:PEAKBARS(3,3,1),COLOR00FF00,NODRAW;
低:IF( =0,DIFF,IF( ,TROUGH(3,3,1),REF(TROUGH(3,3,1),1))),COLOR00FFFF,NODRAW;
高:IF( =0,DIFF,IF( ,PEAK(3,3,1),REF(PEAK(3,3,1),1))),COLOR00FF00,NODRAW;
STICKLINE( =0 AND DIFF 0 AND DIFF DEA,0,DIFF,0,0),COLORFFAAFF;
STICKLINE( =0 AND DIFF 0 AND DIFF DEA,DIFF,0,0,0),COLOR00FF00;
DRAWTEXT( =0 AND DIFF 0 AND DIFF DEA,DIFF,'低'),COLORFFAAFF;
DRAWTEXT( =0 AND DIFF 0 AND DIFF DEA,DIFF,'高'),COLOR00FF00;
低位金叉:=CROSS(DIFF,DEA) AND DIFF -0.1;
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA =0));
二次金叉:=CROSS(DIFF,DEA) AND DEA 0 AND COUNT(JCCOUNT=2,21)=1;
AA1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
底背离:=(REF(L,AA1+1) L OR REF(C,AA1+1) C) AND (L,DIFF) REF((L,DIFF),AA1+1) AND CROSS(DIFF,DEA);
DRAWLINE(AA1=0,DEA,底背离,DEA,0),COLOR0000FF,LINETHICK1;
AA2:=BARSLAST(REF(CROSS(DEA,DIFF),1));
顶背离:=(REF(C,AA2+1) C OR REF(H,AA2+1) H) AND REF((H,DIFF),AA2+1) (H,DIFF) AND CROSS(DEA,DIFF);
DRAWLINE(AA2=0,DEA,顶背离,DEA,0),COLORGREEN,LINETHICK1;
DRAWICON(CROSS(DIFF,DEA) AND DIFF 0,DEA,36);
DRAWICON(CROSS(DEA,DIFF) AND DIFF 0,DEA,37);
DRAWICON(CROSS(DIFF,DEA) AND DIFF 0,DEA,1);
DRAWICON(二次金叉,DEA*0.9,36) ;
解盘1:=CONST(IF(MACD 0,1,0));
解盘2:=CONST(IF(MACD 0,1,0));
解盘A:=IF(解盘1=1,'【精华8个字 买小卖小，缩头缩脚】 当股价一波比一波高时，反而红柱的堆，
一堆比一堆小，证明产生了顶背离现象，应该及时卖出',
IF(解盘2=1,'【精华8个字 买小卖小，缩头缩脚】 当股价一波比一波低时，
反而绿柱的堆一堆比一堆小，证明产生了底背离，应该买进',
DRAWNULL));
DRAWTEXT_FIX((解盘1=1 OR 解盘2=1),0.16,0,0,解盘A),COLORFFEE00;
