input:n(26,5,300),p(2,0.1,10);
{1.MA13}
BBI:=(2*c+H+L)/4;
MA13:MEMA(BBI,13) ,COLORFF9900,DOTLINE;
{2.BOLL}
MID : MA(BBI,N),DOTLINE;
UPPER: MID + P*STD(BBI,N),DOTLINE;
LOWER: MID - P*STD(BBI,N),DOTLINE;
{3.持股}
X:=BARSLAST(DISPSTATUS=1)+1;
E:=llvall(llv(l,x))*0.95;
B:=SMA((BBI-LLV(LOW,43))/(HHV(HIGH,43)-LLV(LOW,43)),5,1)*15;
持股:=EMA(EMA(B,5),5);;
CG:=(持股-REF(持股,1));
STICKLINE(CG>=0,E+CG,E,18,0),Color0000FF,LAYER0;
STICKLINE(CG<0,E+CG,E,18,0),ColorFF9900,LAYER0;
DRAWGBK(CG>0, STRIP(RGB(0,0,255),RGB(140,0,80),0)),LAYER3;
{4.画线}
VERTLINE(CROSS(REF(MA13,1),MA13) AND CG>0 and MA13>MID,2),LAYER0,COLOR00FFff;
PARTLINE(UPPER ,UPPER and CG>0,rgb(255,120,0)),LINETHICK3,LAYER0;
PARTLINE(MID ,MID and CG>0,rgb(0,255,0)),LINETHICK3,LAYER0;
PARTLINE(MA13 ,MA13 and CG>0,rgb(255,255,0)),LINETHICK3,LAYER0;
{5.别坐过山车}
PK:=CROSS(0,CG) AND CG<0;
DRAWTEXT(PK,LOWER*0.999,'●'),LAYER3,ALIGN1,COLOR0000FF,LINETHICK2;
DRAWTEXT(PK,LOWER*0.981,'【别】'),LAYER0,ALIGN1,COLOR00FFFF,LINETHICK1;
DRAWTEXT(PK,LOWER*0.963,'【坐】'),LAYER0,ALIGN1,COLOR00FFCC,LINETHICK1;
DRAWTEXT(PK,LOWER*0.946,'【过】'),LAYER0,ALIGN1,COLOR00FFAA,LINETHICK1;
DRAWTEXT(PK,LOWER*0.929,'【山】'),LAYER0,ALIGN1,COLOR00FF77,LINETHICK1;
DRAWTEXT(PK,LOWER*0.912,'【车】'),LAYER0,ALIGN1,COLOR00FF00,LINETHICK1; |
