【通達信】期待篇4——耐人回味的《填色四區谷峰參考線》主圖指標 源碼 貼圖 簡單說明

股市不陰不陽的迷茫的走勢，給彷徨的股民添了很多煩惱，是進是退左右為難！！！股民們期待著真正黎明曙光的出現！！！！
實是無聊，將以前的資料綜合成一個《填色四區谷峰參考線》操盤的主圖指標用于消閑。其中設有參考線{有關用法以前有介紹）和谷峰指標，可結合四區及谷峰指標的狀態采取相應的手段來買賣。（因為指標是采取劃線的方式，不可避免的采用了有關劃線的未來函數，不適者可規避），此指標雖是消閑用，但仔細回味起來也能為你添加一些快樂，不信，你可以試試!!!

源碼；

零軸:DYNAINFO(3)*1,COLOR0000FF;
XA1:=MA(CLOSE,20);
XA2:=(CLOSE>MA(CLOSE,5));
XA3:=(MA(CLOSE,5)>MA(CLOSE,10));
XA4:=(CLOSE>MA(CLOSE,10));
XA5:=(MA(CLOSE,5)>MA(CLOSE,20));
XA6:=(CLOSE>MA(CLOSE,20));
XA7:=REF(XA1,1);
XA8:=(XA1>XA7);
AVX:=(((((IF(XA2,10,(0 - 10)) + IF(XA3,10,(0 - 10))) + IF(XA4,10,(0 -10))) +
IF(XA5,10,(0 - 10))) + IF(XA6,10,(0 - 10))) + IF(XA8,10,(0 -10)))/80;
XFX:=AVX+零軸,COLOR00FFFF,LINETHICK1;
DRAWBAND(XFX,RGB(160,0,0),零軸,RGB(0,90,90));
谷峰線:XFX,COLOR8A8A8A;
N:=120;
K:=BARSLAST(CURRBARSCOUNT=N);
GD:=CONST(IF(ISLASTBAR=1,HHV(H,K),0));{高點}
DD:=CONST(IF(ISLASTBAR=1,LLV(L,K),0));{低點}
KJ:=GD-DD;{高低點差值=分區高度}
GD4:IF(CURRBARSCOUNT<=N/30,GD,DRAWNULL);  {設置分區的寬度，調整數據可調整分區寬度}
平衡:IF(CURRBARSCOUNT<=N/30,DD+KJ/2,DRAWNULL),COLOR00FFFF;{低點+中點=0.50線,NODRAW}
壓力:IF(CURRBARSCOUNT<=N/30,GD-KJ*0.191,DRAWNULL),COLORFF00FF;{高點-分區高度*0.191=0.819線,NODRAW}
支撐:IF(CURRBARSCOUNT<=N/30,DD+KJ*0.191,DRAWNULL),COLOR00FF00;{低點+分區高度*0.191=0.191線,NODRAW}
高:IF(CURRBARSCOUNT<=N/30,GD,DRAWNULL),COLOR00FFFF;{高點劃線,POINTDOT}
低:IF(CURRBARSCOUNT<=N/30,DD,DRAWNULL),COLOR00FF00;{低點劃線,POINTDOT}
低漲:IF(CURRBARSCOUNT<=N/30,(C/LLV(LOW,K)-1)*100,DRAWNULL),COLOR0000FF,NODRAW;
天數:BARSLAST(L=DD),COLORCYAN,NODRAW;
DRAWBAND(高,RGB(160,160,0),壓力,RGB(0,0,0));
DRAWBAND(壓力,RGB(130,0,0),平衡,RGB(0,0,0));
DRAWBAND(平衡,RGB(100,0,100),支撐,RGB(0,0,0));
DRAWBAND(支撐,RGB(150,150,150),低,RGB(0,0,0));
STICKLINE(CURRBARSCOUNT=N/30,GD,DD,0,0),COLORGREEN;{劃左側高低點邊線}
STICKLINE(CURRBARSCOUNT=1,GD,DD,0,0),COLORGREEN;{劃右側高低點邊線}
STICKLINE(CURRBARSCOUNT<=N/30,平衡,平衡,4,0),COLORWHITE;{劃平衡線橫線線}
STICKLINE(CURRBARSCOUNT<=N/30,壓力,壓力,4,0),COLORRED;{劃壓力線橫線線}
STICKLINE(CURRBARSCOUNT<=N/30,支撐,支撐*0.997,4,0),COLORRED;{劃支撐想橫線線}
STICKLINE(CURRBARSCOUNT<=N/30,低,低,4,0),COLORGREEN;{劃低位橫線線}
N2:=5;
A1:=REF(H,N2)=HHV(H,2*N2+1);
B1:=FILTER(A1,N2);
C1:=BACKSET(B1,N2+1);
HD:= FILTER(C1,N2);
RH:=BACKSET(CURRBARSCOUNT=2,BARSLAST(HD)+1);
SH:=RH>REF(RH,1);
H1:=REF(H ,BARSLAST(SH));
STICKLINE(H1,H1,H1,5,0),LINETHICK2,COLOR00FFFF;
DRAWTEXT(ISLASTBAR,H1*1.005,'近期高點'),COLORFFFF00;
TTP:=(CURRBARSCOUNT=5-4);
DRAWNUMBER(TTP AND H1,H1,H1),COLORFFFF00;
A2:=REF(L,N2)=LLV(L,2*N2+1);
B2:=FILTER(A2,N2);
C2:=BACKSET(B2,N2+1);
LD:=FILTER(C2,N2);
RL:=BACKSET(CURRBARSCOUNT=2,BARSLAST(LD)+1);
SL:=RL>REF(RL,1);
L1:=REF(L ,BARSLAST(SL));
STICKLINE(L1,L1,L1,5,0),COLORFFFF00,LINETHICK5;
DRAWTEXT(ISLASTBAR,L1*1.005,'近期低點'),COLORFFFF00;
DRAWNUMBER(TTP AND L1,L1,L1),COLOR00FFFF;
AHX:=MA(C,3);
BHX:=MA(C,14);
EHX:=(AHX+BHX)/2;
當前價:=C,COLORFFFFFF;
市盈率:=IF(FINANCE(33)>0,DYNAINFO(39),0)*0.35;
每股收益:=IF(FINANCE(33)>0.01,FINANCE(33)*0.65,0);
CKMJ:=每股收益*市盈率*4;
參考買價:STICKLINE(1,CKMJ,CKMJ*0.9983,5,0),COLOR00FF00;
DRAWTEXT(ISLASTBAR,CKMJ*1.0054,'參考買價'),COLOR00FFFF;
C11:=C>=CKMJ;
C21:=C<CKMJ;
AA:=C11>=C21 ;
BB:=C21>C11 ;
STICKLINE(AA,C,O,3.4,0),COLORAA00AA;
STICKLINE(AA,C,O,3.0,0),COLORBB00BB ;
STICKLINE(AA,C,O,2.0,0),COLORDD00DD ;
STICKLINE(AA,C,O,1.6,0),COLOREE00EE;
STICKLINE(AA,C,O,1.2,0),COLORFF00FF;
STICKLINE(AA,C,O,0.6,0),COLORFF00FF;
STICKLINE(AA,H,L,0,0),COLORFF00FF;
STICKLINE(BB,C,O,3.4,0),COLORAAAA00;
STICKLINE(BB,C,O,3.0,0),COLORBBBB00;
STICKLINE(BB,C,O,1.6,0),COLOREEEE00;
STICKLINE(BB,C,O,1.2,0),COLORFFFF00;
STICKLINE(BB,C,O,0.6,0),COLORFFFF00;
STICKLINE(BB,H,L,0,0),COLORFFFF00;
TTP123:=(CURRBARSCOUNT=5-4);
DRAWNUMBER(TTP123 AND CKMJ,CKMJ,CKMJ),COLORFFFF00;
SJ:=WMA((C-LLV(L,5))/(HHV(H,5)-LLV(L,5))*100,2);
ZJ:=WMA(0.667*REF(SJ,1)+0.333*SJ,2);
DRAWTEXT(CROSS(SJ,ZJ) AND SJ<30,L-0.05,'←低吸'),COLOR00FF99,LINETHICK2;
DRAWTEXT(CROSS(ZJ,SJ) AND SJ>70,H+0.05,'←高拋'),COLOR00FF00,LINETHICK2;
DRAWTEXT_FIX(1,0.02,0.02,0,'【★★參考價★★谷峰彩帶★★填色四區★★】'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=N/30+4,GD-KJ/12,'【風險區】--高拋避險'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=N/30+4,GD-KJ/3,'【警示區】--逢高減倉'),COLORFFFFFF;
DRAWTEXT(CURRBARSCOUNT=N/30+4,DD+KJ/3,'【關注區】--逢低買入'),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=N/30+4,DD+KJ/10,'【休整區】--養精畜銳'),COLOR00FF00;理想股票論壇 www.55188.com