鱼身指标[主副图] 千均老师编写 [飞狐用]

好东东应该与好朋友共同分享！谢谢千均老师！！！

鱼身主图指标
主图指标它的含义是：意图想要我们抛掉鱼头、鱼尾，只要鱼身那部分。
也就是：不追涨、不杀跌，看清趋势、稳健操作。
希望能给大家带来帮助！



鱼身主图源码：

input:时间(71016),N(20,1,100);
TY:=C;A1:=REF(TY,N)=HHV(TY,2*N+1);B1:=FILTER(A1,N);C1:=BACKSET(B1,N+1);
HD:=FILTER(C1,N);A2:=REF(TY,N)=LLV(TY,2*N+1);B2:=FILTER(A2,N);
C2:=BACKSET(B2,N+1);LD:=FILTER(C2,N);A:=REF(C,BARSLAST(HD));
B:=REF(C,BARSLAST(LD));t1:=BARSLAST(HD) and BARSLAST(LD) AND NOT(LD);
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),m3,10,0),colorCC00CC;
持币:STICKLINE(m1<m2,MA(c,14),m3,10,0),color990000;
STICKLINE(CLOSE>=OPEN,CLOSE,HIGH,0,0),colorFF;
STICKLINE(CLOSE>=OPEN,OPEN,LOW,0,0),colorFF;
STICKLINE(CLOSE<OPEN,OPEN,HIGH,0,0),colorEC00;
STICKLINE(CLOSE<OPEN,CLOSE,LOW,0,0),colorEC00;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,8,1),colorA1;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,6,1),colorB5;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,5,1),colorC5;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,4,1),colorD4;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,2.5,1),colorEC;
STICKLINE(CLOSE>=OPEN,CLOSE,OPEN,1,1),colorFF;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,8,1),color9000;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,7,1),colorB400;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,5,1),colorC700;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,3,1),colorDB00;
STICKLINE(CLOSE<OPEN,CLOSE,OPEN,1,1),colorEC00;
STICKLINE(t1,A,A,9,0),Color00FF00,LINETHICK2;
STICKLINE(t1,B,B,9,0),Color0000FF,LINETHICK2;
时间A:=1000000+时间;时间B:=DATE;d1:=DATE=时间A;d2:=DATE=时间B;
tj1:=BARSLAST(d1);tj2:=BARSLAST(d2);hh:=HHV(HIGH,tj1);ll:=LLV(LOW,tj1);
hh1:=HHV(VOL,tj1);ll1:=LLV(VOL,tj1);zh:=REF(hh,tj2);zl:=REF(ll,tj2);
zh1:=REF(hh1,tj2);zl1:=REF(ll1,tj2);sj1:=NUMTOSTR(时间A,0);sj2:=NUMTOSTR(时间B,0);
zw:=BARSLAST(HIGH=hh);jw:=BARSLAST(LOW=ll);zw1:=BARSLAST(VOL=hh1);jw1:=BARSLAST(VOL=ll1);
qz:=(zh-zl)/zl*100*SGN(jw-zw);qz1:=IF(CAPITAL<1,SUM(INDEXV/ESTDATA(8)*100,tj1),SUM(VOL/CAPITAL*100,tj1));
xs:=NUMTOSTR(REF(DATE,zw),0);xx:=NUMTOSTR(REF(DATE,jw),0);
xs1:=NUMTOSTR(REF(DATE,zw1),0);xx1:=NUMTOSTR(REF(DATE,jw1),0);
A1:=COST(0.33);A2:=COST(5);A3:=COST(15);A4:=COST(55);A5:=COST(97);
成本90%:=COST(90);成本70%:=COST(70);成本30%:=COST(30);成本10%:=COST(10);
获利:=WINNER(CLOSE)*100;套牢:=100-WINNER(CLOSE)*100;
DRAWTEXTEX(CLOSE,1,350,0,'90成本:'+NUMTOSTR(成本90%,2)),Color00DD00;
DRAWTEXTEX(CLOSE,1,350,60,'70成本:'+NUMTOSTR(成本70%,2)),Color00DDFF;
DRAWTEXTEX(CLOSE,1,350,120,'30成本:'+NUMTOSTR(成本30%,2)),Color00DD00;
DRAWTEXTEX(CLOSE,1,350,180,'10成本:'+NUMTOSTR(成本10%,2)),Color00DDFF;
DRAWTEXTEX(CLOSE,1,350,240,'底出击:'+NUMTOSTR(A1,2)),ColorDDDDDD;DRAWTEXTEX(CLOSE,1,540,0,'建仓:'+NUMTOSTR(A2,2)),Color00DDFF;
DRAWTEXTEX(CLOSE,1,700,0,'快刀:'+NUMTOSTR(A3,2)),Colorff00FF;DRAWTEXTEX(CLOSE,1,860,0,'升浪:'+NUMTOSTR(A4,2)),Color0000FF;
DRAWTEXTEX(CLOSE,1,860,60,'预测:'+NUMTOSTR(A5,2)),ColorffFF00;DRAWTEXTEX(CLOSE,1,540,60,'获利:'+NUMTOSTR(获利,2)),ColorFF00FF;
DRAWTEXTEX(CLOSE,1,700,60,'套牢:'+NUMTOSTR(套牢,2)),Color00DD00;
DRAWTEXTEX(CLOSE,1,0,60,'0'+STRMID(xs,3,1)+'年'+STRMID(xs,4,2)+'月'+STRMID(xs,6,2)+'日 '+'最高价:'+NUMTOSTR(REF(HIGH,zw),2)),COLORFFCC00;
DRAWTEXTEX(CLOSE,1,0,120,'0'+STRMID(xx,3,1)+'年'+STRMID(xx,4,2)+'月'+STRMID(xx,6,2)+'日 '+'最低价:'+NUMTOSTR(REF(LOW,jw),2)),COLORFFCC00;
DRAWTEXTEX(CLOSE,1,0,180,'0'+STRMID(xs1,3,1)+'年'+STRMID(xs1,4,2)+'月'+STRMID(xs1,6,2)+'日 '+'最大量:'+NUMTOSTR(REF(VOL,zw1),0)),COLORFFCC00;
DRAWTEXTEX(CLOSE,1,0,240,'0'+STRMID(xx1,3,1)+'年'+STRMID(xx1,4,2)+'月'+STRMID(xx1,6,2)+'日 '+'最低量:'+NUMTOSTR(REF(VOL,jw1),0)),COLORFFCC00;
DRAWTEXTEX(CLOSE,1,0,880,'0'+STRMID(sj1,3,1)+'年'+STRMID(sj1,4,2)+'月'+STRMID(sj1,6,2)+'日'),COLORFFCC00;
DRAWTEXTEX(CLOSE,1,145,880,'到0'+STRMID(sj2,3,1)+'年'+STRMID(sj2,4,2)+'月'+STRMID(sj2,6,2)+'日'),COLORFFCC00;
DRAWTEXTEX(qz<0,1,320,880,'这个时间段总跌幅:'+NUMTOSTR(qz,2)+'%'),COLORFFCC00;
DRAWTEXTEX(qz>0,1,320,880,'这个时间段总涨幅:'+NUMTOSTR(qz,2)+'%'),COLORFFCC00;
DRAWTEXTEX(CLOSE,1,0,940,'0'+STRMID(sj1,3,1)+'年'+STRMID(sj1,4,2)+'月'+STRMID(sj1,6,2)+'日'),COLORFFCC00;
DRAWTEXTEX(CLOSE,1,145,940,'到0'+STRMID(sj2,3,1)+'年'+STRMID(sj2,4,2)+'月'+STRMID(sj2,6,2)+'日'),COLORFFCC00;
DRAWTEXTEX(qz1,1,320,940,'这个时间段总换手:'+NUMTOSTR(qz1,2)+'%'),COLORFFCC00;
DRAWTEXTEX(CLOSE,1,0,0,STKLABEL+' '+STKNAME+''),Color00DDFF;
F10:=IF(F10FIND('鹏搏资讯',1)>0,3,0);
IF F10=0 THEN EXIT;
XSL:=IF(DATACOUNT<60,1,5);
KG:=' ';
IF F10=3 THEN BEGIN
{业绩预告--鹏搏}
  YGZ:=F10FIND('控盘情况:',1);
  YGS:=IF(F10=3,F10FIND('业绩预告',150),F10FIND('◆ 信息快讯 ◆',300));
  IF YGS<YGZ THEN BEGIN
    FHS:=IF(F10=3,F10FIND('最近一次分红',YGS+30),F10FIND('●',YGS+80))LINETHICK;
    XST:=F10TEXT(YGS+IF(F10=1,68,0),IF(FHS>0 AND FHS>YGS,FHS-YGS,58));
    XSR:=STRMID(XST,1,STRFIND(XST,  '  ' ,10));
    DRAWTEXTEX(CLOSE,1,0,1000,XSR),ColorFFFFFF;
  END;
