咨询内容：

请老师帮忙修改

N:=120;//参数N需自行定义
CURRBARSCOUNT:=DATACOUNT-BARPOS+1;
KT:=BARSLAST(CURRBARSCOUNT=N);
GD:=REFX1(IF(ISLASTBAR=1,HHV(H,KT),0),10000);//{高点}
DD:=REFX1(IF(ISLASTBAR=1,LLV(L,KT),0),10000);//{低点}
KJ:=GD-DD;//{高低点差值=分区高度}
GD4:=IF(CURRBARSCOUNT<=N/30+16,GD,NULL);
高:=IF(CURRBARSCOUNT<=N/30+16,GD,NULL),COLORWHITE,COLOR00FFFF,PRECIS0;
低:=IF(CURRBARSCOUNT<=N/30+16,DD,NULL),COLORWHITE,COLORFFFF00,PRECIS0;

高区:IF(CURRBARSCOUNT<=N+16,GD,NULL),COLORWHITE,DASH,COLOR004080,PRECIS0;
低区:IF(CURRBARSCOUNT<=N+16,DD,NULL),COLORWHITE,DASH,COLOR004080,PRECIS0;

压力:IF(CURRBARSCOUNT<=N/40+16,DD+KJ*0.809,NULL),COLORGREEN,COLOR00FF00,PRECIS0;
警示:IF(CURRBARSCOUNT<=N/40+16,DD+KJ*0.618,NULL),COLOR00FFFF,PRECIS0;
突破:IF(CURRBARSCOUNT<=N/40+16,DD+KJ/2,NULL),COLORYELLOW,COLOR0000FF,PRECIS0;
强势: IF(CURRBARSCOUNT<=N/40+16,DD+KJ*0.382,NULL),COLORFF00FF,PRECIS0;
支撑:IF(CURRBARSCOUNT<=N/40+16,DD+KJ*0.191,NULL),COLORRED,COLOR00FFFF,PRECIS0;
低涨:IF(CURRBARSCOUNT<=N/40+16,(C/LLV(LOW,KT)-1)*100,NULL),RGB(0,128,255),COLOR0000FF,NODRAW,PRECIS0;
天数:BARSLAST(L=DD),COLORWHITE,NODRAW,PRECIS0;

FILLRGN(高>=压力&&CURRBARSCOUNT>=16,高,压力,RGB(200,200,0));
FILLRGN(高<压力&&CURRBARSCOUNT>=16,高,压力,RGB(0,0,0));
FILLRGN(压力>=警示&&CURRBARSCOUNT>=16,压力,警示,RGB(0,190,0));
FILLRGN(压力<警示&&CURRBARSCOUNT>=16,压力,警示,RGB(0,0,0));
FILLRGN(警示>=突破&&CURRBARSCOUNT>=16,警示,突破,RGB(220,120,0));
FILLRGN(警示<突破&&CURRBARSCOUNT>=16,警示,突破,RGB(0,0,0));
FILLRGN(突破>=强势&&CURRBARSCOUNT>=16,突破,强势,RGB(120,0,120));
FILLRGN(突破<强势&&CURRBARSCOUNT>=16,突破,强势,RGB(0,0,0));
FILLRGN(强势>=支撑&&CURRBARSCOUNT>=16,强势,支撑,RGB(120, 0,0));
FILLRGN(强势<支撑&&CURRBARSCOUNT>=16,强势,支撑,RGB(0,0,0));
FILLRGN(支撑>=低&&CURRBARSCOUNT>=16,支撑,低,RGB(80,80,80));
FILLRGN(支撑<低&&CURRBARSCOUNT>=16,支撑,低,RGB(0,0,0));

//{STICKLINE1(CURRBARSCOUNT=N/30,GD,DD,0,0),COLORGREEN;
//STICKLINE1(CURRBARSCOUNT=1,GD,DD,0,0),COLORGREEN;}
STICKLINE1(CURRBARSCOUNT<=N/30,支撑,支撑,14,0),COLORFF00FF;
STICKLINE1(CURRBARSCOUNT<=N/30,强势,强势,14,0),COLORFF00FF;
STICKLINE1(CURRBARSCOUNT<=N/30,突破,突破,14,0),COLORABABAB;
STICKLINE1(CURRBARSCOUNT<=N/30,警示,警示,14,0),COLOR00FFFF;
STICKLINE1(CURRBARSCOUNT<=N/30,压力,压力,14,0),COLOR00FFFF;

