Z1:=STRCAT(HYBLOCK,' '); 
Z2:=STRCAT(Z1,DYBLOCK); 
Z3:=STRCAT(Z2,' '); 
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORLIRED; 
DRAWTEXT_FIX(ISLASTBAR,0,0.03,0,EXTERNSTR(0,3)),COLORWHITE; 
DRAWTEXT_FIX(ISLASTBAR,0,0.06,0,EXTERNSTR(0,6)),COLORLIBLUE; 
DRAWTEXT_FIX(ISLASTBAR,0,0.09,0,EXTERNSTR(0,12)),COLORLIGREEN;{老王} 
DRAWTEXT_FIX(ISLASTBAR,0,0.15,0,FGBLOCK),COLORLIMAGENTA; 
DRAWTEXT_FIX(ISLASTBAR,0,0.12,0,EXTERNSTR(0,1)),COLORYELLOW;{融胜} 
主力成本线:EMA(COST(9),250),COLORBROWN,DOTLINE; 
{牛马线买点公式升级版} 
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6; 
牛线:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,COLORRED; 
马线:MA(牛线,8),COLORWHITE; 
DRAWICON( FILTER(CROSS(牛线,马线),20),马线-0.002 ,1); 
DRAWTEXT(CROSS(牛线,马线),LOW*0.984,'买'),COLORRED,LINETHICK2; 
止损价:H*0.95,LINETHICK0.5,COLORRED;  
庄家:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+ 
16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+ 
13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+ 
10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+ 
7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+ 
4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,COLORRED; 
IF(庄家>=REF(庄家,1),庄家,DRAWNULL),COLORRED,LINETHICK4; 
IF(庄家<=REF(庄家,1),庄家,DRAWNULL),COLORGREEN,LINETHICK2; 
DRAWBAND(牛线,RGB(255,87,22),马线,RGB(0,30,255)); 
MA60:MA(CLOSE,60),COLORGRAY; 
N1:=10; 
TK:=CONST(HHVBARS(V,10)),COLOR0000FF,LINETHICK1; 
量能评台:IF(CURRBARSCOUNT<=N1+3,CONST(IF(TK=0,C,REF(C,TK))),DRAWNULL),COLORGRAY,LINETHICK1; 
NOTEXT_新量能点:IF(CURRBARSCOUNT=TK+1,量能评台,DRAWNULL),CIRCLEDOT,COLORFFFFFF,LINETHICK9; 
DRAWTEXT(ISLASTBAR,量能评台,'量能评台'),COLORGRAY; 
{稳涨} 
  红轨道:=MA(MA(CLOSE,3),1),LINETHICK1,COLORYELLOW; 
  轨道:MA(MA(CLOSE,3),3),COLOR32CD32,LINETHICK2; 
  NOTEXT_升:IF(红轨道>=轨道,轨道,DRAWNULL),COLORMAGENTA,LINETHICK2; 
 
机构:(L2_VOL(0,0) - L2_VOL(0,1))*10000/FINANCE(7),NODRAW,COLORRED; 
大户:(L2_VOL(1,0) - L2_VOL(1,1))*10000/FINANCE(7),NODRAW,COLORMAGENTA; 
主力:机构+大户,NODRAW,COLORYELLOW; 
STICKLINE(主力>0,O,C,1.5,1),COLORRED; 
STICKLINE(主力<0,O,C,1.5,1),COLORCYAN; 
STICKLINE(大户>0,O,C,1,0),COLORMAGENTA; 
STICKLINE(大户<0,O,C,1,0),COLORGREEN; 
STICKLINE(机构>0 AND 大户>0,O,(O+C)/2,1,0),COLORRED; 
STICKLINE(机构<0 AND 大户>0,C,(O+C)/2,1,0),COLORCYAN; 
STICKLINE(机构>0 AND 大户<0,O,(O+C)/2,1,0)COLORMAGENTA; 
STICKLINE(机构<0 AND 大户<0,C,O,1,0)COLORLICYAN; 
累计:=SUM(主力,30),COLORMAGENTA; 
均值:=EMA(累计,MIN(10,30)),COLORWHITE; 
{红} 
STICKLINE(CROSS(累计,均值),H,L,0,0),COLORRED,LINETHICK1; 
STICKLINE(CROSS(累计,均值),CLOSE,OPEN,1.4,0),COLOR000088; 
STICKLINE(CROSS(累计,均值),CLOSE,OPEN,1,0),COLOR0000BB; 
STICKLINE(CROSS(累计,均值),CLOSE,OPEN,0.6,0),COLOR0000DD;  
STICKLINE(CROSS(累计,均值),CLOSE,OPEN,0,0),COLOR0000FF; 
{蓝} 
STICKLINE(CROSS(均值,累计),H,L,0,0),COLORFF8800,LINETHICK1; 
STICKLINE(CROSS(均值,累计),CLOSE,OPEN,1.4,0),COLORBB4400; 
STICKLINE(CROSS(均值,累计),CLOSE,OPEN,1,0),COLORCC5500; 
STICKLINE(CROSS(均值,累计),CLOSE,OPEN,0.6,0),COLORDD6600; 
STICKLINE(CROSS(均值,累计),CLOSE,OPEN,0,0),COLOREE7700; 
 
