高抛低吸通道主图及选股（源码）

高抛低吸通道

VAR1:=(C+H+O+L)/4;
卖出:=XMA(VAR1,20)*(1+80/1000);
买入:=XMA(VAR1,32)*(1-100/1000);
大盘卖出:=XMA(VAR1,20)*(1+55/1000);
大盘买入:=XMA(VAR1,32)*(1-80/1000);
{=================================================}
DRAWKLINE(H,O,L,C);
STICKLINE(C>=O,C,O,3,0),COLOR0000AA;
STICKLINE(C>=O,C,O,2.5,0),COLOR0000BB ;
STICKLINE(C>=O,C,O,1.5,0),COLOR0000CC ;
STICKLINE(C>=O,C,O,1,0),COLOR0000EE;
STICKLINE(C>=O,H,L,0,0),COLOR0000FF;
STICKLINE(C<=O,C,O,3,0),COLOR7B7B00;
STICKLINE(C<=O,C,O,2.5,0),COLOR909000;
STICKLINE(C<=O,C,O,1.5,0),COLORA8A800;
STICKLINE(C<=O,C,O,1,0),COLORCECE00;
STICKLINE(C<=O,H,L,0,0),COLORFFFF00;

高抛线:卖出,COLORGREEN,LINETHICK2;
低吸线:买入,COLORMAGENTA,LINETHICK2;
标准A:低吸线+(高抛线-低吸线)*2/3,POINTDOT,COLORWHITE,LINETHICK4;
标准B:低吸线+(高抛线-低吸线)*1/3,POINTDOT,COLORWHITE,LINETHICK4;
极度安全区:IF(L<低吸线,1,DRAWNULL),NODRAW;
安全区:IF(BETWEEN(H,低吸线,标准B),1,DRAWNULL),NODRAW;
稳定区:IF(BETWEEN(H,标准A,标准B),1,DRAWNULL),NODRAW;
危险区:IF(BETWEEN(H,标准A,高抛线),1,DRAWNULL),NODRAW;
高危险区:IF(H>高抛线,1,DRAWNULL),NODRAW;
IF(CLOSE=INDEXC,大盘卖出,卖出*1.01),COLORCYAN,LINETHICK2;
IF(CLOSE=INDEXC,大盘买入,买入*0.99),COLORRED,LINETHICK2;
EMA13:=EMA(C,13),COLORWHITE;
EMA21:=EMA(C,21),COLORYELLOW;
EMA34:=EMA(C,34),COLORFF00FF;
EMA60:=MA(C,60),COLORFFCC66;
VAR2:=(2*CLOSE+HIGH+LOW)/4;
VAR3:=IF(YEAR>=2099 AND MONTH>2,0,1);
VAR4:=LLV(LOW,5); VAR5:=HHV(HIGH,4);
散户:=EMA((VAR2-VAR4)/(VAR5-VAR4)*100,4)*VAR3;
庄家:=EMA(0.667*REF(散户,1)+0.333*散户,2)*VAR3;
DRAWTEXT(CROSS(散户,庄家) AND 散户<30,L-0.05,'←低吸'),COLORLIRED;
DRAWTEXT(CROSS(庄家,散户) AND 散户>70,H+0.05,'←高抛?');
N:=IF(BARSCOUNT(C)>=8,8,BARSCOUNT(C));
AMOV:=VOL*(C+L+H)/3;
MN:=SUM(AMOV,N)/SUM(VOL,N);
短线强:IF(C>=MN,MN,DRAWNULL),LINETHICK3,COLORYELLOW;
短线空仓:IF(C<MN,MN,DRAWNULL),LINETHICK3,COLORGRAY;

TIAOJIAN:=C=LLV(C,8) AND (C-HHV(C,15))/HHV(C,15)<0.10;
X1:=BACKSET(CROSS(0.5,TIAOJIAN),2);
D:=BACKSET(CROSS(X1,0.5) OR (REF(TIAOJIAN,2)=1 AND REF(TIAOJIAN,1)=0 AND TIAOJIAN=1),1);
DAYS:=BARSLAST(D);