MA5:MA(CLOSE,5),ColorFFFFFF;
MA10:MA(CLOSE,10),coloryellow;
MA20:MA(CLOSE,20),colorred;
MA40:=MA(CLOSE,40);
MA60:MA(c,60),color00ff00;
MA120:MA(c,120),ColorFF00C3;
MA250:MA(c,250),ColorFFAD00,linethick2;
月价托:=ma5>ma20 and ma5>ma10 and cross(ma10,ma20) ;
季价托:=ma20>ma60 and ma20>ma40 and cross(ma40,ma60);
短、长价托:=ma5>ma60 and ma5>ma10 and cross(ma10,ma60);
drawtext(月价托,l,'月价托'),coloryellow;
stickline(月价托,l,h,0.5,1), coloryellow;
stickline(月价托,o,c,5,1),linethick3, coloryellow;
drawtext(季价托,l,'季价托'),colorf00ff0;
stickline(季价托,l,h,0.5,1), colorf00ff0;
stickline(季价托,o,c,5,1),linethick3, colorf00ff0;
drawtext(短、长价托,l,'短、长价托'),color36c0c1;
stickline(短、长价托,l,h,0.5,1), color36c0c1;
stickline(短、长价托,o,c,5,0),linethick3, color36c0c1;
vol1:=MA(VOL,5);
vol2:=MA(VOL,10);
vol3:=MA(VOL,20);
量托:=vol1>=vol3 and cross(vol2,vol3) and ref(vol2,1)<ref(vol3,1);
drawtext(量托,l,'▲'),colorwhite;
drawtext(量托,l*0.97,'量托'),colorwhite;
stickline(量托,l,h,0.5,1), colorwhite;
stickline(量托,o,c,5,1),linethick3, colorwhite;
DRAWTEXTREL(10,30,''+STKLABEL+' '+STKNAME),LINETHICK1,Colorgreen;
IF C>0 AND DISPSTATUS=2 and CATEGORY=1 THEN BEGIN
DD:=FINANCE2(35);SS:=FINANCE2(37);FF:=FINANCE2(18);GG:=FINANCE2(3);HH:=DYNAINFO(39);
DRAWTEXTREL(10,100,'总股本:'+NUMTOSTRN(DD,0)+'万' +' 流通A股:'+NUMTOSTRN(SS,0)+'万'),COLORbbffff;
DRAWTEXTREL(10,170,'市盈率:'+NUMTOSTRN(HH,2)+'%'+' 每股收益:'+NUMTOSTRN(GG,3)),COLORbbffff;
DRAWTEXTREL(10,240,'机构评级:'+Extrastring('评级')),color00ffff;
var100:='所属板块:';
if inblock('A股板块')=1 then var100:=var100+',A股板块';
if inblock('B股板块')=1 then var100:=var100+',B股板块';
if inblock('H股')=1 then var100:=var100+',H股';
if inblock('ST')=1 then var100:=var100+',ST';
if inblock('安徽')=1 then var100:=var100+',安徽';
if inblock('奥运')=1 then var100:=var100+',奥运';
if inblock('北京')=1 then var100:=var100+',北京';
if inblock('创投')=1 then var100:=var100+',创投';
if inblock('次新股')=1 then var100:=var100+',次新股';
if inblock('大盘')=1 then var100:=var100+',大盘';
if inblock('大智慧88')=1 then var100:=var100+',大智慧88';
if inblock('低价')=1 then var100:=var100+',低价';
if inblock('电力')=1 then var100:=var100+',电力';
if inblock('电脑')=1 then var100:=var100+',电脑';
if inblock('电器')=1 then var100:=var100+',电器';
if inblock('电子信息')=1 then var100:=var100+',电子信息';
if inblock('房地产')=1 then var100:=var100+',房地产';
if inblock('纺织服装')=1 then var100:=var100+',纺织服装';
if inblock('福建')=1 then var100:=var100+',福建';
if inblock('甘肃')=1 then var100:=var100+',甘肃';
if inblock('钢铁')=1 then var100:=var100+',钢铁';
if inblock('高价')=1 then var100:=var100+',高价';
if inblock('高派现')=1 then var100:=var100+',高派现';
if inblock('工程建筑')=1 then var100:=var100+',工程建筑';
if inblock('供水供气')=1 then var100:=var100+',供水供气';
if inblock('广东')=1 then var100:=var100+',广东';
if inblock('广西')=1 then var100:=var100+',广西';
if inblock('贵州')=1 then var100:=var100+',贵州';
if inblock('海南')=1 then var100:=var100+',海南';
if inblock('河北')=1 then var100:=var100+',河北';
if inblock('河南')=1 then var100:=var100+',河南';
if inblock('黑龙江')=1 then var100:=var100+',黑龙江';
if inblock('湖北')=1 then var100:=var100+',湖北';
if inblock('湖南')=1 then var100:=var100+',湖南';
if inblock('化工')=1 then var100:=var100+',化工';
if inblock('化纤')=1 then var100:=var100+',化纤';
if inblock('基金')=1 then var100:=var100+',基金';
if inblock('基金重仓')=1 then var100:=var100+',基金重仓';
if inblock('机械')=1 then var100:=var100+',机械';
if inblock('吉林')=1 then var100:=var100+',吉林';
if inblock('建材')=1 then var100:=var100+',建材';
if inblock('江苏')=1 then var100:=var100+',江苏';
if inblock('江西')=1 then var100:=var100+',江西';
if inblock('交通工具')=1 then var100:=var100+',交通工具';
if inblock('交通设施')=1 then var100:=var100+',交通设施';
if inblock('教育传媒')=1 then var100:=var100+',教育传媒';
if inblock('金融')=1 then var100:=var100+',金融';
if inblock('可转债')=1 then var100:=var100+',可转债';
if inblock('辽宁')=1 then var100:=var100+',辽宁';
if inblock('旅游酒店')=1 then var100:=var100+',旅游酒店';
if inblock('煤炭石油')=1 then var100:=var100+',煤炭石油';
if inblock('内蒙古')=1 then var100:=var100+',内蒙古';
if inblock('酿酒食品')=1 then var100:=var100+',酿酒食品';
if inblock('宁夏')=1 then var100:=var100+',宁夏';
if inblock('农林牧渔')=1 then var100:=var100+',农林牧渔';
if inblock('农业龙头')=1 then var100:=var100+',农业龙头';
if inblock('其他行业')=1 then var100:=var100+',其他行业';
if inblock('汽车')=1 then var100:=var100+',汽车';
if inblock('汽配')=1 then var100:=var100+',汽配';
if inblock('青海')=1 then var100:=var100+',青海';
if inblock('券商重仓')=1 then var100:=var100+',券商重仓';
if inblock('山东')=1 then var100:=var100+',山东';
if inblock('山西')=1 then var100:=var100+',山西';
if inblock('陕西')=1 then var100:=var100+',陕西';
if inblock('商业连锁')=1 then var100:=var100+',商业连锁';
if inblock('上海')=1 then var100:=var100+',上海';
if inblock('上证180')=1 then var100:=var100+',上证180';
if inblock('上证50')=1 then var100:=var100+',上证50';
if inblock('社保重仓')=1 then var100:=var100+',社保重仓';
if inblock('深成40')=1 then var100:=var100+',深成40';
if inblock('深证100')=1 then var100:=var100+',深证100';
if inblock('深圳')=1 then var100:=var100+',深圳';
if inblock('石化')=1 then var100:=var100+',石化';
if inblock('数字电视')=1 then var100:=var100+',数字电视';
if inblock('四川')=1 then var100:=var100+',四川';
if inblock('送转')=1 then var100:=var100+',送转';
if inblock('天津')=1 then var100:=var100+',天津';
if inblock('通信')=1 then var100:=var100+',通信';
if inblock('外贸')=1 then var100:=var100+',外贸';
if inblock('网络游戏')=1 then var100:=var100+',网络游戏';
if inblock('西藏')=1 then var100:=var100+',西藏';
if inblock('小盘')=1 then var100:=var100+',小盘';
if inblock('新材料')=1 then var100:=var100+',新材料';
if inblock('新疆')=1 then var100:=var100+',新疆';
if inblock('新上海')=1 then var100:=var100+',新上海';
if inblock('医药')=1 then var100:=var100+',医药';
if inblock('仪电仪表')=1 then var100:=var100+',仪电仪表';
if inblock('有色金属')=1 then var100:=var100+',有色金属';
if inblock('预亏预减')=1 then var100:=var100+',预亏预减';
if inblock('预盈预增')=1 then var100:=var100+',预盈预增';
if inblock('云南')=1 then var100:=var100+',云南';
if inblock('运输物流')=1 then var100:=var100+',运输物流';
if inblock('造纸印刷')=1 then var100:=var100+',造纸印刷';
if inblock('浙江')=1 then var100:=var100+',浙江';
if inblock('振兴东北')=1 then var100:=var100+',振兴东北';
if inblock('中价')=1 then var100:=var100+',中价';
if inblock('中盘')=1 then var100:=var100+',中盘';
if inblock('重庆')=1 then var100:=var100+',重庆';
if inblock('自选股')=1 then var100:=var100+',自选股';
if inblock('3G')=1 then var100:=var100+',3G';
if inblock('IPO受益')=1 then var100:=var100+',IPO受益';
if inblock('QFII持股')=1 then var100:=var100+',QFII持股';
if inblock('参股金融')=1 then var100:=var100+',参股金融';
if inblock('创新试点')=1 then var100:=var100+',创新试点';
if inblock('低市净率')=1 then var100:=var100+',低市净率';
if inblock('定向增发')=1 then var100:=var100+',定向增发';
if inblock('封闭基金')=1 then var100:=var100+',封闭基金';
if inblock('股权改革')=1 then var100:=var100+',股权改革';
if inblock('股权激励')=1 then var100:=var100+',股权激励';
if inblock('股权投资')=1 then var100:=var100+',股权投资';
if inblock('航天军工')=1 then var100:=var100+',航天军工';
if inblock('红利')=1 then var100:=var100+',红利';
if inblock('沪深300')=1 then var100:=var100+',沪深300';
if inblock('节能环保')=1 then var100:=var100+',节能环保';
if inblock('每经G股')=1 then var100:=var100+',每经G股';
if inblock('清欠')=1 then var100:=var100+',清欠';
if inblock('权证')=1 then var100:=var100+',权证';
if inblock('外资并购')=1 then var100:=var100+',外资并购';
if inblock('未股改')=1 then var100:=var100+',未股改';
if inblock('稀缺资源')=1 then var100:=var100+',稀缺资源';
if inblock('新能源')=1 then var100:=var100+',新能源';
if inblock('循环经济')=1 then var100:=var100+',循环经济';
if inblock('整体上市')=1 then var100:=var100+',整体上市';
if inblock('中证100')=1 then var100:=var100+',中证100';
end;
DRAWTEXTREL(10,310,var100),color00ffff;
