当前位置:→ 股海网飞狐公式 → 正文
  • 小天特色指标源码

  • 相关简介:{公称名称: 0小天趋势至上} input:N(3,1,100),STEP(2,1,100),MAXP(20,5,100); SJ:=(DATE = 1051231); VAR1:=(SPLITDATA(1) + SPLITDATA(2)); CAP:=CLOSE; CAP[DATACOUNT]=1; FOR I=DATACOUNT downto 2 DO CAP[(I - 1)]=(CAP[I] / (1 + (VAR1[I] / 10))); CAPI:=((CAP * CAPITAL) /

  • 文章来源:股海网作者:股海网发布时间:2015-11-09浏览次数:下载次数:0

{公称名称: 0小天趋势至上}

input:N(3,1,100),STEP(2,1,100),MAXP(20,5,100);
 SJ:=(DATE <= 1051231);
 VAR1:=(SPLITDATA(1) + SPLITDATA(2));
 CAP:=CLOSE;
 CAP[DATACOUNT]=1;
 FOR    I=DATACOUNT downto 2  DO
 CAP[(I - 1)]=(CAP[I] / (1 + (VAR1[I] / 10)));
 CAPI:=((CAP * CAPITAL) / 100);
 HS:=(VOL / CAPI);
成本:="xt1@CYCMAX";
成本1:=DMA(((AMOUNT / VOL) / 100),((0.8 * HS) / 100));
 FILLRGN(((成本 < 成本1) AND (CLOSE < 100)),成本,成本1),colorCC6666;
 FILLRGN(((成本 >= 成本1) AND (CLOSE < 100)),成本,成本1),color5022DD;
 AA:=(REF(HIGH,N) = HHV(HIGH,((2 * N) + 1)));
 AAA:=FILTER(AA,N);
 BB:=BACKSET(AAA,(N + 1));
 CC1:=FILTER(BB,N);
 CC:=(CC1 OR ISLASTBAR);
 AA2:=(REF(LOW,N) = LLV(LOW,((2 * N) + 1)));
 AAA2:=FILTER(AA2,N);
 BB2:=BACKSET(AAA2,(N + 1));
 CC22:=FILTER(BB2,N);
 CC2:=(CC22 AND NOT(CC1));
 EA:=BACKSET(CC,(REF(BARSLAST(CC2),1) + 1));
 EB:=(EA > REF(EA,1));
 EE:=BACKSET(EB,2);
 FF1:=(EE > REF(EE,1));
 EE2:=BACKSET((FF1 AND (COUNT(CC,(REF(BARSLAST(CC2),1) + 2)) = 0)),(REF(BARSLAST(CC2),1) + 2));
 FF2:=(EE2 > REF(EE2,1));
 EE3:=BACKSET((FF2 AND (COUNT(CC,(REF(BARSLAST(CC2),1) + 2)) = 0)),(REF(BARSLAST(CC2),1) + 2));
 FF3:=(EE3 > REF(EE3,1));
 JS:=IF(CC,COUNT(CC2,(REF(BARSLAST(CC),1) + 1)),0);
 G1:=IF(((JS = 1) AND CC),BARSLAST(FF1),0);
 GA:=IF((CC AND (REF(LOW,BARSLAST(FF1)) >= REF(LOW,BARSLAST(FF2)))),BARSLAST(FF2),BARSLAST(FF1));
 G2:=IF(((JS = 2) AND CC),GA,0);
 G3:=IF(((JS >= 3) AND CC),IF((CC AND (REF(LOW,GA) >= REF(LOW,BARSLAST(FF3)))),BARSLAST(FF3),GA),0);
 GG:=((G1 + G2) + G3);
 JA:=BACKSET(CC,GG);
 JB:=(JA > REF(JA,1));
 JJ:=BACKSET(JB,2);
 LD:=(JJ > REF(JJ,1));
 LD1:=(LD OR ISLASTBAR);
 HEA:=BACKSET(LD1,(REF(BARSLAST(CC),1) + 1));
 HEB:=(HEA > REF(HEA,1));
 HEE:=BACKSET(HEB,2);
 HFF1:=(HEE > REF(HEE,1));
 HEE2:=BACKSET((HFF1 AND (COUNT(LD1,(REF(BARSLAST(CC),1) + 2)) = 0)),(REF(BARSLAST(CC),1) + 2));
 HFF2:=(HEE2 > REF(HEE2,1));
 HEE3:=BACKSET((HFF2 AND (COUNT(LD1,(REF(BARSLAST(CC),1) + 2)) = 0)),(REF(BARSLAST(CC),1) + 2));
 HFF3:=(HEE3 > REF(HEE3,1));
 HJS:=IF(LD1,COUNT(CC1,(REF(BARSLAST(LD1),1) + 1)),0);
 HG1:=IF(((HJS = 1) AND LD1),BARSLAST(HFF1),0);
 HGA:=IF((LD1 AND (REF(HIGH,BARSLAST(HFF1)) <= REF(HIGH,BARSLAST(HFF2)))),BARSLAST(HFF2),BARSLAST(HFF1));
 HG2:=IF(((HJS = 2) AND LD1),HGA,0);
 HG3:=IF(((HJS >= 3) AND LD1),IF((LD1 AND (REF(HIGH,HGA) <= REF(HIGH,BARSLAST(HFF3)))),BARSLAST(HFF3),HGA),0);
 HGG:=((HG1 + HG2) + HG3);
 HJA:=BACKSET(LD1,HGG);
 HJB:=(HJA > REF(HJA,1));
 HJJ:=BACKSET(HJB,2);
 HD:=(HJJ > REF(HJJ,1));
 X1:=BACKSET(ISLASTBAR,(BARSLAST(LD) + 1));
 X2:=(X1 > REF(X1,1));
 Y1:=BACKSET(ISLASTBAR,(BARSLAST(HD) + 1));
 Y2:=(Y1 > REF(Y1,1));
 Z1:=IF((BARSLAST(X2) < BARSLAST(Y2)),X2,Y2);
 Z2:=IF((BARSLAST(X2) < BARSLAST(Y2)),LOW,HIGH);
 UU:=BACKSET(ISLASTBAR,(BARSLAST(LD) + 1));
 VV:=(UU > REF(UU,1));
 WW:=BACKSET(VV,(REF(BARSLAST(LD),1) + 2));
 XX:=(WW > REF(WW,1));
 WWW:=BACKSET(XX,(REF(BARSLAST(LD),1) + 2));
 XXX:=(WWW > REF(WWW,1));
 DRAWLINE(XXX,LOW,XX,LOW,0),POINTDOT,LINETHICK1,colorFF00;
 WWWW:=BACKSET(WWW,(REF(BARSLAST(LD),1) + 2));
 XXXX:=(WWWW > REF(WWWW,1));
 SC2:=((REF(LOW,BARSLAST(VV)) - REF(LOW,BARSLAST(XX))) / (BARSLAST(XX) - BARSLAST(VV)));
支撑1:(REF(LOW,BARSLAST(VV)) + (BARSLAST(VV) * SC2)),POINTDOT,LINETHICK2,colorFFFF;
 SC3:=((REF(LOW,BARSLAST(XX)) - REF(LOW,BARSLAST(XXX))) / (BARSLAST(XXX) - BARSLAST(XX)));
支撑2:(REF(LOW,BARSLAST(XX)) + (BARSLAST(XX) * SC3)),POINTDOT,LINETHICK2,colorFF00;
 SC4:=((REF(LOW,BARSLAST(XXX)) - REF(LOW,BARSLAST(XXXX))) / (BARSLAST(XXXX) - BARSLAST(XXX)));
支撑3:(REF(LOW,BARSLAST(XXX)) + (BARSLAST(XXX) * SC4)),POINTDOT,LINETHICK2,colorFFFF00;
 DRAWLINE(XXXX,LOW,XXX,LOW,0),POINTDOT,LINETHICK1,colorFFFF00;
 DRAWLINE(XX,LOW,VV,LOW,0),POINTDOT,LINETHICK1,colorFFFF;
 WW13:=BACKSET(WW,(REF(BARSLAST(HD),1) + 2));
 WW14:=BACKSET(WW13,(REF(BARSLAST(HD),1) + 2));
 UU2:=BACKSET(ISLASTBAR,(BARSLAST(HD) + 1));
 VV2:=(UU2 > REF(UU2,1));
 WW2:=BACKSET(VV2,(REF(BARSLAST(HD),1) + 2));
 XX2:=(WW2 > REF(WW2,1));
 WW3:=BACKSET(WW2,(REF(BARSLAST(HD),1) + 2));
 XX3:=(WW3 > REF(WW3,1));
 WW4:=BACKSET(WW3,(REF(BARSLAST(HD),1) + 2));
 XX4:=(WW4 > REF(WW4,1));
 CS2:=((REF(HIGH,BARSLAST(XX2)) - REF(HIGH,BARSLAST(XX3))) / (BARSLAST(XX3) - BARSLAST(XX2)));
压力2:(REF(HIGH,BARSLAST(XX3)) + (BARSLAST(XX3) * CS2)),colorFF00;
 CS3:=((REF(HIGH,BARSLAST(VV2)) - REF(HIGH,BARSLAST(XX2))) / (BARSLAST(XX2) - BARSLAST(VV2)));
压力1:(REF(HIGH,BARSLAST(VV2)) + (BARSLAST(VV2) * CS3)),LINETHICK1,colorFF00FF;
 CS4:=((REF(HIGH,BARSLAST(XX3)) - REF(HIGH,BARSLAST(XX4))) / (BARSLAST(XX4) - BARSLAST(XX3)));
压力3:(REF(HIGH,BARSLAST(XX3)) + (BARSLAST(XX3) * CS4)),LINETHICK1,colorFF;
 DRAWLINE(XX2,HIGH,VV2,HIGH,0),LINETHICK1,colorFF00FF;
 DRAWLINE(XX3,HIGH,XX2,HIGH,0),LINETHICK1,colorFF00;
 DRAWLINE(XX4,HIGH,XX3,HIGH,0),LINETHICK1,color5200F1;
 PARTLINE((HD AND WW4),(HIGH * 1.01)),CIRCLEDOT,colorFFFF;
 PARTLINE((HD AND WW4),(HIGH * 1.01)),CROSSDOT,colorFF;
 PARTLINE((LD AND (WW14 OR WWWW)),(LOW * 0.98)),CIRCLEDOT,colorFFFF;
 PARTLINE((LD AND (((WW14 OR VV2) OR VV) OR WWWW)),(LOW * 0.98)),CROSSDOT,colorFF00;
 SCSM:=((REF(HIGH,BARSLAST(VV2)) - REF(LOW,BARSLAST(XX))) / (BARSLAST(XX) - BARSLAST(VV2)));
趋势生命:(REF(LOW,BARSLAST(VV)) + (BARSLAST(VV) * SCSM)),LINETHICK2,colorFFFFFF;
 FSL:=((REF(HIGH,BARSLAST(VV2)) - REF(LOW,BARSLAST(VV))) / (BARSLAST(VV2) - BARSLAST(VV)));
分水领1:=(REF(LOW,BARSLAST(VV)) + (BARSLAST(VV) * FSL));
分水领2:=(REF(HIGH,BARSLAST(VV2)) + (BARSLAST(VV2) * FSL));
分水领:IF(((BARSLAST(VV2) - BARSLAST(VV)) > 0),分水领1,分水领2),LINETHICK2,colorFF0000;
 DRAWNUMBER((HD AND ((WW14 OR VV2) OR VV)),(HIGH * 1.02),HIGH,2),ALIGN0,SHIFT1,colorFF00FF;
 DRAWNUMBER((LD AND (((WW14 OR VV2) OR VV) OR WWWW)),(LOW * 0.975),LOW,2),ALIGN0,SHIFT1,colorFFFF00;
 SXK:=((支撑1 >= 支撑2) AND (支撑2 >= 支撑3));
 TP:=((CROSS(CLOSE,压力1) OR CROSS(CLOSE,压力2)) OR CROSS(CLOSE,压力3));
 DRAWICON(((SXK AND TP) AND (BARSLAST(VV) >= 3)),(CLOSE * 1.01),'T03');
周K:=STKINDI(STKLABEL,'kdj.k',0,7);
周D:=STKINDI(STKLABEL,'kdj.d',0,7);
历史流通盘{万股}:=CAPI;
ZF:=(((HIGH - LOW) * 100) / LOW);
 STZF:=(((CLOSE - OPEN) * 100) / OPEN);
 SPZF:=(((CLOSE - LOW) * 100) / LOW);
 STZFB:=(STZF / ZF);
SPZFB:=(SPZF / ZF);
最大震幅:=REF(HHV(ZF,5),1);
最小震幅:=REF(LLV(ZF,5),1);
 XZFB:=(ZF / 最大震幅);
DZFB:=(ZF / 最小震幅);
XHSB:=(HS / REF(HHV(HS,4),1));
 DHSB:=(HS / REF(LLV(HS,4),1));
 DY1:=(0 - (5 * (((((STZFB >= 0.48) AND (SPZFB > 0.5)) AND (DZFB > 2)) AND (DHSB > 2)) AND (CLOSE > OPEN))));
 DY2:=(0 - (5 * ((((STZFB >= 0.8) AND (DZFB > 1.5)) AND (DHSB > 1.5)) AND (CLOSE > OPEN))));
 DY3:=(0 - (5 * ((((((STZFB >= 0.82) AND (XZFB > 0.9)) AND (DZFB > 1.5)) AND (XHSB > 0.9)) AND (DHSB > 1.5)) AND (CLOSE > OPEN))));
单阳:=FILTER((((DY1 OR DY2) OR DY3) AND (周K > 周D)),3);
 VV1:=(单阳 * LOW);
 TS:=(((BARSLAST((单阳 > 0)) + 1) >= 1) AND (BARSLAST((单阳 > 0)) <= 13));
单阳高:=REF(HHV(HIGH,BARSLAST((单阳 > 0))),1);
单阳攻击:=(CROSS(CLOSE,单阳高) AND TS);
强势攻击:=IF(((单阳 = 1) AND (单阳攻击 = 1)),1,0);
单阳低点:=REF(LOW,BARSLAST(VV));
单阳不破:=(TS AND (LOW >= 单阳低点));
时间:=IF((LOW >= 单阳低点),BARSLAST((单阳 < 0)),0);
单阳启稳:=((CROSS(HS,ZF) AND (CLOSE > OPEN)) AND TS);
 STICKLINE((CLOSE >= OPEN),LOW,HIGH,0.1,0),colorFF;
 STICKLINE((CLOSE >= OPEN),OPEN,CLOSE,7,1),colorFF;
 STICKLINE((CLOSE <= OPEN),LOW,HIGH,0.1,0),colorFFFF00;
 STICKLINE((CLOSE <= OPEN),OPEN,CLOSE,7,0),colorFFFF00;
 STICKLINE(((单阳 = 1) AND (周K < 50)),CLOSE,OPEN,8,0),colorFFFF;
 STICKLINE(((单阳 = 1) AND (周K < 50)),HIGH,LOW,0,0),colorFFFF;
 STICKLINE((单阳启稳 = 1),CLOSE,OPEN,8,0),colorFF00FF;
 STICKLINE((单阳启稳 = 1),HIGH,LOW,0,0),colorFF00FF;
 STICKLINE((((单阳 = 1) AND (周K > 50)) AND (周K < 80)),CLOSE,OPEN,8,0),colorFFFF;
 STICKLINE((((单阳 = 1) AND (周K > 50)) AND (周K < 80)),HIGH,LOW,0,0),colorFFFF;
 STICKLINE(((CLOSE >= OPEN) AND (单阳攻击 = 1)),CLOSE,OPEN,8,0),colorFF;
 STICKLINE(((CLOSE >= OPEN) AND (单阳攻击 = 1)),CLOSE,OPEN,4,0),colorB0B0FF;
 STICKLINE(((CLOSE >= OPEN) AND (单阳攻击 = 1)),CLOSE,OPEN,2,0),colorFFFF;
 STICKLINE(((CLOSE >= OPEN) AND (单阳攻击 = 1)),HIGH,LOW,0,0),colorFFFF;
 STICKLINE(((单阳 = 1) AND (周K >= 80)),CLOSE,OPEN,8,0),colorFF2020;
 STICKLINE(((单阳 = 1) AND (周K >= 80)),CLOSE,OPEN,4,0),colorFF6600;
 STICKLINE(((单阳 = 1) AND (周K >= 80)),CLOSE,OPEN,2,0),colorFFFF00;
 STICKLINE(((单阳 = 1) AND (周K >= 80)),HIGH,LOW,0,0),colorFFFF00;
 ZTZD:=MIN(REF(CLOSE,1),MIN(REF(OPEN,1),MIN(REF(HIGH,1),REF(LOW,1))));
 ZTZG:=MAX(REF(CLOSE,1),MAX(REF(OPEN,1),MAX(REF(HIGH,1),REF(LOW,1))));
 JTZD:=MIN(CLOSE,MIN(OPEN,MIN(HIGH,LOW)));
 JTZG:=MAX(CLOSE,MAX(OPEN,MAX(HIGH,LOW)));
 TKX:=(ZTZD > JTZG);
 TKS:=(ZTZG < JTZD);
 STICKLINE(TKX,REF(LOW,1),REF(LOW,1),10,0),colorFF00;
 STICKLINE(TKX,HIGH,HIGH,10,0),colorFF00;
 STICKLINE(TKS,REF(HIGH,1),REF(HIGH,1),10,0),colorFF00FF;
 STICKLINE(TKS,LOW,LOW,10,0),colorFF00FF;
 FDPX:=EXTDATA(11);
 ZJPX:=EXTDATA(12);
 LBLD:=EXTDATA(13);
 ZZPX:=EXTDATA(10);
 ZSPX:=EXTDATA(9);
 BK:='A股板块';
STKSUM:=STKCOUNT(BK);
 XT:=STKSUM;
 SJ:=(DATE <= 1051231);
 AAA:=CHECKUSER(1);
 CYC1:=(("xt1@CYC5" * SJ) > 0);
主力雷达:=(((CYC1 * (XT - ZZPX)) * 100) / XT);
市场雷达:=(((CYC1 * (XT - ZSPX)) * 100) / XT);
空间雷达:=(((CYC1 * (XT - FDPX)) * 100) / XT);
能量雷达:=(((CYC1 * (XT - ZJPX)) * 100) / XT);
动量雷达:=(((CYC1 * (XT - LBLD)) * 100) / XT);
 BUY:=((((主力雷达 > 90) AND (市场雷达 > 90)) AND (能量雷达 > 90)) AND (动量雷达 > 90));
 VAR2:=(((CYC1 * AMOUNT) / VOL) / 100);
 VAR3:=EMA(VAR2,8);
 VAR4:=STD(VAR2,8);
 VAR5:=(((VAR2 - VAR3) * 100) / VAR4);
 VAR6:=EMA(VAR5,5);
 VAR7:=EMA(VAR6,8);
辟地:=(((EMA(VAR6,8) + 100) / 2) - 3);
开天:=HHV(辟地,2);
 AA:=(CYC1 * (开天 - 辟地));
周期触发器:IF((AA = 0),1,IF((AA > 0),(0 - 1),0)),LINETHICK1;
 SELL:=((周期触发器 = (0 - 1)) AND (REF(周期触发器,1) = 1));
 VAR198:="filter@filter"(BUY,SELL);
 DRAWTEXT((VAR198 = 1),(0.97 * LOW),'★买'),ALIGN1,colorFF;
 DRAWTEXT((VAR198 = (0 - 1)),(1.03 * HIGH),'☆卖'),ALIGN1,colorFF00;


 {公称名称: 1.小天雷达主图}

input:NN(20,1,100),M1(3,1,100),M2(3,1,100),N(20,1,100);
 SJ:=(DATE <= 1051231);
 AAA:=CHECKUSER(1);
 CYC1:=("xt1@CYC5" * SJ);
 CB:=(((SJ * AMOUNT) / VOL) / 100);
 CD:=((CB > HIGH) OR (CB < LOW));
 VAR1:=(SPLITDATA(1) + SPLITDATA(2));
 CAP:=CLOSE;
 CAP[DATACOUNT]=1;
 FOR    I=DATACOUNT downto 2  DO
 CAP[(I - 1)]=(CAP[I] / (1 + (VAR1[I] / 10)));
 CAPI:=(CAP * CAPITAL);
 HS:=((100 * VOL) / CAPI);
成本:="xt1@CYCMAX";
成本1:=DMA(((AMOUNT / VOL) / 100),((0.8 * HS) / 100));
 FILLRGN(((成本 < 成本1) AND (CLOSE < 100)),成本,成本1),colorCC6666;
 FILLRGN(((成本 >= 成本1) AND (CLOSE < 100)),成本,成本1),color5022DD;
 D1:=REF(CLOSE,1);
 E:=REF(INDEXC,1);
 XT1:=CLOSE;
 XT2:=INDEXC;
 FC:=((XT1 - D1) / D1);
风驰电掣:=((XT2 - E) / E);
 RSV:=(100 * (FC - 风驰电掣));
XTA:=(1000 * SUM(RSV,0));
 XTB:=(((XTA - LLV(XTA,89)) / (HHV(XTA,89) - LLV(XTA,89))) * 100);
 XTB1:=("1a0001$AMOUNT" + "399001$AMOUNT");
 XTC:=(XTB1 / 4055747);
 XTB1:="BB01$AMOUNT";
小天资金:=("BB01$XXXXX" * 100);
 XTC:=(XTB1 / 小天资金);
小天预警:=((100 * (AMOUNT / CAPITAL)) / XTC);
资金攻击:=小天预警;
RSV11:=IF(((CLOSE > OPEN) AND (CLOSE > REF(CLOSE,1))),资金攻击,(0 - 资金攻击));
个股能量:=(100 * SUM(IF((CLOSE > REF(CLOSE,1)),小天预警,IF((CLOSE < REF(CLOSE,1)),(0 - 小天预警),0)),0));
 RSV12:=(((个股能量 - LLV(个股能量,89)) / (HHV(个股能量,89) - LLV(个股能量,89))) * 100);
小天1:=SUM(IF((CLOSE > REF(CLOSE,1)),VOL,IF((CLOSE < REF(CLOSE,1)),(0 - VOL),0)),0);
小天2:=(((小天1 - LLV(小天1,89)) / (HHV(小天1,89) - LLV(小天1,89))) * 100);
 RSVX:=((XTA + 个股能量) + 小天1);
 KX:=((XTB + RSV12) + 小天2);
 DX:=(((RSVX - LLV(RSVX,89)) / (HHV(RSVX,89) - LLV(RSVX,89))) * 100);
 JX:=SMA(DX,M1,1);
 RSVT:=SMA(JX,M2,1);
 KT:=((3 * JX) - (2 * RSVT));
 DT:=(((KX - LLV(KX,89)) / (HHV(KX,89) - LLV(KX,89))) * 100);
 JT:=SMA(DT,M1,1);
 K:=SMA(JT,M2,1);
 K12:=((3 * JT) - (2 * K));
 AAA:=CHECKUSER(1);
 XTB:=(((RSVX - LLV(RSVX,13)) / (HHV(RSVX,13) - LLV(RSVX,13))) * 100);
 D12:=SMA(XTB,3,1);
 J12:=SMA(D12,3,1);
 RSV24:=((3 * D12) - (2 * J12));
小天2:=(((RSVX - LLV(RSVX,34)) / (HHV(RSVX,34) - LLV(RSVX,34))) * 100);
 K24:=SMA(小天2,3,1);
 D24:=SMA(K24,3,1);
 J24:=((3 * K24) - (2 * D24));
 U2L:=(((RSVX - LLV(RSVX,55)) / (HHV(RSVX,55) - LLV(RSVX,55))) * 100);
 L2L:=SMA(U2L,3,1);
 RH1:=SMA(L2L,3,1);
 RH4:=((3 * L2L) - (2 * RH1));
支撑位:IF(CROSS(RSV24,RH4),LOW,REF(LOW,BARSLAST(CROSS(RSV24,RH4)))),LINETHICK2,colorFFFF;
压力位:IF(CROSS(RH4,RSV24),HIGH,REF(HIGH,BARSLAST(CROSS(RH4,RSV24)))),LINETHICK1,colorFF;
 RH42:=IF((CLOSE >= MA(CLOSE,NN)),80,50);
 RL1:=IF((CLOSE >= MA(CLOSE,NN)),50,20);
 RL4:=IF(((RSV24 < RH42) AND (REF(RSV24,1) >= RH42)),HHV(REF(HIGH,1),(BARSLAST(((RSV24 >= RH42) AND (REF(RSV24,1) < RH42))) - 1)),REF(HHV(REF(HIGH,1),(BARSLAST(((RSV24 >= RH42) AND (REF(RSV24,1) < RH42))) - 1)),BARSLAST(((RSV24 < RH42) AND REF(RSV24,1)))));
 RL42:=IF((HIGH > RL4),LOW,REF(LOW,BARSLAST((HIGH > RL4))));
 XT:=IF((HIGH > RL4),RSV24,REF(RSV24,BARSLAST((HIGH > RL4))));
强压力:IF((((HIGH > RL42) AND (RSV24 < XT)) AND (RSV24 < RH4)),HIGH,REF(HIGH,BARSLAST((((HIGH > RL42) AND (RSV24 < XT)) AND (RSV24 < RH4))))),colorFF00;
 BBB:=IF(((RSV24 > RL1) AND (REF(RSV24,1) <= RL1)),LLV(REF(LOW,1),(BARSLAST(((RSV24 <= RL1) AND (REF(RSV24,1) > RL1))) - 1)),REF(LLV(REF(LOW,1),(BARSLAST(((RSV24 <= RL1) AND (REF(RSV24,1) > RL1))) - 1)),BARSLAST(((RSV24 > RL1) AND REF(RSV24,1)))));
 X1:=IF((LOW < BBB),HIGH,REF(HIGH,BARSLAST((LOW < BBB))));
 X2:=IF((LOW < BBB),RSV24,REF(RSV24,BARSLAST((LOW < BBB))));
强支撑:IF((((LOW < X1) AND (RSV24 > X2)) AND (RSV24 > RH4)),LOW,REF(LOW,BARSLAST((((LOW < X1) AND (RSV24 > X2)) AND (RSV24 > RH4))))),colorFF0000;
周K:=((CROSS(支撑位,强压力) AND CROSS(支撑位,压力位)) AND (支撑位 > REF(支撑位,1)));
 DRAWICON((周K > 0),(1.018 * HIGH),'T01');
 CB:=((AMOUNT / VOL) / 100);
 CD:=((CB > HIGH) OR (CB < LOW));
 AAA:=IF((CLOSE > 200),182.60001,1.826);
周D:=IF((CLOSE > 200),91.3,0.913);
历史流通盘{万股}:=IF((BARSCOUNT(CLOSE) = 1),((((OPEN + HIGH) + LOW) + CLOSE) / 4),CLOSE);
ZF:=IF((BARSCOUNT(CLOSE) = 1),((OPEN + CLOSE) / 2),SMA(REF(历史流通盘{万股},1),2,1));
 STICKLINE((历史流通盘{万股} >= ZF),LOW,HIGH,0.1,0),colorFF;
 STICKLINE((历史流通盘{万股} >= ZF),OPEN,CLOSE,7,1),colorFF;
 STICKLINE((历史流通盘{万股} <= ZF),LOW,HIGH,0.1,0),colorFFFF00;
 STICKLINE((历史流通盘{万股} <= ZF),OPEN,CLOSE,7,0),colorFFFF00;
 STZF:=STKINDI(STKLABEL,'kdj.k',0,7);
 SPZF:=STKINDI(STKLABEL,'kdj.d',0,7);
 CB:=((AMOUNT / VOL) / 100);
 CD:=((CB > HIGH) OR (CB < LOW));
 EXPLAIN(1,(((STKLABEL + STKNAME) + '\n所属板块:') + BLKNAME)),colorFFFF;
 AAA:=CHECKUSER(0);
 VAR1:=(SPLITDATA(1) + SPLITDATA(2));
 CAP:=CLOSE;
 CAP[DATACOUNT]=1;
 FOR    I=DATACOUNT downto 2  DO
 CAP[(I - 1)]=(CAP[I] / (1 + (VAR1[I] / 10)));
 CAPI:=((CAP * CAPITAL) / 100);
 HS:=(VOL / CAPI);
 STZFB:=CAPI;
 SPZFB:=(((HIGH - LOW) * 100) / LOW);
最大震幅:=(((CLOSE - OPEN) * 100) / OPEN);
最小震幅:=(((CLOSE - LOW) * 100) / LOW);
 XZFB:=(最大震幅 / SPZFB);
 DZFB:=(最小震幅 / SPZFB);
 XHSB:=REF(HHV(SPZFB,5),1);
 DHSB:=REF(LLV(SPZFB,5),1);
 DY1:=SPZFB;
 DY2:=SPZFB;
 DY3:=(HS / REF(HHV(HS,4),1));
单阳:=(HS / REF(LLV(HS,4),1));
 VV:=(0 - (5 * (((((XZFB >= 0.48) AND (DZFB > 0.5)) AND (DY2 > 2)) AND (单阳 > 2)) AND (CLOSE > OPEN))));
 TS:=(0 - (5 * ((((XZFB >= 0.8) AND (DY2 > 1.5)) AND (单阳 > 1.5)) AND (CLOSE > OPEN))));
单阳高:=(0 - (5 * ((((((XZFB >= 0.82) AND (DY1 > 0.9)) AND (DY2 > 1.5)) AND (DY3 > 0.9)) AND (单阳 > 1.5)) AND (CLOSE > OPEN))));
单阳攻击:=FILTER((((VV OR TS) OR 单阳高) AND (STZF > SPZF)),3);
单阳攻击:=FILTER((((VV OR TS) OR 单阳高) AND (STZF > SPZF)),3);
强势攻击:=(单阳攻击 * LOW);
单阳低点:=(((BARSLAST((单阳攻击 > 0)) + 1) >= 1) AND (BARSLAST((单阳攻击 > 0)) <= 13));
单阳不破:=REF(HHV(HIGH,BARSLAST((单阳攻击 > 0))),1);
时间:=(CROSS(CLOSE,单阳不破) AND 单阳低点);
单阳启稳:=IF(((单阳攻击 = 1) AND (时间 = 1)),1,0);
明轉折:=REF(LOW,BARSLAST(强势攻击));
後轉折:=(单阳低点 AND (LOW >= 明轉折));
大後天轉折:=IF((LOW >= 明轉折),BARSLAST((单阳攻击 < 0)),0);
今转:=((CROSS(HS,SPZFB) AND (CLOSE > OPEN)) AND 单阳低点);
DRAWTEXT(((单阳攻击 = 1) AND (STZF < 50)),(LOW * 0.99),'弹'),colorFFFF;
 STICKLINE(((单阳攻击 = 1) AND (STZF < 50)),CLOSE,OPEN,8,0),colorFFFF;
 STICKLINE(((单阳攻击 = 1) AND (STZF < 50)),HIGH,LOW,0,0),colorFFFF;
 STICKLINE((今转 = 1),CLOSE,OPEN,8,0),colorFF00FF;
 STICKLINE((今转 = 1),HIGH,LOW,0,0),colorFF00FF;
 DRAWTEXT((今转 = 1),(LOW * 0.99),'稳'),colorFF00FF;
 DRAWTEXT((((单阳攻击 = 1) AND (STZF > 50)) AND (STZF < 80)),(LOW * 0.99),'强'),colorFFFF;
 STICKLINE((((单阳攻击 = 1) AND (STZF > 50)) AND (STZF < 80)),CLOSE,OPEN,8,0),colorFFFF;
 STICKLINE((((单阳攻击 = 1) AND (STZF > 50)) AND (STZF < 80)),HIGH,LOW,0,0),colorFFFF;
 DRAWTEXT(((单阳攻击 = 1) AND CROSS(STZF,SPZF)),(HIGH * 1.03),'启'),colorFFFF;
 DRAWTEXT(((单阳攻击 = 1) AND CROSS(STZF,SPZF)),(HIGH * 1.03),'启'),colorFFFF;
 STICKLINE(((CLOSE >= OPEN) AND (时间 = 1)),CLOSE,OPEN,8,0),colorFF;
 STICKLINE(((CLOSE >= OPEN) AND (时间 = 1)),CLOSE,OPEN,4,0),colorB0B0FF;
 STICKLINE(((CLOSE >= OPEN) AND (时间 = 1)),CLOSE,OPEN,2,0),colorFFFF;
 STICKLINE(((CLOSE >= OPEN) AND (时间 = 1)),HIGH,LOW,0,0),colorFFFF;
 STICKLINE(((单阳攻击 = 1) AND (STZF >= 80)),CLOSE,OPEN,8,0),colorFF2020;
 STICKLINE(((单阳攻击 = 1) AND (STZF >= 80)),CLOSE,OPEN,4,0),colorFF6600;
 STICKLINE(((单阳攻击 = 1) AND (STZF >= 80)),CLOSE,OPEN,2,0),colorFFFF00;
 STICKLINE(((单阳攻击 = 1) AND (STZF >= 80)),HIGH,LOW,0,0),colorFFFF00;
 ZTZD:=((2 * REF(CLOSE,2)) - REF(CLOSE,5));
 ZTZG:=((2 * REF(CLOSE,1)) - REF(CLOSE,4));
 JTZD:=((2 * CLOSE) - REF(CLOSE,3));
 JTZG:=((2 * REF(CLOSE,3)) - REF(CLOSE,6));
周K:=(BACKSET(ISLASTBAR,2) * JTZG);
 PARTLINE(ISLASTBAR,((2 * CLOSE) - REF(CLOSE,3))),SHIFT3,LINETHICK3,colorFF0000;
 PARTLINE(ISLASTBAR,((2 * REF(CLOSE,1)) - REF(CLOSE,4))),SHIFT2,LINETHICK2,colorFF00;
 PARTLINE(ISLASTBAR,((2 * REF(CLOSE,2)) - REF(CLOSE,5))),SHIFT1,LINETHICK1,colorFF00FF;
 PARTLINE(周K,((2 * REF(CLOSE,3)) - REF(CLOSE,6))),LINETHICK1,color97BE4;
 DRAWNUMBER(ISLASTBAR,(1.03 * ZTZD),ZTZD,2),ALIGN0,SHIFT1,colorFF00FF;
 DRAWNUMBER(ISLASTBAR,(1.03 * ZTZG),ZTZG,2),ALIGN0,SHIFT2,colorFF00;
 DRAWNUMBER(ISLASTBAR,(1.03 * JTZD),JTZD,2),ALIGN0,SHIFT3,colorFF0000;
 DRAWNUMBER(ISLASTBAR,(1.03 * JTZG),JTZG,2),ALIGN0,colorFF;
 STICKLINE((CD < 1),(CB - 0.002),(CB + 0.002),3,1),colorFFFF;
 EXPLAINEX((VOL > 0),'★【今天成本】=',CB,1,0),colorFFFF;
 EXPLAINEX((VOL > 0),'★【今天生命】=',JTZG,1,0),colorFF00FF;
 EXPLAINEX((VOL > 0),'【明天关键】=',ZTZD,1,0),colorFFFF00;
 EXPLAINEX((VOL > 0),'【后天转折】=',ZTZG,1,0),colorFFFF00;
 TKX:=MIN(REF(CLOSE,1),MIN(REF(OPEN,1),MIN(REF(HIGH,1),REF(LOW,1))));
 TKS:=MAX(REF(CLOSE,1),MAX(REF(OPEN,1),MAX(REF(HIGH,1),REF(LOW,1))));
 FDPX:=MIN(CLOSE,MIN(OPEN,MIN(HIGH,LOW)));
 ZJPX:=MAX(CLOSE,MAX(OPEN,MAX(HIGH,LOW)));
 LBLD:=(TKX > ZJPX);
 ZZPX:=(TKS < FDPX);
 STICKLINE(LBLD,REF(LOW,1),REF(LOW,1),10,0),colorFF00;
 STICKLINE(LBLD,HIGH,HIGH,10,0),colorFF00;
 STICKLINE(ZZPX,REF(HIGH,1),REF(HIGH,1),10,0),colorFF00FF;
 STICKLINE(ZZPX,LOW,LOW,10,0),colorFF00FF;
 ZSPX:=EXTDATA(11);
 BK:=EXTDATA(12);
 STKSUM:=EXTDATA(13);
主力雷达:=EXTDATA(10);
市场雷达:=EXTDATA(9);
空间雷达:='A股板块';
能量雷达:=STKCOUNT(空间雷达);
周K:=能量雷达;
SJ:=(DATE <= 1051231);
 AAA:=CHECKUSER(1);
 CYC1:=(("xt1@CYC5" * SJ) > 0);
动量雷达:=(((CYC1 * (周K - 主力雷达)) * 100) / 周K);
 BUY:=(((CYC1 * (周K - 市场雷达)) * 100) / 周K);
 VAR2:=(((CYC1 * (周K - ZSPX)) * 100) / 周K);
 VAR3:=(((CYC1 * (周K - BK)) * 100) / 周K);
 VAR4:=(((CYC1 * (周K - STKSUM)) * 100) / 周K);
 VAR5:=((((动量雷达 > 90) AND (BUY > 90)) AND (VAR3 > 90)) AND (VAR4 > 90));
 VAR6:=(((CYC1 * AMOUNT) / VOL) / 100);
 VAR7:=EMA(VAR6,8);
辟地:=STD(VAR6,8);
开天:=(((VAR6 - VAR7) * 100) / 辟地);
SELL:=EMA(开天,5);
 VAR171:=EMA(SELL,8);
 VAR172:=(((EMA(SELL,8) + 100) / 2) - 3);
 VAR173:=HHV(VAR172,2);
 VAR174:=(CYC1 * (VAR173 - VAR172));
周期触发器:IF((VAR174 = 0),1,IF((VAR174 > 0),(0 - 1),0)),LINETHICK1;
 VAR176:=((周期触发器 = (0 - 1)) AND (REF(周期触发器,1) = 1));
 E:="filter@filter"(VAR5,VAR176);
 DRAWTEXT((E = 1),(0.97 * LOW),'★买'),ALIGN1,colorFF;
 DRAWTEXT((E = (0 - 1)),(1.03 * HIGH),'☆卖'),ALIGN1,colorFF00;


 {公称名称: 2.小天资金为王}

input:N(2,1,100),M(34,1,100),P(5,1,100);
 CYC1:="xt1@CYC5";
 AA:=(CYC1 - REF(CYC1,1));
 XTA:="BB01$AMOUNT";
 XTB:=("BB01$XXXXX" * 100);
 AAA:=CHECKUSER(1);
资金平衡:=(XTA / XTB);
 VAR1:=(SPLITDATA(1) + SPLITDATA(2));
 CAP:=CLOSE;
 CAP[DATACOUNT]=1;
 FOR    I=DATACOUNT downto 2  DO
 CAP[(I - 1)]=(CAP[I] / (1 + (VAR1[I] / 10)));
 CAPI:=(CAP * CAPITAL);
换手率:((100 * VOL) / CAPI),LINETHICK0;
 T:=OPENMINUTES(CURRENTTIME);
 TJ:=(((ISLASTBAR AND (T > 1)) AND (T < 240)) AND (CURRENTDATE = DATE));
预测资金:(IF(TJ,((240 * DYNAINFO(10)) / T),AMOUNT) / 100000000),LINETHICK0,colorFFFF;
资金攻击:=((预测资金 * 100000000) / CAPI);
小天资金1:=((300 * ((预测资金 * 100000000) / CAPI)) / REF(资金平衡,1));
 VAR1:=SMA((AA * 小天资金1),M,1);
 C01:=(INTPART((VAR1 * 1000)) / 1000);
 EXPLAIN((VOL > 0),STKLABEL);
 EXPLAIN((VOL > 0),STKNAME),colorFF00FF;
 AAA:=CHECKUSER(0);
 XT11:=IF(TJ,(("1A0001$AMOUNT" * 240) / T),"1A0001$AMOUNT");
 XT21:=IF(TJ,(("399001$AMOUNT" * 240) / T),"399001$AMOUNT");
 XT1:=(SMA(XT11,10,1) / 100000000);
 XT2:=(SMA(XT21,10,1) / 100000000);
 VAR1:=(XT1 + XT2);
 XT3:=MA(REF("1A0001$CLOSE",1),5);
 XT4:=MA(REF("399001$CLOSE",1),5);
 VAR2:=(XT3 + XT4);
收盘:=((VAR1 * "1A0001$CLOSE") + (("399001$CLOSE" / VAR2) / 10));
 C02:=(INTPART((收盘 * 1000)) / 1000);
 C0:=IF((CLOSE > 100),C02,C01);
 AAA:=CHECKUSER(0);
 XTB1:=REF(C0,1);
 XTB2:=REF(C0,2);
 XTB3:=REF(C0,3);
 XTB4:=REF(C0,4);
 XTB5:=REF(C0,5);
 XTB6:=REF(C0,6);
 HL:=IF(((C0 > XTB1) AND (XTB1 >= XTB2)),1,IF(((C0 < XTB1) AND (XTB1 <= XTB2)),(0 - 1),IF(((C0 > XTB2) AND (XTB2 > XTB1)),2,IF(((C0 < XTB2) AND (XTB2 < XTB1)),(0 - 2),0))));
 HG:=IF(((XTB1 > XTB2) AND (XTB1 > XTB3)),1,IF(((XTB1 < XTB2) AND (XTB1 < XTB3)),(0 - 1),IF(((XTB2 > XTB3) AND (XTB2 > XTB4)),2,IF(((XTB2 < XTB3) AND (XTB2 < XTB4)),(0 - 2),IF(((XTB3 > XTB4) AND (XTB3 > XTB5)),3,IF(((XTB3 < XTB5) AND (XTB3 < XTB5)),(0 - 3),IF(((XTB4 > XTB5) AND (XTB4 > XTB6)),4,IF(((XTB4 < XTB5) AND (XTB4 < XTB6)),(0 - 4),0))))))));
资金生命1:=EMA(C0,8);
资金生命2:=EMA(C0,21);
资金生命3:=EMA(C0,55);
资金生命4:=EMA(C0,89);
资金生命5:=EMA(C0,133);
 AA:=ABS((((C0 - 资金生命5) * 100) / 资金生命5));
 AA1:=ABS((((C0 - 资金生命4) * 100) / 资金生命4));
 AA2:=ABS((((C0 - 资金生命3) * 100) / 资金生命3));
 AA3:=ABS((((C0 - 资金生命2) * 100) / 资金生命2));
生命线:IF((AA < P),资金生命5,IF((AA1 < P),资金生命4,IF((AA2 < P),资金生命3,IF((AA3 < P),资金生命2,资金生命1)))),colorFF00;
 PARTLINE((生命线 > REF(生命线,1)),生命线),colorFF;
 STICKLINE(((HL = 2) AND (HG = 3)),C0,XTB1,5,0),colorFF00FF;
 STICKLINE(((HL = 2) AND (HG = 2)),C0,XTB1,5,0),colorFF00FF;
 STICKLINE(((HL = 2) AND (HG = 0)),C0,XTB1,5,0),colorFF00FF;
 STICKLINE(((HL = 2) AND (HG = (0 - 1))),XTB2,XTB1,5,0),colorFFFF;
 STICKLINE(((HL = 2) AND (HG = (0 - 1))),C0,XTB2,5,0),colorFF;
 STICKLINE(((HL = 2) AND (HG = (0 - 2))),C0,XTB2,5,0),colorFF;
 STICKLINE(((HL = 2) AND (HG = (0 - 3))),C0,XTB2,5,0),colorFF;
 STICKLINE(((HL = 1) AND (HG = (0 - 1))),C0,XTB1,5,1),colorFF;
 STICKLINE(((HL = 1) AND (HG = (0 - 2))),C0,XTB1,5,1),colorFF;
 STICKLINE(((HL = 1) AND (HG = (0 - 3))),C0,XTB1,5,1),colorFF;
 STICKLINE(((HL = 1) AND (HG = 0)),C0,XTB1,5,1),colorFF;
 STICKLINE(((HL = 1) AND (HG = 1)),C0,XTB1,5,1),colorFF;
 STICKLINE(((HL = 1) AND (HG = 2)),C0,XTB1,5,1),colorFF;
 STICKLINE(((HL = 1) AND (HG = 3)),C0,XTB1,5,1),colorFF;
 STICKLINE(((HL = 0) AND (HG = 1)),C0,XTB1,5,0),colorFFFF00;
 STICKLINE(((HL = 0) AND (HG = 2)),C0,XTB1,5,0),colorFFFF00;
 STICKLINE(((HL = 0) AND (HG = 3)),C0,XTB1,5,0),colorFFFF00;
 STICKLINE(((HL = 0) AND (HG = (0 - 1))),C0,XTB1,5,0),colorFFFF;
 STICKLINE(((HL = 0) AND (HG = (0 - 2))),C0,XTB1,5,0),colorFFFF;
 STICKLINE(((HL = 0) AND (HG = (0 - 3))),C0,XTB1,5,0),color4D;
 STICKLINE(((HL = (0 - 1)) AND (HG = 3)),C0,XTB1,5,0),colorFF00;
 STICKLINE(((HL = (0 - 1)) AND (HG = 2)),C0,XTB1,5,0),colorFF00;
 STICKLINE(((HL = (0 - 1)) AND (HG = 2)),XTB2,XTB1,5,0),colorFFFF00;
 STICKLINE(((HL = (0 - 1)) AND (HG = (0 - 1))),C0,XTB1,5,1),colorFF00;
 STICKLINE(((HL = (0 - 1)) AND (HG = (0 - 2))),C0,XTB1,5,1),colorFF00;
 STICKLINE(((HL = (0 - 1)) AND (HG = (0 - 3))),C0,XTB1,5,1),colorFF00;
 STICKLINE(((HL = (0 - 2)) AND (HG = 3)),C0,XTB1,5,1),colorFF;
 STICKLINE(((HL = (0 - 2)) AND (HG = 2)),C0,XTB1,5,1),colorFF00;
 STICKLINE(((HL = (0 - 2)) AND (HG = 1)),C0,XTB1,5,0),colorFF00;
 STICKLINE(((HL = (0 - 2)) AND (HG = 0)),C0,XTB1,5,0),color808080;
 STICKLINE(((HL = (0 - 2)) AND (HG = (0 - 1))),C0,XTB1,5,1),colorFF00;
 STICKLINE(((HL = (0 - 2)) AND (HG = (0 - 2))),C0,XTB1,5,0),colorFFFF;
 STICKLINE(((HL = (0 - 2)) AND (HG = (0 - 3))),C0,XTB1,5,0),colorFFFF;
 CC:=(90 + ((100 - 90) / 2));
 DD:=((100 - 90) / 2);
 SCR:=COST(CC);
 CC1:=COST(DD);
 DD1:=(((SCR - CC1) / (SCR + CC1)) * 100);
 SCR1:=(70 + ((100 - 70) / 2));
 BB2:=((100 - 70) / 2);
 DD2:=COST(SCR1);
 EE2:=COST(BB2);
 CC2:=(((DD2 - EE2) / (DD2 + EE2)) * 100);
 EXPLAINEX((VOL > 0),'90%筹码集中度=',DD1,1,0),colorFF;
 EXPLAINEX((VOL > 0),'70%筹码集中度=',CC2,1,0),colorFF;
 AA2:=(1.05 * CLOSE);
 TX:=(0.95 * CLOSE);
 DX:=COST(100);
 ZXPY:=COST(0);
 XT:=((WINNER(AA2) * 100) - (WINNER(TX) * 100));
 XT5:=MA(((WINNER(TX) * 100) - (WINNER(ZXPY) * 100)),1);
 XT6:=MA(((WINNER(DX) * 100) - (WINNER(AA2) * 100)),1);
 XT7:=MA(XT,1);
 EXPLAINEX((VOL > 0),'获利筹码=',XT5,1,0),colorFFFF;
 EXPLAINEX((VOL > 0),'套牢筹码=',XT6,1,0),colorFFFF;
 EXPLAINEX((VOL > 0),'浮动筹码=',XT7,1,0),colorFFFF;
 EXPLAINEX((VOL > 0),'小天量价密码=',HL,1,0),colorFF00FF;
 EXPLAINEX((VOL > 0),'小天资金密码=',HG,1,0),colorFF00FF;
 EXPLAIN(((HL = 2) AND (HG = 4)),'结论:极端上升,临近头部'),colorFF00FF;
 EXPLAIN(((HL = 2) AND (HG = 2)),'结论:强势冲击,持股待涨'),colorFF;
 EXPLAIN(((HL = 2) AND (HG = (0 - 1))),'结论:启稳攻击,择机买入'),colorFF;
 EXPLAIN(((HL = 2) AND (HG = (0 - 3))),'结论:强势之底,抓住机会'),colorFF;
 EXPLAIN(((HL = 1) AND (HG = 3)),'结论:多空分歧,多方略优'),colorFF;
 EXPLAIN(((HL = 1) AND (HG = 1)),'结论:升势继续,勇敢持仓'),colorFF;
 EXPLAIN(((HL = 1) AND (HG = (0 - 2))),'结论:攻击开始,适当追买'),colorFF;
 EXPLAIN(((HL = 0) AND (HG = 3)),'结论:多空分歧,注意方向'),colorFFFF;
 EXPLAIN(((HL = 0) AND (HG = 2)),'结论:多空分歧,注意方向'),colorFFFF;
 EXPLAIN(((HL = 0) AND (HG = 1)),'结论:上攻乏力,减仓30%'),colorFF00;
 EXPLAIN(((HL = 0) AND (HG = (0 - 1))),'结论:初步启稳,逢低试买'),colorFFFF;
 EXPLAIN(((HL = 0) AND (HG = (0 - 2))),'结论:初步启稳,逢低试买'),colorFFFF;
 EXPLAIN(((HL = (0 - 1)) AND (HG = 4)),'结论:头部成立,迅速出局'),colorFFFF00;
 EXPLAIN(((HL = (0 - 1)) AND (HG = 2)),'结论:调整开始,逢高出局'),colorFFFF00;
 EXPLAIN(((HL = (0 - 1)) AND (HG = (0 - 1))),'结论:跌势继续,空仓等待'),colorFF00;
 EXPLAIN(((HL = (0 - 1)) AND (HG = (0 - 3))),'结论:超跌之底,观望为上'),colorFF0000;
 EXPLAIN(((HL = (0 - 2)) AND (HG = 3)),'结论:多空分歧,空方主动'),color808080;
 EXPLAIN(((HL = (0 - 2)) AND (HG = 1)),'结论:减仓动作,注意变盘'),colorFF00;
 EXPLAIN(((HL = (0 - 2)) AND (HG = (0 - 2))),'结论:强势之底,注意变盘'),colorFFFF;
 XTA:="BB01$AMOUNT";
 AA:="BB01$XXXXX";
 XT8:=((HL = 1) OR ((HG >= 1) AND (HL = 0)));
 XT9:=(SMA("BB01$AMOUNT",10,1) / 1000000);
量线:=MA(REF("BB01$CLOSE",1),5);
量1:="BB01$CLOSE";
量2:="BB01$OPEN";
地量线:="BB01$VOL";
地量点:=IF((CLOSE > 1000),((50 * XTA) / AA),0);
 STICKLINE(((CLOSE > 1000) AND (CLOSE > OPEN)),0,地量点,5,1),LINETHICK1,colorFF;
 STICKLINE(((CLOSE > 1000) AND (OPEN > CLOSE)),0,地量点,5,0),LINETHICK5,colorFFFF00;
巨量:=MA(地量点,8);
 PARTLINE((CLOSE > 100),巨量),colorFFFFFF;
 XTCC:=MA(地量点,34);
 PARTLINE((CLOSE > 100),XTCC),colorFFFF;
 XTCC1:=LLV(地量点,34);
 TY:=IF(((地量点 / XTCC1) <= 1.1),1,0);
 TY1:=(地量点 >= HHV(地量点,89));
 DRAWTEXT(((TY1 > 0) AND (CLOSE > 100)),(1.2 * 地量点),'★'),colorFF00;
 DRAWICON((TY AND (CLOSE > 100)),(地量点 * 2),'T01');
 DRAWICON((TY AND (CLOSE > 100)),(地量点 * 2.4),'S14');
 EXPLAIN((TY AND (CLOSE > 100)),'★大盘地量出现,等待反转★'),colorFF;
 EXPLAIN(((TY1 > 0) AND (CLOSE > 100)),'★大盘巨量出现,警惕头部来临★'),colorFF00;
 BB:=MIN(MIN(C0,XTB1),XTB2);
 GG:=MAX(MAX(C0,XTB1),XTB2);
 HH:=GG;
 II:=BB;
 AA:=(REF(HH,3) = HHV(HH,7));
 JJ:=BACKSET(AA,4);
 SCR:=(FILTER(JJ,3) AND (HH = HHV(HH,4)));
 AA2:=(REF(II,3) = LLV(II,7));
 TX:=BACKSET(AA2,4);
 XT:=(FILTER(TX,3) AND (II = LLV(II,4)));
 KK:=(ISLASTBAR AND REF(SCR,BARSLAST(SCR)));
 LL:=BACKSET(KK,(BARSLAST(SCR) + 1));
 CS:=(LL > REF(LL,1));
 XTTY:=REF(BARSLAST(SCR),1);
 III:=BACKSET(CS,(XTTY + 2));
 CS11:=(III > REF(III,1));
 DRAWLINE(CS11,HH,CS,HH,0),LINETHICK2,colorFF00FF;
 GG2:=((REF(HH,BARSLAST(CS)) - REF(HH,BARSLAST(CS11))) / (BARSLAST(CS11) - BARSLAST(CS)));
 HH2:=(BACKSET(ISLASTBAR,3) * HH);
 II2:=((REF(HH2,1) = 0) AND (HH2 <> 0));
 DRAWLINE(CS,HH,II2,HH2,0),POINTDOT,colorFF00FF;
 JJ2:=((REF(HH2,BARSLAST(II2)) - REF(HH,BARSLAST(CS))) / (BARSLAST(CS) - BARSLAST(II2)));
 KK2:=(ISLASTBAR AND REF(XT,BARSLAST(XT)));
 LL2:=BACKSET(KK2,(BARSLAST(XT) + 1));
 CS2:=(LL2 > REF(LL2,1));
 XTTY1:=REF(BARSLAST(XT),1);
 IIV:=BACKSET(CS2,(XTTY1 + 2));
 CS22:=(IIV > REF(IIV,1));
 DRAWLINE(CS22,II,CS2,II,0),LINETHICK2,colorFF00;
 BXS:=((REF(II,BARSLAST(CS2)) - REF(II,BARSLAST(CS22))) / (BARSLAST(CS22) - BARSLAST(CS2)));
主压力:=(BACKSET(ISLASTBAR,3) * II);
主支撑:=((REF(主压力,1) = 0) AND (主压力 <> 0));
 DRAWLINE(CS2,II,主支撑,主压力,0),POINTDOT,colorFF00;
 MC:=((REF(主压力,BARSLAST(主支撑)) - REF(II,BARSLAST(CS2))) / (BARSLAST(CS2) - BARSLAST(主支撑)));
VAR177:=(BACKSET(ISLASTBAR,(BARSLAST(CS11) + 2)) OR BACKSET(ISLASTBAR,(BARSLAST(CS22) + 3)));
 VAR177:=(BACKSET(ISLASTBAR,(BARSLAST(CS11) + 2)) OR BACKSET(ISLASTBAR,(BARSLAST(CS22) + 3)));
 DRAWICON((SCR AND VAR177),(HH * 1.02),10);
 DRAWICON((XT AND VAR177),(II * 0.99),11);
 VAR180:=(REF(HH,BARSLAST(CS)) + (BARSLAST(CS) * GG2));
压力:(REF(HH2,BARSLAST(II2)) + (BARSLAST(II2) * JJ2)),POINTDOT,LINETHICK5,colorFF00FF;
 VAR182:=(REF(II,BARSLAST(CS2)) + (BARSLAST(CS2) * BXS));
支撑:(REF(主压力,BARSLAST(主支撑)) + (BARSLAST(主支撑) * MC)),POINTDOT,LINETHICK5,colorFF00;
 DRAWICON(((CROSS(C0,VAR180) OR ((C0 > 压力) AND (REF(C0,1) < REF(压力,1)))) AND (C0 > BB2)),(C0 * 1.15),'T01');
 DRAWICON(CROSS(C0,VAR180),(C0 * 1.15),'T01');
 VAR186:=IF((支撑 < 压力),CROSS(支撑,C0),CROSS(压力,C0));
 DRAWICON(VAR186,(C0 * 0.95),'T02');
 EXPLAIN((CLOSE > 0),'www.xtstock.com');


 {公称名称: 3.小天动态龙虎}


市场增仓:=SUM(EXTDATA(1),0);
市场减仓:=SUM(EXTDATA(2),0);
主力:=(100 + SUM((5 * EXTDATA(6)),0));
散户:=(100 + SUM((5 * EXTDATA(7)),0));
主力:=SUM(EXTDATA(8),0);
散户:=(100 + SUM((5 * EXTDATA(9)),0));
对敲净量:=SUM(EXTDATA(10),0);
攻击活度:=STKINDI(STKLABEL,'小天统计.攻击度',0,0);
上生增仓:=STKINDI(STKLABEL,'小天统计.散户',0,0);
 XT1:=STKINDI(STKLABEL,'小天统计.主力',0,0);
攻击:IF(ISLASTBAR,(攻击活度 + REF(散户,1)),散户),colorFF00FF;
主力:IF(ISLASTBAR,(XT1 + REF(主力,1)),主力),colorFF;
均线:MA(主力,13);
散户:IF(ISLASTBAR,(上生增仓 + REF(散户,1)),散户),colorFFFF00;
 DRAWICON(CROSS(主力,均线),均线,'T01');
 DRAWICON(CROSS(均线,主力),均线,'T04');
 XT2:=EXTDATA(1);
 XT3:=EXTDATA(2);
市场增仓1:=EXTDATA(8);
市场减仓1:=STKINDI(STKLABEL,'小天统计.敲净量',0,0);
对敲净量1:=STKINDI(STKLABEL,'小天统计.拉升',0,0);
 XT4:=STKINDI(STKLABEL,'小天统计.打压',0,0);
 XT5:=STKINDI(STKLABEL,'小天统计.主力攻击',0,0);
 XT6:=STKINDI(STKLABEL,'小天统计.主力打压',0,0);
 XT7:=((主力 * 100) / (市场增仓 + 市场减仓));
XT8:=((主力 * 100) / (市场增仓 + 市场减仓));
ZCLD:=((市场增仓1 * 100) / (XT2 + XT3));
对敲量比:IF(ISLASTBAR,((100 * 市场减仓1) / (对敲净量1 + XT4)),ZCLD),COLORSTICK;
 DRAWICON((对敲量比 > 30),25,'H04');
 DRAWICON((对敲量比 < (0 - 10)),(0 - 5),'h06'),colorFF00;
 DRAWICON((对敲量比 > 30),对敲量比,'S18');
 DRAWICON((对敲量比 < (0 - 10)),对敲量比,'S36');
 JCLD:=(HHV(CROSS(对敲量比,25),21) = 1);
启动:(10 * ((JCLD = 1) AND CROSS(主力,均线)));
DRAWTEXT((启动 > 1),(0 - 5),'★'),colorFF;


 {公称名称: 4.小天魔鬼}


LC:=REF(OPEN,1);
开盘:=((SMA(MAX((OPEN - LC),0),6,1) / SMA(ABS((OPEN - LC)),6,1)) * 100);
 LC1:=REF(CLOSE,1);
收盘:=((SMA(MAX((CLOSE - LC1),0),6,1) / SMA(ABS((CLOSE - LC1)),6,1)) * 100);
 LC2:=REF(HIGH,1);
最高:=((SMA(MAX((HIGH - LC2),0),6,1) / SMA(ABS((HIGH - LC2)),6,1)) * 100);
 LC3:=REF(LOW,1);
最低:=((SMA(MAX((LOW - LC3),0),6,1) / SMA(ABS((LOW - LC3)),6,1)) * 100);
 A:=(SUM(IF((CLOSE > REF(CLOSE,1)),VOL,IF((CLOSE < REF(CLOSE,1)),(0 - VOL),0)),0) / 10000);
 LC4:=REF(A,1);
能量:=((SMA(MAX((A - LC4),0),6,1) / SMA(ABS((A - LC4)),6,1)) * 100);
 STICKLINE((收盘 > 开盘),开盘,收盘,5,1),colorFF;
 STICKLINE((((最高 > 最低) AND (最低 > 收盘)) AND (收盘 > 开盘)),最高,收盘,0.5,1),colorFFFF;
 STICKLINE((((最高 > 收盘) AND (收盘 > 最低)) AND (最低 > 开盘)),最高,收盘,0.5,1),colorFFFF;
 STICKLINE((((最高 > 收盘) AND (收盘 > 最低)) AND (最低 > 开盘)),最低,收盘,2,0),color808080;
 STICKLINE((((最低 > 最高) AND (最高 > 收盘)) AND (收盘 > 开盘)),最低,收盘,0.5,1),colorFF00FF;
 STICKLINE((((最低 > 收盘) AND (收盘 > 最高)) AND (最高 > 开盘)),最低,收盘,0.5,1),colorFF00FF;
 STICKLINE((((最低 > 收盘) AND (收盘 > 最高)) AND (最高 > 开盘)),最高,收盘,2,0),colorFF00;
 STICKLINE((((收盘 > 最高) AND (最高 > 开盘)) AND (开盘 > 最低)),最低,开盘,0.5,1),colorFFFF;
 STICKLINE((((收盘 > 最高) AND (最高 > 开盘)) AND (开盘 > 最低)),最高,开盘,2,0),colorFF00;
 STICKLINE((((收盘 > 开盘) AND (开盘 > 最高)) AND (最高 > 最低)),最低,开盘,0.5,1),colorFFFF;
 STICKLINE((((收盘 > 最低) AND (最低 > 开盘)) AND (开盘 > 最高)),最高,开盘,0.5,1),colorFF00FF;
 STICKLINE((((收盘 > 最低) AND (最低 > 开盘)) AND (开盘 > 最高)),最低,开盘,2,0),color808080;
 STICKLINE((((收盘 > 开盘) AND (开盘 > 最低)) AND (最低 > 最高)),最高,开盘,0.5,1),colorFF00FF;
 STICKLINE((((最高 > 收盘) AND (收盘 > 开盘)) AND (开盘 > 最低)),最低,最高,0.5,1),colorFF;
 STICKLINE((((最低 > 收盘) AND (收盘 > 开盘)) AND (开盘 > 最高)),最低,最高,0.5,1),colorFF00FF;
 STICKLINE((((收盘 > 最高) AND (最高 > 最低)) AND (最低 > 开盘)),最高,最低,3,1),colorFFFF;
 STICKLINE((((收盘 > 最低) AND (最低 > 最高)) AND (最高 > 开盘)),最高,最低,3,1),colorFF00FF;
 STICKLINE((收盘 < 开盘),开盘,收盘,5,0),colorFFFF00;
 STICKLINE((((最高 > 最低) AND (最低 > 开盘)) AND (开盘 > 收盘)),最高,开盘,0.5,1),colorFFFF;
 STICKLINE((((最高 > 开盘) AND (开盘 > 最低)) AND (最低 > 收盘)),最高,开盘,0.5,1),colorFFFF;
 STICKLINE((((最高 > 开盘) AND (开盘 > 最低)) AND (最低 > 收盘)),最低,开盘,3,0),color808080;
 STICKLINE((((最低 > 最高) AND (最高 > 开盘)) AND (开盘 > 收盘)),最低,开盘,0.5,1),colorFF00FF;
 STICKLINE((((最低 > 开盘) AND (开盘 > 最高)) AND (最高 > 收盘)),最低,开盘,0.5,1),colorFF00FF;
 STICKLINE((((最低 > 开盘) AND (开盘 > 最高)) AND (最高 > 收盘)),最高,开盘,3,0),colorFF0000;
 STICKLINE((((开盘 > 收盘) AND (收盘 > 最高)) AND (最高 > 最低)),最低,收盘,0.5,1),colorFFFF;
 STICKLINE((((开盘 > 最高) AND (最高 > 收盘)) AND (收盘 > 最低)),最低,收盘,0.5,1),colorFF00FF;
 STICKLINE((((开盘 > 最高) AND (最高 > 收盘)) AND (收盘 > 最低)),最高,收盘,3,0),colorFF;
 STICKLINE((((开盘 > 收盘) AND (收盘 > 最低)) AND (最低 > 最高)),最高,收盘,0.5,1),colorFFFF;
 STICKLINE((((开盘 > 最低) AND (最低 > 收盘)) AND (收盘 > 最高)),最高,收盘,0.5,1),colorFF00FF;
 STICKLINE((((开盘 > 最低) AND (最低 > 收盘)) AND (收盘 > 最高)),最低,收盘,4,0),colorFFFF;
 STICKLINE((((最高 > 开盘) AND (开盘 > 收盘)) AND (收盘 > 最低)),最低,最高,0.5,1),colorFFFF00;
 STICKLINE((((最低 > 开盘) AND (开盘 > 收盘)) AND (收盘 > 最高)),最低,最高,0.5,1),colorFFFF00;
 STICKLINE((((开盘 > 最高) AND (最高 > 最低)) AND (最低 > 收盘)),最低,最高,3,0),colorFFFF;
 STICKLINE((((开盘 > 最低) AND (最低 > 最高)) AND (最高 > 收盘)),最低,最高,3,0),colorFF;
 AA:=MIN(开盘,收盘);
BB:=MIN(AA,最高);
XTCC:=MIN(BB,最低);
XT1:=(XTCC = 最高);
XT2:=(XTCC = 开盘);
底线:(5 * (((XT1 < 20) OR (XT2 < 20)) AND (XTCC < 20))),colorFF;
 AA1:=MAX(开盘,收盘);
BB1:=MAX(AA1,最高);
XTCC1:=MAX(BB1,最低);
顶线:(100 - IF((XTCC1 > 80),5,0)),colorFF00;
 TY:=XTCC1;
 TY1:=XTCC;
 AA:=(REF(TY,3) = HHV(TY,7));
 BB:=BACKSET(AA,4);
 AA2:=(FILTER(BB,3) AND (TY = HHV(TY,4)));
 BB2:=(REF(TY1,3) = LLV(TY1,7));
 CC2:=BACKSET(BB2,4);
 GG:=(FILTER(CC2,3) AND (TY1 = LLV(TY1,4)));
 HH:=(ISLASTBAR AND REF(AA2,BARSLAST(AA2)));
 II:=BACKSET(HH,(BARSLAST(AA2) + 1));
 JJ:=(II > REF(II,1));
 KK:=REF(BARSLAST(AA2),1);
 LL:=BACKSET(JJ,(KK + 2));
 CS:=(LL > REF(LL,1));
 DRAWLINE(CS,TY,JJ,TY,1),LINETHICK2,colorFF00FF;
 GG2:=((REF(TY,BARSLAST(JJ)) - REF(TY,BARSLAST(CS))) / (BARSLAST(CS) - BARSLAST(JJ)));
阻力:(REF(TY,BARSLAST(JJ)) + (BARSLAST(JJ) * GG2)),colorFF00FF;
 HH2:=(ISLASTBAR AND REF(GG,BARSLAST(GG)));
 II2:=BACKSET(HH2,(BARSLAST(GG) + 1));
 JJ2:=(II2 > REF(II2,1));
 KK2:=REF(BARSLAST(GG),1);
 LL2:=BACKSET(JJ2,(KK2 + 2));
 CS2:=(LL2 > REF(LL2,1));
 DRAWLINE(CS2,TY1,JJ2,TY1,1),LINETHICK2,colorFF00;
 BXS:=((REF(TY1,BARSLAST(JJ2)) - REF(TY1,BARSLAST(CS2))) / (BARSLAST(CS2) - BARSLAST(JJ2)));
支撑:(REF(TY1,BARSLAST(JJ2)) + (BARSLAST(JJ2) * BXS)),LINETHICK2,colorFF00;
 VAR2:=(BACKSET(ISLASTBAR,(BARSLAST(CS) + 2)) OR BACKSET(ISLASTBAR,(BARSLAST(CS2) + 3)));
 DRAWICON((AA2 AND VAR2),(TY * 1.02),10);
 DRAWICON((GG AND VAR2),(TY1 * 0.99),11);
 DRAWICON(((CROSS(TY,阻力) AND VAR2) AND (CLOSE > OPEN)),(TY * 1.1),'T01');
 DRAWICON(((CROSS(支撑,TY1) AND VAR2) AND (CLOSE < OPEN)),(TY1 * 0.9),'T02');
 120,color10000;
 (0 - 50),color10000;
 DRAWTEXT(((最高 < 10) AND CROSS(收盘,最高)),(0 - 5),'★'),colorFF;
 DRAWTEXT((((最高 < 10) AND CROSS(收盘,开盘)) AND CROSS(收盘,最低)),(0 - 5),'★'),colorFF;
 DRAWTEXT(((最高 < 10) AND CROSS(最低,最高)),(0 - 5),'★'),colorFF;
 DRAWTEXT(((最低 < 10) AND CROSS(最低,开盘)),(0 - 5),'★'),colorFF;
 DRAWTEXT((((REF(XTCC,1) < 20) AND (MA(CLOSE,30) > REF(MA(CLOSE,30),1))) AND CROSS(最低,最高)),(0 - 5),'★'),colorFF;
 DRAWTEXT(((((开盘 < 20) AND CROSS(收盘,开盘)) AND CROSS(收盘,最高)) AND CROSS(收盘,最低)),(0 - 5),'★'),colorFF;
 DRAWTEXT(((REF(最高,1) > 80) AND CROSS(开盘,最高)),115,'★'),colorFF00;
 DRAWTEXT(((REF(最低,1) > 80) AND CROSS(开盘,最高)),115,'★'),colorFF00;
 DRAWTEXT((((开盘 > 80) AND CROSS(开盘,收盘)) AND CROSS(开盘,最低)),115,'★'),colorFF00;
 DRAWTEXT(((((开盘 > 70) AND CROSS(开盘,收盘)) AND CROSS(开盘,最低)) AND CROSS(开盘,最高)),115,'★'),colorFF00;
 VAR3:=((AMOUNT / VOL) / 100);
 VAR4:=EMA(VAR3,8);
 VAR5:=STD(VAR3,8);
 VAR6:=(((VAR3 - VAR4) * 100) / VAR5);
 VAR7:=EMA(VAR6,5);
辟地:=EMA(VAR7,8);
开天:=(((EMA(VAR7,8) + 100) / 2) - 3);
 DD:=HHV(开天,2);
 AA2:=INDEXC;
 EE:=INDEXH;
 FF:=INDEXL;
 GBDP:=INDEXO;
 VARDP:=((INDEXA / INDEXV) / 100);
 VAR3DP:=((INDEXA / INDEXV) / 100);
 VAR4DP:=EMA(VAR3DP,8);
 VAR5DP:=STD(VAR3DP,8);
 VAR6DP:=(((VAR3DP - VAR4DP) * 100) / VAR5DP);
 VAR7DP:=EMA(VAR6DP,5);
辟地DP:=EMA(VAR7DP,8);
开天DP:=(((EMA(VAR7DP,8) + 100) / 2) - 3);
 ZQ1:=HHV(开天DP,2);
 AA1:=(ZQ1 - 开天DP);
 AA:=(DD - 开天);
STICKLINE((AA = 0),(0 - 35),(0 - 25),10,0),colorFFFF;
 STICKLINE((AA > 0),(0 - 35),(0 - 25),10,0),colorFFFF00;
 DRAWICON(((AA <= 1.2) AND (开天 > 开天DP)),(0 - 15),10);
 DRAWICON(((AA > 1.2) AND (开天 > 开天DP)),(0 - 15),11);
 STICKLINE((AA1 = 0),(0 - 45),(0 - 35),10,0),colorFF;
 STICKLINE((AA1 > 0),(0 - 45),(0 - 35),10,0),colorFF00;
 ZQ2:=IF(((BARSLAST(CS) - BARSLAST(CS2)) > 0),(BARSLAST(CS) - BARSLAST(CS2)),(BARSLAST(CS2) - BARSLAST(CS)));
 ZQ3:=IF(((BARSLAST(CS) - BARSLAST(CS2)) > 0),(BARSLAST(CS2) - BARSLAST(JJ)),(BARSLAST(CS) - BARSLAST(JJ2)));
 X:=IF(((BARSLAST(CS) - BARSLAST(CS2)) > 0),(BARSLAST(JJ) - BARSLAST(JJ2)),(BARSLAST(JJ2) - BARSLAST(JJ)));
 VAR126:=((ZQ2 / ZQ3) * X);
预测转点天:IF(((BARSLAST(CS) - BARSLAST(CS2)) > 0),(VAR126 - BARSLAST(JJ2)),(VAR126 - BARSLAST(JJ))),LINETHICK0,colorFF;


 {公称名称: 5.小天资金雷达}

input:N(3,1,10);
 VAR1:=0;
 DM:='AA';
 DMSTR:='AA01';
 A0:=STKINDI('BB01','xt*zj.zj',0,(0 - 1));
大盘中轴:EMA(SUM(A0,N),3),LINETHICK1,colorFFFFFF;
 MAX1:=STKINDI(DMSTR,'xt*zj.zj',0,(0 - 1));
 MIN0:=MAX1;
 DMS1:=DMSTR;
 DMS2:=DMS1;
 FOR    J=1 to 16  DO
 DMSTR:=((DM + IF((J < 10),'0','')) + NUMTOSTR(J,0));
 VAR0:=STKINDI(DMSTR,'xt*zj.zj',0,(0 - 1));
 VAR1:=EMA(SUM(VAR0,N),3);
 DMS1:=IF((VAR0 > MAX1),DMSTR,DMS1);
 MAX1:=IF((VAR0 > MAX1),VAR0,MAX1);
 DMS2:=IF((VAR0 < MIN0),DMSTR,DMS2);
 MIN0:=IF((VAR0 < MIN0),VAR0,MIN0);
领涨通道1:=MAX1;
领跌通道1:=MIN0;
 VAR1:=(SPLITDATA(1) + SPLITDATA(2));
 CAP:=CLOSE;
 CAP[DATACOUNT]=1;
 FOR    I=DATACOUNT downto 2  DO
 CAP[(I - 1)]=(CAP[I] / (1 + (VAR1[I] / 10)));
 CAPI:=(CAP * CAPITAL);
小天资金雷达:EMA(SUM((AMOUNT / CAPI),N),3),LINETHICK1,colorFF;
 DRAWTEXT(ISLASTBAR,50,((('今日攻击:' + DMS1) + ',') + STKNAMEEX(DMS1))),colorFF;
 DRAWTEXT(ISLASTBAR,30,((('今日放弃:' + DMS2) + ',') + STKNAMEEX(DMS2))),colorFF00;
 AA01:=STKINDI('AA01','xt*zj.zj',0,(0 - 1));
 AA02:=STKINDI('AA02','xt*zj.zj',0,(0 - 1));
 AA03:=STKINDI('AA03','xt*zj.zj',0,(0 - 1));
 AA04:=STKINDI('AA04','xt*zj.zj',0,(0 - 1));
 AA05:=STKINDI('AA05','xt*zj.zj',0,(0 - 1));
 AA06:=STKINDI('AA06','xt*zj.zj',0,(0 - 1));
 AA07:=STKINDI('AA07','xt*zj.zj',0,(0 - 1));
 AA08:=STKINDI('AA08','xt*zj.zj',0,(0 - 1));
 AA09:=STKINDI('AA09','xt*zj.zj',0,(0 - 1));
 AA10:=STKINDI('AA10','xt*zj.zj',0,(0 - 1));
 AA11:=STKINDI('AA11','xt*zj.zj',0,(0 - 1));
 AA12:=STKINDI('AA12','xt*zj.zj',0,(0 - 1));
 AA13:=STKINDI('AA13','xt*zj.zj',0,(0 - 1));
 AA14:=STKINDI('AA14','xt*zj.zj',0,(0 - 1));
 AA15:=STKINDI('AA15','xt*zj.zj',0,(0 - 1));
 AA16:=STKINDI('AA16','xt*zj.zj',0,(0 - 1));
 DRAWTEXT((AA01 = 领涨通道1),100,'超强\n大盘'),color97BE4;
 DRAWTEXT((AA01 = 领跌通道1),(0 - 40),'超强\n大盘'),colorFF00;
 DRAWTEXT((AA02 = 领涨通道1),100,'超强\n小盘'),color97BE4;
 DRAWTEXT((AA02 = 领跌通道1),(0 - 40),'超强\n小盘'),colorFF00;
 DRAWTEXT((AA03 = 领涨通道1),100,'超强\n中盘'),color87AE3;
 DRAWTEXT((AA03 = 领跌通道1),(0 - 40),'超强\n中盘'),colorFF00;
 DRAWTEXT((AA04 = 领涨通道1),100,'极弱\n大盘'),color97BE4;
 DRAWTEXT((AA04 = 领跌通道1),(0 - 40),'极弱\n大盘'),colorFF00;
 DRAWTEXT((AA05 = 领涨通道1),100,'极弱\n小盘'),color97BE4;
 DRAWTEXT((AA05 = 领跌通道1),(0 - 40),'极弱\n小盘'),colorFF00;
 DRAWTEXT((AA06 = 领涨通道1),100,'极弱\n中盘'),color97BE4;
 DRAWTEXT((AA06 = 领跌通道1),(0 - 40),'极弱\n中盘'),colorFF00;
 DRAWTEXT((AA07 = 领涨通道1),100,'强势\n大盘'),color97BE4;
 DRAWTEXT((AA07 = 领跌通道1),(0 - 40),'强势\n大盘'),colorFF00;
 DRAWTEXT((AA08 = 领涨通道1),100,'强势\n小盘'),color97BE4;
 DRAWTEXT((AA08 = 领跌通道1),(0 - 40),'强势\n小盘'),colorFF00;
 DRAWTEXT((AA09 = 领涨通道1),100,'强势\n中盘'),color97BE4;
 DRAWTEXT((AA09 = 领跌通道1),(0 - 40),'强势\n中盘'),colorFF00;
 DRAWTEXT((AA10 = 领涨通道1),100,'弱势\n大盘'),color97BE4;
 DRAWTEXT((AA10 = 领跌通道1),(0 - 40),'弱势\n大盘'),colorFF00;
 DRAWTEXT((AA11 = 领涨通道1),100,'弱势\n小盘'),color97BE4;
 DRAWTEXT((AA11 = 领跌通道1),(0 - 40),'弱势\n小盘'),colorFF00;
 DRAWTEXT((AA12 = 领涨通道1),100,'弱势\n中盘'),color97BE4;
 DRAWTEXT((AA12 = 领跌通道1),(0 - 40),'弱势\n中盘'),colorFF00;
 DRAWTEXT((AA13 = 领涨通道1),100,'小天\n新股'),color97BE4;
 DRAWTEXT((AA13 = 领跌通道1),(0 - 40),'小天\n新股'),colorFF00;
 DRAWTEXT((AA14 = 领涨通道1),100,'小天\n龙头'),color97BE4;
 DRAWTEXT((AA14 = 领跌通道1),(0 - 40),'小天\n龙头'),colorFF00;
 DRAWTEXT((AA15 = 领涨通道1),100,'中小\n企业'),color97BE4;
 DRAWTEXT((AA15 = 领跌通道1),(0 - 40),'中小\n企业'),colorFF00;
 DRAWTEXT((AA16 = 领涨通道1),100,'上证\n50'),color97BE4;
 DRAWTEXT((AA16 = 领跌通道1),(0 - 40),'上证\n50'),colorFF00;
 EXPLAIN(ISLASTBAR,((('(1)今日资金攻击及前5名:' + DMS1) + ':') + STKNAMEEX(DMS1))),color97BE4;
 YYGS:='xt*zj.zj';
 STKSUM1:=STKCOUNT(STKNAMEEX(DMS1));
 variable:DMSTR1[0]=0;
 DCOUNT:=DATACOUNT;
 FOR    K=1 to STKSUM1  DO
 DM:=STKFROMBLK(STKNAMEEX(DMS1),K);
 DMSTR1[K]=DM;
 TEMP1:=STKINDI(DM,YYGS,0,(0 - 1));
 VAR_PX[K]=TEMP1[DCOUNT];
 VAR_INDI[K]=TEMP1[DCOUNT];
 NUM1:=SORTPOS(74,1,1,STKSUM1);
 DM_MAX1:=VAR_INDI[1];
 DM_MAX2:=VAR_INDI[2];
 DM_MAX3:=VAR_INDI[3];
 DM_MAX4:=VAR_INDI[4];
 DM_MAX5:=VAR_INDI[5];
 MAX1:=VAR_PX[DM_MAX1];
 STKSUM2:=VAR_PX[DM_MAX2];
 DCOUNT2:=VAR_PX[DM_MAX3];
 DMSTR2:=VAR_PX[DM_MAX4];
 VAR_PX2:=VAR_PX[DM_MAX5];
 EXPLAINEX(ISLASTBAR,((('1:' + DMSTR1[DM_MAX1]) + STKNAMEEX(DMSTR1[DM_MAX1])) + '---小天资金='),MAX1,2,0),colorFF;
 EXPLAINEX(ISLASTBAR,((('2:' + DMSTR1[DM_MAX2]) + STKNAMEEX(DMSTR1[DM_MAX2])) + '---小天资金='),STKSUM2,2,0),colorFF;
 EXPLAINEX(ISLASTBAR,((('3:' + DMSTR1[DM_MAX3]) + STKNAMEEX(DMSTR1[DM_MAX3])) + '---小天资金='),DCOUNT2,2,0),colorFF;
 EXPLAINEX(ISLASTBAR,((('4:' + DMSTR1[DM_MAX4]) + STKNAMEEX(DMSTR1[DM_MAX4])) + '---小天资金='),DMSTR2,2,0),colorFF;
 EXPLAINEX(ISLASTBAR,((('5:' + DMSTR1[DM_MAX5]) + STKNAMEEX(DMSTR1[DM_MAX5])) + '---小天资金='),VAR_PX2,2,0),colorFF;
 EXPLAIN(ISLASTBAR,((('(2)今日资金放弃及后2名:' + DMS2) + ':') + STKNAMEEX(DMS2))),color97BE4;
 VAR_INDI2:=STKCOUNT(STKNAMEEX(DMS2));
 variable:TEMP2[0]=0;
 DM2:=DATACOUNT;
 FOR    J=1 to VAR_INDI2  DO
 DM_MIN2:=STKFROMBLK(STKNAMEEX(DMS2),J);
 TEMP2[J]=DM_MIN2;
 VAR2:=STKINDI(DM_MIN2,YYGS,0,(0 - 1));
 NUM2[J]=VAR2[DM2];
 DM_MIN1[J]=VAR2[DM2];
 DMM:=SORTPOS(97,1,1,VAR_INDI2);
 DMMSTR:=DM_MIN1[VAR_INDI2];
 DMMS1:=DM_MIN1[(VAR_INDI2 - 1)];
 DMMS2:=NUM2[DMMSTR];
 VAR3:=NUM2[DMMS1];
 EXPLAINEX(ISLASTBAR,((('1:' + TEMP2[DMMSTR]) + STKNAMEEX(TEMP2[DMMSTR])) + '----小天资金='),DMMS2,2,0),colorFF00;
 EXPLAINEX(ISLASTBAR,((('2:' + TEMP2[DMMS1]) + STKNAMEEX(TEMP2[DMMS1])) + '----小天资金='),VAR3,2,0),colorFF00;
 EXPLAIN(ISLASTBAR,'-----------------------------------------------------------------------'),colorFF00FF;
领涨通道:=0;
 STKSUM3:='AA';
 DMMSTR3:='AA01';
 STKSUM2:=STKINDI(DMMSTR3,'xt*zj.zj',0,(0 - 1));
 VAR3:=STKSUM2;
 VAR_PX:=DMMSTR3;
 VAR_INDI:=VAR_PX;
 FOR    J=1 to 16  DO
 DMMSTR3:=((STKSUM3 + IF((J < 10),'0','')) + NUMTOSTR(J,0));
 VAR0:=STKINDI(DMMSTR3,'xt*zj.zj',0,(0 - 1));
 DMM_MAX1:=EMA(SUM(VAR0,N),3);
 VAR_PX:=IF((DMM_MAX1 > STKSUM2),DMMSTR3,VAR_PX);
 STKSUM2:=IF((DMM_MAX1 > STKSUM2),DMM_MAX1,STKSUM2);
 DMS2:=IF((DMM_MAX1 < VAR3),DMMSTR3,VAR_INDI);
 VAR3:=IF((DMM_MAX1 < VAR3),DMM_MAX1,VAR3);
 DMM_MAX2:=STKSUM2;
领跌通道:VAR3,colorFF00;
 DRAWICON(CROSS(小天资金雷达,DMM_MAX2),DMM_MAX2,'T01');
 DRAWICON(CROSS(小天资金雷达,DMM_MAX2),小天资金雷达,'S14');
 DRAWTEXT(ISLASTBAR,10,((('三日攻击:' + VAR_PX) + ',') + STKNAMEEX(VAR_PX))),colorFF00FF;
 DRAWTEXT(ISLASTBAR,(0 - 10),((('三日放弃:' + VAR_INDI) + ',') + STKNAMEEX(VAR_INDI))),colorFFFF00;
 EXPLAIN(ISLASTBAR,((('(3)三日资金攻击及前5名:' + VAR_PX) + ':') + STKNAMEEX(VAR_PX))),color97BE4;
 YYGS:='xt*zj.zj';
 DMM_MAX3:=STKCOUNT(STKNAMEEX(VAR_PX));
 variable:DMM_MAX4[0]=0;
 DCOUNT:=DATACOUNT;
 FOR    K=1 to DMM_MAX3  DO
 STKSUM3:=STKFROMBLK(STKNAMEEX(VAR_PX),K);
 DMM_MAX4[K]=STKSUM3;
 TEMP1:=STKINDI(STKSUM3,YYGS,0,(0 - 1));
 VAR_PX[K]=TEMP1[DCOUNT];
 VAR_INDI[K]=TEMP1[DCOUNT];
 NUM1:=SORTPOS(74,1,1,DMM_MAX3);
 DMM_MAX5:=VAR_INDI[1];
 STKSUM4:=VAR_INDI[2];
 DMMSTR4:=VAR_INDI[3];
 VAR_PX2:=VAR_INDI[4];
 VAR_INDI2:=VAR_INDI[5];
 MAX1:=VAR_PX[DMM_MAX5];
 STKSUM2:=VAR_PX[STKSUM4];
 DCOUNT2:=VAR_PX[DMMSTR4];
 DMSTR2:=VAR_PX[VAR_PX2];
 VAR_PX2:=VAR_PX[VAR_INDI2];
 EXPLAINEX(ISLASTBAR,((('1:' + DMM_MAX4[DMM_MAX5]) + STKNAMEEX(DMM_MAX4[DMM_MAX5])) + '---小天资金='),MAX1,2,0),colorFF00FF;
 EXPLAINEX(ISLASTBAR,((('2:' + DMM_MAX4[STKSUM4]) + STKNAMEEX(DMM_MAX4[STKSUM4])) + '---小天资金='),STKSUM2,2,0),colorFF00FF;
 EXPLAINEX(ISLASTBAR,((('3:' + DMM_MAX4[DMMSTR4]) + STKNAMEEX(DMM_MAX4[DMMSTR4])) + '---小天资金='),DCOUNT2,2,0),colorFF00FF;
 EXPLAINEX(ISLASTBAR,((('4:' + DMM_MAX4[VAR_PX2]) + STKNAMEEX(DMM_MAX4[VAR_PX2])) + '---小天资金='),DMSTR2,2,0),colorFF00FF;
 EXPLAINEX(ISLASTBAR,((('5:' + DMM_MAX4[VAR_INDI2]) + STKNAMEEX(DMM_MAX4[VAR_INDI2])) + '---小天资金='),VAR_PX2,2,0),colorFF00FF;
 EXPLAIN(ISLASTBAR,((('(4)三日资金放弃及后3名:' + VAR_INDI) + ':') + STKNAMEEX(VAR_INDI))),color97BE4;
 DMM2:=STKCOUNT(STKNAMEEX(VAR_INDI));
 variable:DMM_MIN1[0]=0;
 DM2:=DATACOUNT;
 FOR    J=1 to DMM2  DO
 DMM_MIN2:=STKFROMBLK(STKNAMEEX(VAR_INDI),J);
 DMM_MIN1[J]=DMM_MIN2;
 VAR2:=STKINDI(DMM_MIN2,YYGS,0,(0 - 1));
 NUM2[J]=VAR2[DM2];
 DM_MIN1[J]=VAR2[DM2];
 DMM:=SORTPOS(97,1,1,DMM2);
 VAR138:=DM_MIN1[DMM2];
 VAR139:=DM_MIN1[(DMM2 - 1)];
 DMMS2:=NUM2[VAR138];
 VAR3:=NUM2[VAR139];
 EXPLAINEX(ISLASTBAR,((('1:' + DMM_MIN1[VAR138]) + STKNAMEEX(DMM_MIN1[VAR138])) + '----小天资金='),DMMS2,2,0),colorFFFF00;
 EXPLAINEX(ISLASTBAR,((('2:' + DMM_MIN1[VAR139]) + STKNAMEEX(DMM_MIN1[VAR139])) + '----小天资金='),VAR3,2,0),colorFFFF00;
 EXPLAIN(ISLASTBAR,'★资金集中攻击是生产和维持热点的基石★'),colorFF;
历史换手:((100 * VOL) / CAPI),LINETHICK0;
 110;
 (0 - 50);


 {公称名称: 6.小天板快雷达}

input:N(3,1,10);
 VAR1:=0;
 DM:='AA';
 DMSTR:='AA01';
 A0:=STKINDI('BB01','dmc.yy',0,(0 - 1));
大盘中轴:EMA(SUM(A0,3),3),LINETHICK1,colorFFFFFF;
 MAX1:=STKINDI(DMSTR,'dmc.yy',0,(0 - 1));
 MIN0:=MAX1;
 DMS1:=DMSTR;
 DMS2:=DMS1;
 FOR    J=1 to 16  DO
 DMSTR:=((DM + IF((J < 10),'0','')) + NUMTOSTR(J,0));
 VAR0:=STKINDI(DMSTR,'dmc.yy',0,(0 - 1));
 VAR1:=EMA(SUM(VAR0,3),3);
 DMS1:=IF((VAR1 > MAX1),DMSTR,DMS1);
 MAX1:=IF((VAR1 > MAX1),VAR1,MAX1);
 DMS2:=IF((VAR1 < MIN0),DMSTR,DMS2);
 MIN0:=IF((VAR1 < MIN0),VAR1,MIN0);
领涨通道:MAX1,colorFF00FF;
领跌通道:MIN0,colorFFFF00;
 XT:=((100 * (CLOSE - REF(CLOSE,1))) / REF(CLOSE,1));
小天雷达:EMA(SUM(XT,N),3),LINETHICK1,colorFF;
 DRAWTEXT(ISLASTBAR,0,((('三日领涨:' + DMS1) + ',') + STKNAMEEX(DMS1))),colorFF00FF;
 VAR2:=0;
 DMM:='AA';
 DMMSTR:='AA01';
 MAX2:=STKINDI(DMMSTR,'dmc.yy',0,(0 - 1));
 MIN1:=MAX2;
 DMMS1:=DMMSTR;
 DMMS2:=DMMS1;
 FOR    J=1 to 16  DO
 DMMSTR:=((DMM + IF((J < 10),'0','')) + NUMTOSTR(J,0));
 VAR2:=STKINDI(DMMSTR,'dmc.yy',0,(0 - 1));
 DMMS1:=IF((VAR2 > MAX2),DMMSTR,DMMS1);
 MAX2:=IF((VAR2 > MAX2),VAR2,MAX2);
 DMMS2:=IF((VAR2 < MIN1),DMMSTR,DMMS2);
 MIN1:=IF((VAR1 < MIN1),VAR2,MIN1);
 DRAWTEXT(ISLASTBAR,6,((('当日领涨:' + DMMS1) + ',') + STKNAMEEX(DMMS1))),colorFF;
 16,colorFF;
 (0 - 15),colorFFFF00;
 DRAWICON(CROSS(小天雷达,领涨通道),领涨通道,'T01');
 DRAWICON(CROSS(小天雷达,领涨通道),小天雷达,'S14');
 EXPLAIN(ISLASTBAR,(((' (一)当日领涨及前5名:' + DMMS1) + ':') + STKNAMEEX(DMMS1))),color97BE4;
 YYGS:='dmc.yy';
 STKSUM1:=STKCOUNT(STKNAMEEX(DMMS1));
 variable:DMSTR[0]=0;
 DCOUNT:=DATACOUNT;
 FOR    VAR_INDI=1 to STKSUM1  DO
 DM:=STKFROMBLK(STKNAMEEX(DMMS1),VAR_INDI);
 DMSTR[VAR_INDI]=DM;
 K:=STKINDI(DM,YYGS,0,(0 - 1));
 DMSTR[VAR_INDI]=K[DCOUNT];
 VAR_PX[VAR_INDI]=K[DCOUNT];
 TEMP1:=SORTPOS(34,1,1,STKSUM1);
 NUM1:=VAR_PX[1];
 DM_MAX1:=VAR_PX[2];
 DM_MAX2:=VAR_PX[3];
 DM_MAX3:=VAR_PX[4];
 DM_MAX4:=VAR_PX[5];
 MAX1:=DMSTR[NUM1];
 MAX2:=DMSTR[DM_MAX1];
 DM_MAX5:=DMSTR[DM_MAX2];
 STKSUM3:=DMSTR[DM_MAX3];
 DCOUNT2:=DMSTR[DM_MAX4];
 EXPLAINEX(ISLASTBAR,((('1:' + DMSTR[NUM1]) + STKNAMEEX(DMSTR[NUM1])) + ':%'),MAX1,2,0),colorFF;
 EXPLAINEX(ISLASTBAR,((('2:' + DMSTR[DM_MAX1]) + STKNAMEEX(DMSTR[DM_MAX1])) + ':%'),MAX2,2,0),colorFF;
 EXPLAINEX(ISLASTBAR,((('3:' + DMSTR[DM_MAX2]) + STKNAMEEX(DMSTR[DM_MAX2])) + ':%'),DM_MAX5,2,0),colorFF;
 EXPLAINEX(ISLASTBAR,((('4:' + DMSTR[DM_MAX3]) + STKNAMEEX(DMSTR[DM_MAX3])) + ':%'),STKSUM3,2,0),colorFF;
 EXPLAINEX(ISLASTBAR,((('5:' + DMSTR[DM_MAX4]) + STKNAMEEX(DMSTR[DM_MAX4])) + ':%'),DCOUNT2,2,0),colorFF;
 EXPLAIN(ISLASTBAR,((('(二)当日领跌及后3名:' + DMMS2) + ':') + STKNAMEEX(DMMS2))),color97BE4;
 DMSTR2:=STKCOUNT(STKNAMEEX(DMMS2));
 variable:VAR_INDI2[0]=0;
 VAR_PX2:=DATACOUNT;
 FOR    J=1 to DMSTR2  DO
 NUM2:=STKFROMBLK(STKNAMEEX(DMMS2),J);
 VAR_INDI2[J]=NUM2;
 DM_MIN1:=STKINDI(NUM2,YYGS,0,(0 - 1));
 DM2[J]=DM_MIN1[VAR_PX2];
 TEMP2[J]=DM_MIN1[VAR_PX2];
 DM_MIN2:=SORTPOS(56,1,1,DMSTR2);
 DM_MIN3:=TEMP2[DMSTR2];
 STKSUM:=TEMP2[(DMSTR2 - 1)];
 DMSTR:=TEMP2[(DMSTR2 - 2)];
 MIN1:=DM2[DM_MIN3];
 VAR_PX:=DM2[STKSUM];
 VAR_INDI:=DM2[DMSTR];
 EXPLAINEX(ISLASTBAR,((('1:' + VAR_INDI2[DM_MIN3]) + STKNAMEEX(VAR_INDI2[DM_MIN3])) + ':%'),MIN1,2,0),colorFF00;
 EXPLAINEX(ISLASTBAR,((('2:' + VAR_INDI2[STKSUM]) + STKNAMEEX(VAR_INDI2[STKSUM])) + ':%'),VAR_PX,2,0),colorFF00;
 EXPLAINEX(ISLASTBAR,((('3:' + VAR_INDI2[DMSTR]) + STKNAMEEX(VAR_INDI2[DMSTR])) + ':%'),VAR_INDI,2,0),colorFF00;
 EXPLAIN(ISLASTBAR,'---------------------------------------------'),colorFF00;
 EXPLAIN(ISLASTBAR,((('(三)三日领涨及前5名:' + DMS1) + ':') + STKNAMEEX(DMS1))),color97BE4;
 YYGS:='dmc.yy';
 STKSUM4:=STKCOUNT(STKNAMEEX(DMS1));
 variable:DMSTR[0]=0;
 DCOUNT:=DATACOUNT;
 FOR    VAR_INDI=1 to STKSUM4  DO
 DM:=STKFROMBLK(STKNAMEEX(DMS1),VAR_INDI);
 DMSTR[VAR_INDI]=DM;
 K:=STKINDI(DM,YYGS,0,(0 - 1));
 DM_MIN1:=EMA(SUM(K,N),3);
 DMSTR[VAR_INDI]=K[DCOUNT];
 VAR_PX[VAR_INDI]=K[DCOUNT];
 TEMP1:=SORTPOS(34,1,1,STKSUM4);
 NUM1:=VAR_PX[1];
 DM_MAX1:=VAR_PX[2];
 DM_MAX2:=VAR_PX[3];
 DM_MAX3:=VAR_PX[4];
 DM_MAX4:=VAR_PX[5];
 MAX1:=DMSTR[NUM1];
 MAX2:=DMSTR[DM_MAX1];
 DM_MAX5:=DMSTR[DM_MAX2];
 STKSUM3:=DMSTR[DM_MAX3];
 DCOUNT2:=DMSTR[DM_MAX4];
 EXPLAINEX(ISLASTBAR,((('1:' + DMSTR[NUM1]) + STKNAMEEX(DMSTR[NUM1])) + ':%'),MAX1,2,0),colorFF00FF;
 EXPLAINEX(ISLASTBAR,((('2:' + DMSTR[DM_MAX1]) + STKNAMEEX(DMSTR[DM_MAX1])) + ':%'),MAX2,2,0),colorFF00FF;
 EXPLAINEX(ISLASTBAR,((('3:' + DMSTR[DM_MAX2]) + STKNAMEEX(DMSTR[DM_MAX2])) + ':%'),DM_MAX5,2,0),colorFF00FF;
 EXPLAINEX(ISLASTBAR,((('4:' + DMSTR[DM_MAX3]) + STKNAMEEX(DMSTR[DM_MAX3])) + ':%'),STKSUM3,2,0),colorFF00FF;
 EXPLAINEX(ISLASTBAR,((('5:' + DMSTR[DM_MAX4]) + STKNAMEEX(DMSTR[DM_MAX4])) + ':%'),DCOUNT2,2,0),colorFF00FF;
 EXPLAIN(ISLASTBAR,((('(四)三日领跌及后三名:' + DMS2) + ':') + STKNAMEEX(DMS2))),color97BE4;
 DMSTR2:=STKCOUNT(STKNAMEEX(DMS2));
 variable:VAR_INDI2[0]=0;
 VAR_PX2:=DATACOUNT;
 FOR    J=1 to DMSTR2  DO
 NUM2:=STKFROMBLK(STKNAMEEX(DMS2),J);
 VAR_INDI2[J]=NUM2;
 DM_MIN1:=STKINDI(NUM2,YYGS,0,(0 - 1));
 DM2[J]=DM_MIN1[VAR_PX2];
 TEMP2[J]=DM_MIN1[VAR_PX2];
 DM_MIN2:=SORTPOS(56,1,1,DMSTR2);
 DM_MIN3:=TEMP2[DMSTR2];
 STKSUM:=TEMP2[(DMSTR2 - 1)];
 DMSTR:=TEMP2[(DMSTR2 - 2)];
 MIN1:=DM2[DM_MIN3];
 VAR_PX:=DM2[STKSUM];
 VAR_INDI:=DM2[DMSTR];
 EXPLAINEX(ISLASTBAR,((('1:' + VAR_INDI2[DM_MIN3]) + STKNAMEEX(VAR_INDI2[DM_MIN3])) + ':%'),MIN1,2,0),colorFFFF00;
 EXPLAINEX(ISLASTBAR,((('2:' + VAR_INDI2[STKSUM]) + STKNAMEEX(VAR_INDI2[STKSUM])) + ':%'),VAR_PX,2,0),colorFFFF00;
 EXPLAINEX(ISLASTBAR,((('3:' + VAR_INDI2[DMSTR]) + STKNAMEEX(VAR_INDI2[DMSTR])) + ':%'),VAR_INDI,2,0),colorFFFF00;
 EXPLAIN(ISLASTBAR,'★领涨使用强势技术,领跌使用抄底技术★'),colorFF;
 VAR_PX2:=STKINDI('AA01','dmc.yy',0,(0 - 1));
 VAR_INDI2:=STKINDI('AA02','dmc.yy',0,(0 - 1));
 AA01:=STKINDI('AA03','dmc.yy',0,(0 - 1));
 AA02:=STKINDI('AA04','dmc.yy',0,(0 - 1));
 AA03:=STKINDI('AA05','dmc.yy',0,(0 - 1));
 AA04:=STKINDI('AA06','dmc.yy',0,(0 - 1));
 AA05:=STKINDI('AA07','dmc.yy',0,(0 - 1));
 AA06:=STKINDI('AA08','dmc.yy',0,(0 - 1));
 AA07:=STKINDI('AA09','dmc.yy',0,(0 - 1));
 AA08:=STKINDI('AA10','dmc.yy',0,(0 - 1));
 AA09:=STKINDI('AA11','dmc.yy',0,(0 - 1));
 AA10:=STKINDI('AA12','dmc.yy',0,(0 - 1));
 AA11:=STKINDI('AA13','dmc.yy',0,(0 - 1));
 AA12:=STKINDI('AA14','dmc.yy',0,(0 - 1));
 AA13:=STKINDI('AA15','dmc.yy',0,(0 - 1));
 AA14:=STKINDI('AA16','dmc.yy',0,(0 - 1));
 AA15:=MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(VAR_PX2,VAR_INDI2),AA01),AA02),AA03),AA04),AA05),AA06),AA07),AA08),AA09),AA10),AA11),AA12),AA13),AA14);
 AA16:=MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(VAR_PX2,VAR_INDI2),AA01),AA02),AA03),AA04),AA05),AA06),AA07),AA08),AA09),AA10),AA11),AA12),AA13),AA14);
