把西电买卖牛K图用于大智慧 【源码、主图、附图】

把西电买卖牛K图用于大智慧.它的波段是
【FILLRGN(MA(C,2),MA(C,7),MA(C,2)>MA(C,7),RGB(80,0,80),MA(C,2)  

DRAWGBKlast(c>0,strip(RGB(0,0,255),RGB(0,0,0),0));

{K线}{公式在线提供：www.gszx.com.cn}
STICKLINE(CLOSE>OPEN or CLOSE=OPEN and CLOSE>REF(CLOSE,1),LOW,HIGH,0.1,0),colorred;
STICKLINE(CLOSE>OPEN or CLOSE=OPEN and CLOSE>REF(CLOSE,1),OPEN,CLOSE,0,0),colorred;
STICKLINE(CLOSE STICKLINE(CLOSE STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,8,0 ),COLOR008800;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLOR009900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLOR00AA00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLOR00BB00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLOR00CC00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR00DD00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLOR00EE00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0,0 ),COLOR00FF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0) ,COLOR000066;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLOR000088;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLOR0000AA;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR0000BB;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR0000CC;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0000DD;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR0000EE;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLOR0000FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0,0) ,COLOR0000FF;

TYX3:=MA(REF(HHV((C+L+O+H)/4,30),1),3);
STICKLINE(CROSS(MA(C,2),MA(C,7)),H,C,0.05,0),COLOR0000FF,LAYER0;
STICKLINE(CROSS(MA(C,2),MA(C,7)),C,O,6,0),COLORFF0099,LAYER0 ;
STICKLINE(CROSS(MA(C,2),MA(C,7)),O,L,0.05,0), COLOR0099FF,LAYER0;
XG1:=CROSS(MA(C,7),MA(C,2));
STICKLINE(XG1,H,L,5,0),LINETHICK1,COLORWHITE,LAYER0;
STICKLINE(XG1,H,L,0.2,0),COLORGREEN,LAYER0;
STICKLINE(XG1,O,C,6,0),LINETHICK1,COLORGREEN,LAYER0;
STICKLINE((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(C,1)),OPEN,CLOSE,6,0),COLORFF00FF,LAYER0;
STICKLINE((REF(C,1)-C)*100/REF(C,1)>=(10-0.01*100/REF(C,1)),OPEN,CLOSE,6,0),COLORWHITE,LAYER0;
STICKLINE(REF(COUNT(CTYX3 AND C>O,C,O,6,0),COLOR00CCFF,LAYER0;

FILLRGN(MA(C,2),MA(C,7),MA(C,2)>MA(C,7),RGB(80,0,80),MA(C,2)

P:=8;
KE:=V*(H-L)/REF(C,1);
KEP:=KE=HHV(KE,P);
KUD:=BARSLAST(KEP);

红平台收:IF(IF(KUD=0,C>REF(C,1),REF(C,KUD)>REF(REF(C,1),KUD)),IF(KUD=0,C,REF(C,