您現(xiàn)在的位置：程序化交易>> 股票公式>> 大智慧>> 大智慧公式>>正文內(nèi)容

看本分時圖不看K線分時成交量抓漲停公式源碼[大智慧公式]

作者：大智慧來源：cxh99.com 發(fā)布時間：2017年04月10日點擊數(shù)：　【收藏到本網(wǎng)的會員中心】

相關(guān)標(biāo)簽:大智慧指標(biāo)公式分時買、大智慧分時圖均線指標(biāo) 、大智慧分時主圖指標(biāo) 、大智慧分時均價線公式、分時圖疊加k線指標(biāo) 、分時圖均價線指標(biāo)公式、大智慧分時圖不顯示、大智慧分時預(yù)警指標(biāo) 、大智慧分時ddx指標(biāo) 、大智慧分時資金指標(biāo) 、大智慧分時大單指標(biāo) 、大智慧分時放量指標(biāo) 、分時k線流暢指標(biāo) 、通達(dá)信分時k線指標(biāo) 、大智慧分時圖量線顏色、

看本分時圖不看K線逍遙聖手老師大智慧修改版非常感謝逍遙聖手老師提供的源碼，逍遙聖手老師通達(dá)信版分時主圖堪稱完美，現(xiàn)將大智慧版修改版發(fā)出來供喜歡的同學(xué)們參考。
說明：1、必須先建立副圖，公式名稱必須寫“MK”以便明框主圖公式中Y.D.Z.K賦值語句引用。
2、在逍遙聖手老師大智慧版的基礎(chǔ)上添加了壓力線、強(qiáng)勢線、平衡線、支撐線，與通達(dá)信版比較從開盤到收盤分時主圖均不顯示壓力線、強(qiáng)勢線、平衡線、支撐線文字。
3、添加了楊明明老師分享的分時成交量抓漲停公式源碼。
4、去掉“長線、紅多、綠空線”。添加長線、紅多、綠空先后，主圖圖形變形，“壓力線、強(qiáng)勢線、平衡線、支撐線”均不顯示。源碼{mk-副圖}

原理解析：
Y賦值:"MK.明Y[取日線數(shù)據(jù)]" D賦值:"MK.明D[取日線數(shù)據(jù)]" Z賦值:"MK.明Z[取日線數(shù)據(jù)]" K賦值:"MK.明K[取日線數(shù)據(jù)]" 輸出KJ2:HORILINE(D,D,D),畫紅色,線寬為2 輸出KJ4:HORILINE(Z,Z,Z),畫黃色,線寬為2 輸出KJ5:HORILINE(K,K,K),畫白色,線寬為2 輸出KJ6:HORILINE(Y,Y,Y),畫綠色,線寬為2 HORILINE(KJ2,KJ2,KJ2),畫紅色當(dāng)滿足條件KJ2時,在KJ2*(1-0.002)位置書寫文字,畫黃色 HORILINE(KJ4,KJ4,KJ4),畫黃色當(dāng)滿足條件KJ4時,在KJ4位置書寫文字,畫黃色 HORILINE(KJ5,KJ5,KJ5),畫洋紅色當(dāng)滿足條件KJ5時,在KJ5*0.96位置書寫文字,畫黃色 HORILINE(KJ6,KJ6,KJ6),畫白色當(dāng)滿足條件KJ6時,在KJ6*(1+0.002)位置書寫文字,畫黃色現(xiàn)價賦值:收盤價均價賦值:成交量(手)*收盤價的歷史累和/成交量(手)的歷史累和 MM賦值:0 流通盤賦值:當(dāng)前流通股本(手)-MM/100 DBHS賦值:如果當(dāng)前流通股本(手)<2000000,返回成交量(手)/當(dāng)前流通股本(手)*100,否則返回成交量(手)/流通盤*100 標(biāo)準(zhǔn)量賦值:如果統(tǒng)計0日中滿足成交量(手)>流通盤/1000的天數(shù)>0,返回流通盤/1000,否則返回0 總量賦值:成交量(手)的歷史累和最大量賦值:0日內(nèi)成交量(手)的最高值最大換手賦值:240日內(nèi)DBHS的最高值 LXTP賦值:((成交量(手)>1日前的成交量(手) AND DBHS>=0.1 AND 1日前的成交量(手)>2日前的最大量) OR (成交量(手)>1日前的最大量 AND DBHS>=0.08 AND 2日前的成交量(手)>3日前的最大量)) AND 收盤價>1日前的收盤價 LXTP1賦值:((成交量(手)>1日前的成交量(手)*0.9 AND DBHS>=0.1 AND 1日前的成交量(手)>2日前的最大量) OR (成交量(手)>1日前的最大量*0.9 AND DBHS>=0.1 AND 2日前的成交量(手)>3日前的最大量)) AND 收盤價>1日前的收盤價當(dāng)滿足條件LXTP1時,在均價位置書寫文字,畫黃色,線寬為3 當(dāng)滿足條件LXTP時,在現(xiàn)價位置書寫文字,畫紅色,線寬為3 CXH賦值:STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1))

