源码
qw1:=(HIGH+LOW+CLOSE*2)/4*1;
qw3:=EMA(qw1,10);
qw4:=STD(qw1,10);
qw5:=(qw1-qw3)*100/qw4;
qw6:=EMA(qw5,5);
rk7:=EMA(qw6,10);
涨:EMA(qw6,10)+100/2-5,linethick1,colorred;
跌:EMA(涨,4),linethick1,colorFFFF34;
多线:IF(CROSS(涨,跌) AND 跌<-10,30,0),linethick1,COLORFF00FF;
空线:IF(CROSS(跌,80),70,100),color0099ff,linethick1;
买1:EMA(跌,4),colorwhite;
买2:EMA(买1,4),colorgreen;
-10,POINTDOT,color888888,linethick2;
80,POINTDOT,color888888,linethick2;
STICKLINE(涨<REF(涨,1),涨,MA(涨,3),8,0 ),COLOR008800;
STICKLINE(涨> REF(涨,1),涨,EMA(涨,3),8,0) ,COLOR0011FF;
//DRAWICON(多线,30,1),COLORFF00FF;
//DRAWICON(CROSS(跌,80),70,2),colorgreen;
DRAWTEXT(CROSS(涨,跌) AND 跌<20 AND 跌>-10,40,'买入'),colorccff99;
DRAWTEXT(多线>0,-20,'看涨'),color0000ff;
Var2:=MA(CLOSE,194);
Var3:=Var2+2*STD(CLOSE,170);
顶:(CLOSE>Var3)*13*10,colorblue,linethick2;
Var18:=HHV(HIGH,30);
Var19:=LLV(LOW,30);
NL:=EMA((CLOSE-Var19)/(Var18-Var19)*100,5)/8*10,coloryellow,linethick2;
Var41:=5;
DRAWTEXT(CROSS(Var41,NL),30,'★做底'),colorwhite;
Var44:=REF(CLOSE,1);
Var45:=SMA(MAX(CLOSE-Var44,0),6,1)/SMA(ABS(CLOSE-Var44),6,1)*100;
STICKLINE(CROSS(84,Var45),0,Var2*15+3,5,1),colorgreen;
DRAWTEXT(CROSS(84,Var45),80,'防空警报'),colorgreen ,;
Var55:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,5);
Var56:=INDEXC;
Var57:=MA(Var56,5);
Var58:=MA(Var56,20);
Var5B:=Var57>Var56*1.03 AND Var58>Var56*1.13;
Var5C:=Var5B;
Var5D:=IF(FILTER(Var55<6,5)=1,1,0);
Var5F:=Var55<6 AND Var5C;
Var60:=IF(FILTER(Var5F,1)=1,1,0)*80;
Var61:=Var5F AND Var5D*80;
Var7B:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);
Var7C:=IF(EMA(CLOSE,5)/EMA(EMA(CLOSE,9),16)<=0.85 AND CLOSE/REF(CLOSE,1)>0.905 AND CLOSE/REF(CLOSE,1)<1.05 AND VOL/CAPITAL*100<5,50,0);
Var7D:=(-100)*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))+100;
Var7E:=(-100)*(HHV(HIGH,50)-CLOSE)/(HHV(HIGH,50)-LLV(LOW,50))+100;
Var7F:=(-100)*(HHV(HIGH,70)-CLOSE)/(HHV(HIGH,70)-LLV(LOW,70))+100;
Var80:=((CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100+10)*5;
Var81:=((CLOSE-MA(CLOSE,50))/MA(CLOSE,50)*100+10)*5;
Var82:=((CLOSE-MA(CLOSE,70))/MA(CLOSE,70)*100+10)*5;
Var83:=(Var7D+Var7E+Var7F+Var80+Var81+Var82)/6;
Var85:=ABS(Var80-Var82);
Var86:=(Var83+Var85)/2;
Var87:=(-1)*(EMA(100*(1-WINNER(CLOSE)),1)-50)+50;
Var88:=Var87+Var86;
Var89:=IF(Var7C>0 AND Var88<0,200,0);
Var8A:=IF(Var86<0 AND CLOSE=LLV(CLOSE,5) AND CLOSE/REF(CLOSE,1)>0.905 AND CLOSE/REF(CLOSE,1)<1.05 AND VOL/CAPITAL*100<5,-50,0);
Var8B:=IF(Var88<0 AND Var8A=-50,100,0);
Var8C:=MA(CLOSE,3);
Var8D:=REF(CLOSE,2)*0.865;
Var8E:=REF(CLOSE,13)*0.772;
Var8F:=MIN(Var8D,Var8E);
Var90:=100*VOL/CAPITAL;
Var92:=IF((CLOSE-Var8F)/CLOSE<0.03 AND SUM(Var90,5)/5<1.8,1,0);
Var96:=(Var89>0 AND Var8B>0 AND SUM(VOL/CAPITAL*100,5)/5<1 OR Var92>0) AND (Var8A<0 OR Var7C>0);
Var97:=Var89>0 AND Var8B>0 AND SUM(VOL/CAPITAL*100,5)/5<1 OR Var92>0 AND REF(CLOSE,1)/REF(CLOSE,2)>0.902;
Var98:=Var96 OR Var97;
VarA4:=AMOUNT/VOL/100;
VarA5:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
VarA7:=SUM(AMOUNT,13)/VarA4/100;
VarAE:=DMA(VarA5,VOL/VarA7);
VarB1:=MA(HHV(HIGH,488),18);
VarB2:=MA(HHV(HIGH,220),18);
VarB3:=MA(HHV(HIGH,98),18);
VarB4:=MA(LLV(LOW,488),18);
VarB5:=MA(LLV(LOW,220),18);
VarB6:=MA(LLV(LOW,98),18);
VarB7:=MA((VarB4*0.96+VarB5*0.96+VarB6*0.96+VarB1*0.558+VarB2*0.558+VarB3*0.558)/6,18);
VarB8:=MA((VarB4*1.25+VarB5*1.23+VarB6*1.2+VarB1*0.55+VarB2*0.55+VarB3*0.65)/6,18);
VarB9:=MA((VarB4*1.3+VarB5*1.3+VarB6*1.3+VarB1*0.68+VarB2*0.68+VarB3*0.68)/6,18);
VarBA:=MA((VarB7*3+VarB8*2+VarB9)/6*1.738,18);
VarBB:=IF(DATE<=1021231,VarBA,VarBA*DAY);
VarBC:=LOW;
VarBD:=REF(LOW,1);
VarBE:=SMA(ABS(VarBC-VarBD),3,1)/SMA(MAX(VarBC-VarBD,0),3,1)*100;
VarBF:=MA(IF(CLOSE*1.35<=VarBB,VarBE*10,VarBE/10),3);
VarC0:=LLV(LOW,30);
VarC1:=HHV(VarBF,30);
VarC2:=IF(LOW<=VarC0,(VarBF+VarC1*2)/2,0);
WXBM:(MA(VarC2 AND CLOSE<COST(1),3) AND (CLOSE-VarAE)/VarAE*100<-11)*118,colorred,linethick2;
STICKLINE(Var7B>0,0,120,2,0),colorwhite;
STICKLINE(Var60>0,0,80,8,0),colorred;
DRAWTEXT(Var61 OR Var98,70,'★大黑马'),coloryellow;
DRAWTEXT(Var60>0,40,'★黑马'),coloryellow;
DRAWTEXT(Var7B>0,60,'★探底'),colorwhite;
DRAWTEXT(WXBM,100,'BM'),colorred , ;
STICKLINE(Var61,0,120,8,0),colorwhite;
STICKLINE(Var98,0,90,8,0),coloryellow , ;
x:=C-REF(MA(C,20),11);
lgl:=IF(EMA(C,5)/EMA(EMA(C,9),16)<=0.85 AND C/REF(C,1)>0.905 AND C/REF(C,1)<1.05 AND VOL/CAPITAL*100<5,50,0);
wr1:=-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34))+100*x;
wr2:=-100*(HHV(HIGH,50)-CLOSE)/(HHV(HIGH,50)-LLV(LOW,50))+100;
wr3:=-100*(HHV(HIGH,70)-CLOSE)/(HHV(HIGH,70)-LLV(LOW,70))+100*x;
BIAS1:=((CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100+10)*5;
BIAS2:=((CLOSE-MA(CLOSE,50))/MA(CLOSE,50)*100+10)*5;
BIAS3:=((CLOSE-MA(CLOSE,70))/MA(CLOSE,70)*100+10)*5;
s1:=(wr1+wr2+wr3+bias1+bias2+bias3)/6*x;
s2:=EMA(s1,3);
s3:=ABS(bias1-bias3);
sx:=(s1+s3)/2;
xc1:=(-1)*(EMA(100*(1-WINNER(CLOSE)),1)-50)+50;
ccc:=xc1+sx;
zjz:=IF( lgl>0 AND ccc<0,200,0)*x;
lxl:=IF(sx<0 AND C=LLV(C,5) AND C/REF(C,1)>0.905 AND C/REF(C,1)<1.05 AND VOL/CAPITAL*100<5,-50,0);
jbj:=IF(ccc<0 AND lxl=-50,100,0)*x;
c0:=REF(C,2)*0.865;
c1:=REF(C,13)*0.772;
bot:=MIN(c0,c1);
hsl:=100*VOL/CAPITAL*x;
cxc:=IF((C-bot)/C<3/100 AND SUM(hsl,5)/5<1.8,1,0);
vmc:=IF(cxc>0 AND (lxl<0 OR lgl>0),10,0);
满仓:IF((vmc>0),120,0),colorred,linethick3;
DRAWTEXT(满仓>0 AND REF(满仓,1)=0,100,'满仓'),colorred;
半仓:IF(((zjz>0 AND jbj>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR (cxc>0 AND REF(C,1)/REF(C,2)>0.902)) OR (((zjz>0 AND jbj>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR cxc>0) AND (lxl<0 OR lgl>0)) AND vmc<10 ,100,0),colormagenta,linethick2;
v93:=(((zjz>0 AND jbj>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR cxc>0) AND (lxl<0 OR lgl>0)) ;
v90:=((zjz>0 AND jbj>0 AND SUM(VOL/CAPITAL*100,5)/5<1) OR (cxc>0 AND REF(C,1)/REF(C,2)>0.902));
买11:IF((v93 OR v90),80,0),coloryellow,linethick2;
Var2q:=(MA(CLOSE,80)-MA(CLOSE,13)/3);
神奇线: MA((CLOSE-Var2q)/Var2q,2);
买12:IF(CROSS(神奇线,0) AND LOW/REF(HIGH,1)<1.012 AND ((C-REF(C,2))/C)>0.06,100,0),colormagenta,linethick2;
yy:=SMA(SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,18,1),12,1);
yt:=SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,12,1);
st:=IF(CROSS(yt,yy),30,0);
Var5pt:=(HIGH+LOW+CLOSE)/3;
Var6pt:=(Var5pt-MA(Var5pt,14))/(0.015*AVEDEV(Var5pt,14));
Var7pt:=(Var5pt-MA(Var5pt,85))/(0.015*AVEDEV(Var5pt,85));
sa:=IF(Var7pt>=200 AND Var6pt>=150,10,0);
Var3qq:=REF(CLOSE,1);
Var4qq:=SMA(MAX(CLOSE-Var3qq,0),6,1)/SMA(ABS(CLOSE-Var3qq),6,1)*100;
sm:=IF(CROSS(80,Var4qq),100,0);
卖11:IF((sm AND (sa OR st)),120,0),colorCCCC33,linethick2;
DRAWTEXT( 卖11>0,110,'卖'),COLORCCCC33;
ASR:=EMA((WINNER(C*1.1)-WINNER(C*0.9))*80,5);
DPA:="1a0001$VOL"*"1a0001$CLOSE";
DPMA:=EMA(DPA,5)/EMA("1a0001$VOL",5);
CYS:=("1a0001$CLOSE"-DPMA)/DPMA*100;
A1:=INDEXC;
A2:=MA(A1,5);
A3:=MA(A1,20);
B2:=A2>A1*1.03 AND a3>a1*1.13;
ADVC0:=CYS<=-2 AND b2;
刀:IF(ASR<6 AND CYS< -2 AND ADVC0,100,0),colorred,linethick2;
DRAWICON( 刀,90, 5),colorred;
Varbb4:=MA(CLOSE,5);
Varbb5:=MA(CLOSE,10);
Varbb6:=MA(CLOSE,30);
VarbbE:=SUM(CLOSE*VOL*100,28)/SUM(VOL*100,28);
VarbbF:=INTPART(VarbbE*100)/100;
DCS:=(EMA(CLOSE,5)-EMA(CLOSE,10))*100,linethick2;
ZCS:=EMA(DCS,9),linethick2;
Varbb14:=REF(ZCS,1);
Varbb15:=ZCS;
Varbb16:=(Varbb15-Varbb14)/3;
Varbb17:=REF(DCS,1);
Varbb18:=DCS;
Varbb19:=Varbb18-Varbb17;
DHM:IF(OPEN<=Varbb4 AND OPEN<=Varbb5 AND OPEN<=Varbb6 AND CLOSE>=Varbb4 AND CLOSE>=VarbbF AND Varbb16>0 AND Varbb19>0,120,0),colormagenta,linethick2;
DRAWTEXT(DHM,80,'"DHM"'),colormagenta;
XX2:=(MA(CLOSE,80)-MA(CLOSE,13)/3);
SQX:=MA((CLOSE-XX2)/XX2,10)*0.01;
买3:IF(CROSS(SQX,0) AND LOW/REF(HIGH,1)<1.012,60,0), STICK,colorwhite,LINETHICK2;
稳赚:IF(COUNT(SQX>REF(SQX,1),3)=3 AND COUNT(SQX<0,10)=10 AND REF(SQX,3)=LLV(SQX,10),60,0),COLOR9999FF;
买4: IF(REF(SQX,2)=LLV(SQX,20) AND REF(SQX,2)<0.071 AND REF(SQX,2)<REF(SQX,1) AND NOT(REF(LOW,1)>REF(HIGH,2) AND LOW>REF(HIGH,1)) AND CLOSE>REF(CLOSE,1),60,0),COLORFF00FF,LINETHICK2;
DRAWTEXT( 买3>0,40 ,' 买3'),colorwhite;
DRAWTEXT( 稳赚>0,40 ,'稳赚'),COLOR9999FF;
DRAWTEXT( 买4>0,40 , '买4'),COLORFF00FF;
