wx:=MA(c,0);
M1:MA(CLOSE,P1);
M2:MA(CLOSE,P2)*if(n<2,wx,1);
M3:MA(CLOSE,P3)*if(n<3,wx,1);
M4:MA(CLOSE,P4)*if(n<4,wx,1);
M5:MA(CLOSE,P5)*if(n<5,wx,1);
M6:MA(CLOSE,P6)*if(n<6,wx,1);
M7:MA(CLOSE,P7)*if(n<7,wx,1);
M8:MA(CLOSE,P8)*if(n<8,wx,1);
二分位:(H+L)/2 ,LINETHICK6,COLORyellow,POINTDOT;
DRAWTEXTEX(c,1,5,5,'所属板块:' + BLKNAME+' 发行价'+NUMTOSTR(FINANCE(51),2)+'元'+' 发行量'+NUMTOSTR(FINANCE(52),2)+ '万股'),ALIGN4,colorred;
DD:=FINANCE( 1);
SS:=FINANCE( 7);
BL:=SS/DD*100;
GG:=FINANCE(33);
TH:=DYNAINFO(39);
JZ:=FINANCE(34);
DRAWTEXTEX(c,1,5,55,'总股本:'+NUMTOSTR(DD,0)+'万股' +' 流通A股:'
+NUMTOSTR(SS,0)+'万股'+' 流通比例:'+NUMTOSTR(BL,3)+'%'+' 市盈率:'
+NUMTOSTR(TH,2)+' 倍'+' 收益:'+NUMTOSTR(GG,3)+' 元'+' 净资产:'
+NUMTOSTR(JZ,3)+' 元'+' 每股未分配'+NUMTOSTR(FINANCE(32),2)+' 元'+' 发行价'+NUMTOSTR(FINANCE(51),2)+'元'),COLORGREEN;
RSV:=(CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10))*100;
K:=SMA(RSV,5,1);
D:=SMA(K,5,1);
J:=3*K-2*D;
X:=REF(J,1)<10 AND H>REF(H,1) AND C>REF(C,1) AND C>REF(O,1) AND L>REF(L,1);
STICKLINE(X,L ,L,20,0),COLOR008888;
STICKLINE(X,L ,H,0,0),COLORFF00FF;
STICKLINE(X,C ,O,5,0),COLORFF00FF;
天量:=VOL=HHV(VOL,0);
DRAWTEXT(天量,c,'-------高位天量卖'),COLORYELLOW;
BIAS1:=(C-MA(C,6))/MA(C,6)*100;
BIAS2:=(C-MA(C,12))/MA(C,12)*100;
BIAS3:=(C-MA(C,24))/MA(C,24)*100;
BIAS:=(BIAS1+2*BIAS2+3*BIAS3)/6;
乖离:=MA(BIAS,3);
DRAWTEXT(CROSS(BIAS,乖离) AND 乖离<-9,c,'---------二次BIAS乖离底买'),COLORgreen;
换手率1:IF(CAPITAL=0,INDEXV/ESTDATA(12),VOL/FINANCE(7)),PRECISION2,LINETHICK0;
A:=MA(换手率1,2);
X0:=LLV(A,20),linethick0;
X1:=(A-LLV(A,20))=0;
换手最小:=IF(ALL (A>0,5) AND FILTERX(X1,5),X1,0),COLORRED;
小天:BARSLAST(换手最小),LINETHICK,color008888;
X2:=HHV(A,20);
X3:=(A-X2)=0;
换手最大:=IF(ALL(REF(A,1)<X2,5) AND FILTERX(X3,5),1,0),COLORGREEN;
DRAWTEXT(ALL (A>0,5)AND FILTERX(X1,5),o,'-----------换手最小'),LINETHICK3,COLORred;
DRAWTEXT(ALL(REF(A,1)<X2,5)AND FILTERX(X3,5),c,'-------换手最大'),LINETHICK3,COLOrwhite;
hl1:winner(c)*100,colorred,linethick0;
突破:if(cross(hl1,30),100,0),colorred,linethick0;
DRAWTEXT(突破,o,'-------反弹'),coloryellow;
aa:=Close > Ref(Close, 1) and Ref(Close, 1) > Ref(Close, 2) and Ref(Close, 1) < Ref(Close, 3) and If(Ref(Close, 3) < Ref(Close, 4), 1, If(Ref(Close, 4) < Ref(Close, 5),Ref(Close, 1) < Ref(Close, 4) or( Ref(Close, 2) < Ref(Close, 4) and Ref(Close, 3) >= Ref(Close, 5) ),If(Ref(Close, 5) < Ref(Close, 6), 1,Ref(Close, 6) < Ref(Close, 7))));
bb:=Close < Ref(Close, 1) and Ref(Close, 1) < Ref(Close, 2) and Ref(Close, 1) > Ref(Close, 3) and If(Ref(Close, 3) > Ref(Close, 4), 1, If(Ref(Close, 4) > Ref(Close, 5),Ref(Close, 1) > Ref(Close, 4) or( Ref(Close, 2) > Ref(Close, 4) and Ref(Close, 3) <= Ref(Close, 5) ),If(Ref(Close, 5) > Ref(Close, 6), 1,Ref(Close, 6) > Ref(Close, 7))));
drawtext(aa and close>ref(open,2),low*0.995,'三平底翻红'),color,COLORFF00FF;
drawtext(bb and close<ref(close,2),high*1.01,'三平顶翻绿'),color00ff00;
drawicon(aa and close>ref(open,2),low,1);
drawicon(bb and close<ref(close,2),high*1.01,2);
VAR1:MD(CLOSE,1)LINETHICK0,COLORBLUE;
PARTLINE(VAR1>REF(VAR1,1),VAR1),LINETHICK0,colorred;
PARTLINE(VAR1=REF(VAR1,2),VAR1),LINETHICK0,coloryellow;
PARTLINE(VAR1<REF(VAR1,1),VAR1),LINETHICK0,colorblue;
S下:=HHV(MA(HIGH,2),2),COLORGREEN,LINETHICK0;
S上:=LLV(MA(HIGH,2),1),COLORRED,LINETHICK0;
Sppp:=-(S上-S下)/ref(c,1)*100;
Sptem1:=(min(o,c)-l)/(h-l)*100;
Sptem2:=(h-max(o,c))/(h-l)*100;
SPTEM3:=(c-o)/(h-l)*100;
SKJ1:=(SPTEM3>49 AND SPTEM1>0.3*SPTEM2) OR SPTEM3>80;
SKJ2:=(SPTEM3<=49 AND SPTEM3>20 AND SPTEM1>SPTEM2);
SKJ3:=(SPTEM3<=20 and sptem3>-20 and sptem1>1.2*sptem2);
SKJ4:=(SPTEM3<-20 AND SPTEM3>-40 AND SPTEM1>2*SPTEM2);
SKJ:=(SKJ1 OR SKJ2 OR SKJ3 OR SKJ4) AND (Sppp>2 or ref(Sppp,1)>2 );
短买:=if(sum(sppp>0,5)=5 and sum(skj>0,5)=0,5*(SKJ1 OR SKJ2 OR SKJ3 OR SKJ4),5*skj),COLORRED;
DRAWTEXT(短买,L,'↖短买'),COLORwhite;
V2:=IF(BARSTATUS=1,VOL*240/MINUTE/REF(VOL,1)-1,VOL/REF(VOL,1)-1);
STICKLINE(V2>=1 and c>o,O,C,3,0),COLORyellow;
STICKLINE(V2>=1 and c<o,O,C,3,0),COLORblue;
DRAWTEXT(V2 and c>o,c,'--升量'),COLORYELLOW;
DRAWTEXT(V2 and c<o,c,'--跌量'),COLORYELLOW;
AA0:=SUMBARS(VOL,CAPITAL),LINETHICK0;
地量1:IF(CAPITAL=0,AMOUNT=LLV(AMOUNT,34),VOL<MA(VOL,AA0)/3) ,LINETHICK0;
STICKLINE(地量1,c,o,3,0),COLORgreen;
DRAWTEXT(地量1 and c<o,o,'↖缩量'),COLORgreen;
x1:=(C+L+H)/3;
bb13:=atan(ema(x1,13)-ref(ema(x1,13),1))*3.1416*10;
ema8:=ema(c,8);
DRAWTEXT(filter(bb13>1 and ema(x1,13)>ref(ema(x1,8),1),10),
ema8,'∠45'),colorwhite;
STICKLINE(c>=COST(50)and c<=COST(58)and c>o,O,C,5,0),COLORred;
STICKLINE(c>=COST(97)and c<=COST(100)and c>o,O,C,5,0),COLORwhite;
DRAWTEXT(c>=COST(97)and c<=COST(100) and c>o,c,'--获利大于97%'),COLORred;
DRAWTEXT(c>=COST(50)and c<=COST(58) and c>o,c,'--获利50%'),COLORYELLOW;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
买入线:=IF(CROSS(K,15),100,0);
DRAWTEXT(买入线,L*0.99,'←KD底'),colorff00ff;
买出线:=IF(CROSS(K,80),100,0);
DRAWTEXT(买出线,h*1.02,'←KD顶'), colorwhite ;
LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),8,1)/SMA(ABS(CLOSE-LC),8,1)*100;
买入线:=IF(CROSS(RSI1,20),100,0);
DRAWTEXT(买入线,L*0.99,'←RSI底'), COLORRED ;
买出线:=IF(CROSS(RSI1,80),100,0);
DRAWTEXT(买出线,h*1.02,'←RSI顶'),COLORCYAN;
WR:="W&R"(14);
DRAWICON(FILTER(CROSS(WR,(0 - 81)),10),L,4);//威廉买点↑ ↓
DRAWICON(FILTER(CROSS((0 -19),WR),10),H*1.01,5);//威廉卖点
DRAWTEXT(FILTER(CROSS(WR,(0 - 81)),21),L*0.99,'威廉买'),ALIGN0,COLORRED;//威廉买点
DRAWTEXT(FILTER(CROSS(0 -19,WR),21),H*1.01,'威廉卖'),ALIGN2,COLORGREEN;//威廉卖点
TYP := (HIGH + LOW + CLOSE)/3;
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
买入线:=IF(CROSS(CCI,-160),100,0);
DRAWTEXT(买入线,L*0.99,'←CCI底'),COLOR0099FF ;
买出线:=IF(CROSS(CCI,200),100,0);
DRAWTEXT(买出线,h*1.02,'←CCI顶'),COLORYELLOW ;
Var3:=LLV(LOW,5)=LLV(LOW,45) AND CLOSE>=OPEN*1.04;
Var4:=CLOSE>(REF(HIGH,1)+REF(LOW,1))/2;
Var5:=Var3 AND Var4;
DRAWTEXT(Var5,LOW,'★ '),coloryellow , ;
极品底:=if((ma(c,5)-c)/c>0.04 and (ma(c,10)-ma(c,5))/ma(c,5)>0.04,50,0),COLORWHITE;
DRAWTEXT(极品底=50,LOW,'★ ');
input:N1(21,1,300);
TTJ:=BARSLAST((VOL = HHV(VOL,N1)));
DRAWSL((TTJ = 0),CLOSE,0,30,0),LINETHICK2,COLOR0099FF ,POINTDOT;
TY:=DYNAINFO(8)>0;
GG:=V=LLV(V,90) AND TY;
DRAWICON(GG,LOW*0.96,10);
DRAWICON(GG,LOW*0.955,8);
DRAWTEXT(SYSPARAM(2)=BARPOS,CLOSE,'《南北山头多墓田,清明祭扫各纷然;
纸灰飞作白蝴蝶,泪血染成红杜鹃。以祭祀为解放献身的先烈们及我的先祖。》证券代码:'+STKLABEL),ALIGN5,PXUP4,coloryellow;
阳长下影线:=(O-L)/O>0.06 AND C>O;
阴长下影线:=(C-L)/C>0.06 AND C<O;
阳长上影线:=(H-C)/C>0.06 AND C>O;
阴长上影线:=(H-O)/O>0.06 AND C<O;
光头阳长下影线:=C=H AND (O-L)/O>0.06 AND C>O;
光脚阴长上影线:=C=L |