千钧茶社 - 主图指标【鱼身】

分析家公式网,提供指标公式,股票软件用户登录 |

首页 ┆ 软件中心 ┆ 备用域名gspt.com ┆ 公式教程 ┆ 软件分类

当前位置：分析家公式网 → 股票公式 → 飞狐公式 → 一键转帖：千钧茶社 - 主图指标【鱼身】

软件名称：[B]千钧茶社 - 主图指标【鱼身】[/B]
软件类型：国产软件
运行环境：Win9X/2000/XP/2003/
软件语言：简体中文
授权方式：解密版
软件大小：4.00 KB
官方主页：Home Page
更新时间：2008-11-30 13:18:31
软件简介:

这套组合的意义是：在看清长趋势的情况下，利用短中线机会、获得利润。
当然，指标是参考，决策在人脑。
纪律第一，心态第二，技术第三。这是一品大师的理念。
这个理念、千钧非常推崇。
同时我也希望，朋友们能如此看待股市！

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

源码：
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;

[url=http://www.70822.com/soft/sort013/sort02/down-4723.html]千钧茶社 - 主图指标【鱼身】[/url]