{筹码异动洗盘主图源码如下}
MA5:MA(C,5);
MA10:MA(C,10);
MA20:MA(C,20);
ZT:=C/REF(C,1)>1.097;
XH:=FILTER(ZT,13);
BH:=BARSLAST(ZT);
CZ:=REF(H,BH)-REF(L,BH);
WYZB:=BARSLAST(C/REF(C,1)>1.097);
STICKLINE(WYZB=2,L*0.97,L*0.98,6,0),COLORRED;
DRAWTEXT(WYZB=2,L*0.95,'启动'),COLORRED;
STICKLINE(WYZB=4,H*1.03,H*1.02,8,0),COLOR006600;
DRAWTEXT(WYZB=4,H*1.06,'洗盘'),COLORYELLOW;
STICKLINE(WYZB=7,L*0.97,L*0.98,8,0),COLORRED;
DRAWTEXT(WYZB=7,L*0.95,'启动'),COLORRED;
STICKLINE(WYZB=12,H*1.03,H*1.02,8,0),COLOR006600;
DRAWTEXT(WYZB=12,H*1.06,'洗盘'),COLORYELLOW;
STICKLINE(WYZB=20,L*0.97,L*0.98,8,0),COLORRED;
DRAWTEXT(WYZB=20,L*0.95,'启动'),COLORRED;
STICKLINE(WYZB=33,H*1.03,H*1.02,8,0),COLOR006600;
DRAWTEXT(WYZB=33,H*1.06,'洗盘'),COLORYELLOW;
STICKLINE(WYZB=54,L*0.97,L*0.98,8,0),COLORRED;
DRAWTEXT(WYZB=54,L*0.95,'启动'),COLORRED;
STICKLINE(WYZB=88,H*1.03,H*1.02,8,0),COLOR006600;
DRAWTEXT(WYZB=88,H*1.06,'洗盘'),COLORYELLOW;
STICKLINE(WYZB=143,L*0.97,L*0.98,8,0),COLORCCFFFF;
DRAWTEXT(WYZB=143,L*0.95,'启动'),COLORYELLOW;
STICKLINE(WYZB=232 ,H*1.03,H*1.02,8,0),COLORFF0033;
DRAWTEXT(WYZB=232,H*1.06,'洗盘'),COLORYELLOW;
STICKLINE(WYZB=376,L*0.97,L*0.98,8,0),COLORFF9966;
DRAWTEXT(WYZB=376,L*0.95,'启动'),COLORYELLOW;
A:=AMOUNT/V/100;
WYGSA:=EMA((((A-EMA(A,13))/EMA(A,13))*(0-100)),5);
操盘线:=EMA(((WYGSA/10)+EMA(A,10)),3);
行情线:=EMA(A,3);
重心:=(C+0.618*REF(C,1)+0.382*REF(C,2)+0.236*REF(C,3)+0.146*REF(C,4))/2.382;
趋势线:EMA(((SLOPE(C,22)*20)+C),55),COLORYELLOW,LINETHICK2;
红升:=IF(重心>=趋势线,趋势线,DRAWNULL),COLORRED,LINETHICK2;
蓝降:=IF(重心<趋势线,趋势线,DRAWNULL),COLORGREEN,LINETHICK2;
STICKLINE(行情线<操盘线,H,L,0,1),COLORGREEN;
STICKLINE(行情线<操盘线,C,O,2,1),COLORGREEN;
STICKLINE(行情线>=操盘线,H,L,0,1),COLORRED;
STICKLINE(行情线>=操盘线,C,O,2,1),COLORRED;
DA:=(EMA(C,1)+EMA(C,2)+EMA(C,3)+EMA(C,4))/4;
DB:=(EMA(C,10)+EMA(C,20)+EMA(C,40)+EMA(C,80))/4;
DRAWTEXT(CROSS(DA-DB,0),L*0.98,'★B'),COLORRED;
JH:=SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100;
DRAWTEXT(CROSS(84,JH),H*1.02,'☆S'),COLORGREEN;
买点:=CROSS(DA-DB,0) AND C>趋势线 AND 行情线>=操盘线;STICKLINE(买点,L,L*0.96,2,0);
DRAWTEXT(买点,L*0.95,'买点'),COLORYELLOW;
{筹码异动副图源码如下}
HGW1:=EMA(CLOSE,10)-EMA(CLOSE,21);
HGW2:=EMA(HGW1,9);
HGW3:=2000* (2*(HGW1-HGW2))/EMA(CLOSE,30);
HGW4:=EMA(CLOSE,12)-EMA(CLOSE,26);
HGW5:=EMA(HGW4,9);
GSPT:=2000* (2*(HGW4-HGW5))/EMA(CLOSE,30);
HGW9:=EMA(GSPT,5);
上顶线:50,COLOR99EEEE,LINETHICK1;
触底线:-50.00,COLOR009000,LINETHICK1;
DRAWBAND(HGW3,RGB(200,0,200),HGW9,RGB(0,200,200));
DRAWBAND(GSPT,RGB(200,0,200),0,RGB(0,200,200));
DRAWBAND(GSPT,RGB(200,0,200),HGW9,RGB(0,200,200));
DRAWBAND(HGW3,RGB(200,0,200),HGW9,RGB(0,200,200));
STICKLINE(CROSS(HGW3,GSPT),-20,20,2,0),COLORYELLOW;
STICKLINE(CROSS(HGW3,GSPT),0,20,2,0),COLORRED;
分水岭:EMA(HGW3,1),COLORWHITE,LINETHICK1;
中线:0,COLORBLUE,LINETHICK1;
{筹码异动波段副图源码如下}
LC:=REF(CLOSE,1);
RSI5:=((SMA(MAX((CLOSE - LC),0),5,1) / SMA(ABS((CLOSE - LC)),5,1)) * 100);
TR1:=SUM(MAX(MAX((HIGH - LOW),ABS((HIGH - REF(CLOSE,1)))),ABS((LOW - REF(CLOSE,1)))),10);
HD:=(HIGH - REF(HIGH,1));
LD:=(REF(LOW,1) - LOW);
DMP:=SUM(IF(((HD > 0) AND (HD > LD)),HD,0),10);
DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),10);
PDI:=((DMP * 100) / TR1);
MDI:=((DMM * 100) / TR1);
ADX:=MA(((ABS((MDI - PDI)) / (MDI + PDI)) * 100),5);
AV:=(RSI5 + ADX);DXR:=(((ADX + REF(ADX,5)) / 2) + RSI5);
WR10:=((100 * (HHV(HIGH,10) - CLOSE)) / (HHV(HIGH,10) - LLV(LOW,10)));
NEWVOL:=(RSI5 - WR10);
最佳买入:=(AV + NEWVOL);
最佳买入选股:=IF(CROSS(最佳买入,0),1,0),STICK,COLORRED;
WYZB1:=SMA(最佳买入选股,3,1);
WYZB2:=SMA(WYZB1,3,1),COLOR0000FF;
WYZB3:=SMA(WYZB2,3,1),COLOR00FFFF;
建仓买点:IF(CROSS(WYZB2,WYZB3) AND (WYZB2<40),5,0* 10000),COLOR0000FF,LINETHICK2;
STICKLINE(建仓买点,0,2.5,8,0),COLORRED;
STICKLINE(建仓买点,0.45,4.0,2,0),COLORRED;
RSV:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 50);
K:=SMA(RSV,3,1);D:=SMA(K,3,1);
J:=3*K-2*D;X:=LLV(J,2)=LLV(J,8);
最佳买入时机: IF(CROSS(J,3),1,0),STICK,COLORFFFF00;
STICKLINE(最佳买入时机,0,1,3,0),COLOR009999;
STICKLINE(最佳买入时机,0,1,2,0),COLOR00DDDD;
STICKLINE(最佳买入时机,0,1,1,0),COLOR00FFFF;
机构建仓: IF(最佳买入<5,-0.2,0),STICK,COLOR00FF00,LINETHICK1;
机构建仓日:STICKLINE(机构建仓,0,-0.2,3,0),COLOR00FF00,LINETHICK6;
获利:STICKLINE(REF("KDJ.J",1)<0 AND "KDJ.J">0,60,0,1,0),COLOR0000FF;
RSV9:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K1:SMA(RSV9,3,1);DK1:K1-REF(K1,1);
嬴政:IF(DK1>7 AND REF(DK1,1)<0 AND (DK1-REF(DK1,1))>9,50,0), STICK,COLORYELLOW;
DRAWICON(嬴政>0,50 ,1);
DRAWTEXT(REF("KDJ.J",1)<0 AND "KDJ.J">0,50,'波段底'),COLORWHITE ;
