【股票指標(biāo)公式下載】-【大智慧】極品黃金上漲家數(shù)、黑馬線、趨勢

1、.：.；【大智慧】極品黃金上漲家數(shù)、黑馬線、趨勢線-目的公式源碼K(1,1,3); DRAWGBKLAST(C0,STRIP(RGB(90,90,90),RGB(0,0,0),0);ema13:ema(c,13),colorblue,linethick2;ema34:ema(c,34),colorred,linethick2;ema55:ema(c,55),coloryellow,linethick2;ema89:ema(c,89),colorwhite,linethick2;T := BARSLAST(DISPSTATUS=1)+1;A := DISPSTATUS=2;HH := HHV(H

2、, T);LL := LLV(L, T);HL := HH-LL;wH := HHVBARS(H, T);wL := LLVBARS(L, T);KK := wH-wL;mHL := HH-HL*0.5;if K=1 then begin HL191 := (HH-LL)*0.191; HL382 := (HH-LL)*0.382; HL618 := (HH-LL)*0.618; HL809 := (HH-LL)*0.809; if KK0 then begin a1 := HH-HL191; a2 := HH-HL382; a3 := HH-HL618; a4 := HH-HL809; en

3、d else begin a1 := LL+HL191; a2 := LL+HL382; a3 := LL+HL618; a4 := LL+HL809; endendif k=1 then begin HL125 := (HH-LL)*0.125; HL250 := (HH-LL)*0.25; HL375 := (HH-LL)*0.375; HL625 := (HH-LL)*0.625; HL750 := (HH-LL)*0.75; HL875 := (HH-LL)*0.875; if kk0 then begin b1 := HH-HL125; b2 := HH-HL250; b3 := H

4、H-HL375; b4 := HH-HL625; b5 := HH-HL750; b6 := HH-HL875; end else begin b1 := LL+HL125; b2 := LL+HL250; b3 := LL+HL375; b4 := LL+HL625; b5 := LL+HL750; b6 := LL+HL875; endend DRAWTEXT(A and K3,HH, 最高價：+HH),ALIGN2,colorgreen;DRAWTEXT(A and K3,LL, 最低價：+ll),ALIGN2,VALIGN2,colorgreen;DRAWTEXT(A and K3,m

5、HL, 50%：+mHL),ALIGN2,color00ffff;DRAWTEXT(A and K=1, a1, 0.191：+NUMTOSTRN(a1,2),ALIGN2,color00ffff;DRAWTEXT(A and K=1, a2, 0.382：+NUMTOSTRN(a2,2),ALIGN2,color00ffff;DRAWTEXT(A and K=1, a3, 0.618：+NUMTOSTRN(a3,2),ALIGN2,color00ffff;DRAWTEXT(A and K=1, a4, 0.809：+NUMTOSTRN(a4,2),ALIGN2,color00ffff;DRA

6、WTEXT(A and K=1, b1, 1/8：+NUMTOSTRN(b1,2),ALIGN2,colorgreen;DRAWTEXT(A and K=1, b2, 1/4：+NUMTOSTRN(b2,2),ALIGN2,colorgreen;DRAWTEXT(A and K=1, b3, 3/8：+NUMTOSTRN(b3,2),ALIGN0,colorgreen;DRAWTEXT(A and K=1, b4, 5/8：+NUMTOSTRN(b4,2),ALIGN0,colorgreen;DRAWTEXT(A and K=1, b5, 3/4：+NUMTOSTRN(b5,2),ALIGN2

7、,colorgreen;DRAWTEXT(A and K=1, b6, 7/8：+NUMTOSTRN(b6,2),ALIGN2,colorgreen;DRAWTEXT(A and K3,HH, ),ALIGN2,colorred,linethick7;DRAWTEXT(A and K3,LL, ),ALIGN2,colorred,linethick7;DRAWTEXT(A and K3,mHL,),ALIGN2,colorff0000,linethick7;DRAWTEXT(A and K=1, a1, ),ALIGN2,color208FFF,linethick0;DRAWTEXT(A an

8、d K=1, a2, ),ALIGN2,color208FFF,linethick0;DRAWTEXT(A and K=1, a3, ),ALIGN2,color208FFF,linethick0;DRAWTEXT(A and K=1, a4, ),ALIGN2,color208FFF,linethick0;DRAWTEXT(A and K=1, b1, ),ALIGN2,color00FF00;DRAWTEXT(A and K=1, b2, ),ALIGN2,color00ff00;DRAWTEXT(A and K=1, b3, ),ALIGN0,color00ff00;DRAWTEXT(A

9、 and K=1, b4, ),ALIGN0,color00ff00;DRAWTEXT(A and K=1, b5, ),ALIGN2,color00ff00;DRAWTEXT(A and K=1, b6, ),ALIGN2,color00FF00;OO:=ma(O,22);j:=kdj.j#DAY;CC:=ma(c,22);hs:=vol/CAPITAL*100;jj:=(H+L+C)/3;qj0:=vol/IF(H=L,4,H-L);qj1:=IF(CAPITAL=0,qj0*(jj-MIN(C,O),qj0*(MIN(O,C)-L);qj2:=IF(CAPITAL=0,qj0*(MIN(

10、O,C)-L),qj0*(jj-MIN(C,O);qj3:=qj0*(H-MAX(O,C);qj4:=qj0*(MAX(C,O)-jj);qj5:=qj1+qj2;qj6:=qj3+qj4;DD:=(qj5-qj6)/(qj5+qj6)*100;DDX:=(qj1+qj2)-(qj3+qj4)/sum(vol,10)*100;DDZ:=DD*17;DDY:=(qj2+qj4)-(qj1+qj3)/sum(vol,10)*100;bb:=(cross(j,0)and (ddx0 and ddy0) or DDZ400);bbd:=EMA(總0#WEEK,2)/sum(IF(CAPITAL=0,r

11、ef(INDEXA,1),ref(vol,1),5)*100;XH1:=ref(bbd,1)ref(bbd,1) and bbd-10;XH2:=ref(bbd,1)=15 and bbdref(bbd,1) and bbd=REF(c,1),H,L,0,0),COLOR0000FF;STICKLINE(C=REF(c,1),C,O,8,0),COLOR0000bb;STICKLINE(C=REF(c,1),C,O,5,0),COLOR0000dd;STICKLINE(C=REF(c,1),C,O,3,0),COLOR0000ee;STICKLINE(C=REF(c,1),C,O,1,0),C

12、OLOR0000ff;STICKLINE(CREF(c,1),H,L,0,0),COLORFFFF00;STICKLINE(CREF(c,1),C,O,8,0),COLOR999900;STICKLINE(CREF(c,1),C,O,5,0),COLORbbbb00;STICKLINE(CREF(c,1),C,O,3,0),COLORdddd00;STICKLINE(C0,CC,OO,8,0),COLORFF00FF;STICKLINE(bbd0,CC,OO,8,0),COLOR00FF00;DRAWICON(XH1,l*0.98,7);DRAWICON(XH2,h*1.02,8);DRAWT

13、EXT(bb,L*0.98,點錢),COLOR00FFFF;DRAWTEXTREL(20,0,上漲家數(shù):+NUMTOSTRN(DYNAINFO(69),0)+ 家),COLOR0066FF;DRAWTEXTREL(180,0,下跌家數(shù):+NUMTOSTRN(DYNAINFO(70),0)+ 家),COLOR99FF99;DRAWTEXTREL(340,0,平盤家數(shù):+NUMTOSTRN(DYNAINFO(71),0)+ 家),COLOREEEEEE;DRAWTEXTREL(20,50,STKLABEL+ +STKNAME+ +STRLEFT(BKNAME,40),ColorFFB060;x:=

14、BARSLAST(DISPSTATUS=1)+1; ah:=hhvall(hhv(h,x); al:=llvall(llv(l,x); x1:=(C+L+H)/3;bb13:=atan(ema(x1,13)-ref(ema(x1,13),1)*3.1416*10;ema8:=ema(c,8);x1:=(C+L+H)/3;bb13:=atan(ema(x1,13)-ref(ema(x1,13),1)*3.1416*10;ema8:=ema(c,8);AA1:=AMOUNT/V;BB1:=L1.2;DD1:=LMA(C,5)*0.921;EE1:=VMA(V,5)*1.5;FF1:=BB1 AND

15、 CC1 AND DD1 AND EE1;DRAWTEXT(ff1,(LOW* 0.99),老鼠倉),Color4080FF;A51:=3*SMA(C-LLV(L,55)/(HHV(H,55)-LLV(L,55)*100,5,1)-2*SMA(C-LLV(L,55)/(HHV(H,55)-LLV(L,55)*100,5,1);黑馬線:=EMA(A51,5);A54:=(C-LLV(L,21)/(HHV(H,21)-LLV(L,21)*100;趨勢線:=(MA(3*SMA(A54,6,1)-2*SMA(SMA(A54,5,1),5,1),2);DRAWTEXT(CROSS(趨勢線,0)AND 黑

16、馬線40,(HIGH* 0.97),大黑馬),COLORYELLOW;LC:=REF(CLOSE,1);RSI:=(SMA(MAX(CLOSE - LC),0),3,1) / SMA(ABS(CLOSE - LC),3,1) * 100);FF:=EMA(CLOSE,3);MA15:=EMA(CLOSE,21);DRAWTEXT(CROSS(FF,MA15),(LOW * 0.99),底背叛),ColorA6E500;DRAWTEXT(CROSS(88,RSI),(HIGH * 1.02),頂背叛),Color1880FF;VAR2:=LLV(LOW,27);VAR3:=HHV(HIGH,34);VAR4:=EMA(CLOSE-Var2)/(Var3-Var2)*4,4)*25;留意買:=IF(Var410),80,100);RSV:=(C-LLV(L,9)/(HHV(H,9)-LLV(L,9)*100;K:=SMA(RSV,3,1);D:=SMA(K,3,1);J:=3*K-2*D;超跌:=IF(J0,10,0);BDDD:=LLV(J,2)=LLV(J,8);買入:=IF(CROSS(J,REF(J+0.01,1) AND BDDD AND J20,30,0);DRAWTEXT(買入 AN