一、黄金生命线 ,主图叠加
{P1 1 100 5};
{P1 1 100 13};
{P1 1 100 34};
EXP11:=EXPMA(CLOSE,12);
EXP21:=EXPMA(CLOSE,50);
EXP1:=DMA(SUM(CLOSE,9)/9,9);
EXP2:=DMA(SUM(CLOSE,34)/34,34);
VAR1:=EXPMEMA(LOW,34);
VAR4:IF(VAR1>=REF(VAR1,2) OR (EXP11 >= VAR1),VAR1,DRAWNULL),LINETHICK2,COLORRED;
DIFF1:=EMA(CLOSE,21)-EMA(CLOSE,34);
DEA1:=EMA(DIFF1,8);
MACD1:=20*(DIFF1-DEA1);
MARD:=SMA(MACD1,2,1);
Y:=ATAN(MACD1);
STICKLINE(MACD1>MARD,MACD1,MARD,1,0),COLOR0000FF;
STICKLINE(MACD1<MARD,MACD1,MARD,1,0),COLORFF0000;
LONG:=26;
SHORT:=12;
M:=9;
DIFF2:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);
DEA2:=EMA(DIFF2,M);
MACD2:=2*(DIFF2-DEA2);
DU0:=CROSS(DIFF2,0);
UD0:=CROSS(0,DIFF2);
TDU0:=BARSLAST(DU0);
TUD0:=BARSLAST(UD0);
DU3:=REF(DU0,1);
UD3:=REF(UD0,1);
TDU3:=BARSLAST(DU3);
TUD3:=BARSLAST(UD3);
UDGLINE:=IF(TDU3<TUD3,REF(HHV(HIGH,2),TDU3),REF(LLV(LOW,2),TUD3));
JDU0:=REF(CLOSE,1)<=REF(UDGLINE,1) AND CLOSE>UDGLINE AND TDU0<TUD0;
JUD0:=REF(CLOSE,1)>=REF(UDGLINE,1) AND CLOSE<UDGLINE AND TUD0<TDU0;
JDU1:=JDU0 AND COUNT(JDU0,TDU0)=1;
JUD1:=JUD0 AND COUNT(JUD0,TUD0)=1;
JDU2:=JDU1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1);
JUD2:=JUD1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1);
JDU3:=JDU1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1);
JUD3:=JUD1 AND REF(BARSLAST(JUD1),1)<REF(BARSLAST(JDU1),1);
BSLINE:=IF(BARSLAST(JDU2)<BARSLAST(JUD2),IF(REF(CROSS(0,MACD2),1),LLV(LOW,2),REF(LLV(LOW,2),BARSLAST(REF(CROSS(0,MACD2),1)))),IF(REF(CROSS(MACD2,0),1),HHV(HIGH,2),REF(HHV(HIGH,2),BARSLAST(REF(CROSS(MACD2,0),1)))));
STICKLINE(MACD2>=0,0,MACD2,2,1),COLOR0000FF;
STICKLINE(MACD2>=0 AND MACD2<REF(MACD2,1),0,MACD2,2,0),COLOR0000FF;
STICKLINE(MACD2<0,0,MACD2,2,0),COLORFFFF00;
STICKLINE(MACD2<0 AND MACD2>REF(MACD2,1),0,MACD2,2,1),COLORFFFF00;
DIF:DIFF2,LINETHICK2,COLOR0000FF;
MACD:DEA2,COLORFF0000;
DEF:MACD2,LINETHICK0,COLORFFFF00;
STICKLINE(CLOSE>0,0,0,2,0),COLOR808080;
DEFUT:=BARSLAST(CROSS(MACD2,0));
DEFDT:=BARSLAST(CROSS(0,MACD2));
DEFUL:=IF(MACD2>=0,HHV(MACD2,DEFUT+1),REF(HHV(MACD2,DEFUT+1),DEFDT+1));
DEFDL:=IF(MACD2<0,LLV(MACD2,DEFDT+1),REF(LLV(MACD2,DEFDT+1),DEFUT+1));
DEFU2L:=REF(DEFUL,DEFUT+1);
DEFD2L:=REF(DEFDL,DEFDT+1);
DRAWICON(LLV(MACD2,4)>0 AND MACD2<REF(MACD2,1) AND REF(MACD2,1)>REF(MACD2,2) AND REF(MACD2,2)>REF(MACD2,3),MACD2,2);
DRAWICON(HHV(MACD2,4)<0 AND MACD2>REF(MACD2,1) AND REF(MACD2,1)<REF(MACD2,2) AND REF(MACD2,2)<REF(MACD2,3),MACD2,1);
DRAWICON((JUD1 OR BARSLAST(JDU1)>BARSLAST(JUD1)) AND MACD2>=0 AND REF(MACD2,1)<REF(DEFU2L,1) AND MACD2>DEFU2L,MACD2,5);
DRAWICON((JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1)) AND MACD2<0 AND REF(MACD2,1)>REF(DEFD2L,1) AND MACD2<DEFD2L,MACD2,3);
VAR111:=JDU1 OR BARSLAST(JDU1)<BARSLAST(JUD1);
VAR112:=HHV(MACD2,4)<0 AND MACD2>REF(MACD2,1) AND REF(MACD2,1)<REF(MACD2,2) AND REF(MACD2,2)<REF(MACD2,3);
空:=EMA(CLOSE,5);
均衡:EMA(空,0),COLORFFFFFF;
下趋势双线持币:HHV(MA(HIGH,3),2),LINETHICK2,COLOR00FF00;
上趋势单线持股:LLV(MA(HIGH,3),1),LINETHICK2,COLOR0000FF;
VARA:=(CLOSE-REF(OPEN,29))/REF(OPEN,29)*100;
VARB:=EMA(0.667*REF(VARA,1)+0.333*VARA,5);
DRAWTEXT(IF(VOL>=1.3*MA(VOL,5) AND COUNT(VARA>=VARB AND VARA<-17,3) AND REF(LOW,1)=LLV(LOW,120),1,0),LOW,'买入');
VARC:=(SMA(MAX(CLOSE-REF(CLOSE,1),0),6,1))/(SMA(ABS(CLOSE-REF(CLOSE,1)),6,1))*100;
VAR1A:=(HIGH+LOW+OPEN+2*CLOSE)/5;
VAR2A:=REF(VAR1A,1);
VAR3A:=(SMA(MAX(VAR1A-VAR2A,0),10,1))/(SMA(ABS(VAR1A-VAR2A),10,1))*100;
VAR4A:=FILTER(IF(COUNT(VAR3A<20,5)>=1 AND COUNT(VAR1A=LLV(VAR1A,10),10)>=1 AND CLOSE>=OPEN*1.038 AND VOL>MA(VOL,5)*1.2,1,0),5);
VAR5A:=FILTER(均衡>REF(均衡,1) AND 下趋势双线持币<REF(下趋势双线持币,1) AND CLOSE>REF(CLOSE,1),11);
VAR6A:=REF(CLOSE,1);
VAR7A:=(SMA(MAX(CLOSE-VAR6A,0),6,1))/(SMA(ABS(CLOSE-VAR6A),6,1))*100;
H1:(EMA(SLOPE(CLOSE,34)*20+CLOSE,75)),COLOR00FFFF;
H2:EMA(CLOSE,8),COLORFFFFFF;
VAR1B:=H2-H1;
STICKLINE(VAR1B>=0,H2,H1,1,0),COLOR0000FF;
STICKLINE(VAR1B<0,H2,H1,1,0),COLOR00FF00;
DRAWICON(CROSS(H1,H2),LOW,1);
