整数小写¥:黄金分割

来源:百度文库 编辑:中财网 时间:2024/05/02 13:16:50
{W黄金分割}

{wafox黄金分割(分析家主图)}
MA5:MA(CLOSE,5),linethick0;
MA10:MA(CLOSE,10),linethick0;
MA20:MA(CLOSE,20),linethick0;
MA30:MA(CLOSE,30),linethick0;
m60:MA(C,60),linethick0;
m89:MA(C,89),linethick0;
m152:ma(c,152),linethick0;
m246:ma(c,246),linethick0;
tj1:=c>=MA20;
tj2:=cSTICKLINE(tj1,l,h,0,0),color1122ff;
STICKLINE(tj1,o,c,7,0),color1122ff;
STICKLINE(tj2,l,h,0,0),color22ff55;
STICKLINE(tj2,o,c,7,0),color22ff55;
lhnh:=BARSLAST(DISPSTATUS=1)+1;
nnl:=DISPSTATUS=2;
qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));
hh:=HHV(h ,lhnh);
ll:=llV(l ,lhnh);
q809:=ll+(hh-ll)*0.809;
q618:=ll+(hh-ll)*0.618;
q500:=ll+(hh-ll)*0.5;
q382:=ll+(hh-ll)*0.382;
q191:=ll+(hh-ll)*0.191;
PARTLINE(hh,qqqq,RGB(255,18,28));
PARTLINE(q191,qqqq,RGB(198,248,248));
PARTLINE(q382,qqqq,RGB(18,108,208));
PARTLINE(q500,qqqq,RGB(198,8,118));
PARTLINE(q618,qqqq,RGB(98,98,228));
PARTLINE(q809,qqqq,RGB(158,228,158));
PARTLINE(ll,qqqq,RGB(238,238,28));
DRAWTEXT(nnl,hh*0.998,'最高价:'+hh),ALIGN2,Color00FFFF;
DRAWTEXT(nnl,q809,'19.1%:'+q809),ALIGN2,Color00FFFF;
DRAWTEXT(nnl,q618,'38.2%:'+q618),ALIGN2,Color00FFFF;
DRAWTEXT(nnl,q500,'50%:'+q500),ALIGN2,Color00FFFF;
DRAWTEXT(nnl,q382,'61.8%:'+q382),ALIGN2,Color00FFFF;
DRAWTEXT(nnl,q191,'80.9%:'+q191),ALIGN2,Color00FFFF;
DRAWTEXT(nnl,ll*1.01,'最低价:'+ll),ALIGN2,VALIGN2,Color00FFFF;
DRAWTEXT(nnl,hh,' K'),ColorFF9900,VALIGN0,linethick3;
DRAWTEXT(nnl,ll+(hh-ll)*0.85,' 线'),ColorFF9900,VALIGN1,linethick3;
DRAWTEXT(nnl,ll+(hh-ll)*0.71,' 有'),ColorFF9900,VALIGN1,linethick3;
DRAWTEXT(nnl,ll+(hh-ll)*0.57,' 路'),ColorFF9900,VALIGN1,linethick3;
DRAWTEXT(nnl,ll+(hh-ll)*0.43,' 勤'),ColorFF9900,VALIGN1,linethick3;
DRAWTEXT(nnl,ll+(hh-ll)*0.29,' 为'),ColorFF9900,VALIGN1,linethick3;
DRAWTEXT(nnl,ll+(hh-ll)*0.15,' 径'),ColorFF9900,VALIGN1,linethick3;
DRAWTEXT(nnl,ll,' acbs'),color1122ff,VALIGN2,linethick3;
DRAWTEXT(nnl,hh,'  股'),ColorFF00FF,VALIGN0,linethick3;
DRAWTEXT(nnl,ll+(hh-ll)*0.85,'  海'),ColorFF00FF,VALIGN1,linethick3;
DRAWTEXT(nnl,ll+(hh-ll)*0.71,'  无'),ColorFF00FF,VALIGN1,linethick3;
DRAWTEXT(nnl,ll+(hh-ll)*0.57,'  涯'),ColorFF00FF,VALIGN1,linethick3;
DRAWTEXT(nnl,ll+(hh-ll)*0.43,'  苦'),ColorFF00FF,VALIGN1,linethick3;
DRAWTEXT(nnl,ll+(hh-ll)*0.29,'  作'),ColorFF00FF,VALIGN1,linethick3;
DRAWTEXT(nnl,ll+(hh-ll)*0.15,'  舟'),ColorFF00FF,VALIGN1,linethick3;
DRAWTEXT(nnl,ll,'  制作'),Color80FFFF,VALIGN2,linethick3;
解:=' 净资产='+NUMTOSTRN(FINANCE(35),3 )+' 每股收益='+ NUMTOSTRN(FINANCE(33),3)+' 公积金='+NUMTOSTRN(FINANCE(18),3)+' 未分利润='+NUMTOSTRN(FINANCE(32),3)+' 市盈率='+NUMTOSTRN(DYNAINFO(39),2)+' 振幅='+ NUMTOSTRN((h/l-1)*100,2)+'%'+' 换手率='+ NUMTOSTRN(100*VOL/CAPITAL,2)+'%';
盘:='总股本='+NUMTOSTRN(FINANCE(1) ,0 )+'万股'+' 流通A股='+ NUMTOSTRN(FINANCE(7),0)+'万股'+' 总资产='+NUMTOSTRN(FINANCE(10),3)+'千元';

if DISPSTATUS=2 then a:=BARPOS;
if DISPSTATUS=1 then b:=BARPOS;

d:=a-b;
e:=hhv(h,d);

DRAWTEXT(1, e*1.135,解),COLOR00FFFF,ALIGN2;
DRAWTEXT(1, e*1.10,盘),COLORFFFF00,ALIGN2;
DRAWTEXTREL(10,105,'代码:'+STKLABEL+' 名称:'+STKNAME),LINETHICK1,Color0000ff;
DRAWTEXTREL(10,140,'总股本:'+NUMTOSTRN(FINANCE(1),0)+'万股' +' 流通A股:'+NUMTOSTRN(FINANCE(7),0)+'万股'),COLORffffff;
DRAWTEXTREL(10,180,'市盈率:'+NUMTOSTRN(DYNAINFO(39),2)+'%'+' 每股收益:'+NUMTOSTRN(FINANCE(33),3)+'元'+' 每股公积金:'+NUMTOSTRN(FINANCE(18),3)+'元'),colorffffff;
DRAWTEXTREL(10,220,'机构评级:'+Extrastring('评级')),colorffffff;
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,';
DRAWTEXTREL(10,260,var100),colorffffff;
【上市年】:=REF(YEAR,BARSCOUNT(C)-1);
【月】:=REF(MONTH,BARSCOUNT(C)-1);
【日】:=REF(DAY,BARSCOUNT(C)-1);
DRAWTEXTREL(10,300,'(上市日期:'+NUMTOSTRN(【上市年】,0)+'年'+NUMTOSTRN(【月】,0)+'月'+NUMTOSTRN(【日】,0)+'日'),COLOR00ffff,LINETHICK1;DRAWTEXTREL(800,920,'**'),Colorffffff,LINETHICK2;