很好的老公式【小天资金为王】（解盘）
此公式能较好以流入资金来分析股份的趋势，用法很简单，主要是结合预测资金的变化来看生命线的变化，同时可以参考解盘。
另外说明：此公式含有成本分布函数“COST”，是用来测算筹码集中度的，还运用了向前赋值函数“BACKSET”，是用来画压力与支撑线的，在指标中取辅助作用，与指标设计的主体相思没有关系，大家放心使用。
源码：
{【小天资金为王】（解盘）}
input:N(2,1,100),M(34,1,100),P(5,1,100);
Var1:=if(OPENMINUTES(CURRENTTIME)=1,AMOUNT,(AMOUNT/OPENMINUTES(CURRENTTIME))*240);
预测资金:ISLASTBAR*Var1/100000000,LINETHICK0,colorFFFF;
C02:=CLOSE;
C0:=REF(C02,1);
XTB1:=REF(C02,2);
XTB2:=REF(C02,3);
XTB3:=REF(C02,4);
XTB4:=REF(C02,5);
XTB5:=REF(C02,6);
XTB6:=IF(((C02 > C0) AND (C0 >= XTB1)),1,IF(((C02 < C0) AND (C0 <= XTB1)),(0 - 1),IF(((C02 > XTB1) AND (XTB1 > C0)),2,IF(((C02 < XTB1) AND (XTB1 < C0)),(0 - 2),0))));
HL:=IF(((C0 > XTB1) AND (C0 > XTB2)),1,IF(((C0 < XTB1) AND (C0 < XTB2)),(0 - 1),IF(((XTB1 > XTB2) AND (XTB1 > XTB3)),2,IF(((XTB1 < XTB2) AND (XTB1 < XTB3)),(0 - 2),IF(((XTB2 > XTB3) AND (XTB2 > XTB4)),3,IF(((XTB2 < XTB4) AND (XTB2 < XTB4)),(0 - 3),IF(((XTB3 > XTB4) AND (XTB3 > XTB5)),4,IF(((XTB3 < XTB4) AND (XTB3 < XTB5)),(0 - 4),0))))))));
HG:=EMA(C02,8);
资金生命1:=EMA(C02,21);
资金生命2:=EMA(C02,55);
资金生命3:=EMA(C02,89);
资金生命4:=EMA(C02,133);
CYC1:=ABS((((C02 - 资金生命4) * 100) / 资金生命4));
资金生命5:=ABS((((C02 - 资金生命3) * 100) / 资金生命3));
AA1:=ABS((((C02 - 资金生命2) * 100) / 资金生命2));
AA2:=ABS((((C02 - 资金生命1) * 100) / 资金生命1));
生命线:IF((CYC1 < P),资金生命4,IF((资金生命5 < P),资金生命3,IF((AA1 < P),资金生命2,IF((AA2 < P),资金生命1,HG)))),colorFF00;
PARTLINE((生命线 > REF(生命线,1)),生命线),colorFF;
STICKLINE(((XTB6 = 2) AND (HL = 3)),C02,C0,5,0),colorFF00FF;
STICKLINE(((XTB6 = 2) AND (HL = 2)),C02,C0,5,0),colorFF00FF;
STICKLINE(((XTB6 = 2) AND (HL = 0)),C02,C0,5,0),colorFF00FF;
STICKLINE(((XTB6 = 2) AND (HL = (0 - 1))),XTB1,C0,5,0),colorFFFF;
STICKLINE(((XTB6 = 2) AND (HL = (0 - 1))),C02,XTB1,5,0),colorFF;
STICKLINE(((XTB6 = 2) AND (HL = (0 - 2))),C02,XTB1,5,0),colorFF;
STICKLINE(((XTB6 = 2) AND (HL = (0 - 3))),C02,XTB1,5,0),colorFF;
STICKLINE(((XTB6 = 1) AND (HL = (0 - 1))),C02,C0,5,1),colorFF;
STICKLINE(((XTB6 = 1) AND (HL = (0 - 2))),C02,C0,5,1),colorFF;
STICKLINE(((XTB6 = 1) AND (HL = (0 - 3))),C02,C0,5,1),colorFF;
STICKLINE(((XTB6 = 1) AND (HL = 0)),C02,C0,5,1),colorFF;
STICKLINE(((XTB6 = 1) AND (HL = 1)),C02,C0,5,1),colorFF;
STICKLINE(((XTB6 = 1) AND (HL = 2)),C02,C0,5,1),colorFF;
STICKLINE(((XTB6 = 1) AND (HL = 3)),C02,C0,5,1),colorFF;
STICKLINE(((XTB6 = 0) AND (HL = 1)),C02,C0,5,0),colorFFFF00;
STICKLINE(((XTB6 = 0) AND (HL = 2)),C02,C0,5,0),colorFFFF00;
STICKLINE(((XTB6 = 0) AND (HL = 3)),C02,C0,5,0),colorFFFF00;
STICKLINE(((XTB6 = 0) AND (HL = (0 - 1))),C02,C0,5,0),colorFFFF;
STICKLINE(((XTB6 = 0) AND (HL = (0 - 2))),C02,C0,5,0),colorFFFF;
STICKLINE(((XTB6 = 0) AND (HL = (0 - 3))),C02,C0,5,0),color4D;
STICKLINE(((XTB6 = (0 - 1)) AND (HL = 3)),C02,C0,5,0),colorFF00;
STICKLINE(((XTB6 = (0 - 1)) AND (HL = 2)),C02,C0,5,0),colorFF00;
STICKLINE(((XTB6 = (0 - 1)) AND (HL = 2)),XTB1,C0,5,0),colorFFFF00;
STICKLINE(((XTB6 = (0 - 1)) AND (HL = (0 - 1))),C02,C0,5,1),colorFF00;
STICKLINE(((XTB6 = (0 - 1)) AND (HL = (0 - 2))),C02,C0,5,1),colorFF00;
STICKLINE(((XTB6 = (0 - 1)) AND (HL = (0 - 3))),C02,C0,5,1),colorFF00;
STICKLINE(((XTB6 = (0 - 2)) AND (HL = 3)),C02,C0,5,1),colorFF;
STICKLINE(((XTB6 = (0 - 2)) AND (HL = 2)),C02,C0,5,1),colorFF00;
STICKLINE(((XTB6 = (0 - 2)) AND (HL = 1)),C02,C0,5,0),colorFF00;
STICKLINE(((XTB6 = (0 - 2)) AND (HL = 0)),C02,C0,5,0),color808080;
STICKLINE(((XTB6 = (0 - 2)) AND (HL = (0 - 1))),C02,C0,5,1),colorFF00;
STICKLINE(((XTB6 = (0 - 2)) AND (HL = (0 - 2))),C02,C0,5,0),colorFFFF;
STICKLINE(((XTB6 = (0 - 2)) AND (HL = (0 - 3))),C02,C0,5,0),colorFFFF;
ZZD1:=(((COST(95) - COST(5)) / (COST(95) + COST(5))) * 100);
ZZD2:=(((COST(85) - COST(15)) / (COST(85) + COST(15))) * 100);
EXPLAINEX((VOL > 0),'90%筹码集中度=',ZZD1,1,0),colorFF;
EXPLAINEX((VOL > 0),'70%筹码集中度=',ZZD2,1,0),colorFF;;;
EE2:=((WINNER(1.05 * CLOSE) * 100) - (WINNER(0.95 * CLOSE) * 100));
CC2:=MA(((WINNER(0.95 * CLOSE) * 100) - (WINNER(COST(0)) * 100)),1);
TX:=MA(((WINNER(COST(100)) * 100) - (WINNER(1.05 * CLOSE) * 100)),1);;
EXPLAINEX((VOL > 0),'获利筹码=',CC2,1,0),colorFFFF;
EXPLAINEX((VOL > 0),'套牢筹码=',TX,1,0),colorFFFF;
EXPLAINEX((VOL > 0),'浮动筹码=',MA(EE2,1),1,0),colorFFFF;
EXPLAINEX((VOL > 0),'小天量价密码=',XTB6,1,0),colorFF00FF;
EXPLAINEX((VOL > 0),'小天资金密码=',HL,1,0),colorFF00FF;
EXPLAIN(((XTB6 = 2) AND (HL = 4)),'结论：极端上升,临近头部'),colorFF00FF;
EXPLAIN(((XTB6 = 2) AND (HL = 2)),'结论：强势冲击,持股待涨'),colorFF;
EXPLAIN(((XTB6 = 2) AND (HL = (0 - 1))),'结论：启稳攻击,择机买入'),colorFF;
EXPLAIN(((XTB6 = 2) AND (HL = (0 - 3))),'结论：强势之底,抓住机会'),colorFF;
EXPLAIN(((XTB6 = 1) AND (HL = 3)),'结论：多空分歧,多方略优'),colorFF;
EXPLAIN(((XTB6 = 1) AND (HL = 1)),'结论：升势继续,勇敢持仓'),colorFF;
EXPLAIN(((XTB6 = 1) AND (HL = (0 - 2))),'结论：攻击开始,适当追买'),colorFF;
EXPLAIN(((XTB6 = 0) AND (HL = 3)),'结论：多空分歧,注意方向'),colorFFFF;
EXPLAIN(((XTB6 = 0) AND (HL = 2)),'结论：上攻乏力,减仓30%'),colorFFFF;
EXPLAIN(((XTB6 = 0) AND (HL = 1)),'结论：初步启稳,逢低试买'),colorFF00;
EXPLAIN(((XTB6 = 0) AND (HL = (0 - 1))),'结论：头部成立,迅速出局'),colorFFFF;
EXPLAIN(((XTB6 = 0) AND (HL = (0 - 2))),'结论：调整开始,逢高出局'),colorFFFF;
EXPLAIN(((XTB6 = (0 - 1)) AND (HL = 4)),'结论：跌势继续,空仓等待'),colorFFFF00;
EXPLAIN(((XTB6 = (0 - 1)) AND (HL = 2)),'结论：超跌之底,观望为上'),colorFFFF00;
EXPLAIN(((XTB6 = (0 - 1)) AND (HL = (0 - 1))),'结论：多空分歧,空方主动'),colorFF00;
EXPLAIN(((XTB6 = (0 - 1)) AND (HL = (0 - 3))),'结论：减仓动作,注意变盘'),colorFF0000;
EXPLAIN(((XTB6 = (0 - 2)) AND (HL = 3)),'结论：强势之底,注意变盘'),color808080;
EXPLAIN(((XTB6 = (0 - 2)) AND (HL = 1)),''),colorFF00;
EXPLAIN(((XTB6 = (0 - 2)) AND (HL = (0 - 2))),''),colorFFFF;
XTCC1:=MAX(MAX(C02,C0),XTB1);
TY:=MIN(MIN(C02,C0),XTB1);
CYC1:=(REF(XTCC1,3) = HHV(XTCC1,7));
TY1:=BACKSET(CYC1,4);
B:=(FILTER(TY1,3) AND (XTCC1 = HHV(XTCC1,4)));
AA1:=(REF(TY,3) = LLV(TY,7));
SCR1:=BACKSET(AA1,4);
EE2:=(FILTER(SCR1,3) AND (TY = LLV(TY,4)));
BB:=(ISLASTBAR AND REF(B,BARSLAST(B)));
GG:=BACKSET(BB,(BARSLAST(B) + 1));
HH:=(GG > REF(GG,1));
II:=REF(BARSLAST(B),1);
JJ:=BACKSET(HH,(II + 2));
KK:=(JJ > REF(JJ,1));
DRAWLINE(KK,XTCC1,HH,XTCC1,0),LINETHICK2,colorFF00FF;
LL:=((REF(XTCC1,BARSLAST(HH)) - REF(XTCC1,BARSLAST(KK))) / (BARSLAST(KK) - BARSLAST(HH)));
CS:=(BACKSET(ISLASTBAR,3) * XTCC1);
XTTY:=((REF(CS,1) = 0) AND (CS <> 0));
DRAWLINE(HH,XTCC1,XTTY,CS,0),POINTDOT,colorFF00FF;
III:=((REF(CS,BARSLAST(XTTY)) - REF(XTCC1,BARSLAST(HH))) / (BARSLAST(HH) - BARSLAST(XTTY)));
CS11:=(ISLASTBAR AND REF(EE2,BARSLAST(EE2)));
GG2:=BACKSET(CS11,(BARSLAST(EE2) + 1));
HH2:=(GG2 > REF(GG2,1));
II2:=REF(BARSLAST(EE2),1);
JJ2:=BACKSET(HH2,(II2 + 2));
KK2:=(JJ2 > REF(JJ2,1));
DRAWLINE(KK2,TY,HH2,TY,0),LINETHICK2,colorFF00;
LL2:=((REF(TY,BARSLAST(HH2)) - REF(TY,BARSLAST(KK2))) / (BARSLAST(KK2) - BARSLAST(HH2)));
CS2:=(BACKSET(ISLASTBAR,3) * TY);
XTTY1:=((REF(CS2,1) = 0) AND (CS2 <> 0));
DRAWLINE(HH2,TY,XTTY1,CS2,0),POINTDOT,colorFF00;
IIV:=((REF(CS2,BARSLAST(XTTY1)) - REF(TY,BARSLAST(HH2))) / (BARSLAST(HH2) - BARSLAST(XTTY1)));
CS22:=(BACKSET(ISLASTBAR,(BARSLAST(KK) + 2)) OR BACKSET(ISLASTBAR,(BARSLAST(KK2) + 3)));
CS22:=(BACKSET(ISLASTBAR,(BARSLAST(KK) + 2)) OR BACKSET(ISLASTBAR,(BARSLAST(KK2) + 3)));
DRAWICON((B AND CS22),(XTCC1 * 1.02),10);
DRAWICON((EE2 AND CS22),(TY * 0.99),11);
BXS:=(REF(XTCC1,BARSLAST(HH)) + (BARSLAST(HH) * LL));
压力:(REF(CS,BARSLAST(XTTY)) + (BARSLAST(XTTY) * III)),POINTDOT,LINETHICK5,colorFF00FF;
主压力:=(REF(TY,BARSLAST(HH2)) + (BARSLAST(HH2) * LL2));
支撑:(REF(CS2,BARSLAST(XTTY1)) + (BARSLAST(XTTY1) * IIV)),POINTDOT,LINETHICK5,colorFF00;
DRAWICON(((CROSS(C02,BXS) OR ((C02 > 压力) AND (REF(C02,1) < REF(压力,1)))) AND (C02 > 15)),(C02 * 1.15),5);
DRAWICON(CROSS(C02,BXS),(C02 * 1.15),5);
主支撑:=IF((支撑 < 压力),CROSS(支撑,C02),CROSS(压力,C02));
DRAWICON(主支撑,(C02 * 0.95),4);{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
