楚河汉界公式 飞狐楚河汉界指标 源码

指标公式详细说明

改编的[楚河汉界]。

{楚河漢界引用公式}
{公称名称: chus}

aaa:=1;tt:=1;
rc:=(ref(close,1) * aaa);
xa:=if((rc > high),rc,0);
xb:=if(((high >= rc) and (rc > low)),high,0);
xc:=if((rc <= low),high,0);
xd:=((xa + xb) + xc);
ya:=if((rc > high),low,0);
yb:=if(((high >= rc) and (rc > low)),low,0);
yc:=if((rc <= low),rc,0);
yd:=((ya + yb) + yc);
atr:=sma((xd - yd),20,1);
tt1: (ema(close,20) + (2 * atr)),linethick0;
tt2: (ema(close,20) - (2 * atr)),linethick0;
tt3: ((((tt1 + tt1) + tt1) + tt2) / 4),linethick0;
tt4: ((((tt1 + tt2) + tt2) + tt2) / 4),linethick0;
tt5: ema(close,8),linethick0;
tt6: ema(close,20),linethick0;

{西楚霸王}
drawgbk(1,colorrgb(0,0,100),colorrgb(0,0,0),1);
tt:=1;
check:=0;
check1:=0;
aaa:=if((((check = 0) or (check1 = 0)) and (tt = 1)),1,0);
td:=datatype;
tt5:=(if((td = 1),"chus.tt1#min5",if((td = 2),"chus.tt1#min15",if((td = 3),"chus.tt1#min60",if((td = 4),"chus.tt1#min60",if((td = 5),"chus.tt1#day",if((td = 6),"chus.tt1#week","chus.tt1#year")))))) * tt);
tt6:=(if((td = 1),"chus.tt2#min5",if((td = 2),"chus.tt2#min15",if((td = 3),"chus.tt2#min60",if((td = 4),"chus.tt2#min60",if((td = 5),"chus.tt2#day",if((td = 6),"chus.tt2#week","chus.tt2#year")))))) * tt);
a3:=(if((td = 1),"chus.tt3#min5",if((td = 2),"chus.tt3#min15",if((td = 3),"chus.tt3#min60",if((td = 4),"chus.tt3#min60",if((td = 5),"chus.tt3#day",if((td = 6),"chus.tt3#week","chus.tt3#year")))))) * tt);
a4:=(if((td = 1),"chus.tt4#min5",if((td = 2),"chus.tt4#min15",if((td = 3),"chus.tt4#min60",if((td = 4),"chus.tt4#min60",if((td = 5),"chus.tt4#day",if((td = 6),"chus.tt4#week","chus.tt4#year")))))) * tt);
xc:=(if((td = 1),"chus.tt5#min5",if((td = 2),"chus.tt5#min15",if((td = 3),"chus.tt5#min60",if((td = 4),"chus.tt5#min60",if((td = 5),"chus.tt5#day",if((td = 6),"chus.tt5#week","chus.tt5#year")))))) * tt);
xd:=(if((td = 1),"chus.tt6#min5",if((td = 2),"chus.tt6#min15",if((td = 3),"chus.tt6#min60",if((td = 4),"chus.tt6#min60",if((td = 5),"chus.tt6#day",if((td = 6),"chus.tt6#week","chus.tt6#year")))))) * tt);
fillrgn(((xc >= xd) and (aaa = 1)),ema(tt5,4),ema(tt6,4)),color9933cc;
fillrgn(((xc < xd) and (aaa = 1)),ema(tt5,4),ema(tt6,4)),colorfccf00;
fillrgn(((ema(close,8) >= ema(close,20)) and (aaa = 1)),ema(a3,4),ema(a4,4)),colorff99cc;
fillrgn(((ema(close,8) < ema(close,20)) and (aaa = 1)),ema(a3,4),ema(a4,4)),colorccff66;
fo:=if(checkuser(1),open,0);
fh:=if(checkuser(1),high,0);
fl:=if(checkuser(1),low,0);
fc:=if(checkuser(1),close,0);
<%