{高低点定位} 
G0:=(XMA(XMA(H,30),30)-XMA(XMA(L,30),30))+XMA(XMA(H,30),30); 
D0:=XMA(XMA(L,30),30)-(XMA(XMA(H,30),30)-XMA(XMA(L,30),30)); 
G01:=(XMA(XMA(H,30),30)-XMA(XMA(L,30),30))*0.5+XMA(XMA(H,30),30); 
D01:=XMA(XMA(L,30),30)-(XMA(XMA(H,30),30)-XMA(XMA(L,30),30))*0.5; 
GO0:=(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*3+XMA(XMA(H,60),60); 
DO0:=XMA(XMA(L,60),60)-(XMA(XMA(H,60),60)-XMA(XMA(L,60),60))*3; 
STICKLINE(CURRBARSCOUNT=1,G0,G0,100,5),COLORGREEN; 
STICKLINE(CURRBARSCOUNT=1,D0,D0,100,5),COLORMAGENTA; 
STICKLINE(CURRBARSCOUNT=1,GO0,GO0,100,5),COLORLIBLUE; 
STICKLINE(CURRBARSCOUNT=1,DO0,DO0,100,5),COLORRED; 
DRAWTEXT(ISLASTBAR,G0,'卖'),COLORGREEN; 
DRAWTEXT(ISLASTBAR,D0,'买'),COLORMAGENTA; 
DRAWTEXT(ISLASTBAR,GO0,'顶'),COLORLIBLUE; 
DRAWTEXT(ISLASTBAR,DO0,'底'),COLORRED; 
{五线顺上的拐点定位线,有未来函数} 
局部低点预选A:=BACKSET(LLV(L,5)<REF(LLV(L,4),1),4); 
局部低点预选B:=BACKSET(局部低点预选A=0 AND REF(局部低点预选A,1)=1,2); 
局部低点预选C:=IF(局部低点预选B=1 AND REF(局部低点预选B,1)=0,-1,0); 
局部高点预选A:=BACKSET(HHV(H,5)>REF(HHV(H,4),1),4); 
局部高点预选B:=BACKSET(局部高点预选A=0 AND REF(局部高点预选A,1)=1,2); 
局部高点预选C:=IF(局部高点预选B=1 AND REF(局部高点预选B,1)=0,1,0); 
缺口判断:=IF(L>REF(H,1),1,IF(H<REF(L,1),-1,0)); 
距前高天:=BARSLAST(局部高点预选C=1); 
距前低天:=BARSLAST(局部低点预选C=-1); 
小值周期:=LOWRANGE(L); 
大值周期:=TOPRANGE(H); 
低保留AA:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0); 
低保留AB:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR LLV(L,距前低天+2)<REF(LLV(L,距前低天+1),1)),-1,0); 
低保留S:=IF((低保留AA=-1 OR 低保留AB=-1) AND L<REF(H,距前高天+1),-1,0); 
预判:=IF((距前低天<4 AND HHV(缺口判断,距前低天)!=1) OR REF(低保留S,距前低天)=0,1,0); 
判断:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND 预判=1 AND 大值周期>REF(小值周期,距前低天+1) AND 大值周期>REF(小值周期,距前低天) AND 大值周期>REF(大值周期,距前高天),1,0); 
高保留A:=IF(局部高点预选C=1 AND REF(距前低天,1)>REF(距前高天,1) AND HHV(H,距前低天+1)>REF(HHV(H,距前低天+1),1),1,0); 
高保留B:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND REF(低保留S,距前低天)=-1 AND (距前低天>=4 OR HHV(缺口判断,距前低天)=1),1,0); 
高保留:=IF((高保留A=1 OR 高保留B=1 OR 判断=1) AND H>REF(L,距前低天+1),1,0); 
预判A:=IF((距前高天<4 AND HHV(缺口判断,距前高天)!=1) OR REF(高保留,距前高天)=0,1,0); 
判断A:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND 预判A=1 AND 小值周期>REF(大值周期,距前高天+1) AND 小值周期>REF(大值周期,距前高天) AND 小值周期>REF(小值周期,距前低天),-1,0); 
低保留A:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0); 
低保留B:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR 判断A=-1),-1,0); 
低保留:=IF((低保留A=-1 OR 低保留B=-1) AND L<REF(H,距前高天+1),-1,0); 
距前高天A:=BARSLAST(高保留=1); 
距前低天A:=BARSLAST(低保留=-1); 
预判X:=IF((距前低天A<4 AND HHV(缺口判断,距前低天A)!=1) OR REF(低保留,距前低天A)=0,1,0); 
判断X:=IF(局部高点预选C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND 预判X=1 AND 大值周期>REF(小值周期,距前低天A+1) AND 大值周期>REF(小值周期,距前低天A) AND 大值周期>REF(大值周期,距前高天A),1,0); 
高保留XA:=IF(局部高点预选C=1 AND REF(距前低天A,1)>REF(距前高天A,1) AND HHV(H,距前低天A+1)>REF(HHV(H,距前低天A+1),1),1,0); 
高保留XB:=IF(局部高点预选C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND REF(低保留,距前低天A)=-1 AND (距前低天A>=4 OR HHV(缺口判断,距前低天A)=1),1,0); 
高保留X:=IF((高保留XA=1 OR 高保留XB=1 OR 判断X=1) AND H>REF(L,距前低天A+1),1,0); 
预判XA:  |