input:干支周期(6,3,999),神奇数周期(20,3,999);
农历年:lyear,linethick0,colorff00ff;
农历月:lmonth,linethick0,colorff9900;
农历日:lday,linethick0,color487d24;
stickline(((close > 0) and islastbar),0,100,0.1,0),shift3,color4441ff;
aa:=if((close > open),1,if((close < open),(0 - 1),0));
aa1:=if((close > ref(close,1)),1,if((close < ref(close,1)),(0 - 1),0));
aa2:=if((vol > ref(vol,1)),1,if((vol <= ref(vol,1)),(0 - 1),0));
bb:=if((aa = 0),aa1,aa);
cc:=if((bb = 0),aa2,bb);
s1:=if((((ref(cc,5) > 0) and (ref(cc,4) > 0)) and (ref(cc,3) > 0)),1,0);
s2:=if((((ref(cc,5) < 0) and (ref(cc,4) > 0)) and (ref(cc,3) > 0)),2,0);
s3:=if((((ref(cc,5) > 0) and (ref(cc,4) < 0)) and (ref(cc,3) > 0)),3,0);
s4:=if((((ref(cc,5) < 0) and (ref(cc,4) < 0)) and (ref(cc,3) > 0)),4,0);
s5:=if((((ref(cc,5) > 0) and (ref(cc,4) > 0)) and (ref(cc,3) < 0)),5,0);
s6:=if((((ref(cc,5) < 0) and (ref(cc,4) > 0)) and (ref(cc,3) < 0)),6,0);
s7:=if((((ref(cc,5) > 0) and (ref(cc,4) < 0)) and (ref(cc,3) < 0)),7,0);
s8:=if((((ref(cc,5) < 0) and (ref(cc,4) < 0)) and (ref(cc,3) < 0)),8,0);
s:=(((((((s1 + s2) + s3) + s4) + s5) + s6) + s7) + s8);
x1:if((((ref(cc,2) > 0) and (ref(cc,1) > 0)) and (cc > 0)),1,0),linethick0,color10000;
x2:if((((ref(cc,2) < 0) and (ref(cc,1) > 0)) and (cc > 0)),2,0),linethick0,color10000;
x3:if((((ref(cc,2) > 0) and (ref(cc,1) < 0)) and (cc > 0)),3,0),linethick0,color10000;
x4:if((((ref(cc,2) < 0) and (ref(cc,1) < 0)) and (cc > 0)),4,0),linethick0,color10000;
x5:if((((ref(cc,2) > 0) and (ref(cc,1) > 0)) and (cc < 0)),5,0),linethick0,color10000;
x6:if((((ref(cc,2) < 0) and (ref(cc,1) > 0)) and (cc < 0)),6,0),linethick0,color10000;
x7:if((((ref(cc,2) > 0) and (ref(cc,1) < 0)) and (cc < 0)),7,0),linethick0,color10000;
x8:if((((ref(cc,2) < 0) and (ref(cc,1) < 0)) and (cc < 0)),8,0),linethick0,color10000;
x:=(((((((x1 + x2) + x3) + x4) + x5) + x6) + x7) + x8);
sx:((s * 10) + x),linethick0,color10000;
y:=(100 / (sysparam(4) - sysparam(5)));
fc:=((((sysparam(4) + sysparam(5)) * y) / 2) - 50);
k:=(close - ref(close,1));
stickline(((open < close) or ((open = close) and (k > 0))),((low * y) - fc),((high * y) - fc),0.1,0),color4a3a46;
stickline(((open < close) or ((open = close) and (k > 0))),((open * y) - fc),((close * y) - fc),6,1),color4a3a46;
stickline(((open > close) or ((open = close) and (k < 0))),((low * y) - fc),((high * y) - fc),0.1,0),color4a3a46;
stickline(((open > close) or ((open = close) and (k < 0))),((open * y) - fc),((close * y) - fc),6,0),color4a3a46;
n:=(sysparam(1) = barpos);
drawyitext(date,83,ganzhi(date,0,2),0),align3,color487d24;
drawyitext((n and date),83,ganzhi(date,0,2),0),align3,colorff;
fc:=(ganzhi(date,0,1) <> ref(ganzhi(date,0,1),1));
stickline(fc,8,92,0,0),colorff9900;
j1:=66;
drawyitext(fc,90,ganzhi(date,time,1),0),shift2,colorff9900;
drawyitext(fc,90,ganzhi(date,time,0),0),colorff00ff;
jj1:=((date - lsolartermdate(1)) >= 0);
j2:=(jj1 > ref(jj1,1));
jj2:=((date - lsolartermdate(2)) >= 0);
j3:=(jj2 > ref(jj2,1));
jj3:=((date - lsolartermdate(3)) >= 0);
j4:=(jj3 > ref(jj3,1));
jj4:=((date - lsolartermdate(4)) >= 0);
j5:=(jj4 > ref(jj4,1));
jj5:=((date - lsolartermdate(5)) >= 0);
j6:=(jj5 > ref(jj5,1));
jj6:=((date - lsolartermdate(6)) >= 0);
j7:=(jj6 > ref(jj6,1));
jj7:=((date - lsolartermdate(7)) >= 0);
j8:=(jj7 > ref(jj7,1));
jj8:=((date - lsolartermdate(8)) >= 0);
j9:=(jj8 > ref(jj8,1));
jj9:=((date - lsolartermdate(9)) >= 0);
j10:=(jj9 > ref(jj9,1));
jj10:=((date - lsolartermdate(10)) >= 0);
j11:=(jj10 > ref(jj10,1));
jj11:=((date - lsolartermdate(11)) >= 0);
j12:=(jj11 > ref(jj11,1));
jj12:=((date - lsolartermdate(12)) >= 0);
j13:=(jj12 > ref(jj12,1));
jj13:=((date - lsolartermdate(13)) >= 0);
j14:=(jj13 > ref(jj13,1));
jj14:=((date - lsolartermdate(14)) >= 0);
j15:=(jj14 > ref(jj14,1));
jj15:=((date - lsolartermdate(15)) >= 0);
j16:=(jj15 > ref(jj15,1));
jj16:=((date - lsolartermdate(16)) >= 0);
j17:=(jj16 > ref(jj16,1));
jj17:=((date - lsolartermdate(17)) >= 0);
j18:=(jj17 > ref(jj17,1));
jj18:=((date - lsolartermdate(18)) >= 0);
j19:=(jj18 > ref(jj18,1));
jj19:=((date - lsolartermdate(19)) >= 0);
j20:=(jj19 > ref(jj19,1));
jj20:=((date - lsolartermdate(20)) >= 0);
j21:=(jj20 > ref(jj20,1));
jj21:=((date - lsolartermdate(21)) >= 0);
j22:=(jj21 > ref(jj21,1));
jj22:=((date - lsolartermdate(22)) >= 0);
j23:=(jj22 > ref(jj22,1));
jj23:=((date - lsolartermdate(23)) >= 0);
j24:=(jj23 > ref(jj23,1));
jj24:=((date - lsolartermdate(24)) >= 0);
test:=(jj24 > ref(jj24,1));
drawtext(j2,j1,'小寒'),colorffff;
drawtext(j3,j1,'大寒'),colorffff;
drawtext(j4,j1,'立春'),color71b255;
drawtext(j5,j1,'雨水'),color71b255;
drawtext(j6,j1,'惊蛰'),color71b255;
drawtext(j7,j1,'春分'),color71b255;
drawtext(j8,j1,'清明'),colorffff;
drawtext(j9,j1,'谷雨'),colorffff;
drawtext(j10,j1,'立夏'),colorff;
drawtext(j11,j1,'小满'),colorff;
drawtext(j12,j1,'芒种'),colorff;
drawtext(j13,j1,'夏至'),colorff;
drawtext(j14,j1,'小暑'),colorffff;
drawtext(j15,j1,'大暑'),colorffff;
drawtext(j16,j1,'立秋'),colorbbbbbb;
drawtext(j17,j1,'处暑'),colorbbbbbb;
drawtext(j18,j1,'白露'),colorbbbbbb;
drawtext(j19,j1,'秋分'),colorbbbbbb;
drawtext(j20,j1,'寒露'),colorffff;
drawtext(j21,j1,'霜降'),colorffff;
drawtext(j22,j1,'立冬'),colorffff00;
drawtext(j23,j1,'小雪'),colorffff00;
drawtext(j24,j1,'大雪'),colorffff00;
drawtext(test,j1,'冬至'),colorffff00;
drawtext((lday = 1),57,'新月'),color808040;
drawtext((lday = 8),57,'上弦'),color808040;
drawtext((lday = 15),57,'满月'),color808040;
variable:aa[1]=0;
for rawtext (lday = 23 ,57,'下弦'),color808040(cond to 干支周期)do
i:=(i and (high > refx(high,cond)));
hh:=(i and (high = hhv(high,干支周期)));
variable:aa[1]=0;
for test=if hh,high,0 d to 干支周期)do
i:=(i and (low < refx(low,cond)));
cond1:=(i and (low = llv(low,干支周期)));
ll:=if(cond1,low,0);
qq:=ganzhi(date,time,2);
bz:=intpart((qq / 12));
六壬:=((qq - (bz * 12)) + 1);
aka:=if((test = high),99,if((ll = low),6,0));
drawtext(((六壬 = 1) and (aka > 0)),aka,'子'),color808080;
drawtext(((六壬 = 2) and (aka > 0)),aka,'丑'),colorffff;
drawtext(((六壬 = 3) and (aka > 0)),aka,'寅'),colorffff00;
drawtext(((六壬 = 4) and (aka > 0)),aka,'卯'),colorffff00;
drawtext(((六壬 = 5) and (aka > 0)),aka,'辰'),colorffff;
drawtext(((六壬 = 6) and (aka > 0)),aka,'巳'),colorff;
drawtext(((六壬 = 7) and (aka > 0)),aka,'午'),colorff;
drawtext(((六壬 = 8) and (aka > 0)),aka,'未'),colorffff;
drawtext(((六壬 = 9) and (aka > 0)),aka,'申'),colorffffff;
drawtext(((六壬 = 10) and (aka > 0)),aka,'酉'),colorffffff;
drawtext(((六壬 = 11) and (aka > 0)),aka,'戌'),colorffff;
drawtext(((六壬 = 12) and (aka > 0)),aka,'亥'),color808080;
qq1:=(ganzhi(date,time,2) + 1);
xy3:=mod(qq1,10);
tg:=if((xy3 = 0),10,xy3);
drawtext(((tg = 1) and aka),aka,'甲'),align2,colorffff00;
drawtext(((tg = 2) and aka),aka,'乙'),align2,colorffff00;
drawtext(((tg = 3) and aka),aka,'丙'),align2,colorff;
drawtext(((tg = 4) and aka),aka,'丁'),align2,colorff;
drawtext(((tg = 5) and aka),aka,'戊'),align2,colorffff;
drawtext(((tg = 6) and aka),aka,'己'),align2,colorffff;
drawtext(((tg = 7) and aka),aka,'庚'),align2,colorffffff;
drawtext(((tg = 8) and aka),aka,'辛'),align2,colorffffff;
drawtext(((tg = 9) and aka),aka,'壬'),align2,color808080;
variable:aa[1]=0;
for rawtext ((tg = 10and aka),aka,'癸'),align2,color808080(cond to 神奇数周期)do
i:=(i and (high > refx(high,cond)));
hh:=(i and (high = hhv(high,神奇数周期)));
variable:aa[1]=0;
for test=if hh,high,0 d to 神奇数周期)do
i:=(i and (low < refx(low,cond)));
cond1:=(i and (low = llv(low,神奇数周期)));
hhh:=if(cond1,low,0);
aa:=if(ref((test > 0),5),49,0);
bb:=if(ref((test > 0),5),44,0);
cc:=if(ref((test > 0),10),39,0);
test:=if(ref((test > 0),18),34,0);
lll:=if(ref((test > 0),31),27.5,0);
dd:=if(ref((test > 0),52),23,0);
ee:=if(ref((test > 0),86),18,0);
test:=if(ref((test > 0),141),13,0);
drawtext((aa > 0),aa,'5,顶'),align0,colorff00;
drawtext((bb > 0),bb,'8,顶'),align0,shift3,colorff00;
drawtext((cc > 0),cc,'13,顶'),align0,shift3,colorff00;
drawtext((test > 0),test,'21,顶'),align0,shift3,colorff00;
drawtext((lll > 0),lll,'34,顶'),align0,shift3,colorff00;
drawtext((dd > 0),dd,'55,顶'),align0,shift3,colorff00;
drawtext((ee > 0),ee,'89,顶'),align0,shift3,colorff00;
drawtext((test > 0),test,'144,顶'),align0,shift3,colorff00;
aa1:=if(ref((hhh > 0),5),49,0);
ff:=if(ref((hhh > 0),5),44,0);
gg:=if(ref((hhh > 0),10),39,0);
bb1:=if(ref((hhh > 0),18),34,0);
cc1:=if(ref((hhh > 0),31),27.5,0);
dd1:=if(ref((hhh > 0),52),23,0);
ee1:=if(ref((hhh > 0),86),18,0);
ff1:=if(ref((hhh > 0),141),13,0);
drawtext((aa1 > 0),aa1,'5,底'),align0,colorff;
drawtext((ff > 0),ff,'8,底'),align0,shift3,colorff;
drawtext((gg > 0),gg,'13,底'),align0,shift3,colorff;
drawtext((bb1 > 0),bb1,'21,底'),align0,shift3,colorff;
drawtext((cc1 > 0),cc1,'34,底'),align0,shift3,colorff;
drawtext((dd1 > 0),dd1,'55,底'),align0,shift3,colorff;
drawtext((ee1 > 0),ee1,'89,底'),align0,shift3,colorff;
drawtext((ff1 > 0),ff1,'144,底'),align0,shift3,colorff;
gg1:=(sysparam(2) = barpos);
drawtext(gg1,99,'██████'),align1,colorffffff;
drawtext(gg1,80,'██████'),align1,colorffffff;
drawtext(gg1,29,'██████'),align1,colorffffff;
drawtext(gg1,6,'██████'),align1,colorffffff;
drawtext(gg1,99,'顶部转势日:'),align1,color4441ff;
drawtext(gg1,80,'中国历法:'),align1,color4441ff;
drawtext(gg1,29,'菲波纳奇数:'),align1,color4441ff;
drawtext(gg1,6,'底部转势日:'),align1,color4441ff;
drawtext((if((aka > 0),1,0) > 0),aka,'日:'),align1,color4441ff;
0,shift3,color4441ff;
8,shift3,color4441ff;
50,shift3,color4441ff;
92,shift3,color4441ff;
100,shift3,color4441ff;
上一指标公式:macd力度副图公式 飞狐力度macd指标 源码
☉ 好公式网发布的指标公式主要用于软件技术面分析,仅供参考,勿用于实际操作,据此操作风险自负!
☉ 解压密码:www.goodgongshi.com 就是好公式网域名,希望大家看清楚,切勿输错。
☉ tnc和tni格式指标公式,仅可以用通达信软件引入使用,例如可以用通达信软件引入使用指标公式;
☉ tne格式指标公式,仅可以用通达信软件公式编辑器5.0版导入,高版本兼容低版本;
☉ fnc格式指标公式,可以用大智慧软件新一代高速行情分析系统股票软件使用,少部分可以用分析家软件引入使用;
☉ alg格式指标公式,仅仅可以用飞狐交易师软件引入使用;exp格式指标公式,仅可以用大智慧经典版软件引入使用;
☉ hxf格式指标公式,仅可以用同花顺软件引入使用。
☉ 如果您发现下载软件链接错误,请联系管理员报告错误。
☉ 好公式网欢迎各位网友帮忙宣传转发本站网址,有您的支持,我们会做得更好!
☉ 本文农历时间之窗公式 飞狐之窗农历指标 源码仅供学习研究。