vo=ffl.vardata("fo")
vh=ffl.vardata("fh")
vl=ffl.vardata("fl")
vc=ffl.vardata("fc")
last=ubound(vc)

vc(0)=(vh(0)+vl(0)+2*vc(0))/4
for i=1 to last
vo(i)=(vo(i-1)+vc(i-1))/2
if vo(i)>vh(i) then vh(i)=vo(i) else vh(i)=vh(i)
if vo(i)<vl(i) then vl(i)=vo(i) else vl(i)=vl(i)
vc(i)=(2*vc(i)+vh(i)+vl(i))/4
next

ffl.vardata("fo")=vo
ffl.vardata("fh")=vh
ffl.vardata("fl")=vl
ffl.vardata("fc")=vc

%>
kk:=if(((fc >= fo) and ((fc >= ref(fc,1)) or (ref(fc,1) >= ref(fo,1)))),1,if(((fc < fo) and ((fc < ref(fo,1)) or (ref(fc,1) < ref(fo,1)))),(0 - 1),0));
明日轉折:(round(((fo + fc) / 2)) * aaa),shift1,linethick0,color0000ff;
今日轉折:=round(if((kk = 1),min(fc,fo),if((kk = (0 - 1)),max(fc,fo),if((ref(kk,1) = 1),min(fc,fo),if((ref(kk,1) = (0 - 1)),max(fc,fo),((fc + fo) / 2))))));
drawnumber((islastbar and (aaa = 1)),明日轉折,round(明日轉折),2),shift1,colorred;
stickline((((fc > fo) and (tt = 1)) and (aaa = 1)),fh,fl,0.4,0),colorff;
stickline((((fo > fc) and (tt = 1)) and (aaa = 1)),fh,fl,0.4,0),colorff0000;
stickline(((((kk = 1) and (fc >= fo)) and (tt = 1)) and (aaa = 1)),fo,fc,8,0),colorff;
stickline(((((kk = 1) and (fc < fo)) and (tt = 1)) and (aaa = 1)),fo,fc,8,0),colorff;
stickline(((((kk = (0 - 1)) and (fc >= fo)) and (tt = 1)) and (aaa = 1)),fo,fc,8,0),colorff0000;
stickline(((((kk = (0 - 1)) and (fc < fo)) and (tt = 1)) and (aaa = 1)),fo,fc,8,0),colorff0000;
stickline(((((kk = 0) and (fc >= fo)) and (tt = 1)) and (aaa = 1)),fo,fc,8,0),colorff;
stickline(((((kk = 0) and (fc < fo)) and (tt = 1)) and (aaa = 1)),fo,fc,8,0),colorff;
cc:=(close * tt);
diff:=(ema(cc,26) - ema(cc,52));
dea:=ema(diff,52);
macd:=(2 * (diff - dea));
dif:=(ema(cc,26) - ema(cc,52));
ess:=ema(cc,26);
egg:=ema(cc,52);
rdif:=ref(dif,1);
rss:=ref(ess,1);
rgg:=ref(egg,1);
rdea:=ref(dea,1);
rmacd:=ref(macd,1);
rzzz:=(rdea + (((52 + 1) / (2 * (52 - 1))) * rmacd));
xdif:=((((((52 - 1) * (26 + 1)) * rgg) - (((52 + 1) * (26 - 1)) * rss)) + (((26 + 1) * (52 + 1)) * rdif)) / ((2 * 52) - (2 * 26)));
xdea:=((((((52 - 1) * (26 + 1)) * rgg) - (((52 + 1) * (26 - 1)) * rss)) + (((26 + 1) * (52 + 1)) * rdea)) / ((2 * 52) - (2 * 26)));
xmacd:=((((((52 - 1) * (26 + 1)) * rgg) - (((52 + 1) * (26 - 1)) * rss)) + (((26 + 1) * (52 + 1)) * rzzz)) / ((2 * 52) - (2 * 26)));
aa:=islastbar;
bb:=backset((aa = 1),1);
y:=barslast((bb = 1));
x:=1;
tdif:=(dif * x);
tss:=(ess * x);
tgg:=(egg * x);
tdea:=(dea * x);
tmacd:=(macd * x);
tzzz:=(tdea + (((52 + 1) / (2 * (52 - 1))) * tmacd));
西楚霸王:(((((((((52 - 1) * (26 + 1)) * tgg) * aaa) - ((((52 + 1) * (26 - 1)) * tss) * aaa)) + (((26 + 1) * (52 + 1)) * tdif)) * aaa) / ((2 * 52) - (2 * 26))) * aaa);
partline(((西楚霸王 >= ref(西楚霸王,1)) and (aaa = 1)),西楚霸王),linethick3,colorff;
partline(((西楚霸王 < ref(西楚霸王,1)) and (aaa = 1)),西楚霸王),linethick3,colorff00;

