咨詢內容：

請老師改成博弈指標

N:=120;
CURRBARSCOUNT:=DATACOUNT-BARPOS+1;
KT:=BARSLAST(CURRBARSCOUNT=N);
GD:=REFX(IF(ISLASTBAR=1,HHV(H,KT),0),10000);//{高點}
DD:=REFX(IF(ISLASTBAR=1,LLV(L,KT),0),10000);//{低點}
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),RGB(0,128,255),COLOR0000FF,NODRAW,PRECIS0;
天數: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,強勢,強勢,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,DOTLINE,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),0.1,0),RGB(0,0,0),COLOR004080;

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



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

?

?來源:程序化99網（ www.kzuj.com.cn ）

博易技術人員： N:=120;
CURRBARSCOUNT:=DATACOUNT-BARPOS+1;
KT:=BARSLAST(CURRBARSCOUNT=N);
GD:=REFX(IF(ISLASTBAR=1,HHV(H,KT),0),DATACOUNT-BARPOS-1);//{高點}
DD:=REFX(IF(ISLASTBAR=1,LLV(L,KT),0),DATACOUNT-BARPOS-1);//{低點}
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;




//{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,POINTDOT,COLOR004080,PRECIS0;
CD:=CURRBARSCOUNT,NODRAW;
STICKLINE(CD=46,HHV(高區,60),LLV(低區,60),10,0),COLORBLACK,COLOR004080;
STICKLINE(CD=120,HHV(高區,60),LLV(低區,60),10,0),COLORBLUE,COLOR004080;
STICKLINE(CD=1,HHV(高區,60),LLV(低區,60),0.10,0),COLOR000000,COLOR004080;

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



DRAWNUMBER(ISLASTBAR,GD,GD,0),COLORWHITE,FONTSIZE30,ALIGN0,VALIGN1;
DRAWNUMBER(ISLASTBAR,DD,DD,0),COLORWHITE,FONTSIZE30,ALIGN0,VALIGN1; 來源 程序化久久網