P1:=3;

短线多头:EMA(CLOSE,5),COLORFF00FF;

xxx1:=(O+C+L+H)/4;

短线空头:EMA(xxx1,10);

ma20:ma(close,20),COLORblue;

ma30:ma(close,30),COLORgreen;

ma60:ma(close,60);

VAR2:=(HIGH+LOW+CLOSE*2)/4;

VAR3:=EMA(VAR2,21);

VAR4:=STD(VAR2,21);

VAR5:=((VAR2-VAR3)/VAR4*100+200)/4;

VAR6:=(EMA(VAR5,5)-25)*1.56;

AK:=EMA(VAR6,2)*1.22;

AD:=EMA(AK,2);

AJ:=3*AK-2*AD;

STICKLINE(CROSS(AK,AD),LOW,LOW-0.09,8,0),COLORRED;{短线买};

VAR1111:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3);

VAR2222:=CROSS(VAR1111,0.9);

压力: REF(HIGH,BARSLAST(Var2222)), POINTDOT,ColorEA91B5;

STICKLINE(CLOSE,REF(HIGH,BARSLAST(Var2222)),REF(HIGH,BARSLAST(Var2222)),5,0),ColorEA91B5;

N:=13;

A:=HHV(HIGH,N)=HIGH AND HIGH>REF(HIGH,1);A1:=FILTER(A,N-1);

B:=LLV(LOW,N)=LOW AND LOW<REF(LOW,1);B1:=FILTER(B,N-1);

TS1:=BARSLAST(A1);

箱顶:=REF(HIGH,TS1);  

STICKLINE(1,箱顶,箱顶,7,0),COLORred;

TS11:=BARSLAST(B1);

箱底:=REF(LOW,TS11);

DRAWICON(CROSS(CLOSE,箱顶),HIGH*1.01,4);

DRAWICON(CROSS(箱底,CLOSE),LOW*0.99,5);

wN:=p1;{原码 N:=3;}

wA1:=REF(H,wN)=HHV(H,2*wN+1); wB1:=FILTER(wA1,wN); wC1:=BACKSET(wB1,wN+1); wD1:=FILTER(wC1,wN);{高点}

wA2:=REF(L,wN)=LLV(L,2*wN+1); wB2:=FILTER(wA2,wN); wC2:=BACKSET(wB2,wN+1); wD2:=FILTER(wC2,wN);{低点}

wE1:=(REF(LLV(L,2*wN),1)+REF(HHV(H,2*wN),1))/2; wE2:=(H+L)/2;{高低点出现在同一K线上时可作取舍}

wH1:=(wD1 AND NOT(wD2 AND wE1>=wE2)) OR DISPSTATUS=2 OR BARSCOUNT(C)=1;

wL1:=(wD2 AND NOT(wD1 AND wE1<wE2));  wH2:=wD1 AND NOT(wD2 AND wE1>=wE2);

wX1:=REF(BARSLAST(wH1),1)+1; wF1:=BACKSET(wH1 AND COUNT(wL1,wX1)>0,LLVBARS(IF(wL1,L,10000),wX1));

wG1:=wF1>REF(wF1,1); wI1:=BACKSET(wG1,2); wLD:=wI1>REF(wI1,1);{过滤后低点}

wL2:=wLD OR DISPSTATUS=2 OR BARSCOUNT(C)=1;

wX2:=REF(BARSLAST(wL2),1)+1; wF2:=BACKSET(wL2 AND COUNT(wH2,wX2)>0,HHVBARS(IF(wH2,H,0),wX2));

wG2:=wF2>REF(wF2,1); wI2:=BACKSET(wG2,2); wHD:=wI2>REF(wI2,1);{过滤后高点}

wR1:=BACKSET(DISPSTATUS=2,BARSLAST(wHD)+1); wS1:=wR1>REF(wR1,1); {前一高}

wT1:=BACKSET(DISPSTATUS=2,BARSLAST(wLD)+1); wU1:=wT1>REF(wT1,1); {前一低}

wR2:=BACKSET(wS1,REF(BARSLAST(wHD),1)+2); wS2:=wR2>REF(wR2,1); {前二高}

wT2:=BACKSET(wU1,REF(BARSLAST(wLD),1)+2); wU2:=wT2>REF(wT2,1); {前二低}

wT3:=BACKSET(wU2,REF(BARSLAST(wLD),1)+2); wU3:=wT3>REF(wT3,1); {前三低}

wT4:=BACKSET(wU3,REF(BARSLAST(wLD),1)+2); wU4:=wT4>REF(wT4,1); {前四低}

wR3:=BACKSET(wS2,REF(BARSLAST(wHD),1)+2); wS3:=wR3>REF(wR3,1); {前三高}

wR4:=BACKSET(wS3,REF(BARSLAST(wHD),1)+2); wS4:=wR4>REF(wR4,1); {前四高}

DRAWLINE(wS2,H,wS1,H,1),Color008888; {★压力１:}         

DRAWLINE(wU2,L,wU1,L,1),POINTDOT,Color008888;{★支撑１:}

DRAWLINE(wS3,H,wS2,H,1),Color888000; {★压力２:}

DRAWLINE(wU3,L,wU2,L,1),POINTDOT,Color888000;{★支撑２:}         

DRAWLINE(wS4,H,wS3,H,1),Color0000CC;{★压力３:}

DRAWLINE(wU4,L,wU3,L,1),POINTDOT,Color0000CC;{★支撑３:};

lta:=FINANCE2(37);{流通A}

sy:=FINANCE2(3);{收益}

wf:=FINANCE2(10);{净利润增长}

cw:= '流通A:'+lta+' 收益:'+sy+' 净利润增长:'+wf ;

DRAWTEXTREL(20,900,BKNAME),COLOR0055FF;

DRAWTEXTREL(20,960,cw),COLOR0055FF;

Var52:=IF(MONTH<12,1,1);

Var53:=(2*CLOSE+HIGH+LOW)/4;

Var54:=LLV(LOW,34);

Var55:=HHV(HIGH,34);

主力:=EMA((Var53-Var54)/(Var55-Var54)*100,13)*Var52;

散户:=EMA(0.667*REF(主力,1)+0.333*主力,2);

小心被套:=if(CROSS(主力,75) AND 散户<主力,75,62);

冲顶:=if(CROSS(主力,65) AND 散户<主力,61,49);

DRAWTEXT(CROSS(主力,65) AND 散户<主力,(high*1.01),'○冲顶 '),LINETHICK2,COLOR9933ff;

DRAWTEXT(CROSS(主力,75) AND 散户<主力,(high*1.01),'●小心被套'),LINETHICK2,color009900;

LC:=REF(CLOSE,1);

JH:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;

DRAWTEXT(CROSS(84,JH),HIGH*1.02,'☆小心'),colorFFFF34;