q5:=ma(ema(tt6,4),4);
q6:=ma(ema(a3,4),4);
q7:=ma(ema(a4,4),4);
q8:=ma(ema(tt5,4),4);
stickline(cross(backset(islastbar,10),1) and aaa=1,ema(ema(tt6,4),4),ema(ema(tt6,4),4),10,0),linethick3,color80;
stickline(cross(backset(islastbar,9),1) and aaa=1,ref(ema(ema(tt6,4),4),1),ref(ema(ema(tt6,4),4),1),10,0),linethick3,color80;
stickline(cross(backset(islastbar,8),1) and aaa=1,ref(ema(ema(tt6,4),4),2),ref(ema(ema(tt6,4),4),2),10,0),linethick3,color80;
stickline(cross(backset(islastbar,7),1) and aaa=1,ref(ema(ema(tt6,4),4),3),ref(ema(ema(tt6,4),4),3),10,0),linethick3,color80;
stickline(cross(backset(islastbar,6),1) and aaa=1,ref(ema(ema(tt6,4),4),4),ref(ema(ema(tt6,4),4),4),10,0),linethick3,color80;
stickline(cross(backset(islastbar,5),1) and aaa=1,ref(ema(ema(tt6,4),4),5),ref(ema(ema(tt6,4),4),5),10,0),linethick3,color80;
stickline(cross(backset(islastbar,4),1) and aaa=1,ref(ema(ema(tt6,4),4),6),ref(ema(ema(tt6,4),4),6),10,0),linethick3,color80;
stickline(cross(backset(islastbar,3),1) and aaa=1,ref(ema(ema(tt6,4),4),7),ref(ema(ema(tt6,4),4),7),10,0),linethick3,color80;
stickline(cross(backset(islastbar,2),1) and aaa=1,ref(ema(ema(tt6,4),4),8),ref(ema(ema(tt6,4),4),8),10,0),linethick3,color80;
stickline(cross(backset(islastbar,1),1) and aaa=1,ref(ema(ema(tt6,4),4),9),ref(ema(ema(tt6,4),4),9),10,0),linethick3,color80;
drawnumber(cross(backset(islastbar,1),1) and aaa=1,ref(ema(ema(tt6,4),4),9),ref(ema(ema(tt6,4),4),9),1),shift1;
stickline(cross(backset(islastbar,10),1) and aaa=1,ema(ema(tt5,4),4),ema(ema(tt5,4),4),10,0),linethick3,color80;
stickline(cross(backset(islastbar,9),1) and aaa=1,ref(ema(ema(tt5,4),4),1),ref(ema(ema(tt5,4),4),1),10,0),linethick3,color80;
stickline(cross(backset(islastbar,8),1) and aaa=1,ref(ema(ema(tt5,4),4),2),ref(ema(ema(tt5,4),4),2),10,0),linethick3,color80;
stickline(cross(backset(islastbar,7),1) and aaa=1,ref(ema(ema(tt5,4),4),3),ref(ema(ema(tt5,4),4),3),10,0),linethick3,color80;
stickline(cross(backset(islastbar,6),1) and aaa=1,ref(ema(ema(tt5,4),4),4),ref(ema(ema(tt5,4),4),4),10,0),linethick3,color80;
stickline(cross(backset(islastbar,5),1) and aaa=1,ref(ema(ema(tt5,4),4),5),ref(ema(ema(tt5,4),4),5),10,0),linethick3,color80;
stickline(cross(backset(islastbar,4),1) and aaa=1,ref(ema(ema(tt5,4),4),6),ref(ema(ema(tt5,4),4),6),10,0),linethick3,color80;
stickline(cross(backset(islastbar,3),1) and aaa=1,ref(ema(ema(tt5,4),4),7),ref(ema(ema(tt5,4),4),7),10,0),linethick3,color80;
stickline(cross(backset(islastbar,2),1) and aaa=1,ref(ema(ema(tt5,4),4),8),ref(ema(ema(tt5,4),4),8),10,0),linethick3,color80;
stickline(cross(backset(islastbar,1),1) and aaa=1,ref(ema(ema(tt5,4),4),9),ref(ema(ema(tt5,4),4),9),10,0),linethick3,color80;
drawnumber(cross(backset(islastbar,1),1) and aaa=1,ref(ema(ema(tt5,4),4),9),ref(ema(ema(tt5,4),4),9),1),shift1;
stickline(cross(backset(islastbar,10),1) and aaa=1,ema(ema(a3,4),4),ema(ema(a3,4),4),10,0),linethick3,color80;
stickline(cross(backset(islastbar,9),1) and aaa=1,ref(ema(ema(a3,4),4),1),ref(ema(ema(a3,4),4),1),10,0),linethick3,color80;
stickline(cross(backset(islastbar,8),1) and aaa=1,ref(ema(ema(a3,4),4),2),ref(ema(ema(a3,4),4),2),10,0),linethick3,color80;
stickline(cross(backset(islastbar,7),1) and aaa=1,ref(ema(ema(a3,4),4),3),ref(ema(ema(a3,4),4),3),10,0),linethick3,color80;
stickline(cross(backset(islastbar,6),1) and aaa=1,ref(ema(ema(a3,4),4),4),ref(ema(ema(a3,4),4),4),10,0),linethick3,color80;
stickline(cross(backset(islastbar,5),1) and aaa=1,ref(ema(ema(a3,4),4),5),ref(ema(ema(a3,4),4),5),10,0),linethick3,color80;
stickline(cross(backset(islastbar,4),1) and aaa=1,ref(ema(ema(a3,4),4),6),ref(ema(ema(a3,4),4),6),10,0),linethick3,color80;
stickline(cross(backset(islastbar,3),1) and aaa=1,ref(ema(ema(a3,4),4),7),ref(ema(ema(a3,4),4),7),10,0),linethick3,color80;
stickline(cross(backset(islastbar,2),1) and aaa=1,ref(ema(ema(a3,4),4),8),ref(ema(ema(a3,4),4),8),10,0),linethick3,color80;
stickline(cross(backset(islastbar,1),1) and aaa=1,ref(ema(ema(a3,4),4),9),ref(ema(ema(a3,4),4),9),10,0),linethick3,color80;
drawnumber(cross(backset(islastbar,1),1) and aaa=1,ref(ema(ema(a3,4),4),9),ref(ema(ema(a3,4),4),9),1),shift1;
stickline(cross(backset(islastbar,10),1) and aaa=1,ema(ema(a4,4),4),ema(ema(a4,4),4),10,0),linethick3,color80;
stickline(cross(backset(islastbar,9),1) and aaa=1,ref(ema(ema(a4,4),4),1),ref(ema(ema(a4,4),4),1),10,0),linethick3,color80;
stickline(cross(backset(islastbar,8),1) and aaa=1,ref(ema(ema(a4,4),4),2),ref(ema(ema(a4,4),4),2),10,0),linethick3,color80;
stickline(cross(backset(islastbar,7),1) and aaa=1,ref(ema(ema(a4,4),4),3),ref(ema(ema(a4,4),4),3),10,0),linethick3,color80;
stickline(cross(backset(islastbar,6),1) and aaa=1,ref(ema(ema(a4,4),4),4),ref(ema(ema(a4,4),4),4),10,0),linethick3,color80;
stickline(cross(backset(islastbar,5),1) and aaa=1,ref(ema(ema(a4,4),4),5),ref(ema(ema(a4,4),4),5),10,0),linethick3,color80;
stickline(cross(backset(islastbar,4),1) and aaa=1,ref(ema(ema(a4,4),4),6),ref(ema(ema(a4,4),4),6),10,0),linethick3,color80;
stickline(cross(backset(islastbar,3),1) and aaa=1,ref(ema(ema(a4,4),4),7),ref(ema(ema(a4,4),4),7),10,0),linethick3,color80;
stickline(cross(backset(islastbar,2),1) and aaa=1,ref(ema(ema(a4,4),4),8),ref(ema(ema(a4,4),4),8),10,0),linethick3,color80;
stickline(cross(backset(islastbar,1),1) and aaa=1,ref(ema(ema(a4,4),4),9),ref(ema(ema(a4,4),4),9),10,0),linethick3,color80;
drawnumber(cross(backset(islastbar,1),1) and aaa=1,ref(ema(ema(a4,4),4),9),ref(ema(ema(a4,4),4),9),1),shift1;
jt:=(ref(ema(ema(a3,4),4),9)+ref(ema(ema(a4,4),4),9))/2;
stickline(islastbar and aaa=1,jt,jt,12,0);
drawnumber(cross(backset(islastbar,1) and aaa=1,1),jt,jt,1),shift1;
a00:=ma(close,22);
a03:=(ema(high,5)+ema(low,5)+ema(close,5)*2)/4;
a04:=ref(a03,1);
a02:=fo>fc and kk=0 and fc<fo and aaa=1;

