DRAWTEXT_FIX(1,0.00,0,0,'所属行业:')COLOR0080FF; 
DRAWTEXT_FIX(1,0.07,0,0,HYBLOCK)COLOR0080FF; 
DRAWTEXT_FIX(1,0.14,0,0,'所属地区:')COLOR00FFFF; 
DRAWTEXT_FIX(1,0.21,0,0,DYBLOCK)COLOR00FFFF; 
DRAWTEXT_FIX(1,0.00,0.06,0,'主题投资:')COLOR0000FF; 
DRAWTEXT_FIX(1,0.07,0.06,0,EXTERNSTR(0,1))COLOR0000FF; 
{股本市值} 
总股本:=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(' 上市天数: ',CON2STR(FINANCE(42),0)); 
{上市日期:=STRCAT(' 上市日期: ',CON2STR(HHV((BARSCOUNT(C)=0)*(DATE+19000000),0),0));} 
股本市值:=STRCAT('股本市值: ',STRCAT(STRCAT(STRCAT(STRCAT(总股本,流通盘),全流通),市值),上市天数)); 
{业绩综合} 
市盈率:=STRCAT('市盈率: ',CON2STR(C/FINANCE(33),2)); 
市销率:=STRCAT(' 市销率: ',CON2STR(C/(FINANCE(20)/FINANCE(1)),2)); 
市净率:=STRCAT(' 市净率: ',CON2STR(C/FINANCE(34),2)); 
净资收益率:=STRCAT(' 净资收益率: ',CON2STR(FINANCE(33)/FINANCE(34)*100,2)); 
毛利率:=STRCAT(' 毛利率: ',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2)); 
净利润率:=STRCAT(' 净利润率 ',CON2STR(FINANCE(30)/FINANCE(20)*100,2)); 
主营利润率:=STRCAT(' 主营利润率 ',CON2STR(FINANCE(23)/FINANCE(20)*100,2)); 
当前业绩:=STRCAT('当前业绩: ',STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(市盈率,市销率),市净率),净资收益率),毛利率),净利润率),主营利润率)); 
{风险系数} 
X1:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2; 
X2:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4;{盈余公积用资本公积金代替}; 
X3:=FINANCE(23)/FINANCE(10)*3.3; 
X4:=FINANCE(19)/FINANCE(15)*0.6;{缺长期负债或负债总额} 
X5:=FINANCE(20)/FINANCE(15)*0.999; 
Z值:=X1+X2+X3+X4+X5; 
预警:=IF(Z值<1.2,'重警',IF(Z值>=1.2 AND Z值<2.6,'轻警','无警')); 
财务预警:=STRCAT('财务预警: ',STRCAT(预警,STRCAT('-Z值: ',CON2STR(Z值,3)))); 
优质资产率:=STRCAT(' 优质资产率: ',CON2STR((FINANCE(19)-FINANCE(22)-FINANCE(27))/FINANCE(19),2));{理论上越大越好但不同行业有不同标准}; 
现金负债比:=STRCAT(' 现金负债比: ',CON2STR(FINANCE(25)/FINANCE(15),3));{缺长期负债或负债总额,理论上越大越好但不同行业有不同标准}; 
财务系数:=STRCAT('风险系数: ',STRCAT(STRCAT(财务预警,优质资产率),现金负债比)); 
{} 
DRAWTEXT_FIX(ISLASTBAR,0.00,0.12,0,股本市值),COLORGREEN; 
DRAWTEXT_FIX(ISLASTBAR,0.00,0.18,0,当前业绩),COLORGREEN; 
DRAWTEXT_FIX(ISLASTBAR,0.00,0.24,0,财务系数),COLORGREEN; 
 
