MTM:=C-REF(C,1);
中轴:EMA(C,17),LINETHICK1,COLORFF3399;
阳上:中轴+3*STD(C,17),LINETHICK1,Color73740F;
阳下:中轴+2*STD(C,17),LINETHICK1,colorcyan;
阴上:中轴-2*STD(C,17),LINETHICK1,Coloryellow;
阴下:中轴-3*STD(C,17),LINETHICK1,Color00b4ff;
DRAWBMP(CROSS(阴下,LOW),阴下*0.96,'红宝石'),ALIGN1;
DRAWBMP(CROSS(HIGH,阳上),HIGH*1.035,'绿宝石'),ALIGN1;
中期成本:(EMA(CLOSE,17) * 1.0);
PARTLINE(中期成本,CLOSE >中期成本),LINETHICK3,colorFF00FF;
PARTLINE(中期成本,中期成本> CLOSE),LINETHICK3,color00ff00;
a1:=IF((CLOSE < 800),((AMOUNT / VOL) / 100),((((CLOSE * 2) + HIGH) + LOW) / 4));
a2:=((HHV(HIGH,15)) + (LLV(LOW,30))) / 2;
a3:=EMA((MA(a1,5)),10);
a4:=EMA((MA(a1,15)),10);
a5:=EMA((MA(a1,13)),21);
a6:=((a3 + a4) + a5) / 3;
短期成本:EMA((MA(CLOSE,5)),3),linethick1,colorFF0000;
PARTLINE(短期成本,短期成本 > (REF(短期成本,3)),RGB(255,0,0)),linethick1,colorRed;
DRAWTEXT(((CLOSE > 0) AND (DISPSTATUS = 2)),(短期成本* 0.95),'短期成本：'+短期成本),MOVE10,ALIGN2,LINETHICK2,colorRed;
现价:EMA(C,1),LINETHICK1,colorwhite;
{短线}
Var1:=(CLOSE*2+HIGH+LOW)/4;
SK:= EMA(Var1,13)-EMA(Var1,73);
SD:= EMA(SK,2);
drawtext((cross(sk,sd) and sk<-0.04 and (c-ref(c,1))/ref(c,1)>=0.03) or (cross(sk,sd) and sk<=-0.14 )
or (cross(sk,sd) and sk<=0.05 and (v/ma(v,5)>2 or c/ref(c,1)>0.035)) ,l*0.99,'←短线'),LINETHICK3,COLORGRAY{深灰色};
{出击.震仓}
A1:=REF(CLOSE,1)<REF(OPEN,2);
A2:=CLOSE>OPEN ;
A3:=REF(HIGH,1)<REF(LOW,2) ;
Aa4:=HIGH>REF(LOW,1);
DRAWTEXT( A1 AND A2 AND A3  AND Aa4,(LOW - 0.3),'←出击'),LINETHICK2,color00FFFF;
DRAWTEXT(TROUGHBARS(3,15,1)=0 AND HIGH>LOW+0.01 AND  A1 AND A2=0 AND A3=0  AND Aa4=0,(LOW - 0.3),'震仓'),LINETHICK2,color0000FF;
{.←抄底}
B:=(SMA(LOW,5,2) * 0.96);
BB:=LLV(HIGH,36);
B2:=LLV(HIGH,30);
DRAWTEXT(((((LOW <= B) AND (HIGH >= BB)) AND (CLOSE >=B2 )) AND ((CLOSE / OPEN) > 1.03)),(LOW - 0.08),'★抄底'),LINETHICK2,color0000FF;
{追涨}
Va1:=EMA(CLOSE,8);
Va2:=EMA(Va1,20);
Va3:=CROSS(Va1,Va2);
Va4:=VOL/SUM(VOL,13);
Va5:=DMA(CLOSE,Va4);
Va6:=Va1<MA(CLOSE,120);
A3a:=Va3 AND Va6 AND (CLOSE-Va5)/Va5*100/2.5>1.6;
A4a:=CROSS( (CLOSE-Va5)/Va5*100/2.5,0 ) and (CLOSE-Va5)/Va5*100/2.5>1.5 ;
DRAWTEXT(A4a>0 or A3a>0,l-0.3,'←追涨'),LINETHICK2,COLORWHITE;
{逃顶}

