|
[分享]指標分享
選參數1為黃金分割線
選參數2為線甘氏八分線
黃金分割線甘氏八分線指標
DRAWGBK(CLOSE,COLORRGB(90,90,90),COLORRGB(30,30,60),1);
DRAWTEXT(BARPOS=SYSPARAM(2),HIGH,STKNAME+' '+STKLABEL),align4,COLORMAGENTA;
input:k(1,1,3,1);
hh:= SYSPARAM(4);
ll:= SYSPARAM(5);
HL:=hh-ll;
wH := BARSlast(H=hh);
wL :=BARSlast(L=ll);
KK := wH-wL;
a1 :=if(kk<0,hh- HL*0.236,ll+HL*0.236);
a2 :=if(kk<0,hh- HL*0.382,ll+HL*0.382);
a3 :=if(kk<0,hh- HL*0.618,ll+HL*0.618);
mHL:= hh-HL*0.5;
b1:=if(kk<0,hh- HL*0.125,ll+HL*0.125);
b2:=if(kk<0,hh- HL*0.25,ll+HL*0.25);
b3:=if(kk<0,hh- HL*0.375,ll+HL*0.375);
b4:=if(kk<0,hh- HL*0.625,ll+HL*0.625);
b5:=if(kk<0,hh- HL*0.75,ll+HL*0.75);
b6:=if(kk<0,hh- HL*0.875,ll+HL*0.875);
A := islastbar;
DRAWTEXT(A and K<>3,HH, ' 最高價：'+NUMTOSTR(HH,3)),ALIGN2,colorgreen;
DRAWTEXT(A and K<>3,LL, ' 最低價：'+NUMTOSTR(ll,3)),ALIGN2,,colorgreen;
DRAWTEXT(A and K<>3,mHL,' 50%：'+NUMTOSTR(mHL,3)),ALIGN2,colorgreen;
DRAWTEXT(A and K=1, a1, ' 0.236：'+NUMTOSTR(a1,3)),ALIGN2,colorgreen;
DRAWTEXT(A and K=1, a2, ' 0.382：'+NUMTOSTR(a2,3)),ALIGN2,colorgreen;
DRAWTEXT(A and K=1, a3, ' 0.618：'+NUMTOSTR(a3,3)),ALIGN2,colorgreen;
DRAWTEXT(A and K=2, b1, ' 1/8：'+NUMTOSTR(b1,3)),ALIGN2,colorgreen;
DRAWTEXT(A and K=2, b2, ' 1/4：'+NUMTOSTR(b2,3)),ALIGN2,colorgreen;
DRAWTEXT(A and K=2, b3, ' 3/8：'+NUMTOSTR(b3,3)),ALIGN2,colorgreen;
DRAWTEXT(A and K=2, b4, ' 5/8：'+NUMTOSTR(b4,3)),ALIGN2,colorgreen;
DRAWTEXT(A and K=2, b5, ' 3/4：'+NUMTOSTR(b5,3)),ALIGN2,colorgreen;
DRAWTEXT(A and K=2, b6, ' 7/8：'+NUMTOSTR(b6,3)),ALIGN2,colorgreen;
DRAWTEXT(A and K<>3,HH, '￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,colorred,linethick7;
DRAWTEXT(A and K<>3,LL, '￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,colorred,linethick7;
DRAWTEXT(A and K<>3,mHL,'￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,coloryellow,linethick7;
DRAWTEXT(A and K=1, a1, '￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,colorblue,linethick7;
DRAWTEXT(A and K=1, a2, '￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,colorblue,linethick7;
DRAWTEXT(A and K=1, a3, '￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,colorblue,linethick7;
DRAWTEXT(A and K=2, b1, '￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,colorblue;
DRAWTEXT(A and K=2, b2, '￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,colorblue,linethick7;
DRAWTEXT(A and K=2, b3, '￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,colorblue;
DRAWTEXT(A and K=2, b4, '￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,colorblue;
DRAWTEXT(A and K=2, b5, '￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,colorblue,linethick7;
DRAWTEXT(A and K=2, b6, '￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,colorblue;
STICKLINE(C>=O,C,O,8,0),COLOR0000AA;
STICKLINE(C>=O,C,O,6,0),COLOR0000bb ;
STICKLINE(C>=O,C,O,4,0),COLOR0000cc ;
STICKLINE(C>=O,C,O,2,0),COLOR0000ee;
STICKLINE(C>=O,H,L,0,0),COLOR0000ff;
STICKLINE(C<=O,C,O,8,0),Color7B7b00;
STICKLINE(C<=O,C,O,6,0),Color909000;
STICKLINE(C<=O,C,O,4,0),ColorA8a800;
STICKLINE(C<=O,C,O,2,0),COLORcece00;
STICKLINE(C<=O,H,L,0,0),COLORffff00;
G:=ZIG(3,5)>REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)<=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)<=REF(ZIG(3,5),3);
X:=ZIG(3,5)<REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)>=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)>=REF(ZIG(3,5),3);
DRAWTEXT(G,L*0.997,'▲'),ALIGN1,Colorff00ff;
DRAWTEXT(G,L,'￣'),ALIGN1,Color00ff00;
DRAWTEXT(X,H*1.002,'▼'),ALIGN1,Color00ffff;
DRAWTEXT(X,H,'￣'),ALIGN1,Color00ffff;
ED:=barslast(G);
EF:=barslast(X);
買入到賣出天數:ED,LINETHICK0,ColorFFFFFF;
賣出到買入天數:EF,LINETHICK0,ColorFFFFFF;
換手: VOL/CAPITAL*100,LINETHICK0,colorwhite;
QQ:=換手;
DRAWTEXT(barpos=sysparam(2),C,'買入到到當前週期:'+NUMTOSTR(ED,0) +'天'+' 賣出到當前週期:'+NUMTOSTR(EF,0) +'天'+' 換手率:'+NUMTOSTR(QQ,2) +'%'),align5,colorFfff00;
P:=(C+H+L)/3;
R1:=2*P-L;
S1:=2*P-H;
R2:=P+(R1-S1);
S2:=P-(R1-S1);
SZ1:='壓力2:'+NUMTOSTR(R2[SYSPARAM(1)],2)+'\n壓力1:'+NUMTOSTR(R1[SYSPARAM(1)],2);
SZ2:='支撐1:'+NUMTOSTR(S1[SYSPARAM(1)],2)+'\n支撐2:'+NUMTOSTR(S2[SYSPARAM(1)],2);
DRAWTEXT(BARSCOUNT(C)=SYSPARAM(1),h*1.02,SZ1),ALIGN2,COLOREEBFFF;
DRAWTEXT(BARSCOUNT(C)=SYSPARAM(1),l*0.98,SZ2),ALIGN2,COLORFF9F93;
mead 附帶上了此圖片:
|
2007-12-04 15:11
