我用的主图公式,简单易懂! DRAWTEXTEX(CLOSE,0,5,0,('[板块]:'+BLKNAME)),Colorwhite; PARTLINE(EMA((2*CLOSE+HIGH+LOW)/4,6)>REF(EMA((2*CLOSE+HIGH+LOW)/4,6),1),EMA((2*CLOSE+HIGH+LOW)/4,5)),coloryellow; PARTLINE(EMA((2*CLOSE+HIGH+LOW)/4,6)<REF(EMA((2*CLOSE+HIGH+LOW)/4,6),1),EMA((2*CLOSE+HIGH+LOW)/4,5)),colorFF00; PARTLINE(EMA((2*CLOSE+HIGH+LOW)/4,10)>REF(EMA((2*CLOSE+HIGH+LOW)/4,13),1),EMA((2*CLOSE+HIGH+LOW)/4,13)),,LINETHICK2,ColorB700B7; PARTLINE(EMA((2*CLOSE+HIGH+LOW)/4,10)<REF(EMA((2*CLOSE+HIGH+LOW)/4,13),1),EMA((2*CLOSE+HIGH+LOW)/4,13)),LINETHICK2,colorFF00; PARTLINE(EMA((LOW+CLOSE+OPEN)/3,28)>REF(EMA((LOW+CLOSE+OPEN)/3,28),1),REF(EMA((LOW+CLOSE+OPEN)/3,25),1)),LINETHICK3,colorred; PARTLINE(EMA((LOW+CLOSE+OPEN)/3,28)<REF(EMA((LOW+CLOSE+OPEN)/3,28),1),REF(EMA((LOW+CLOSE+OPEN)/3,25),1)),LINETHICK3,colorgreen; PARTLINE(EMA((LOW+CLOSE+OPEN)/3,60)>REF(EMA((LOW+CLOSE+OPEN)/3,60),1),REF(EMA((LOW+CLOSE+OPEN)/3,60),1)),LINETHICK3,colorblue; PARTLINE(EMA((LOW+CLOSE+OPEN)/3,60)<REF(EMA((LOW+CLOSE+OPEN)/3,60),1),REF(EMA((LOW+CLOSE+OPEN)/3,60),1)),LINETHICK3,colorFF00; PARTLINE((EMA(LOW,125)+EMA((CLOSE+LOW)/2,250))/2>REF((EMA(LOW,125)+EMA((CLOSE+LOW)/2,250))/2,1),(EMA(LOW,125)+EMA((CLOSE+LOW)/2,125))/2),POINTDOT,colorFF; PARTLINE((EMA(LOW,125)+EMA((CLOSE+LOW)/2,250))/2<REF((EMA(LOW,125)+EMA((CLOSE+LOW)/2,250))/2,1),(EMA(LOW,125)+EMA((CLOSE+LOW)/2,125))/2),POINTDOT,colorFF00; PARTLINE((EMA(LOW,230)+EMA((CLOSE+LOW)/2,230))/2>REF((EMA(LOW,230)+EMA((CLOSE+LOW)/2,230))/2,1),(EMA(LOW,230)+EMA((CLOSE+LOW)/2,230))/2),LINETHICK2,colorCD00CD; PARTLINE((EMA(LOW,230)+EMA((CLOSE+LOW)/2,230))/2<REF((EMA(LOW,230)+EMA((CLOSE+LOW)/2,230))/2,1),(EMA(LOW,230)+EMA((CLOSE+LOW)/2,230))/2),LINETHICK2,color9ACD32; A1:=EMA((2*CLOSE+HIGH+LOW)/4,3); A2:=EMA((2*CLOSE+HIGH+LOW)/4,13); A3:=EMA((LOW+CLOSE+OPEN)/3,25); Y2:=CROSS(A1,A2) ; DRAWICON(Y2,LOW-0.0382,'金钻'),ALIGN1;DRAWTEXT(Y2,LOW-0.0618,'金钻'),COLORyellow,ALIGN1; YY1:=OPEN<A1 AND CLOSE>A1; YY2:=OPEN<A2 AND CLOSE>A2; YY3:=OPEN<A3 AND CLOSE>A3; YY5:=VOL>HHV(HIGH,10); YY6:=A1>=REF(A1,1); YY:=YY1 AND YY2 AND YY3 AND YY5 AND YY6; DRAWTEXT(YY,LOW*0.989,'穿三'),COLOrblack; x1:=(CLOSE+LOW+HIGH)/3; bb13:=ATAN(EMA(x1,13)-REF(EMA(x1,13),1))*3.1416*10; ema8:=EMA(CLOSE,8); DRAWTEXT(FILTER(bb13>1 and EMA(x1,13)>REF(EMA(x1,8),1),10), ema8,'45℃'),colorwhite; bc:=barslast(SYSPARAM(1)=barpos)+1; 点石成金H:=IF(close>100,SUM(h*VOL,bc)/SUM(VOL,bc),sum(AMOUNT,bc)/sum(v,bc)/100*SUM(H,bc)/SUM(C,BC)),colorred,LINETHICK2; 点石成金L:=IF(close>100,SUM(l*VOL,bc)/SUM(VOL,bc),sum(AMOUNT,bc)/sum(v,bc)/100*SUM(L,bc)/SUM(C,BC)),colorblue,LINETHICK2; 点石成金:if(ref(h,bc-1)>ref(h,bc) and ref(h,bc-1)>ref(h,bc-2) ,点石成金h,点石成金l),colorwhite;zq:=DATATYPE; r1:=OPENMINUTES(TIME); zs:=REF(CLOSE,r1); zsr:=DYNAINFO(3); j:=SUM(CLOSE*VOL,SUMBARS(VOL,CAPITAL))/SUM(VOL,SUMBARS(VOL,CAPITAL)); jj:=SUM(CLOSE*VOL,0)/SUM(VOL,0); jj1:=SUM(CLOSE*VOL,r1)/SUM(VOL,r1); jja:=IF(zq=6,jj,IF(zq=1,jj1,jj)); zsa:=IF(zq=6,zsr,IF(zq=1,zs,zsr)); cr:=IF(zq=6,CLOSE>0,IF(zq=1,r1>1,CLOSE>0)); PARTLINE(cr,zsa),COLORGRAY,POINTDOT; dk:=(SMA(CLOSE,2,1)-SMA(CLOSE,6,1))*2.1; //STICKLINE(dk>0and jja>0 ,zsa,ZSa+dk,0.1,0),Color5050FF; //STICKLINE(dk<=0and jja>0 ,zsa,ZSa+dk,0.1,0),ColorCyan; IF DATATYPE>=0 then exit; rc:=DYNAINFO(3); q:=DATACOUNT; hh:=DYNAINFO(5); LL:=DYNAINFO(6); f:=MAX(hh-rc,rc-LL); ff:=f/rc*100; q1h:=IF(ff<1,0.9898*rc,rc-f*1.02); q1l:=IF(ff<1,0.9798*rc,rc-2*f*1.016); //FILLRGN(1,q1h,q1l),colorblack; R:=INDEXC; Rh:=HHV(r,0); RL:=LLV(r,0); Rb:=(q1h-q1l)/(RH[q]-RL[q]); Ry:=(q1h+q1l-rb*(RH[q]+RL[q]))/2; //r*rb+ry,COLORFF00FF; //(SUM(r*INDEXV,r)/SUM(INDEXV,r))*rb+ry,COLOR00FF00; 成金:(LLV(LOW ,20)+HHV(HIGH ,20) )/2,coloryellow,POINTDOT,LINETHICK1; MA5:MA(C,5); AA:=C>MA5; XG:=CROSS(AA,0.8); AA1:=C<MA5; XG1:=CROSS(AA1,0.8); DRAWICON(IF(XG,1,0),L*0.99,1); DRAWICON(IF(XG1,1,0),H*1.001,2); DRAWTEXT(XG,L*0.99,''),COLORYELLOW; DRAWTEXT(XG1,H*1.01,''),COLORCYAN; B1:='^^^^^^^^^^^^^^^^^^^^^^^^量能平台'; DRAWTEXT(VOL=HHV(VOL,20),CLOSE ,B1),colorgreen;
|