drawicon(close>o,low,4),align5;
drawicon(close<o,low,5),align5;
stickline(fc>fo and tt=1 and aaa=1,fh,fl,0.4,0),colorff;
stickline(fo>fc and tt=1 and aaa=1,fh,fl,0.4,0),colorff0000;
stickline(kk=1 and fc>=fo and tt=1 and aaa=1,fo,fc,8,0),colorff;
stickline(kk=1 and fc<fo and tt=1 and aaa=1,fo,fc,8,0),colorff;
stickline(kk=-1 and fc>=fo and tt=1 and aaa=1,fo,fc,8,0),colorff0000;
stickline(kk=-1 and fc<fo and tt=1 and aaa=1,fo,fc,8,0),colorff0000;
stickline(kk=0 and fc>=fo and tt=1 and aaa=1,fo,fc,8,0),colorff;
stickline(kk=0 and fc<fo and tt=1 and aaa=1,fo,fc,8,0),colorff;

gj:=if(c=indexc,(indexc+indexh+indexl+indexo)/4,amount/(v+0.01)/100);
明日阻力:=l+(gj-l)+(c-l);
明日支撑:=l+(c-gj);
今日阻力:ref(明日阻力 , 1),linethick0;
今日支撑:ref(明日支撑 , 1),linethick0;
stickline(barstatus=2 and c>=今日阻力,今日阻力,今日阻力,20,0),color0000ff;
stickline(barstatus=2 and c<今日阻力,今日阻力,今日阻力,20,0),color00ff00;
stickline(barstatus=2 and c>=今日支撑,今日支撑,今日支撑,20,0),colorff00ff;
stickline(barstatus=2 and c<今日支撑,今日支撑,今日支撑,20,0),colorff0000;