高1:=REF(HHV(H,150),3); 
低1:=REF(LLV(L,150),3); 
H3:=高1-(高1-低1)*0.5;  
中轴:REFDATE(H3,DATE),POINTDOT,COLORLIGRAY,LINETHICK3; 
B1:=EMA(C,12);  
B2:=EMA(C,26);  
B3:=B1-B2;  
WDIF:EMA(EMA(EMA(C,3),3),3)+B3,LINETHICK; 
WDEA:EMA(WDIF,9),LINETHICK; 
MACD:=2*(WDIF-WDEA); 
STICKLINE(MACD>0,中轴,中轴+MACD,0,1),COLORRED; 
STICKLINE(MACD<0,中轴,中轴+MACD,0,1),COLORLIBLUE;  
STICKLINE(MACD<REF(MACD,1)AND MACD>0,中轴,中轴+MACD,0,0 ),COLOR00BBFF; 
STICKLINE(MACD>=REF(MACD,1)AND MACD>0,中轴,中轴+MACD,0,0 ),COLOR0011BB; 
STICKLINE(MACD>REF(MACD,1)AND MACD<0,中轴,中轴+MACD,0,0),COLORBB11BB; 
STICKLINE(MACD<=REF(MACD,1)AND MACD<0,中轴,中轴+MACD,0,0),COLORFFBB11; 
{DRAWTEXT(CROSS(MACDMA,MACD),HIGH*1.015,' 卖'),COLORFFFFCC;}; 
VARA:=LLV(LOW,36);  
VARB:=HHV(HIGH,30);  
VARC:=EMA((CLOSE-VARA)/(VARB-VARA)*4,4)*25;  
趋势:= VARC, COLOR33FFFF; 
顶背: STICKLINE(VARC>90,OPEN,CLOSE,3,0) , COLORRED;  
VAR26:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4; 
VAR27:=MA(VAR26,5); 
VAR28:=MA(VAR26,10); 
{DRAWTEXT(CROSS(VAR26,VAR27) AND VAR27<VAR28,L*0.95,'▲争'),COLORYELLOW;} 
STICKLINE(CROSS(VAR26,VAR27) AND VAR27<VAR28,OPEN,CLOSE,3,0),COLORYELLOW; 
{DRAWTEXT(CROSS(VAR7,VAR6) AND VAR7>VAR8,VAR3*0.95,'夺'),COLORYELLOW;} 
STICKLINE(CROSS(VAR27,VAR26)  AND VAR27>VAR28,OPEN,CLOSE,3,0),COLORFF00FF; 
VAR5:=EMA(MA(CLOSE,3),34); 
VAR1:=4*SMA((CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100,5,1)- 
3*SMA(SMA((CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100,5,1),3.2,1); 
VAR2:=8;  
CC:=CROSS(VAR1,VAR2);  
DRAWTEXT(CC,L*0.98,'买!'),COLOR0099FF;  
STICKLINE(CROSS(VAR1,VAR2) ,OPEN,CLOSE,3,0),COLORBB11BB; 
AA2:=AMOUNT/V; 
BB2:=L<AA2*0.9; 
CC2:=(C-REF(C,1))/REF(C,1)*100>1.2; 
DD2:=L<MA(C,5)*0.921; 
EE2:=V<MA(V,5)*1.5; 
FF2:=BB2 AND CC2 AND DD2 AND EE2,LINETHICK0; 
{DRAWTEXT(FF2,L*0.99,' 鼠'),COLORYELLOW;} 
STICKLINE(FF2,O,C,4,0),COLORRED; 
LC:=REF(CLOSE,1); 
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100); 
FF:=EMA(CLOSE,3); 
MA15:=EMA(CLOSE,21); 
DRAWTEXT(CROSS(88,RSI),(HIGH * 1.0002),'↓'),COLOR1880FF; 
E:=(HIGH+LOW+OPEN+2*CLOSE)/5; 
AAA:=2*E-LOW,NODRAW; 
AB:=2*E-HIGH,NODRAW; 
ACC:=E+(HIGH-LOW),NODRAW; 
ADD:=E-(HIGH-LOW),NODRAW; 
今阻力:REF(AAA,1),COLORWHITE,NODRAW; 
今支撑:REF(AB,1),COLORYELLOW,NODRAW; 
明阻力:AAA,COLORCYAN,NODRAW; 
明支撑:AB,COLORMAGENTA,NODRAW; 
明突破:ACC,COLORGREEN,NODRAW; 
明反转:ADD,COLORLICYAN,NODRAW;  
GJ:=(C+H+L+O)/4; 
明日阻力:=L+(GJ-L)+(C-L); 
明日支撑:=L+(C-GJ); 
今日阻力:REF(明日阻力 , 1),NODRAW; 
今日支撑:REF(明日支撑 , 1),NODRAW; 
STICKLINE(ISLASTBAR AND C>=今日阻力,今日阻力,今日阻力,10,1),COLOR0000FF; 
STICKLINE(ISLASTBAR AND C<今日阻力,今日阻力,今日阻力,10,1),COLOR00FF00; 
STICKLINE(ISLASTBAR AND C>=今日支撑,今日支撑,今日支撑,10,1),COLORFF00FF; 
STICKLINE(ISLASTBAR AND C<今日支撑,今日支撑,今日支撑,10,1),COLORFF8800; 
骑牛线:MA(CLOSE,5),COLORGREEN,LINETHICK; 
IF(骑牛线>REF(骑牛线,1),骑牛线,DRAWNULL)COLORYELLOW,LINETHICK3; 
支撑线:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4,COLORYELLOW,LINETHICK2;   
FL:=HHV(支撑线,2),LINETHICK2;  
持股线:HHV(支撑线,2),COLOR00FF00,LINETHICK2;  
FS:支撑线-(FL-支撑线),COLORRED,LINETHICK2;  
生命线:MA(CLOSE,60),COLOR00FF00,LINETHICK1; 
IF(生命线>REF(生命线,1),生命线,DRAWNULL)COLORRED,LINETHICK1; 
AAA2:=SUM(IF( CLOSE>REF(CLOSE,1),VOL*C,0),0); 
AAA3:=SUM(IF( CLOSE<REF(CLOSE,1),VOL*C,0),0); 
AAA4:=SUM(IF( CLOSE=REF(CLOSE,1),VOL*C,0),0); 
BB1:=0; 
B1万元:=DVOL*DCLOSE/100; 
B1差:=B1万元-REF(B1万元,1); 
B2万元:=DVOL*DCLOSE/100; 
B2比:=B2万元/REF(B2万元,1); 
净流入万元:=(AAA2-AAA3-0.5*AAA4); 
PM:=MA(净流入万元,1); 
PMA:=PM/REF(PM,1)>1; 
PMB:=REF(PMA,1)<1 AND PMA;  
密码:(EMA(MA(B1万元,2),2))/100000,COLORYELLOW,NODRAW; 
二日比:=密码/REF(密码,1); 
选股:PMB AND 密码>REF(密码,1) AND 二日比>1,COLORRED,NODRAW; 
DRAWNUMBER(选股=1 ,L,密码),COLORYELLOW; 
DRAWICON(选股,L*0.975,1); 
{财主抓涨停 主图} 
均价线:=AMOUNT/V/100,POINTDOT; 
C2:=REF(C,1); 
UPQK:=LOW-REF(HIGH,1); 
STICKLINE(CLOSE>REF(CLOSE,1) AND UPQK>0,REF(HIGH,1),LOW,4,0),COLORGRAY; 
DOWNQK:=REF(LOW,1)-HIGH; 
STICKLINE(CLOSE<REF(CLOSE,1) AND DOWNQK>0,REF(LOW,1),HIGH,4,0),COLORBLUE; 
   |