DRAWGBK(1, COLORRGB(0,255,0), COLORRGB(0,0,0),1);STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,9,0 ),COLOR00ccff; STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),color33eeff;STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2.4,0 ),Color66ffff;STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1.1,0 ),,Color99ffff;STICKLINE(CLOSE>OPEN,CLOSE,OPEN,9,0 ),COLOr000099;STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6 ,0 ),COLOR0000cc; STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.4 ,0 ),COLOR0000ff; STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.1 ,0 ),COLOR0033ff;STICKLINE(CLOSE>OPEN,OPEN,LOW,0.5,0 ),COLOr000099; STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0.5 ,0 ),COLOr000099;STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0.5 ,0 ),COLOR00ccff; STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0.5 ,0 ),COLOR00ccff;ywl1:ref(h,barslast(v=hhv(v,5))),linethick2,coloryellow;ywl2:ref(l,barslast(v=llv(v,10))),linethick2,colorblue;DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,STKNAME+'\n'+STKLABEL+'\n'+BLKNAME)align4,COLORblack;ywo:=ma(c,5);ywc:=ma(c,5);ywl:=ma(l,5);ywh:=ma(h,5);ko:=ywo/ref(ywo,1)*o;kc:=ywc/ref(ywc,1)*c;kl:=ywl/ref(ywl,1)*l;kh:=ywh/ref(ywh,1)*h;kk:=(3*c+o+h+l)/6,shift1,colorwhite;stickline(islastbar and ko>=kc,kc,ko,9,0),shift1,colorwhite;stickline(islastbar and ko>=kc,kl,kc,1,0),shift1,colorwhite;stickline(islastbar and ko>=kc,ko,kh,1,0),shift1,colorwhite;stickline(islastbar and ko<KC,KO,KC,9,0),SHIFT1,COLORWHITE; stickline(islastbar and ko<KC,KC,KH,1,0),SHIFT1,COLORWHITE; stickline(islastbar and ko<KC,KL,KO,1,0),SHIFT1,COLORWHITE; stickline(islastbar,kk,c,9,0),shift1,colorgreen;drawtext(v>ma(v,5)*2.5,l,'【异动点】'),colorred;drawtext(ref(ma(c,30),2)<=ref(ma(c,30),1) and ref(ma(c,30),1)>ma(c,30),h,'【转弱点】'),colorgreen;EXPLAINEX(1,'50%成本:',COST(50),2,0),Color82FF82;EXPLAINEX(1,'抄跌成本成本:',COST(10),2,0),Color82FF82;EXPLAINEX(1,'建仓成本:',COST(28),2,0),Color82FF82;EXPLAINEX(1,'拉升成本:',COST(73),2,0),Color82FF82;EXPLAINEX(1,'逃顶成本:',COST(90),2,0),Color82FF82;EXPLAINEX(1,'获利盘比例：',WINNER(C)*100,2,0),Color82FF82;EXPLAINEX(1,'套牢盘比例：',100-WINNER(C)*100,2,1),Color82FF82;tt:=abs(sum((c/ref(c,1)-1),20)+c/o-1)*100;EXPLAINEX(1,'今日个股波动度',tt,2,0),Color003EFF;EXPLAINEX(1,'今日换手率',v/capital*100,2,0),Color003EFF;explain(v>ref(v,1) and ma(v,5)>ref(ma(v,5),1),' 今日成交量大于昨日,且有继续增大趋势'),Color8285FF;explain(vref(ma(v,5),1),'今日成交量小于昨日，但有放大迹象'),Color8285FF;explain(v>ref(v,1)and ma(v,5)<REF(MA(V,5),1),' 但有缩小迹象?),Color8285FF; explain(v<REF(V,1)AND ma(v,5)<ref(ma(v,5),1),?今日成交量小于昨日，且有缩小迹象?),Color8285FF; FORCAST((c/ref(c,1))/(indexc/ref(indexc,1))*c,20),ColorFF00FF;

{自动均线}
a1:=ema(c,5);    b[1]:=a1[SYSPARAM(1)];
a2:=ema(c,10);   b[2]:=a2[SYSPARAM(1)];
a3:=ema(c,20);   b[3]:=a3[SYSPARAM(1)];
a4:=ema(c,30);   b[4]:=a4[SYSPARAM(1)];
a5:=ema(c,40);   b[5]:=a5[SYSPARAM(1)];
a6:=ema(c,50);   b[6]:=a6[SYSPARAM(1)];
a7:=ema(c,60);   b[7]:=a7[SYSPARAM(1)];
a8:=ema(c,70);   b[8]:=a8[SYSPARAM(1)];
a9:=ema(c,80);   b[9]:=a9[SYSPARAM(1)];
a10:=ema(c,90);  b[10]:=a10[SYSPARAM(1)];
a11:=ema(c,100); b[11]:=a11[SYSPARAM(1)];
a12:=ema(c,110); b[12]:=a12[SYSPARAM(1)];
a13:=ema(c,120); b[13]:=a13[SYSPARAM(1)];
a14:=ema(c,130); b[14]:=a14[SYSPARAM(1)];
a15:=ema(c,140); b[15]:=a15[SYSPARAM(1)];
a16:=ma(c,150);  b[16]:=a16[SYSPARAM(1)];
a17:=ema(c,160); b[17]:=a17[SYSPARAM(1)];
a18:=ema(c,170); b[18]:=a18[SYSPARAM(1)];
a19:=ema(c,180); b[19]:=a19[SYSPARAM(1)];
a20:=ema(c,190); b[20]:=a20[SYSPARAM(1)];
a21:=ema(c,200); b[21]:=a21[SYSPARAM(1)];
a22:=ema(c,210); b[22]:=a22[SYSPARAM(1)];
a23:=ema(c,220); b[23]:=a23[SYSPARAM(1)];
a24:=ema(c,230); b[24]:=a24[SYSPARAM(1)];
a25:=ema(c,240); b[25]:=a25[SYSPARAM(1)];
a26:=ema(c,250); b[26]:=a26[SYSPARAM(1)];
zd:=max(max(max(max(max(max(max(max(max(max(max(max(max(max(max(max(max(max(max(max(max(max(max(max(max(
a1,a2),a3),a4),a5),a6),a7),a8),a9),a10),a11),a12),a13),a14),a15),a16),a17),a18),a19),a20),a21),a22),a23),a24),a25),a26);
zx:=min(min(min(min(min(min(min(min(min(min(min(min(min(min(min(min(min(min(min(min(min(min(min(min(min(
a1,a2),a3),a4),a5),a6),a7),a8),a9),a10),a11),a12),a13),a14),a15),a16),a17),a18),a19),a20),a21),a22),a23),a24),a25),a26);
PARTLINE(1,zd),Color008987;
PARTLINE(1,zx),Color008987;
for i=1 to 26 do begin
  if zd[SYSPARAM(1)]=b[i] then
  最大:if(i=1,5,(i-1)*10),LINETHICK0,Color2CE2B5;
  if zx[SYSPARAM(1)]=b[i] then  
  最小:if(i=1,5,(i-1)*10),LINETHICK0,COLORGREEN;
  日线:ema(c,最大),PRECISION2,LINETHICK0,COLORYELLOW;
  天线:ema(c,最小),LINETHICK2,PRECISION2,Color8500E9;
end;
x1:=最大;   x2:=最小;
PARTLINE(RANGE(BARPOS,SYSPARAM(2),SYSPARAM(1)+1),日线),LINETHICK2,COLORYELLOW;
DRAWTEXT(BARPOS=SYSPARAM(2),H,'■最大：'+NUMTOSTR(x1,0)+' 日均线'),PXUP5,align4,ColorDED6FF;
DRAWTEXT(BARPOS=SYSPARAM(2),H,' \n■最小：'+NUMTOSTR(x2,0)+' 日均线'),PXUP5,align4,COLORGREEN;
//

DRAWGBK(1,COLORRGB(0,230,230),COLORRGB(133,133,0),1);
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,9,0),color9900;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,6,0),colorCC00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,2.4,0),color33FF00;
STICKLINE(OPEN>=CLOSE,CLOSE,OPEN,1.1,0),color66FF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,9,0),color99;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0),colorCC;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2.4,0),colorFF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1.1,0),color33FF;
STICKLINE(CLOSE>OPEN,OPEN,LOW,0.5,0),color99;
STICKLINE(CLOSE>OPEN,CLOSE,HIGH,0.5,0),color99;
STICKLINE(OPEN>=CLOSE,CLOSE,LOW,0.5,0),color9900;
STICKLINE(OPEN>=CLOSE,OPEN,HIGH,0.5,0),color9900;
BOBOQINQIN:EMA((CLOSE+MA(CLOSE,5)*0.618+MA(CLOSE,10)*0.382)/(1+0.618+0.382),10),colorEA2100;
YANG:EMA((CLOSE+MA(CLOSE,5)*0.618+MA(CLOSE,10)*0.382)/(1+0.618+0.382),30),colorEA2100;
Y_W83:=100*(WINNER(CLOSE*1.1)-WINNER(CLOSE));
Y_W84:=100*(WINNER(CLOSE*1.2)-WINNER(CLOSE));
BOBO:=POW(Y_W84*Y_W83,0.5);
YWL1:=100*(HHV(BOBO,10)-BOBO)/(HHV(BOBO,10)-LLV(BOBO,10));
YWL2:=100*(HHV(BOBO,30)-BOBO)/(HHV(BOBO,30)-LLV(BOBO,30));
PARTLINE(YWL1=YWL2,REF(LOW,BARSLAST(YWL1<>YWL2))),LINETHICK3,colorFF68FF;
PARTLINE(YWL1=YWL2,REF(HIGH,BARSLAST(YWL1<>YWL2))),LINETHICK3,color78FFFF;
AA:=HHV(HIGH,5);
BB:=LLV(LOW,5);
TT1:=(AA-BB)*0.5+BB;
TT2:=(AA-BB)*1.5+BB;
TT3:=-(AA-BB)*0.5+BB;
TT4:=AA;
TT5:=BB;
长期趋势线1:EMA((MA(CLOSE,5)+MA(CLOSE,10)+MA(CLOSE,20))/3,120),LINETHICK2,color3FF80;
长期趋势线2:长期趋势线1+2*STD(长期趋势线1,60),LINETHICK2,colorFF;
长期趋势线3:长期趋势线1-2*STD(长期趋势线1,60),LINETHICK2,colorFFFF00;
DRAWNUMBER(ISLASTBAR,TT1,TT1,2),SHIFT2,colorFFFFFF;
DRAWNUMBER(ISLASTBAR,TT2,TT2,2),SHIFT2,colorFFFFFF;
DRAWNUMBER(ISLASTBAR,TT3,TT3,2),SHIFT2,colorFFFFFF;
DRAWNUMBER(ISLASTBAR,TT4,TT4,2),SHIFT2,colorFFFFFF;
DRAWNUMBER(ISLASTBAR,TT5,TT5,2),SHIFT2,colorFFFFFF;
STICKLINE(ISLASTBAR,TT1,TT1,15,0),SHIFT1,color3333FF;
STICKLINE(ISLASTBAR,TT2,TT2,15,0),SHIFT1,color3333FF;
STICKLINE(ISLASTBAR,TT3,TT3,15,0),SHIFT1,color3333FF;
STICKLINE(ISLASTBAR,TT4,TT4,15,0),SHIFT1,color3333FF;
STICKLINE(ISLASTBAR,TT5,TT5,15,0),SHIFT1,color3333FF;
TT:='江恩的股票操作买卖守则：';
TT1:='１每次入市买、卖，损失不应超过资金的十分之一。';
TT2:='2永远都设立止损位，减少买卖出错时可能造成的损失。';
TT3:='3永不让所持仓位转盈为亏。';
TT4:='4永不逆市而为。市场趋势不明显时，宁可在场外观望。';
TT5:='5有怀疑，即平仓离场。入市时要坚决，犹豫不决时不要入市。';
TT6:='6只在活跃的市场买卖。买卖清淡时不宜操作。';
TT7:='7永不设定目标价位出入市，避免限价出入市，而只服从市场走势';
TT8:='8买卖遭损失时，切忌赌徒式加码，以谋求摊低成本。';
TT9:='9做多错多，入市要等候机会，不宜买卖太密';
TT10:='１0不要因为价位太低而吸纳，也不要因为价位太高而沽空。';
TT11:='１1入市时落下的止损位，不宜胡乱取消';
EXPLAIN(1,TT),color33FF;
EXPLAIN(1,TT1),colorFFFF;
EXPLAIN(1,TT2),colorFF0033;
EXPLAIN(1,TT4),color558800;
EXPLAIN(1,TT5),colorFF1100;
EXPLAIN(1,TT6),colorFFAA00;
EXPLAIN(1,TT7),color88FF33;
EXPLAIN(1,TT8),color88AA;
EXPLAIN(1,TT9),colorFF;
EXPLAIN(1,TT10),colorFF00;
EXPLAIN(1,TT11),colorFFFFFF;
EXPLAIN(1,'AAAAAAAA'),colorFF00;
EXPLAIN(1,'杨文亮制造，祝大家五一愉快！'),colorFFFF;
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,STKNAME+'\n'+STKLABEL+'\n'+BLKNAME),ALIGN4,color10000;