drawtextex(1,1,200,30,stklabel+' '+stkname),linethick6,colorffff80;
wyy1:=weekday,linethick0;
wwj:=' 星期';
wwjj:=if(wyy1=5 ,wwj+'五',if(wyy1=4 ,wwj+'四',
if(wyy1=3 ,wwj+'三',if(wyy1=2 ,wwj+'二',if(wyy1=1 ,wwj+'1',wwj)))));
wyy2:=lmonth;
wyy3:=lday;
www:=if( barstatus=2 ,' 农历 '+numtostr(wyy2,0)+'月 '+numtostr(wyy3,0)+'日',' ');
wwh:=if( barstatus=2 ,numtostr(date+1000000,0),' ' );
drawtextex(1,1,120 ,30 ,' '+wwh+wwjj+www),linethick3,color00ffff;
drawtextex(1,1,20,30,'楚河*<^o^>*汉界'),linethick6,color0000ff;
hh:=dynainfo(39);
dd:=finance( 1);
ss:=finance( 7);
ff:=finance(18);
gg:=finance(33);
zz:=finance(53);
jj:=finance(40);
mm:=jj/ss;
th:=dynainfo(39);
换手率:=100*v/capital,colorffffff;
rh:=h-l;
r:=dynainfo(13)*100;
drawtextex(1,1,20,840,'当日振幅:'+numtostr(r,2)+'% '+numtostr(rh,2)+'元 '+' 当前换手率:'+numtostr(换手率,2)+'% '),colorffffff;
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('重庆')=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+' 股权投资';
drawtextex(1,1,20,960,var100),color00ffff;
drawtextex(1,1,20,900,'总股本:'+numtostr(dd,0)+'万股' +' 流通a股:'+numtostr(ss,0)+'万股'+' 市盈率:'+numtostr(hh,2)+'%'+' 每股收益:'+numtostr(gg,3)),colorbbffff;

