同花順的BBD指標 源碼
a=(ZDMR[-1]+BDMR[-1]); b=(ZDMC[-1]+BDMC[-1]); a1=SUM(a,1); b1=-SUM(b,1); STICKLINE(a1+b1>0,0,a1+b1,9,0),color0000ff; STICKLINE(a1+b1<0,0,a1+b1,9,0),color00ff00; 三日bbd:SUM(a1+b1,3),colorcyan; 五日bbd:SUM(a1+b1,5),colorred; 十日bbd:SUM(a1+b1,10),colorwhite;
同花順的大盤超級BBD指標,判斷大盤,盤中趨勢非常好,可惜同花順破解難登,恰逢貓大端午大作,就加進操盤手軟件中,現(xiàn)拿出來給大家試試,,還有些指標稍后上傳,祝壇友們端午快樂。。 源碼如下。。 jg:=(ORDERAMT(1 ,3)-ORDERAMT( 2,3))/100000000; dh:=(ORDERAMT(1 ,2)-ORDERAMT( 2,2)-ORDERAMT(1 ,3)+ORDERAMT( 2,3))/100000000; 凈額億元:(ORDERAMT( 1,2)-ORDERAMT( 2,2))/100000000,COLORSTICK,LINETHICK2; 超級機構:SUM(jg,0),COLOREED,LINETHICK2; 普通機構:SUM(dh,0),color3399FF ;
同花順一組分時指標公式源碼-------
(1)分時圖KDJ
N 1 100 14 M1 1 100 3 M2 1 100 3
RSV=(NEW-LLV(NEW,N))/(HHV(NEW,N)-LLV(NEW,N))*100; a=SMA(RSV,M1,1); b=SMA(a,M2,1); e=3*a-2*b; IF(a<0) a=0; IF(a>100) a=100; IF(b<0) b=0; IF(b>100) b=100; IF(e<0) e=0; IF(e>100) e=100; K:a; D:b; J:e;
(2)
分時圖MACD
SHORT 1 100 12 LONG 1 100 26 M 1 100 9
Df:EMA(NEW,SHORT) - EMA(NEW,LONG); DA:EMA(Df,M); MD:2*(Df-DA),COLORSTICK; FILLRGN(DF,DA,DF>REF(DF,3),RGB(255,0,0),DF<REF(DF,3),RGB(0,255,255));
(3)
分時動因
動因:(OUTVOL-INVOL )/VOL*100,colorwhite; 多空線:0;
(4)
分時BBI
BBI:=(EMA(NEW,3)+EMA(NEW,6)+EMA(NEW,12)+EMA(NEW,24))/4; PARTLINE(BBI,BBI>REF(BBI,1),RGB(255,0,255),BBI<REF(BBI,1),RGB(0,255,255),1);
(5)
分時BIAS
BIAS1 : (NEW-MA(NEW,6))/MA(NEW,6)*100; BIAS2 : (NEW-MA(NEW,12))/MA(NEW,12)*100; BIAS3 : (NEW-MA(NEW,24))/MA(NEW,24)*100;
(6)
分時FSRSI
LC := REF(NEW,1); RSI$1:SMA(MAX(NEW-LC,0),6,1)/SMA(ABS(NEW-LC),6,1)*100; RSI$2:SMA(MAX(NEW-LC,0),12,1)/SMA(ABS(NEW-LC),12,1)*100; RSI$3:SMA(MAX(NEW-LC,0),24,1)/SMA(ABS(NEW-LC),24,1)*100; zero1:20,POINTDOT; zero2:80,POINTDOT;
(7)
分時布林線
N 5 100 20
MID : MA(NEW,N); 上軌: MID + STD(NEW,N); 下軌: MID - STD(NEW,N); 上極限: MID + 2*STD(NEW,N); 下極限: MID - 2*STD(NEW,N);
(8)
分時主圖箭頭
LC=REF(NEW,1); WRSI=SMA(MAX(NEW-LC,0),9,1)/SMA(ABS(NEW-LC),9,1)*100; IF (CROSS(20,WRSI)) BUY; IF (CROSS(WRSI,80)) SELL;
(9)
大盤分時均價線
成交總額:=SUM(NEW*VOL,0); 成交總量:=SUM(ABS(VOL),0); 均價:成交總額/成交總量;
(10)
分時線變色指標
最新:=(IF(ISNULL(NEW),PRE,NEW)); PARTLINE(最新,最新>=REF(最新,1),RGB(255,0,0),最新<=REF(最新,1),RGB(0,255,0));
IF (MARKETTYPE == 176 OR MARKETTYPE==64) { b=SUBSAMEDAY(&VOL) ; m=SUM(b*最新,0); 均價:IF(m>0,m/VOL,PRE); } ELSE IF(CODETYPE!=0) { IF(ISNULL(MONEY) OR ISNULL(VOL) OR VOL==0 OR MONEY==0) 均價:PRE; ELSE IF(VOL==VOL[1] OR MONEY==MONEY[1]) 均價:均價[1]; ELSE 均價:MONEY/VOL; } DRAWGBK(FORMATTIME(1)<10 AND TRADETIME>242),RGB(0,0,128); RETURN;
hx_star; hx_star_p; hx_PriceLow; hx_PriceUp; hx_PriceMemo;
(11)
分時通道
最新:=(IF(ISNULL(NEW),PRE,NEW)); IF(ISNULL(NEW),PRE,NEW); IF (MARKETTYPE == 176 OR MARKETTYPE==64) { b=SUBSAMEDAY(&VOL) ; m=SUM(b*最新,0); 均價:IF(m>0,m/VOL,PRE); } ELSE IF(CODETYPE!=0) { IF(ISNULL(MONEY) OR ISNULL(VOL) OR VOL==0 OR MONEY==0) 均價:PRE; ELSE IF(VOL==VOL[1] OR MONEY==MONEY[1]) 均價:均價[1]; ELSE 均價:MONEY/VOL; } DRAWGBK(FORMATTIME(1)<10 AND TRADETIME>242),RGB(0,0,128); MA30:=MA(NEW,24); 上軌:MA30 + 2*STD(NEW,57),POINTDOT,COLORFFf00F; 下軌:MA30 - 2*STD(NEW,57),POINTDOT,COLORFFf00F; 中軌:(EMA(NEW,7)+EMA(NEW,14)+EMA(NEW,34)+EMA(NEW,54))/4,colorgreen; RETURN; hx_star; hx_star_p; hx_grow_p; hx_walk_p; hx_risk_p; hx_grow; hx_plate; hx_walk; hx_risk; hx_PriceLow; hx_PriceUp; hx_PriceMemo;
(12)
分時kdj與布林極限的疊加
mid:=EMA(NEW,20); upper:=mid+2*STD(NEW,20); lower:=mid-2*STD(NEW,20); 布林極限:=(NEW-lower)/(upper-lower)*100; b1:20; b2:50; b3:80; b4:0; b5:100; STICKLINE(REF(布林極限,1)>=布林極限 ,布林極限 ,REF(布林極限,1),0,0 ),COLOR00FF00; STICKLINE(REF(布林極限,1)>=布林極限 ,布林極限 ,REF(布林極限,1),8,0 ),COLOR008800; STICKLINE(REF(布林極限,1)>=布林極限 ,布林極限 ,REF(布林極限,1),7,0 ),COLOR009900; STICKLINE(REF(布林極限,1)>=布林極限 ,布林極限 ,REF(布林極限,1),6,0 ),COLOR00AA00; STICKLINE(REF(布林極限,1)>=布林極限 ,布林極限 ,REF(布林極限,1),5,0 ),COLOR00BB00; STICKLINE(REF(布林極限,1)>=布林極限 ,布林極限 ,REF(布林極限,1),4,0 ),COLOR00CC00; STICKLINE(REF(布林極限,1)>=布林極限 ,布林極限 ,REF(布林極限,1),3,0 ),COLOR00DD00; STICKLINE(REF(布林極限,1)>=布林極限 ,布林極限 ,REF(布林極限,1),2,0 ),COLOR00EE00; STICKLINE(REF(布林極限,1)>=布林極限 ,布林極限 ,REF(布林極限,1),1,0 ),COLOR00FF00;
STICKLINE(布林極限>=REF(布林極限,1),布林極限,REF(布林極限,1),0,0) ,COLORFFBBFF; STICKLINE(布林極限>=REF(布林極限,1),布林極限,REF(布林極限,1),8,0) ,COLORFF00FF; STICKLINE(布林極限>=REF(布林極限,1),布林極限,REF(布林極限,1),7,0) ,COLORFF22FF; STICKLINE(布林極限>=REF(布林極限,1),布林極限,REF(布林極限,1),6,0) ,COLORFF44FF; STICKLINE(布林極限>=REF(布林極限,1),布林極限,REF(布林極限,1),5,0) ,COLORFF66FF; STICKLINE(布林極限>=REF(布林極限,1),布林極限,REF(布林極限,1),4,0) ,COLORFF88FF; STICKLINE(布林極限>=REF(布林極限,1),布林極限,REF(布林極限,1),3,0) ,COLORFF99FF; STICKLINE(布林極限>=REF(布林極限,1),布林極限,REF(布林極限,1),2,0) ,COLORFFAAFF; STICKLINE(布林極限>=REF(布林極限,1),布林極限,REF(布林極限,1),1,0) ,COLORFFBBFF; LOWV:=LLV(NEW,15); HIGHV:=HHV(NEW,15); RSV:=EMA((NEW-LOWV)/(HIGHV-LOWV)*100,3); K:=EMA(RSV,3); D:=MA(K,3); PARTLINE(d,d>=REF(d,1),RGB(255,0,0),d<=REF(d,1),RGB(0,255,255));
a1:=BARSLAST(REF(CROSS(K,D),1)); b1:=REF(NEW,a1+1)>NEW AND REF(D,a1+1)<D AND CROSS(K,D) AND k<30; DRAWTEXT(IF(b1>0,1,0),d,'K底背'),colorcyan; c1:=BARSLAST(REF(CROSS(D,K),1)); d1:=REF(NEW,c1+1)<NEW AND REF(D,c1+1)>D AND CROSS(D,K) AND k>70; DRAWTEXT(IF(d1>0,1,0),d,'K頂背'),coloryellow;
中趨勢線:=3*SMA((NEW-LLV(NEW,27))/(HHV(NEW,27)-LLV(NEW,27))*100,5,1)-2*SMA(SMA((NEW-LLV(NEW,27))/(HHV(NEW,27)-LLV(NEW,27))*100,5,1),3,1); 中準備買入: IF(中趨勢線<=10,-10,0),colormagenta; 中準備賣出: IF(中趨勢線>=90,110,100),colorcyan;
長趨勢線:=3*SMA((NEW-LLV(NEW,55))/(HHV(NEW,55)-LLV(NEW,55))*100,5,1)-2*SMA(SMA((NEW-LLV(NEW,55))/(HHV(NEW,55)-LLV(NEW,55))*100,5,1),3,1); 長準備買入: STICKLINE(長趨勢線<=10 ,-5,-10,1,0); 長準備賣出: STICKLINE(長趨勢線>=90,105,110,1,0);
(13)
分時1分鐘K線圖
STICKLINE(REF(NEW,1)>=NEW ,NEW ,REF(NEW,1),0,0 ),COLOR00FF00; STICKLINE(REF(NEW,1)>=NEW ,NEW ,REF(NEW,1),8,0 ),COLOR008800; STICKLINE(REF(NEW,1)>=NEW ,NEW ,REF(NEW,1),7,0 ),COLOR009900; STICKLINE(REF(NEW,1)>=NEW ,NEW ,REF(NEW,1),6,0 ),COLOR00AA00; STICKLINE(REF(NEW,1)>=NEW ,NEW ,REF(NEW,1),5,0 ),COLOR00BB00; STICKLINE(REF(NEW,1)>=NEW ,NEW ,REF(NEW,1),4,0 ),COLOR00CC00; STICKLINE(REF(NEW,1)>=NEW ,NEW ,REF(NEW,1),3,0 ),COLOR00DD00; STICKLINE(REF(NEW,1)>=NEW ,NEW ,REF(NEW,1),2,0 ),COLOR00EE00; STICKLINE(REF(NEW,1)>=NEW ,NEW ,REF(NEW,1),1,0 ),COLOR00FF00;
STICKLINE(NEW>REF(NEW,1),NEW,REF(NEW,1),0,0) ,COLORFFBBFF; STICKLINE(NEW>REF(NEW,1),NEW,REF(NEW,1),8,0) ,COLORFF00FF; STICKLINE(NEW>REF(NEW,1),NEW,REF(NEW,1),7,0) ,COLORFF22FF; STICKLINE(NEW>REF(NEW,1),NEW,REF(NEW,1),6,0) ,COLORFF44FF; STICKLINE(NEW>REF(NEW,1),NEW,REF(NEW,1),5,0) ,COLORFF66FF; STICKLINE(NEW>REF(NEW,1),NEW,REF(NEW,1),4,0) ,COLORFF88FF; STICKLINE(NEW>REF(NEW,1),NEW,REF(NEW,1),3,0) ,COLORFF99FF; STICKLINE(NEW>REF(NEW,1),NEW,REF(NEW,1),2,0) ,COLORFFAAFF; STICKLINE(NEW>REF(NEW,1),NEW,REF(NEW,1),1,0) ,COLORFFBBFF;
中軌:=MA(NEW,20); 上極限:中軌+2*STD(NEW,20),colorred; 下極限:中軌-2*STD(NEW,20),colorblue; BBI:=(MA(NEW,3)+MA(NEW,6)+MA(NEW,12)+MA(NEW,24))/4; PARTLINE(BBI,BBI>REF(BBI,1),RGB(255,0,0),BBI<REF(BBI,1),RGB(0,255,0),1);
(14)
自用同花順分時KDJ(長短線結合加建倉)
RSV:=(NEW-LLV(NEW,14))/(HHV(NEW,14)-LLV(NEW,14))*100; K:=SMA(RSV,3,1); D:=SMA(K,3,1); J1:=(3*K-2*D); IF(j1>100) j1=100; IF(j1<0) j1=0; j2:=SMA(j1,3,1); j:=SMA(j2,3,1); PARTLINE(j,j>=REF(j,1),RGB(255,0,0),j<=REF(j,1),RGB(0,255,0)); zero1:0; ZERO2:20,POINTDOT,colorwhite; ZERO3:80,POINTDOT,colorwhite; zero4:100; V11:=3*SMA((NEW-LLV(NEW,55))/(HHV(NEW,55)-LLV(NEW,55))*100,5,1)-2*SMA(SMA((NEW-LLV(NEW,55))/(HHV(NEW,55)-LLV(NEW,55))*100,5,1),3,1); 趨勢線:=EMA(V11,3); V12:=(趨勢線-REF(趨勢線,1))/REF(趨勢線,1)*100; 準備現(xiàn)金: STICKLINE(趨勢線<=10 ,20,25,1,0),colorcc9900; 買入股票: STICKLINE(趨勢線<=10 AND V12>10 ,30,20,1,0),color0099ff; 見頂清倉: STICKLINE(趨勢線>=90 AND V12<=90,80,70,1,0),colorgray; 準備現(xiàn)金: STICKLINE(趨勢線<=13 AND j<=20,20,25,1,0),colorcc9900;
(15)
自用分時MACD
Dif:=EMA(NEW,6) - EMA(NEW,21); diff:=EMA(dif,6); dea:=MA(diff,6); zero:0; MB:=dea-REF(dea,1);
PARTLINE(dea,dea>REF(dea,1),RGB(255,0,255),dea<REF(dea,1),RGB(0,255,255),1);
a1:=BARSLAST(REF(CROSS(Mb,0),1)); b1:=REF(NEW,a1+1)>NEW AND REF(dEA,a1+1)<DEA AND CROSS(Mb,0) AND diff<0; DRAWTEXT(IF(b1>0,1,0),dea,'macd底背'),colorcyan; c1:=BARSLAST(REF(CROSS(0,Mb),1)); d1:=REF(NEW,c1+1)<NEW AND REF(DEA,c1+1)>dEA AND CROSS(0,Mb) AND diff>0; DRAWTEXT(IF(d1>0,1,0),dea,'macd頂背'),colormagenta;
(16)
權證分時
最新:IF(ISNULL(NEW),PRE,NEW);
主力持倉:=EMA(100*(NEW-LLV(NEW,34))/(HHV(NEW,34)-LLV(NEW,34)),3); 箱頂:HHV(MA((NEW),5),30); 箱底:LLV(MA((NEW),5),30) ; 長底:LLV(MA((NEW),5),120);
JJ:=(NEW+HHV(MA((NEW),5),2)+LLV(MA((NEW),5),2))/3; AA:=EMA(JJ,3); BB:=REF(AA,1); STICKLINE(AA>BB,AA,BB,3,0),coloryellow,;
V1:=LLV(NEW,10); V2:=HHV(NEW,25); 價位線:=EMA((NEW-V1)/(V2-V1)*4,4); DRAWTEXT(CROSS(價位線,0.3),NEW,'★'),colorred;
IF (MARKETTYPE == 176 OR MARKETTYPE==64) { b=SUBSAMEDAY(&VOL) ; m=SUM(b*最新,0); 均價:IF(m>0,m/VOL,PRE); } ELSE IF(CODETYPE!=0) { IF(ISNULL(MONEY) OR ISNULL(VOL) OR VOL==0 OR MONEY==0) 均價:PRE; ELSE IF(VOL==VOL[1] OR MONEY==MONEY[1]) 均價:均價[1]; ELSE 均價:MONEY/VOL; } DRAWGBK(FORMATTIME(1)<10 AND TRADETIME>242),RGB(0,0,128); RETURN; hx_star; hx_star_p; hx_PriceLow; hx_PriceUp; hx_PriceMemo;
(17)
分時量變紅和綠
DRAWGBK(FORMATTIME(1)<10 AND (MARKETTYPE==32 OR MARKETTYPE==16) AND TRADETIME>242, STRIP(RGB(0,0,128),RGB(0,0,128),1));
量:MAX(0,SUBSAMEDAY(&VOL)); RETURN 量;
(18)
分時用指標
最新:IF(ISNULL(NEW),PRE,NEW); MA13:MA(NEW,n1); MA34:MA(NEW,n2); DIFF : =EMA(NEW,13) - EMA(NEW,34); DEA : =EMA(DIFF,13); MACDFS : =2*(DIFF-DEA/2); PARTLINE(MA13,MA13>REF(MA13,1),RGB(222,0,222),MA13<REF(MA13,1),RGB(0,255,255)),LINETHICK2; PARTLINE(MA34,MA34>REF(MA34,1),RGB(255,0,0),MA34<REF(MA34,1),RGB(0,255,255)),LINETHICK2; PARTLINE(最新,最新>REF(最新,1),RGB(255,0,0),最新<REF(最新,1),RGB(0,255,255)),LINETHICK1; 高分:HHV(MA13,15); 低分:LLV(MA13,15); 低分1:LLV(MA13,34); DRAWTEXT(CROSS(最新,低分1) AND MACDFS>DIFF AND MA13>低分1 ,低分1,'買入');
N1:1 100 13 N2:1 100 34
(19)
堅持分時kdj
LOWV:=LLV(NEW,15); HIGHV:=HHV(NEW,15); RSV:=EMA((NEW-LOWV)/(HIGHV-LOWV)*100,3); K:=EMA(rsv,3); D:=MA(K,3); zero1:20,pointdot,colorwhtite; zero2:80,pointdot,colorwhite; zero3:0; zero4:100; PARTLINE(d,d>=REF(d,1),RGB(255,0,0),d<=REF(d,1),RGB(0,255,0)); a1:=BARSLAST(REF(CROSS(k,d),1)); b1:=REF(NEW,a1+1)>NEW AND REF(K,a1+1)<K AND CROSS(k,d) AND k<30; DRAWTEXT(IF(b1>0,1,0),d,'k底背'),colorgreen; c1:=BARSLAST(REF(CROSS(d,k),1)); d1:=REF(NEW,c1+1)<NEW AND REF(K,c1+1)>K AND CROSS(d,k) AND k>70; DRAWTEXT(IF(d1>0,1,0),d,'k頂背'),coloryellow; 中趨勢線:=3*SMA((NEW-LLV(NEW,27))/(HHV(NEW,27)-LLV(NEW,27))*100,5,1)-2*SMA(SMA((NEW-LLV(NEW,27))/(HHV(NEW,27)-LLV(NEW,27))*100,5,1),3,1); 長趨勢線:=3*SMA((NEW-LLV(NEW,55))/(HHV(NEW,55)-LLV(NEW,55))*100,5,1)-2*SMA(SMA((NEW-LLV(NEW,55))/(HHV(NEW,55)-LLV(NEW,55))*100,5,1),3,1); DRAWGBK(中趨勢線>=90,STRIP(RGB(100,0,100),RGB(100,0,100),2)); DRAWGBK(中趨勢線<=10,STRIP(RGB(0,100,100),RGB(0,100,100),2)); DRAWGBK(長趨勢線>=90,STRIP(RGB(150,0,150),RGB(150,0,150),2)); DRAWGBK(長趨勢線<=10,STRIP(RGB(0,150,150),RGB(0,150,150),2));
(20)
精品分時macd 參數(shù); short 5 40 12 long10 100 26 m 2 40 9
dif:=ema(new,5) - ema(new,21); dea1:=sma(dif,5,1); dea:=sma(dea1,5,1); zero:0,pointdot,colorwhite;
partline(dea,dea>ref(dea,1),rgb(255,0,255),dea<ref(dea,1),rgb(0,255,255),1);
(21)小刀K線
VAR1:=NEW>REF(NEW,1) AND NEW>REF(NEW,2); VAR2:=REF(VAR1,1) AND NEW<=REF(NEW,1) AND NEW>=REF(NEW,2); VAR3:=REF(VAR2,1) AND NEW>=REF(NEW,1) AND NEW<=REF(NEW,2); VAR4:=REF(VAR3,1) AND NEW<=REF(NEW,1) AND NEW>=REF(NEW,2); VAR5:=REF(VAR4,1) AND NEW>=REF(NEW,1) AND NEW<=REF(NEW,2); VAR6:=REF(VAR5,1) AND NEW<=REF(NEW,1) AND NEW>=REF(NEW,2); VAR7:=REF(VAR6,1) AND NEW>=REF(NEW,1) AND NEW<=REF(NEW,2); VAR8:=REF(VAR7,1) AND NEW<=REF(NEW,1) AND NEW>=REF(NEW,2); VAR9:=REF(VAR8,1) AND NEW>=REF(NEW,1) AND NEW<=REF(NEW,2); VARA:=REF(VAR9,1) AND NEW<=REF(NEW,1) AND NEW>=REF(NEW,2); VARB:=REF(VARA,1) AND NEW>=REF(NEW,1) AND NEW<=REF(NEW,2); VARC:=REF(VARB,1) AND NEW<=REF(NEW,1) AND NEW>=REF(NEW,2); STICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,NEW,REF(NEW,1),3,1),colorred; VARD:=NEW<REF(NEW,1) AND NEW<REF(NEW,2); VARE:=REF(VARD,1) AND NEW>=REF(NEW,1) AND NEW<=REF(NEW,2); VARF:=REF(VARE,1) AND NEW<=REF(NEW,1) AND NEW>=REF(NEW,2); VAR10:=REF(VARF,1) AND NEW>=REF(NEW,1) AND NEW<=REF(NEW,2); VAR11:=REF(VAR10,1) AND NEW<=REF(NEW,1) AND NEW>=REF(NEW,2); VAR12:=REF(VAR11,1) AND NEW>=REF(NEW,1) AND NEW<=REF(NEW,2); VAR13:=REF(VAR12,1) AND NEW<=REF(NEW,1) AND NEW>=REF(NEW,2); VAR14:=REF(VAR13,1) AND NEW>=REF(NEW,1) AND NEW<=REF(NEW,2); VAR15:=REF(VAR14,1) AND NEW<=REF(NEW,1) AND NEW>=REF(NEW,2); VAR16:=REF(VAR15,1) AND NEW>=REF(NEW,1) AND NEW<=REF(NEW,2); VAR17:=REF(VAR16,1) AND NEW<=REF(NEW,1) AND NEW>=REF(NEW,2); VAR18:=REF(VAR17,1) AND NEW>=REF(NEW,1) AND NEW<=REF(NEW,2); STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,NEW,REF(NEW,1),3,0),COLORFFCC66; VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1; VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD; STICKLINE(VAR19,REF(NEW,1),REF(NEW,2),3,0),colorred; STICKLINE(VAR1A,REF(NEW,1),REF(NEW,2),3,0),colorblue;
箱底:LLV(MA((NEW),5),30),colorwhite; 箱頂:HHV(MA((NEW),6),30),COLOR00AAFF;
(22)
小刀趨勢
短趨勢:((3*SMA((NEW-LLV(NEW,27))/(HHV(NEW,27)-LLV(NEW,27))*100,5,1)-2*SMA(SMA((NEW-LLV(NEW,27))/(HHV(NEW,27)-LLV(NEW,27))*100,5,1),3,1)-50)*1.032+50),colorred; VAR2:=(NEW+HHV(MA(NEW,5),2)+LLV(MA(NEW,5),2))/3; VAR3:=LLV(NEW,34); VAR4:=HHV(NEW,34); 長趨勢:EMA((VAR2-VAR3)/(VAR4-VAR3)*100,13),COLOR00FF00; 主力持倉:EMA(100*(NEW-LLV(NEW,34))/(HHV(NEW,34)-LLV(NEW,34)),3),colorblue;
(23)
分時macd 帶買賣箭頭
Diff:=EMA(NEW,5) - EMA(NEW,21); dif:=EMA(diff,5); dea:=EMA(dif,5); zero:0;
PARTLINE(dif,dif>=REF(dif,1),RGB(255,0,0),dif<=REF(dif,1),RGB(0,255,0)); PARTLINE(dea,dea>=REF(dea,1),RGB(255,0,255),dea<=REF(dea,1),RGB(0,255,255));
mb:=dea-REF(dea,1);
a1:=BARSLAST(REF(CROSS(Mb,0),1)); b1:=REF(NEW,a1+1)>NEW AND REF(dEA,a1+1)<DEA AND CROSS(Mb,0) AND diff<0; DRAWTEXT(IF(b1>0,1,0),dea,'macd底背'),colorcyan; c1:=BARSLAST(REF(CROSS(0,Mb),1)); d1:=REF(NEW,c1+1)<NEW AND REF(DEA,c1+1)>dEA AND CROSS(0,Mb) AND diff>0; DRAWTEXT(IF(d1>0,1,0),dea,'macd頂背'),colormagenta;
lc=REF(NEW,1); wrsi=SMA(MAX(NEW-lc,0),9,1)/SMA(ABS(NEW-lc),9,1)*100; IF (CROSS(20,wrsi)) BUY; IF (CROSS(wrsi,80)) SELL;
(24)
變色分時圖
{DRAWGBK(DATE>900103,STRIP(RGB(100,180,255),RGB(120,120,255),1));} 最新:=(IF(ISNULL(NEW),PRE,NEW)),Color00FFFF,LINETHICK2; PARTLINE(最新,最新>=REF(最新,1),RGB(255,0,0),最新<=REF(最新,1),RGB(0,255,0)),LINETHICK2; IF (MARKETTYPE == 176 OR MARKETTYPE==64) { b=SUBSAMEDAY(&VOL) ; m=SUM(b*最新,0); 均價:IF(m>0,m/VOL,PRE); } ELSE IF(CODETYPE!=0) { IF(ISNULL(MONEY) OR ISNULL(VOL) OR VOL==0 OR MONEY==0) 均價:PRE; ELSE IF(VOL==VOL[1] OR MONEY==MONEY[1]) 均價:均價[1]; ELSE 均價:MONEY/VOL; } DRAWGBK(FORMATTIME(1)<10 AND TRADETIME>242),RGB(0,0,128); RETURN; hx_star; hx_star_p; hx_PriceLow; hx_PriceUp; hx_PriceMemo;
(25)
分時變色
DRAWGBK(V>1,STRIP(RGB(120,120,255),RGB(140,140,255),1)); 最新:IF(ISNULL(NEW),PRE,NEW); 主力持倉:=EMA(100*(NEW-LLV(NEW,34))/(HHV(NEW,34)-LLV(NEW,34)),3); 箱頂:HHV(MA((NEW),5),30); 箱底:LLV(MA((NEW),5),30) ,ColorFFFF06; 長底:LLV(MA((NEW),5),120); JJ:=(NEW+HHV(MA((NEW),5),2)+LLV(MA((NEW),5),2))/3; AA:=EMA(JJ,3); BB:=REF(AA,1); STICKLINE(AA>BB,AA,BB,3,0),coloryellow,; V1:=LLV(NEW,10); V2:=HHV(NEW,25); 價位線:=EMA((NEW-V1)/(V2-V1)*4,4); DRAWTEXT(CROSS(價位線,0.3),NEW,'★'),colorred; IF (MARKETTYPE == 176 OR MARKETTYPE==64) { b=SUBSAMEDAY(&VOL) ; m=SUM(b*最新,0); 均價:IF(m>0,m/VOL,PRE); } ELSE IF(CODETYPE!=0) { IF(ISNULL(MONEY) OR ISNULL(VOL) OR VOL==0 OR MONEY==0) 均價:PRE; ELSE IF(VOL==VOL[1] OR MONEY==MONEY[1]) 均價:均價[1]; ELSE 均價:MONEY/VOL; } DRAWGBK(FORMATTIME(1)<10 AND TRADETIME>242),RGB(0,0,128); RETURN; hx_star; hx_star_p; hx_PriceLow; hx_PriceUp; hx_PriceMemo;
(26)
趨勢
短趨勢:((3*SMA((NEW-LLV(NEW,27))/(HHV(NEW,27)-LLV(NEW,27))*100,5,1)-2*SMA(SMA((NEW-LLV(NEW,27))/(HHV(NEW,27)-LLV(NEW,27))*100,5,1),3,1)-50)*1.032+50),colorred; VAR2:=(NEW+HHV(MA(NEW,5),2)+LLV(MA(NEW,5),2))/3; VAR3:=LLV(NEW,34); VAR4:=HHV(NEW,34); 長趨勢:EMA((VAR2-VAR3)/(VAR4-VAR3)*100,13),COLOR00FF00; 主力持倉:EMA(100*(NEW-LLV(NEW,34))/(HHV(NEW,34)-LLV(NEW,34)),3),colorblue;
(27)
權證變色
最新:IF(ISNULL(NEW),PRE,NEW); byx:=MA(最新,10); xxx:=MA(最新,20); yyy:=MA(最新,40); k:=SLOPE(byx,3); K7:=SLOPE(byx,7); m_k=MA(k,2); aa=SLOPE(m_k,1); //K13:=SLOPE(byx,7); //PARTLINE(最新,k>=0AND K7>=0 AND aa>=0 ,RGB(255,0,0),k<=0 AND K7<=0 AND aa<=0 ,RGB(0,255,0)); FILLRGN(byx,REF(byx,2),byx>REF(byx,2),RGB(255,0,0),byx<REF(byx,2),RGB(0,0,255)); //FILLRGN(xxx,REF(xxx,4),xxx>REF(xxx,4),RGB(200,50,50),xxx<REF(xxx,4),RGB(10,100,200)); //FILLRGN(yyy,0.998*REF(yyy,2),yyy>REF(yyy,2),RGB(200,20,20),yyy<REF(yyy,2),RGB(10,200,50)); 主力持倉:=EMA(100*(NEW-LLV(NEW,34))/(HHV(NEW,34)-LLV(NEW,34)),3); 箱頂:HHV(MA((NEW),5),30),colorbrown; 箱底:LLV(MA((NEW),5),30) ,colormagenta; 長底:LLV(MA((NEW),5),120),colorgray; JJ:=(NEW+HHV(MA((NEW),5),2)+LLV(MA((NEW),5),2))/3; AA:=EMA(JJ,3); BB:=REF(AA,1); STICKLINE(AA>BB,AA,BB,3,0),coloryellow; V1:=LLV(NEW,10); V2:=HHV(NEW,25); 價位線:=EMA((NEW-V1)/(V2-V1)*4,4); DRAWTEXT(CROSS(價位線,0.3),NEW,'★'),colorred; IF (MARKETTYPE == 176 OR MARKETTYPE==64) { b=SUBSAMEDAY(&VOL) ; m=SUM(b*最新,0); 均價:IF(m>0,m/VOL,PRE); } ELSE IF(CODETYPE!=0) { IF(ISNULL(MONEY) OR ISNULL(VOL) OR VOL==0 OR MONEY==0) 均價:PRE; ELSE IF(VOL==VOL[1] OR MONEY==MONEY[1]) 均價:均價[1]; ELSE 均價:MONEY/VOL; } DRAWGBK(FORMATTIME(1)<10 AND TRADETIME>242),RGB(0,0,128); jun_k=SLOPE(均價,1); PARTLINE(最新,k>=0AND K7>=0 AND jun_k>=0 ,RGB(255,0,0),k<=0 AND K7<=0 AND jun_k<=0 ,RGB(0,255,0)); RETURN; hx_star; hx_star_p; hx_PriceLow; hx_PriceUp; hx_PriceMemo;
資金分布源碼如下:
DRAWGBK(DATE>900103,STRIP(RGB(0,0,20),RGB(0,0,80),1)); cap:=CLOSE; AL1:=MA(VOL,5); AL2:=MA(VOL,40); A1:=LLV(LOW,120); A2:=1.191*A1; A3:=1.382*A1; A4:=1.618*A1; A5:=1.809*A1; A6:=MA(C,60); 觀望:=(C<A2)*VOL,COLOR808040,LINETHICK0; 低吸:=(C>A2)*VOL,COLORE0FFFF,LINETHICK0; 持股:=(C>A3)*VOL,COLORFF33FF,LINETHICK0; 突破:=(C>A4)*VOL,COLOR00FFFF,LINETHICK0; 瘋馬:=(C>A5)*VOL,COLOR0000FF,LINETHICK0; 減倉:=(C>A5 AND C<A6)*VOL,COLORFF8000,LINETHICK0;
STICKLINE(C<A2,0,VOL,10,0),Color9E7001; STICKLINE(C<A2,0,VOL,8,0), ColorBE8601; STICKLINE(C<A2,0,VOL,6,0), ColorDE9C01; STICKLINE(C<A2,0,VOL,5,0), ColorFEB301; STICKLINE(C<A2,0,VOL,4,0), ColorFEBC21; STICKLINE(C<A2,0,VOL,3,0), ColorFEC641; STICKLINE(C<A2,0,VOL,2,0), ColorFECF61; STICKLINE(C<A2,0,VOL,1,0), ColorFED981;
STICKLINE(C>A2,0,VOL,10,0),Color4F4F4F; STICKLINE(C>A2,0,VOL,8,0),Color5F5F5F; STICKLINE(C>A2,0,VOL,6,0),Color6F6F6F; STICKLINE(C>A2,0,VOL,5,0),Color7F7F7F; STICKLINE(C>A2,0,VOL,4,0),Color8F8F8F; STICKLINE(C>A2,0,VOL,3,0),Color9F9F9F; STICKLINE(C>A2,0,VOL,2,0),ColorAFAFAF; STICKLINE(C>A2,0,VOL,1,0),ColorC0C0C0;
STICKLINE(C>A3,0,VOL,10,0),Color9F009F; STICKLINE(C>A3,0,VOL,8,0),ColorBF00BF; STICKLINE(C>A3,0,VOL,6,0),ColorDF00DF; STICKLINE(C>A3,0,VOL,5,0),ColorFF00FF; STICKLINE(C>A3,0,VOL,4,0),ColorFF20FF; STICKLINE(C>A3,0,VOL,3,0),ColorFF40FF; STICKLINE(C>A3,0,VOL,2,0),ColorFF60FF; STICKLINE(C>A3,0,VOL,1,0),ColorFF80FF;
STICKLINE(C>A4,0,VOL,10,0),Color04769B; STICKLINE(C>A4,0,VOL,8,0),Color058DBA; STICKLINE(C>A4,0,VOL,6,0),Color06A5D9; STICKLINE(C>A4,0,VOL,5,0),Color07BCF8; STICKLINE(C>A4,0,VOL,4,0),Color27C4F8; STICKLINE(C>A4,0,VOL,3,0),Color46CCF9; STICKLINE(C>A4,0,VOL,2,0),Color65D5FA; STICKLINE(C>A4,0,VOL,1,0),Color84DDFB;
STICKLINE(C>A5,0,VOL,10,0),Color00009F; STICKLINE(C>A5,0,VOL,8,0),Color0000BF; STICKLINE(C>A5,0,VOL,6,0),Color0000DF; STICKLINE(C>A5,0,VOL,5,0),Color0000FF; STICKLINE(C>A5,0,VOL,4,0),Color2020FF; STICKLINE(C>A5,0,VOL,3,0),Color4040FF; STICKLINE(C>A5,0,VOL,2,0),Color6060FF; STICKLINE(C>A5,0,VOL,1,0),Color8080FF;
STICKLINE(C>A5 AND C<A6,0,VOL,10,0),Color009F00; STICKLINE(C>A5 AND C<A6,0,VOL,8,0),Color00BF00; STICKLINE(C>A5 AND C<A6,0,VOL,6,0),Color00DF00; STICKLINE(C>A5 AND C<A6,0,VOL,5,0),Color00FF00; STICKLINE(C>A5 AND C<A6,0,VOL,4,0),Color20FF20; STICKLINE(C>A5 AND C<A6,0,VOL,3,0),Color40FF40; STICKLINE(C>A5 AND C<A6,0,VOL,2,0),Color60FF60; STICKLINE(C>A5 AND C<A6,0,VOL,1,0),Color80FF80; V1:MA(VOL,5),colorred; V2:MA(VOL,40),COLOR00D7FF;
分時的,l2用,源碼,
普通機構:((BIGBUYCOUNT2+WAITBUYCOUNT2)-(BIGSELLCOUNT2+WAITSELLCOUNT2)); 普通機構凈額:((BIGBUYMONEY2+WAITBUYMONEY2)-(BIGSELLMONEY2+WAITSELLMONEY2)); 超級機構:((BIGBUYCOUNT1+WAITBUYCOUNT1)-(BIGSELLCOUNT1+WAITSELLCOUNT1))-普通機構; 超級機構凈額:((BIGBUYMONEY1+WAITBUYMONEY1)-(BIGSELLMONEY1+WAITSELLMONEY1))-普通機構凈額;
[同花順] 【同花順指標公式】開盤預測全天指標公式-2010最新版
STICKLINE(HOUR>=9 AND HOUR<10 ,0, V/((TIME-93000)/100)*240,4.5,1),colorwhite; STICKLINE(HOUR>=10 AND HOUR<11 ,0, V/((TIME-100000)/100+30)*240,4.5,1),colorwhite; STICKLINE(HOUR>=11 AND HOUR<12 ,0, V/((TIME-110000)/100+90)*240,4.5,1),colorwhite; STICKLINE(HOUR>=13 AND HOUR<=14,0, V/((TIME-130000)/100+120)*240,4.5,1),colorwhite; STICKLINE(HOUR>=14 AND HOUR<=15,0, V/((TIME-140000)/100+180)*240,4.5,1),colorwhite; VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); 主動買盤:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL)); 主動賣盤:=IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1*(HIGH-LOW),0-VOL)); STICKLINE(C>O,0,VOL,4.5,1),colorred; STICKLINE(C<O ,0,VOL,4.5,1),COLORFFFF00; STICKLINE(C=O AND C<REF(C,1),0,VOL,4.5,1),COLORFFFF00; STICKLINE(C=O AND C>REF(C,1),0,VOL,4.5,1),colorred; STICKLINE(主動買盤>0,0,主動買盤,4.5,0),colorred; 換手: VOL/CAPITAL*100; STICKLINE(換手>=3 AND 換手<8,0, 主動買盤,2,0),coloryellow; STICKLINE(換手>=8,0, 主動買盤, 2,0) ,colorgreen; MA5:MA(VOL,5),coloryellow; MA13:MA(VOL,13),colorwhite; DRAWTEXT(CROSS(MA5,MA13),CROSS(MA5,MA13),'*'),coloryellow;
買線:=EMA(C,2); 賣線:=EMA(SLOPE(C,21)*20+C,42); BU:=CROSS(買線,賣線); SEL:=CROSS(賣線,買線); DRAWTEXT(bu,LOW*0.999,'B'),colorred,linethick3; DRAWTEXT(bu,LOW,'﹉'),Color208FFF,LINETHICK3; DRAWTEXT(sel,HIGH,'﹉'),ColorFFFF00,LINETHICK3; DRAWTEXT(sel,HIGH*1.008,'S'),colorffff00,linethick3; STICKLINE(買線>=賣線,LOW,HIGH,1,0),colorred; STICKLINE(買線>=賣線,CLOSE,OPEN,4.5,0),color0000aa; STICKLINE(買線>=賣線,CLOSE,OPEN,4,0),color0000cc; STICKLINE(買線>=賣線,CLOSE,OPEN,3,0),color0000cc; STICKLINE(買線>=賣線,CLOSE,OPEN,2,0),color0000ee; STICKLINE(買線<賣線,CLOSE,OPEN,4.5,0),coloraaaa00; STICKLINE(買線<賣線,CLOSE,OPEN,4,0),colorbbbb00; STICKLINE(買線<賣線,CLOSE,OPEN,3,0),colorcccc00; STICKLINE(買線<賣線,CLOSE,OPEN,2,0),coloreeee00; STICKLINE(買線<賣線,LOW,HIGH,1,0),colorffff00; STICKLINE(CROSS(買線,賣線) OR CROSS(賣線,買線),OPEN,CLOSE,3,0),color00ffff; 指導線: EMA((EMA(CLOSE,4)+EMA(CLOSE,6)+EMA(CLOSE,12)+EMA(CLOSE,24))/4,2),linethick1,ColorFFffFF; 界: MA(CLOSE,27),linethick1,Color00FFFF; DRAWTEXT(CROSS(指導線,界),界,' ̄'),Colorffffff; DRAWTEXT(CROSS(界,指導線),界,' ̄'),Color00ffff; RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; K:=SMA(RSV,3,1); D:=SMA(K,3,1); J:=3*K-2*D; G:=95; |
超級BBD源碼(普通版同花順可用)
本帖最后由 cssm 于 2009-8-25 23:26 編輯
從網(wǎng)上找了一個同花順的BBD源碼,發(fā)現(xiàn)數(shù)據(jù)不顯示,把多余語句刪了,并作了一些修改,去掉了一條線,看起來比較清爽
a=(ZDMR[-1]+BDMR[-1]); b=(ZDMC[-1]+BDMC[-1]); a1=SUM(a,1); b1=-SUM(b,1); STICKLINE(a1+b1>0,0,a1+b1,9,0),color0000ff; STICKLINE(a1+b1<0,0,a1+b1,9,0),color00ff00; 三日bbd:SUM(a1+b1,3),colorcyan; 五日bbd:SUM(a1+b1,5),colorred; 十日bbd:SUM(a1+b1,10),colorwhite;
和level2的比較了一下,值有點出入,但基本上趨勢是相差無幾,大家可以自己用用看
|
同花順的BBD指標 源碼
a=(ZDMR[-1]+BDMR[-1]); b=(ZDMC[-1]+BDMC[-1]); a1=SUM(a,1); b1=-SUM(b,1); STICKLINE(a1+b1>0,0,a1+b1,9,0),color0000ff; STICKLINE(a1+b1<0,0,a1+b1,9,0),color00ff00; 三日bbd:SUM(a1+b1,3),colorcyan; 五日bbd:SUM(a1+b1,5),colorred; 十日bbd:SUM(a1+b1,10),colorwhite;
同花順的大盤超級BBD指標,判斷大盤,盤中趨勢非常好,可惜同花順破解難登,恰逢貓大端午大作,就加進操盤手軟件中,現(xiàn)拿出來給大家試試,,還有些指標稍后上傳,祝壇友們端午快樂。。 源碼如下。。 jg:=(ORDERAMT(1 ,3)-ORDERAMT( 2,3))/100000000; dh:=(ORDERAMT(1 ,2)-ORDERAMT( 2,2)-ORDERAMT(1 ,3)+ORDERAMT( 2,3))/100000000; 凈額億元:(ORDERAMT( 1,2)-ORDERAMT( 2,2))/100000000,COLORSTICK,LINETHICK2; 超級機構:SUM(jg,0),COLOREED,LINETHICK2; 普通機構:SUM(dh,0),color3399FF ;
同花順一組分時指標公式源碼-------
(1)分時圖KDJ
N 1 100 14 M1 1 100 3 M2 1 100 3
RSV=(NEW-LLV(NEW,N))/(HHV(NEW,N)-LLV(NEW,N))*100; a=SMA(RSV,M1,1); b=SMA(a,M2,1); e=3*a-2*b; IF(a<0) a=0; IF(a>100) a=100; IF(b<0) b=0; IF(b>100) b=100; IF(e<0) e=0; IF(e>100) e=100; K:a; D:b; J:e;
(2)
分時圖MACD
SHORT 1 100 12 LONG 1 100 26 M 1 100 9
Df:EMA(NEW,SHORT) - EMA(NEW,LONG); DA:EMA(Df,M); MD:2*(Df-DA),COLORSTICK; FILLRGN(DF,DA,DF>REF(DF,3),RGB(255,0,0),DF<REF(DF,3),RGB(0,255,255));
(3)
分時動因
動因:(OUTVOL-INVOL )/VOL*100,colorwhite; 多空線:0;
(4)
分時BBI
BBI:=(EMA(NEW,3)+EMA(NEW,6)+EMA(NEW,12)+EMA(NEW,24))/4; PARTLINE(BBI,BBI>REF(BBI,1),RGB(255,0,255),BBI<REF(BBI,1),RGB(0,255,255),1);
(5)
分時BIAS
BIAS1 : (NEW-MA(NEW,6))/MA(NEW,6)*100; BIAS2 : (NEW-MA(NEW,12))/MA(NEW,12)*100; BIAS3 : (NEW-MA(NEW,24))/MA(NEW,24)*100;
(6)
分時FSRSI
LC := REF(NEW,1); RSI$1:SMA(MAX(NEW-LC,0),6,1)/SMA(ABS(NEW-LC),6,1)*100; RSI$2:SMA(MAX(NEW-LC,0),12,1)/SMA(ABS(NEW-LC),12,1)*100; RSI$3:SMA(MAX(NEW-LC,0),24,1)/SMA(ABS(NEW-LC),24,1)*100; zero1:20,POINTDOT; zero2:80,POINTDOT;
(7)
分時布林線
N 5 100 20
MID : MA(NEW,N); 上軌: MID + STD(NEW,N); 下軌: MID - STD(NEW,N); 上極限: MID + 2*STD(NEW,N); 下極限: MID - 2*STD(NEW,N);
(8)
分時主圖箭頭
LC=REF(NEW,1); WRSI=SMA(MAX(NEW-LC,0),9,1)/SMA(ABS(NEW-LC),9,1)*100; IF (CROSS(20,WRSI)) BUY; IF (CROSS(WRSI,80)) SELL;
(9)
大盤分時均價線
成交總額:=SUM(NEW*VOL,0); 成交總量:=SUM(ABS(VOL),0); 均價:成交總額/成交總量;
(10)
分時線變色指標
最新:=(IF(ISNULL(NEW),PRE,NEW)); PARTLINE(最新,最新>=REF(最新,1),RGB(255,0,0),最新<=REF(最新,1),RGB(0,255,0));
IF (MARKETTYPE == 176 OR MARKETTYPE==64) { b=SUBSAMEDAY(&VOL) ; m=SUM(b*最新,0); 均價:IF(m>0,m/VOL,PRE); } ELSE IF(CODETYPE!=0) { IF(ISNULL(MONEY) OR ISNULL(VOL) OR VOL==0 OR MONEY==0) 均價:PRE; ELSE IF(VOL==VOL[1] OR MONEY==MONEY[1]) 均價:均價[1]; ELSE 均價:MONEY/VOL; } DRAWGBK(FORMATTIME(1)<10 AND TRADETIME>242),RGB(0,0,128); RETURN;
hx_star; hx_star_p; hx_PriceLow; hx_PriceUp; hx_PriceMemo;
(11)
分時通道
最新:=(IF(ISNULL(NEW),PRE,NEW)); IF(ISNULL(NEW),PRE,NEW); IF (MARKETTYPE == 176 OR MARKETTYPE==64) { b=SUBSAMEDAY(&VOL) ; m=SUM(b*最新,0); 均價:IF(m>0,m/VOL,PRE); } ELSE IF(CODETYPE!=0) { IF(ISNULL(MONEY) OR ISNULL(VOL) OR VOL==0 OR MONEY==0) 均價:PRE; ELSE IF(VOL==VOL[1] OR MONEY==MONEY[1]) 均價:均價[1]; ELSE 均價:MONEY/VOL; } DRAWGBK(FORMATTIME(1)<10 AND TRADETIME>242),RGB(0,0,128); MA30:=MA(NEW,24); 上軌:MA30 + 2*STD(NEW,57),POINTDOT,COLORFFf00F; 下軌:MA30 - 2*STD(NEW,57),POINTDOT,COLORFFf00F; 中軌:(EMA(NEW,7)+EMA(NEW,14)+EMA(NEW,34)+EMA(NEW,54))/4,colorgreen; RETURN; hx_star; hx_star_p; hx_grow_p; hx_walk_p; hx_risk_p; hx_grow; hx_plate; hx_walk; hx_risk; hx_PriceLow; hx_PriceUp; hx_PriceMemo;
(12)
分時kdj與布林極限的疊加
mid:=EMA(NEW,20); upper:=mid+2*STD(NEW,20); lower:=mid-2*STD(NEW,20); 布林極限:=(NEW-lower)/(upper-lower)*100; b1:20; b2:50; b3:80; b4:0; b5:100; STICKLINE(REF(布林極限,1)>=布林極限 ,布林極限 ,REF(布林極限,1),0,0 ),COLOR00FF00; STICKLINE(REF(布林極限,1)>=布林極限 ,布林極限 ,REF(布林極限,1),8,0 ),COLOR008800; STICKLINE(REF(布林極限,1)>=布林極限 ,布林極限 ,REF(布林極限,1),7,0 ),COLOR009900; STICKLINE(REF(布林極限,1)>=布林極限 ,布林極限 ,REF(布林極限,1),6,0 ),COLOR00AA00; STICKLINE(REF(布林極限,1)>=布林極限 ,布林極限 ,REF(布林極限,1),5,0 ),COLOR00BB00; STICKLINE(REF(布林極限,1)>=布林極限 ,布林極限 ,REF(布林極限,1),4,0 ),COLOR00CC00; STICKLINE(REF(布林極限,1)>=布林極限 ,布林極限 ,REF(布林極限,1),3,0 ),COLOR00DD00; STICKLINE(REF(布林極限,1)>=布林極限 ,布林極限 ,REF(布林極限,1),2,0 ),COLOR00EE00; STICKLINE(REF(布林極限,1)>=布林極限 ,布林極限 ,REF(布林極限,1),1,0 ),COLOR00FF00;
STICKLINE(布林極限>=REF(布林極限,1),布林極限,REF(布林極限,1),0,0) ,COLORFFBBFF; STICKLINE(布林極限>=REF(布林極限,1),布林極限,REF(布林極限,1),8,0) ,COLORFF00FF; STICKLINE(布林極限>=REF(布林極限,1),布林極限,REF(布林極限,1),7,0) ,COLORFF22FF; STICKLINE(布林極限>=REF(布林極限,1),布林極限,REF(布林極限,1),6,0) ,COLORFF44FF; STICKLINE(布林極限>=REF(布林極限,1),布林極限,REF(布林極限,1),5,0) ,COLORFF66FF; STICKLINE(布林極限>=REF(布林極限,1),布林極限,REF(布林極限,1),4,0) ,COLORFF88FF; STICKLINE(布林極限>=REF(布林極限,1),布林極限,REF(布林極限,1),3,0) ,COLORFF99FF; STICKLINE(布林極限>=REF(布林極限,1),布林極限,REF(布林極限,1),2,0) ,COLORFFAAFF; STICKLINE(布林極限>=REF(布林極限,1),布林極限,REF(布林極限,1),1,0) ,COLORFFBBFF; LOWV:=LLV(NEW,15); HIGHV:=HHV(NEW,15); RSV:=EMA((NEW-LOWV)/(HIGHV-LOWV)*100,3); K:=EMA(RSV,3); D:=MA(K,3); PARTLINE(d,d>=REF(d,1),RGB(255,0,0),d<=REF(d,1),RGB(0,255,255));
a1:=BARSLAST(REF(CROSS(K,D),1)); b1:=REF(NEW,a1+1)>NEW AND REF(D,a1+1)<D AND CROSS(K,D) AND k<30; DRAWTEXT(IF(b1>0,1,0),d,'K底背'),colorcyan; c1:=BARSLAST(REF(CROSS(D,K),1)); d1:=REF(NEW,c1+1)<NEW AND REF(D,c1+1)>D AND CROSS(D,K) AND k>70; DRAWTEXT(IF(d1>0,1,0),d,'K頂背'),coloryellow;
中趨勢線:=3*SMA((NEW-LLV(NEW,27))/(HHV(NEW,27)-LLV(NEW,27))*100,5,1)-2*SMA(SMA((NEW-LLV(NEW,27))/(HHV(NEW,27)-LLV(NEW,27))*100,5,1),3,1); 中準備買入: IF(中趨勢線<=10,-10,0),colormagenta; 中準備賣出: IF(中趨勢線>=90,110,100),colorcyan;
長趨勢線:=3*SMA((NEW-LLV(NEW,55))/(HHV(NEW,55)-LLV(NEW,55))*100,5,1)-2*SMA(SMA((NEW-LLV(NEW,55))/(HHV(NEW,55)-LLV(NEW,55))*100,5,1),3,1); 長準備買入: STICKLINE(長趨勢線<=10 ,-5,-10,1,0); 長準備賣出: STICKLINE(長趨勢線>=90,105,110,1,0);
(13)
分時1分鐘K線圖
STICKLINE(REF(NEW,1)>=NEW ,NEW ,REF(NEW,1),0,0 ),COLOR00FF00; STICKLINE(REF(NEW,1)>=NEW ,NEW ,REF(NEW,1),8,0 ),COLOR008800; STICKLINE(REF(NEW,1)>=NEW ,NEW ,REF(NEW,1),7,0 ),COLOR009900; STICKLINE(REF(NEW,1)>=NEW ,NEW ,REF(NEW,1),6,0 ),COLOR00AA00; STICKLINE(REF(NEW,1)>=NEW ,NEW ,REF(NEW,1),5,0 ),COLOR00BB00; STICKLINE(REF(NEW,1)>=NEW ,NEW ,REF(NEW,1),4,0 ),COLOR00CC00; STICKLINE(REF(NEW,1)>=NEW ,NEW ,REF(NEW,1),3,0 ),COLOR00DD00; STICKLINE(REF(NEW,1)>=NEW ,NEW ,REF(NEW,1),2,0 ),COLOR00EE00; STICKLINE(REF(NEW,1)>=NEW ,NEW ,REF(NEW,1),1,0 ),COLOR00FF00;
STICKLINE(NEW>REF(NEW,1),NEW,REF(NEW,1),0,0) ,COLORFFBBFF; STICKLINE(NEW>REF(NEW,1),NEW,REF(NEW,1),8,0) ,COLORFF00FF; STICKLINE(NEW>REF(NEW,1),NEW,REF(NEW,1),7,0) ,COLORFF22FF; STICKLINE(NEW>REF(NEW,1),NEW,REF(NEW,1),6,0) ,COLORFF44FF; STICKLINE(NEW>REF(NEW,1),NEW,REF(NEW,1),5,0) ,COLORFF66FF; STICKLINE(NEW>REF(NEW,1),NEW,REF(NEW,1),4,0) ,COLORFF88FF; STICKLINE(NEW>REF(NEW,1),NEW,REF(NEW,1),3,0) ,COLORFF99FF; STICKLINE(NEW>REF(NEW,1),NEW,REF(NEW,1),2,0) ,COLORFFAAFF; STICKLINE(NEW>REF(NEW,1),NEW,REF(NEW,1),1,0) ,COLORFFBBFF;
中軌:=MA(NEW,20); 上極限:中軌+2*STD(NEW,20),colorred; 下極限:中軌-2*STD(NEW,20),colorblue; BBI:=(MA(NEW,3)+MA(NEW,6)+MA(NEW,12)+MA(NEW,24))/4; PARTLINE(BBI,BBI>REF(BBI,1),RGB(255,0,0),BBI<REF(BBI,1),RGB(0,255,0),1);
(14)
自用同花順分時KDJ(長短線結合加建倉)
RSV:=(NEW-LLV(NEW,14))/(HHV(NEW,14)-LLV(NEW,14))*100; K:=SMA(RSV,3,1); D:=SMA(K,3,1); J1:=(3*K-2*D); IF(j1>100) j1=100; IF(j1<0) j1=0; j2:=SMA(j1,3,1); j:=SMA(j2,3,1); PARTLINE(j,j>=REF(j,1),RGB(255,0,0),j<=REF(j,1),RGB(0,255,0)); zero1:0; ZERO2:20,POINTDOT,colorwhite; ZERO3:80,POINTDOT,colorwhite; zero4:100; V11:=3*SMA((NEW-LLV(NEW,55))/(HHV(NEW,55)-LLV(NEW,55))*100,5,1)-2*SMA(SMA((NEW-LLV(NEW,55))/(HHV(NEW,55)-LLV(NEW,55))*100,5,1),3,1); 趨勢線:=EMA(V11,3); V12:=(趨勢線-REF(趨勢線,1))/REF(趨勢線,1)*100; 準備現(xiàn)金: STICKLINE(趨勢線<=10 ,20,25,1,0),colorcc9900; 買入股票: STICKLINE(趨勢線<=10 AND V12>10 ,30,20,1,0),color0099ff; 見頂清倉: STICKLINE(趨勢線>=90 AND V12<=90,80,70,1,0),colorgray; 準備現(xiàn)金: STICKLINE(趨勢線<=13 AND j<=20,20,25,1,0),colorcc9900;
(15)
自用分時MACD
Dif:=EMA(NEW,6) - EMA(NEW,21); diff:=EMA(dif,6); dea:=MA(diff,6); zero:0; MB:=dea-REF(dea,1);
PARTLINE(dea,dea>REF(dea,1),RGB(255,0,255),dea<REF(dea,1),RGB(0,255,255),1);
a1:=BARSLAST(REF(CROSS(Mb,0),1)); b1:=REF(NEW,a1+1)>NEW AND REF(dEA,a1+1)<DEA AND CROSS(Mb,0) AND diff<0; DRAWTEXT(IF(b1>0,1,0),dea,'macd底背'),colorcyan; c1:=BARSLAST(REF(CROSS(0,Mb),1)); d1:=REF(NEW,c1+1)<NEW AND REF(DEA,c1+1)>dEA AND CROSS(0,Mb) AND diff>0; DRAWTEXT(IF(d1>0,1,0),dea,'macd頂背'),colormagenta;
(16)
權證分時
最新:IF(ISNULL(NEW),PRE,NEW);
主力持倉:=EMA(100*(NEW-LLV(NEW,34))/(HHV(NEW,34)-LLV(NEW,34)),3); 箱頂:HHV(MA((NEW),5),30); 箱底:LLV(MA((NEW),5),30) ; 長底:LLV(MA((NEW),5),120);
JJ:=(NEW+HHV(MA((NEW),5),2)+LLV(MA((NEW),5),2))/3; AA:=EMA(JJ,3); BB:=REF(AA,1); STICKLINE(AA>BB,AA,BB,3,0),coloryellow,;
V1:=LLV(NEW,10); V2:=HHV(NEW,25); 價位線:=EMA((NEW-V1)/(V2-V1)*4,4); DRAWTEXT(CROSS(價位線,0.3),NEW,'★'),colorred;
IF (MARKETTYPE == 176 OR MARKETTYPE==64) { b=SUBSAMEDAY(&VOL) ; m=SUM(b*最新,0); 均價:IF(m>0,m/VOL,PRE); } ELSE IF(CODETYPE!=0) { IF(ISNULL(MONEY) OR ISNULL(VOL) OR VOL==0 OR MONEY==0) 均價:PRE; ELSE IF(VOL==VOL[1] OR MONEY==MONEY[1]) 均價:均價[1]; ELSE 均價:MONEY/VOL; } DRAWGBK(FORMATTIME(1)<10 AND TRADETIME>242),RGB(0,0,128); RETURN; hx_star; hx_star_p; hx_PriceLow; hx_PriceUp; hx_PriceMemo;
(17)
分時量變紅和綠
DRAWGBK(FORMATTIME(1)<10 AND (MARKETTYPE==32 OR MARKETTYPE==16) AND TRADETIME>242, STRIP(RGB(0,0,128),RGB(0,0,128),1));
量:MAX(0,SUBSAMEDAY(&VOL)); RETURN 量;
(18)
分時用指標
最新:IF(ISNULL(NEW),PRE,NEW); MA13:MA(NEW,n1); MA34:MA(NEW,n2); DIFF : =EMA(NEW,13) - EMA(NEW,34); DEA : =EMA(DIFF,13); MACDFS : =2*(DIFF-DEA/2); PARTLINE(MA13,MA13>REF(MA13,1),RGB(222,0,222),MA13<REF(MA13,1),RGB(0,255,255)),LINETHICK2; PARTLINE(MA34,MA34>REF(MA34,1),RGB(255,0,0),MA34<REF(MA34,1),RGB(0,255,255)),LINETHICK2; PARTLINE(最新,最新>REF(最新,1),RGB(255,0,0),最新<REF(最新,1),RGB(0,255,255)),LINETHICK1; 高分:HHV(MA13,15); 低分:LLV(MA13,15); 低分1:LLV(MA13,34); DRAWTEXT(CROSS(最新,低分1) AND MACDFS>DIFF AND MA13>低分1 ,低分1,'買入');
N1:1 100 13 N2:1 100 34
(19)
堅持分時kdj
LOWV:=LLV(NEW,15); HIGHV:=HHV(NEW,15); RSV:=EMA((NEW-LOWV)/(HIGHV-LOWV)*100,3); K:=EMA(rsv,3); D:=MA(K,3); zero1:20,pointdot,colorwhtite; zero2:80,pointdot,colorwhite; zero3:0; zero4:100; PARTLINE(d,d>=REF(d,1),RGB(255,0,0),d<=REF(d,1),RGB(0,255,0)); a1:=BARSLAST(REF(CROSS(k,d),1)); b1:=REF(NEW,a1+1)>NEW AND REF(K,a1+1)<K AND CROSS(k,d) AND k<30; DRAWTEXT(IF(b1>0,1,0),d,'k底背'),colorgreen; c1:=BARSLAST(REF(CROSS(d,k),1)); d1:=REF(NEW,c1+1)<NEW AND REF(K,c1+1)>K AND CROSS(d,k) AND k>70; DRAWTEXT(IF(d1>0,1,0),d,'k頂背'),coloryellow; 中趨勢線:=3*SMA((NEW-LLV(NEW,27))/(HHV(NEW,27)-LLV(NEW,27))*100,5,1)-2*SMA(SMA((NEW-LLV(NEW,27))/(HHV(NEW,27)-LLV(NEW,27))*100,5,1),3,1); 長趨勢線:=3*SMA((NEW-LLV(NEW,55))/(HHV(NEW,55)-LLV(NEW,55))*100,5,1)-2*SMA(SMA((NEW-LLV(NEW,55))/(HHV(NEW,55)-LLV(NEW,55))*100,5,1),3,1); DRAWGBK(中趨勢線>=90,STRIP(RGB(100,0,100),RGB(100,0,100),2)); DRAWGBK(中趨勢線<=10,STRIP(RGB(0,100,100),RGB(0,100,100),2)); DRAWGBK(長趨勢線>=90,STRIP(RGB(150,0,150),RGB(150,0,150),2)); DRAWGBK(長趨勢線<=10,STRIP(RGB(0,150,150),RGB(0,150,150),2));
(20)
精品分時macd 參數(shù); short 5 40 12 long10 100 26 m 2 40 9
dif:=ema(new,5) - ema(new,21); dea1:=sma(dif,5,1); dea:=sma(dea1,5,1); zero:0,pointdot,colorwhite;
partline(dea,dea>ref(dea,1),rgb(255,0,255),dea<ref(dea,1),rgb(0,255,255),1);
(21)小刀K線
VAR1:=NEW>REF(NEW,1) AND NEW>REF(NEW,2); VAR2:=REF(VAR1,1) AND NEW<=REF(NEW,1) AND NEW>=REF(NEW,2); VAR3:=REF(VAR2,1) AND NEW>=REF(NEW,1) AND NEW<=REF(NEW,2); VAR4:=REF(VAR3,1) AND NEW<=REF(NEW,1) AND NEW>=REF(NEW,2); VAR5:=REF(VAR4,1) AND NEW>=REF(NEW,1) AND NEW<=REF(NEW,2); VAR6:=REF(VAR5,1) AND NEW<=REF(NEW,1) AND NEW>=REF(NEW,2); VAR7:=REF(VAR6,1) AND NEW>=REF(NEW,1) AND NEW<=REF(NEW,2); VAR8:=REF(VAR7,1) AND NEW<=REF(NEW,1) AND NEW>=REF(NEW,2); VAR9:=REF(VAR8,1) AND NEW>=REF(NEW,1) AND NEW<=REF(NEW,2); VARA:=REF(VAR9,1) AND NEW<=REF(NEW,1) AND NEW>=REF(NEW,2); VARB:=REF(VARA,1) AND NEW>=REF(NEW,1) AND NEW<=REF(NEW,2); VARC:=REF(VARB,1) AND NEW<=REF(NEW,1) AND NEW>=REF(NEW,2); STICKLINE(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,NEW,REF(NEW,1),3,1),colorred; VARD:=NEW<REF(NEW,1) AND NEW<REF(NEW,2); VARE:=REF(VARD,1) AND NEW>=REF(NEW,1) AND NEW<=REF(NEW,2); VARF:=REF(VARE,1) AND NEW<=REF(NEW,1) AND NEW>=REF(NEW,2); VAR10:=REF(VARF,1) AND NEW>=REF(NEW,1) AND NEW<=REF(NEW,2); VAR11:=REF(VAR10,1) AND NEW<=REF(NEW,1) AND NEW>=REF(NEW,2); VAR12:=REF(VAR11,1) AND NEW>=REF(NEW,1) AND NEW<=REF(NEW,2); VAR13:=REF(VAR12,1) AND NEW<=REF(NEW,1) AND NEW>=REF(NEW,2); VAR14:=REF(VAR13,1) AND NEW>=REF(NEW,1) AND NEW<=REF(NEW,2); VAR15:=REF(VAR14,1) AND NEW<=REF(NEW,1) AND NEW>=REF(NEW,2); VAR16:=REF(VAR15,1) AND NEW>=REF(NEW,1) AND NEW<=REF(NEW,2); VAR17:=REF(VAR16,1) AND NEW<=REF(NEW,1) AND NEW>=REF(NEW,2); VAR18:=REF(VAR17,1) AND NEW>=REF(NEW,1) AND NEW<=REF(NEW,2); STICKLINE(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,NEW,REF(NEW,1),3,0),COLORFFCC66; VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1; VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC,1) AND VARD; STICKLINE(VAR19,REF(NEW,1),REF(NEW,2),3,0),colorred; STICKLINE(VAR1A,REF(NEW,1),REF(NEW,2),3,0),colorblue;
箱底:LLV(MA((NEW),5),30),colorwhite; 箱頂:HHV(MA((NEW),6),30),COLOR00AAFF;
(22)
小刀趨勢
短趨勢:((3*SMA((NEW-LLV(NEW,27))/(HHV(NEW,27)-LLV(NEW,27))*100,5,1)-2*SMA(SMA((NEW-LLV(NEW,27))/(HHV(NEW,27)-LLV(NEW,27))*100,5,1),3,1)-50)*1.032+50),colorred; VAR2:=(NEW+HHV(MA(NEW,5),2)+LLV(MA(NEW,5),2))/3; VAR3:=LLV(NEW,34); VAR4:=HHV(NEW,34); 長趨勢:EMA((VAR2-VAR3)/(VAR4-VAR3)*100,13),COLOR00FF00; 主力持倉:EMA(100*(NEW-LLV(NEW,34))/(HHV(NEW,34)-LLV(NEW,34)),3),colorblue;
(23)
分時macd 帶買賣箭頭
Diff:=EMA(NEW,5) - EMA(NEW,21); dif:=EMA(diff,5); dea:=EMA(dif,5); zero:0;
PARTLINE(dif,dif>=REF(dif,1),RGB(255,0,0),dif<=REF(dif,1),RGB(0,255,0)); PARTLINE(dea,dea>=REF(dea,1),RGB(255,0,255),dea<=REF(dea,1),RGB(0,255,255));
mb:=dea-REF(dea,1);
a1:=BARSLAST(REF(CROSS(Mb,0),1)); b1:=REF(NEW,a1+1)>NEW AND REF(dEA,a1+1)<DEA AND CROSS(Mb,0) AND diff<0; DRAWTEXT(IF(b1>0,1,0),dea,'macd底背'),colorcyan; c1:=BARSLAST(REF(CROSS(0,Mb),1)); d1:=REF(NEW,c1+1)<NEW AND REF(DEA,c1+1)>dEA AND CROSS(0,Mb) AND diff>0; DRAWTEXT(IF(d1>0,1,0),dea,'macd頂背'),colormagenta;
lc=REF(NEW,1); wrsi=SMA(MAX(NEW-lc,0),9,1)/SMA(ABS(NEW-lc),9,1)*100; IF (CROSS(20,wrsi)) BUY; IF (CROSS(wrsi,80)) SELL;
(24)
變色分時圖
{DRAWGBK(DATE>900103,STRIP(RGB(100,180,255),RGB(120,120,255),1));} 最新:=(IF(ISNULL(NEW),PRE,NEW)),Color00FFFF,LINETHICK2; PARTLINE(最新,最新>=REF(最新,1),RGB(255,0,0),最新<=REF(最新,1),RGB(0,255,0)),LINETHICK2; IF (MARKETTYPE == 176 OR MARKETTYPE==64) { b=SUBSAMEDAY(&VOL) ; m=SUM(b*最新,0); 均價:IF(m>0,m/VOL,PRE); } ELSE IF(CODETYPE!=0) { IF(ISNULL(MONEY) OR ISNULL(VOL) OR VOL==0 OR MONEY==0) 均價:PRE; ELSE IF(VOL==VOL[1] OR MONEY==MONEY[1]) 均價:均價[1]; ELSE 均價:MONEY/VOL; } DRAWGBK(FORMATTIME(1)<10 AND TRADETIME>242),RGB(0,0,128); RETURN; hx_star; hx_star_p; hx_PriceLow; hx_PriceUp; hx_PriceMemo;
(25)
分時變色
DRAWGBK(V>1,STRIP(RGB(120,120,255),RGB(140,140,255),1)); 最新:IF(ISNULL(NEW),PRE,NEW); 主力持倉:=EMA(100*(NEW-LLV(NEW,34))/(HHV(NEW,34)-LLV(NEW,34)),3); 箱頂:HHV(MA((NEW),5),30); 箱底:LLV(MA((NEW),5),30) ,ColorFFFF06; 長底:LLV(MA((NEW),5),120); JJ:=(NEW+HHV(MA((NEW),5),2)+LLV(MA((NEW),5),2))/3; AA:=EMA(JJ,3); BB:=REF(AA,1); STICKLINE(AA>BB,AA,BB,3,0),coloryellow,; V1:=LLV(NEW,10); V2:=HHV(NEW,25); 價位線:=EMA((NEW-V1)/(V2-V1)*4,4); DRAWTEXT(CROSS(價位線,0.3),NEW,'★'),colorred; IF (MARKETTYPE == 176 OR MARKETTYPE==64) { b=SUBSAMEDAY(&VOL) ; m=SUM(b*最新,0); 均價:IF(m>0,m/VOL,PRE); } ELSE IF(CODETYPE!=0) { IF(ISNULL(MONEY) OR ISNULL(VOL) OR VOL==0 OR MONEY==0) 均價:PRE; ELSE IF(VOL==VOL[1] OR MONEY==MONEY[1]) 均價:均價[1]; ELSE 均價:MONEY/VOL; } DRAWGBK(FORMATTIME(1)<10 AND TRADETIME>242),RGB(0,0,128); RETURN; hx_star; hx_star_p; hx_PriceLow; hx_PriceUp; hx_PriceMemo;
(26)
趨勢
短趨勢:((3*SMA((NEW-LLV(NEW,27))/(HHV(NEW,27)-LLV(NEW,27))*100,5,1)-2*SMA(SMA((NEW-LLV(NEW,27))/(HHV(NEW,27)-LLV(NEW,27))*100,5,1),3,1)-50)*1.032+50),colorred; VAR2:=(NEW+HHV(MA(NEW,5),2)+LLV(MA(NEW,5),2))/3; VAR3:=LLV(NEW,34); VAR4:=HHV(NEW,34); 長趨勢:EMA((VAR2-VAR3)/(VAR4-VAR3)*100,13),COLOR00FF00; 主力持倉:EMA(100*(NEW-LLV(NEW,34))/(HHV(NEW,34)-LLV(NEW,34)),3),colorblue;
(27)
權證變色
最新:IF(ISNULL(NEW),PRE,NEW); byx:=MA(最新,10); xxx:=MA(最新,20); yyy:=MA(最新,40); k:=SLOPE(byx,3); K7:=SLOPE(byx,7); m_k=MA(k,2); aa=SLOPE(m_k,1); //K13:=SLOPE(byx,7); //PARTLINE(最新,k>=0AND K7>=0 AND aa>=0 ,RGB(255,0,0),k<=0 AND K7<=0 AND aa<=0 ,RGB(0,255,0)); FILLRGN(byx,REF(byx,2),byx>REF(byx,2),RGB(255,0,0),byx<REF(byx,2),RGB(0,0,255)); //FILLRGN(xxx,REF(xxx,4),xxx>REF(xxx,4),RGB(200,50,50),xxx<REF(xxx,4),RGB(10,100,200)); //FILLRGN(yyy,0.998*REF(yyy,2),yyy>REF(yyy,2),RGB(200,20,20),yyy<REF(yyy,2),RGB(10,200,50)); 主力持倉:=EMA(100*(NEW-LLV(NEW,34))/(HHV(NEW,34)-LLV(NEW,34)),3); 箱頂:HHV(MA((NEW),5),30),colorbrown; 箱底:LLV(MA((NEW),5),30) ,colormagenta; 長底:LLV(MA((NEW),5),120),colorgray; JJ:=(NEW+HHV(MA((NEW),5),2)+LLV(MA((NEW),5),2))/3; AA:=EMA(JJ,3); BB:=REF(AA,1); STICKLINE(AA>BB,AA,BB,3,0),coloryellow; V1:=LLV(NEW,10); V2:=HHV(NEW,25); 價位線:=EMA((NEW-V1)/(V2-V1)*4,4); DRAWTEXT(CROSS(價位線,0.3),NEW,'★'),colorred; IF (MARKETTYPE == 176 OR MARKETTYPE==64) { b=SUBSAMEDAY(&VOL) ; m=SUM(b*最新,0); 均價:IF(m>0,m/VOL,PRE); } ELSE IF(CODETYPE!=0) { IF(ISNULL(MONEY) OR ISNULL(VOL) OR VOL==0 OR MONEY==0) 均價:PRE; ELSE IF(VOL==VOL[1] OR MONEY==MONEY[1]) 均價:均價[1]; ELSE 均價:MONEY/VOL; } DRAWGBK(FORMATTIME(1)<10 AND TRADETIME>242),RGB(0,0,128); jun_k=SLOPE(均價,1); PARTLINE(最新,k>=0AND K7>=0 AND jun_k>=0 ,RGB(255,0,0),k<=0 AND K7<=0 AND jun_k<=0 ,RGB(0,255,0)); RETURN; hx_star; hx_star_p; hx_PriceLow; hx_PriceUp; hx_PriceMemo;
資金分布源碼如下:
DRAWGBK(DATE>900103,STRIP(RGB(0,0,20),RGB(0,0,80),1)); cap:=CLOSE; AL1:=MA(VOL,5); AL2:=MA(VOL,40); A1:=LLV(LOW,120); A2:=1.191*A1; A3:=1.382*A1; A4:=1.618*A1; A5:=1.809*A1; A6:=MA(C,60); 觀望:=(C<A2)*VOL,COLOR808040,LINETHICK0; 低吸:=(C>A2)*VOL,COLORE0FFFF,LINETHICK0; 持股:=(C>A3)*VOL,COLORFF33FF,LINETHICK0; 突破:=(C>A4)*VOL,COLOR00FFFF,LINETHICK0; 瘋馬:=(C>A5)*VOL,COLOR0000FF,LINETHICK0; 減倉:=(C>A5 AND C<A6)*VOL,COLORFF8000,LINETHICK0;
STICKLINE(C<A2,0,VOL,10,0),Color9E7001; STICKLINE(C<A2,0,VOL,8,0), ColorBE8601; STICKLINE(C<A2,0,VOL,6,0), ColorDE9C01; STICKLINE(C<A2,0,VOL,5,0), ColorFEB301; STICKLINE(C<A2,0,VOL,4,0), ColorFEBC21; STICKLINE(C<A2,0,VOL,3,0), ColorFEC641; STICKLINE(C<A2,0,VOL,2,0), ColorFECF61; STICKLINE(C<A2,0,VOL,1,0), ColorFED981;
STICKLINE(C>A2,0,VOL,10,0),Color4F4F4F; STICKLINE(C>A2,0,VOL,8,0),Color5F5F5F; STICKLINE(C>A2,0,VOL,6,0),Color6F6F6F; STICKLINE(C>A2,0,VOL,5,0),Color7F7F7F; STICKLINE(C>A2,0,VOL,4,0),Color8F8F8F; STICKLINE(C>A2,0,VOL,3,0),Color9F9F9F; STICKLINE(C>A2,0,VOL,2,0),ColorAFAFAF; STICKLINE(C>A2,0,VOL,1,0),ColorC0C0C0;
STICKLINE(C>A3,0,VOL,10,0),Color9F009F; STICKLINE(C>A3,0,VOL,8,0),ColorBF00BF; STICKLINE(C>A3,0,VOL,6,0),ColorDF00DF; STICKLINE(C>A3,0,VOL,5,0),ColorFF00FF; STICKLINE(C>A3,0,VOL,4,0),ColorFF20FF; STICKLINE(C>A3,0,VOL,3,0),ColorFF40FF; STICKLINE(C>A3,0,VOL,2,0),ColorFF60FF; STICKLINE(C>A3,0,VOL,1,0),ColorFF80FF;
STICKLINE(C>A4,0,VOL,10,0),Color04769B; STICKLINE(C>A4,0,VOL,8,0),Color058DBA; STICKLINE(C>A4,0,VOL,6,0),Color06A5D9; STICKLINE(C>A4,0,VOL,5,0),Color07BCF8; STICKLINE(C>A4,0,VOL,4,0),Color27C4F8; STICKLINE(C>A4,0,VOL,3,0),Color46CCF9; STICKLINE(C>A4,0,VOL,2,0),Color65D5FA; STICKLINE(C>A4,0,VOL,1,0),Color84DDFB;
STICKLINE(C>A5,0,VOL,10,0),Color00009F; STICKLINE(C>A5,0,VOL,8,0),Color0000BF; STICKLINE(C>A5,0,VOL,6,0),Color0000DF; STICKLINE(C>A5,0,VOL,5,0),Color0000FF; STICKLINE(C>A5,0,VOL,4,0),Color2020FF; STICKLINE(C>A5,0,VOL,3,0),Color4040FF; STICKLINE(C>A5,0,VOL,2,0),Color6060FF; STICKLINE(C>A5,0,VOL,1,0),Color8080FF;
STICKLINE(C>A5 AND C<A6,0,VOL,10,0),Color009F00; STICKLINE(C>A5 AND C<A6,0,VOL,8,0),Color00BF00; STICKLINE(C>A5 AND C<A6,0,VOL,6,0),Color00DF00; STICKLINE(C>A5 AND C<A6,0,VOL,5,0),Color00FF00; STICKLINE(C>A5 AND C<A6,0,VOL,4,0),Color20FF20; STICKLINE(C>A5 AND C<A6,0,VOL,3,0),Color40FF40; STICKLINE(C>A5 AND C<A6,0,VOL,2,0),Color60FF60; STICKLINE(C>A5 AND C<A6,0,VOL,1,0),Color80FF80; V1:MA(VOL,5),colorred; V2:MA(VOL,40),COLOR00D7FF;
分時的,l2用,源碼,
普通機構:((BIGBUYCOUNT2+WAITBUYCOUNT2)-(BIGSELLCOUNT2+WAITSELLCOUNT2)); 普通機構凈額:((BIGBUYMONEY2+WAITBUYMONEY2)-(BIGSELLMONEY2+WAITSELLMONEY2)); 超級機構:((BIGBUYCOUNT1+WAITBUYCOUNT1)-(BIGSELLCOUNT1+WAITSELLCOUNT1))-普通機構; 超級機構凈額:((BIGBUYMONEY1+WAITBUYMONEY1)-(BIGSELLMONEY1+WAITSELLMONEY1))-普通機構凈額;
[同花順] 【同花順指標公式】開盤預測全天指標公式-2010最新版
STICKLINE(HOUR>=9 AND HOUR<10 ,0, V/((TIME-93000)/100)*240,4.5,1),colorwhite; STICKLINE(HOUR>=10 AND HOUR<11 ,0, V/((TIME-100000)/100+30)*240,4.5,1),colorwhite; STICKLINE(HOUR>=11 AND HOUR<12 ,0, V/((TIME-110000)/100+90)*240,4.5,1),colorwhite; STICKLINE(HOUR>=13 AND HOUR<=14,0, V/((TIME-130000)/100+120)*240,4.5,1),colorwhite; STICKLINE(HOUR>=14 AND HOUR<=15,0, V/((TIME-140000)/100+180)*240,4.5,1),colorwhite; VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); 主動買盤:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL)); 主動賣盤:=IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1*(HIGH-LOW),0-VOL)); STICKLINE(C>O,0,VOL,4.5,1),colorred; STICKLINE(C<O ,0,VOL,4.5,1),COLORFFFF00; STICKLINE(C=O AND C<REF(C,1),0,VOL,4.5,1),COLORFFFF00; STICKLINE(C=O AND C>REF(C,1),0,VOL,4.5,1),colorred; STICKLINE(主動買盤>0,0,主動買盤,4.5,0),colorred; 換手: VOL/CAPITAL*100; STICKLINE(換手>=3 AND 換手<8,0, 主動買盤,2,0),coloryellow; STICKLINE(換手>=8,0, 主動買盤, 2,0) ,colorgreen; MA5:MA(VOL,5),coloryellow; MA13:MA(VOL,13),colorwhite; DRAWTEXT(CROSS(MA5,MA13),CROSS(MA5,MA13),'*'),coloryellow;
買線:=EMA(C,2); 賣線:=EMA(SLOPE(C,21)*20+C,42); BU:=CROSS(買線,賣線); SEL:=CROSS(賣線,買線); DRAWTEXT(bu,LOW*0.999,'B'),colorred,linethick3; DRAWTEXT(bu,LOW,'﹉'),Color208FFF,LINETHICK3; DRAWTEXT(sel,HIGH,'﹉'),ColorFFFF00,LINETHICK3; DRAWTEXT(sel,HIGH*1.008,'S'),colorffff00,linethick3; STICKLINE(買線>=賣線,LOW,HIGH,1,0),colorred; STICKLINE(買線>=賣線,CLOSE,OPEN,4.5,0),color0000aa; STICKLINE(買線>=賣線,CLOSE,OPEN,4,0),color0000cc; STICKLINE(買線>=賣線,CLOSE,OPEN,3,0),color0000cc; STICKLINE(買線>=賣線,CLOSE,OPEN,2,0),color0000ee; STICKLINE(買線<賣線,CLOSE,OPEN,4.5,0),coloraaaa00; STICKLINE(買線<賣線,CLOSE,OPEN,4,0),colorbbbb00; STICKLINE(買線<賣線,CLOSE,OPEN,3,0),colorcccc00; STICKLINE(買線<賣線,CLOSE,OPEN,2,0),coloreeee00; STICKLINE(買線<賣線,LOW,HIGH,1,0),colorffff00; STICKLINE(CROSS(買線,賣線) OR CROSS(賣線,買線),OPEN,CLOSE,3,0),color00ffff; 指導線: EMA((EMA(CLOSE,4)+EMA(CLOSE,6)+EMA(CLOSE,12)+EMA(CLOSE,24))/4,2),linethick1,ColorFFffFF; 界: MA(CLOSE,27),linethick1,Color00FFFF; DRAWTEXT(CROSS(指導線,界),界,' ̄'),Colorffffff; DRAWTEXT(CROSS(界,指導線),界,' ̄'),Color00ffff; RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; K:=SMA(RSV,3,1); D:=SMA(K,3,1); J:=3*K-2*D; G:=95; |
超級BBD源碼(普通版同花順可用)
本帖最后由 cssm 于 2009-8-25 23:26 編輯
從網(wǎng)上找了一個同花順的BBD源碼,發(fā)現(xiàn)數(shù)據(jù)不顯示,把多余語句刪了,并作了一些修改,去掉了一條線,看起來比較清爽
a=(ZDMR[-1]+BDMR[-1]); b=(ZDMC[-1]+BDMC[-1]); a1=SUM(a,1); b1=-SUM(b,1); STICKLINE(a1+b1>0,0,a1+b1,9,0),color0000ff; STICKLINE(a1+b1<0,0,a1+b1,9,0),color00ff00; 三日bbd:SUM(a1+b1,3),colorcyan; 五日bbd:SUM(a1+b1,5),colorred; 十日bbd:SUM(a1+b1,10),colorwhite;
和level2的比較了一下,值有點出入,但基本上趨勢是相差無幾,大家可以自己用用看
|
|