//if DATAPERIOD>=1 and dataperiod<=8  then
begin
if DATAPERIOD=0 then minbi:="fbase.var2#min1";
if DATAPERIOD=1 then minbi:="fbase.var2#min5";
if DATAPERIOD=2 then minbi:="fbase.var2#min30";
if DATAPERIOD=3 then minbi:="fbase.var2#min60";
if DATAPERIOD=4 then minbi:="fbase.var2#day";
if DATAPERIOD=5 then minbi:="fbase.var2#day";
if DATAPERIOD=6 then minbi:="fbase.var2#week";
if DATAPERIOD=7 then minbi:="fbase.var2#month";
if DATAPERIOD=8 then minbi:="fbase.var2#year";

var1:="chzhshch@kxian";
var2:="chzhshch@bi";{处理笔关系}

var3:="chzhshch@tongji"(minbi);{同级别分解}
zg:="chzhshch@zg"(var3);//一定要先调用ZG
zd:="chzhshch@zd"(var3);

//以背景块的形式画中枢
stickline(zg>zd,zg,zd,10,0),color000055;

drawline(var2=1,h,var2=-1,l,0),linedot,ColorCA00C1;
drawline(var2=-1,l,var2=1,h,0),linedot,ColorCA00C1;
drawnumber(var3=1,h,h,2),pxup20,Color005900,align2;
drawnumber(var3=-1,l,l,2),pxdn5,Color0000FF;
drawline(var3=1,h,var3=-1,l,0),Color006EB0;
drawline(var3=-1,l,var3=1,h,0),Color006EB0;

//以框的形式画中枢
{
stickline(zg>zd and zg<>ref(zg,1),zg,zd,2,0),COLORMAGENTA;
stickline(zg>zd and zg<>refx(zg,1),zg,zd,2,0),COLORMAGENTA;
drawline(zg>zd and zg<>ref(zg,1),zg,zg>zd and zg<>refx(zg,1),zg,0),COLORMAGENTA;
drawline(zg>zd and zd<>ref(zd,1),zd,zg>zd and zd<>refx(zd,1),zd,0),COLORMAGENTA;
}
end;
kline(o,h,l,c,1);

if DATAPERIOD=0 then minbi:="fbase.var2#min1";
if DATAPERIOD=1 then minbi:="fbase.var2#min5";
if DATAPERIOD=2 then minbi:="fbase.var2#min30";
if DATAPERIOD=3 then minbi:="fbase.var2#min60";
if DATAPERIOD=4 then minbi:="fbase.var2#day";
if DATAPERIOD=5 then minbi:="fbase.var2#day";
if DATAPERIOD=6 then minbi:="fbase.var2#week";
if DATAPERIOD=7 then minbi:="fbase.var2#month";
if DATAPERIOD=8 then minbi:="fbase.var2#year";

K线:="chzhshch@kxian";
笔方向:="chzhshch@bi";{处理笔关系}

线段方向:="chzhshch@tongji"(minbi);{同级别分解}
中枢高点:="chzhshch@zg"(线段方向);//一定要先调用ZG
中枢低点:="chzhshch@zd"(线段方向);

精度:=1;
//以背景块的形式画中枢
stickline(中枢高点>中枢低点,中枢高点,中枢低点,10,0),color000055;

drawline(笔方向=1,h,笔方向=-1,l,0),linedot,color555555;
drawline(笔方向=-1,l,笔方向=1,h,0),linedot,color555555;

drawline(线段方向=1,h,线段方向=-1,l,0),colorblue;
drawline(线段方向=-1,l,线段方向=1,h,0),colorblue;
//
//以框的形式画中枢
{
stickline(中枢高点>中枢低点 and 中枢高点<>ref(中枢高点,1),中枢高点,中枢低点,2,0),COLORMAGENTA;
stickline(中枢高点>中枢低点 and 中枢高点<>refx(中枢高点,1),中枢高点,中枢低点,2,0),COLORMAGENTA;
drawline(中枢高点>中枢低点 and 中枢高点<>ref(中枢高点,1),中枢高点,中枢高点>中枢低点 and 中枢高点<>refx(中枢高点,1),中枢高点,0),COLORMAGENTA;
drawline(中枢高点>中枢低点 and 中枢低点<>ref(中枢低点,1),中枢低点,中枢高点>中枢低点 and 中枢低点<>refx(中枢低点,1),中枢低点,0),COLORMAGENTA;
}
K线:="chzhshch@kxian";
笔方向:="chzhshch@bi";{处理笔关系}
if DATAPERIOD<=1 then
begin 笔方向:=线段方向;{处理段1分钟的关系}
end;

距离前端点周期:=barslast(笔方向<>0);
当前端点周期:=ref(距离前端点周期,1)+1;
端点类型:=ref(笔方向,距离前端点周期);

后一线段类型:=ref(端点类型,1);{-1=上升,1=下降}

升降差价:=if (后一线段类型>0,l-ref(h,当前端点周期),h-ref(l,当前端点周期)),linethick0;{计算点位差}
//升降幅度:=if (后一线段类型>0,(l/ref(h,当前端点周期)-1)*100,(h/ref(l,当前端点周期)-1)*100),linethick0;{计算升降幅}
//显示点位
drawnumber(笔方向=1,h,h,精度),pxup30,color3300ff,align0;
drawnumber(笔方向=-1,l,l,精度),pxdn23,colorwhite,align0;
//显示力度
//drawtext(笔方向=1,h,\'+\')colormagenta,pxup20,align2;
drawnumber(笔方向=1,h,升降差价,精度),colormagenta,pxup10,align0;
//drawnumber(笔方向=1,h,升降幅度,0),colormagenta,pxup20,align2;
//drawtext(笔方向=1,h,\'%\')colormagenta,pxup20;
drawnumber(笔方向=-1,l,升降差价,精度),colorblue,pxdn2,align0;
//drawnumber(笔方向=-1,l,升降幅度,0),colorblue,pxdn5,align2;
//drawtext(笔方向=-1,l,\'%\'),colorblue,pxdn5;
//显示周期数
drawtext(笔方向=1,h,\'T\'),pxup20,colorwhite,align1;
drawnumber(笔方向=1,h,当前端点周期,0),colorwhite,pxup20,align2;
drawtext(笔方向=-1,l,\'T\'),pxdn12,colorwhite,align1;
drawnumber(笔方向=-1,l,当前端点周期,0),colorwhite,pxdn12,align2;

我这个可以看到中枢的。