{四季变天图 tdx n:1,100,9}
mt1:=if(islastbar,ref((c*2-ref(c,3)),1),drawnull);
mt2:=if(islastbar,ref((c*2-ref(c,3)),2),drawnull);
mt3:=if(islastbar,c*2-ref(c,3),drawnull);
高:=const(ref(hhv(h,150),3)),nodraw;
低:=const(ref(llv(l,150),3)),nodraw;
色彩峰:=高-低;
nn:=100;{}
aa:=ref(h,n)=hhv(h,2*n+1); aa1:=ref(l,n)=llv(l,2*n+1);
qy:=backset(aa,n+1); qy1:=backset(aa1,n+1);
cc:=filter(qy,n) and h=hhv(h,n+1); cc1:=filter(qy1,n) and l=llv(l,n+1);
ddd:=barslast(cc); dd1:=barslast(cc1);
gdts:=if(cc,currbarscount,0); ddts:=if(cc1,currbarscount,0);
dingbuts:=if(ddd,ref(gdts,ddd),gdts); ddts1:=if(dd1,ref(ddts,dd1),ddts);
gdcs1:=const(dingbuts); ddcs1:=const(ddts1);
gdcs13:=const(ref(high,gdcs1-1)); ddcs13:=const(ref(l,ddcs1-1));
dingbuts1:=ref(dingbuts,ddd+1); ddts2:=ref(ddts1,dd1+1);
gdcs2:=const(dingbuts1); ddcs2:=const(ddts2);
m:=intpart(3*n/5);
aaa:=ref(h,m)=hhv(h,2*m+1);
qyy:=backset(aaa,m+1);
ccc:=filter(qyy,m) and h=hhv(h,m+1);
dddd:=barslast(ccc),nodraw;
gdtss:=if(ccc,currbarscount,0);
dingbutss:=if(dddd,ref(gdtss,dddd),gdtss);
gdcs11:=const(dingbutss);
dingbuts11:=ref(dingbutss,dddd+1);
gdcs22:=const(dingbuts11);
aa11:=ref(l,m)=llv(l,2*m+1);
qy11:=backset(aa11,m+1);
cc11:=filter(qy11,m) and l=llv(l,m+1);
dd11:=barslast(cc11);
ddtss:=if(cc11,currbarscount,0);
ddts11:=if(dd11,ref(ddtss,dd11),ddtss);
ddcs11:=const(ddts11);
ddts22:=ref(ddts11,dd11+1);
ddcs22:=const(ddts22);
zgd:=hhv(h,60)*1.01.00;
zgd2:=const(zgd);
高点压力m:=drawline(currbarscount=gdcs22,h,currbarscount=gdcs11,h,1),colorred,linethick1;
低点支撑m:=drawline(currbarscount=ddcs22,l,currbarscount=ddcs11,l,1) colorred,linethick1;
高点压力1:=drawline(currbarscount=gdcs2,h,currbarscount=gdcs1,h,1) ,colorblue,linethick1;
低点支撑1:=drawline(currbarscount=ddcs2,l,currbarscount=ddcs1,l,1),colorblue,linethick1;
高点:=const(hhv(h,nn)),nodraw;
低点:=const(llv(l,nn)),nodraw;
gj:=(c+h+l+o)/4;
明日阻力:=l+(gj-l)+(c-l);
明日支撑:=l+(c-gj);
明日阻力2:=l+2*(gj-l)+(c-l);
明日支撑2:=l+(c-gj)-(gj-l);
今日阻力:=const(ref(明日阻力 , 1)),nodraw;
今日支撑:=const(ref(明日支撑 , 1)),nodraw;
今日阻力2:=const(ref(明日阻力2 , 1)),nodraw;
今日支撑2:=const(ref(明日支撑2 , 1)),nodraw;
stickline(islastbar,今日阻力,今日阻力2,10,0),color555555;
drawtext(islastbar,今日阻力,' 阻'),color0000ff;
stickline(islastbar,今日支撑,今日支撑2,10,0),color555555;
drawtext(islastbar,今日支撑,' 支'),color00ff00;
jrh:=hhv(c,2);
jrl:=llv(c,2);
ma3:=ma(close,3);
ytsl:=(3*close+low+open+high)/6;
r1:=(close>ref(close,1) and close>ref(close,2));
r2:=(ref(r1,1) and close<=ref(close,1) and close>=ref(close,2));
r3:=(ref(r2,1) and close>=ref(close,1) and close<=ref(close,2));
r4:=(ref(r3,1) and close<=ref(close,1) and close>=ref(close,2));
r5:=(ref(r4,1) and close>=ref(close,1) and close<=ref(close,2));
r6:=(ref(r5,1) and close<=ref(close,1) and close>=ref(close,2));
r7:=(ref(r6,1) and close>=ref(close,1) and close<=ref(close,2));
r8:=(ref(r7,1) and close<=ref(close,1) and close>=ref(close,2));
r9:=(ref(r8,1) and close>=ref(close,1) and close<=ref(close,2));
ra:=(ref(r9,1) and close<=ref(close,1) and close>=ref(close,2));
rb:=(ref(ra,1) and close>=ref(close,1) and close<=ref(close,2));
rc:=(ref(rb,1) and close<=ref(close,1) and close>=ref(close,2));
rd:=(close<ref(close,1) and close<ref(close,2));
re:=(ref(rd,1) and close>=ref(close,1) and close<=ref(close,2));
rf:=(ref(re,1) and close<=ref(close,1) and close>=ref(close,2));
r10:=(ref(rf,1) and close>=ref(close,1) and close<=ref(close,2));
r11:=(ref(r10,1) and close<=ref(close,1) and close>=ref(close,2));
r12:=(ref(r11,1) and close>=ref(close,1) and close<=ref(close,2));
r13:=(ref(r12,1) and close<=ref(close,1) and close>=ref(close,2));
r14:=(ref(r13,1) and close>=ref(close,1) and close<=ref(close,2));
r15:=(ref(r14,1) and close<=ref(close,1) and close>=ref(close,2));
r16:=(ref(r15,1) and close>=ref(close,1) and close<=ref(close,2));
r17:=(ref(r16,1) and close<=ref(close,1) and close>=ref(close,2));
r18:=(ref(r17,1) and close>=ref(close,1) and close<=ref(close,2));
r19:=ref(rd or re or rf or r10 or r11 or r12 or r13 or r14 or r15 or r16 or r17 or r18,1) and r1;
r1a:=((ref(r1 or r2 or r3 or r4 or r5 or r6 or r7 or r8 or r9 or ra or rb or rc,1)) and rd);
var3:=if(c<200 ,ma(cost(80),3),2500),nodraw;
var4:=(((high + low) + close) / 3);
var5:=ema(((((open + high) + low) + close) / 4),2330);
var6:=(var5 + ((var5 * 6) / 100));
短买春:r19,nodraw,color00dd00;
秋离场:r1a,nodraw,color2288ee;
红持股:r1 or r2 or r3 or r4 or r5 or r6 or r7 or r8 or r9 or ra or rb or rc,nodraw,color0000ff;
阴观望:rd or re or rf or r10 or r11 or r12 or r13 or r14 or r15 or r16 or r17 or r18,nodraw,color999999;
急速超跌关注:=(close-ma(close,34))/ma(close,34)*100<-14,colorbbbbbb,nodraw;
离场:=if(红持股,jrl,drawnull);
明离场价:=离场,colorff99ff,nodraw;
今离场价:=ref(离场,1)color0000ff,nodraw;
进:=if(阴观望,jrh,drawnull);
明进场价:=进,color33aacc,nodraw;
今进场价:=ref(明进场价,1),color00ff00,nodraw;
大雪:=ma((((high + low) + close) / 3),8);
无痕:=ma((((high + low) + close) / 3),21);
var111:=ema(((open + close) / 2),26);
var222:=if(c<200 , ma(cost(30),3),2300),nodraw;
天下有雪:=if(c<200 ,ma(cost(50),3),2300);
严冬:=islastbar and (var4 > 0.1),colorffffff,nodraw;
早春:=islastbar and (((((var4 < 天下有雪) and (var4 > 无痕))
or ((var4 < var5) and (var4 > 无痕))) or ((var4 > 无痕)
and (var111 > 无痕)))),color00ff00,nodraw;
初夏:=islastbar and ((((((var4 > 天下有雪) and (var4 > var111))
and (var4 > var5)) and (var222 > ref(var222,1))) or ((((var4 > var222)
and (var4 > var111)) and (var4 > var5)) and (var222 > ref(var222,1))))),color0000ff,nodraw;
深秋:=islastbar and (((((var4 > var6) and (var4 > var3)) and (大雪 > 无痕))
and (var111 > ref(var111,1)))),color00ffff,nodraw;
saaa:=(3*c+h+l+o)/6;
svar1:=(8*saaa+7*ref(saaa,1)+6*ref(saaa,2)
+5*ref(saaa,3)+4*ref(saaa,4)+3*ref(saaa,5)+2*ref(saaa,6)+ref(saaa,8))/36;
svar2:=(hhv(svar1,5)+hhv(svar1,10)+hhv(svar1,20))/3;
svar3:=(llv(svar1,5)+llv(svar1,10)+llv(svar1,20))/3;
svar4:=(hhv(svar2,5)+hhv(svar2,10)+hhv(svar2,20))/3;
svar5:=(llv(svar3,5)+llv(svar3,10)+llv(svar3,20))/3;
svar6:=(llv(svar1,2)+llv(svar1,4)+llv(svar1,6))/3;
q1:=const(if(短买春,0,if(秋离场,180,if(红持股,220,if(急速超跌关注,150,100))))),nodraw;
q2:=const(if(短买春,150,if(秋离场,100,if(红持股,0,if(急速超跌关注,150,100))))),nodraw;
q3:=const(if(短买春,0,if(秋离场,50,if(红持股,50,if(急速超跌关注,150,100))))),nodraw;
drawgbk(c>0,rgb(q1,q2,q3),rgb(0,50,50),0,' ',0);
da1:=if(130>totalbarscount,totalbarscount,130);
da:=if(currbarscount>da1,0,da1);
hi:=refdate(hhv(h,da),date);
lo:=refdate(llv(l,da),date);
c1:=if(currbarscount<=da,c,drawnull);
gz:=exp(ln(hi/lo)/30);
lh1:=sum(if(c1>=(hi/gz),v,0),da);
lh2:=sum(if(c1>=(hi/pow(gz,2)) and c1<(hi/gz),v,0),da);
lh3:=sum(if(c1>=(hi/pow(gz,3)) and c1<(hi/pow(gz,2)),v,0),da);
lh4:=sum(if(c1>=(hi/pow(gz,4)) and c1<(hi/pow(gz,3)),v,0),da);
lh5:=sum(if(c1>=(hi/pow(gz,5)) and c1<(hi/pow(gz,4)),v,0),da);
lh6:=sum(if(c1>=(hi/pow(gz,6)) and c1<(hi/pow(gz,5)),v,0),da);
lh7:=sum(if(c1>=(hi/pow(gz,7)) and c1<(hi/pow(gz,6)),v,0),da);
lh8:=sum(if(c1>=(hi/pow(gz,8)) and c1<(hi/pow(gz,7)),v,0),da);
lh9:=sum(if(c1>=(hi/pow(gz,9)) and c1<(hi/pow(gz,8)),v,0),da);
lh10:=sum(if(c1>=(hi/pow(gz,10)) and c1<(hi/pow(gz,9)),v,0),da);
lh11:=sum(if(c1>=(hi/pow(gz,11)) and c1<(hi/pow(gz,10)),v,0),da);
lh12:=sum(if(c1>=(hi/pow(gz,12)) and c1<(hi/pow(gz,11)),v,0),da);
lh13:=sum(if(c1>=(hi/pow(gz,13)) and c1<(hi/pow(gz,12)),v,0),da);
lh14:=sum(if(c1>=(hi/pow(gz,14)) and c1<(hi/pow(gz,13)),v,0),da);
lh15:=sum(if(c1>=(hi/pow(gz,15)) and c1<(hi/pow(gz,14)),v,0),da);
lh16:=sum(if(c1>=(hi/pow(gz,16)) and c1<(hi/pow(gz,15)),v,0),da);
lh17:=sum(if(c1>=(hi/pow(gz,17)) and c1<(hi/pow(gz,16)),v,0),da);
lh18:=sum(if(c1>=(hi/pow(gz,18)) and c1<(hi/pow(gz,17)),v,0),da);
lh19:=sum(if(c1>=(hi/pow(gz,19)) and c1<(hi/pow(gz,18)),v,0),da);
lh20:=sum(if(c1>=(hi/pow(gz,20)) and c1<(hi/pow(gz,19)),v,0),da);
lh21:=sum(if(c1>=(hi/pow(gz,21)) and c1<(hi/pow(gz,20)),v,0),da);
lh22:=sum(if(c1>=(hi/pow(gz,22)) and c1<(hi/pow(gz,21)),v,0),da);
lh23:=sum(if(c1>=(hi/pow(gz,23)) and c1<(hi/pow(gz,22)),v,0),da);
lh24:=sum(if(c1>=(hi/pow(gz,24)) and c1<(hi/pow(gz,23)),v,0),da);
lh25:=sum(if(c1>=(hi/pow(gz,25)) and c1<(hi/pow(gz,24)),v,0),da);
lh26:=sum(if(c1>=(hi/pow(gz,26)) and c1<(hi/pow(gz,25)),v,0),da);
lh27:=sum(if(c1>=(hi/pow(gz,27)) and c1<(hi/pow(gz,26)),v,0),da);
lh28:=sum(if(c1>=(hi/pow(gz,28)) and c1<(hi/pow(gz,27)),v,0),da);
lh29:=sum(if(c1>=(lo*gz) and c1<lo*pow(gz,2),v,0),da);
lh30:=sum(if(c1>=lo and c1<lo*gz,v,0),da);
l1:=refdate(hhv(lh1,da),date),linethick0;
l2:=refdate(hhv(lh2,da),date),linethick0;
l3:=refdate(hhv(lh3,da),date),linethick0;
l4:=refdate(hhv(lh4,da),date);
l5:=refdate(hhv(lh5,da),date);
l6:=refdate(hhv(lh6,da),date);
l7:=refdate(hhv(lh7,da),date);
l8:=refdate(hhv(lh8,da),date);
l9:=refdate(hhv(lh9,da),date);
l10:=refdate(hhv(lh10,da),date);
l11:=refdate(hhv(lh11,da),date),linethick0;
l12:=refdate(hhv(lh12,da),date),linethick0;
l13:=refdate(hhv(lh13,da),date),linethick0;
l14:=refdate(hhv(lh14,da),date);
l15:=refdate(hhv(lh15,da),date);
l16:=refdate(hhv(lh16,da),date);
l17:=refdate(hhv(lh17,da),date);
l18:=refdate(hhv(lh18,da),date);
l19:=refdate(hhv(lh19,da),date);
l20:=refdate(hhv(lh20,da),date);
l21:=refdate(hhv(lh21,da),date),linethick0;
l22:=refdate(hhv(lh22,da),date),linethick0;
l23:=refdate(hhv(lh23,da),date),linethick0;
l24:=refdate(hhv(lh24,da),date);
l25:=refdate(hhv(lh25,da),date);
l26:=refdate(hhv(lh26,da),date);
l27:=refdate(hhv(lh27,da),date);
l28:=refdate(hhv(lh28,da),date);
l29:=refdate(hhv(lh29,da),date);
l30:=refdate(hhv(lh30,da),date);
ss:=(l1+l2+l3+l4+l5+l6+l7+l8+l9+l10+l11+l12+l13+l14+l15+l16+l17+l18+l19+l20+l21+l22+l23+l24+l25+l26+l27+l28+l29+l30);
stickline(ceiling(da*l1/ss)*4>=currbarscount,hi*299/300,hi/pow(gz,1),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l2/ss)*4>=currbarscount,hi/pow(gz,1)*299/300,hi/pow(gz,2),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l3/ss)*4>=currbarscount,hi/pow(gz,2)*299/300,hi/pow(gz,3),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l4/ss)*4>=currbarscount,hi/pow(gz,3)*299/300,hi/pow(gz,4),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l5/ss)*4>=currbarscount,hi/pow(gz,4)*299/300,hi/pow(gz,5),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l6/ss)*4>=currbarscount,hi/pow(gz,5)*299/300,hi/pow(gz,6),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l7/ss)*4>=currbarscount,hi/pow(gz,6)*299/300,hi/pow(gz,7),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l8/ss)*4>=currbarscount,hi/pow(gz,7)*299/300,hi/pow(gz,8),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l9/ss)*4>=currbarscount,hi/pow(gz,8)*299/300,hi/pow(gz,9),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l10/ss)*4>=currbarscount,hi/pow(gz,9)*299/300,hi/pow(gz,10),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l11/ss)*4>=currbarscount,hi/pow(gz,10)*299/300,hi/pow(gz,11),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l12/ss)*4>=currbarscount,hi/pow(gz,11)*299/300,hi/pow(gz,12),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l13/ss)*4>=currbarscount,hi/pow(gz,12)*299/300,hi/pow(gz,13),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l14/ss)*4>=currbarscount,hi/pow(gz,13)*299/300,hi/pow(gz,14),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l15/ss)*4>=currbarscount,hi/pow(gz,14)*299/300,hi/pow(gz,15),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l16/ss)*4>=currbarscount,hi/pow(gz,15)*299/300,hi/pow(gz,16),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l17/ss)*4>=currbarscount,hi/pow(gz,16)*299/300,hi/pow(gz,17),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l18/ss)*4>=currbarscount,hi/pow(gz,17)*299/300,hi/pow(gz,18),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l19/ss)*4>=currbarscount,hi/pow(gz,18)*299/300,hi/pow(gz,19),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l20/ss)*4>=currbarscount,hi/pow(gz,19)*299/300,hi/pow(gz,20),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l21/ss)*4>=currbarscount,hi/pow(gz,20)*299/300,hi/pow(gz,21),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l22/ss)*4>=currbarscount,hi/pow(gz,21)*299/300,hi/pow(gz,22),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l23/ss)*4>=currbarscount,hi/pow(gz,22)*299/300,hi/pow(gz,23),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l24/ss)*4>=currbarscount,hi/pow(gz,23)*299/300,hi/pow(gz,24),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l25/ss)*4>=currbarscount,hi/pow(gz,24)*299/300,hi/pow(gz,25),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l26/ss)*4>=currbarscount,hi/pow(gz,25)*299/300,hi/pow(gz,26),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l27/ss)*4>=currbarscount,hi/pow(gz,26)*299/300,hi/pow(gz,27),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l28/ss)*4>=currbarscount,hi/pow(gz,27)*299/300,hi/pow(gz,28),9,0)color7c7c7a,linethick3;
stickline(ceiling(da*l29/ss)*4>=currbarscount,lo,lo*pow(gz,1)*299/300,9,0)color7c7c7a,linethick3;
if(between(高点压力m,高点,低点),高点压力m,drawnull),coloryellow,linethick1;
if(between(低点支撑m,高点,低点),低点支撑m,drawnull),coloryellow,linethick1;
if(between(高点压力1,高点,低点),高点压力1,drawnull),colorgreen,linethick1;
if(between(低点支撑1,高点,低点),低点支撑1,drawnull),colorgreen,linethick1;
中:=(ma(close,3)+ma(close,6)+ma(close,12)+ma(close,24))/4;
drawtext(islastbar,mt2,' ●'),coloryellow;
drawtext(islastbar,mt1,' ●'),coloryellow;
drawtext(islastbar,mt3,' ●'),coloryellow;
aaax:=(3*c+h+l+o)/6;
中长:if(c,(8*aaax+7*ref(aaax,1)+6*ref(aaax,2)+5*ref(aaax,3)
+4*ref(aaax,4)+3*ref(aaax,5)+2*ref(aaax,6)+ref(aaax,8))/36,drawnull),color00ff00;
if(中长> ref(中长,1),中长,drawnull),colormagenta,linethick2;
下档线:=(((close - llv(low,13)) / (hhv(high,13) - llv(low,13))) * 100);
rrrsv:=sma(下档线,3,1);
kkk:=sma(rrrsv,3,1);
ddddd:=((3 * rrrsv) - (2 * kkk));
jj12:=(((close - llv(low,55)) / (hhv(high,55) - llv(low,55))) * 100);
rsv24:=sma(jj12,3,1);
k24:=sma(rsv24,3,1);
d24:=((3 * rsv24) - (2 * k24));
压力2:=if(cross(d24,ddddd),high,ref(high,barslast(cross(d24,ddddd)))),colorffffff;
底部:=llv(high,30),color00ff00;
压力位:=if(islastbar,压力2,drawnull),nodraw;
底部位:=if(islastbar,底部,drawnull),nodraw;
底:=const(底部);
stickline(islastbar ,压力位,压力位,30,0),colorffffff;
stickline(islastbar ,底部位,底部位,25,0),color00ffff;
辰星线:=(20*ytsl+19*ref(ytsl,1)+18*ref(ytsl,2)+17*ref(ytsl,3)
+16*ref(ytsl,4)+15*ref(ytsl,5)+14*ref(ytsl,6)+13*ref(ytsl,7)
+12*ref(ytsl,8)+11*ref(ytsl,9)+10*ref(ytsl,10)+9*ref(ytsl,11)
+8*ref(ytsl,12)+7*ref(ytsl,13)+6*ref(ytsl,14)+5*ref(ytsl,15)
+4*ref(ytsl,16)+3*ref(ytsl,17)+2*ref(ytsl,18)+ref(ytsl,20))/211;
等待:=if(ma3>辰星线,辰星线,ma3);
{卖出------------------------}
var55:=ema(ema(ema(close,8),13),62);
var56:=((ref(high,1) + ref(low,1)) / 2);
var57:=(ma(close,20) + (2 * std(close,20)));
var58:=((sma(max((close - ref(close,1)),0),7,1) / sma(abs((close - ref(close,1))),7,1)) * 100);
卖出1:=filter(cross(79,var58),4);
ma21:=ref(close,1);
zx:=((sma(max((close - ma21),0),6,1) / sma(abs((close - ma21)),6,1)) * 100);
卖出2:=cross(84,zx),colorff00ff;
卖出3:=cross(90,rsi);
卖出:=卖出1 or 卖出2 or 卖出3;
{买入------------------------}
qq2:=(close-llv(low, 18))/(hhv(high, 18)-llv(low, 18))*100;
qq3:=sma(qq2, 9, 1);
qq4:=sma(qq3, 3, 1);
长趋势:=3*qq3-2*qq4,colorwhite,linethick3;
趋势线:=ema(qq3, 3),colorred,linethick3;
金叉:= cross(长趋势,趋势线);
aaaa1:=amount/v;
bbb1:=l<aaaa1*0.9;
ccc1:=(c-ref(c,1))/ref(c,1)*100>1.2;
ddd1:=l<ma(c,5)*0.921;
eee1:=v<ma(v,5)*1.5;
老鼠仓:=bbb1 and ccc1 and ddd1 and eee1,,nodraw;
x1:=(c+l+h)/3;
bb5:=atan(ema(x1,7)-ref(ema(x1,7),1))*3.1416*10;
var1:=(ma(close,80)-ma(close,13)/3);
var2:=( ma((close-var1)/var1,1));
vvar3:=(close-llv(low,28))/(hhv(high,28)-llv(low,28))*100;
vvar4:=sma(vvar3,4,1);
mma:=ema(var2,12)*0.7;
mmb:=ema(var2,3);
快到底:=if(llv(mmb-mma,12)>0,0,-20),linethick2,colorgreen;
diff:=( ema(close,12) - ema(close,26))*100;
dea:=ema(diff,9);
macd:= 2*(diff-dea);
抄底:=if(快到底<0 and cross(macd,0) and var4<18,1,0);
avar2:=(2*close+high+low)/4;
avar3:=if(year>=2099 and month>2,0,1);
avar4:=llv(low,5);
avar5:=hhv(high,4);
散户:= ema((avar2-avar4)/(avar5-avar4)*100,4)*avar3;
庄家:= ema(0.667*ref(散户,1)+0.333*散户,2)*avar3;
试买:=(((cross(散户,庄家) and 散户<50 and 29<散户)) not 大雪)
or (cross(散户,庄家) and 散户<30 ) or 抄底;
aa05:=ma(c,5),color0099cc;
五日乖离率:=(c-aa05)/aa05*100;
bb05:=atan((aa05/ref(aa05,1)-1)*100)*180/3.1416;
速度5:=sma(ema((aa05-ref(aa05,1))/ref(aa05,1),3)*100,3,1);
加速度5:=ema((速度5-ref(速度5,1)),3),nodraw;
aa10:=ma(c,10);
aa20:=ma(c,20);bb10:=atan((aa10/ref(aa10,1)-1)*100)*180/3.1416;
aa30:=ma(c,30);
三拾日乖离率:=(c-aa30)/aa30*100;
加仓:=filter(count(cross(bb05,30),5)>=1 and
aa05>ref(aa05,1) and 三拾日乖离率>ref(三拾日乖离率,1) and
aa10>ref(aa10,1)
and 加速度5>ref(加速度5,1) and 速度5>ref(速度5,1) ,10) ;
drawicon(加仓,l*0.99,23);
if(等待>ref(等待,1),等待,drawnull),linethick2,color00ffff;
if(辰星线>ref(辰星线,1),辰星线,drawnull),linethick2,color0000ff;
if(辰星线<ref(辰星线,1),辰星线,drawnull),color00ff00,linethick1;
stickline(islastbar and (红持股 or ref(红持股,1)=1),今离场价,今离场价,15,1),color0000ff;
stickline(islastbar and (阴观望 or ref(阴观望,1)=1),今进场价,今进场价,15,1),color00ff00;
drawicon(卖出,(high * 1.002),15);
{drawtext(秋离场,hhv(h,3),'→→→→'),colorff99ff;}
drawicon(老鼠仓 or 金叉,(low - (low * 0.01)),1);
{drawtext(短买春,llv(l,3),'←←←←'),color00ff00;}
{----------------------------}
{严冬:}stickline((var4 > 0.1),high,low,0,0),colorffffff;
{早春:}stickline(((((var4 < 天下有雪) and (var4 > 无痕))
or ((var4 < var5) and (var4 > 无痕))) or ((var4 > 无痕)
and (var111 > 无痕))),high,low,0,0),color00ff00;
{初夏:}stickline((((((var4 > 天下有雪) and (var4 > var111))
and (var4 > var5)) and (var222 > ref(var222,1))) or ((((var4 > var222)
and (var4 > var111)) and (var4 > var5)) and (var222 > ref(var222,1)))),
high,low,0,0),color0000ff;
{深秋:}stickline(((((var4 > var6) and (var4 > var3)) and (大雪 > 无痕))
and (var111 > ref(var111,1))),high,low,0,0),color00ffff;
stickline(((var4 > 0.1) and (close < open)),open,close,2.8,0),colorcccccc;
stickline(((var4 > 0.1) and (close >= open)),open,close,2.8,1),colorcccccc;
stickline(((var4 > 0.1) and (close >= open)),open,open+(close-open)/3,2.8,0),colorffffff;
stickline((((((var4 < 天下有雪) and (var4 > 无痕)) and (close < open))
or (((var4 < var5) and (var4 > 无痕)) and (close < open)))
or (((var4 > 无痕) and (var111 > 无痕)) and (close < open))),
open,close,2.8,0),color00ff00;
stickline((((((var4 < 天下有雪) and (var4 > 无痕)) and (close > open))
or (((var4 < var5) and (var4 > 无痕)) and (close > open)))
or (((var4 > 无痕) and (var111 > 无痕)) and (close >= open)))
,open,close,2.8,1),color00ff00;
stickline(((((((var4 > 天下有雪) and (var4 > var111)) and (var4 > var5))
and (var222 > ref(var222,1))) and (close < open)) or (((((var4 > var222)
and (var4 > var111)) and (var4 > var5)) and (var222 > ref(var222,2)))
and (close < open))),open,close,2.8,0),color0000ff;
stickline(((((((var4 > 天下有雪) and (var4 > var111)) and (var4 > var5))
and (var222 > ref(var222,1))) and (close > open)) or (((((var4 > var222)
and (var4 > var111)) and (var4 > var5)) and (var222 > ref(var222,1)))
and (close >= open))),open,close,2.8,1),color0000ff;
stickline((((((var4 > var6) and (var4 > var3)) and (大雪 > 无痕))
and (var111 > ref(var111,1))) and (close < open)),open,close,2.8,0),color00ffff;
stickline((((((var4 > var6) and (var4 > var3)) and (大雪 > 无痕))
and (var111 > ref(var111,1))) and (close >= open)),open,close,2.8,1),color00ffff;
tab:=currbarscount=25;
if(( barslast(tab)>10),ref((c*2-ref(c,3)),3),drawnull),linethick1,dotline,coloryellow;
上一指标公式:超牛行情 通达信行情
下一指标公式:一直向RSI买入 通达信买入
☉ 好公式网发布的指标公式主要用于软件技术面分析,仅供参考,勿用于实际操作,据此操作风险自负!
☉ 解压密码:www.goodgongshi.com 就是好公式网域名,希望大家看清楚,切勿输错。
☉ tnc和tni格式指标公式,仅可以用通达信软件引入使用,例如可以用通达信软件引入使用指标公式;
☉ tne格式指标公式,仅可以用通达信软件公式编辑器5.0版导入,高版本兼容低版本;
☉ fnc格式指标公式,可以用大智慧软件新一代高速行情分析系统股票软件使用,少部分可以用分析家软件引入使用;
☉ alg格式指标公式,仅仅可以用飞狐交易师软件引入使用;exp格式指标公式,仅可以用大智慧经典版软件引入使用;
☉ hxf格式指标公式,仅可以用同花顺软件引入使用。
☉ 如果您发现下载软件链接错误,请联系管理员报告错误。
☉ 好公式网欢迎各位网友帮忙宣传转发本站网址,有您的支持,我们会做得更好!
☉ 本文四季变天图 通达信天图仅供学习研究。