DRAWGBK(CLOSE>0, COLORRGB(1,000,999), COLORRGB(150,100,0),1);Var1:=AMOUNT/VOL/100;Var2:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;Var3:=SUM(AMOUNT,5)/Var1/100;Var4:=SUM(AMOUNT,10)/Var1/100;Var5:=SUM(AMOUNT,22)/Var1/100;Var6:=SUM(AMOUNT,45)/Var1/100;cycMA(Var2,VOL/Var3);cyc1MA(Var2,VOL/Var4);cyc2MA(Var2,VOL/Var5);cyc3MA(Var2,VOL/Var6);cyc4MA(Var2,VOL/CAPITAL);STICKLINE(close>=open,open,close,7,1),colorred; STICKLINE(open>close,close,open,7,0),colorgreen;STICKLINE(close>=open,close,HIGH,0,1 ),colorred; STICKLINE(close>=open,open,low,0,1),colorred; STICKLINE(open>close,close,low,0,0),colorgreen; STICKLINE(open>close,open,HIGH,0,0),colorgreen;

N:=89;
FL:MA(CLOSE,13)+ABS(MA(CLOSE,13)-REF(MA(CLOSE,13),1)),colorf4e202,,LINETHICK2;
FS:MA(CLOSE,13)+MA(CLOSE,13)-REF(MA(CLOSE,13),1),colorf4e202,linethick2,;
CG:IF(MA(CLOSE,13)<FS,FS,MA(CLOSE,13)),COLORRED,linethick2,;
FL1:=MA(CLOSE,17)+ABS(MA(CLOSE,17)-REF(MA(CLOSE,17),1));
FS1:=MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1);
CG1:=IF(MA(CLOSE,17)<FS1,FS1,MA(CLOSE,17));{
PARTLINE(CG,FL1=FS1),linethick2,,COLOR00FFFF;
PARTLINE(FS,FL1=FS1),linethick2,,COLOR00FFFF;
PARTLINE(FL,FL1=FS1),linethick2,,COLOR00FFFF;}
VAR0:=(CLOSE*2+HIGH+LOW)/4*vol;
var1:=SUM(VAR0,N)/SUM(vol,N);
var2:=IF(COUNT(VAR0>0,2)>=2,MA(CLOSE,N)*(1+(MA(VAR0,N)/REF(MA(VAR0,N),1)-1)/N),MA(CLOSE,N));
var3:=IF(COUNT(ABS(CLOSE-var1)>21,8)>=1 AND  COUNT(CLOSE/REF(CLOSE,1)<0.8,8)<1 AND COUNT(VAR0>0,2)>=2,10,0);
var4:=IF(CLOSE>=var1 AND COUNT(VAR0>0,2)>=2,var1*1.001,IF(VAR0<0.1 AND COUNT(VAR0>0,2)<1.5,MA(CLOSE,N),var1*0.999));
var5:=IF(var3>0,var2,var4);
var6:=MA(CLOSE,N);
BS:IF(var5/REF(var5,1)>1.1 OR var5/REF(var5,1)<0.9,VAR6,VAR5),colorFF80FF,linethick2;