领涨通道1:=IF((VAR_PX2 = AA15),'AA01',IF((VAR_INDI2 = AA15),'AA02',IF((AA01 = AA15),'AA03',IF((AA02 = AA15),'AA04',IF((AA03 = AA15),'AA05',IF((AA04 = AA15),'AA06',IF((AA05 = AA15),'AA07',IF((AA06 = AA15),'AA08',IF((AA07 = AA15),'AA09',IF((AA08 = AA15),'AA10',IF((AA09 = AA15),'AA11',IF((AA10 = AA15),'AA12',IF((AA11 = AA15),'AA13',IF((AA12 = AA15),'AA14',IF((AA13 = AA15),'AA15','AA16')))))))))))))));
 DRAWTEXT((VAR_PX2 = AA15),15,'超强\n大盘'),color97BE4;
 DRAWTEXT((VAR_PX2 = AA16),(0 - 10),'超强\n大盘'),colorFF00;
 DRAWTEXT((VAR_INDI2 = AA15),15,'超强\n小盘'),color97BE4;
 DRAWTEXT((VAR_INDI2 = AA16),(0 - 10),'超强\n小盘'),colorFF00;
 DRAWTEXT((AA01 = AA15),15,'超强\n中盘'),color87AE3;
 DRAWTEXT((AA01 = AA16),(0 - 10),'超强\n中盘'),colorFF00;
 DRAWTEXT((AA02 = AA15),15,'极弱\n大盘'),color97BE4;
 DRAWTEXT((AA02 = AA16),(0 - 10),'极弱\n大盘'),colorFF00;
 DRAWTEXT((AA03 = AA15),15,'极弱\n小盘'),color97BE4;
 DRAWTEXT((AA03 = AA16),(0 - 10),'极弱\n小盘'),colorFF00;
 DRAWTEXT((AA04 = AA15),15,'极弱\n中盘'),color97BE4;
 DRAWTEXT((AA04 = AA16),(0 - 10),'极弱\n中盘'),colorFF00;
 DRAWTEXT((AA05 = AA15),15,'强势\n大盘'),color97BE4;
 DRAWTEXT((AA05 = AA16),(0 - 10),'强势\n大盘'),colorFF00;
 DRAWTEXT((AA06 = AA15),15,'强势\n小盘'),color97BE4;
 DRAWTEXT((AA06 = AA16),(0 - 10),'强势\n小盘'),colorFF00;
 DRAWTEXT((AA07 = AA15),15,'强势\n中盘'),color97BE4;
 DRAWTEXT((AA07 = AA16),(0 - 10),'强势\n中盘'),colorFF00;
 DRAWTEXT((AA08 = AA15),15,'弱势\n大盘'),color97BE4;
 DRAWTEXT((AA08 = AA16),(0 - 10),'弱势\n大盘'),colorFF00;
 DRAWTEXT((AA09 = AA15),15,'弱势\n小盘'),color97BE4;
 DRAWTEXT((AA09 = AA16),(0 - 10),'弱势\n小盘'),colorFF00;
 DRAWTEXT((AA10 = AA15),15,'弱势\n中盘'),color97BE4;
 DRAWTEXT((AA10 = AA16),(0 - 10),'弱势\n中盘'),colorFF00;
 DRAWTEXT((AA11 = AA15),15,'小天\n新股'),color97BE4;
 DRAWTEXT((AA11 = AA16),(0 - 10),'小天\n新股'),colorFF00;
 DRAWTEXT((AA12 = AA15),15,'小天\n龙头'),color97BE4;
 DRAWTEXT((AA12 = AA16),(0 - 10),'小天\n龙头'),colorFF00;
 DRAWTEXT((AA13 = AA15),15,'中小\n企业'),color97BE4;
 DRAWTEXT((AA13 = AA16),(0 - 10),'中小\n企业'),colorFF00;
 DRAWTEXT((AA14 = AA15),15,'上证\n50'),color97BE4;
 DRAWTEXT((AA14 = AA16),(0 - 10),'上证\n50'),colorFF00;


 {公称名称: 7.小天行业雷达}