DRAWTEXT(CURRBARSCOUNT=N/40+16,高,'高位:809'),FONTSIZE20,ALIGN2,VALIGN1;
DRAWTEXT(CURRBARSCOUNT=N/40+16,压力,'压力:681'),COLORMAGENTA,FONTSIZE20,ALIGN2,VALIGN1;
DRAWTEXT(CURRBARSCOUNT=N/40+16,警示,'警示:500'),FONTSIZE20,ALIGN2,VALIGN1;
DRAWTEXT(CURRBARSCOUNT=N/40+16,强势,'强势:382'),FONTSIZE20,ALIGN2,VALIGN1;
DRAWTEXT(CURRBARSCOUNT=N/40+16,支撑,'支撑:191'),FONTSIZE20,ALIGN2,VALIGN1;
DRAWTEXT(CURRBARSCOUNT=N/40+16,低,'低位:000'),FONTSIZE20,ALIGN2,VALIGN1;
M:=BARSLAST(CURRBARSCOUNT=N);
平衡:=IF(CURRBARSCOUNT<=N,DD+KJ/2,NULL),COLORWHITE,DOT,COLOR004080,PRECIS0;
CD:=CURRBARSCOUNT,NODRAW;
STICKLINE1(CD=46,HHV(高区,60),LLV(低区,60),1,0),COLORBLACK,COLOR004080;
STICKLINE1(CD=120,HHV(高区,60),LLV(低区,60),1,0),COLORBLUE,COLOR004080;
STICKLINE1(CD=1,HHV(高区,60),LLV(低区,60),0.1,0),RGB(0,0,0),COLOR004080;

 

 来源:程序化99网（ WWW.CXH99.COM ）

博易技术人员： N:=120;//参数N需自行定义
CURRBARSCOUNT:=DATACOUNT-BARPOS+1;
CURRBARSCOUNT1:=DATACOUNT-BARPOS-1;
KT:=BARSLAST(CURRBARSCOUNT=N);
GD:=REFX(IF(ISLASTBAR=1,HHV(H,KT),0),CURRBARSCOUNT1);//{高点}
DD:=REFX(IF(ISLASTBAR=1,LLV(L,KT),0),CURRBARSCOUNT1);//{低点}
KJ:=GD-DD;//{高低点差值=分区高度}
GD4:=IF(CURRBARSCOUNT<=N/30+16,GD,DRAWNULL);
高:=IF(CURRBARSCOUNT<=N/30+16,GD,DRAWNULL),COLORWHITE,COLOR00FFFF,PRECIS0;
低:=IF(CURRBARSCOUNT<=N/30+16,DD,DRAWNULL),COLORWHITE,COLORFFFF00,PRECIS0;

高区:IF(CURRBARSCOUNT<=N+16,GD,DRAWNULL),COLORWHITE,DASH,COLOR004080,PRECIS0;
低区:IF(CURRBARSCOUNT<=N+16,DD,DRAWNULL),COLORWHITE,DASH,COLOR004080,PRECIS0;

压力:IF(CURRBARSCOUNT<=N/40+16,DD+KJ*0.809,DRAWNULL),COLORGREEN,COLOR00FF00,PRECIS0;
警示:IF(CURRBARSCOUNT<=N/40+16,DD+KJ*0.618,DRAWNULL),COLOR00FFFF,PRECIS0;
突破:IF(CURRBARSCOUNT<=N/40+16,DD+KJ/2,DRAWNULL),COLORYELLOW,COLOR0000FF,PRECIS0;
强势: IF(CURRBARSCOUNT<=N/40+16,DD+KJ*0.382,DRAWNULL),COLORFF00FF,PRECIS0;
支撑:IF(CURRBARSCOUNT<=N/40+16,DD+KJ*0.191,DRAWNULL),COLORRED,COLOR00FFFF,PRECIS0;
低涨:IF(CURRBARSCOUNT<=N/40+16,(C/LLV(LOW,KT)-1)*100,DRAWNULL),COLORFF8000,COLOR0000FF,NODRAW,PRECIS0;
天数:BARSLAST(L=DD),COLORWHITE,NODRAW,PRECIS0;

