【大智慧】較全的指標添加資訊主圖指標公式
攻城獅 2015.12.15 14:29
使用說明:有很多指標編寫初學者在編寫完指標后,想為自己的指標添加一些資訊資料。我現(xiàn)在為大家提供的是比較常用的F10資料、所屬板塊、量能飽和度、趨勢判斷、目前可見天數(shù)、可視高點距今日低點跌幅及天數(shù)和可視低點距今日高點漲幅及天數(shù)。只要把里面的內容復制到你的公式后面就可以了。
DRAWTEXTABS(2,5,’所屬板塊:’+BKNAME),COLORFF50FF,linethick1;
總股本:=FINANCE2(35)/1000000*100;流通盤:=FINANCE2(37)/1000000*100;
DRAWTEXTABS(15,20,’總股本:’+NUMTOSTRN(總股本,2)+’億’),LINETHICK1,COLORYELLOW;
DRAWTEXTABS(160,20,’流通盤:’+NUMTOSTRN(流通盤,2)+’億’),LINETHICK1,COLORYELLOW;
每股收益:=FINANCE2(3);
每股市盈率:=DYNAINFO(39);
每股凈資產:=FINANCE2(4);
每股現(xiàn)金流:=FINANCE2(6);
主營收入同比:=FINANCE2(11);
凈利潤同比增長:=FINANCE2(10);
每股未分配:=FINANCE2(8);
每股公積金:=FINANCE2(7);
資產負債率:=FINANCE2(20)/FINANCE2(14)*100;
每股市凈率:=DYNAINFO(58);
DRAWTEXTABS(160,35,’每股收益:’+NUMTOSTRN(每股收益,2)+’元’),COLOR00FF00;
DRAWTEXTABS(160,50,’每股市盈率:’+NUMTOSTRN(每股市盈率,1)+’倍’),COLORYELLOW;
DRAWTEXTABS(160,65,’每股凈資產:’+NUMTOSTRN(每股凈資產,2)+’元’),COLOR00FF00;
DRAWTEXTABS(15,35,’每股經營現(xiàn)金流:’+NUMTOSTRN(每股現(xiàn)金流,2)+’元’),LINETHICK1,COLOR00FF00;
DRAWTEXTABS(15,50,’主收入同比增長:’+NUMTOSTRN(主營收入同比,2)+’%’),LINETHICK1,COLORYELLOW;
DRAWTEXTABS(15,65,’凈利潤同比增長:’+NUMTOSTRN(凈利潤同比增長,2)+’%’),LINETHICK1,COLOR00FF00;
DRAWTEXTABS(15,80,’每股未分配:’+NUMTOSTRN(每股未分配,2)+’元’),COLORYELLOW;
DRAWTEXTABS(160,80,’每股公積金:’+NUMTOSTRN(每股公積金,2)+’元’),COLORYELLOW;
DRAWTEXTABS(15,95,’資產負債率:’+NUMTOSTRN(資產負債率,2)+’%’),LINETHICK1,COLOR00FF00;
DRAWTEXTABS(160,95,’每股市凈率:’+每股市凈率+’倍 ‘),LINETHICK1,COLOR00FF00;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));
阻力位1:=IF((CLOSE < 10),(CLOSE * 1.05),阻力位);
止損位:=IF((CLOSE > 200),(CLOSE * 0.99),(CLOSE * 0.93));
止損位1:=IF((CLOSE < 10),(CLOSE * 0.95),止損位);
TJTS1:=BARSTATUS=2 and c<200;
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;
{概念股網-股票公式網站 www.iloveholybible.com}
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,'該股形態(tài)尚可,但量能不足,股票也未完全走強,可以短線參與,倉位1/3左右。 '),ALIGN2,color0000FF;
DRAWTEXT(TJTS1 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)) ,k2*0.99,’該股形態(tài)變壞,但走勢相對其它股票尚可,重倉者減持大半,清倉者可以觀望。 ‘),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 ((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,’該股形態(tài)良好,強勢明顯,量能充足,可以繼續(xù)持有。 ‘),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,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,’該股形態(tài)不佳,注意成交量的變化,但目前不適合參與。 ‘),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;
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,’大盤形態(tài)走壞,重倉者可以減去大部分倉位。 ‘),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,’大盤走勢良好,量能理想,可以繼續(xù)持有強勢股。 ‘),ALIGN2,color00FFFF;
DRAWTEXT(TJTS2 and (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) ,k2*0.99,'大盤形態(tài)良好,但量能稍顯不足,隨時準備減倉。 '),ALIGN2,color00FFFF;
DRAWTEXT(TJTS2 and (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) ,k2*0.99,’大盤趨勢不明,注意成交量變化,目前不適宜進場。 ‘),ALIGN2;
N:=20;
SAT:=(AMOUNT/C)/(HHV(AMOUNT,N)/HHV(C,N));
量能飽和度:=IF(SAT>1,1,SAT)*100;市凈率:=DYNAINFO(58);
DRAWTEXTABS(15,120,’量能飽和度:’+NUMTOSTRN(量能飽和度,2)+’%’),LINETHICK1,COLORFF50FF;
DRAWRECTREL(0,85,15,380,RGB(30,30,30)),COLORWHITE;
AAA:=量能飽和度<=10;
BBB:=量能飽和度>10 AND 量能飽和度<=20;
CCC:=量能飽和度>20 AND 量能飽和度<=30;
DDD:=量能飽和度>30 AND 量能飽和度<=50;
EEE:=量能飽和度>50 AND 量能飽和度<=70;
FFF:=量能飽和度>70 AND 量能飽和度<=80;
GGG:=量能飽和度>80 AND 量能飽和度<=90;
HHH:=量能飽和度>90;
IF BARSTATUS=2 AND AAA THEN BEGIN DRAWRECTREL(0,350,15,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND BBB THEN BEGIN DRAWRECTREL(0,320,15,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND CCC THEN BEGIN DRAWRECTREL(0,290,15,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND DDD THEN BEGIN DRAWRECTREL(0,230,15,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND EEE THEN BEGIN DRAWRECTREL(0,170,15,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND FFF THEN BEGIN DRAWRECTREL(0,140,15,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND GGG THEN BEGIN DRAWRECTREL(0,110,15,380,RGB(255,0,0));
END
ELSE
IF BARSTATUS=2 AND HHH THEN BEGIN DRAWRECTREL(0,85,15,380,RGB(255,0,0));
END;
W:=BARSLAST(DISPSTATUS=1);
低漲:(H/LLV(LOW,W)-1)*100,COLOR0000FF,LINETHICK0,PRECIS2;
高跌:(L/HHV(HIGH,W)-1)*100,COLOR0000FF,LINETHICK0,PRECIS2;
天日:BARSLAST(L=LLV(LOW,W)),COLOR00FFFF,LINETHICK0,PRECIS0;
天:BARSLAST(H=HHV(HIGH,W)),COLOR00FFFF,LINETHICK0,PRECIS0;
{以下設置提示文字部分}
DRAWTEXTREL(15,480,’■低點至今日最高點上漲:’+NUMTOSTRN(低漲,2)+’% ‘+NUMTOSTRN(天日,0)+’天’),COLORFF50FF;
DRAWTEXTREL(15,550,’■高點至今日最低點下跌:’+NUMTOSTRN(高跌,2)+’% ‘+NUMTOSTRN(天,0)+’天’),COLORFF50FF;
DRAWTEXTREL(15,620,’■目前可見K線:’+NUMTOSTRN(W+1,0)+’天’),COLOR00FF00;
申明:本文為作者投稿或轉載,在概念股網 http://www.iloveholybible.com/ 上發(fā)表,為其獨立觀點。不代表本網立場,不代表本網贊同其觀點,亦不對其真實性負責,投資決策請建立在獨立思考之上。