input:N(3,1,10);
 VAR1:=0;
 DM:='HY';
 DMSTR:='HY01';
 A0:=STKINDI('BB01','dmc.yy',0,(0 - 1));
大盘中轴:EMA(SUM(A0,3),3),LINETHICK1,colorFFFFFF;
 MAX1:=STKINDI(DMSTR,'dmc.yy',0,(0 - 1));
 MIN0:=MAX1;
 DMS1:=DMSTR;
 DMS2:=DMS1;
 FOR    J=1 to 35  DO
 DMSTR:=((DM + IF((J < 10),'0','')) + NUMTOSTR(J,0));
 VAR0:=STKINDI(DMSTR,'dmc.yy',0,(0 - 1));
 VAR1:=EMA(SUM(VAR0,3),3);
 DMS1:=IF((VAR1 > MAX1),DMSTR,DMS1);
 MAX1:=IF((VAR1 > MAX1),VAR1,MAX1);
 DMS2:=IF((VAR1 < MIN0),DMSTR,DMS2);
 MIN0:=IF((VAR1 < MIN0),VAR1,MIN0);
领涨通道:MAX1,colorFF00FF;
领跌通道:MIN0,colorFFFF00;
 XT:=((100 * (CLOSE - REF(CLOSE,1))) / REF(CLOSE,1));