FILLRGN(高>=压力&&CURRBARSCOUNT>=16,高,压力),COLOR00C8C8;
FILLRGN(高<压力&&CURRBARSCOUNT>=16,高,压力),COLOR000000;
FILLRGN(压力>=警示&&CURRBARSCOUNT>=16,压力,警示),COLOR00BE00;
FILLRGN(压力<警示&&CURRBARSCOUNT>=16,压力,警示),COLOR000000;
FILLRGN(警示>=突破&&CURRBARSCOUNT>=16,警示,突破),COLOR0078DC;
FILLRGN(警示<突破&&CURRBARSCOUNT>=16,警示,突破),COLOR000000;
FILLRGN(突破>=强势&&CURRBARSCOUNT>=16,突破,强势),COLOR780078;
FILLRGN(突破<强势&&CURRBARSCOUNT>=16,突破,强势),COLOR000000;
FILLRGN(强势>=支撑&&CURRBARSCOUNT>=16,强势,支撑),COLOR000078;
FILLRGN(强势<支撑&&CURRBARSCOUNT>=16,强势,支撑),COLOR000000;
FILLRGN(支撑>=低&&CURRBARSCOUNT>=16,支撑,低),COLOR505050;
FILLRGN(支撑<低&&CURRBARSCOUNT>=16,支撑,低),COLOR000000;

//{STICKLINE1(CURRBARSCOUNT=N/30,GD,DD,0,0),COLORGREEN;
//STICKLINE1(CURRBARSCOUNT=1,GD,DD,0,0),COLORGREEN;}
STICKLINE(CURRBARSCOUNT<=N/30,支撑,支撑,14,0),COLORFF00FF;
STICKLINE(CURRBARSCOUNT<=N/30,强势,强势,14,0),COLORFF00FF;
STICKLINE(CURRBARSCOUNT<=N/30,突破,突破,14,0),COLORABABAB;
STICKLINE(CURRBARSCOUNT<=N/30,警示,警示,14,0),COLOR00FFFF;
STICKLINE(CURRBARSCOUNT<=N/30,压力,压力,14,0),COLOR00FFFF;

DRAWTEXT(CURRBARSCOUNT=N/40+16,高,'高位:809'),FONTSIZE20,ALIGN2,VALIGN1;
DRAWTEXT(CURRBARSCOUNT=N/40+16,压力,'压力:681'),COLORMAGENTA,FONTSIZE20,ALIGN2,VALIGN1;
DRAWTEXT(CURRBARSCOUNT=N/40+16,警示,'警示:500'),FONTSIZE20,ALIGN2,VALIGN1;
DRAWTEXT(CURRBARSCOUNT=N/40+16,强势,'强势:382'),FONTSIZE20,ALIGN2,VALIGN1;
DRAWTEXT(CURRBARSCOUNT=N/40+16,支撑,'支撑:191'),FONTSIZE20,ALIGN2,VALIGN1;
DRAWTEXT(CURRBARSCOUNT=N/40+16,低,'低位:000'),FONTSIZE20,ALIGN2,VALIGN1;
M:=BARSLAST(CURRBARSCOUNT=N);
平衡:=IF(CURRBARSCOUNT<=N,DD+KJ/2,DRAWNULL),COLORWHITE,COLOR004080,PRECIS0;
CD:=CURRBARSCOUNT,NODRAW;
STICKLINE(CD=46,HHV(高区,60),LLV(低区,60),1,0),COLORBLACK,COLOR004080;
STICKLINE(CD=120,HHV(高区,60),LLV(低区,60),1,0),COLORBLUE,COLOR004080;
STICKLINE(CD=1,HHV(高区,60),LLV(低区,60),1,0),COLOR000000,COLOR004080; 来源 程序化久久网