var1111:=backset(ref(high,2)=hhv(high,5),3);
var2222:=cross(var1111,0.9);
var3333:=backset(ref(low,2)=llv(low,5),3);
var4444:=cross(var3333,0.9);
压力: ref(high,barslast(var2222)), pointdot,colorea91b5;
stickline(close,ref(high,barslast(var2222)),ref(high,barslast(var2222)),5,0),colorea91b5;
支撑: ref(low,barslast(var4444)), pointdot,color00b4ff;
stickline(close,ref(low,barslast(var4444)),ref(low,barslast(var4444)),5,0),color00b4ff;

下档线:=(((close - llv(low,13)) / (hhv(high,13) - llv(low,13))) * 100);
arsv:=sma(下档线,3,1);
ak:=sma(arsv,3,1);
ad:=((3 * arsv) - (2 * ak));
aj12:=(((close - llv(low,55)) / (hhv(high,55) - llv(low,55))) * 100);
arsv24:=sma(aj12,3,1);
ak24:=sma(arsv24,3,1);
ad24:=((3 * arsv24) - (2 * ak24));
撑压位:=if(cross(ad24,ad),high,ref(high,barslast(cross(ad24,ad))));
底:=llv(high,30);
stickline(barstatus=2 ,撑压位,撑压位,40,1),linethick1,colorffffff;
drawtext(barstatus=2 ,撑压位,' 撑压'),colorffffff;
stickline(barstatus=2 ,底,底,40,1),color00ff00,linethick1;
drawtext(barstatus=2 ,底,' 底线'),color00ff00;
partline(c>0,c*2-ref(c,3)),shift3,color005555;
partline(c>0,ref(c,1)*2-ref(c,4)),shift2,color005500;
partline(c>0,ref(c,2)*2-ref(c,5)),shift1,color55335;

指标公式下载地址

上一指标公式：09年成功率90%以上的超级选股公式 飞狐公式选股指标 源码

下一指标公式：自用云彩布林公式 飞狐云彩布林指标 源码

相关飞狐公式推荐

指标公式下载注意

☉ 好公式网发布的指标公式主要用于软件技术面分析，仅供参考，勿用于实际操作，据此操作风险自负！

☉ 解压密码：www.goodgongshi.com 就是好公式网域名，希望大家看清楚，切勿输错。

☉ tnc和tni格式指标公式，仅可以用通达信软件引入使用，例如可以用通达信软件引入使用指标公式；

☉ tne格式指标公式，仅可以用通达信软件公式编辑器5.0版导入，高版本兼容低版本；

☉ fnc格式指标公式，可以用大智慧软件新一代高速行情分析系统股票软件使用，少部分可以用分析家软件引入使用；

☉ alg格式指标公式，仅仅可以用飞狐交易师软件引入使用；exp格式指标公式，仅可以用大智慧经典版软件引入使用；

☉ hxf格式指标公式，仅可以用同花顺软件引入使用。

☉ 如果您发现下载软件链接错误，请联系管理员报告错误。

☉ 好公式网欢迎各位网友帮忙宣传转发本站网址，有您的支持，我们会做得更好！

☉ 本文楚河汉界公式 飞狐楚河汉界指标 源码仅供学习研究。