疯狂的鱼 的公式源码

{疯狂的鱼}
{鱼身}
M1:=IF(CAPITAL<1,EMA(vol,55),C);
M2:=IF(CAPITAL<1,WMA(M1,360),DMA(M1,vol/CAPITAL));
M3:=IF(CAPITAL<1,DMA(MA(c,5),vol/ESTDATA(8)),DMA(MA(c,5),vol/CAPITAL));
STICKLINE(m1>m2,MA(c,14)*0.97,m3*0.97,10,0),colorCC00CC;
持股:if(m1>m2,1,0),colorCC00CC,linethick0;
STICKLINE(m1<m2,MA(c,14)*0.97,m3*0.97,10,0),color990000;

{大箱体}
//顶: COST(95)*1, linedot,COLORRED;
Var11:=(2*CLOSE+HIGH+LOW)/4;
底: EMA(Var11,99)*0.91,linedot,colorgreen ;


{财务指标}
毛利润率:=FINANCE(21)/FINANCE(20);
主营业务增长率:=FINANCE(53);
净利润增长率:=FINANCE(55);
市盈率:=DYNAINFO(39);
市净率:=c/FINANCE(34);
莸利比例:=WINNER(c )*100;
净资产:=FINANCE(34);
净资收益率:=FINANCE(37);
总股本:=finance(1)/10000;
流通A股:=finance(7)/10000;
总市值:=总股本*c;
流通市值:=流通A股*c;

DRAWTEXTEX(c,1,10,300,'市盈率:'),LINETHICK1,ColorFFFFFF;
DRAWTEXTEX(c,1,90,300,NUMTOSTR(市盈率,2)+''),ColorFFFFFF;
DRAWTEXTEX(c,1,150,300,'市净率:'),LINETHICK1,ColorFFFFFF;
DRAWTEXTEX(c,1,230,300,NUMTOSTR(市净率,2)+''),ColorFFFFFF;
DRAWTEXTEX(c,1,10,85,'莸利比例:'),LINETHICK2,ColorAFFF00;
DRAWTEXTEX(c,1,90,85,NUMTOSTR(莸利比例,2)+'%'),ColorAFFF00;
DRAWTEXTEX(c,1,10,157,'主营业务增长率:'),LINETHICK2,Color00FFFF;
DRAWTEXTEX(c,1,170,157,NUMTOSTR(主营业务增长率,2)+'%'),Color00FFFF;
DRAWTEXTEX(c,1,260,157,'净利润增长率:'),LINETHICK2,Color00FFFF;
DRAWTEXTEX(c,1,390,157,NUMTOSTR(净利润增长率,2)+'%'),Color00FFFF;
DRAWTEXTEX(c,1,190,85,'净资产:'),LINETHICK2,ColorAFFF00;
DRAWTEXTEX(c,1,270,85,NUMTOSTR(净资产,2)+''),ColorAFFF00;
DRAWTEXTEX(c,1,370,85,'净资收益率:'),LINETHICK2,Colorgreen;
DRAWTEXTEX(c,1,485,85,NUMTOSTR(净资收益率,2)+'%'),Colorgreen;
DRAWTEXTex(c,1,10,20,'\n所属板块:'+BLKNAME),colorFFFFFF;

DRAWTEXTEX(c,1,110,225,NUMTOSTR(总股本,2)+'亿股 '),ColorAFFF00;
DRAWTEXTEX(c,1,10,225,'总股本:'),LINETHICK2,Coloryellow;
DRAWTEXTEX(c,1,360,225,NUMTOSTR(流通A股,2)+'亿股 '),ColorAFFF00;
DRAWTEXTEX(c,1,260,225,'流通A股:'),LINETHICK2,Colorgreen;
DRAWTEXTEX(c,1,560,225,NUMTOSTR(总市值,2)+'亿元 '),Coloryellow;
DRAWTEXTEX(c,1,480,225,'总市值:'),LINETHICK2,Coloryellow;
DRAWTEXTEX(c,1,780,225,NUMTOSTR(流通市值,2)+'亿元 '),Coloryellow;
DRAWTEXTEX(c,1,690,225,'流通市值:'),LINETHICK2,Coloryellow;


{霸王庄}
主力持仓:=EMA(100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3);
指数趋势:=EMA(100*(INDEXC-LLV(INDEXL,34))/(HHV(INDEXH,34)-LLV(INDEXL,34)),3);
强弱分界:=80;
主力筹码集中度:=WINNER(C)*100;
散筹筹码集中度:=(WINNER(C*1.1)-WINNER(C*0.9))*100;
qiang:=(主力持仓-散筹筹码集中度)>20 and (主力筹码集中度-散筹筹码集中度)>0 and 主力持仓>50;
强庄坐镇:=if(qiang,1,0),colorred,linethick0;
DRAWTEXT(强庄坐镇,(底 * 0.99),'●'),Coloryellow;
●霸王庄●:if(qiang and 主力筹码集中度-散筹筹码集中度>20,1,0),linethick0,ColorFF80FF;
DRAWTEXT(●霸王庄●,(底 * 0.98),'●'),Colorred;


{立庄量}
VOLUME:=VOL,linethick0;
MAVOL1:=MA(VOLUME,5);
MAVOL2:=MA(VOLUME,10);
V2:=IF(BARSTATUS=2,VOL*240/MINUTE/REF(VOL,1)-1,VOL/REF(VOL,1)-1),COLORRED;
STICKLINE(V2>=1,(llv(l,10)/2+hhv(h,10)/2),c,3,0),COLORYELLOW;

{筹码主图}
底线:=COST(30),COLOR00FF00;
拉升线:=COST(70),COLORFF00FF;
逃顶线:=COST(90);
风险线:=HHV(COST(90),20);
VV:=HHV(COST(90),10);
XX:=LLV(COST(70),20);
套牢筹码:if(逃顶线<VV,逃顶线,0),colorwhite,linethick0;
STICKLINE(逃顶线<VV,逃顶线,VV,6,0),COLORBLUE;
疯狂拉升:if(XX<底线,底线,0),coloryellow,linethick0;
STICKLINE(XX<底线,底线,拉升线,6,0),COLOR98A154;
拉升阶级:if(XX<拉升线,XX,0),colorwhite,linethick0;
STICKLINE(XX<拉升线,XX,拉升线,2,0),COLORFF5B90;
STICKLINE(C>=O ,O ,C ,5 ,1 ),colorred;
STICKLINE(O> C ,C ,O ,5 ,0 ),colorffffcc;
STICKLINE(C>=O ,C ,H ,0.5 ,0 ),colorred;
STICKLINE(C>=O ,O ,L ,0.5 ,0 ),colorred;
STICKLINE(O> C ,C ,L ,0.5 ,0 ),colorffffcc;
STICKLINE(O> C ,O ,H ,0.5 ,0 ),colorffffcc;
市场重心:(HHV(H,0)+LLV(L,0))/2,COLORYELLOW;

{八线}
七天线:ema(c,7);
持股线:ema(c,15),colorred,linethick2;
生命线:ema(c,25),colorgreen;
初月线:ema(c,34),coloryellow;
双月线:ema(c,56),color0099ff,linethick2;
长牛线:ema(c,235),colorred;
牛熊线:ema(c,453),colorwhite,linethick3;
stickline(c<持股线,h,l,0.4,2),colorgreen;
stickline(c<持股线,o,c,8,2),colorgreen;
stickline(c>持股线,h,l,0.4,0),colorred;
stickline(c>持股线,o,c,8,0),colorred;