?
有未來函數(shù)
RSV:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
K:=SMA(RSV,3,1),NODRAW;
D:=SMA(K,3,1),NODRAW;
J:=3*K-2*D,NODRAW;
J_LLV5:=LLV(J,5),NODRAW;
J_K_DIF:=J-K,NODRAW;
KDJ_CON:=J_LLV5<10 AND J_K_DIF>-1,NODRAW;
DIF:=100*(EMA(C,12)-EMA(C,26)),NODRAW;
DEA:=EMA(DIF,9),NODRAW;
MACD:=(DIF-DEA)*2,NODRAW;
MACD_INC:=MACD-REF(MACD,1),NODRAW;
DIF_INC:=DIF-REF(DIF,1),NODRAW;
DEA_INC:=DEA-REF(DEA,1),NODRAW;
MACD_CON:=MACD_INC>0 AND DIF_INC>-0.1,NODRAW;
A11:=IF(C>O AND V>REF(VOL,1),2,0);
A12:=IF(C>O AND V<REF(VOL,1),1,0);
A13:=IF(C<O AND V>REF(VOL,1),-2,0);
A14:=IF(C<O AND V<REF(VOL,1),-1,0);
A15:=A11+A12+A13+A14;
ADD_SUM5:=SUM(A15,5);
ADD_SUM5_LLV4:=LLV(ADD_SUM5,4),NODRAW;
ADD_CON:=ADD_SUM5_LLV4<-3.5,NODRAW;
cxh1:=EMA(HHV(H,500),21);
cxh2:=EMA(HHV(H,250),21);
cxh3:=EMA(HHV(H,90),21);
cxh4:=EMA(LLV(L,500),21);
cxh5:=EMA(LLV(L,250),21);
cxh6:=EMA(LLV(L,90),21);
cxh7:=EMA((cxh4*0.96+cxh5*0.96+cxh6*0.96+cxh1*0.558+cxh2*0.558+cxh3*0.558)/6,21);
cxh8:=EMA((cxh4*1.25+cxh5*1.23+cxh6*1.2+cxh1*0.55+cxh2*0.55+cxh3*0.65)/6,21);
cxh9:=EMA((cxh4*1.3+cxh5*1.3+cxh6*1.3+cxh1*0.68+cxh2*0.68+cxh3*0.68)/6,21);
cxhA:=EMA((cxh7*3+cxh8*2+cxh9)/6*1.738,21);
cxhB:=REF(L,1);
cxhC:=SMA(ABS(L-cxhB),3,1)/SMA(MAX(L-cxhB,0),3,1)*100;
cxhD:=EMA(IF(C*1.35<=cxhA,cxhC*10,cxhC/10),3);
cxhE:=LLV(L,30);
cxhF:=HHV(cxhD,30);
cxh10:=IF(MA(C,58),1,0);
CAP_VIR:=EMA(IF(L<=cxhE,(cxhD+cxhF*2)/2,0),3)/618*cxh10,NODRAW;
CAP_HHV4:=HHV(CAP_VIR,4),NODRAW;
CAP_SUM10:=SUM(CAP_VIR,10),NODRAW;
CAP_CON:=CAP_HHV4>20 AND CAP_SUM10>20,NODRAW;
cxh_AM:=AMOUNT/((H-L)*2-ABS(C-O));
IN_AM:=IF(C>O,cxh_AM*(H-L),IF(C<O,cxh_AM*((H-O)+ (C-L)),AMOUNT/2))/100000000;
OUT_AM:=IF(C>O,0-cxh_AM*((H-C)+(O- L)),IF(C<O,0-cxh_AM*(H-L),0-AMOUNT/2))/100000000;
NET_AM:=IN_AM+OUT_AM,NODRAW;
NET_AM_SUM5:=SUM(NET_AM,5),NODRAW;
NET_AM_SUM5_INC:=NET_AM_SUM5-REF(NET_AM_SUM5,1),NODRAW;
NET_AM_SUM5_CON:=NET_AM_SUM5>-0.05 OR NET_AM_SUM5_INC>5,NODRAW;
NET_CON:=NET_AM>0 AND NET_AM_SUM5_CON=1,NODRAW;
MA10:=MA(CLOSE,10),NODRAW;//www.kzuj.com.cn
MA10_INC:=200*(MA10-REF(MA10,1))/(MA10+REF(MA10,1));
EMA10:=EMA(CLOSE,10),NODRAW;
EMA10_INC:=200*(EMA10-REF(EMA10,1))/(EMA10+REF(EMA10,1));
EMA30:=EMA(CLOSE,30),NODRAW;
EMA30_INC:=200*(EMA30-REF(EMA30,1))/(EMA30+REF(EMA30,1));
EMA10_CON:=EMA10_INC>-1.2,NODRAW;
BUY1_CON:=(KDJ_CON AND MACD_CON AND ADD_CON AND CAP_CON AND NET_CON AND EMA10_CON),colorred;
BUY1:=HHV(FILTER(BUY1_CON,3),8) AND EMA10_INC>-0.6;
BB1:=FILTER(BUY1,9),colorred;
DATE_BUY1:=HHVBARS(BB1,120),NODRAW;
CAP_CON2:=CAP_SUM10/REF(CAP_SUM10,DATE_BUY1)>2;
BUY2_CON:=CAP_CON2 AND EMA10_CON,colormagenta;
BUY2:=HHV(FILTER(BUY2_CON,30),20) AND EMA10_INC>-0.6;
BB2:=FILTER(BUY2,21),colormagenta;
cxhX3:=LLV(H,240);
cxhX4:=100*(C-cxhX3)/cxhX3;
cxhX5:=(C-LLV(L,528))/(HHV(H,528)-LLV(L,528))*100;
cxhX6:=(C-LLV(C,530))/(HHV(C,530)-LLV(C,530))*100;
cxhX8:=SMA(MAX(C-REF(C,1),0),34,1)/SMA(ABS(C-REF(C,1)),7,1)*100;
cxhX9:=SMA(MAX(C-REF(C,1),0),13,1)/SMA(ABS(C-REF(C,1)),13,1)*100;
cxhXA:=BARSCOUNT(C);
cxhXB:=cxhX8<20 AND cxhX9<23 AND cxhXA>35;
cxhXC:=cxhXB AND COUNT(cxhXB,1)=1;
cxhXD:=EMA(C,21)-EMA(C,8);
cxhXE:=EMA(cxhXD,5);
cxhXF:=TROUGHBARS(3,6,1)<4 AND CROSS(cxhXD,cxhXE);
cxhX10:=IF(TROUGHBARS(3,16,1)=0 AND H>L+0.04,4,0);
cxhX11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);
cxhX12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);
cxhX13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);
cxhX14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);
cxhX15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);
cxhX16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);
cxhX17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);
cxhX18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);
cxhX19:=EMA(C,2)-EMA(C,150);
cxhX1A:=EMA(cxhX19,100);
cxhX1B:=2*(cxhX19-cxhX1A);
cxhX1C:=POW(cxhX1B,3)*0.1+POW(cxhX1B,1);
cxhX1D:=SQRT(SQRT(L*H*O*C));
cxhX1E:=EMA(cxhX1D*0.97,3);
cxhX1F:=(H+L+C)/3;
cxhX20:=(cxhX1F-MA(cxhX1F,14))/(0.015*AVEDEV(cxhX1F,14));
cxhX21:=CROSS(cxhX1E,L);
S_BUY:cxhX10,colorblue;
C_BUY:(cxhX11+cxhX13+cxhX15+cxhX17),colorred;
C_SELL:(cxhX12+cxhX14+cxhX16+cxhX18),COLORGREEN;
HM:(cxhX17),COLORFF00AA;
DRAWTEXT(cxhX13,0.6,'●'),colorred;
DRAWICON(C_BUY,C_BUY,1);
DRAWICON(C_SELL,C_SELL,9);
DRAWICON(S_BUY>0,4.2,1);
DRAWTEXT(S_BUY AND cxhXF AND cxhXC,2.8,'30PERCENT'),colormagenta;
DRAWTEXT(cxhX18,3,'NL'),COLORGREEN;//http://www.kzuj.com.cn
DRAWTEXT(cxhX20<-110 AND S_BUY>0,2,'SEL'),colorblue;
DRAWTEXT(cxhX17,1.3,'HM'),COLORFF00AA;
DRAWTEXT(S_BUY AND cxhX20<-100 AND cxhXF AND cxhXC>0,4.1,'GOOD PROFIT'),colorred;
D_BUY:=HHVBARS(C_BUY>0,240),NODRAW;
D_SELL:=HHVBARS(C_SELL>0,240),NODRAW;
B1:4*(BB1 AND D_BUY<D_SELL),colorred;
B2:4*(BB2 AND D_BUY<D_SELL),colormagenta;
DRAWTEXT(B1=4,4,'B'),colorred;
DRAWTEXT(B2=4,4,'B'),colormagenta;
B12:=B1 OR B2 OR C_BUY>2 OR HM;
D1_B12:=HHVBARS(B12,0),NODRAW;
MACD_HHV_B12:=IF(D1_B12,HHV(MACD,D1_B12),DRAWNULL),NODRAW;
S1_CON:=(MACD<MACD_HHV_B12) OR BARSCOUNT(C)=0,NODRAW;
D1_S1:=HHVBARS(S1_CON,0),NODRAW;
S1_HHV_B12:=IF(D1_S1,HHV(S1_CON,D1_B12),DRAWNULL),NODRAW;
S1_CON_F:=S1_CON AND (REF(D1_B12,1)<REF(D1_S1,1)),colorliblue;
STICKLINE(S1_CON_F,2,0,2,1),colorlicyan;
DRAWTEXT(S1_CON_F,1,'S1'),colorlicyan;
S1_CON_CAP:=CAP_SUM10<REF(CAP_SUM10,D1_B12),NODRAW;
S1:3.5*((S1_CON_F AND MA10_INC<0 AND S1_CON_CAP) OR (S1_CON_F AND DEA_INC<0)),COLORGREEN;//http://www.kzuj.com.cn
DRAWTEXT(S1=3.5,3.5,'S1'),COLORGREEN;//http://www.kzuj.com.cn
D1_B12_2:=HHVBARS(S1_CON_F,0),NODRAW;
DEA_HHV_B12:=IF(D1_B12_2,HHV(DEA,D1_B12_2),DRAWNULL),NODRAW;
S2_CON_:=(DEA<DEA_HHV_B12) OR BARSCOUNT(C)=0,NODRAW;
D1_S2:=HHVBARS(S2_CON_,0),NODRAW;
S2_HHV_B12:=IF(D1_S2,HHV(S2_CON_,D1_B12_2),DRAWNULL),NODRAW;
?
打印本文
關(guān)閉窗口