小天特色指标源码
-
相关简介:{公称名称: 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小天趋势至上}
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;