VV1:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
VV2:=SMA(VV1,7,1);
VV3:=SMA(VV2,12,1);
VV4:=CROSS(VV3,VV2);
VV5:=VV3>88 OR VV2>88;
VV6:=VV4 AND VV5;
drawtext(VV6 OR cross(REF(VV2,1),VV2) AND VV2>95,h+1.2,'←逃顶'),LINETHICK2,coloryellow{黄};
DRAWGBK((CLOSE > 0),STRIP(RGB(4,1,28),RGB(4,1,35),0));
A4:=MA(CLOSE,20);
A5:=(CLOSE > MA(CLOSE,5));
A6:=(MA(CLOSE,5) > MA(CLOSE,10));
A7:=(CLOSE > MA(CLOSE,10));
A8:=(MA(CLOSE,5) > MA(CLOSE,20));
A9:=(CLOSE > MA(CLOSE,20));
A10:=REF(A4,1);
A11:=(A4 > A10);
AVX:=(((((IF(A5,10,(0 - 10)) + IF(A6,10,(0 - 10))) + IF(A7,10,(0 - 10))) + IF(A8,10,(0 - 10))) + IF(A9,10,(0 - 10))) + IF(A11,10,(0 - 10)));
DSLX:=(CLOSE / INDEXC);
DSLX1:=MA(DSLX,5);
DSLX2:=MA(DSLX,10);
V1:=MA(VOL,5);
V2:=MA(VOL,10);
阻力位:=IF((CLOSE > 200),(CLOSE * 1.01),(CLOSE * 1.07));
阻力位１:=IF((CLOSE < 10),(CLOSE * 1.05),阻力位);
止损位:=IF((CLOSE > 200),(CLOSE * 0.99),(CLOSE * 0.93));
止损位１:=IF((CLOSE < 10),(CLOSE * 0.95),止损位);
TJTS1:=BARSTATUS=2 and c<200;
TJTS2:=BARSTATUS=2 and c>200;
k2:=hhv(h,barslast(DISPSTATUS=1)+1);
DRAWTEXT(TJTS1 or TJTS2 ,k2*0.99,'阻力位:'+NUMTOSTRN(阻力位１,2)+'                                                                                                           '),coloryellow,ALIGN2;
DRAWTEXT(TJTS1 or TJTS2 ,k2*0.99,'止损位:'+NUMTOSTRN(止损位１,2)+'                                                                                       '),coloryellow ,ALIGN2;
DRAWTEXT(TJTS1 and  ((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'该股的量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右。       '),ALIGN2,colorDC143C;
DRAWTEXT(TJTS1 and  ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'该股虽然走势趋强，但量能还显不足，可以考虑短线进场，仓位在1/2左右。       '),ALIGN2,colorDC143C;
DRAWTEXT(TJTS1 and  ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)) ,k2*0.99,'该股量价配合良好，但相对其它股票并没有明显走强，可以考虑短线进场，仓位1/2左右。       '),ALIGN2,colorDC143C;
DRAWTEXT(TJTS1 and  ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)) ,k2*0.99,'该股形态尚可，但量能不足，股票也未完全走强，可以短线参与，仓位1/3左右。       '),ALIGN2,color0000FF;
DRAWTEXT(TJTS1 and  ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'该股形态变坏，但走势相对其它股票尚可，重仓者减持大半，清仓者可以观望。       '),ALIGN2,color00FF00;
DRAWTEXT(TJTS1 and  ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'该股随大盘一起下跌，程明显缩量走势，考虑到大盘风险，减持或清仓。       '),ALIGN2,color00FF00;


DRAWTEXT(TJTS1 and  ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)) ,k2*0.99,'该股放量下跌，走势明显偏弱，离场观望。       '),ALIGN2,color00FF00;
DRAWTEXT(TJTS1 and  ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)) ,k2*0.99,'该股缩量下跌，走势偏弱，离场观望。       '),ALIGN2,color00FF00;
DRAWTEXT(TJTS1 and  ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'该股形态良好，强势明显，量能充足，可以继续持有。       '),ALIGN2,color00FFFF;
DRAWTEXT(TJTS1 and  ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'该股上行趋势不变，强势依然，但量能开始转弱，注意风险。       '),ALIGN2,color00FFFF;
DRAWTEXT(TJTS1 and  ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) ,k2*0.99,'该股仍然具备上涨潜力，但股性偏弱，可考虑减仓。       '),ALIGN2,color00FFFF;
DRAWTEXT(TJTS1 and  ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) ,k2*0.99,'该股走势趋弱，量能不足，减持大部分筹码。       '),ALIGN2,color00FFFF;
DRAWTEXT(TJTS1 and  ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'该股形态不佳，注意成交量的变化，但目前不适合参与。       '),ALIGN2;
DRAWTEXT(TJTS1 and  ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'该股趋