A1:COST(0.001);

A2:COST(99.999);

B1:A1+(A2-A1)*0.191;

B2:A1+(A2-A1)*0.382;

B3:A1+(A2-A1)*0.5;

B4:A1+(A2-A1)*0.618;

B5:A1+(A2-A1)*0.809;

DRAWGBK(CLOSE>0, COLORRGB(1,0,0), COLORRGB(1,0,0),2);
X1a:=HHV(H,3);
X2a:=LLV(L,3);
Xc:=c;
Xh:=h;
Xl:=l;
for i=1 to datacount do
IF Xh[i]>x1a[i-1] and Xc[i]>Xc[i-1] Then lya[i]:=x2a[i];
ELSE IF Xl[i]<x2a[i-1] and Xc[i]<Xc[i-1] Then lya[i]:=x1a[i];
ELSE  lya[i]:=lya[i-1];
x:lya,COLORMAGENTA;

STICKLINE(close>=open,open,close,5,1),colorred;
STICKLINE(open>close,close,open,5,0 ),colorgreen;
STICKLINE(close>=open,close,HIGH,0.5 ,1 ),colorred;
STICKLINE(close>=open,open,low,0.5 ,1 ),colorred;
STICKLINE(open>close,close,low,0.5 ,0 ),colorgreen;
STICKLINE(open>close,open,HIGH,0.5 ,0 ),colorgreen;


