n:=120;
KT:=BARSLAST(CURRBARSCOUNT=N);
GD:=CONST(IF(ISLASTBAR=1,HHV(H,KT),0));{高点}
DD:=CONST(IF(ISLASTBAR=1,LLV(L,KT),0));{低点}
KJ:=GD-DD;{高低点差值=分区高度}
GD4:IF(CURRBARSCOUNT<=N/30,GD,DRAWNULL);
低:IF(CURRBARSCOUNT<=N/30,DD,DRAWNULL),COLORFFFF00;
高:IF(CURRBARSCOUNT<=N/30,GD,DRAWNULL),COLOR00FFFF;
支撑:IF(CURRBARSCOUNT<=N/30,DD+KJ*0.191,DRAWNULL),COLOR00FFFF;
强势: IF(CURRBARSCOUNT<=N/30,DD+KJ*0.382,DRAWNULL),COLORFF00FF;
突破:IF(CURRBARSCOUNT<=N/30,DD+KJ/2,DRAWNULL),COLOR0000FF;
警示:IF(CURRBARSCOUNT<=N/30,DD+KJ*0.618,DRAWNULL),COLOR00FFFF;
压力:IF(CURRBARSCOUNT<=N/30,DD+KJ*0.809,DRAWNULL),COLOR00FF00;
低涨:IF(CURRBARSCOUNT<=N/30,(C/LLV(LOW,KT)-1)*100,DRAWNULL),COLOR0000FF,NODRAW;
天数:BARSLAST(L=DD),COLORCYAN,NODRAW;
DRAWBAND(高,RGB(200,200,0),压力,RGB(0,0,0));
DRAWBAND(压力,RGB(0,190,0),警示,RGB(0,0,0));
DRAWBAND(警示,RGB(220,120,0),突破,RGB(0,0,0));
DRAWBAND(突破,RGB(120,0,120),强势,RGB(0,0,0));
DRAWBAND(强势,RGB(120, 0,0),支撑,RGB(0,0,0));
DRAWBAND(支撑,RGB(80,80,80),低,RGB(0,0,0));
STICKLINE(CURRBARSCOUNT=N/30,GD,DD,0,0),COLORGREEN;
STICKLINE(CURRBARSCOUNT=1,GD,DD,0,0),COLORGREEN;
STICKLINE(CURRBARSCOUNT<=N/30,支撑,支撑,4,0),COLORFF00FF;
STICKLINE(CURRBARSCOUNT<=N/30,强势,强势,4,0),COLORFF00FF;
STICKLINE(CURRBARSCOUNT<=N/30,突破,突破,4,0),COLORABABAB;
STICKLINE(CURRBARSCOUNT<=N/30,警示,警示,4,0),COLOR00FFFF;
STICKLINE(CURRBARSCOUNT<=N/30,压力,压力,4,0),COLOR00FFFF;
DRAWTEXT(ISLASTBAR,高,'● 0.809高位');
DRAWTEXT(ISLASTBAR,压力,'● 0.681压力');
DRAWTEXT(ISLASTBAR,警示,'● 0.5警示');
DRAWTEXT(ISLASTBAR,强势,'● 0.382强势');
DRAWTEXT(ISLASTBAR,支撑,'● 0.191支撑');
DRAWTEXT(ISLASTBAR,低,'● 0.00低位');
M7:MA(C,7),LINETHICK2,COLORYELLOW;
HHJSJDA:=(3*CLOSE+OPEN+LOW+HIGH)/6;
黄线上牛股起:=(20*HHJSJDA+19*REF(HHJSJDA,1)+18*REF(HHJSJDA,2)+17*REF(HHJSJDA,3)+16*REF(HHJSJDA,4)+15*REF(HHJSJDA,5)+14*REF(HHJSJDA,6)
+13*REF(HHJSJDA,7)+12*REF(HHJSJDA,8)+11*REF(HHJSJDA,9)+10*REF(HHJSJDA,10)+9*REF(HHJSJDA,11)+8*REF(HHJSJDA,12)
+7*REF(HHJSJDA,13)+6*REF(HHJSJDA,14)+5*REF(HHJSJDA,15)+4*REF(HHJSJDA,16)+3*REF(HHJSJDA,17)+2*REF(HHJSJDA,18)+
REF(HHJSJDA,20))/210,LINETHICK2,COLORYELLOW;
红线上熊出没:=MA(黄线上牛股起,6),COLORRED,LINETHICK2;
DRAWBAND(M7,RGB(150,10,10),黄线上牛股起,RGB(0,120,0));
STICKLINE(C>O,O,C,3,1)COLORRED;
STICKLINE(O>C,O,C,3,0)COLORCYAN;
STICKLINE(C>O,H,L,0,0)COLORRED;
STICKLINE(O>C,H,L,0,0)COLORCYAN;
HH:=100*V/CAPITAL;
VAR1A:=REF(C,1);
VAR4:=(VAR1A-L)/(H-L);
VAR5:=V*VAR4;
VAR6:=ABS(VAR5);
HSL:=VOL/CAPITAL*100;
PT := REF(HIGH,1)-REF(LOW,1);
重心:=(HIGH + LOW + CLOSE)/3;
压力Ⅰ:= 2*重心-LOW;
压力Ⅱ:= 重心 + PT;
支撑Ⅰ:= 2.002*重心-HIGH;
支撑Ⅱ:= 重心 - PT;
DRAWTEXT_FIX(1,0.00,0.0,0,'【换手率解盘】'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND HH<2 AND HH>0,0,0.05,0, '★绝对地量：成交低靡,1%—2%'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND HH>=2 AND HH<3,0,0.05,0, '★成交温和：2%—3%'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND HH>=3 AND HH<5,0,0.05,0, '★成交活跃：3%—5%'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND HH>=5 AND HH<8,0,0.05,0, '★带量：5%—8%'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND HSL<=2,0.3,0.05,0, '★该股票少人关注，属于冷门股。'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND HSL>2 AND HSL<3,0.3,0.05,0, '★该股票成交温和，属于备份股。'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND HSL>3 AND HSL<5,0.3,0.05,0, '★该股票的交投越来越活跃，人们购买该股票的意愿高，属于热门股。'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND HSL>5 AND HSL<8,0.3,0.05,0, '★该股票带量！'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND HSL>8 AND HSL<15,0.3,0.05,0, '★该股票放量！'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND HSL>15 AND HSL<25,0.3,0.05,0, '★该股票巨量！'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND HSL>=25,0.3,0.05,0, '★该股票成交怪异！'),COLORYELLOW;
DRAWTEXT_FIX(1,0.00,0.10,0,'【压力/支撑解盘】'),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.01,0.15,0, '第一压力位:'),COLORYELLOW;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.10,0.15,0,压力Ⅰ),COLORRED;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.15,0.15,0,' 元'),COLORFFCC99;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.01,0.20,0, '第一支撑位:'),COLORYELLOW;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.10,0.20,0,支撑Ⅰ),COLORRED;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.15,0.20,0,' 元'),COLORFFCC99;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.21,0.15,0, '第二压力位:'),COLORYELLOW;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.30,0.15,0,压力Ⅱ),COLORRED;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.35,0.15,0,' 元'),COLORFFCC99;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.21,0.20,0, '第二支撑位:'),COLORYELLOW;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.30,0.20,0,支撑Ⅱ),COLORRED;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.35,0.20,0,' 元'),COLORFFCC99;
趋势线:=MA(CLOSE,55),COLORYELLOW,NODRAW;
BBB:=趋势线+2*STD(CLOSE,120),COLORLIBLUE;
CCC:=趋势线-2*STD(CLOSE,60),COLORRED;
VAR1:=HHV(HIGH,55);
VAR3:=HHV(L,55);
顶:VAR1*0.95,COLORBLUE,LINETHICK2;
底:VAR3*0.88,COLORWHITE,LINETHICK2;
操作:(LLV(HIGH,55)+HHV(LOW,55))/2,COLORLIRED,DOTLINE,LINETHICK1;
操作2:(C*4+L*3+H*2+O)/10,COLORGREEN,DOTLINE,LINETHICK1;
STICKLINE(操作<操作2,操作,操作2,0,-1),COLORRED,LINETHICK2;
STICKLINE(操作>操作2,操作,操作2,0,-1),COLORGREEN,LINETHICK2;
DRAWICON(CROSS(操作2 ,M7) AND 操作2<=底,L-0.3,7);
DRAWICON(CROSS(顶,操作2),H+0.3,8);
MW:=10;
MW1:=CONST(LLVBARS(V,MW));
MW0:IF(CURRBARSCOUNT<=MW+7,CONST(IF(MW1=0,O,REF(O,MW1))),DRAWNULL);
MW2:=IF(CURRBARSCOUNT=MW1+1,MW0,DRAWNULL),CIRCLEDOT;
DRAWTEXT(ISLASTBAR,MW0,'地量反量能评台');
MT1:=IF(ISLASTBAR,REF((C*2-REF(C,3)),1),DRAWNULL);
MT2:=IF(ISLASTBAR,REF((C*2-REF(C,3)),2),DRAWNULL);
MT3:=IF(ISLASTBAR,C*2-REF(C,3),DRAWNULL);
DRAWTEXT(ISLASTBAR,MT2,' ●'),COLORMAGENTA,LINETHICK2;
DRAWTEXT(ISLASTBAR,MT1,' ●'),COLORMAGENTA,LINETHICK2;
DRAWTEXT(ISLASTBAR,MT3,' ●'),COLORMAGENTA,LINETHICK2;
