葛洲坝紫郡府:飞狐公式 霸占大牛股原码

来源:百度文库 编辑:中财网 时间:2024/05/09 14:24:44

飞狐    霸占大牛股原码

b:=BARSCOUNT(C)=SYSPARAM(2);
d:=BARSLAST(b);
hh:=hhv(h,d);
DRAWTEXT(BARSTATUS=2,hh,STKLABEL+‘ ‘+STKNAME+‘                                                                                                          ‘),ColorFFFF80,pxdn20,align4,align2;
换手率:=100*v/capital,colorfffFff;
RH:=H-L;
R:=DYNAINFO(13)*100;
DRAWTEXT(BARSTATUS=2,hh,‘当日振幅:‘+NUMTOSTR(R,2)+‘%  ‘+NUMTOSTR(RH,2)+‘元 ‘+‘  当前换手率:‘+NUMTOSTR(换手率,2)+‘%  ‘+‘                                                      ‘),ColorFFFFFF,pxdn20,align4,align2;
DRAWTEXT(BARSTATUS=2,hh,‘  机构评级:‘+selfstring(‘评级‘)+‘  ‘),colorffffff,pxdn80,align4,align2;
gj:=if(c=INDEXC,(INDEXC+INDEXh+INDEXl+INDEXO)/4,AMOUNT/(v+0.01)/100);
明日阻力:=l+(gj-l)+(c-l);
明日支撑:=l+(c-gj);
今日阻力:=REF(明日阻力 , 1);
今日支撑:=REF(明日支撑 , 1);
STICKLINE(BARSTATUS=2  and c>=今日阻力,今日阻力,今日阻力,30,0),Color0000FF;
STICKLINE(BARSTATUS=2  and c<今日阻力,今日阻力,今日阻力,30,0),Color00FF00;
STICKLINE(BARSTATUS=2  and c>=今日支撑,今日支撑,今日支撑,30,0),ColorFF00FF;
STICKLINE(BARSTATUS=2  and c<今日支撑,今日支撑,今日支撑,30,0),,Color0000FF;
DRAWTEXT(BARSTATUS=2 ,hh,‘----------------------------------          ‘),ColorFFFFFF,pxdn2,align4,align2;
DRAWTEXT(BARSTATUS=2 and c>=今日支撑,hh,‘  今日支撑=:‘+NUMTOSTR(今日支撑 ,2 )+‘          ‘),ColorFF00FF,pxdn50,align4,align2;
DRAWTEXT(BARSTATUS=2 and c<今日支撑,hh,‘  今日支撑=:‘+NUMTOSTR(今日支撑 ,2 )+‘          ‘),,Color0000FF,pxdn50,align4,align2;
DRAWTEXT(BARSTATUS=2 and c>=今日阻力,hh,‘  今日阻力=:‘+NUMTOSTR(今日阻力 ,2 )+‘          ‘),align4,Color0000FF,pxdn20,align2;
DRAWTEXT(BARSTATUS=2 and c<今日阻力,hh,‘  今日阻力=:‘+NUMTOSTR(今日阻力 ,2 )+‘          ‘),Color00FF00,pxdn20,align4,align2;
DRAWTEXT(BARSTATUS=2 ,hh,‘  明日阻力=:‘+NUMTOSTR(明日阻力 ,2 )+‘                              ‘),Color00FFFF,pxdn20,align4,align2;
DRAWTEXT(BARSTATUS=2 ,hh,‘  明日支撑=:‘+NUMTOSTR(明日支撑 ,2 )+‘                              ‘),Color00FFFF,pxdn50,align4,align2;
DRAWTEXT(BARSTATUS=2 ,hh,‘----------------------------------          ‘),ColorFFFFFF,pxdn70,align4,align2;
DRAWTEXT(BARSTATUS=2 and v>ref(v,1) and ma(v,5)>ref(ma(v,5),1),hh,‘今日成交量大于昨日,且有继续增大趋势‘+‘          ‘),Color8285FF,pxdn90,align4,align2;
DRAWTEXT(BARSTATUS=2 and vref(ma(v,5),1),hh,‘今日成交量小于昨日,但有放大迹象‘+‘          ‘),Color8285FF,pxdn90,align4,align2;
DRAWTEXT(BARSTATUS=2 and v>ref(v,1)and ma(v,5)DRAWTEXT(BARSTATUS=2 and vvar100:=‘所属板块:‘;
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(‘陕西‘)=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(‘H股‘)=1 then var100:=var100+‘ H股‘;
if inblock(‘QFII持股‘)=1 then var100:=var100+‘ QFII持股‘;
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+‘ 股权投资‘;
DRAWTEXT(BARSTATUS=2,hh,var100+‘            ‘),COLORbbffff,pxdn110,align4,align2;
DD:=FINANCE( 1);
SS:=FINANCE( 7);
FF:=FINANCE(18);
GG:=FINANCE(33);
zz:=FINANCE(53);
JJ:=FINANCE(40);
MM:=JJ/SS;
TH:=DYNAINFO(39);
DRAWTEXT(BARSTATUS=2,hh,‘总股本:‘+NUMTOSTR(DD,0)+‘万股‘ +‘ 流通A股:‘+NUMTOSTR(SS,0)+‘万股‘+‘ 市盈率:‘+NUMTOSTR(HH,2)+‘%‘+‘  每股收益:‘+NUMTOSTR(GG,3)+‘                                                        ‘),COLORbbffff,pxdn50,align4,align2;
M5:EMA(C,34),COLORFFAA66,LINETHICK2;
M6:EMA(C,55),COLORBLUE,LINETHICK3;
M7:MA(C,75),COLOR00FFFF,LINETHICK1;
M8:EMA(M7,3),COLOR00FFFF,LINETHICK1;
M9:EMA(M8,3),COLOR00FFFF,LINETHICK1;
M11:EMA(M9,3),COLOR00FFFF,LINETHICK1;
MA47:EMA(CLOSE,44),COLORFFAA66,LINETHICK2;
MA60:EMA(CLOSE,60),COLORBLUE,LINETHICK3;
Y:=(H+L)/5;
AO:=MA(Y,5)-MA(Y,34 );
DU0:=CROSS(AO,0);
UD0:=CROSS(0,AO);
TDU0:=BARSLAST(DU0);
TUD0:=BARSLAST(UD0);
DU3:=REF(DU0,1);
UD3:=REF(UD0,1);
TDU3:=BARSLAST(DU3);
TUD3:=BARSLAST(UD3);
UDGLINE:=IF(TDU3JDU0:=REF(C,1)<=REF(UDGLINE,1) AND C>UDGLINE AND TDU0JUD0:=REF(C,1)>=REF(UDGLINE,1) AND CJDU1:=JDU0 AND COUNT(JDU0,TDU0)=1;
JUD1:=JUD0 AND COUNT(JUD0,TUD0)=1;
JDU2:=JDU1 AND REF(BARSLAST(JUD1),1)JUD2:=JUD1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1);
JDU3:=JDU1 AND REF(BARSLAST(JUD1),1)>REF(BARSLAST(JDU1),1);
JUD3:=JUD1 AND REF(BARSLAST(JUD1),1)DRAWTEXT(JDU2,M9*0.90,‘【锁定】‘),COLORYELLOW;
DRAWTEXT(CROSS(M6,M9),M9*0.98,‘【霸占】‘),COLOR0000FF;
HH:=HIGH; LL:=LOW; OO:=OPEN; CC:=CLOSE;
<%
vh=ffl.vardata("hh")
vl=ffl.vardata("ll")
vo=ffl.vardata("oo")
vc=ffl.vardata("cc")
last=ubound(vh)
if last<101 then
b=last+1
else
b=0
for i=last-101 to last-51
  vh(i)=vh(i+51)
  vl(i)=vl(i+51)
  vo(i)=vo(i+51)
  vc(i)=vc(i+51)
next
a=(vh(last-51)+vl(last-51))/2
j=1
for i=last-49 to last
  j=j+2
  vh(i)=2*a-vl(i-j)
  vl(i)=2*a-vh(i-j)
  vo(i)=2*a-vc(i-j)
  vc(i)=2*a-vo(i-j)
next
end if
ffl.vardata("hh")=vh
ffl.vardata("ll")=vl
ffl.vardata("oo")=vo
ffl.vardata("cc")=vc
ffl.varstartindex("hh")=b
ffl.varstartindex("ll")=b
ffl.varstartindex("oo")=b
ffl.varstartindex("cc")=b
%>