DA1:=IF(DATE>TOTALBARSCOUNT,TOTALBARSCOUNT,DATE);
DA:=IF(CURRBARSCOUNT>DA1,DATE,DA1);
HI:=REFDATE(HHV(H,DA),DATE);
LO:=REFDATE(LLV(L,DA),DATE);
C1:=IF(CURRBARSCOUNT<=DA,C,DRAWNULL);
GZ:=EXP(LN(HI/LO)/10);
LH1:=SUM(IF(C1>=(HI/GZ),V,0),DA);
LH2:=SUM(IF(C1>=(HI/POW(GZ,2)) AND C1<(HI/GZ),V,0),DA);
LH3:=SUM(IF(C1>=(HI/POW(GZ,3)) AND C1<(HI/POW(GZ,2)),V,0),DA);
LH4:=SUM(IF(C1>=(HI/POW(GZ,4)) AND C1<(HI/POW(GZ,3)),V,0),DA);
LH5:=SUM(IF(C1>=(HI/POW(GZ,5)) AND C1<(HI/POW(GZ,4)),V,0),DA);
LH6:=SUM(IF(C1>=(HI/POW(GZ,6)) AND C1<(HI/POW(GZ,5)),V,0),DA);
LH7:=SUM(IF(C1>=(HI/POW(GZ,7)) AND C1<(HI/POW(GZ,6)),V,0),DA);
LH8:=SUM(IF(C1>=(HI/POW(GZ,8)) AND C1<(HI/POW(GZ,7)),V,0),DA);
LH9:=SUM(IF(C1>=(LO*GZ) AND C1<LO*POW(GZ,2),V,0),DA);
LH10:=SUM(IF(C1>=LO AND C1<LO*GZ,V,0),DA);
L1:=REFDATE(HHV(LH1,DA),DATE),LINETHICK0;
L2:=REFDATE(HHV(LH2,DA),DATE),LINETHICK0;
L3:=REFDATE(HHV(LH3,DA),DATE),LINETHICK0;
L4:=REFDATE(HHV(LH4,DA),DATE);
L5:=REFDATE(HHV(LH5,DA),DATE);
L6:=REFDATE(HHV(LH6,DA),DATE);
L7:=REFDATE(HHV(LH7,DA),DATE);
L8:=REFDATE(HHV(LH8,DA),DATE);
L9:=REFDATE(HHV(LH9,DA),DATE);
L10:=REFDATE(HHV(LH10,DA),DATE);
SS:=(L1+L2+L3+L4+L5+L6+L7+L8+L9+L10);
STICKLINE(CEILING(DA*L1/SS)*3>=CURRBARSCOUNT,HI*99/100,HI/GZ,9,0)COLOR3C3C3A,LINETHICK3;
STICKLINE(CEILING(DA*L2/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,1)*99/100,HI/POW(GZ,2),9,0)COLOR3C3C3A,LINETHICK3;
STICKLINE(CEILING(DA*L3/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,2)*99/100,HI/POW(GZ,3),9,0)COLOR3C3C3A,LINETHICK3;
STICKLINE(CEILING(DA*L4/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,3)*99/100,HI/POW(GZ,4),9,0)COLOR3C3C3A,LINETHICK3;
STICKLINE(CEILING(DA*L5/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,4)*99/100,HI/POW(GZ,5),9,0)COLOR3C3C3A,LINETHICK3;
STICKLINE(CEILING(DA*L6/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,5)*99/100,HI/POW(GZ,6),9,0)COLOR3C3C3A,LINETHICK3;
STICKLINE(CEILING(DA*L7/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,6)*99/100,HI/POW(GZ,7),9,0)COLOR3C3C3A,LINETHICK3;
STICKLINE(CEILING(DA*L8/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,2),LO*POW(GZ,3)*99/100,9,0)COLOR3C3C3A,LINETHICK3;
STICKLINE(CEILING(DA*L9/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,1),LO*POW(GZ,2)*99/100,9,0)COLOR3C3C3A,LINETHICK3;
STICKLINE(CEILING(DA*L10/SS)*3>=CURRBARSCOUNT,LO,LO*POW(GZ,1)*99/100,9,0)COLOR3C3C3A,LINETHICK3;
STICKLINE(DOPEN<DCLOSE,DHIGH,DLOW,4,0),COLOR33BBBB;
STICKLINE(DOPEN<DCLOSE,DOPEN,DCLOSE,4,0),COLOR8833CC;
STICKLINE(DOPEN>DCLOSE,DHIGH,DLOW,4,0),COLORAA3333;
STICKLINE(DOPEN>DCLOSE,DOPEN,DCLOSE,4,0),COLOR668833;
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
{以下是涨跌周期大阳线}
趋势大阳线:((DCLOSE/DOPEN>=1.07) AND DCLOSE>DOPEN);
趋势假阳线:((DCLOSE/DOPEN>=1.01) AND DCLOSE<DOPEN);
DRAWTEXT(DCLOSE/DOPEN>=1.07,DLOW,'大阳线');
DYX11:=BARSLAST(趋势大阳线);
GH1:=FILTER(趋势大阳线,DATE);
BH1:=BARSLAST(趋势大阳线);
STICKLINE(趋势大阳线,REF(DHIGH,BH1),REF(DLOW,BH1),4,0),COLOR0F03A0;
STICKLINE(趋势大阳线,REF(DOPEN,BH1),REF(DCLOSE,BH1),4,0),COLOR3207FC;
STICKLINE(DCLOSE,REF(DLOW,BH1),REF(DOPEN,BH1),4,0),COLORGREEN;
STICKLINE(DCLOSE,REF(DCLOSE,BH1),REF(DHIGH,BH1),4,0),COLORMAGENTA;
{涨停板回马枪}
ZT:=DCLOSE/REF(DCLOSE,1)>1.05;
XH:=FILTER(ZT,DATE);
BH:=BARSLAST(ZT);
STICKLINE(ZT,REF(DOPEN,BH),REF(DCLOSE,BH),1,0),COLORYELLOW;
STICKLINE(C>=O,H,L,0.3,0),COLORYELLOW;
STICKLINE(C<=O,H,L,0.3,0),COLORCYAN;
{以下是常规周期大阳线}
常规大阳线:((CLOSE/OPEN>=1.07) AND CLOSE>OPEN);
常规假阳线:((CLOSE/OPEN>=1.01) AND CLOSE<OPEN);
DRAWTEXT(CLOSE/OPEN>=1.07,LOW,'大阳线');
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);
{黄金分割 普通 等系坐标}
DRAWRECTREL(990,2,998,188,RGB(0,150,180)),NOFRAME;
DRAWRECTREL(990,188,998,375,RGB(200,200,0)),NOFRAME;
DRAWRECTREL(990,375,998,491,RGB(100,200,0)),NOFRAME;
DRAWRECTREL(990,491,998,607,RGB(200,10,80)),NOFRAME;
DRAWRECTREL(990,607,998,794,RGB(150,0,0)),NOFRAME;
DRAWRECTREL(990,794,998,982,RGB(150,150,150)),NOFRAME;
当期收盘:DCLOSE,NODRAW;
当期最高:DHIGH,NODRAW;
当期最低:DLOW,NODRAW;
当期上影:DHIGH-MAX(DOPEN,DCLOSE),NODRAW;
当期下影:MIN(DOPEN,DCLOSE)-DLOW,NODRAW;
当期实体:ABS(DCLOSE-DOPEN),NODRAW;
当期涨幅:(DCLOSE-DOPEN)/DOPEN*100,NODRAW;
当期波幅:(DHIGH-DLOW)/DLOW*100,NODRAW;
涨跌周期统计:BARSLAST(O=DOPEN AND DVOL!=REF(DVOL,1))+1,NODRAW,COLORRED,COLORWHITE;
DRAWNUMBER(REFX(涨跌周期统计,1)<=涨跌周期统计 OR ISLASTBAR ,DHIGH,涨跌周期统计),DRAWABOVE;
DRAWTEXT_FIX(1,0.12,0.991,1,STRCAT('多空涨跌周期统计数据：',CON2STR(涨跌周期统计,2))),COLORWHITE;
日量比:=V/REF(V,1),COLORRED,LINETHICK4,VOLSTICK;
日换手:=SUM(VOL,1)*100/CAPITAL,NODRAW;
回头波:(DYNAINFO(7)-DYNAINFO(5))/DYNAINFO(5)*100,LINETHICK0;
攻击波:(DYNAINFO(7)-DYNAINFO(6))/DYNAINFO(6)*100,LINETHICK0;
{空间距离色块，普通等系坐标，自下而上，颜色越深风险越大}
DRAWRECTREL(0,0.1,10,999,RGB(255,0,0)),NOFRAME; {6}
DRAWRECTREL(0,1, 10,888,RGB(255,0,50)),NOFRAME; {5}
DRAWRECTREL(0,100,10,777,RGB(255,0,100)),NOFRAME; {4}
DRAWRECTREL(0,200,10,666,RGB(255,0,150)),NOFRAME; {3}
DRAWRECTREL(0,300,10,555,RGB(255,0,200)),NOFRAME; {2}
DRAWRECTREL(0,400,10,444,RGB(255,0,250)),NOFRAME; {1}
DRAWRECTREL(0,500,10,333,RGB(255,0,255)),NOFRAME; {0}
DRAWRECTREL(0,600,10,444,RGB(0,255,250)),NOFRAME; {1}
