咨詢內容:
麻煩技術給改下博弈上謝謝
TY:=CLOSE;
HD:=FILTER(BACKSET(FILTER(REF(TY,10)=HHV(TY,2*10+1),10),10+1),10);
LD:=FILTER(BACKSET(FILTER(REF(TY,10)=LLV(TY,2*10+1),10),10+1),10);
A:=REF(CLOSE,BARSLAST(HD));
B:=REF(CLOSE,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
波浪頂:IF(T1,A,A),COLORFF00FF,POINTDOT,LINETHICK2;
波浪底:IF(T2,B,B),COLOR80FF00,POINTDOT,LINETHICK2;
VAR3:=LLV(H,240);
VAR4:=100*(C-VAR3)/VAR3;
VAR5:=(C-LLV(L,528))/(HHV(H,528)-LLV(L,528))*100;
VAR6:=(C-LLV(C,530))/(HHV(C,530)-LLV(C,530))*100;
VAR7:=0;
VAR8:=MA(HHV(C-REF(C,1),0),34)/MA(ABS(C-REF(C,1)),7)*100;
VAR9:=MA(HHV(C-REF(C,1),0),13)/MA(ABS(C-REF(C,1)),13)*100;
VARA:=BARSCOUNT(C);
VARB:=VAR8<20 AND VAR9<23 AND VARA>35;
VARC:=VARB AND COUNT(VARB,1)=1;
VARD:=EMA(C,21)-EMA(C,8);
VARE:=EMA(VARD,5);
VARF:=(361)<4 AND CROSS(VARD,VARE);
VAR10:=IF((3161)=0 AND H>L+0.04,4,0);
VAR11:= ZIGZAG(C,5,1)>REF(ZIGZAG(C,5,1),1) AND REF(ZIGZAG(C,5,1),1)<=REF(ZIGZAG(C,5,1),2) AND REF(ZIGZAG(C,5,1),2)<=REF(ZIGZAG(C,5,1),3);
VAR12:= ZIGZAG(C,5,1)<REF(ZIGZAG(C,5,1),1) AND REF(ZIGZAG(C,5,1),1)>=REF(ZIGZAG(C,5,1),2) AND REF(ZIGZAG(C,5,1),2)>=REF(ZIGZAG(C,5,1),3);
VAR13:= ZIGZAG(C,21,1)>REF(ZIGZAG(C,21,1),1) AND REF(ZIGZAG(C,21,1),1)<=REF(ZIGZAG(C,21,1),2) AND REF(ZIGZAG(C,21,1),2)<=REF(ZIGZAG(C,21,1),3);
VAR14:=ZIGZAG(C,21,1)<REF(ZIGZAG(C,21,1),1) AND REF(ZIGZAG(C,21,1),1)>=REF(ZIGZAG(C,21,1),2) AND REF(ZIGZAG(C,21,1),2)>=REF(ZIGZAG(C,21,1),3);
VAR15:= ZIGZAG(C,54,1)>REF(ZIGZAG(C,54,1),1) AND REF(ZIGZAG(C,54,1),1)<=REF(ZIGZAG(C,54,1),2) AND REF(ZIGZAG(C,54,1),2)<=REF(ZIGZAG(C,54,1),3);
VAR16:= ZIGZAG(C,54,1)<REF(ZIGZAG(C,54,1),1) AND REF(ZIGZAG(C,54,1),1)>=REF(ZIGZAG(C,54,1),2) AND REF(ZIGZAG(C,54,1),2)>=REF(ZIGZAG(C,54,1),3);
VAR17:= ZIGZAG(C,89,1)>REF(ZIGZAG(C,89,1),1) AND REF(ZIGZAG(C,89,1),1)<=REF(ZIGZAG(C,89,1),2) AND REF(ZIGZAG(C,89,1),2)<=REF(ZIGZAG(C,89,1),3);
VAR18:= ZIGZAG(C,89,1)<REF(ZIGZAG(C,89,1),1) AND REF(ZIGZAG(C,89,1),1)>=REF(ZIGZAG(C,89,1),2) AND REF(ZIGZAG(C,89,1),2)>=REF(ZIGZAG(C,89,1),3);
VAR19:= EMA(C,2)-EMA(C,150);
VAR1A:= EMA(VAR19,100);
VAR1B:= 2*(VAR19-VAR1A);
VAR1C:= POW(VAR1B,3)*0.1+POW(VAR1B,1);
VAR1D:= SQRT(SQRT(L*H*O*C));
VAR1E:= EMA(VAR1D*0.97,3);
VAR1F:= (H+L+C)/3;
VAR20:= (VAR1F-MA(VAR1F,14))/(0.015*AVEDEV(VAR1F,14));
VAR21:= CROSS(VAR1E,L);
買點1:=VAR10;
買點2:=(VAR11+VAR13+VAR15+VAR17);
賣點1:=(VAR12+VAR14+VAR16+VAR18),LINETHICK2;
VAR22:=買點1 AND VARF AND VARC AND VAR21 AND VAR4<0 AND VAR5=0 AND VAR6=0 AND VAR20<(-110);
DRAWTEXT(買點1>0,LOW,'買入'),COLORRED;
DRAWTEXT(買點2>0,LOW,'買入'),COLORFFFFFF;
DRAWTEXT(賣點1>0,HIGH*1.006,'賣出'), COLOR33FF33;
AAA:=BARSLAST(買點1>0||買點2>0);
BBB:=BARSLAST(賣點1>0);
STICKLINE(AAA<BBB&&ISUP,OPEN,CLOSE,COLORRED,0);
DRAWLINE(AAA<BBB&&ISUP,H,AAA<BBB&&ISUP,L,COLORRED);
STICKLINE(AAA<BBB&&ISDOWN,OPEN,CLOSE,COLORRED,1);
DRAWLINE(AAA<BBB&&ISDOWN,H,AAA<BBB&&ISDOWN,O,COLORRED);
DRAWLINE(AAA<BBB&&ISDOWN,C,AAA<BBB&&ISDOWN,L,COLORRED);
STICKLINE(AAA>BBB&&ISUP,OPEN,CLOSE,COLORGREEN,0);
DRAWLINE(AAA>BBB&&ISUP,H,AAA>BBB&&ISUP,L,COLORGREEN);
STICKLINE(AAA>BBB&&ISDOWN,OPEN,CLOSE,COLORGREEN,1);
DRAWLINE(AAA>BBB&&ISDOWN,H,AAA>BBB&&ISDOWN,O,COLORGREEN);
DRAWLINE(AAA>BBB&&ISDOWN,C,AAA>BBB&&ISDOWN,L,COLORGREEN);
VAR3P:=IF(CLOSE/REF(CLOSE,1)>1.050 AND HIGH/CLOSE<1.010 AND IF(CLOSE>REF(CLOSE,1),88,0)>0, 91, 0);
SS1:=MA((LOW+HIGH+CLOSE)/3,5)>REF(MA((LOW+HIGH+CLOSE)/3,5),1) AND REF(MA((LOW+HIGH+CLOSE)/3,5),1)<REF(MA((LOW+HIGH+CLOSE)/3,5),2);
SC:=L<HHV(MA((LOW+HIGH+CLOSE)/3,5),13) AND H>HHV(MA((LOW+HIGH+CLOSE)/3,5),13) AND C>REF(C,1) AND C>O;
MR:=SC AND COUNT(SS1,2);
DRAWICON(CROSS(ZIGZAG(C,10,1) ,REF(ZIGZAG(C,10,1),1)) ,LOW*0.99,11);
DRAWICON(CROSS(REF(ZIGZAG(C,10,1),1),ZIGZAG(C,10,1)) ,HIGH*1.01,13);
PL5:=ZIGZAG(C,5,1);
EN1:=ZIGZAG(C,5,1)>REF(ZIGZAG(C,5,1),1) AND REF(ZIGZAG(C,5,1),1)<=REF(ZIGZAG(C,5,1),2) AND REF(ZIGZAG(C,5,1),2)<=REF(ZIGZAG(C,5,1),3);
EX1:=ZIGZAG(C,5,1)<REF(ZIGZAG(C,5,1),1) AND REF(ZIGZAG(C,5,1),1)>=REF(ZIGZAG(C,5,1),2) AND REF(ZIGZAG(C,5,1),2)>=REF(ZIGZAG(C,5,1),3);
PL10:=ZIGZAG(C,13,1);
EN2:=ZIGZAG(C,10,1)>REF(ZIGZAG(C,10,1),1) AND REF(ZIGZAG(C,10,1),1)<=REF(ZIGZAG(C,10,1),2) AND REF(ZIGZAG(C,10,1),2)<=REF(ZIGZAG(C,10,1),3);
EX2:=ZIGZAG(C,10,1)<REF(ZIGZAG(C,10,1),1) AND REF(ZIGZAG(C,10,1),1)>=REF(ZIGZAG(C,10,1),2) AND REF(ZIGZAG(C,10,1),2)>=REF(ZIGZAG(C,10,1),3);
PL20:=ZIGZAG(C,26,1);
EN3:=ZIGZAG(C,20,1)>REF(ZIGZAG(C,20,1),1) AND REF(ZIGZAG(C,20,1),1)<=REF(ZIGZAG(C,20,1),2) AND REF(ZIGZAG(C,20,1),2)<=REF(ZIGZAG(C,20,1),3);
EX3:=ZIGZAG(C,20,1)<REF(ZIGZAG(C,20,1),1) AND REF(ZIGZAG(C,20,1),1)>=REF(ZIGZAG(C,20,1),2) AND REF(ZIGZAG(C,20,1),2)>=REF(ZIGZAG(C,20,1),3);
PL40:=ZIGZAG(C,55,1);
?
?來源:程序化99網( m.kzuj.com.cn )
博易技術人員:
TY:=CLOSE;
HD:=FILTER(BACKSET(FILTER(REF(TY,10)=HHV(TY,2*10+1),10),10+1),10);
LD:=FILTER(BACKSET(FILTER(REF(TY,10)=LLV(TY,2*10+1),10),10+1),10);
A:=REF(CLOSE,BARSLAST(HD));
B:=REF(CLOSE,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
波浪頂:IF(T1,A,A),COLORFF00FF,POINTDOT,LINETHICK2;
波浪底:IF(T2,B,B),COLOR80FF00,POINTDOT,LINETHICK2;
VAR3:=LLV(H,240);
VAR4:=100*(C-VAR3)/VAR3;
VAR5:=(C-LLV(L,528))/(HHV(H,528)-LLV(L,528))*100;
VAR6:=(C-LLV(C,530))/(HHV(C,530)-LLV(C,530))*100;
VAR7:=0;
VAR8:=MA(HHV(C-REF(C,1),0),34)/MA(ABS(C-REF(C,1)),7)*100;
VAR9:=MA(HHV(C-REF(C,1),0),13)/MA(ABS(C-REF(C,1)),13)*100;
VARA:=BARSCOUNT(C);
VARB:=VAR8<20 AND VAR9<23 AND VARA>35;
VARC:=VARB AND COUNT(VARB,1)=1;
VARD:=EMA(C,21)-EMA(C,8);
VARE:=EMA(VARD,5);
VARF:=(361)<4 AND CROSS(VARD,VARE);
VAR10:=IF((3161)=0 AND H>L+0.04,4,0);
VAR11:= ZIG(C,5,1)>REF(ZIG(C,5,1),1) AND REF(ZIG(C,5,1),1)<=REF(ZIG(C,5,1),2) AND REF(ZIG(C,5,1),2)<=REF(ZIG(C,5,1),3);
VAR12:= ZIG(C,5,1)<REF(ZIG(C,5,1),1) AND REF(ZIG(C,5,1),1)>=REF(ZIG(C,5,1),2) AND REF(ZIG(C,5,1),2)>=REF(ZIG(C,5,1),3);
VAR13:= ZIG(C,21,1)>REF(ZIG(C,21,1),1) AND REF(ZIG(C,21,1),1)<=REF(ZIG(C,21,1),2) AND REF(ZIG(C,21,1),2)<=REF(ZIG(C,21,1),3);
VAR14:=ZIG(C,21,1)<REF(ZIG(C,21,1),1) AND REF(ZIG(C,21,1),1)>=REF(ZIG(C,21,1),2) AND REF(ZIG(C,21,1),2)>=REF(ZIG(C,21,1),3);
VAR15:= ZIG(C,54,1)>REF(ZIG(C,54,1),1) AND REF(ZIG(C,54,1),1)<=REF(ZIG(C,54,1),2) AND REF(ZIG(C,54,1),2)<=REF(ZIG(C,54,1),3);
VAR16:= ZIG(C,54,1)<REF(ZIG(C,54,1),1) AND REF(ZIG(C,54,1),1)>=REF(ZIG(C,54,1),2) AND REF(ZIG(C,54,1),2)>=REF(ZIG(C,54,1),3);
VAR17:= ZIG(C,89,1)>REF(ZIG(C,89,1),1) AND REF(ZIG(C,89,1),1)<=REF(ZIG(C,89,1),2) AND REF(ZIG(C,89,1),2)<=REF(ZIG(C,89,1),3);
VAR18:= ZIG(C,89,1)<REF(ZIG(C,89,1),1) AND REF(ZIG(C,89,1),1)>=REF(ZIG(C,89,1),2) AND REF(ZIG(C,89,1),2)>=REF(ZIG(C,89,1),3);
VAR19:= EMA(C,2)-EMA(C,150);
VAR1A:= EMA(VAR19,100);
VAR1B:= 2*(VAR19-VAR1A);
VAR1C:= POW(VAR1B,3)*0.1+POW(VAR1B,1);
VAR1D:= SQRT(SQRT(L*H*O*C));
VAR1E:= EMA(VAR1D*0.97,3);
VAR1F:= (H+L+C)/3;
VAR20:= (VAR1F-MA(VAR1F,14))/(0.015*AVEDEV(VAR1F,14));
VAR21:= CROSS(VAR1E,L);
買點1:=VAR10;
買點2:=(VAR11+VAR13+VAR15+VAR17);
賣點1:=(VAR12+VAR14+VAR16+VAR18),LINETHICK2;
VAR22:=買點1 AND VARF AND VARC AND VAR21 AND VAR4<0 AND VAR5=0 AND VAR6=0 AND VAR20<(-110);
DRAWTEXT(買點1>0,LOW,'買入'),COLORRED;
DRAWTEXT(買點2>0,LOW,'買入'),COLORFFFFFF;
DRAWTEXT(賣點1>0,HIGH*1.006,'賣出'), COLOR33FF33;
AAA:=BARSLAST(買點1>0||買點2>0);
BBB:=BARSLAST(賣點1>0);
STICKLINE(AAA<BBB&&ISUP,OPEN,CLOSE,5,0),COLORRED;
DRAWLINE(AAA<BBB&&ISUP,H,AAA<BBB&&ISUP,L,0),COLORRED;
STICKLINE(AAA<BBB&&ISDOWN,OPEN,CLOSE,5,1),COLORRED;
DRAWLINE(AAA<BBB&&ISDOWN,H,AAA<BBB&&ISDOWN,O,0),COLORRED;
DRAWLINE(AAA<BBB&&ISDOWN,C,AAA<BBB&&ISDOWN,L,0),COLORRED;
STICKLINE(AAA>BBB&&ISUP,OPEN,CLOSE,5,0),COLORGREEN;
DRAWLINE(AAA>BBB&&ISUP,H,AAA>BBB&&ISUP,L,0),COLORGREEN;
STICKLINE(AAA>BBB&&ISDOWN,OPEN,CLOSE,5,1),COLORGREEN;
DRAWLINE(AAA>BBB&&ISDOWN,H,AAA>BBB&&ISDOWN,O,0),COLORGREEN;
DRAWLINE(AAA>BBB&&ISDOWN,C,AAA>BBB&&ISDOWN,L,0),COLORGREEN;
VAR3P:=IF(CLOSE/REF(CLOSE,1)>1.050 AND HIGH/CLOSE<1.010 AND IF(CLOSE>REF(CLOSE,1),88,0)>0, 91, 0);
SS1:=MA((LOW+HIGH+CLOSE)/3,5)>REF(MA((LOW+HIGH+CLOSE)/3,5),1) AND REF(MA((LOW+HIGH+CLOSE)/3,5),1)<REF(MA((LOW+HIGH+CLOSE)/3,5),2);
SC:=L<HHV(MA((LOW+HIGH+CLOSE)/3,5),13) AND H>HHV(MA((LOW+HIGH+CLOSE)/3,5),13) AND C>REF(C,1) AND C>O;
MR:=SC AND COUNT(SS1,2);
DRAWICON(CROSS(ZIG(C,10,1) ,REF(ZIG(C,10,1),1)) ,LOW*0.99,11);
DRAWICON(CROSS(REF(ZIG(C,10,1),1),ZIG(C,10,1)) ,HIGH*1.01,13);
PL5:=ZIG(C,5,1);
EN1:=ZIG(C,5,1)>REF(ZIG(C,5,1),1) AND REF(ZIG(C,5,1),1)<=REF(ZIG(C,5,1),2) AND REF(ZIG(C,5,1),2)<=REF(ZIG(C,5,1),3);
EX1:=ZIG(C,5,1)<REF(ZIG(C,5,1),1) AND REF(ZIG(C,5,1),1)>=REF(ZIG(C,5,1),2) AND REF(ZIG(C,5,1),2)>=REF(ZIG(C,5,1),3);
PL10:=ZIG(C,13,1);
EN2:=ZIG(C,10,1)>REF(ZIG(C,10,1),1) AND REF(ZIG(C,10,1),1)<=REF(ZIG(C,10,1),2) AND REF(ZIG(C,10,1),2)<=REF(ZIG(C,10,1),3);
EX2:=ZIG(C,10,1)<REF(ZIG(C,10,1),1) AND REF(ZIG(C,10,1),1)>=REF(ZIG(C,10,1),2) AND REF(ZIG(C,10,1),2)>=REF(ZIG(C,10,1),3);
PL20:=ZIG(C,26,1);
EN3:=ZIG(C,20,1)>REF(ZIG(C,20,1),1) AND REF(ZIG(C,20,1),1)<=REF(ZIG(C,20,1),2) AND REF(ZIG(C,20,1),2)<=REF(ZIG(C,20,1),3);
EX3:=ZIG(C,20,1)<REF(ZIG(C,20,1),1) AND REF(ZIG(C,20,1),1)>=REF(ZIG(C,20,1),2) AND REF(ZIG(C,20,1),2)>=REF(ZIG(C,20,1),3);
PL40:=ZIG(C,55,1);
來源 程序化久久網