大智慧超級無敵主圖指標源碼 無未來函數

相關標簽: boll指標公式副圖 、 boll指標詳解 、 boll 、 boll指標 、 boll是什么意思 、 布林線boll指標詳解 、 boll指標炒股秘籍 、 boll指標應用 、 boll參數 、

無未來函數

大智慧超級無敵BOLL主圖指標：

參數：

N 缺省20最小1最大100步長1
P 缺省3 最小0.1最大10步長1

源碼：

BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
DWN:BBI-P*STD(BBI,N),LINETHICK2;
UPR:BBI+P*STD(BBI,N),LINETHICK2;
MA5:MA(c,5),COLORFF50FF,LINETHICK2;
partline(MA5,MA5>=ref(MA5,1),RGB(255,0,0),MA5<ref(MA5,1),RGB(0,250,0)),LINETHICK3;
DRAWGBKLAST(MA5>=ref(MA5,1),STRIP(RGB(0,150,0),RGB(150,0,0),1));
DRAWGBKLAST(MA5<=ref(MA5,1),STRIP(RGB(150,0,0),RGB(0,150,0),1));
VAR326:=IF(CLOSE>ref(CLOSE,1),88,0);
VAR327:=IF(CLOSE/ref(CLOSE,1)>1.050 AND HIGH/CLOSE<1.010 AND VAR326>0, 91, 0);
DRAWTEXT(VAR327>90,LOW*0.99,'追'),COLORYELLOW;
STICKLINE(VAR327>90,OPEN,CLOSE,3,0),COLORYELLOW;
STICKLINE(VAR327>90,LOW,HIGH,0,0 ),COLORYELLOW;
{45度異動}
x1:=(C+L+H)/3;
bb13:=atan(eMA(x1,13)-ref(eMA(x1,13),1))*3.1416*10;
eMA8:=eMA(c,8); {本文來至程序化交易網 cxh99.com}
DRAWTEXT(filter(bb13>1 and eMA(x1,13)>ref(eMA(x1,8),1),10),
eMA8,'∠45上升'),coloryelLOW;
AAA:=(3*C+H+L+O)/6;
CXH:=STRTONUM(STRRIGHT(DATESTR(CURRENTDATE),1));
WARNING('http://www.tumamayizhan.com',CURRENTTIME>180000 and (CXH=2 OR CXH=7));
DRAWTEXTREL(10 ,10 ,'指標公式');
VAR41:=(8*AAA+7*ref(AAA,1)+6*ref(AAA,2)+5*ref(AAA,3)+4*ref(AAA,4)+3*ref(AAA,5)+2*ref(AAA,6)+ref(AAA,8))/36;
TJ1:=VOL=HHV(VOL,10) AND VOL>2*ref(VOL,1) AND CLOSE>VAR41;
立樁量:=FILTER(TJ1,5);
TJ2:=IF(BARSLAST(立樁量)=1 AND CLOSE>ref(HIGH,1),1,IF(BARSLAST(立樁量)=2 AND CLOSE>ref(HIGH,2),1,IF(BARSLAST(立樁量)=3 AND CLOSE>ref(HIGH,3),1,0)));
突破:=TJ2=1;
TJ3:=IF(BARSLAST(立樁量)=1 AND CLOSE>ref(LOW,1),1,IF(BARSLAST(立樁量)=2 AND CLOSE>ref(LOW,2),1,IF(BARSLAST(立樁量)=3 AND CLOSE>ref(LOW,3),1,0)));
三天法則:=TJ3=1;
成立:=三天法則 AND 突破;
條件成立:=FILTER(成立,3);
DRAWTEXT(條件成立,L*0.99,'立樁量'),COLORYELLOW;
var1:=CLOSE>ref(CLOSE,1) AND CLOSE>ref(CLOSE,2);
var2:=ref(var1,1) AND CLOSE<=ref(CLOSE,1) AND CLOSE>=ref(CLOSE,2);
var3:=ref(var2,1) AND CLOSE>=ref(CLOSE,1) AND CLOSE<=ref(CLOSE,2);
var4:=ref(var3,1) AND CLOSE<=ref(CLOSE,1) AND CLOSE>=ref(CLOSE,2);
var5:=ref(var4,1) AND CLOSE>=ref(CLOSE,1) AND CLOSE<=ref(CLOSE,2);
var6:=ref(var5,1) AND CLOSE<=ref(CLOSE,1) AND CLOSE>=ref(CLOSE,2);
var7:=ref(var6,1) AND CLOSE>=ref(CLOSE,1) AND CLOSE<=ref(CLOSE,2);
var8:=ref(var7,1) AND CLOSE<=ref(CLOSE,1) AND CLOSE>=ref(CLOSE,2);
var9:=ref(var8,1) AND CLOSE>=ref(CLOSE,1) AND CLOSE<=ref(CLOSE,2);
varA:=ref(var9,1) AND CLOSE<=ref(CLOSE,1) AND CLOSE>=ref(CLOSE,2);
varB:=ref(varA,1) AND CLOSE>=ref(CLOSE,1) AND CLOSE<=ref(CLOSE,2);
varC:=ref(varB,1) AND CLOSE<=ref(CLOSE,1) AND CLOSE>=ref(CLOSE,2);
varD:=CLOSE<ref(CLOSE,1) AND CLOSE<ref(CLOSE,2);
varE:=ref(varD,1) AND CLOSE>=ref(CLOSE,1) AND CLOSE<=ref(CLOSE,2);
varF:=ref(varE,1) AND CLOSE<=ref(CLOSE,1) AND CLOSE>=ref(CLOSE,2);
var10:=ref(varF,1) AND CLOSE>=ref(CLOSE,1) AND CLOSE<=ref(CLOSE,2);
var11:=ref(var10,1) AND CLOSE<=ref(CLOSE,1) AND CLOSE>=ref(CLOSE,2); {本文來至程序化交易網 cxh99.com}
var12:=ref(var11,1) AND CLOSE>=ref(CLOSE,1) AND CLOSE<=ref(CLOSE,2);
var13:=ref(var12,1) AND CLOSE<=ref(CLOSE,1) AND CLOSE>=ref(CLOSE,2);
var14:=ref(var13,1) AND CLOSE>=ref(CLOSE,1) AND CLOSE<=ref(CLOSE,2);
var15:=ref(var14,1) AND CLOSE<=ref(CLOSE,1) AND CLOSE>=ref(CLOSE,2);
var16:=ref(var15,1) AND CLOSE>=ref(CLOSE,1) AND CLOSE<=ref(CLOSE,2);
var17:=ref(var16,1) AND CLOSE<=ref(CLOSE,1) AND CLOSE>=ref(CLOSE,2);
var18:=ref(var17,1) AND CLOSE>=ref(CLOSE,1) AND CLOSE<=ref(CLOSE,2);
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(CLOSE,1),ref(CLOSE,2),8,0),COLOR00FFFF;{黃色}
STICKLINE(var1A,ref(CLOSE,1),ref(CLOSE,2),8,0),COLORFF00FF;{粉紅色}
黃底買入:var19,LINETHICK0,COLOR00ffff;
粉頂賣出:var1A,LINETHICK0,COLORFF50FF; {本文來至CXH99.COM}
紅色持股:0,LINETHICK0,COLORRED;
綠色持幣:0,LINETHICK0,COLOR00d900;
DRAWICON(var19,ref(CLOSE,1)*0.99,7),ALIGN1;
DRAWICON(var1A,ref(CLOSE,1)*1.02,8),ALIGN1;
DRAWTEXTABS(2,5,'所屬板塊：'+BKNAME),COLORFF50FF,LINETHICK1;
流通盤大小:=FINANCE2(37)/1000000*100;
DRAWTEXTABS(2,20,'流通盤大小：'+NUMTOSTRN(流通盤大小,2)+'億'+' 電子盲制作'),LINETHICK1,COLORRED;
每股收益:=FINANCE2(3);
每股市盈率:=DYNAINFO(39);
每股凈資產:=FINANCE2(4);
銷售毛利率:=FINANCE2(12);
主營收入同比:=FINANCE2(11);
凈利潤同比增長:=FINANCE2(10);
DRAWTEXTABS(160,35,'每股收益:'+NUMTOSTRN(每股收益,2)+'元'),COLOR00FF00;
DRAWTEXTABS(160,50,'每股市盈率:'+NUMTOSTRN(每股市盈率,1)+'倍'),COLORRED;
DRAWTEXTABS(160,65,'每股凈資產:'+NUMTOSTRN(每股凈資產,2)+'元'),COLORRED;
DRAWTEXTABS(2,35,'銷售毛利率：'+NUMTOSTRN(銷售毛利率,2)+'%'),LINETHICK1,COLOR00FF00;
DRAWTEXTABS(2,50,'主營收入同比增長：'+NUMTOSTRN(主營收入同比,2)+'%'),LINETHICK1,ColorYELLOW;
DRAWTEXTABS(2,65,'凈利潤同比增長：'+NUMTOSTRN(凈利潤同比增長,2)+'%'),LINETHICK1,COLOR00FF00;
DRAWTEXTABS(3,80,'歷史最高價:'+HHV(HIGH,0)),Colorred;
DRAWTEXTABS(3,95,'歷史最低價:'+LLV(LOW,0)),ColorAFFF00;
A4:=MA(CLOSE,20);
A5:=(CLOSE > MA(CLOSE,5));
A6:=(MA(CLOSE,5) > MA(CLOSE,10));
A7:=(CLOSE > MA(CLOSE,10));
A8:=(MA(CLOSE,5) > MA(CLOSE,20));
A9:=(CLOSE > MA(CLOSE,20));
A10:=ref(A4,1);
A11:=(A4 > A10);
AVX:=(((((IF(A5,10,(0 - 10)) + IF(A6,10,(0 - 10))) + IF(A7,10,(0 - 10))) + IF(A8,10,(0 - 10))) + IF(A9,10,(0 - 10))) + IF(A11,10,(0 - 10)));
DSLX:=(CLOSE / INDEXC);
DSLX1:=MA(DSLX,5);
DSLX2:=MA(DSLX,10);
V1:=MA(VOL,5);
V2:=MA(VOL,10);
阻力位:=IF((CLOSE > 200),(CLOSE * 1.01),(CLOSE * 1.07));
阻力位１:=IF((CLOSE < 10),(CLOSE * 1.05),阻力位);
止損位:=IF((CLOSE > 200),(CLOSE * 0.99),(CLOSE * 0.93));
止損位１:=IF((CLOSE < 10),(CLOSE * 0.95),止損位);
TJTS1:=BARSTATUS=2 and c<200; {文章來至程序化交易網 cxh99.com}
TJTS2:=BARSTATUS=2 and c>200;
k2:=HHV(h,BARSLAST(DISPSTATUS=1)+1);
DRAWTEXT(TJTS1 and((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'該股的量能理想，有明顯走強跡象，可以考慮中線進場參與，倉位在2/3左右。 '),ALIGN2,colorDC143C;
DRAWTEXT(TJTS1 and((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'該股雖然走勢趨強，但量能還顯不足，可以考慮短線進場，倉位在1/2左右。 '),ALIGN2,colorDC143C;
DRAWTEXT(TJTS1 and((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)) ,k2*0.99,'該股量價配合良好，但相對其它股票并沒有明顯走強，可以考慮短線進場，倉位1/2左右。 '),ALIGN2,colorDC143C;
DRAWTEXT(TJTS1 and((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)) ,k2*0.99,'該股形態尚可，但量能不足，股票也未完全走強，可以短線參與，倉位1/3左右。 '),ALIGN2,color0000FF;
DRAWTEXT(TJTS1 and((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'該股形態變壞，但走勢相對其它股票尚可，重倉者減持大半，清倉者可以觀望。 '),ALIGN2,color00FF00; {內容來至程序化交易網 CXH99.COM}
DRAWTEXT(TJTS1 and((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'該股隨大盤一起下跌，程明顯縮量走勢，考慮到大盤風險，減持或清倉。 '),ALIGN2,color00FF00;
DRAWTEXT(TJTS1 and((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)) ,k2*0.99,'該股放量下跌，走勢明顯偏弱，離場觀望。 '),ALIGN2,color00FF00;
DRAWTEXT(TJTS1 and((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)) ,k2*0.99,'該股縮量下跌，走勢偏弱，離場觀望。 '),ALIGN2,color00FF00;
DRAWTEXT(TJTS1 and((((AVX >= 1) AND (ref(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'該股形態良好，強勢明顯，量能充足，可以繼續持有。 '),ALIGN2,color00FFFF;
DRAWTEXT(TJTS1 and((((AVX >= 1) AND (ref(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'該股上行趨勢不變，強勢依然，但量能開始轉弱，注意風險。 '),ALIGN2,color00FFFF; {本文來至程序化交易網 cxh99.com}
DRAWTEXT(TJTS1 and((((AVX >= 1) AND (ref(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) ,k2*0.99,'該股仍然具備上漲潛力，但股性偏弱，可考慮減倉。 '),ALIGN2,color00FFFF;
DRAWTEXT(TJTS1 and((((AVX >= 1) AND (ref(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) ,k2*0.99,'該股走勢趨弱，量能不足，減持大部分籌碼。 '),ALIGN2,color00FFFF;
DRAWTEXT(TJTS1 and((((AVX < 1) AND (ref(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'該股形態不佳，注意成交量的變化，但目前不適合參與。 '),ALIGN2;
DRAWTEXT(TJTS1 and((((AVX < 1) AND (ref(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) ,k2*0.99,'該股趨勢不明，股價偏弱，注意量能變化，目前不宜參與。 '),ALIGN2;
DRAWTEXT(TJTS1 and((((AVX < 1) AND (ref(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) ,k2*0.99,'該股有走強跡象，但量能不足，趨勢不明，不適合操作。 '),ALIGN2; {本文來至CXH99.COM}
DRAWTEXT(TJTS1 and((((AVX < 1) AND (ref(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) ,k2*0.99,'該股走勢太弱，沒有參與價值。 '),ALIGN2;
DRAWTEXT(TJTS2 and(CROSS(AVX,1) AND (V1 >= V2)) ,k2*0.99,'大盤量能理想，有明顯走強跡象，可以考慮中線進場參與，倉位在2/3左右， '),ALIGN2,color0000FF;
DRAWTEXT(TJTS2 and(CROSS(AVX,1) AND (V1 >= V2)) ,k2*0.98,' 如前期經過一輪下跌，此時為最佳買點，但如果前期有過一段漲幅則介入需謹慎。 '),ALIGN2,color0000FF;
DRAWTEXT(TJTS2 and(CROSS(AVX,1) AND (V1 < V2)) ,k2*0.99,'大盤雖然走勢趨強，但量能還顯不足，如果前期經過一輪下跌， '),ALIGN2,color0000FF;
DRAWTEXT(TJTS2 and(CROSS(AVX,1) AND (V1 < V2)) ,k2*0.98,' 可以考慮短線進場，倉位在1/2左右，一旦量能放大可以加倉買入。 '),ALIGN2,color0000FF;
DRAWTEXT(TJTS2 and(CROSS(1,AVX) AND (V1 >= V2)) ,k2*0.99,'大盤形態走壞，重倉者可以減去大部分倉位。 '),ALIGN2,color00FF00;
DRAWTEXT(TJTS2 and(CROSS(1,AVX) AND (V1 < V2)) ,k2*0.99,'大盤縮量調整，注意風險，短線清倉觀望。 '),ALIGN2,color00FF00;
DRAWTEXT(TJTS2 and(((AVX >= 1) AND (ref(AVX,1) > 0)) AND (V1 >= V2)) ,k2*0.99,'大盤走勢良好，量能理想，可以繼續持有強勢股。 '),ALIGN2,color00FFFF;
DRAWTEXT(TJTS2 and(((AVX >= 1) AND (ref(AVX,1) > 0)) AND (V1 < V2)) ,k2*0.99,'大盤形態良好，但量能稍顯不足，隨時準備減倉。 '),ALIGN2,color00FFFF;
DRAWTEXT(TJTS2 and(((AVX < 1) AND (ref(AVX,1) < 0)) AND (V1 >= V2)) ,k2*0.99,'大盤趨勢不明，注意成交量變化，目前不適宜進場。 '),ALIGN2;
DRAWTEXT(TJTS2 and(((AVX < 1) AND (ref(AVX,1) < 0)) AND (V1 < V2)) ,k2*0.99,'大盤趨勢向下，量能萎縮，不適合進場。 '),ALIGN2;