小天雷达:EMA(SUM(XT,N),3),LINETHICK1,colorFF;
 DRAWTEXT(ISLASTBAR,0,((('三日领涨:' + DMS1) + ',') + STKNAMEEX(DMS1))),colorFF00FF;
 DRAWTEXT(ISLASTBAR,(0 - 3),((('三日领跌:' + DMS2) + ',') + STKNAMEEX(DMS2))),colorFFFF00;
 VAR2:=0;
 DMM:='HY';
 DMMSTR:='HY01';
 MAX2:=STKINDI(DMMSTR,'dmc.yy',0,(0 - 1));
 MIN1:=MAX2;
 DMMS1:=DMMSTR;
 DMMS2:=DMMS1;
 FOR    J=1 to 35  DO
 DMMSTR:=((DMM + IF((J < 10),'0','')) + NUMTOSTR(J,0));
 VAR2:=STKINDI(DMMSTR,'dmc.yy',0,(0 - 1));
 DMMS1:=IF((VAR2 > MAX2),DMMSTR,DMMS1);
 MAX2:=IF((VAR2 > MAX2),VAR2,MAX2);
 DMMS2:=IF((VAR2 < MIN1),DMMSTR,DMMS2);
 MIN1:=IF((VAR1 < MIN1),VAR2,MIN1);
 DRAWTEXT(ISLASTBAR,6,((('当日领涨:' + DMMS1) + ',') + STKNAMEEX(DMMS1))),colorFF;
 DRAWTEXT(ISLASTBAR,3,((('当日领跌:' + DMMS2) + ',') + STKNAMEEX(DMMS2))),colorFF00;
 16,colorFF;
 (0 - 15),colorFFFF00;
 DRAWICON(CROSS(小天雷达,领涨通道),领涨通道,'T01');
 DRAWICON(CROSS(小天雷达,领涨通道),小天雷达,'S14');
 HY01:=STKINDI('HY01','dmc.yy',0,(0 - 1));
 HY02:=STKINDI('HY02','dmc.yy',0,(0 - 1));
 HY03:=STKINDI('HY03','dmc.yy',0,(0 - 1));
 HY04:=STKINDI('HY04','dmc.yy',0,(0 - 1));
 HY05:=STKINDI('HY05','dmc.yy',0,(0 - 1));
 HY06:=STKINDI('HY06','dmc.yy',0,(0 - 1));
 HY07:=STKINDI('HY07','dmc.yy',0,(0 - 1));
 HY08:=STKINDI('HY08','dmc.yy',0,(0 - 1));
 HY09:=STKINDI('HY09','dmc.yy',0,(0 - 1));
 HY10:=STKINDI('HY10','dmc.yy',0,(0 - 1));
 HY11:=STKINDI('HY11','dmc.yy',0,(0 - 1));
 HY12:=STKINDI('HY12','dmc.yy',0,(0 - 1));
 HY13:=STKINDI('HY13','dmc.yy',0,(0 - 1));
 HY14:=STKINDI('HY14','dmc.yy',0,(0 - 1));
 HY15:=STKINDI('HY15','dmc.yy',0,(0 - 1));
 HY16:=STKINDI('HY16','dmc.yy',0,(0 - 1));
 HY17:=STKINDI('HY17','dmc.yy',0,(0 - 1));
 HY18:=STKINDI('HY18','dmc.yy',0,(0 - 1));
 HY19:=STKINDI('HY19','dmc.yy',0,(0 - 1));
 HY20:=STKINDI('HY20','dmc.yy',0,(0 - 1));
 HY21:=STKINDI('HY21','dmc.yy',0,(0 - 1));
 HY22:=STKINDI('HY22','dmc.yy',0,(0 - 1));
 HY23:=STKINDI('HY23','dmc.yy',0,(0 - 1));
 HY24:=STKINDI('HY24','dmc.yy',0,(0 - 1));
 HY25:=STKINDI('HY25','dmc.yy',0,(0 - 1));
 HY26:=STKINDI('HY26','dmc.yy',0,(0 - 1));
 HY27:=STKINDI('HY27','dmc.yy',0,(0 - 1));
 HY28:=STKINDI('HY28','dmc.yy',0,(0 - 1));
 HY29:=STKINDI('HY29','dmc.yy',0,(0 - 1));
 HY30:=STKINDI('HY30','dmc.yy',0,(0 - 1));
 HY31:=STKINDI('HY31','dmc.yy',0,(0 - 1));
 HY32:=STKINDI('HY32','dmc.yy',0,(0 - 1));
 HY33:=STKINDI('HY33','dmc.yy',0,(0 - 1));
 HY34:=STKINDI('HY34','dmc.yy',0,(0 - 1));
 HY35:=STKINDI('HY35','dmc.yy',0,(0 - 1));
