input:p(19),s(7),m(9); ZJ1:=DMA((HIGH+LOW+CLOSE*2)/4,0.9);
ZJ2:=VOL/((HIGH-LOW)*2-(ABS(CLOSE-OPEN)));
ZJ3:=IF(CLOSE>OPEN,ZJ2*(HIGH-LOW),IF(CLOSE<OPEN,ZJ2*(HIGH-OPEN+CLOSE-LOW),VOL/2))+IF(CLOSE>OPEN,-ZJ2*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE<OPEN,-ZJ2*(HIGH-LOW),-VOL/2));
ZJ4:=ZJ3/20/1.15;
ZJ5:=ZJ4*0.55+REF(ZJ4,1)*0.33+REF(ZJ4,2)*0.22;
ZJ6:=EMA(ZJ5,3);
MJ_1:=EMA(CLOSE,S)-EMA(CLOSE,P);
MJ_2:=EMA(MJ_1,M);
MJ_3:=2*(MJ_1-MJ_2);
MJ_4:=SUM(MJ_3/8,0);
MJ_5:=IF(MAX(MJ_4,REF(MJ_4,2))<REF(MJ_4,1) OR MIN(MJ_4,REF(MJ_4,2))>REF(MJ_4,1),1,0);
MJ_6:=BARSLAST(MJ_5)+1;
MJ_7:=MJ_4-REF(MJ_4,MJ_6);
X:=BARSLAST(BACKSET(ISLASTBAR,1)=1)+1;
Z_1:=REF(MJ_2,1)+(M+1)/(2*(M-1))*REF(MJ_3,1);
Z_2:=((P-1)*(S+1)*REF(EMA(CLOSE,P),1)-(P+1)*(S-1)*REF(EMA(CLOSE,S),1)+(S+1)*(P+1)*REF(MJ_1,1))/(2*P-2*S);
Z_3:=((P-1)*(S+1)*REF(EMA(CLOSE,P),1)-(P+1)*(S-1)*REF(EMA(CLOSE,S),1)+(S+1)*(P+1)*REF(MJ_2,1))/(2*P-2*S);
Z_4:=((P-1)*(S+1)*REF(EMA(CLOSE,P),1)-(P+1)*(S-1)*REF(EMA(CLOSE,S),1)+(S+1)*(P+1)*Z_1)/(2*P-2*S);
Y_1:=MJ_2*X+(M+1)/(2*(M-1))*MJ_3*X;
Y_2:=((P-1)*(S+1)*EMA(CLOSE,P)*X-(P+1)*(S-1)*EMA(CLOSE,S)*X+(S+1)*(P+1)*MJ_1*X)/(2*P-2*S);
Y_3:=((P-1)*(S+1)*EMA(CLOSE,P)*X-(P+1)*(S-1)*EMA(CLOSE,S)*X+(S+1)*(P+1)*MJ_2*X)/(2*P-2*S);
Y_4:=((P-1)*(S+1)*EMA(CLOSE,P)*X-(P+1)*(S-1)*EMA(CLOSE,S)*X+(S+1)*(P+1)*Y_1)/(2*P-2*S);
低金:=CROSS(MJ_1,MJ_2) AND MJ_1<-0.1;
SA0:=COUNT(CROSS(MJ_1,MJ_2) AND MJ_2<0,21)=3;
零下二次金叉:=CROSS(MJ_3,0) AND SA0;
SA1:=COUNT(CROSS(MJ_1,MJ_2),BARSLAST(MJ_2>=0));
二金:=(CROSS(MJ_1,MJ_2) AND MJ_2<0 AND COUNT(SA1=2,21)=1)*2;
SA2:=BARSLAST(REF(CROSS(MJ_1,MJ_2),1));
底背:=(REF(CLOSE,SA2+1)>CLOSE AND MJ_1>REF(MJ_1,SA2+1) AND CROSS(MJ_1,MJ_2))*3;
三全:=低金 AND 二金 AND 底背;
SA3:=BARSLAST(REF(CROSS(MJ_2,MJ_1),1));
顶背:=REF(CLOSE,SA3+1)<CLOSE AND REF(MJ_1,SA3+1)>MJ_1 AND CROSS(MJ_2,MJ_1);
M_C1:=EMA(CLOSE,5)/EMA(EMA(CLOSE,9),16)<=0.85 AND CLOSE/REF(CLOSE,1)<1.05 AND CLOSE/REF(CLOSE,1)>0.905 AND VOL/CAPITAL*100<5;
M_C2:=MIN(REF(CLOSE,2)*0.865,REF(CLOSE,13)*0.772);
M_C3:=(CLOSE-M_C2)/CLOSE<0.03;
满仓:=M_C1 AND M_C3;
DRAWGBK(CLOSE,COLORRGB(36,68,36),COLORRGB(100,100,100),1);
FILLRGN(MJ_7>0,0,MJ_7),color808080;
FILLRGN(MJ_7<0,0,MJ_7),color3E00;
STICKLINE(MJ_3<REF(MJ_3,1) AND MJ_3<0,0,MJ_3,0,0),colorFFCF78;
STICKLINE(MJ_3<REF(MJ_3,1) AND MJ_3>0,0,MJ_3,0,0),colorFFFF;
STICKLINE(MJ_3>REF(MJ_3,1) AND MJ_3<0,0,MJ_3,0,0),colorAF00AF;
STICKLINE(MJ_3>REF(MJ_3,1) AND MJ_3>0,0,MJ_3,0,0),colorFF;
FILLRGN(MJ_1>=MJ_2,MJ_1,MJ_2),color689AFF;
FILLRGN(MJ_1<MJ_2,MJ_2,MJ_1),colorFFC000;
PARTLINE(1,0),LINETHICK2,colorFFFFFF;
PARTLINE(ZJ6>=0,0),LINETHICK2,colorFF;
PARTLINE(CLOSE,MJ_3),colorFF00FF;
DIFF:MJ_1,PRECISION2,colorFFFFFF;
DEA:MJ_2,PRECISION2,colorFFFF;
MACD:MJ_3,PRECISION2,colorFF;
PARTLINE(MJ_1>=REF(MJ_1,1) AND MJ_2<REF(MJ_2,1),MJ_1),LINETHICK2,colorFF00FF;
PARTLINE(MJ_1<REF(MJ_1,1) AND MJ_2>REF(MJ_2,1),MJ_1),LINETHICK2,colorFF0000;
加速线:2.8*(MJ_2-MJ_1),LINEDOT,PRECISION2,colorFF00;
面积:MJ_7,PRECISION2,colorFF8900;
换手率:IF(CAPITAL=0,VOL/SUM(VOL,100)*100,VOL/FINANCE(7)),LINETHICK0,PRECISION2,colorFFFF00;
涨跌幅:(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100,LINETHICK0,PRECISION2,colorFFC8FF;
DRAWTEXT(低金,DEA*0.98,'▲'),PXDN8,colorC300;
DRAWTEXT(零下二次金叉,DEA*0.98,'▲ \n▲'),PXDN8,colorC300;
DRAWTEXT(二金,DEA*0.98,'▲ \n▲'),PXDN8,colorC300;
DRAWTEXT(底背,DEA*0.98,' \n \n↑'),PXDN8,colorFF00FF;
DRAWTEXT(三全,DEA*0.98,'▲ \n▲ \n▲'),PXDN8,colorFF;
DRAWTEXT(顶背,DEA,'▼ \n▼'),PXUP60,colorFF5B00;
VERTLINE(满仓),LINEDOT,color808080;
DRAWTEXT(满仓,加速线,' 第 \n 二 \n 天 \n 买 \n'),ALIGN0,colorFFFF;
DRAWICON(满仓,MJ_7*0.96,1),ALIGN0,PXDN10;// www.fxjgsw.com
DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,6,2,'今日DIFF转折： '+NUMTOSTR(Z_2,2)),colorFF00;
DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,6,20,'今日DEA转折： '+NUMTOSTR(Z_3,2)),colorFF00;
DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,6,38,'今日MACD转折：'+NUMTOSTR(Z_4,2)),colorFF00;
DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,6,94,'明日DIFF转折： '+NUMTOSTR(Y_2,2)),colorFFFF;
DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,6,112,'明日DEA转折： '+NUMTOSTR(Y_3,2)),colorFFFF;
DRAWTEXTEX(SYSPARAM(3)=BARPOS,0,6,130,'明日MACD转折： '+NUMTOSTR(Y_4,2)),colorFFFF; |
