{黄金分割}
{参数设置 J:10 9999 150 ; Q: 1 99 3}
J:=10;
Q:=3;
顶部:=REF(HHV(H,J),Q);
底部:=REF(LLV(L,J),Q);
A:=顶部-(顶部-底部)*0.191;
B:=顶部-(顶部-底部)*0.382;
Z:=顶部-(顶部-底部)*0.5;
D:=顶部-(顶部-底部)*0.618;
E:=顶部-(顶部-底部)*0.809;
顶:REFDATE(顶部,DATE),COLORBLUE,LINETHICK3;
A19.1%:REFDATE(A,DATE),POINTDOT,COLORYELLOW;
B38.2%:REFDATE(B,DATE),COLORMAGENTA,LINETHICK2;
C50%:REFDATE(Z,DATE),POINTDOT,COLORLIGRAY;
D61.8%:REFDATE(D,DATE),COLORYELLOW,LINETHICK2;
E80.9%:REFDATE(E,DATE),POINTDOT,COLORCYAN;
底:REFDATE(底部,DATE),COLORRED,LINETHICK3;
DRAWTEXT(ISLASTBAR,顶部,'◆'),COLORGREEN;
DRAWTEXT(ISLASTBAR,A19.1%,'0.191'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,B38.2%,'0.382'),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,C50%,'0.50'),COLORRED;
DRAWTEXT(ISLASTBAR,D61.8%,'0.618'),COLORMAGENTA;
DRAWTEXT(ISLASTBAR,E80.9%,'0.809'),COLORYELLOW;
DRAWTEXT(ISLASTBAR,底部,'底部'),COLORRED;
{成竹在胸}
X:=6;Y:=6;{参数可以自己调整}
DRAWLINE(H=PEAK(1 ,X ,1 ) ,H ,L=TROUGH(2 ,X ,1 ) ,L , 1),COLOR00FF00;
DRAWLINE(H=PEAK(1 ,X ,1 ) ,H ,L=TROUGH(2 ,X ,1 ) ,
L+(PEAK(1 ,X ,1 )-TROUGH(2 ,X ,1 ))/3 , 1),COLORYELLOW;
DRAWLINE(H=PEAK(1 ,X ,1 ) ,H ,L=TROUGH(2 ,X ,1 ) ,
L+(PEAK(1 ,X ,1 )-TROUGH(2 ,X ,1 ))/3*2 , 1),COLOR66BB00;
DRAWLINE(L=TROUGH(2 ,Y,1 ) ,L ,H=PEAK(1 ,Y,1 ) ,H ,1 ),COLOR00FF00;
DRAWLINE(L=TROUGH(2 ,Y,1 ) ,L ,H=PEAK(1 ,Y,1 ) ,
H-(PEAK(1 ,Y ,1 )-TROUGH(2 , Y,1 ))/3*2 ,1 ),COLORRED;
DRAWLINE(L=TROUGH(2 ,Y,1 ) ,L ,H=PEAK(1 ,Y,1 ) ,
H-(PEAK(1 ,Y ,1 )-TROUGH(2 , Y,1 ))/3 ,1 ),COLORYELLOW;
{BS买卖点}
MA5:MA(C,5),COLORF00FF0;
MA10:MA(C,10),COLORYELLOW;
MA20:MA(C,20),COLORE66878;
MA30:MA(C,30),COLORWHITE;
MA60:MA(C,60),COLORBROWN;
MA120:MA(C,120),POINTDOT,COLORGREEN,LINETHICK2;
MA240:MA(C,240),POINTDOT,COLORGREEN,LINETHICK2;
X1:=(C+L+H)/3;
X2:=EMA(X1,6);
X3:=EMA(X2,5);
DRAWICON(CROSS(X2,X3),L*0.98,7);
DRAWICON(CROSS(X3,X2),H*1.02,8);
STICKLINE(X2>=X3,LOW,HIGH,0.1,1),COLORRED;
STICKLINE(X2>=X3,CLOSE,OPEN,2,2),COLORRED;
STICKLINE(X2>=X3,CLOSE,OPEN,2,8),COLORBROWN;
STICKLINE(X2<X3,LOW,HIGH,0.1,1),COLORGREEN;
STICKLINE(X2<X3,CLOSE,OPEN,2,2),COLORGREEN;
STICKLINE(CROSS(X2,X3),OPEN,CLOSE,2,1),COLORYELLOW;
STICKLINE(CROSS(X3,X2),OPEN,CLOSE,2,1),COLORBLUE;{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
