DRAWGBK(C>0,RGB(8,10,4),RGB(8,10,4),0,'',0); 
{资金主图显示} 
D顶:=REFDATE(HHV(H,120),DATE); 
D底:=REFDATE(LLV(L,120),DATE); 
JGV:=(L2_VOL(0,0) - L2_VOL(0,1))*AMOUNT; 
SHV:=(L2_VOL(3,0) - L2_VOL(3,1))*AMOUNT; 
机构资金:=EMA(JGV,60)/CAPITAL,COLORMAGENTA; 
散户资金:=EMA(SHV,60)/CAPITAL,COLORGREEN; 
买入:=机构资金-散户资金; 
累计:=EMA(买入,1),NODRAW; 
均值:=EMA(累计,MIN(10,10)),NODRAW; 
STICKLINE(累计>0,D顶,D底,5,0),COLOR1B0E8B; 
STICKLINE(累计<0,D顶,D底,5,0),COLOR6B6B12; 
{MACD主图显示} 
高1:=REF(HHV(H,120),3); 
低1:=REF(LLV(L,120),3); 
H3:=高1-(高1-低1)*0.5;  
中轴:REFDATE(H3,DATE),POINTDOT,COLORLIGRAY; 
B1:=EMA(C,12);  
B2:=EMA(C,26);  
B3:=(B1-B2)*2;  
WDIF:中轴+B3;  
WDEA:EMA(WDIF,9);  
DRAWBAND(WDIF,RGB(110,0,0),WDEA,RGB(0,80,0)); 
DRAWKLINE(HIGH,OPEN,LOW,CLOSE);  
MACD:=2*(WDIF-WDEA)LINETHICK2; 
STICKLINE(MACD>0,中轴,中轴+MACD,0,1),COLORRED; 
STICKLINE(MACD<0,中轴,中轴+MACD,0,1),COLORLIBLUE; 
A1:=BARSLAST(REF(CROSS(WDIF,WDEA),1)); 
底背离:=REF(CLOSE,A1+1)>CLOSE AND WDIF>REF(WDIF,A1+1) AND CROSS(WDIF,WDEA); 
底背:DRAWLINE(A1=0,WDEA,底背离,WDEA,0),COLORRED,LINETHICK4; 
A2:=BARSLAST(REF(CROSS(WDEA,WDIF),1)); 
顶背离:=REF(CLOSE,A2+1)<CLOSE AND REF(WDIF,A2+1)>WDIF AND CROSS(WDEA,WDIF); 
顶背:DRAWLINE(A2=0,WDEA,顶背离,WDEA,0),COLORGREEN,LINETHICK4; 
A:=REF(HY_INDEXC,1); 
行业涨幅:IF(A>0,(HY_INDEXC-A)*100/A,0),NODRAW,COLORMAGENTA; 
DRAWTEXT_FIX(ISLASTBAR,0,0,0,HYBLOCK),COLOR00C0C0; 
{BBI牛熊均线} 
BBI:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4 COLORGREEN LINETHICK2; 
BBI操作线:IF(BBI>REF(BBI,1),BBI,DRAWNULL),LINETHICK2,COLORMAGENTA; 
{慢牛线} 
VAR1:=(3*C+O+H+L)/6; 
慢牛线:EMA(3*VAR1-2*SMA(VAR1,2,1),8),COLORBLUE,LINETHICK2; 
慢牛走牛:IF(慢牛线>REF(慢牛线,1),慢牛线,DRAWNULL),LINETHICK2,COLORYELLOW; 
{慢牛买点} 
慢牛B点:=C>=慢牛线 AND REF(C,1)<REF(慢牛线,1) AND 慢牛线>REF(慢牛线,1); 
DRAWICON(C>=慢牛线 AND REF(C,1)<REF(慢牛线,1) AND 慢牛线>REF(慢牛线,1),L*0.98,7); 
{【参数定义】} 
RSV:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100; 
K1:=SMA(RSV,10,1); 
D1:=SMA(K1,5,1); 
KK:=INTPART(K1); 
DD0:=INTPART(D1); 
TFXXS:=KK+DD0; 
TGLXS:=(TFXXS-REF(TFXXS,1))*10; 
乖离系数:TGLXS,COLORGREEN,NODRAW; 
ZLCM:=EMA(WINNER(CLOSE)*70,3); 
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3); 
ZZLKP:=ZLCM/(ZLCM+SHCM)*100; 
控盘系数:INTPART(ZZLKP),COLORCYAN,NODRAW; 
风险系数:TFXXS,LINETHICK2,COLORYELLOW,NODRAW; 
选股:=控盘系数>19 AND 乖离系数>39 AND 风险系数<110; 
DRAWTEXT(选股>0,LOW*0.98,'☆'),COLORDD00DD; 
净流比:=(LARGEINTRDVOL/LARGEOUTTRDVOL); 
大10追:=EMA(净流比,10)*10; 
买力度:=LARGEINTRDVOL*100/VOL; 
强势将到:=选股 AND 大10追>10 AND 净流比>1 AND 买力度>30; 
DRAWTEXT(强势将到,L*0.992,'强势将到'),COLORMAGENTA; 
DRAWTEXT_FIX(ISLASTBAR,0,0.92,0,' 1、乖离系数,大于40关注 小于-50坚决不进场 ,大于60坚决买入,买入时看股价运行的情况而定。 
2、控盘系数大于20 可以做个小波段 准确率80%。')COLOR4080FF; 
{倍量} 
V2V:=V/REF(V,1)>=1.9 AND (IF(C<O,C>REF(C,1),1)); 
{金黄s} 
DRAWTEXT(V2V,(L*0.99),'倍'),COLORYELLOW;  
STICKLINE(V2V,OPEN,CLOSE,0,0),COLOR000DDD; 
STICKLINE(V2V,OPEN,CLOSE,3.2,0),COLOR003333; 
STICKLINE(V2V,OPEN,CLOSE,2.7,0),COLOR005555; 
STICKLINE(V2V,OPEN,CLOSE,2.1,0),COLOR007777; 
STICKLINE(V2V,OPEN,CLOSE,1.5,0),COLOR009999; 
STICKLINE(V2V,OPEN,CLOSE,0.9,0),COLOR00BBBB; 
STICKLINE(V2V,OPEN,CLOSE,0.3,0 ),COLOR00DDDD; 
{涨停变色} 
ZT:=C/REF(C,1)>1.097; 
XH:=FILTER(ZT,13); 
BH:=BARSLAST(ZT); 
CZ:=REF(H,BH)-REF(L,BH); 
STICKLINE(C,(REF(L,BH)+CZ*0.5),(REF(L,BH)+CZ*0.5),3,0),COLORRED; 
STICKLINE(C,REF(L,BH),REF(L,BH),3,0),COLORBLUE; 
STICKLINE(ZT,REF(O,BH),REF(C,BH),3,0),COLORYELLOW; 
DRAWTEXT(ZT,L*0.97,'涨停'),COLORRED; 
STICKLINE(ZT,LOW,HIGH,0.1,0),COLORRED; 
STICKLINE(ZT,OPEN,CLOSE,0,0),COLORRED; 
STICKLINE(ZT,CLOSE,OPEN,3,0) ,COLOR000066; 
STICKLINE(ZT,CLOSE,OPEN,2.6,0) ,COLOR000088; 
STICKLINE(ZT,CLOSE,OPEN,2.1,0) ,COLOR0000AA; 
STICKLINE(ZT,CLOSE,OPEN,1.5,0) ,COLOR0000BB; 
STICKLINE(ZT,CLOSE,OPEN,0.9,0) ,COLOR0000CC; 
STICKLINE(ZT,CLOSE,OPEN,0.6,0) ,COLOR0000DD; 
STICKLINE(ZT,CLOSE,OPEN,0.3,0) ,COLOR0000EE; 
STICKLINE(ZT,CLOSE,OPEN,0.1,0) ,COLOR0000FF; 
STICKLINE(ZT,CLOSE,OPEN,0,0) ,COLOR0000FF;{☆精确风险} 
{相对低点K线变色,上穿写短线} 
LC:=REF(C,1),LINETHICK0; 
RSI:=((SMA(MAX((C-LC),0),13,1)/SMA(ABS((C-LC)),13,1))*100); 
STICKLINE((RSI<20),L,H,0.1,0),COLORFF6600; 
STICKLINE((RSI<20),O,C,4,0),COLORCC5000; 
DRAWTEXT(CROSS(RSI,20-0.0005),H*1.01,'短线'),COLORAA99AA; 
STICKLINE(CROSS(RSI,20-0.0005),C,O,3,0),COLOR888888; 
STICKLINE(CROSS(RSI,20-0.0005),C,O,2,0),COLORAAAAAA; 
STICKLINE(CROSS(RSI,20-0.0005),C,O,1,0),COLORCCCCCC; 
STICKLINE(CROSS(RSI,20-0.0005),C,O,0.1,0),COLORFFFFFF; 
STICKLINE(CROSS(RSI,20-0.0005),L,H,0,0),COLORFFFFFF; 
V字翻转:=MA(C,5)<MA(C,10) AND V=LLV(V,10) AND C>O; 
DRAWTEXT(V字翻转,L*0.97,'V字翻转'),COLORRED; 
 
Z1:=STRCAT(DYBLOCK,' '); 
Z2:=STRCAT(Z1,HYBLOCK); 
Z3:=STRCAT(Z2,' '); 
Z4:=STRCAT(Z3,GNBLOCK); 
Z5:=STRCAT(Z4,' '); 
Z6:=STRCAT(Z5,FGBLOCK); 
DRAWTEXT_FIX(ISLASTBAR,0.01,0.012,0,STRCAT(Z6,ZHBLOCK)),COLORRED; 
DRAWTEXT_FIX(1,0,0.075,0,STRCAT('',ZDBLOCK)),COLORYELLOW; 
 
总涨幅周期:=350; 
高点位:=REFDATE(HHV(H,总涨幅周期),DATE);  
低点位:=REFDATE(LLV(L,总涨幅周期),DATE); 
低位价:=REF(L,BARSLAST(低点位=L)),COLORGREEN,NODRAW; 
高位价:=REF(H,BARSLAST(高点位=H)),COLORRED,NODRAW; 
曾最大涨幅:=(高位价-低位价)/低位价*100; 
当前涨幅:=(C-低位价)/低位价*100; 
ZFA:=CON2STR(CONST(曾最大涨幅),2); 
ZFB:=CON2STR(CONST(当前涨幅),2); 
ZFC:=STRCAT('【曾最大涨幅】:',ZFA); 
ZFD:=STRCAT(ZFC,'%'); 
ZFE:=STRCAT(ZFD,'【当前总涨幅】:'); 
ZFF:=STRCAT(ZFE,ZFB); 
ZFG:=STRCAT(ZFF,'%'); 
DRAWTEXT_FIX(ISLASTBAR,0,1,0,'▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇▇'),COLORRED; 
DRAWTEXT_FIX(ISLASTBAR,0,1,0,ZFG),COLORYELLOW; 
 
 
  |