大牛高手寻牛有牛,趋势掘金, 无需排序看长做短 滚动做T有序而行通达信指标
指标一主图二副图
主图为筹码峰
裸k线异动k线标记
副图1可根据方格判断个股处于持股还是超强等或者其他
位
置副图2CCI周期
主图源码
参数 X 2 16 4
RC:=REF(C,1);
KC:=IF(CODELIKE('68'),1,0);
CY:=IF(CODELIKE('30'),1,0)*IF(DATETODAY(DATE)-DATETODAY(1200824)>=0,1,0);
BJ:=IF(CODELIKE('83'),1,0)+IF(CODELIKE('87'),1,0)+IF(CODELIKE('43'),1,0)+IF(CODELIKE('9'),1,0);
ZT30:=IF(BJ>0,ZTPRICE(RC,0.30),0);
ZT20:=IF(KC>0 OR CY>0,ZTPRICE(RC,0.20),0);
ZT10:=IF((ZT30=0 OR ZT30=DRAWNULL) AND (ZT20=0 OR ZT20=DRAWNULL),ZTPRICE(RC,0.10),0);
ZTXX:=MAX(MAX(IF(ZT10=DRAWNULL,0,ZT10),IF(ZT20=DRAWNULL,0,ZT20)),IF(ZT30=DRAWNULL,0,ZT30));
ZTNN:=IF(ZTXX=ZT10,1.10,IF(ZTXX=ZT20,1.20,IF(ZTXX=ZT30,1.30,0)));
GPC:=IF(INTPART(FINANCE(37))>0 AND FRACPART(FINANCE(37))=0,1,0);
ZTB:=IF(C<=H AND BETWEEN(H/REF(C,1),ZTNN*0.99,ZTNN*1.01),1,0);
DPX:=IF(H/REF(C,1)>=IF(ZTNN>1.15,1.075,1.050),1,0);
{背景输出}
LGB:=IF(GPC=1,LLV(L,120),DRAWNULL);
HGB:=IF(GPC=1,HHV(H,120),DRAWNULL);
DRAWGBK(H>=L,RGB(4,8,16),RGB(4,8,16),0,0,0);
DRAWBAND(MAX(LGB*1.8,HGB),RGB(4,8,16),IF(GPC=1,LGB,DRAWNULL),RGB(4,8,16));
{像素定义}
MH1:=EMA(MAX(C,O),2);
ML1:=MIN(MAX(EMA(MIN(C,O),5),MH1*0.96),MH1*0.98);
VX1:=IF(DMA(V,0.5)>=SUM(V,60)*POW(0.1,3)*X AND (MH1=HHV(MH1,2) OR REF(ML1,1)=LLV(ML1,3)),1,0);
VR1:=IF(VX1=1 AND ABS(MH1/REF(REF(MH1,BARSLAST(VX1=1)),1)-1)>=0.01,1,0);
VH1:=VALUEWHEN(VR1=1,MH1);
MH1A:=IF(VH1=REF(VH1,1),VH1,DRAWNULL);
MH1B:=VALUEWHEN(REF(MH1A,1)!=MH1A AND REF(MH1A,1)!=DRAWNULL,REF(MH1A,1));
MH1C:=VALUEWHEN(REF(MH1B,1)!=MH1B AND REF(MH1B,1)!=DRAWNULL,REF(MH1B,1));
VL1:=VALUEWHEN(VR1=1,ML1);
ML1A:=IF(VH1=REF(VH1,1),VL1,DRAWNULL);
ML1B:=VALUEWHEN(REF(MH1A,1)!=MH1A AND REF(MH1A,1)!=DRAWNULL,REF(ML1A,1));
ML1C:=VALUEWHEN(REF(MH1B,1)!=MH1B AND REF(MH1B,1)!=DRAWNULL,REF(ML1B,1));
MH2:=EMA(MAX(C,O),2);
ML2:=MIN(MAX(EMA(MIN(C,O),5),MH2*0.95),MH2*0.98);
VX2:=IF(DMA(V,0.5)>=SUM(V,60)*POW(0.1,3)*2*X AND (MH2=HHV(MH2,2) OR REF(ML2,1)=LLV(ML2,3)),1,0);
VR2:=IF(VX2=1 AND ABS(MH2/REF(REF(MH2,BARSLAST(VX2=1)),1)-1)>=0.01,1,0);
VH2:=VALUEWHEN(VR2=1,MH2);
MH2A:=IF(VH2=REF(VH2,1),VH2,DRAWNULL);
MH2B:=VALUEWHEN(REF(MH2A,1)!=MH2A AND REF(MH2A,1)!=DRAWNULL,REF(MH2A,1));
MH2C:=VALUEWHEN(REF(MH2B,1)!=MH2B AND REF(MH2B,1)!=DRAWNULL,REF(MH2B,1));
VL2:=VALUEWHEN(VR2=1,ML2);
ML2A:=IF(VH2=REF(VH2,1),VL2,DRAWNULL);
ML2B:=VALUEWHEN(REF(MH2A,1)!=MH2A AND REF(MH2A,1)!=DRAWNULL,REF(ML2A,1));
ML2C:=VALUEWHEN(REF(MH2B,1)!=MH2B AND REF(MH2B,1)!=DRAWNULL,REF(ML2B,1));
MH3:=EMA(MAX(C,O),2);
ML3:=MIN(MAX(EMA(MIN(C,O),5),MH3*0.94),MH3*0.99);
VX3:=IF(DMA(V,0.5)>=SUM(V,60)*POW(0.1,3)*4*X AND (MH3=HHV(MH3,2) OR REF(ML3,1)=LLV(ML3,3)),1,0);
VR3:=IF(VX3=1 AND ABS(MH3/REF(REF(MH3,BARSLAST(VX3=1)),1)-1)>=0.01,1,0);
VH3:=VALUEWHEN(VR3=1,MH3);
MH3A:=IF(VH3=REF(VH3,1),VH3,DRAWNULL);
MH3B:=VALUEWHEN(REF(MH3A,1)!=MH3A AND REF(MH3A,1)!=DRAWNULL,REF(MH3A,1));
MH3C:=VALUEWHEN(REF(MH3B,1)!=MH3B AND REF(MH3B,1)!=DRAWNULL,REF(MH3B,1));
VL3:=VALUEWHEN(VR3=1,ML3);
ML3A:=IF(VH3=REF(VH3,1),VL3,DRAWNULL);
ML3B:=VALUEWHEN(REF(MH3A,1)!=MH3A AND REF(MH3A,1)!=DRAWNULL,REF(ML3A,1));
ML3C:=VALUEWHEN(REF(MH3B,1)!=MH3B AND REF(MH3B,1)!=DRAWNULL,REF(ML3B,1));
{像素绘制}
STICKLINE(GPC=1,MH3C,ML3C,8,0),COLOR100804;
STICKLINE(GPC=1,MH2C,ML2C,8,0),COLOR140A05;
STICKLINE(GPC=1,MH1C,ML1C,8,0),COLOR180C06;
STICKLINE(GPC=1,MH3B,ML3B,8,0),COLOR180C06;
STICKLINE(GPC=1,MH2B,ML2B,8,0),COLOR1E0F07;
STICKLINE(GPC=1,MH1B,ML1B,8,0),COLOR241209;
STICKLINE(GPC=1,MH3A,ML3A,8,0),COLOR28140A;
STICKLINE(GPC=1,MH2A,ML2A,8,0),COLOR32190C;
STICKLINE(GPC=1,MH1A,ML1A,8,0),COLOR3C1E0F;
{K线绘制}
XGR:=IF(BARSLAST(DPX>0)<5,1,0);
KX0:=IF(C<O OR (C=O AND C<=REF(C,1)),1,0);
KX1:=IF(C>O OR (C=O AND C>=REF(C,1)),1,0);
STICKLINE(KX0=1,H,L,0,0),COLOR60C000;
STICKLINE(KX0=1,C,O,2,0),COLOR60C000;
STICKLINE(KX1=1,H,L,0,0),COLOR8000FF;
STICKLINE(KX1=1,C,O,2,1),COLOR8000FF;
STICKLINE(GPC=1 AND DPX=0,H,L,0,0),COLOR906030;
STICKLINE(GPC=1 AND DPX=0 AND KX0=1,C,O,2,0),COLORA87038;
STICKLINE(GPC=1 AND DPX=0 AND KX1=1,C,O,2,1),COLORA87038;
STICKLINE(GPC=1 AND ZTB=1 AND ZTNN>1.08,H,L,0,0),COLOR40FFFF;
STICKLINE(GPC=1 AND ZTB=1 AND ZTNN>1.08 AND KX0=1,C,O,2,0),COLOR40FFFF;
STICKLINE(GPC=1 AND ZTB=1 AND ZTNN>1.08 AND KX1=1,C,O,2,1),COLOR40FFFF;
{信息补充}
DRAWTEXT_FIX(IF(GPC=1,1,0)=1,0,0,0,STRCAT(STRCAT(STRCAT(HYBLOCK,'+'),DYBLOCK),STRCAT('+',STRCAT(GNBLOCK,STRCAT('+',FGBLOCK))))),COLOR606000;
DRAWTEXT_FIX(IF(GPC=1,1,0)=1,0,0,0,STRCAT(STRCAT(STRCAT(HYBLOCK,'+'),DYBLOCK),STRCAT('+',GNBLOCK))),COLORC0C000;
DRAWTEXT_FIX(IF(GPC=1,1,0)=1,0,0,0,HYBLOCK),COLORFFFFFF;
DRAWTEXT_FIX(IF(GPC=1,1,0)=1,0,0,0,'&异动K线标记+筹码峰像素块+触及非主板ST涨停标记(可能存在误差)'),COLORC06000;
副图1
STICKLINE(CLOSE,0.5,36.5,4,1),COLORWHITE;
STICKLINE(CLOSE,0.5,32.5,4,1),COLORWHITE;
STICKLINE(CLOSE,0.5,28.5,4,1),COLORWHITE;
STICKLINE(CLOSE,0.5,24.5,4,1),COLORWHITE;
STICKLINE(CLOSE,0.5,20.5,4,1),COLORWHITE;
STICKLINE(CLOSE,0.5,16.5,4,1),COLORWHITE;
STICKLINE(CLOSE,0.5,8.5,4,1),COLORWHITE;
STICKLINE(CLOSE,0.5,4.5,4,1),COLORWHITE;
总市值【亿】:FINANCE(39)/100000000,NODRAW;
成交金额【万】:AMOUNT/10000,VOLSTICK,NODRAW;
主动买入:LARGEINTRDVOL*10000/FINANCE(7)*10000,NODRAW,COLORRED;
主动卖出:LARGEOUTTRDVOL*10000/FINANCE(7)*10000,NODRAW,COLORWHITE;
净流入:主动买入-主动卖出,NODRAW;
净流比:主动买入/主动卖出,NODRAW;
竞价手:=DYNAINFO(15)/DYNAINFO(4)/100;
竞流比80:(竞价手/FINANCE(46))*1000000,NODRAW;
主力净额:DYNAINFO(100)/10000,NODRAW;
GZX:=MA("KDJ.J#WEEK"(9,3,3),5);
VAR26:=EMA(CLOSE,3)-EMA(CLOSE,144);
VAR27:=EMA(VAR26,55);
WD1:=(CLOSE*2+HIGH+LOW)/4*10;
WD2:=EMA(WD1,13)-EMA(WD1,34);
VAR28:=2*(VAR26-VAR27);
A1:=(CLOSE-MA(CLOSE,34))/MA(CLOSE,34)*100;
VAR13:=(MA(C,1)+MA(C,3)+MA(C,5)+MA(C,7)+MA(C,9))/5;
VAR14:=(MA(C,2)+MA(C,4)+MA(C,6)+MA(C,8)+MA(C,10))/5;
VAR16:=MAX(EMA(VAR13,2)-EMA(VAR14,5),0)*200;
VAR17:=EMA(VAR16,5)*10;
ZJJK1:=DMA((HIGH+LOW+CLOSE*2)/4,0.9);ZJJK2:=REF(EMA(ZJJK1,3),1);
ZJJK3:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
STICKLINE(VAR28>=REF(VAR28,1),9.5,11.5,2.5,0),COLORFF80FF;
ZWC3:=VAR16,NODRAW;
DRAWTEXT(VAR16>0 AND VAR16>REF(VAR16,1),12,VAR2STR(ZWC3,0)),COLORWHITE,DRAWABOVE;
ZWC4:=VAR17,NODRAW;
CO2:=(C+O)/2;
K2:=KDJ.K#WEEK>KDJ.D#WEEK;
R2:=RSI.RSI1#WEEK>RSI.RSI2#WEEK;
M2:=MACD.DIF#WEEK>MACD.DEA#WEEK;
STICKLINE(VAR17>REF(VAR17,1),9,12,3.5,0)COLORRED;
DRAWTEXT(VAR17>=REF(VAR17,1),9,VAR2STR(ZWC4,0)),COLORWHITE,DRAWABOVE;
VAR13A:=IF(YEAR>=2005 AND MONTH>=11 AND DAY>=1,0,1);
AA:=(MA(C,1)+MA(C,3)+MA(C,5)+MA(C,7)+MA(C,9))/5;
BB:=(MA(C,2)+MA(C,4)+MA(C,6)+MA(C,8)+MA(C,10))/5;
VAR14A:=MAX(EMA(AA,2)-EMA(BB,5),0)*300;
VAR15A:=EMA(VAR14A,5);
SS:=EMA(VAR15A,2);
BLXS:=VAR15A*VAR13A,STICK,COLORFF00FF;
BLXSA:=VAR15A*VAR13A,STICK,COLORFF00FF;
STICKLINE(VAR15A>REF(VAR15A,1) AND VAR13A,22,23,3.5,0),COLORFF80FF;
ZWC2:=BLXS,NODRAW;
STICKLINE(VAR15A>REF(VAR15A,1) AND VAR13A,21,24,3.5,0),COLORFF0080;
DRAWTEXT(VAR15A>REF(VAR15A,1) AND VAR13A,21,VAR2STR(ZWC2,0)),COLORWHITE,DRAWABOVE;
EE:=REF(C,1);
F15A:=MAX(MA(C,5),MA(C,10));
F15B:=MIN(MA(C,5),MA(C,10));
FF:=SMA(MAX(C-EE,0),5,1)/SMA(ABS(C-EE),5,1)*100;
DRAWICON(CROSS(80,FF) AND VAR13,23,2);
STICKLINE(K2 AND R2 AND M2,1,4,0,0),COLORFF00FF;
STICKLINE(K2 AND R2 AND M2,1,4,3,0),COLORFF00FF;
DRAWICON((R2 AND M2) AND REF(NOT(R2 AND M2),1),1,11);
STICKLINE((R2 AND M2) AND REF(NOT(R2 AND M2),1),1,4,1,0),COLORFF0080;
STICKLINE((K2 AND R2 AND M2) AND REF(NOT(K2 AND R2 AND M2),1),1,4,3,0),COLORFF0000;
DRAWICON((K2 AND R2 AND M2) AND REF(NOT(K2 AND R2 AND M2),1),4,25);
STICKLINE(NOT(K2 AND R2 AND M2) AND REF(K2 AND R2 AND M2,1),1,4,3,0),COLOR00FF00;
DRAWICON(NOT(K2 AND R2 AND M2) AND REF(K2 AND R2 AND M2,1),4,27);
STICKLINE((K2 AND R2) AND NOT(K2 AND R2 AND M2),1,4,0,0),COLOR0000FF;
STICKLINE((K2 AND R2) AND NOT(K2 AND R2 AND M2),1,4,3,0),COLOR0000FF;
DRAWICON((K2 AND R2) AND REF(NOT(K2 AND R2),1) AND NOT(K2 AND R2 AND M2),4,9);
STICKLINE(NOT(K2 AND R2) AND REF(K2 AND R2,1),1,4,1,0),COLORFFFF00;
R3:=RSI.RSI1#MONTH>RSI.RSI2#MONTH;
M3:=MACD.DIF#MONTH>MACD.DEA#MONTH;
VBR14:=MA((LLV(L,45)-C)/(HHV(H,45)-LLV(L,45))*100,3);
STICKLINE((R3 AND M3) AND REF(NOT(R3 AND M3),1),1,4,2,0),COLORFF0080;
DRAWTEXT((K2 AND R2) AND REF(NOT(K2 AND R2),1) AND NOT(K2 AND R2 AND M2),1,'●建仓'),COLORYELLOW;
VAR1:=EMA(EMA(CLOSE,9),9);
KPA:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*8000;
A10:=CROSS(KPA,0);
STICKLINE(KPA>REF(KPA,1) AND KPA>0,5,8,3.5,0),COLORRED;
VAR2:=100*WINNER(CLOSE*0.95);
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND KPA>0,5,8,3,0),COLOR004080;
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND KPA>0,5,8,2,0),COLORFF0080;
JSP:=IF(A10,5,0),LINETHICK1,COLOR00FFFF,NODRAW;
STICKLINE(JSP>0,6,6.5,1,0),COLOR00FFFF;
ZWC5:=KPA,NODRAW;
DRAWTEXT(KPA>0,5,VAR2STR(ZWC5,0)),COLORWHITE,DRAWABOVE;
VBR25:=C/MA(C,60)-1;
STICKLINE(VAR16>0 AND VAR16>REF(VAR16,1),12,16,3.5,0)COLORRED;
STICKLINE(A1>=REF(A1,1),12.5,15.5,2.5,0),COLORFF0080;
WD3:=EMA(WD2,5);
WD4:=2*(WD2-WD3)*5.5;
ZLXD:=WD4*5,COLORYELLOW,LINETHICK2 DOTLINE,LINETHICK1;
STICKLINE(ZLXD>=REF(ZLXD,1),29,32,3.5,0),COLORRED;
TB:=STICKLINE(ZLXD>=REF(ZLXD,1),29,32,3.5,0),COLORRED;
DRAWICON(TB,32,42);
ZJJK4:=IF(CLOSE>OPEN,ZJJK3*(HIGH-LOW),IF(CLOSE<OPEN,ZJJK3*(HIGH-OPEN+(CLOSE-LOW)),VOL/2))+IF(CLOSE>OPEN,0-ZJJK3*(HIGH-CLOSE+(OPEN-LOW)),IF(CLOSE<OPEN,0-ZJJK3*(HIGH-LOW),0-VOL/2));
ZJJK5:=VOL/CAPITAL;
WC7:=ZLXD,NODRAW;
DRAWTEXT(ZLXD>=REF(ZLXD,1),29,VAR2STR(WC7,0)),COLORBLACK,DRAWABOVE;
VAA1:=GZX,COLORRED;
ZJJK6:=IF(ZJJK5>10,10,ZJJK5);
ZJJK7:=ZJJK4/20/1.15;
ZJJK8:=ZJJK7*0.55+REF(ZJJK7,1)*0.33+REF(ZJJK7,2)*0.22;
ZJJK9:=EMA(ZJJK8,8);
ZJJK10:=EMA(ZJJK8,3);
ZJJE:=(ZJJK7*0.4-ZJJK10*0.4)*C/60000;
CJE:=AMOUNT/100000000;
SZ:=CLOSE*CAPITAL/1000000,NODRAW;
ZJLZB:=ZJJE*100/SZ;
ZJCJB:=ZJJE*100/CJE;
JZ1:=ZJJE>0.4 AND ZJLZB>0.6 AND ZJCJB>15 AND SZ<50;
JZ2:=ZJJE>0.6 AND ZJLZB>0.4 AND ZJCJB>15 AND SZ>50;
JZ3:=ZJJE>0.6 AND ZJLZB>0.9 AND ZJCJB>18 AND SZ<50;
JZ4:=ZJJE>0.8 AND ZJLZB>0.6 AND ZJCJB>20 AND SZ>50;
JZ5:=(JZ1 OR JZ2)*5,COLORRED;
JZ6:=JZ3 OR JZ4;
DRAWTEXT((R3 AND M3) AND REF(NOT(R3 AND M3),1),1,'--中长'),COLORFF0080;
DRAWTEXT((K2 AND R2 AND M2) AND REF(NOT(K2 AND R2 AND M2),1),4,'●买点'),COLORRED;
DRAWTEXT(NOT(K2 AND R2 AND M2) AND REF(K2 AND R2 AND M2,1),1,'●获利了结'),COLOR408000;
STICKLINE(JZ1 OR JZ2,6,7,3,0),COLORMAGENTA;
DRAWTEXT(JZ1 OR JZ2 OR JZ4,6,'JZ进'),COLORYELLOW;
HGW1:=(C-REF(LLV(L,15),3))/(REF(HHV(H,15),3)-REF(LLV(L,15),3))*100;
HGW2:=SMA(HGW1,3.1,1);
STICKLINE(C>F15A,33,36,3,0),COLORRED,LINETHICK2;
STICKLINE(C>=F15B AND C<=F15A,33,36,3,0),COLORYELLOW,LINETHICK2;
VAR1W:=EMA(CLOSE,12)-EMA(CLOSE,26);
VAR18:=EMA(VAR1W,9);
VAR19:=2000* (2*(VAR1W-VAR18))/EMA(C,30);
冲刺红柱:=IF(VAR19>=0,VAR19,DRAWNULL),COLORRED,NODRAW;
STICKLINE(VAR19>=0 AND VAR19>REF(VAR19,1),33.5,35.5,2,0),COLORFF0080;
O1:=(SUM(EMA((CLOSE+LOW)/2,1)/3,3)),COLOR00FFFF,LINETHICK2;
白:=IF(VAA1>REF(VAA1,1) AND REF(VAA1,1)<REF(VAA1,2),1,DRAWNULL);
F1A:=MAX(MA(O1,5),MA(O1,10));
F1B:=MIN(MA(O1,5),MA(O1,10));
STICKLINE(C>F1A,34,35,1,0),COLORRED,LINETHICK2;
STICKLINE(C>=F1B AND C<=F1A,34,35,1,0),COLORYELLOW,LINETHICK2;
VAR1A:=EMA(EMA(CLOSE,9),9);
KKP:=(VAR1A-REF(VAR1A,1))/REF(VAR1A,1)*8000;
A10A:=CROSS(KKP,0);
AAA:=(3*CLOSE+OPEN+HIGH+LOW)/6;
MA12:=EMA(AAA,12);
MA36:=EMA(AAA,36);
MA108:=EMA(AAA,108);
MA250:=EMA(AAA,250);
MMX:=ZIG(3,10);
MX:=MA(MMX,2);
SEL:=CROSS(MX,MMX);
DRAWTEXT(SEL,34,'●建议了结'),COLOR00FF00;
KP:(EMA(AAA,6)-REF(EMA(AAA,18),1))/REF(EMA(AAA,18),1)*100+55,NODRAW;
STICKLINE( KP>=50 AND KP>REF(KP,1),17,20,3,0),COLOR0080FF;
STICKLINE( KP>=60 AND KP>REF(KP,1),17.5,19.5,2.5,0),COLORRED;
STICKLINE( KP>=80 AND KP>REF(KP,1),18,19,2,0),COLORMAGENTA;
VAR2A:=100*WINNER(CLOSE*0.95);
STICKLINE(VAR2A>50 AND COST(85)<CLOSE AND KKP>0,17,20,2,0),COLORYELLOW;
STICKLINE(VAR2A>50 AND COST(85)<CLOSE AND KKP>0,17,20,1.5,0),COLORFF0080;
ZWC8:=KP,NODRAW;
DRAWTEXT(KP>REF(KP,1) AND KP>0,17,VAR2STR(KP,1)),COLORBLACK,DRAWABOVE;
M3A:=EMA(HIGH,3)*1.03;
YZJL:=CROSS(C,M3A) AND (C-REF(C,1))/REF(C,1) > 0.04;
DRAWTEXT(YZJL,18, '★短介入'),COLORYELLOW;
STICKLINE(VAA1>REF(VAA1,1),25,28,3,0)COLORRED;
STICKLINE(白,26,27,2,0),COLORWHITE;
DRAWTEXT(CROSS(GZX,5),26,'建仓'),COLORYELLOW;
HGW3:=SMA(HGW2,3.1,1);
TS:=(HGW2*HGW2+HGW3*HGW3)/100,COLORYELLOW,LINETHICK2;
STICKLINE(TS>0 AND TS>REF(TS,1),26,27,1,0),COLORYELLOW;
清仓:=CROSS(VBR14,-95) AND VBR25>=0.35,NODRAW,COLORWHITE;
DRAWTEXT(CROSS(GZX,50),26,'加仓'),COLORYELLOW;
DRAWTEXT(清仓,26,'★清仓'),COLORBLUE;
DRAWTEXT(ISLASTBAR=1,6,' 强资'),COLORLIMAGENTA;
DRAWTEXT(ISLASTBAR=1,13,' 短买'),COLORLIMAGENTA;
DRAWTEXT(ISLASTBAR=1,2.5,' 短中'),COLORLIMAGENTA;
DRAWTEXT(ISLASTBAR=1,22.5,' 超强'),COLORLIMAGENTA;
DRAWTEXT(ISLASTBAR=1,18.5,' KP能量'),COLORLIMAGENTA;
DRAWTEXT(ISLASTBAR=1,26.5,' 持股'),COLORLIMAGENTA;
副图2
M200:=185;{原200}M150:=175;{M100:=100;}CCI周:"CCI.CCI#WEEK",COLORYELLOW,LINETHICK3;CCI月:"CCI.CCI#MONTH",COLORRED,LINETHICK3;WR周:"WR.WR1#WEEK",COLORGREEN,LINETHICK3;WR月:"WR.WR1#MONTH",COLORBLUE,LINETHICK3;DRAWBAND(CCI周,RGB(100,10,0),200,RGB(0,10,100));DRAWBAND(CCI周,RGB(255,0,0),200,RGB(0,0,255));DRAWBAND(CCI周,RGB(255,55,0),CCI月,RGB(0,55,255));DRAWBAND(WR周,RGB(0,0,100),25,RGB(100,0,0));DRAWBAND(WR月,RGB(0,55,155),WR周,RGB(250,0,0));DRAWBAND(WR周,RGB(0,55,155),WR月,RGB(250,0,0));DRAWBAND(WR月,RGB(0,200,200),25,RGB(250,0,0));{底红条+上红条=波段拐点起爆区域}DRAWBAND(CCI月,RGB(155,0,0),200,RGB(0,0,155));CCI周,COLORYELLOW,LINETHICK3;CCI月,COLORRED,LINETHICK3;WR周,COLORGREEN,LINETHICK3;WR月,COLORBLUE,LINETHICK3;DRAWTEXT(CROSS(CCI周,200),80,'★'),COLORRED;DRAWTEXT(CROSS(CCI月,200),86,'★'),COLORYELLOW;DRAWTEXT(CROSS(25,WR周),92,'★'),COLORMAGENTA;DRAWTEXT(CROSS(25,WR月),98,'★'),COLORGREEN;{COLOR000080;暗红色}MA5:=MA(C,5);MA20:=MA(C,20);A51:= REF(MA5,1)*0.98;A52:= REF(MA5,2)*0.98;B52:= BARSLAST(REF(C,2)>=REF(MA5,2) AND REF(C,1)<REF(MA5,1))+2;B51:= BARSLAST(REF(C,2)>=REF(MA5,2) AND REF(C,1)<REF(MA5,1))+1;DZ:=IF((REF(C,2)>=REF(MA5,2)) AND (REF(C,1)<REF(MA5,1)),IF(REF(MA5,2)<REF(MA5,1),A51,A52),IF(BARSSINCE(REF(C,2)>=REF(MA5,2) AND REF(C,1)<REF(MA5,1))>0,IF(REF(MA5, B52)< REF(MA5, B51),REF(MA5,B51)*0.98, REF(MA5,B52)*0.98), REF(MA5,1)));A201:= REF(MA20,1)*0.98;A202:= REF(MA20,2)*0.98;B202:=BARSLAST(REF(C,2)>=REF(MA20,2) AND REF(C,1)<REF(MA20,1))+2;B201:= BARSLAST(REF(C,2)>=REF(MA20,2) AND REF(C,1)<REF(MA20,1))+1;ZZ:=IF((REF(C,2)>=REF(MA20,2)) AND (REF(C,1)<REF(MA20,1)),IF(REF(MA20,2)<REF(MA20,1),A201,A202),IF(BARSSINCE(REF(C,2)>=REF(MA20,2) AND REF(C,1)<REF(MA20,1))>0,IF(REF(MA20, B202)< REF(MA20, B201),REF(MA20,B201)*0.98, REF(MA20,B202)*0.98), REF(MA20,1)));短止:=DZ,COLORWHITE,LINETHICK2;紫线:=ZZ,COLORMAGENTA;绿线:=LLV(REF(LOW,1),2)+(HHV(REF(HIGH,1),2)-LLV(REF(LOW,1),2))/2,COLORGREEN;黄线:=MA(CLOSE,25)+MA(CLOSE,25)*6/100,COLORYELLOW,LINETHICK2;白轨:=MA(CLOSE,25)+MA(CLOSE,25)*20/100,COLORWHITE;影子线:=MA(CLOSE,25)+MA(CLOSE,25)*13/100,COLORGRAY;AXX:=((((MA(C,10) > MA(C,25)) && CROSS(C,MA(C,5))) && (V > MA(V,10))) && (MA(C,10) > REF(MA(C,10),1)));ASS:=C>=黄线 AND AXX ;角度黄线:=ATAN((黄线/REF(黄线,1)-1)*100)*180/3.1416,NODRAW;涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0);N:=12;DG:=1.2;YLX:=0;ZCX:=0;A1:=REF(C,N)=HHV(C,2*N+1); B1:=FILTER(A1,N);A2:=REF(C,N)=LLV(C,2*N+1);B2:=FILTER(A2,N);左侧获利比例:=WINNER(C)*100,NODRAW,COLORRED;DRAWTEXT_FIX(1,0.80,0.005,0,STRCAT(STRCAT('左侧获利比例 ',CON2STR(左侧获利比例,0)),' %')),COLORYELLOW;板块排序:=HORCALC('板块指数',105,1,0),NODRAW,COLORRED;BIAS:=(O-黄线)/黄线*100,NODRAW,COLORRED;倍量:=(V/REF(V,1)>=1.90 AND COUNT(C>O,1)) OR (L>REF(H,1) AND COUNT(O>C,1) AND V/REF(V,1)>=1.90);{板块排名}TAX:=HORCALC(HYBLOCK,105,1,DRAWNULL);TAA:=STRCAT(HYBLOCK,' ? ? ?排名 ：');DRAWTEXT_FIX(ISLASTBAR,0.26,0.008,0,STRCAT(TAA,CON2STR(TAX,0)));TOTAL:=IF(PERIOD=1,5,IF(PERIOD=2,15,IF(PERIOD=3,30,IF(PERIOD=4,60,IF(PERIOD=5,TOTALFZNUM,1)))));MTIME:=MOD(FROMOPEN,TOTAL);CTIME:=IF(MTIME<0.5,TOTAL,MTIME);初起:=CROSS(CCI周,WR月);STICKLINE(初起,58,15,0.00001,0),COLORBROWN;DRAWTEXT(初起,55,'-初起'),COLORWHITE;准备起爆2:=CROSS(CCI月,M150);STICKLINE(准备起爆2,148,35,0.00001,0),COLORBROWN;DRAWTEXT(准备起爆2,148,'-拐点'),COLORCYAN;准备起爆3:=CROSS(CCI周,M150);STICKLINE(准备起爆3,377,200,0.00001,0),COLORWHITE;DRAWTEXT(准备起爆3,318,'-拐点起爆'),COLORWHITE;准备起爆1:=CROSS(CCI月,CCI周);STICKLINE(准备起爆1,134,0,0.1,0),COLORBLUE;DRAWTEXT(准备起爆1,134,'-拐点起爆'),COLORYELLOW;准备起爆4:=CROSS(CCI周,WR周);STICKLINE(准备起爆4,134,0,0.00001,0),COLORMAGENTA;DRAWTEXT(准备起爆4,148,'-左侧潜伏'),COLORYELLOW;右侧交易:=CROSS(CCI周,M200);STICKLINE(右侧交易,200,280,0.001,0),COLORMAGENTA;DRAWTEXT(右侧交易,240,'-右侧交易'),COLORYELLOW;{右拐点}右拐点:=CROSS(CCI月,CCI周);STICKLINE(右拐点,200,280,0.00001,0),COLORCYAN;DRAWTEXT(右拐点,278,'-右侧买卖'),COLORCYAN;上线:=SMA(C,6.5,1);下线:=SMA(C,13.5,1);上线1:=SMA(C,3,1);下线1:=SMA(C,8,1);BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;UPR:=BBI+3*STD(BBI,13);DWN:=BBI-3*STD(BBI,13);安全:=MA(CLOSE,60);LC:=REF(CLOSE,1);RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;XG:CROSS(上线,下线);
