软件名称:[B]鱼身指标[飞狐主副图公式] 精品指标[/B]
软件类型:国产软件
运行环境:Win9X/Win2000/WinXP/Win2003/
软件语言:简体中文
授权方式:解密版
软件大小:6.00 KB
官方主页:Home Page
更新时间:2009-07-11 13:38:00
软件简介:
鱼身指标[主副图] 千均老师编写 [飞狐用]
好东东应该与好朋友共同分享!谢谢千均老师!!!
鱼身主图指标
主图指标它的含义是:意图想要我们抛掉鱼头、鱼尾,只要鱼身那部分。
也就是:不追涨、不杀跌,看清趋势、稳健操作。
希望能给大家带来帮助!
鱼身主图源码:
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;
『》》 看大图』
[url=http://www.70822.com/soft/sort013/sort02/down-10765.html]鱼身指标[飞狐主副图公式] 精品指标[/url]