SAR(4,2,20),CIRCLEDOT,colorffffff;

MA13:MA(CLOSE,13),colorFFFFFF;
MA34:MA(CLOSE,34),colorFF00FF;
MA55:MA(CLOSE,55),colorFFCC66;
LC:=REF(CLOSE,1);
RSI:=(SMA(MAX(CLOSE-LC,0),6,1))/(SMA(ABS(CLOSE-LC),6,1))*100;
低吸:=CROSS(RSI,11);
DRAWTEXT(低吸,LOW,'★'),colorFFFFFF;
DRAWTEXT(低吸,LOW-0.12,'低吸'),colorFFFFFF;
VAR7:=EMA(AMOUNT/VOL/100,3);
VAR8:=EMA(VAR7,88);
VAR9:=EMA(VAR7,88)*0.85;
VARA:=VAR9*0.87;
VARB:=LOW<VARA AND CLOSE>REF(CLOSE,1)*1.02;
DRAWTEXT(FILTER(VARB,6),LOW-0.14,'坚决买进'),colorFF00FF;
DRAWTEXT(FILTER(VARB,6),LOW,'★'),colorFF00FF;
VARF:=(2*CLOSE+HIGH+LOW)/4;
VA4:=LLV(LOW,34);
VA5:=HHV(HIGH,34);
VA6:=EMA((VARF-VA4)/(VA5-VA4)*100,6);
VA7:=EMA(0.667*REF(VA6,1)+0.333*VA6,4);
DRAWTEXT(IF((COUNT(CLOSE<REF(CLOSE,1),8))/8>0.3 AND COUNT(VA6>VA7,3) AND REF(LOW,1)=LLV(LOW,120) AND CLOSE>OPEN,1,0),LOW,'★'),colorFFFF;
DRAWTEXT(IF((COUNT(CLOSE<REF(CLOSE,1),8))/8>0.3 AND COUNT(VA6>VA7,3) AND REF(LOW,1)=LLV(LOW,120) AND CLOSE>OPEN,1,0),LOW-0.14,'出击'),colorFFFF;
A:=(3*CLOSE+LOW+OPEN+HIGH)/6;
D1:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+REF(A,20))/211;
D2:=EMA(D1,2);
D3:=EMA(D2,2);
K1:=EMA(D3,2);
DRAWTEXT(CROSS(D1,K1),LOW-0.14,'波段买入'),color99FF;
DRAWTEXT(CROSS(D1,K1),LOW,'★'),color99FF;
多方趋势:=7*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1)-3*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1),3,1)-SMA(SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*30,4,1),3,1),2,1);
天线:=78.89;
STICKLINE(CROSS(天线,多方趋势),HIGH*1.02,HIGH*1,6,0),colorFF00;
DRAWTEXT(CROSS(天线,多方趋势),HIGH*1.04,'逃顶'),colorFF00;

INPUT: P1(2.7,2,3.2),P2(3.13,3,3.5),P3(3.43,3,3.8),p4(3.71,3.5,3.9),n(21,3,100),n1(3,3,100),zz(1,1,2); //zz是多空显示开关。
m1:=MA(CLOSE,5);
m2:MA(CLOSE,20),COLORGREEN;
均线变异:IF(m1>m2,m2,m1),,Color0000FF;
PARTLINE(均线变异>REF(均线变异,1) and 均线变异=m2,均线变异),linethick2,COLORred;
var1:=(HHV(HIGH,n)-CLOSE)/(HHV(HIGH,n)-LLV(LOW,n))*100;
var3:=(CLOSE-LLV(LOW,n))/(HHV(HIGH,n)-LLV(LOW,n))*100;
var6:=var3-var1;
z:=MA(var6,n1);
STICKLINE(z>=0 {and zz=2},OPEN,CLOSE,6,0),colorred;
STICKLINE(z>=0 {and zz=2},HIGH,MAX(OPEN,CLOSE),0,1),colorred;
STICKLINE(z>=0 {and zz=2},MIN(OPEN,CLOSE),LOW,0,1),COLORred;
STICKLINE(z<0 {and zz=1},OPEN,CLOSE,6,1),COLORCYAN;
STICKLINE(z<0 {and zz=1},HIGH,MAX(OPEN,CLOSE),0,1),COLORCYAN;
STICKLINE(z<0 {and zz=1},MIN(OPEN,CLOSE),LOW,0,1),COLORCYAN;
STICKLINE(z>=0 and m2>CLOSE,OPEN,CLOSE,6,0),COLORBLUE;
STICKLINE(z>=0 and m2>CLOSE,HIGH,MAX(OPEN,CLOSE),0,1),COLORBLUE;
STICKLINE(z>=0 and m2>CLOSE,MIN(OPEN,CLOSE),LOW,0,1),COLORBLUE;
STICKLINE(z<0 and m2<CLOSE,OPEN,CLOSE,6,1),COLORYELLOW;
STICKLINE(z<0 and m2<CLOSE,HIGH,MAX(OPEN,CLOSE),0,1),COLORYELLOW;
STICKLINE(z<0 and m2<CLOSE,MIN(OPEN,CLOSE),LOW,0,1),COLORYELLOW;
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(z,0),1,0),LOW,'平空开多！'),COLORRED;
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(0,z),1,0),HIGH,'平多开空！'),COLORgreen;
Var2:=LLV(LOW,10);
Var3:=HHV(HIGH,25);
警戒线:= p1 ;
减仓线:= p2 ;
卖出线:= p3 ;
空头线:=p4;
动力线:= EMA((CLOSE-Var2)/(Var3-Var2)*4,4);
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(动力线,警戒线),1,0),CLOSE,'预警 '),ALIGN4,colorwhite;
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(动力线,减仓线),1,0),CLOSE,'减磅 '),ALIGN5,COLORYELLOW;
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(动力线,卖出线),1,0),CLOSE,'出局？'),ALIGN4,COLORGREEN ;
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(动力线,空头线),1,0),CLOSE,'与虎谋皮 '),ALIGN3,COLORRED;
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(警戒线,动力线),1,0),CLOSE,'预警确认 '),ALIGN3,COLORRED;
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(减仓线,动力线),1,0),CLOSE,'减磅确认 '),ALIGN3,COLORRED;
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(卖出线,动力线),1,0),CLOSE,'出局确认'),ALIGN3,COLORRED ;
DRAWTEXT(IF(RANGE(BARPOS,SYSPARAM(1)-2,SYSPARAM(1)+1) AND CROSS(空头线,动力线),1,0),CLOSE,'虎皮到手'),ALIGN4,COLORRED ;