领涨通道1:=MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(MAX(HY01,HY02),HY03),HY04),HY05),HY06),HY07),HY08),HY09),HY10),HY11),HY12),HY13),HY14),HY15),HY16),HY17),HY18),HY19),HY20),HY21),HY22),HY23),HY24),HY25),HY26),HY27),HY28),HY29),HY30),HY31),HY32),HY33),HY34),HY35);
领跌通道1:=MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(MIN(HY01,HY02),HY03),HY04),HY05),HY06),HY07),HY08),HY09),HY10),HY11),HY12),HY13),HY14),HY15),HY16),HY17),HY18),HY19),HY20),HY21),HY22),HY23),HY24),HY25),HY26),HY27),HY28),HY29),HY30),HY31),HY32),HY33),HY34),HY35);
 DRAWTEXT((HY01 = 领涨通道1),15,'汽配\n指数'),color97BE4;
 DRAWTEXT((HY01 = 领跌通道1),(0 - 10),'汽配\n指数'),colorFF00;
 DRAWTEXT((HY02 = 领涨通道1),15,'工程\n建筑'),color97BE4;
 DRAWTEXT((HY02 = 领跌通道1),(0 - 10),'工程\n建筑'),colorFF00;
 DRAWTEXT((HY03 = 领涨通道1),15,'电力\n指数'),color87AE3;
 DRAWTEXT((HY03 = 领跌通道1),(0 - 10),'电力\n指数'),colorFF00;
 DRAWTEXT((HY04 = 领涨通道1),15,'电脑\n指数'),color97BE4;
 DRAWTEXT((HY04 = 领跌通道1),(0 - 10),'电恼\n指数'),colorFF00;
 DRAWTEXT((HY05 = 领涨通道1),15,'乳业\n指数'),color97BE4;
 DRAWTEXT((HY05 = 领跌通道1),(0 - 10),'乳业\n指数'),colorFF00;
 DRAWTEXT((HY06 = 领涨通道1),15,'电子\n信息'),color97BE4;
 DRAWTEXT((HY06 = 领跌通道1),(0 - 10),'电子\n信息'),colorFF00;
 DRAWTEXT((HY07 = 领涨通道1),15,'房地\n指数'),color97BE4;
 DRAWTEXT((HY07 = 领跌通道1),(0 - 10),'房地\n指数'),colorFF00;
 DRAWTEXT((HY08 = 领涨通道1),15,'纺织\n指数'),color97BE4;
 DRAWTEXT((HY08 = 领跌通道1),(0 - 10),'纺织\n指数'),colorFF00;
 DRAWTEXT((HY09 = 领涨通道1),15,'钢铁\n指数'),color97BE4;
 DRAWTEXT((HY09 = 领跌通道1),(0 - 10),'钢铁\n指数'),colorFF00;
 DRAWTEXT((HY10 = 领涨通道1),15,'供水\n供汽'),color97BE4;
 DRAWTEXT((HY10 = 领跌通道1),(0 - 10),'供水\n供汽'),colorFF00;
 DRAWTEXT((HY11 = 领涨通道1),15,'化工\n指数'),color97BE4;
 DRAWTEXT((HY11 = 领跌通道1),(0 - 10),'化工\n指数'),colorFF00;
 DRAWTEXT((HY12 = 领涨通道1),15,'化纤\n指数'),color97BE4;
 DRAWTEXT((HY12 = 领跌通道1),(0 - 10),'化纤\n指数'),colorFF00;
 DRAWTEXT((HY13 = 领涨通道1),15,'通信\n指数'),color97BE4;
 DRAWTEXT((HY13 = 领跌通道1),(0 - 10),'通信\n指数'),colorFF00;
 DRAWTEXT((HY14 = 领涨通道1),15,'电器\n指数'),color97BE4;
 DRAWTEXT((HY14 = 领跌通道1),(0 - 10),'电器\n指数'),colorFF00;
 DRAWTEXT((HY15 = 领涨通道1),15,'交通\n工具'),color97BE4;
 DRAWTEXT((HY15 = 领跌通道1),(0 - 10),'交通\n工具'),colorFF00;
 DRAWTEXT((HY16 = 领涨通道1),15,'交通\n设施'),color87AE3;
 DRAWTEXT((HY16 = 领跌通道1),(0 - 10),'交通\n设施'),colorFF00;
 DRAWTEXT((HY17 = 领涨通道1),15,'金融\n指数'),color97BE4;
 DRAWTEXT((HY17 = 领跌通道1),(0 - 10),'金融\n指数'),colorFF00;
 DRAWTEXT((HY18 = 领涨通道1),15,'旅游\n酒店'),color97BE4;
 DRAWTEXT((HY18 = 领跌通道1),(0 - 10),'旅游\n酒店'),colorFF00;
 DRAWTEXT((HY19 = 领涨通道1),15,'煤炭\n石油'),color97BE4;
 DRAWTEXT((HY19 = 领跌通道1),(0 - 10),'煤炭\n石油'),colorFF00;
 DRAWTEXT((HY20 = 领涨通道1),15,'酿酒\n食品'),color97BE4;
 DRAWTEXT((HY20 = 领跌通道1),(0 - 10),'酿酒\n食品'),colorFF00;
 DRAWTEXT((HY21 = 领涨通道1),15,'浓林\n牧渔'),color97BE4;
 DRAWTEXT((HY21 = 领跌通道1),(0 - 10),'浓林\n牧渔'),colorFF00;
 DRAWTEXT((HY22 = 领涨通道1),15,'运输\n物流'),color97BE4;
 DRAWTEXT((HY22 = 领跌通道1),(0 - 10),'运输\n物流'),colorFF00;
 DRAWTEXT((HY23 = 领涨通道1),15,'商业\n连锁'),color97BE4;
 DRAWTEXT((HY23 = 领跌通道1),(0 - 10),'商业\n连锁'),colorFF00;
 DRAWTEXT((HY24 = 领涨通道1),15,'建材\n指数'),color97BE4;
 DRAWTEXT((HY24 = 领跌通道1),(0 - 10),'建材\n指数'),colorFF00;
 DRAWTEXT((HY25 = 领涨通道1),15,'其他\n行业'),color97BE4;
 DRAWTEXT((HY25 = 领跌通道1),(0 - 10),'其他\n行业'),colorFF00;
 DRAWTEXT((HY26 = 领涨通道1),15,'汽车\n指数'),color97BE4;
 DRAWTEXT((HY26 = 领跌通道1),(0 - 10),'汽车\n指数'),colorFF00;
 DRAWTEXT((HY27 = 领涨通道1),15,'机械\n指数'),color97BE4;
 DRAWTEXT((HY27 = 领跌通道1),(0 - 10),'机械\n指数'),colorFF00;
 DRAWTEXT((HY28 = 领涨通道1),15,'医药\n指数'),color97BE4;
 DRAWTEXT((HY28 = 领跌通道1),(0 - 10),'医药\n指数'),colorFF00;
 DRAWTEXT((HY29 = 领涨通道1),15,'石化\n指数'),color87AE3;
 DRAWTEXT((HY29 = 领跌通道1),(0 - 10),'石化\n指数'),colorFF00;
 DRAWTEXT((HY30 = 领涨通道1),15,'水泥\n指数'),color97BE4;
 DRAWTEXT((HY30 = 领跌通道1),(0 - 10),'水泥\n指数'),colorFF00;
 DRAWTEXT((HY31 = 领涨通道1),15,'外贸\n指数'),color97BE4;
 DRAWTEXT((HY31 = 领跌通道1),(0 - 10),'外贸\n指数'),colorFF00;
 DRAWTEXT((HY32 = 领涨通道1),15,'教育\n传媒'),color97BE4;
 DRAWTEXT((HY32 = 领跌通道1),(0 - 10),'教育\n传媒'),colorFF00;
 DRAWTEXT((HY33 = 领涨通道1),15,'仪电\n仪表'),color97BE4;
 DRAWTEXT((HY33 = 领跌通道1),(0 - 10),'仪电\n仪表'),colorFF00;
 DRAWTEXT((HY34 = 领涨通道1),15,'有色\n金属'),color97BE4;
 DRAWTEXT((HY34 = 领跌通道1),(0 - 10),'有色\n金属'),colorFF00;
 DRAWTEXT((HY35 = 领涨通道1),15,'造纸\n印刷'),color97BE4;
 DRAWTEXT((HY35 = 领跌通道1),(0 - 10),'造纸\n印刷'),colorFF00;


 {公称名称: 8.小天大盘状态}

