1111

{参数设置}
{M1 0 1000 5}
{M2 0 1000 10}
{M3 0 1000 20}
{M4 0 1000 60}

{魔法K线}
MA1:MA(CLOSE,M1);
MA2:MA(CLOSE,M2);
MA3:MA(CLOSE,M3);
C2:=REF(C,1);
涨停:=IF((C-C2)*100/C2>=(10-0.01*100/C2),1,0);
{STICKLINE(涨停,OPEN,CLOSE,3,0),COLORYELLOW;}
STICKLINE(涨停,OPEN,CLOSE,2,0),COLORRED;
STICKLINE(涨停,H,L,0,0),COLORRED;
跌停:=IF((C2-C)*100/C2>=(10-0.01*100/C2),1,0);
{STICKLINE(跌停,OPEN,CLOSE,3,0),COLORFFFF00;}
STICKLINE(跌停,OPEN,CLOSE,2,0),COLORGREEN;
STICKLINE(跌停,H,L,0,1),COLORGREEN;
UP:=(C/REF(C,1)>1.05 AND NOT(C/REF(C,1)>1.095));
STICKLINE(UP,OPEN,CLOSE,2,0),,COLORLIRED;
STICKLINE(UP,H,L,0,0),COLORLIRED;
DOWN:=(C/REF(C,1)<0.95 AND NOT(C/REF(C,1)<0.907));
STICKLINE(DOWN,OPEN,CLOSE,2,0),COLORFF6600;
STICKLINE(DOWN,H,L,0,1),COLORFF6600;
向上跳空:=LOW>REF(HIGH,1);
STICKLINE(向上跳空,LOW,REF(HIGH,1),4,0),COLOR888888;
向下跳空:=HIGH<REF(LOW,1);
STICKLINE(向下跳空,HIGH,REF(LOW,1),4,0),COLOR888888;
{所属板块}
DRAWTEXT_FIX(1,0.00,0,0,'所属行业：')COLORYELLOW;
DRAWTEXT_FIX(1,0.07,0,0,HYBLOCK)COLORYELLOW;
DRAWTEXT_FIX(1,0.14,0,0,'所属地区：')COLORYELLOW;
DRAWTEXT_FIX(1,0.21,0,0,DYBLOCK)COLORYELLOW;
DRAWTEXT_FIX(1,0.28,0,0,'概念板块：')COLORYELLOW;
DRAWTEXT_FIX(1,0.35,0,0,GNBLOCK)COLORYELLOW;
DRAWTEXT_FIX(1,0.00,0.06,0,'重要参考：')COLORRED;
DRAWTEXT_FIX(1,0.07,0.06,0,'每股净资产：'),COLORRED;
DRAWNUMBER_FIX(1,0.14,0.06,0,FINANCE(34));
DRAWTEXT_FIX(1,0.18,0.06,0,'每股未分配利润：'),COLORRED;
DRAWNUMBER_FIX(1,0.27,0.06,0,FINANCE(32));
DRAWTEXT_FIX(1,0.0,0.06,0,EXTERNSTR(0,1))COLOR0000FF;
DRAWTEXT_FIX(1,0.00,0.12,0,'所属风格：')COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.07,0.12,0,FGBLOCK)COLORYELLOW;
{股本市值}
总股本:=STRCAT(STRCAT('总股本: ',CON2STR(TOTALCAPITAL/1000000,2)),'亿');
流通盘:=STRCAT(STRCAT(' 流通盘: ',CON2STR(CAPITAL/1000000,2)),'亿');
全流通:=STRCAT(' 全流通: ',CON2STR((CAPITAL/1000000)/(TOTALCAPITAL/1000000),2));
市值:=STRCAT(STRCAT(' 流通市值: ',CON2STR((CAPITAL/1000000)*C,2)),'亿');
股本市值:=STRCAT('股本市值: ',STRCAT(STRCAT(STRCAT(总股本,流通盘),全流通),市值));
{当前业绩}
净资产收益率:=STRCAT(' 净资产收益率: ',CON2STR(FINANCE(30)/FINANCE(19)*100,2));
营业利润率:=STRCAT(' 营业利润率: ',CON2STR(FINANCE(23)/FINANCE(20)*100,2));
毛利率:=STRCAT(' 毛利率: ',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2));
当前业绩:=STRCAT('当前业绩: ',STRCAT(STRCAT(净资产收益率,营业利润率),毛利率));
DRAWTEXT_FIX(ISLASTBAR,0,0.18,0,当前业绩),COLORGREEN;
{DRAWTEXT_FIX(ISLASTBAR,0,0.24,0,股本市值),COLORGREEN;};
{绿钻信号-短期反弹}
AA1:=AMOUNT/V;
BB1:=L<AA1*0.9;
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD1:=L<MA(C,5)*0.921;
EE1:=V<MA(V,5)*1.5;
FF1:=BB1 AND CC1 AND DD1 AND EE1;
DRAWICON( FF1,LOW*0.97,27);
{红钻信号-突破趋势}
DRAWICON(CROSS(MA1,MA2),MA1*0.99,25);
{黄钻信号-买点}
RSV:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
K:=SMA(RSV,9,1);
D:=SMA(K,9,1);
J:=3*K-2*D;
X2:=LLV(J,2)=LLV(J,8);
{DRAWTEXT(CROSS(J,REF(J+0.01,1)) AND X2 AND J<20,LOW*0.99,'买'); }
DRAWICON(CROSS(J,REF(J+0.01,1)) AND X2 AND J<20,LOW*0.99,26);
{银色变盘信号}
STICKLINE(CLOSE= REF(CLOSE,1) ,H,L,3,1 ),COLOR999999;
STICKLINE(CLOSE= REF(CLOSE,1) ,HIGH,LOW,0,0 ),COLORWHITE;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR555555;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR777777;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR999999;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORBBBBBB;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORDDDDDD;
STICKLINE(CLOSE= REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLORFFFFFF;
{出水芙蓉}
A:=CLOSE>OPEN;
B:=A&&CLOSE>MA(CLOSE,20)&&CLOSE>MA(CLOSE,40)&&CLOSE>MA(CLOSE,60);
CC:=B&&OPEN<MA(CLOSE,40)&&OPEN<MA(CLOSE,60);
CSFRO:=CC&&(CLOSE-OPEN)>0.0618*CLOSE;
DRAWTEXT(CSFRO,LOW*0.95,'出水芙蓉'),COLORMAGENTA;
{涨停统计}
STICKLINE(涨停,OPEN,CLOSE,2,0),COLORRED;
STICKLINE(涨停,H,L,0,0),COLORRED;
STICKLINE(跌停,OPEN,CLOSE,2,0),COLORGREEN;
STICKLINE(跌停,H,L,0,1),COLORGREEN;
STICKLINE(DOWN,OPEN,CLOSE,2,0),COLORFF6600;
STICKLINE(DOWN,H,L,0,1),COLORFF6600;
半涨1:=IF((C-C2)*100/C2>=(5-0.01*100/C2),1,0);
半涨2:=IF((C-C2)*100/C2<(10-0.01*100/C2),1,0);
JRS:=半涨1 AND 半涨2 AND FINANCE(33)>0;
NUMBER:=COUNT(涨停,BARSSINCE(涨停)+1);
DRAWNUMBER(涨停,HIGH*1.04,NUMBER),COLORWHITE;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.97,0.01,0,NUMBER),COLORWHITE;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.88,0.01,0,'上市以来共涨停:'),COLORYELLOW;
{主力,散户进出监控}
超B:=L2_AMO(0,2)/10000.0;
大B:=L2_AMO(1,2)/10000.0;
中B:=L2_AMO(2,2)/10000.0;
小B:=L2_AMO(3,2)/10000.0;
超S:=L2_AMO(0,3)/10000.0;
大S:=L2_AMO(1,3)/10000.0;
中S:=L2_AMO(2,3)/10000.0;
小S:=L2_AMO(3,3)/10000.0;
TESTSKIP(NOT(超B OR 大B OR 中B OR 小B OR 超S OR 大S OR 中S OR 小S)!=0);
大宗进:=(超B)+(大B),NODRAW;
大宗出:=(超S)+(大S),NODRAW;
非大宗进:=(中B)+(小B),NODRAW;
非大宗出:=(中S)+(小S),NODRAW;
DAZHIV:=CONST(MAX(ABS(大宗进),MAX(ABS(大宗出),MAX(ABS(非大宗进),ABS(非大宗出))))),NODRAW;
DRAWRECTREL(0,CONST(950-(ABS(大宗进)*250/DAZHIV))-20,30,950,IF(CONST(大宗进>0),
RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(32,CONST(950-(ABS(大宗出)*250/DAZHIV))-20,62,950,IF(CONST(大宗出>0),
RGB(23,125,255),RGB(255,0,0)));
DRAWRECTREL(92,CONST(950-(ABS(非大宗进)*250/DAZHIV))-20,122,950,IF(CONST(非大宗进>0),
RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(124,CONST(950-(ABS(非大宗出)*250/DAZHIV))-20,154,950,IF(CONST(非大宗出>0),
RGB(23,125,255),RGB(255,0,0)));
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.015,1,0,'主力进出'),COLORMAGENTA;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.107,1,0,'散户进出'),COLORCYAN;