N:=120;
CURRBARSCOUNT:=DATACOUNT-BARPOS+1;
K:=BARSLAST(CURRBARSCOUNT=N);
GD:=REFX1(IF(ISLASTBAR=1,HHV(H,K),0),10000);
DD:=REFX1(IF(ISLASTBAR=1,LLV(L,K),0),10000);
KJ:=GD-DD;
{高低点差值=分区高度}
GD4:=IF(CURRBARSCOUNT<=N/2,GD,NULL);
高区:IF(CURRBARSCOUNT<=N,GD,NULL),COLORGREEN,LINETHICK2;
低区:IF(CURRBARSCOUNT<=N,DD,NULL),COLORRED,LINETHICK2;
平衡:=IF(CURRBARSCOUNT<=N,DD+KJ/2,NULL),COLOR00FFFF,NODRAW;
低:IF(CURRBARSCOUNT<=N/2,DD,NULL),COLORFFFF00;
高:IF(CURRBARSCOUNT<=N/2,GD,NULL),COLOR00FFFF;
支撑:IF(CURRBARSCOUNT<=N/2,DD+KJ*0.191,NULL),COLORRED,LINETHICK3;
LINETHICK3;
强势: IF(CURRBARSCOUNT<=N/2,DD+KJ*0.382,NULL);
突破:IF(CURRBARSCOUNT<=N/2,DD+KJ/2,NULL);
警示:IF(CURRBARSCOUNT<=N/2,DD+KJ*0.618,NULL);
压力:IF(CURRBARSCOUNT<=N/2,DD+KJ*0.809,NULL),COLORGREEN,LINETHICK3;
低涨:IF(CURRBARSCOUNT<=N/2,(C/LLV(LOW,K)-1)*100,NULL),COLOR0000FF,NODRAW;
天数:BARSLAST(L=DD),COLORCYAN,NODRAW;
TYP:=(CLOSE+HIGH+LOW)/3;//求最新价,最高价和最低价三者的简单平均
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));//TYP与TYP的N周期平均值做差,该差值与TYP在N个周期内的0.015倍的平均绝对偏差值做比值
STICKLINE1(CURRBARSCOUNT=N,GD,DD,0,0),COLORGREEN;
STICKLINE1(CURRBARSCOUNT=N/2,GD,DD,0,0),COLOR408080;
STICKLINE1(CURRBARSCOUNT=1,GD,DD,0,0),COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=N/4+5,GD-KJ*0.09,'高抛'),COLORCYAN,LINETHICK2;
DRAWTEXT(CURRBARSCOUNT=N/4+5,DD+KJ/10,'大胆买入'),COLORRED,LINETHICK2;
DRAWTEXT(CURRBARSCOUNT=N/2+40,GD-KJ*0.25,'【拉升区】'),COLORRED;
DRAWTEXT(CURRBARSCOUNT=N/2+40,DD+KJ*0.25,'【持股区】'),COLORYELLOW;
DRAWKLINE1(H,O,L,C);
AHC1:=CLOSE*VOL;
AHC22:=EMA((EMA(AHC1,27)/EMA(VOL,27)+EMA(AHC1,54)/EMA(VOL,54)+EMA(AHC1,108)/EMA(VOL,108)+EMA(AHC1,316)/EMA(VOL,316))/4,34);
上轨:=1.06*AHC22,COLOR40FF00,LINETHICK1;
下轨:=AHC22*0.94;
ZT:=REF(C,1)*1.1-C<0.01 AND H=C;
启爆:=CROSS(C,上轨) OR CROSS(C,下轨) AND ZT;
DRAWTEXT(启爆,L,'');
STICKLINE1(启爆,C,O,3,1);
STICKLINE1(启爆,C,O,1,0);
NQ:=35;
HHX:=H>HV(H,NQ);
NH:=BARSLAST(HHX)+1;
LLX:=L<LV(L,NQ);
NL:=BARSLAST(LLX)+1;
AH:BACKSET(COUNT(LLX,NH)&&(LLX||ISLASTBAR)&&EXIST(HHX,SUMBARS(LLX||ISLASTBAR,2)),HHVBARS(IF(HHX,H,0),SUMBARS(LLX||ISLASTBAR,2))+1),NODRAW;
AL:BACKSET(COUNT(HHX,NL)&&(HHX||ISLASTBAR)&&EXIST(LLX,SUMBARS(HHX||ISLASTBAR,2)),LLVBARS(IF(LLX,L,999999),SUMBARS(HHX||ISLASTBAR,2))+1);
GX:=CROSS(AH=1,0.5),ICON(1,'ICO1');
DX:=CROSS(AL=1,0.5),ICON(1,'ICO2');
HXX:=CROSS(BACKSET(ISLASTBAR&&EXIST(HHX,BARSLAST(DX)),BARSLAST(HHX)+1)=1,0.4);
LXX:=CROSS(BACKSET(ISLASTBAR&&EXIST(LLX,BARSLAST(GX)),BARSLAST(LLX)+1)=1,0.4);
TT:=BACKSET(ISLASTBAR,2760);
DRAWLINE1((CROSS(AH=1,0.5)||AH=1&&REF(COUNT(LLX,NH)&&LLX&&EXIST(HHX,SUMBARS(LLX,2)),1))&&TT,H,LXX||(CROSS(AL=1,0.5)||AL=1&&REF(COUNT(HHX,NL)&&HHX&&EXIST(LLX,SUMBARS(HHX,2)),1))&&TT,L,0),COLORGREEN,LINETHICK3;
DRAWLINE1((CROSS(AL=1,0.5)||AL=1&&REF(COUNT(HHX,NL)&&HHX&&EXIST(LLX,SUMBARS(HHX,2)),1))&&TT,L,HXX||(CROSS(AH=1,0.5)||AH=1&&REF(COUNT(LLX,NH)&&LLX&&EXIST(HHX,SUMBARS(LLX,2)),1))&&TT,H,0),COLORRED,LINETHICK3;
HT:=(CROSS(AH=1,0.5)||AH=1&&REF(COUNT(LLX,NH)&&LLX&&EXIST(HHX,SUMBARS(LLX,2)),1))&&TT;
LT:=(CROSS(AL=1,0.5)||AL=1&&REF(COUNT(HHX,NL)&&HHX&&EXIST(LLX,SUMBARS(HHX,2)),1))&&TT;
//DRAWLINE1(CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(AH=1,0.5)&&TT,2)),0.5),H,CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(AH=1,0.5)&&TT,1)),0.5),H,1),DOT,COLORRED;
//DRAWLINE1(CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(AL=1,0.5)&&TT,2)),0.5),L,CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(AL=1,0.5)&&TT,1)),0.5),L,1),DOT,COLORGREEN;
HH2:=H>=HV(H,N+1);
NH2:=BARSLAST(HH2)+1;
LL2:=L<=LV(L,N+1);
NL2:=BARSLAST(LL2)+1;
AH2:BACKSET(COUNT(LL2,NH2)&&LL2&&EXIST(HH2,SUMBARS(LL2,2)),HHVBARS(IF(HH2,H,0),SUMBARS(LL2,2))+1),NODRAW;
AL2:=BACKSET(COUNT(HH2,NL2)&&HH2&&EXIST(LL2,SUMBARS(HH2,2)),LLVBARS(IF(LL2,L,999999),SUMBARS(HH2,2))+1);
DRAWLINE3(BARSLAST(CROSS(AL2=1,0.5))<BARSLAST(CROSS(AH=1,0.5))&&ISLASTBAR,HHV(IF(HHX,H,0),BARSLAST(CROSS(AL=1,0.5))+1),HHVBARS(IF(HHX,H,0),BARSLAST(CROSS(AL=1,0.5))+1),
1,REF(L,BARSLAST(CROSS(AL=1,0.5))),BARSLAST(CROSS(AL=1,0.5)),0),DOT,COLORMAGENTA;
DRAWLINE3(BARSLAST(CROSS(AL2=1,0.5))>BARSLAST(CROSS(AH=1,0.5))&&ISLASTBAR,LLV(IF(LLX,L,999999),BARSLAST(CROSS(AH=1,0.5))+1),LLVBARS(IF(LLX,L,999999),BARSLAST(CROSS(AH=1,0.5))+1),
1,REF(H,BARSLAST(CROSS(AH=1,0.5))),BARSLAST(CROSS(AH=1,0.5)),0),DOT,COLORGRAY;
Y1:=HXX||(CROSS(AH=1,0.5)||AH=1&&REF(COUNT(LLX,NH)&&LLX&&EXIST(HHX,SUMBARS(LLX,2)),1))&&TT;//高
Y2:=LXX||(CROSS(AL=1,0.5)||AL=1&&REF(COUNT(HHX,NL)&&HHX&&EXIST(LLX,SUMBARS(HHX,2)),1))&&TT;//低
XL:=L<=LV(L,2)&&L<=REFX(LLV(L,2),2);
XH:=H>=HV(H,2)&&H>=REFX(HHV(H,2),2);
Y:=BACKSET(ISLASTBAR,SUMBARS(Y1||Y2,2));
LLA:=IF(XL,L,0);
HHA:=IF(XH,H,1000000);
K1:=REFX(Y1&&Y,1);
YL:=BARSLAST(Y2);
YH:=BARSLAST(Y1);
DRAWLINE3(K1,REF(L,YL),YL,1,REF(L,REFX(NEWLBARS1(L,INTPART(H/2+L/2),1),1)-1),REFX(NEWLBARS1(L,INTPART(H/2+L/2),1),1)-1,1);
K2:=REFX(Y2&&Y,1);
DRAWLINE3(K2,REF(H,YH),YH,1,REF(H,REFX(NEWHBARS1(H,INTPART(H/2+L/2),1),1)-1),REFX(NEWHBARS1(H,INTPART(H/2+L/2),1),1)-1,1);