input:N(13,1,100),N1(30,1,100),M(10,1,100),M1(5,1,100);
 XT:=(((ESTDATA(3) + ESTDATA(4)) + ESTDATA(5)) + ESTDATA(6));
 XT1:=ESTDATA(3);
 XT2:=(ESTDATA(4) + ESTDATA(3));
 XT3:=(ESTDATA(5) + ESTDATA(6));
 XT4:=ESTDATA(6);
 80,colorFF0000;
 50,color808080;
 20,colorFFFFFF;
多头能量:(((ESTDATA(3) + ESTDATA(4)) * 100) / XT),LINETHICK2,colorFF;
空头能量:(((ESTDATA(5) + ESTDATA(6)) * 100) / XT),LINETHICK2,colorFF00;
超买能量:((ESTDATA(3) * 100) / XT),colorFF00FF;
超卖能量:((ESTDATA(6) * 100) / XT),colorFFFF;
 EXPLAIN(CROSS(多头能量,空头能量),'结论:大盘进入多头行情'),colorFF00FF;
 EXPLAIN((多头能量 > 空头能量),'★多头行情,继续做多'),colorFFFF;
 EXPLAIN((((多头能量 > 空头能量) AND (超买能量 >= 50)) AND (超买能量 < 80)),'★多头行情将结束,大盘见顶将调整'),colorFF00;
 EXPLAIN(((多头能量 > 空头能量) AND (超买能量 >= 80)),'★超级多头启动,但必须先调整'),colorFF00;
 EXPLAIN(CROSS(空头能量,多头能量),'★★结论:大盘进入空头行情'),colorFFFF00;
 EXPLAIN(((空头能量 > 多头能量) AND (多头能量 < REF(多头能量,1))),'★空头行情,持币等待'),colorFF00;
 EXPLAIN(((空头能量 > 多头能量) AND (超卖能量 > 50)),'★空头行情将结束,大盘见底将反弹'),colorFF;
 EXPLAIN(((空头能量 > 多头能量) AND (多头能量 > REF(多头能量,1))),'★多头积聚能量,逢低买入'),colorFF;
 EXPLAIN((超买能量 > 80),'★★结论:见顶!短线必调整,快速出局'),colorFF00;
 EXPLAIN((超卖能量 > 80),'★★结论:见大底!短线必反弹,快速抄底'),colorFF;
 EXPLAIN(CROSS(多头能量,20),'★★结论:物极必反,大盘开始转强'),colorFF;
 EXPLAIN(CROSS(80,多头能量),'★★结论:强弩之末,大盘开始转弱'),colorFF00;
 EXPLAINEX((VOL > 0),'超买流通市值=',XT1,1,0),colorFF;
 EXPLAINEX((VOL > 0),'做多流通市值=',XT2,1,0),colorFF00FF;
 EXPLAINEX((VOL > 0),'做空流通市值=',XT3,1,0),colorFFFF00;
 EXPLAINEX((VOL > 0),'超卖流通市值=',XT4,1,0),colorFF00;
 EXPLAIN(((CLOSE > 0) AND ISLASTBAR),'《飞狐交易师-小天旗舰》'),colorFFFF;
 EXPLAIN((CLOSE > 0),'www.xtstock.com');


 {公称名称: 81.小天雷达风向标}


