楚河漢界(楚河汉界)
{楚河漢界引用公式}
{公称名称: 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;
{西楚霸王}
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)),color9966cc;
fillrgn(((xc < xd) and (aaa = 1)),ema(tt5,4),ema(tt6,4)),colorffff00;
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)),colorffff99;
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,colorffff;
今日轉折:=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),shift3;
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;
上一指标公式:横盘新高指标公式下载 飞狐新高 源码 贴图
下一指标公式:主力建仓点指标公式下载 飞狐建仓 源码 贴图
☉ 好公式网发布的指标公式主要用于软件技术面分析,仅供参考,勿用于实际操作,据此操作风险自负!
☉ 解压密码:www.goodgongshi.com 就是好公式网域名,希望大家看清楚,切勿输错。
☉ tnc和tni格式指标公式,仅可以用通达信软件引入使用,例如可以用通达信软件引入使用指标公式;
☉ tne格式指标公式,仅可以用通达信软件公式编辑器5.0版导入,高版本兼容低版本;
☉ fnc格式指标公式,可以用大智慧软件新一代高速行情分析系统股票软件使用,少部分可以用分析家软件引入使用;
☉ alg格式指标公式,仅仅可以用飞狐交易师软件引入使用;exp格式指标公式,仅可以用大智慧经典版软件引入使用;
☉ hxf格式指标公式,仅可以用同花顺软件引入使用。
☉ 如果您发现下载软件链接错误,请联系管理员报告错误。
☉ 好公式网欢迎各位网友帮忙宣传转发本站网址,有您的支持,我们会做得更好!
☉ 本文楚河漢界楚河汉界指标公式下载 飞狐楚河汉界 源码 贴图仅供学习研究。