{参数N 2 300 40；N1：1 100 9；M1 1 100 3；M2 1 100 3；}
STICKLINE(C>0.1,0,100,4.8,0),COLOR668800;
STICKLINE(C>0.1,-5,0,4.8,0),COLORFFB06C;
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9),COLOR33CCFF;
MACD:2*(DIFF-DEA), COLORSTICK,LINETHICK2;
STICKLINE(MACD>REF(MACD,1) AND MACD>0,0,MACD,0,0),COLORRED;
STICKLINE(MACD<=REF(MACD,1) AND MACD>0,0,MACD,0,0),COLORYELLOW;
STICKLINE(MACD<REF(MACD,1) AND MACD<0,0,MACD,0,0),COLORCYAN;
STICKLINE(MACD>=REF(MACD,1) AND MACD<0,0,MACD,0,0),COLORMAGENTA;
{WR}
WR:100-100*(HHV(HIGH,N)-CLOSE)/(HHV(HIGH,N)-LLV(LOW,N)),COLORFFFFFF;
STICKLINE(WR=100,105,100,3,0),COLORFFFF00;
STICKLINE(WR=0,-5,0,3,0),COLOR0000FF;
{J}
RSV:=(CLOSE-LLV(LOW,N1))/(HHV(HIGH,N1)-LLV(LOW,N1))*100,LINETHICK2;
K:=SMA(RSV,M1,1),LINETHICK1;
D:=SMA(K,M2,1),LINETHICK1;
J:3*K-2*D,COLORFF00FF,LINETHICK1;
IF(J<0,J,DRAWNULL),COLORGREEN,LINETHICK4;
IF(K>90,K,DRAWNULL),COLOR0000FF,LINETHICK2;
IF(D>85,D,DRAWNULL),COLORFFFF11,LINETHICK2;
DRAWICON(CROSS(J,1),J,1);
DRAWICON(K>80 AND D>80 AND CROSS(D,K),D,2);
TJ1:=(C-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100;
TJF:=SMA(TJ1,13,8);
TJFF:=SMA(TJ1,13,4);
DRAWBAND(TJF,RGB(175,0,0),TJFF,RGB(70,100,50));
AR1:=(CLOSE-LLV(LOW,120))/(HHV(HIGH,120)-LLV(LOW,120))*100;
AR2:=SMA(AR1,3,1);
AR3:=SMA(AR2,3,1);
AR4:=SMA(AR3,3,1);
MMCD:=3*(AR3-AR4);
STICKLINE(MMCD>0,MMCD+50,50,0.0,1),COLOR0000DD;
STICKLINE(MMCD<0,MMCD+50,50,0.0,1),COLORDDDD00;
LC:=REF(CLOSE,1);
VAR01:=C-REF(C,1);
VAR02:=100*EMA(EMA(VAR01,6),6)/EMA(EMA(ABS(VAR01),6),6);
MA5:=EMA(C,5);
MA13:=EMA(C,13);
UP:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS(MA13,MA5))+1),H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS(MA5,MA13))+1),0),COLOR0000FF;
DOWN:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS(MA5,MA13))+1),L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS(MA13,MA5))+1),0),COLOR00FF00;
BT:=(LLV(VAR02,2)=LLV(VAR02,7) AND COUNT(VAR02<0,2) AND CROSS(VAR02,MA(VAR02,2))) AND REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1);
STICKLINE(BT,85,100,2,0),COLOR000088;
STICKLINE(BT,85,100,1,0),COLOR0000CC;
STICKLINE(BT,85,100,0.22,0),COLOR0000FF;
DRAWTEXT(BT,97,'短牛'),COLOR0000FF;
TJ11:=REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1) AND C<HHV(H,21)*0.82;
STICKLINE(TJ11,85,95,3,0),COLOR880088;
STICKLINE(TJ11,85,95,1.5,0),COLORAA00AA;
STICKLINE(TJ11,85,95,0.8,0),COLORCC00CC;
STICKLINE(TJ11,85,95,0.2,0),COLORFF00FF;
DRAWTEXT(TJ11,92,'中牛'),COLORFF00FF;
HR:=HHV(HIGH,55);
HRY:=LLV(LOW,55);
HRY11:=HR*HRY;
HRY33:=SQRT(HRY11);
TJ2:=REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1) AND C<HRY33,COLOR00FFFF;
STICKLINE(TJ2,85,90,4,0),COLOR008888;
STICKLINE(TJ2,85,90,2,0),COLOR00AAAA;
STICKLINE(TJ2,85,90,1,0),COLOR00CCCC;
STICKLINE(TJ2,85,90,0.2,0),COLOR00FFFF;
DRAWTEXT(TJ2,87,'大牛'),COLOR00FFFF;
{HZ_买底1}
A8:=100*EMA(EMA((C-REF(C,1)),6),6)/EMA(EMA(ABS((C-REF(C,1))),6),6);
UP1:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(EMA(CLOSE,19),EMA(CLOSE,7)))+1),LLV(L,BARSLAST(CROSS(EMA(CLOSE,19),EMA(CLOSE,7)))+1),H=HHV(H,BARSLAST(CROSS(EMA(CLOSE,7),EMA(CLOSE,19)))+1),HHV(H,BARSLAST(CROSS(EMA(CLOSE,7),EMA(CLOSE,19)))+1),0);
DOWN1:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(EMA(CLOSE,7),EMA(CLOSE,19)))+1),HHV(H,BARSLAST(CROSS(EMA(CLOSE,7),EMA(CLOSE,19)))+1),L=LLV(L,BARSLAST(CROSS(EMA(CLOSE,19),EMA(CLOSE,7)))+1),LLV(L,BARSLAST(CROSS(EMA(CLOSE,19),EMA(CLOSE,7)))+1),0);
买1:=IF((LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2))) AND REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1),DRAWNULL,100);
STICKLINE(买1=100,0,5,4,0),COLOR00AAAA;
STICKLINE(买1=100,0,5,2.5,0),COLOR00CCCC;
STICKLINE(买1=100,0,5,0.5,0),COLOR00FFFF;
顶:85,COLORFFFF00,LINETHICK1;
低:15,COLOR208FFF,LINETHICK1;
中轴:50,COLOR555555;
VAR1:=8*SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,5,1)-
6*SMA(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,5,1),3.2,1),COLORRED,LINETHICK1;
VAR2:=8,COLORGREEN,LINETHICK0;
买入: IF(CROSS(VAR1,VAR2),70,0),STICK,LINETHICK2;
DRAWICON(CROSS(VAR1,VAR2),70,13);
DRAWICON(VAR1<=10,5,1); |