源碼：

{必須先建立副圖，公式名稱必須寫“MK”}
明Y:REF(EMA(H,5)+EMA((H-L),5),1);
明D:REF(EMA(H,5),1);
明Z:REF((C*3+H*2+L*2+O)/8,1);
明K:REF(EMA(L,5),1);{明框-主圖}
明Y:=REF(EMA(H,5)+EMA((H-L),5),1);
明D:=REF(EMA(H,5),1);
明Z:=REF((C*3+H*2+L*2+O)/8,1);
明K:=REF(EMA(L,5),1);
{均價:SUM(V*C,0)/SUM(V,0),COLOR00F7F7,DOTLINE;}

{主公式}
Y:="MK.明Y#DAY";
D:="MK.明D#DAY";
Z:="MK.明Z#DAY";
K:="MK.明K#DAY";
{KJ1:REFDATE(Y,DATE),COLOR00AEAE;}
KJ2:HORILINE(D,D,D),COLORRED,LINETHICK2;
KJ4:HORILINE(Z,Z,Z),COLORYELLOW,LINETHICK2;
KJ5:HORILINE(K,K,K),COLORWHITE,LINETHICK2;
KJ6:HORILINE(Y,Y,Y),COLORGREEN,LINETHICK2;
{HORILINE(H>=HHV(H,n),H,H>=HHV(H,n)),DASHLINE;}
{DRAWNUMBER(ISLASTBAR,KJ1,KJ1),COLOR00AEAE;}
HORILINE(KJ2,KJ2,KJ2),COLORRED;
DRAWTEXT(KJ2,KJ2*(1-0.002),'壓力線'),COLORYELLOW;
HORILINE(KJ4,KJ4,KJ4),COLORYELLOW;
DRAWTEXT(KJ4,KJ4,'強(qiáng)勢線'),COLORYELLOW;
HORILINE(KJ5,KJ5,KJ5),COLORMAGENTA;
DRAWTEXT(KJ5,KJ5*0.96,'平衡線'),COLORYELLOW;
HORILINE(KJ6,KJ6,KJ6),COLORWHITE;
DRAWTEXT(KJ6,KJ6*(1+0.002),'支撐線'),COLORYELLOW;
現(xiàn)價:=C;
均價:=SUM(V*C,0)/SUM(V,0);
MM:=0;
{IF PFFIN(4251,0)>0 THEN BEGIN;}
{MM:=PFFIN(4251,0);}
流通盤:=CAPITAL-MM/100;
DBHS:=IF(CAPITAL<2000000,V/CAPITAL*100,V/流通盤*100);
標(biāo)準(zhǔn)量:=IF(COUNT(V>流通盤/1000,0)>0,流通盤/1000,0);
{STICKLINE(C<REF(C,1),0,VOL,5,0),COLORGREEN;
STICKLINE(C>REF(C,1),0,VOL,5,0),COLOR4040FF;
STICKLINE(C=REF(C,1),0,VOL,5,0),COLORWHITE;}
總量:=SUM(V,0);
最大量:=HHV(V,0);
最大換手:=HHV(DBHS,240);
{STICKLINE(C<REF(C,1) AND V>REF(最大量,1) AND TIME>94200,0,VOL,5,0),COLORGREEN,LINETHICK2;
STICKLINE(C>REF(C,1) AND V>REF(最大量,1) AND TIME>94200,0,VOL,5,0),COLORRED,LINETHICK2;
STICKLINE(C=REF(C,1) AND V>REF(最大量,1) AND TIME>94200,0,VOL,5,0),COLORWHITE,LINETHICK2;
STICKLINE(V>REF(最大量,1)*1.5 AND C>REF(C,1) AND DBHS>0.15 AND TIME>94500,0,VOL,5,0),COLORYELLOW,LINETHICK2;
STICKLINE(C>REF(C,1) AND DBHS>0.22 AND TIME<94200,0,VOL,5,0),COLOR66FFFF,LINETHICK2;}
LXTP:=((V>REF(V,1) AND DBHS>=0.1 AND REF(V,1)>REF(最大量,2)) OR (V>REF(最大量,1) AND DBHS>=0.08 AND REF(V,2)>REF(最大量,3))) AND C>REF(C,1);
LXTP1:=((V>REF(V,1)*0.9 AND DBHS>=0.1 AND REF(V,1)>REF(最大量,2)) OR (V>REF(最大量,1)*0.9 AND DBHS>=0.1 AND REF(V,2)>REF(最大量,3))) AND C>REF(C,1);
DRAWTEXT(LXTP1,均價,'↖'),COLORYELLOW,LINETHICK3;
DRAWTEXT(LXTP,現(xiàn)價,'↖'),COLORRED,LINETHICK3;CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.kzuj.com.cn',CURRENTTIME>180000 and (CXH=1 OR CXH=6));
DRAWTEXTREL(10 ,10 ,'指標(biāo)公式');