N:=5;
P1:=32;
P2:=100;
P3:=20;
P4:=80;
K:=0;
K2:=30;
K3:=90;
AAK:=REF(H,N)=HHV(H,2*N+1);
HAN:=DATE<1301230;
QY:=BacKSET(AAK,N+1);
CC:=FILTER(QY,N) AND H=HHV(H,N+1);
DDD:=BArslAst(CC),NODRAW;
GDTS:=IF(CC,CURRBARSCOUNT,0),NODRAW;
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS),NODRAW;
GDCS1:=CONST(DINGBUTS),NODRAW;
GDCS13:=CONST(REF(HIGH,GDCS1-1));
DINGBUTS1:=REF(DINGBUTS,DDD+1),NODRAW;
GDCS2:=CONST(DINGBUTS1);
GDCS23:=CONST(REF(HIGH,DINGBUTS1-1));
XG1:=BACKSET(ISLASTBAR,GDCS1);
XG2:=BACKSET(ISLASTBAR,DINGBUTS1);
高点压力:=DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1)*HAN ,COLORBLUE,LINETHICK1;
AA1:=REF(L,N)=LLV(L,2*N+1);
QY1:=BACKSET(AA1,N+1);
CC1:=FILTER(QY1,N) AND L=LLV(L,N+1);
DD1:=BARSLAST(CC1);
DDTS:=IF(CC1,CURRBARSCOUNT,0);
DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);
DDCS1:=CONST(DDTS1);
DDCS13:=CONST(REF(L,DDCS1-1));
DDTS2:=REF(DDTS1,DD1+1);
DDCS2:=CONST(DDTS2);
DDCS23:=CONST(REF(L,DDTS2-1));
XD1:=BACKSET(ISLASTBAR,DDCS1);
XD2:=BACKSET(ISLASTBAR,DDTS2);
低点支撑:=DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1)*HAN,COLORBLUE,LINETHICK1;
DRAWBAND(高点压力,RGB(00,00,100),低点支撑,RGB(00,00,00));
M:=INTPART(3*N/5);
AAA:=REF(H,M)=HHV(H,2*M+1);
QYY:=BACKSET(AAA,M+1);
CCC:=FILTER(QYY,M) AND H=HHV(H,M+1);
DDDD:=BARSLAST(CCC),NODRAW;
GDTSS:=IF(CCC,CURRBARSCOUNT,0),NODRAW;
DINGBUTSS:=IF(DDDD,REF(GDTSS,DDDD),GDTSS),NODRAW;
GDCS11:=CONST(DINGBUTSS),NODRAW;
DINGBUTS11:=REF(DINGBUTSS,DDDD+1),NODRAW;
GDCS22:=CONST(DINGBUTS11);
压力:DRAWLINE(CURRBARSCOUNT=GDCS22,H,CURRBARSCOUNT=GDCS11,H,1)*HAN,COLORRED,LINETHICK1;
AA11:=REF(L,M)=LLV(L,2*M+1);
QY11:=BACKSET(AA11,M+1);
CC11:=FILTER(QY11,M) AND L=LLV(L,M+1);
DD11:=BARSLAST(CC11);
DDTSS:=IF(CC11,CURRBARSCOUNT,0);
DDTS11:=IF(DD11,REF(DDTSS,DD11),DDTSS);
DDCS11:=CONST(DDTS11);
DDTS22:=REF(DDTS11,DD11+1);
DDCS22:=CONST(DDTS22);
支撑:DRAWLINE(CURRBARSCOUNT=DDCS22,L,CURRBARSCOUNT=DDCS11,L,1) COLORRED,LINETHICK1;
STICKLINE(XG2,GDCS23,GDCS23,0.5,1)*HAN,COLORWHITE,LINETHICK3;
STICKLINE(XG1,GDCS13,GDCS13,0.5,1)*HAN,COLORYELLOW,LINETHICK3;
STICKLINE(XD2,DDCS23,DDCS23,0.5,1)*HAN,COLORmaGENTA,LINETHICK3;
STICKLINE(XD1,DDCS13,DDCS13,0.5,1)*HAN,COLORCYAN,LINETHICK3;
DRAWKLINE(H,O,L,C);
刀:EMA(CLOSE,5)*HAN,LINETHICK1,COLORYELLOW;
多:IF(刀>REF(刀,1),刀,DRAWNULL)*HAN,COLORRED,LINETHICK1;
空:IF(刀 A0:=(L+H+C*2)/4;
A1:=EMA(A0,14)COLORBLUE,LINETHICK2;
A1X:=(A1-REF(A1,1))/REF(A1,1)*100,NODRAW;
看多:IF(A1X>=0 AND BARSLAST(crOSS(A1X,0))>0,REF((C+O)/2,BARSLAST(CROSS(A1X,0)))*HAN,DRAWNULL)
*HAN,POINTDOT,COLORMAGENTA;
看空:IF(A1X<0 AND BARSLAST(CROSS(0,A1X))>0,REF((C+O)/2,BARSLAST(CROSS(0,A1X)))*HAN,DRAWNULL)
*HAN,POINTDOT,COLORLIBLUE;
VARPP1:=(C+H+O+L)/4;
看空1:=EMA(CLOSE,15);
【暴涨】:EMA(看空1,5)*0.9,COLORYELLOW,LINETHICK3;
【牛股】:IF(【暴涨】>REF(【暴涨】,1),【暴涨】,DRAWNULL)*HAN,COLORRED,LINETHICK2;
抛:xma(VARPP1,P3)*(1+P4/1000)*HAN,POINTDOT,LINETHICK2;
C3:=REF(C,1);
涨大于5:=IF((C-C3)/C3>0.04,1,0);
跌大于5:=IF((C3-C)/C3>=0.04,3,0);
涨停:=IF((C-C3)*100/C3>=(10-0.01*100/C3),1,0);
跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0);
{红}
STICKLINE(涨大于5,CLOSE,OPEN,3.2,0)*HAN,COLOR000555;
STICKLINE(涨大于5,CLOSE,OPEN,2.4,0)*HAN,COLOR000777;
STICKLINE(涨大于5,CLOSE,OPEN,1.7,0)*HAN,COLOR000999;
STICKLINE(涨大于5,CLOSE,OPEN,0.9,0)*HAN,COLOR000BBB;
STICKLINE(涨大于5,CLOSE,OPEN,0.3,0)*HAN,COLOR000DDD;
{绿}
STICKLINE(跌大于5,CLOSE,OPEN,3.2,0)*HAN,COLOR005500;
STICKLINE(跌大于5,CLOSE,OPEN,2.7,0)*HAN,COLOR007700;
STICKLINE(跌大于5,CLOSE,OPEN,2.1,0)*HAN,COLOR009900;
STICKLINE(跌大于5,CLOSE,OPEN,1.5,0)*HAN,COLOR00BB00;
STICKLINE(跌大于5,CLOSE,OPEN,0.9,0)*HAN,COLOR00DD00;
STICKLINE(跌大于5,CLOSE,OPEN,0.3,0)*HAN,COLOR00FF00;
{蓝}
STICKLINE(跌停,CLOSE,OPEN,3.2,0)*HAN,COLORFF3300;
STICKLINE(跌停,CLOSE,OPEN,2.7,0)*HAN,COLORFF5500;
STICKLINE(跌停,CLOSE,OPEN,2.1,0)*HAN,COLORFF