心悦诚服E主图指标 (源码)

input:n(26,5,300),p(2,0.1,10);
STICKLINE(OPEN<CLOSE ,H ,L,0.5,0 ),COLOR0000FF,LAYER3;
STICKLINE(OPEN<CLOSE ,CLOSE ,OPEN,8,0 ),COLOR0022FF,LAYER6;
STICKLINE(OPEN<CLOSE ,CLOSE ,OPEN,5,0 ),COLOR0598DD,LAYER3;
STICKLINE(OPEN>=CLOSE ,H ,L,0.5,0 ),COLOR00FF00,LAYER3;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,8,0 ),COLOR00FF00,LAYER6;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLORff0000,LAYER3;
{1.BBI}
BBI:=(2*c+H+L)/4;
{2.BOLL}
MID : MA(BBI,N) ,COLOR00ff00,DOTLINE;
UPPER: MID + P*STD(BBI,N) ,COLOR0000FF,DOTLINE;
LOWER: MID - P*STD(BBI,N) ,COLOR00FFff,DOTLINE;
{3.持股}
A:(8*BBI+7*REF(BBI,1)+6*REF(BBI,2)+5*REF(BBI,3)+4*REF(BBI,4)+3*REF(BBI,5)+2*REF(BBI,6)
+1*REF(BBI,7))/36,COLOR00ffFF,LINETHICK1;
B:=REF(MEMA(A,5),3);
CG:=(A-B);
X:=BARSLAST(DISPSTATUS=1)+1;
E:=llvall(llv(l,x))*0.95;
STICKLINE(CG>=0 ,E+(CG)*2,E,12,0),Color0000FF,LAYER3;
STICKLINE(CG<0 ,E+(CG)*2,E,12,0),ColorFF9900,LAYER3;
DRAWGBK(CG>0 ,STRIP(RGB(0,0,255),RGB(140,0,100),0)),LAYER0;
{www.gpxiazai.com 股票软件下载网_最新股票指标公式}
FILLRGN(UPPER,MID,UPPER>MID AND CG>0 AND MA(C,2)> MID,RGB(80,0,80)),LAYER5;
FILLRGN(UPPER,LOWER,UPPER>LOWER ,RGB(0,80,0)),LAYER7;
AL:=LLV(CG,A);
FL:=FILTER(CROSS(CG,AL),5);
drawbmp(FL AND CG<0 ,AL+E,'小牛.bmp'),align1,valign0,LAYER0;
{4.画线}
PARTLINE(UPPER ,UPPER and CG>0 AND MA(C,2)> MID,rgb(255,120,0)),LINETHICK3,LAYER0;
PARTLINE(MID ,MID and CG>0 AND MA(C,2)> MID,rgb(0,255,0)),LINETHICK3,LAYER0;
VERTLINE(CROSS(REF(EMA(BBI,20),1),EMA(BBI,20)) AND CG>0 ,2),LAYER0,COLOR00FFff;
{5.别坐过山车}
PK:=CROSS(0,CG) AND CG<0 AND MA(C,5)>MID;
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;
{K线}
STICKLINE(CLOSE>OPEN and CG>=0,HIGH,LOW,0.5,0 ),COLOR0000FF;
STICKLINE(OPEN>=CLOSE and CG>=0,HIGH,LOW,0.5 ,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE and CG>=0 ,CLOSE ,OPEN,9,0 ),COLOR006600;
STICKLINE(OPEN>=CLOSE and CG>=0 ,CLOSE ,OPEN,7,0 ),COLOR009900;
STICKLINE(OPEN>=CLOSE and CG>=0 ,CLOSE ,OPEN,5,0 ),COLOR00BB00;
STICKLINE(OPEN>=CLOSE and CG>=0 ,CLOSE ,OPEN,3,0 ),COLOR00DD00;
STICKLINE(OPEN>=CLOSE and CG>=0 ,CLOSE ,OPEN,1,0 ),COLOR00FF00;
STICKLINE(CLOSE>OPEN and CG>=0,CLOSE,OPEN,9,0) ,COLOR000466;
STICKLINE(CLOSE>OPEN and CG>=0,CLOSE,OPEN,7,0) ,COLOR000499;
STICKLINE(CLOSE>OPEN and CG>=0,CLOSE,OPEN,5,0) ,COLOR0003bb;
STICKLINE(CLOSE>OPEN and CG>=0,CLOSE,OPEN,3,0) ,COLOR0002dd;
STICKLINE(CLOSE>OPEN and CG>=0,CLOSE,OPEN,1,0) ,COLOR0001ff;