|
{专用主图}
{n(2,200,20);N1(1,888,8)}
input:N(20),N1(8);
中轨:MA(CLOSE,8),COLORyellow,LINETHICK2;
上轨:中轨+2.58*STD(CLOSE,N),COLORgreen,LINETHICK1;
头部:中轨+1.58*STD(CLOSE,N),COLORffff00,LINETHICK1;
下轨:中轨-2.58*STD(CLOSE,N),COLORff00ff,LINETHICK1;
底部:中轨-1.58*STD(CLOSE,N),COLORred,LINETHICK1;
HV:=HHV(V,N1)=V OR V/REF(V,1)>=2;
FT:=BARSLAST(HV);
量能评台:IF(HV,C,REF(C,FT)),colorblue,POINTDOT,LINETHICK2;
DRAWTEXT(CROSS(ZIG(3,19),REF(ZIG(3,19),1)),LOW*0.99,'★'), ,COLORyellow;
MA18:=MA(CLOSE,18);
MTM:=C-REF(C,1);
DX:=100*EMA(EMA(MTM,6),6)/EMA(EMA(ABS(MTM),6),6);
买3:=LLV(DX,2)=LLV(DX,7) AND COUNT(DX<0,2) AND CROSS(DX,MA(DX,2));
DRAWTEXT(FILTER(买3=1,5),LOW,'★'),COLORRED;
加1:=MA18>=REF(MA18,3) AND CROSS(CLOSE,MA18);
DRAWTEXT(加1,LOW*0.99,'★'),COLORff00ff;
卖3:=HHV(DX,2)=HHV(DX,7) AND COUNT(DX>50,2) AND CROSS(MA(DX,2),DX);
DRAWTEXT(FILTER(卖3=1,1),HIGH*1.02,'★'),COLOR009900;
VAR1111:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3);
VAR2222:=CROSS(VAR1111,0.9);
压力:= REF(HIGH,BARSLAST(VAR2222));
STICKLINE(CLOSE,REF(HIGH,BARSLAST(VAR2222)),REF(HIGH,BARSLAST (VAR2222)),0.5,1),COLOREA91B5,LINETHICK3;
a:=trough(3,10,1);
b:=troughbars(3,10,1)=0;
底线:DRAWLINE(B,A,B,A,1),COLORFF00FF;
D:=PEAK(3,10,1);
E:=PEAKBARS(3,10,1)=0;
顶线:DRAWLINE(E,D,E,D,1),COLORYELLOW;
stickline(L>REF(H,1),L,REF(H,1),30,0),COLORRED ;
stickline(H<REF(L,1),REF(L,1),H,30,0),COLORGREEN;
var3:=llv(high,240);
var4:=100*(close-var3) ;
var5:=(close-llv(low,528))/(hhv(high,528)-llv(low,528))*100;
var6:=(close-llv(close,530))/(hhv(close,530)-llv(close,530))*100;
var7:=0;
var8:=sma(max(close-ref(close,1),0),34,1)/sma(abs(close-ref(close,1)),7,1)*100;
var9:=sma(max(close-ref(close,1),0),13,1)/sma(abs(close-ref(close,1)),13,1)*100;
vara:=barscount(close);
varb:=var8<20 and var9<23 and vara>35;
varc:=varb and count(varb,1)=1;
vard:=ema(close,21)-ema(close,8);
vare:=ema(vard,5);
varf:=troughbars(3,6,1)<4 and cross(vard,vare);
var10:=if(troughbars(3,16,1)=0 and high>low+0.04,4,0);
var11:=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);
var12:=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);
var13:=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);
var14:=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);
var15:=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);
var16:=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);
var17:=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);
var18:=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);
var19:=ema(close,2)-ema(close,150);
var1a:=ema(var19,100);
var1b:=2*(var19-var1a);
var1c:=pow(var1b,3)*0.1+pow(var1b,1);
var1d:=sqrt(sqrt(low*high*open*close));
var1e:=ema(var1d*0.97,3);
var1f:=(high+low+close)/3;
var20:=(var1f-ma(var1f,14))/(0.015*avedev(var1f,14));
var21:=cross(var1e,low);
买1:=var10;
买:=(var11+var13+var15+var17);
卖:=(var12+var14+var16+var18);
var22:=买1 and varf and varc and var21 and var4<0 and var5=0 and var6=0 and var20<(-110);
var1:=ma(close,5);
var2:=ma(close,10);
var3a:=ma(close,30);
var4a:=ma(close,60);
var5a:=ema(cost(85),7);
var6a:=ema(cost(15),7);
var7a:=sum(close*vol*100,4)/sum(vol*100,4);
var8a:=intpart(var7a*100)/100;
var9a:=sum(close*vol*100,7)/sum(vol*100,7);
varaa:=intpart(var9a*100)/100;
varba:=sum(close*vol*100,28)/sum(vol*100,28);
varca:=intpart(varba*100)/100;
varda:=ema(close,5)-ema(close,10);
varea:=ema(varda,9);
varfa:=(-100)*(hhv(close,5)-close)/(hhv(close,5)-llv(low,5))+100;
var10a:=(-100)*(hhv(close,10)-close)/(hhv(close,10)-llv(low,10))+100;
var11a:=(-100)*(hhv(close,20)-close)/(hhv(close,20)-llv(low,20))+100;
var12a:=(-100)*(hhv(close,30)-close)/(hhv(close,30)-llv(low,30))+100;
var13a:=ref(varea,1);
var14a:=varea;
var15a:=var14a-var13a;
var16a:=ref(varda,1);
var17a:=varda;
var18a:=var17a-var16a;
var19a:=open;
var1k:=close;
drawtext(买>0,low-0.14,'◣'),colorred,;
STICKLINE(买,O,C,6,0),COLORyellow;
STICKLINE(买,O,C,2.5,0),COLORRED;
drawtext(卖>0,high+0.05,'◣'),colorgreen,;
LC:=REF(CLOSE,1);RSI:=((SMA(MAX((CLOSE -
LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) *
100);
FF:=EMA(CLOSE,3);MA15:=EMA(CLOSE,21);DRAWTEXT(CROSS(FF,MA15),(LOW *
0.985),'↖底'),COLOR208fff;
AA1:=AMOUNT ;
BB1:=L<AA1*0.9;
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD1:=L<MA(C,5)*0.921;
EE1:=V<MA(V,5)*1.5;
FF1:=BB1 AND CC1 AND DD1 AND EE1;
DRAWTEXT(FF1,LOW*0.99,'↖鼠'),COLOR4080FF;
VV2:=REF(CLOSE,1);
VV3:=SMA((CLOSE-VV2),6,1)/SMA(ABS(CLOSE-VV2),6,1)*100;
DRAWTEXT(REF(VV3,1)>81 AND VV3<80,HIGH*1.02,'↙沽'),COLORblue;
VARR1:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;
DRAWTEXT(CROSS(84,RSI),HIGH*1.02,'↙顶'),COLORgreen;
cc:=(h-c)/(c-o)<0.33;
dd:=(c/ref(c,1)-1)>=0.0502 and c>ref(c,1) and (o-l)/(c-o)>=1.48 and l<ref(l,1) and l<ref(l,2);
ee:=(c/ref(c,1)-1)>=0.08;
aa:=VOL>REF(VOL,1)*1.9 and c>ref(c,1) and c/ref(c,1)-1>=0.049 and cc;
bb:=(c/ref(c,1)-1)>=0.0502 and c>ref(c,1) and v>ref(v,1) and VOL>REF(VOL,1)*2.5 and cc;
DRAWTEXT(FILTER(aa or bb or dd or ee,34),l,'↖异动'),COLOrffff00;
STICKLINE(FILTER(aa or bb or dd or ee,34),O,C,6,0),COLORyellow;
STICKLINE(FILTER(aa or bb or dd or ee,34),O,C,2.5,0),COLORRED;
STICKLINE(CLOSE<OPEN and ref(CLOSE,1)>ref(OPEN,1),ref(close,1),ref(close,1),28,0),COLORAAAAFF,LINETHICK1;
DRAWICON(CROSS(82,VARC),HIGH,2);
1VAR6:=REF(C,1);
1VAR7:=SMA(MAX(C-1VAR6,0),6,1)/SMA(ABS(C-VAR6),6,1)*100;
DRAWTEXT(CROSS(84,1VAR7),H*1.01,'↖庄'),COLORGREEN ;
|