END;  



副图正是配合主图。
副图的主要任务是：推翻或验证主图的观点。
如果副图推翻了主图的观点，希望引起您的注意。
如果副图验证了主图观点，希望您结合您的经验做出正确的判断。
指标是参考，决策在人脑！！！



鱼身副图源码：

RV:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
RG:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
J0:=(HIGH+LOW)/2;QJ:=EMA(J0,3);J1:=IF(CLOSE>QJ,VOL,0);J2:=IF(CLOSE<QJ,VOL,0);
量能:IF(CAPITAL<1,MA(vol,74),MA(SUM(J1-J2,22),3)),color00DDDD,LINETHICK;
趋势:IF(CAPITAL<1,WMA(量能,360),WMA(量能,21)),color008800,LINETHICK;
var3:=(量能-趋势);var4:=SMA(RV,3,1);
var5:=SMA(var4,3,1);
STICKLINE(var3>0,100,50,10,0),color990099;
STICKLINE(var3<0,0,50,10,0),color008800;
DRAWICON(cross(var4,var5) and var5<30,2,4);
DRAWICON(cross(var5,var4) and var5>30,97,5);
FILLRGN(var4<var5,var4,var5),COLORFF8800;
FILLRGN(var4>var5,var5,var4),COLOR0000BB;
KK:EMA(SMA(RG,3,1),2),COLORFFFFFF;DD:SMA(KK,3,1),COLOR00FFFF;
DRAWTEXTEX(CLOSE,1,10,10,STKLABEL+' '+STKNAME+''),Color00DDFF;
DRAWTEXT(cross(var4,var5) and cross(KK,DD),10,'共振点'),COLOR00FFFF;
VERTLINE(cross(var4,var5) and cross(KK,DD)),COLOR00FFFF,LINEDOT;

『》》 看大图』