月风向标:STKINDI(STKLABEL,'xtfxb.风向标',0,8),LINETHICK1,colorFF00;
周风向标:STKINDI(STKLABEL,'xtfxb.风向标',0,7),LINETHICK1,colorFFFF;
静风向标:=((100 * (ESTDATA(7) - ESTDATA(8))) / (ESTDATA(7) + ESTDATA(8)));
上涨:=STKINDI('1A0001','dtfxb.A',0,6);
上跌:=STKINDI('1A0001','dtfxb.D',0,6);
深涨:=STKINDI('399001','dtfxb.A',0,6);
深跌:=STKINDI('399001','dtfxb.D',0,6);
 SJ:=(DATE <= 1051231);
 AAA:=CHECKUSER(1);
 CYC1:=(("xt1@CYC5" * SJ) > 0);
总涨:=(CYC1 * (上涨 + 深涨));
总跌:=(CYC1 * (上跌 + 深跌));
动态风向标:IF((CURRENTDATE = DATE),((100 * (总涨 - 总跌)) / (总涨 + 总跌)),静风向标),LINETHICK2,colorFF00FF;
 80,LINEDOT,colorFF;
 (0 - 80),LINEDOT,colorFF00;
 EXPLAINEX((CLOSE > 0),'动态风向标=',动态风向标,1,0),colorFF;
 EXPLAINEX((CLOSE > 0),'周风向标=',周风向标,1,0),colorFFFF;
 EXPLAINEX((CLOSE > 0),'月风向标=',月风向标,1,0),colorFF00;
 E:=INDEXC;
 EXPLAIN(((E >= REF(E,1)) AND (动态风向标 >= REF(动态风向标,1))),'§风向标同步,大势上涨正常。'),colorFFFF;
 EXPLAIN(((E >= REF(E,1)) AND (动态风向标 < REF(动态风向标,1))),'§风向标异常,否认大势上涨。'),colorFFFF;
 EXPLAIN((动态风向标 > 80),'●资金拒进,大势短线将调整'),colorFF00;
 EXPLAIN(((E < REF(E,1)) AND (动态风向标 >= REF(动态风向标,1))),'§风向标异常,否认大势下跌。'),colorFFFF;
 EXPLAIN(((E < REF(E,1)) AND (动态风向标 <= REF(动态风向标,1))),'§风向标正常,认可大势下跌。'),colorFFFF;
 EXPLAIN((动态风向标 < (0 - 80)),'●资金拒退,大势短线将上攻。'),colorFF;


 {公称名称: 82.小天雷达触发器}

input:N(6,1,100),N1(6,1,100);
 SJ:=(DATE <= 1051231);
 AAA:=CHECKUSER(1);
 CYC1:=(("xt1@CYC5" * SJ) > 0);
 VAR2:=(((CYC1 * AMOUNT) / VOL) / 100);
 VAR3:=EMA(VAR2,8);
 VAR4:=STD(VAR2,8);
 VAR5:=(((VAR2 - VAR3) * 100) / VAR4);
 VAR6:=EMA(VAR5,5);
 VAR7:=EMA(VAR6,8);
