咨詢內(nèi)容：

請(qǐng)老師改成博弈指標(biāo)

N:=120;
CURRBARSCOUNT:=DATACOUNT-BARPOS+1;
KT:=BARSLAST(CURRBARSCOUNT=N);
GD:=REFX(IF(ISLASTBAR=1,HHV(H,KT),0),10000);//{高點(diǎn)}
DD:=REFX(IF(ISLASTBAR=1,LLV(L,KT),0),10000);//{低點(diǎn)}
KJ:=GD-DD;//{高低點(diǎn)差值=分區(qū)高度}
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;


高區(qū):IF(CURRBARSCOUNT<=N+16,GD,DRAWNULL),COLORWHITE,DASH,COLOR004080,PRECIS0;
低區(qū):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;
強(qiáng)勢(shì): 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),RGB(0,128,255),COLOR0000FF,NODRAW,PRECIS0;
天數(shù):BARSLAST(L=DD),COLORWHITE,NODRAW,PRECIS0;




//{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,強(qiáng)勢(shì),強(qiáng)勢(shì),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,強(qiáng)勢(shì),'強(qiáng)勢(shì):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,DOTLINE,COLOR004080,PRECIS0;
CD:=CURRBARSCOUNT,NODRAW;
STICKLINE(CD=46,HHV(高區(qū),60),LLV(低區(qū),60),1,0),COLORBLACK,COLOR004080;
STICKLINE(CD=120,HHV(高區(qū),60),LLV(低區(qū),60),1,0),COLORBLUE,COLOR004080;
STICKLINE(CD=1,HHV(高區(qū),60),LLV(低區(qū),60),0.1,0),RGB(0,0,0),COLOR004080;

DRAWTEXT(CURRBARSCOUNT=N/4+46,GD-KJ*0.09,'【風(fēng)險(xiǎn)區(qū)】--高拋避險(xiǎn)'),COLORGREEN,FONTSIZE20,COLOR004080;
DRAWTEXT(CURRBARSCOUNT=N/4+46,GD-KJ*0.3,'【警示區(qū)】--逢高減倉(cāng)'),COLORGREEN,FONTSIZE20,COLOR004080;
DRAWTEXT(CURRBARSCOUNT=N/4+46,GD-KJ*0.45,'【突破區(qū)】--主力拉升'),COLORMAGENTA,FONTSIZE20,COLOR004080;
DRAWTEXT(CURRBARSCOUNT=N/4+46,GD-KJ*0.55,'【拉升區(qū)】--強(qiáng)勢(shì)畜銳'),COLORMAGENTA,FONTSIZE20,COLOR004080;
DRAWTEXT(CURRBARSCOUNT=N/4+46,DD+KJ/3,'【關(guān)注區(qū)】--逢低買入'),COLORRED,FONTSIZE20,COLOR004080;
DRAWTEXT(CURRBARSCOUNT=N/4+46,DD+KJ/10,'【低吸區(qū)】--大膽買入'),COLORRED,FONTSIZE20,COLOR004080;



DRAWNUMBER(ISLASTBAR,GD,GD,0,COLORWHITE),FONTSIZE30,ALIGN0,VALIGN1;
DRAWNUMBER(ISLASTBAR,DD,DD,0,COLORWHITE),FONTSIZE30,ALIGN0,VALIGN1;

?

?來(lái)源:程序化99網(wǎng)（ m.weiqiv.net.cn ）

博易技術(shù)人員： N:=120;
CURRBARSCOUNT:=DATACOUNT-BARPOS+1;
KT:=BARSLAST(CURRBARSCOUNT=N);
GD:=REFX(IF(ISLASTBAR=1,HHV(H,KT),0),DATACOUNT-BARPOS-1);//{高點(diǎn)}
DD:=REFX(IF(ISLASTBAR=1,LLV(L,KT),0),DATACOUNT-BARPOS-1);//{低點(diǎn)}
KJ:=GD-DD;//{高低點(diǎn)差值=分區(qū)高度}
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;


高區(qū):IF(CURRBARSCOUNT<=N+16,GD,DRAWNULL),COLORWHITE,DASH,COLOR004080,PRECIS0;
低區(qū):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;
強(qiáng)勢(shì): 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;
天數(shù):BARSLAST(L=DD),COLORWHITE,NODRAW,PRECIS0;




//{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,強(qiáng)勢(shì),強(qiáng)勢(shì),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,強(qiáng)勢(shì),'強(qiáng)勢(shì):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,POINTDOT,COLOR004080,PRECIS0;
CD:=CURRBARSCOUNT,NODRAW;
STICKLINE(CD=46,HHV(高區(qū),60),LLV(低區(qū),60),10,0),COLORBLACK,COLOR004080;
STICKLINE(CD=120,HHV(高區(qū),60),LLV(低區(qū),60),10,0),COLORBLUE,COLOR004080;
STICKLINE(CD=1,HHV(高區(qū),60),LLV(低區(qū),60),0.10,0),COLOR000000,COLOR004080;

DRAWTEXT(CURRBARSCOUNT=N/4+46,GD-KJ*0.09,'【風(fēng)險(xiǎn)區(qū)】--高拋避險(xiǎn)'),COLORGREEN,FONTSIZE20,COLOR004080;
DRAWTEXT(CURRBARSCOUNT=N/4+46,GD-KJ*0.3,'【警示區(qū)】--逢高減倉(cāng)'),COLORGREEN,FONTSIZE20,COLOR004080;
DRAWTEXT(CURRBARSCOUNT=N/4+46,GD-KJ*0.45,'【突破區(qū)】--主力拉升'),COLORMAGENTA,FONTSIZE20,COLOR004080;
DRAWTEXT(CURRBARSCOUNT=N/4+46,GD-KJ*0.55,'【拉升區(qū)】--強(qiáng)勢(shì)畜銳'),COLORMAGENTA,FONTSIZE20,COLOR004080;
DRAWTEXT(CURRBARSCOUNT=N/4+46,DD+KJ/3,'【關(guān)注區(qū)】--逢低買入'),COLORRED,FONTSIZE20,COLOR004080;
DRAWTEXT(CURRBARSCOUNT=N/4+46,DD+KJ/10,'【低吸區(qū)】--大膽買入'),COLORRED,FONTSIZE20,COLOR004080;



DRAWNUMBER(ISLASTBAR,GD,GD,0),COLORWHITE,FONTSIZE30,ALIGN0,VALIGN1;
DRAWNUMBER(ISLASTBAR,DD,DD,0),COLORWHITE,FONTSIZE30,ALIGN0,VALIGN1; 來(lái)源 程序化久久網(wǎng)