{DRAWICON(CROSS(动力线,警戒线),h,1);
DRAWICON(CROSS(动力线,减仓线),h,3);}
DRAWICON(CROSS(动力线,卖出线),HIGH,2);

WW:=(MA(CLOSE,4)+MA(CLOSE,8)+MA(CLOSE,16)+MA(CLOSE,32))/4;
DRAWICON(CROSS(CLOSE,WW),LOW-0.02,4);
DRAWICON(CROSS(WW,CLOSE),HIGH+0.06,5);
DRAWTEXT(CROSS(CLOSE,WW),LOW-0.02,' 开多');
DRAWTEXT(CROSS(WW,CLOSE),HIGH+0.06,' 多平');
VAR2:=((CLOSE > REF(CLOSE,1)) AND (CLOSE > REF(CLOSE,2)));
VAR3:=((REF(VAR2,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
VAR4:=((REF(VAR3,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
VAR5:=((REF(VAR4,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
VAR6:=((REF(VAR5,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
VAR7:=((REF(VAR6,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
VAR8:=((REF(VAR7,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
VAR9:=((REF(VAR8,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
VARA:=((REF(VAR9,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
VARB:=((REF(VARA,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
VARC:=((REF(VARB,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
VARD:=((REF(VARC,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
STICKLINE((((((((((((VAR2 OR VAR3) OR VAR4) OR VAR5) OR VAR6) OR VAR7) OR VAR8) OR VAR9) OR VARA) OR VARB) OR VARC) OR VARD),CLOSE,REF(CLOSE,1),8,1),colorFF;
VARE:=((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,2)));
VARF:=((REF(VARE,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
VAR10:=((REF(VARF,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
VAR11:=((REF(VAR10,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
VAR12:=((REF(VAR11,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
VAR13:=((REF(VAR12,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
VAR14:=((REF(VAR13,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
VAR15:=((REF(VAR14,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
VAR16:=((REF(VAR15,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
VAR17:=((REF(VAR16,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
VAR18:=((REF(VAR17,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
VAR19:=((REF(VAR18,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
STICKLINE((((((((((((VARE OR VARF) OR VAR10) OR VAR11) OR VAR12) OR VAR13) OR VAR14) OR VAR15) OR VAR16) OR VAR17) OR VAR18) OR VAR19),CLOSE,REF(CLOSE,1),8,1),COLORFF9900;
VAR1A:=(REF((((((((((((VARE OR VARF) OR VAR10) OR VAR11) OR VAR12) OR VAR13) OR VAR14) OR VAR15) OR VAR16) OR VAR17) OR VAR18) OR VAR19),1) AND VAR2);
STICKLINE(VAR1A,REF(CLOSE,1),REF(CLOSE,2),8,0)COLORYELLOW;
AA:=(REF((((((((((((VAR2 OR VAR3) OR VAR4) OR VAR5) OR VAR6) OR VAR7) OR VAR8) OR VAR9) OR VARA) OR VARB) OR VARC) OR VARD),1) AND VARE);
STICKLINE(AA,REF(CLOSE,1),REF(CLOSE,2),10,0)COLORBLUE;
YC_AA:=(O+C)/2;
趋势线:DMA(YC_AA,VOL/SUM(VOL,8))LINETHICK0,;
强势线:DMA(YC_AA,VOL/SUM(VOL,36))LINETHICK0,COLORYELLOW;
强牛线:DMA(YC_AA,VOL/SUM(VOL,70))LINETHICK0,COLORRED;
PARTLINE(趋势线>REF(趋势线,1),趋势线)LINETHICK2,COLORWHITE;
PARTLINE(趋势线<REF(趋势线,1),趋势线)LINETHICK2,COLORBLUE;
PARTLINE(强势线>REF(强势线,1),强势线),COLORYELLOW;
PARTLINE(强势线<REF(强势线,1),强势线),COLORBLUE;
PARTLINE(强牛线>REF(强牛线,1),强牛线),COLORRED;
PARTLINE(强牛线<REF(强牛线,1),强牛线),COLORBLUE;

短线:=EMA(CLOSE,5);
趋势线:EMA(CLOSE,10),LINETHICK2,colorFF;
重心线:EMA(CLOSE,30),LINETHICK2,COLORYELLOW;
PARTLINE(((短线 > 趋势线) ),趋势线),LINETHICK2,colorFF;
PARTLINE(((趋势线 > 短线) ),趋势线),LINETHICK2,colorFFFF00;
抄底:CLOSE / OPEN>1.07 and 100*(CLOSE-MA(CLOSE,30)) / MA(CLOSE,30)<-10,colorFF,LINETHICK0;
买涨:FILTER(BARSLAST(COUNT(重心线>=ref(重心线,1),3)=3 and CROSS(趋势线,重心线))<=5 and l<=趋势线,5),COLORMAGENTA,LINETHICK0;
追进:COUNT(重心线>=ref(重心线,1),3)=3 and COUNT(趋势线>重心线,10)>8 and ref(趋势线,1)<ref(重心线,1)*1.02 and 趋势线>=重心线*1.02,COLORYELLOW,LINETHICK0;
VAR1:=(MA(CLOSE,20) + (2 * STD(CLOSE,20)));
VAR2:=CROSS(ref(CLOSE,2),VAR1);
VAR3:=((SMA(MAX((CLOSE - REF(CLOSE,1)),0),8,1) / SMA(ABS((CLOSE - REF(CLOSE,1))),8,1)) * 100);
VAR4:=CROSS(79,VAR3);
减仓:FILTER((VAR2 OR VAR4),5),COLORGREEN,LINETHICK0;
STICKLINE(抄底,l*0.99,l*0.95,6,0)colorFF;
STICKLINE(买涨,l*0.99,l*0.95,6,0)COLORMAGENTA;
STICKLINE(追进,l*0.99,l*0.95,6,0)COLORYELLOW;
STICKLINE(减仓,h*1.01,h*1.05,6,0)COLORGREEN;

A1:=Ref(close,1);
A2:=Ref(close,2);
DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26),COLORMAGENTA,LINETHICK2;
DEA:=EMA(DIFF,12),COLORYELLOW,LINETHICK2;

A3:=A1/A2>1.0989 and {Close<Open and} (H-O)/(Close-L)>2 and diff<dea ;
STICKLINE(A3,l*0.92,l*0.95,8,0)COLORyellow;

DRAWGBK(CLOSE>0, COLORRGB(1,0,0), COLORRGB(1,0,0),2);

牛熊:MA(CLOSE,20),COLORWHITE;
极强区:牛熊 + 2*STD(CLOSE,20);
强区:牛熊 + 1*STD(CLOSE,20),COLORRED;
弱区:牛熊 - 1*STD(CLOSE,20),COLOR00FF00;
极弱区:牛熊 - 2*STD(CLOSE,20);

{FILLRGN(C>0,＄90,＄60),ColorAA6;}
FILLRGN(C>0,强区,极强区*1.01),Color6D0076;
FILLRGN(C>0,牛熊,强区),Color666;
FILLRGN(C>0,弱区,牛熊),Color6D00AA;
FILLRGN(C>0,极弱区*0.99,弱区),Color4800;

STICKLINE(c>ref(c,1),CLOSE,o,8,0),colorAA;
STICKLINE(c>ref(c,1),CLOSE,o,6,0),colorBB;
STICKLINE(c>ref(c,1),CLOSE,o,5,0),colorCC;
STICKLINE(c>ref(c,1),CLOSE,o,4,0),colorDD;
STICKLINE(c>ref(c,1),CLOSE,o,3,0),colorEE;
STICKLINE(c>ref(c,1),CLOSE,o,2,0),colorFF;
STICKLINE(c>ref(c,1),CLOSE,o,1,0),colorFF;
STICKLINE(c>ref(c,1),CLOSE,o,0,0),colorFF;
STICKLINE(c>ref(c,1),LOW,HIGH,0.1,0),colorFF;

STICKLINE(c<ref(c,1),CLOSE,o,8,0),COLOR008800;
STICKLINE(c<ref(c,1),CLOSE,o,6,0),COLOR009900;
STICKLINE(c<ref(c,1),CLOSE,o,5,0),COLOR00AA00;
STICKLINE(c<ref(c,1),CLOSE,o,4,0),COLOR00BB00;
STICKLINE(c<ref(c,1),CLOSE,o,3,0),COLOR00CC00;
STICKLINE(c<ref(c,1),CLOSE,o,2,0),COLOR00DD00;
STICKLINE(c<ref(c,1),CLOSE,o,1,0),COLOR00EE00;
STICKLINE(c<ref(c,1),CLOSE,o,0,0),COLOR00FF00;
STICKLINE(c<ref(c,1),LOW,HIGH,0.1,0),colorFFFF00;

INPUT:N(2);//均线周数调节
INPUT:N1(5);//均线周数调节
INPUT:N2(13);//均线周数调节
x:=DATEDIFF(REF(DATE,1),DATE)<>WEEKDAY-REF(WEEKDAY,1);
z:=REFX(x,1);zq1:=SUMBARS(z,n-1); zq2:=SUMBARS(z,n);
周均线:IF(z,SUM(z*CLOSE,zq2)/n,(SUM(z*CLOSE,zq1)+CLOSE)/n),COLORYELLOW;

x1:=DATEDIFF(REF(DATE,1),DATE)<>WEEKDAY-REF(WEEKDAY,1);
z1:=REFX(x,1);zq1:=SUMBARS(z,n1-1); zq2:=SUMBARS(z,n1);
周均线1:IF(z,SUM(z*CLOSE,zq2)/n1,(SUM(z*CLOSE,zq1)+CLOSE)/n1),COLORRED;

x2:=DATEDIFF(REF(DATE,1),DATE)<>WEEKDAY-REF(WEEKDAY,1);
z2:=REFX(x,1);zq1:=SUMBARS(z,n2-1); zq2:=SUMBARS(z,n2);
周均线2:IF(z,SUM(z*CLOSE,zq2)/n2,(SUM(z*CLOSE,zq1)+CLOSE)/n2);
partline(周均线2>=ref(周均线2,1),周均线2),COLORMAGENTA,LINEDOT,LINETHICK2;
partline(周均线2<ref(周均线2,1),周均线2),COLORBLUE,LINEDOT,LINETHICK2;
LC:=REF(CLOSE,1);
止损价位:(LC*1.0035*97+0.2)/99.65,COLORWHITE,LINEDOT,LINETHICK1;
{KP:MA(C,5),COLORWHITE,LINEDOT;}
半年线:=EMA(CLOSE,120);
生命线:半年线-(EMA(CLOSE,3)-半年线),coloryellow,LINETHICK2;
RSV:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*200-100;
日K:SMA(RSV,7,1),COLORFFFF00,LINEDOT,LINETHICK0;
日D:=SMA(日K,3,1),COLORWHITE,LINEDOT,LINETHICK1;
J:=3*日K-2*日D,COLORWHITE,LINEDOT,LINETHICK0;
RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
DRAWTEXT(MA(H,1)*0.9 AND J<REF(J,1) AND CROSS(85,RSI),H*0.99,'卖'),COLORYELLOW,LINETHICK9;

DRAWGBK(CLOSE>0, COLORRGB(1,0,0), COLORRGB(1,0,0),2);

{主图加叠MACD}
input:LONG(26),SHORT(12),M(9);
DIFF : EMA(CLOSE,SHORT) - EMA(CLOSE,LONG),COLORRED,linethick0;
DEA  : EMA(DIFF,M),COLORMAGENTA,linethick0;
MACD : 2*(DIFF-DEA) ,linethick0;
A:=HHV(DIFF,600),linethick0;
B:=MACD-REF(MACD,1),linethick0;
k1:=SYSPARAM(3)-SYSPARAM(2)+1;
diff1:=hhv(diff,k1);dea1:=hhv(dea,k1);macd1:=hhv(macd,k1);
diff2:=llv(diff,k1);dea2:=llv(dea,k1);macd2:=llv(macd,k1);
mxa:=max(diff1[datacount],max(dea1[datacount],macd1[datacount]));
mna:=min(diff2[datacount],min(dea2[datacount],macd2[datacount]));
a2:=(mxa+mna)/2;
a3:=mxa-mna;
h1:=hhv(h,k1);l1:=llv(l,k1);
mxb:=h1[datacount];
mnb:=l1[datacount];
b2:=(mxb+mnb)/2;
b3:=mxb-mnb;
diffa:=(diff-a2)*(b3/a3)+b2;
deaa:=(dea-a2)*(b3/a3)+b2;
macda:=(macd-a2)*(b3/a3)+b2;
b4:=-a2*(b3/a3)+b2;
PARTLINE(not(DIFF <REF(DIFF ,1)),DIFFA ),COLORRED, linethick1;
PARTLINE(not(DEA  <REF(DEA  ,1)),DEAA ),colorwhote ,COLORMAGENTA, linethick1;
PARTLINE(DIFF <REF(DIFF ,1),DIFFA ),COLORGREEN, linethick1;
PARTLINE(DEA  <REF(DEA  ,1),DEAA ),colorwhote ,COLORCYAN, linethick1;
STICKLINE(MACD>0 AND B>0,b4,MACDA,2,1),COLORRED;
STICKLINE(MACD>0 AND B<0,b4,MACDA,2,1),COLORGREEN;
STICKLINE(MACD<0 AND B>0,b4,MACDA,2,1),COLORMAGENTA;
STICKLINE(MACD<0 AND B<0,b4,MACDA,2,1),COLORBLUE;

STICKLINE(c>ref(c,1),CLOSE,o,8,0),colorAA;
STICKLINE(c>ref(c,1),CLOSE,o,6,0),colorBB;
STICKLINE(c>ref(c,1),CLOSE,o,5,0),colorCC;
STICKLINE(c>ref(c,1),CLOSE,o,4,0),colorDD;
STICKLINE(c>ref(c,1),CLOSE,o,3,0),colorEE;
STICKLINE(c>ref(c,1),CLOSE,o,2,0),colorFF;
STICKLINE(c>ref(c,1),CLOSE,o,1,0),colorFF;
STICKLINE(c>ref(c,1),CLOSE,o,0,0),colorFF;
STICKLINE(c>ref(c,1),LOW,HIGH,0.1,0),colorFF;

STICKLINE(c<ref(c,1),CLOSE,o,8,0),COLOR008800;
STICKLINE(c<ref(c,1),CLOSE,o,6,0),COLOR009900;
STICKLINE(c<ref(c,1),CLOSE,o,5,0),COLOR00AA00;
STICKLINE(c<ref(c,1),CLOSE,o,4,0),COLOR00BB00;
STICKLINE(c<ref(c,1),CLOSE,o,3,0),COLOR00CC00;
STICKLINE(c<ref(c,1),CLOSE,o,2,0),COLOR00DD00;
STICKLINE(c<ref(c,1),CLOSE,o,1,0),COLOR00EE00;
STICKLINE(c<ref(c,1),CLOSE,o,0,0),COLOR00FF00;
STICKLINE(c<ref(c,1),LOW,HIGH,0.1,0),colorFFFF00;

//画背景图(收盘价>0 ,'指标背景'),ALIGN4;
{低位密集}
hhh:=最高值(最高价,288);
lll:=最低值(最低价,288);
zh:=hhh[序列数据量];
zl:=lll[序列数据量];
q:=(zh-zl)/5;
c90％:=(成本分布(95)-成本分布(5))/(成本分布(95)+成本分布(5))*100;
集中度:=条件函数(c90％<=18{集中度} and 收盘价<zh-4*q,100,0);
{庄家成本}
Zcb1:=累加到指定值周期数(成交量 ,流通盘大小*1);{累计换手=100%的周期}
Zcb2:=求和(成本分布(10),Zcb1)/Zcb1;{在A周期里获利10%的平均价}
Zcb3:=求和(成本分布(20),Zcb1)/Zcb1;{在A周期里获利20%的平均价}
Zcb4:=求和(成本分布(30),Zcb1)/Zcb1;{在A周期里获利30%的平均价}
Zcb5:=求和(成本分布(40),Zcb1)/Zcb1;{在A周期里获利40%的平均价}
Zcb6:=求和(成本分布(50),Zcb1)/Zcb1;{在A周期里获利50%的平均价}
庄本:(5*Zcb2+4*Zcb3+3*Zcb4+2*Zcb5+Zcb6)/15,PRECISION2,LINETHICK3,COLORGRAY;{求出庄家成本}
{低位密集}
画分段线(集中度>0,庄本),COLORCYAN,linethick3;//低密集:
{阶梯线}
x1:=(收盘价+最低价+最高价)/3;
x2:=指数平滑移动平均(x1,6);
x3:=指数平滑移动平均(x2,5);
画柱线(x2>=x3,x2,x3,10,1),Color00A6F6;//橙
画柱线(x2<x3,x2,x3,10,0),COLORBLUE;//蓝
{黄金分割}
n1:=系统参数(3);
nn:=n1-系统参数(2)+1;
hh:=最高值(最高价,nn);
ll:=最低值(最低价,nn);
最高:=hh[n1];
最低:=ll[n1];
低:=(最低+(最高-最低)*0.191);
画分段线(收盘价,低),点状线,ColorFF8900;
中:=最低+(最高-最低)*0.5;
画分段线(收盘价,中),点状线,COLORMAGENTA;
高:=最低+(最高-最低)*0.809;
画分段线(收盘价,高),点状线,COLORRED;
显示文字(数据位置=系统参数(2),低*0.99,'低: '+数字转化为字符串(低,2)),ColorFF8900;
显示文字(数据位置=系统参数(2),中*0.99,'中: '+数字转化为字符串(中,2)),COLORMAGENTA;
显示文字(数据位置=系统参数(2),高*0.99,'高: '+数字转化为字符串(高,2)),COLORRED;
{K线}
aa1:=加权移动平均(收盘价,2);
bb1:=指数平滑移动平均(aa1,2);
a0:=简单移动平均(bb1,3);
aa2:=加权移动平均((最高价+收盘价+开盘价)/3,18);
dd3:=a0>=aa2 and 收盘价>aa2;
dd4:=a0<aa2 ;
dd5:=a0>aa2 ;
cc1:=((收盘价-向前引用(简单移动平均(收盘价,6),1))/6+简单移动平均(收盘价,6))*1.004;
cc2:=交叉函数(收盘价,cc1) and cc1>向前引用(cc1,1);
画柱线((dd4 or dd5) and 开盘价<=收盘价 ,最高价,最低价,0.5,0),Color00cc99;//跌势阳线
画柱线((dd4 or dd5) and 开盘价<=收盘价 ,收盘价,开盘价,7,0),Color00cc99;//跌势阳线
画柱线((dd4 or dd5) and 开盘价>=收盘价 ,最高价,最低价,0.5,0),Color3F8C3A;//跌势阴线
画柱线((dd4 or dd5) and 开盘价>=收盘价 ,收盘价,开盘价,7,0),Color3F8C3A;//跌势阴线
画柱线((dd3 or 收盘价>aa2) and 开盘价<=收盘价,收盘价,开盘价,7,0),Colorred;//涨势阳线
画柱线((dd3 or 收盘价>aa2) and 开盘价<=收盘价,最高价,最低价,0.5,0),Colorred;//涨势阳线
画柱线((dd3 or 收盘价>aa2) and 开盘价>=收盘价,收盘价,开盘价,7,0),Colorff33ff;//涨势阴线
画柱线((dd3 or 收盘价>aa2) and 开盘价>=收盘价,最高价,最低价,0.5,0),Colorff33ff;//涨势阴线
画柱线(cc2,最高价,最低价,0.5,0),colorwhite;//白
画柱线(cc2,开盘价,收盘价,7,0),colorwhite;//白
画柱线(简单移动平均(收盘价,13)>开盘价 and 收盘价>简单移动平均(收盘价,13) and 开盘价<收盘价,开盘价,收盘价,8,0),coloryellow;//黄
画柱线(简单移动平均(收盘价,13)>开盘价 and 收盘价>简单移动平均(收盘价,13),最高价,最低价,0.5,0),coloryellow;//黄
{均线}
工作线:指数平滑移动平均(收盘价,17),PRECISION2,COLORWHITE;
二号线:指数平滑移动平均(收盘价,25),COLORGREEN;

年线:指数平滑移动平均(收盘价,240),PRECISION2,COLORred;
乖离:(收盘价-工作线)/工作线*100,LINETHICK,PRECISION2,COLORCYAN;//要小于20%—15%

VAR1aa:=((2)*(CLOSE)+OPEN+HIGH+LOW)/(5);
VAR2aa:=VOL;
上升价格线: (SUM((VAR1aa)*(VAR2aa),8))/(SUM(VAR2aa,8)),Color0000FF;
下降价格线:LLV(上升价格线,8),Coloryellow;