辟地:=(((EMA(VAR6,8) + 100) / 2) - 3);
开天:=HHV(辟地,2);
 CC:=INDEXC;
 DD:=INDEXH;
 EE:=INDEXL;
 FF:=INDEXO;
 GBDP:=((INDEXA / INDEXV) / 100);
 VARDP:=((INDEXA / INDEXV) / 100);
 VAR3DP:=EMA(VARDP,8);
 VAR4DP:=STD(VARDP,8);
 VAR5DP:=(((VARDP - VAR3DP) * 100) / VAR4DP);
 VAR6DP:=EMA(VAR5DP,5);
 VAR7DP:=EMA(VAR6DP,8);
辟地DP:=(((EMA(VAR6DP,8) + 100) / 2) - 3);
开天DP:=HHV(辟地DP,2);
 AA1:=(开天DP - 辟地DP);
 B:=(CYC1 * (开天 - 辟地));
周期触发器:IF((B = 0),1,IF((B > 0),(0 - 1),0)),LINETHICK1;
 FILLRGN((周期触发器 = 1),0,周期触发器),colorFF;
 FILLRGN((周期触发器 = (0 - 1)),0,周期触发器),colorFFFF;
 CYC1:=((AMOUNT / VOL) / 100);
 W1:=SMA(((((((3 * HIGH) + (2 * CLOSE)) + OPEN) + LOW) + CYC1) / 8),10,1);
 W2:=(0 - ((100 * (HHV(HHV(W1,1),13) - W1)) / (HHV(HHV(W1,1),13) - LLV(LLV(W1,1),13))));
 W3:=(0 - ((100 * (HHV(HHV(W1,1),21) - W1)) / (HHV(HHV(W1,1),21) - LLV(LLV(W1,1),21))));
 W4:=(0 - ((100 * (HHV(HHV(W1,1),55) - W1)) / (HHV(HHV(W1,1),55) - LLV(LLV(W1,1),55))));
价格WR:=(0 - ((100 * (HHV(HHV(W1,1),5) - W1)) / (HHV(HHV(W1,1),5) - LLV(LLV(W1,1),5))));
 A2:=((((W2 + W3) + W4) + 价格WR) / 4);
趋势触发器:IF((((A2 - REF(A2,1)) > 0) OR (A2 = 0)),2,1),LINETHICK1;
 PARTLINE((趋势触发器 = 2),趋势触发器),LINETHICK2,colorFF00FF;
 PARTLINE((趋势触发器 = 1),趋势触发器),LINETHICK2,colorFFFF00;
 A3:=STKINDI(STKLABEL,'XTQJ1.xt',0,(0 - 1));
小天副触发器:=STKINDI(STKLABEL,'XTQJ2.xt',0,(0 - 1));
 VAR43:=STKINDI(STKLABEL,'XTQJ3.xt',0,(0 - 1));
 VAR44:=STKINDI(STKLABEL,'xtQJ7.xtjy',0,(0 - 1));
极限触发器:(((A3 + 小天副触发器) + VAR43) + VAR44),LINETHICK2,colorFF00;
 7,LINEDOT;
 0,LINEDOT,colorFF00;
 1,LINEDOT,colorFFFFFF;
 8,LINEDOT,colorFF0000;
 DRAWTEXT(((趋势触发器 = 2) AND (极限触发器 = 7)),6,'沸点\n不追'),colorFFFF00;
 DRAWTEXT((((趋势触发器 = 2) AND (极限触发器 = 8)) AND (周期触发器 = 1)),7,'极沸\n三日\n见顶'),colorFF00;
 DRAWTEXT((((趋势触发器 = 2) AND (极限触发器 <= 1)) AND (周期触发器 = 1)),5,'启动'),colorFF;
 DRAWTEXT(((趋势触发器 = 1) AND (极限触发器 = 7)),6,'冰点\n注意'),colorFF;
 DRAWTEXT((((趋势触发器 = 1) AND (极限触发器 = 8)) AND (周期触发器 = (0 - 1))),6,'极冰\n三日\n见底'),colorFF00FF;
 DRAWTEXT((((趋势触发器 = 1) AND (极限触发器 <= 1)) AND (周期触发器 = (0 - 1))),6,'变盘'),color808080;
 EXPLAINEX((极限触发器 > (0 - 1)),'极限触发器=',极限触发器,1,0),colorFFFF;
 EXPLAINEX((极限触发器 > (0 - 1)),'周期触发器=',周期触发器,1,0),colorFF;
 EXPLAINEX((极限触发器 > (0 - 1)),'趋势触发器=',趋势触发器,1,0),colorFF00FF;
 EXPLAIN(((((趋势触发器 = 2) AND (周期触发器 = (0 - 1))) AND (极限触发器 > REF(极限触发器,1))) AND (CLOSE > REF(CLOSE,1))),'§中期多头,短期空头,强势上涨。'),colorFF;
 EXPLAIN(((((趋势触发器 = 2) AND (周期触发器 = (0 - 1))) AND (极限触发器 <= REF(极限触发器,1))) AND (CLOSE > REF(CLOSE,1))),'§中期多头,短期空头,涨势已弱。'),colorFF00FF;
 EXPLAIN(((((趋势触发器 = 2) AND (周期触发器 = (0 - 1))) AND (极限触发器 > REF(极限触发器,1))) AND (CLOSE <= REF(CLOSE,1))),'§中期多头,短期空头,强势调整。'),colorFF00;
 EXPLAIN(((((趋势触发器 = 2) AND (周期触发器 = (0 - 1))) AND (极限触发器 <= REF(极限触发器,1))) AND (CLOSE <= REF(CLOSE,1))),'§中期多头,短期空头,调势已弱。'),colorFFFF00;
 EXPLAIN(((((趋势触发器 = 2) AND (周期触发器 = 1)) AND (极限触发器 > REF(极限触发器,1))) AND (CLOSE > REF(CLOSE,1))),'§中期多头,短期多头,强势攀升。'),colorFF;
 EXPLAIN(((((趋势触发器 = 2) AND (周期触发器 = 1)) AND (极限触发器 <= REF(极限触发器,1))) AND (CLOSE > REF(CLOSE,1))),'§中期多头,短期多头,弱势攀升。'),colorFF00FF;
 EXPLAIN(((((趋势触发器 = 2) AND (周期触发器 = 1)) AND (极限触发器 > REF(极限触发器,1))) AND (CLOSE <= REF(CLOSE,1))),'§中期多头,短期多头,强势调整。'),colorFF00;
 EXPLAIN(((((趋势触发器 = 2) AND (周期触发器 = 1)) AND (极限触发器 <= REF(极限触发器,1))) AND (CLOSE <= REF(CLOSE,1))),'§中期多头,短期多头,弱势调整。'),colorFFFF00;
 EXPLAIN(((((趋势触发器 = 1) AND (周期触发器 = (0 - 1))) AND (极限触发器 > REF(极限触发器,1))) AND (CLOSE > REF(CLOSE,1))),'§中期空头,短期空头,强势反弹。'),colorFF;
 EXPLAIN(((((趋势触发器 = 1) AND (周期触发器 = (0 - 1))) AND (极限触发器 <= REF(极限触发器,1))) AND (CLOSE > REF(CLOSE,1))),'§中期空头,短期空头,弱势反弹。'),colorFF00FF;
 EXPLAIN(((((趋势触发器 = 1) AND (周期触发器 = (0 - 1))) AND (极限触发器 > REF(极限触发器,1))) AND (CLOSE <= REF(CLOSE,1))),'§中期空头,短期空头,强势杀跌。'),colorFF00;
 EXPLAIN(((((趋势触发器 = 1) AND (周期触发器 = (0 - 1))) AND (极限触发器 <= REF(极限触发器,1))) AND (CLOSE <= REF(CLOSE,1))),'§中期空头,短期空头,跌势减弱。'),colorFFFF00;
 EXPLAIN(((((趋势触发器 = 1) AND (周期触发器 = 1)) AND (极限触发器 > REF(极限触发器,1))) AND (CLOSE > REF(CLOSE,1))),'§中期空头,短期多头,强势反弹。'),colorFF;
 EXPLAIN(((((趋势触发器 = 1) AND (周期触发器 = 1)) AND (极限触发器 <= REF(极限触发器,1))) AND (CLOSE > REF(CLOSE,1))),'§中期空头,短期多头,弱势反弹。'),colorFF00FF;
 EXPLAIN(((((趋势触发器 = 1) AND (周期触发器 = 1)) AND (极限触发器 > REF(极限触发器,1))) AND (CLOSE <= REF(CLOSE,1))),'§中期空头,短期多头,强势下探。'),colorFF00;
 EXPLAIN(((((趋势触发器 = 1) AND (周期触发器 = 1)) AND (极限触发器 <= REF(极限触发器,1))) AND (CLOSE <= REF(CLOSE,1))),'§中期空头,短期多头,弱势下探。'),colorFFFF00;
 EXPLAIN(((趋势触发器 = 2) AND (极限触发器 = 7)),'★沸点出现,将要调整,追涨谨慎'),colorFFFF00;
 EXPLAIN(((趋势触发器 = 2) AND (极限触发器 = 8)),'★极沸出现,三日见顶,逢高减磅'),colorFF00;
 EXPLAIN((((趋势触发器 = 2) AND (极限触发器 <= 1)) AND (周期触发器 = 1)),'★将要启动,择机跟进,设置止损'),colorFF;
 EXPLAIN((((趋势触发器 = 1) AND (极限触发器 = 7)) AND (周期触发器 = (0 - 1))),'冰点出现,落地开花,翻红跟进,'),colorFF;
 EXPLAIN(((趋势触发器 = 1) AND (极限触发器 = 8)),'¤极冰出现,三日见底,准备抄底。'),colorFF00FF;
 EXPLAIN((((趋势触发器 = 1) AND (极限触发器 <= 1)) AND (周期触发器 = (0 - 1))),'¤可能变盘,方向不定,注意周期。'),colorFF00;


 {公称名称: 83.小天秘密武器A}


 FDPX:=EXTDATA(11);
 ZJPX:=EXTDATA(12);
 LBLD:=EXTDATA(13);
 ZZPX:=EXTDATA(10);
 ZSPX:=EXTDATA(9);
 BK:='A股板块';
STKSUM:=STKCOUNT(BK);
 XT:=STKSUM;
 SJ:=(DATE <= 1051231);
 AAA:=CHECKUSER(1);
 CYC1:=(("xt1@CYC5" * SJ) > 0);
主力雷达:(((CYC1 * (XT - ZZPX)) * 100) / XT),LINETHICK2,colorFF;
市场雷达:(((CYC1 * (XT - ZSPX)) * 100) / XT),LINETHICK2,colorFFFF;
空间雷达:=(((CYC1 * (XT - FDPX)) * 100) / XT);
能量雷达:=(((CYC1 * (XT - ZJPX)) * 100) / XT);
动量雷达:=(((CYC1 * (XT - LBLD)) * 100) / XT);
 TT:=((((主力雷达 > 90) AND (市场雷达 > 90)) AND (能量雷达 > 90)) AND (动量雷达 > 90));
 90,LINEDOT;
 50,LINEDOT;
 10,LINEDOT;
 DRAWTEXT(TT,80,'▲'),colorFF;


 {公称名称: 84.小天秘密武器B}


 SJ:=(DATE <= 1051231);
 AAA:=CHECKUSER(1);
 CYC1:=(("xt1@CYC5" * SJ) > 0);
 FDPX:=EXTDATA(11);
 ZJPX:=EXTDATA(12);
 LBLD:=EXTDATA(13);
 ZZPX:=EXTDATA(10);
 ZSPX:=EXTDATA(9);
 BK:='A股板块';
STKSUM:=STKCOUNT(BK);
 XT:=STKSUM;
主力雷达:=(((CYC1 * (XT - ZZPX)) * 100) / XT);
市场雷达:=(((CYC1 * (XT - ZSPX)) * 100) / XT);
空间雷达:(((CYC1 * (XT - FDPX)) * 100) / XT);
能量雷达:(((CYC1 * (XT - ZJPX)) * 100) / XT),LINETHICK2,colorFF;
动量雷达:(((CYC1 * (XT - LBLD)) * 100) / XT),LINETHICK2,colorFF0000;
 TT:=((((主力雷达 > 90) AND (市场雷达 > 90)) AND (能量雷达 > 90)) AND (动量雷达 > 90));
 90,LINEDOT;
 50,LINEDOT;
 10,LINEDOT;
 DRAWTEXT(TT,80,'▲'),colorFF;


 {公称名称: 85.小天秘密武器C}

 input:P1(5,1,300),P2(10,1,300),P3(20,1,300),P4(60,1,300);
周K:=STKINDI(STKLABEL,'kdj.k',0,7);
周D:=STKINDI(STKLABEL,'kdj.d',0,7);
 VAR1:=(SPLITDATA(1) + SPLITDATA(2));
 CAP:=CLOSE;
 CAP[DATACOUNT]=1;
 FOR    I=DATACOUNT downto 2  DO
 CAP[(I - 1)]=(CAP[I] / (1 + (VAR1[I] / 10)));
 CAPI:=((CAP * CAPITAL) / 100);
 HS:=(VOL / CAPI);
历史流通盘{万股}:=CAPI;
ZF:=(((HIGH - LOW) * 100) / LOW);
 STZF:=(((CLOSE - OPEN) * 100) / OPEN);
 SPZF:=(((CLOSE - LOW) * 100) / LOW);
 STZFB:=(STZF / ZF);
SPZFB:=(SPZF / ZF);
SJ:=(DATE <= 1051231);
 AAA:=CHECKUSER(1);
 CYC1:=(("xt1@CYC5" * SJ) > 0);
最大震幅:=REF(HHV(ZF,5),1);
最小震幅:=REF(LLV(ZF,5),1);
 XZFB:=(ZF / 最大震幅);
DZFB:=(ZF / 最小震幅);
XHSB:=(HS / REF(HHV(HS,4),1));
 DHSB:=(HS / REF(LLV(HS,4),1));
 DY1:=(0 - (5 * (((((STZFB >= 0.48) AND (SPZFB > 0.5)) AND (DZFB > 2)) AND (DHSB > 2)) AND (CLOSE > OPEN))));
 DY2:=(0 - (5 * ((((STZFB >= 0.8) AND (DZFB > 1.5)) AND (DHSB > 1.5)) AND (CLOSE > OPEN))));
 DY3:=(0 - (5 * ((((((STZFB >= 0.82) AND (XZFB > 0.9)) AND (DZFB > 1.5)) AND (XHSB > 0.9)) AND (DHSB > 1.5)) AND (CLOSE > OPEN))));
单阳:=(((DY1 OR DY2) OR DY3) AND (周K > 周D));
 VV:=(单阳 * LOW);
 TS:=(((BARSLAST((单阳 > 0)) + 1) >= 1) AND (BARSLAST((单阳 > 0)) <= 13));
单阳高:=REF(HHV(HIGH,BARSLAST((单阳 > 0))),1);
单阳攻击:=(CROSS(CLOSE,单阳高) AND TS);
强势攻击:=IF(((单阳 = 1) AND (单阳攻击 = 1)),1,0);
单阳低点:=REF(LOW,BARSLAST(VV));
单阳不破:=(TS AND (LOW >= 单阳低点));
时间:=IF((LOW >= 单阳低点),BARSLAST((单阳 < 0)),0);
单阳启稳:=((CROSS(HS,ZF) AND (CLOSE > OPEN)) AND TS);
单阳1:=((单阳攻击 OR 单阳) OR 单阳启稳);
成本:=DMA(((AMOUNT / VOL) / 100),(HS / 100));
成本1:=DMA(((AMOUNT / VOL) / 100),((0.8 * HS) / 100));
单阳出水:=(((CYC1 * ((((成本 > 成本1) AND (CLOSE > 成本)) AND (LOW < 成本1)) AND 单阳1)) OR ((((成本 < 成本1) AND (CLOSE > 成本1)) AND (LOW < 成本)) AND 单阳1)) OR ((CROSS(CLOSE,成本) OR CROSS(CLOSE,成本1)) AND 单阳1));
 STICKLINE(((CLOSE >= OPEN) AND (单阳出水 = 1)),CLOSE,OPEN,8,0),colorFF;
 STICKLINE(((CLOSE >= OPEN) AND (单阳出水 = 1)),CLOSE,OPEN,4,0),colorB0B0FF;
 STICKLINE(((CLOSE >= OPEN) AND (单阳出水 = 1)),CLOSE,OPEN,2,0),colorFFFF;
 STICKLINE(((CLOSE >= OPEN) AND (单阳出水 = 1)),HIGH,LOW,0,0),colorFFFF;

 

 ☟问题反馈 ☞┄┄┄┄┄┄┄┄┄┄→收藏资源:

小天特色指标源码

  • 下载资源所需积分

    0

  • 当前拥有积分

    0

上传会员: 
股海网
文件大小: 
Bytes
上传时间: 
2015-11-09
下载积分: 
-
免责声明: 
请仔细阅读并同意后才能下载
本附件为用户分享上传,股海网没有对文件进行验证,不能保证下载资源的准确性、安全性和完整性,也不保证下载资源能正常安装和使用,且下载后扣除的积分无法退还,除非您充分理解并完全接受本声明,否则您无权下载。
本站对提供下载的软件、指标、资料等不拥有任何权利,其版权归该下载资源的合法拥有者所有。本附件仅供学习和研究使用,不得用于商业或者非法用途,如有侵犯您的版权, 请参看 《股海网侵权处理流程》《股海网免责声明条款》
点击下载无反应时,更换主流浏览器重新登录操作,如360浏览器、Edge浏览器、谷歌浏览器,个别浏览器有不兼容现象。
勾选以下表示您已经阅读并同意以上声明才能下载本文件,扣除积分无法退还!
我已阅读所有条款规定, 请点我同意 所有条款内容!我自愿下载!
提示:如下载失败,请点关闭刷新此页面或提交问题反馈给管理员→
关闭

关于我们 - 联系我们 - 隐私政策 - 免责声明 - 下载帮助 - 广告合作 - SiteMap - TOP
增值电信业务经营ICP许可证:湘B2-20210269 湘ICP备09016573号-10 湘公网安备43108102000040号
Copyright © 2021 铭网科技,All Rights Reserved.