VAR2m:=IF((CHECK1 0),((VAR1m - MA(VAR1m,14)))/((0.015)*(AVEDEV(VAR1m,14))),0);
VAR3m:=IF((CHECK1 0),((VAR1m - MA(VAR1m,70)))/((0.015)*(AVEDEV(VAR1m,70))),0);
VAR4m:=IF((CHECK1 0),IF(((((VAR2m = 150) and (VAR2m 200)) and (VAR3m = 150)) and (VAR3m 200)),10,0),0);
VAR5m:=IF((CHECK1 0),IF(((((VAR2m = (0 - 150)) and (VAR2m (0 - 200))) and (VAR3m = (0 - 150))) and (VAR3m (0 - 200))),(0 - 10),VAR4m),0);
VAR6m:=IF((CHECK1 0),(((CLOSE - MA(CLOSE,13)))/(MA(CLOSE,13)))*(100),0);
VAR7m:=IF((CHECK1 0),(100 - ABS(VAR6m)),0);
VAR8m:=IF((CHECK1 0),IF((VAR7m 90),VAR7m,100),0);
PJX:=IF((CHECK1 0),(MA(((100)*((CLOSE - LLV(CLOSE,34))))/((HHV(HIGH,34) - LLV(LOW,34))),5) - 20),0);
短期强弱:PJX,colorYellow;
SW1:= (EMA(CLOSE,5)*7+EMA(CLOSE,10)*3)/10;
tt:=(c-SW1)/SW1*100;
pt:=ma(tt,6);
买入:=IF((tt -5),-10,0);
卖出:=IF((tt 5 ),10,20);
买入1:=ref(买入,1);
买入2:=ref(买入1,1);
卖出1:=ref(卖出,1);
卖出2:=ref(卖出1,1);
反弹1:IF(CROSS(tt,pt) AND 买入1=-10 ,20,0),linethick3;
反弹2:IF(CROSS(tt,pt) AND 买入2=-10 ,20,0),linethick3;
回落:IF(CROSS(pt,tt) AND 卖出1=10 ,80,100),linethick3;
回落1:IF(CROSS(pt,tt) AND 卖出2=10 ,80,100),linethick3;
阳包阴xg:if(REF(OPEN,1) REF(CLOSE,1) AND CLOSE REF(OPEN,1) AND
OPEN REF(CLOSE,1) AND HIGH REF(HIGH,1) AND LOW REF(LOW,1) AND
CLOSE OPEN AND (CLOSE-OPEN) EMA((HIGH-LOW),90),30,0),COLORyellow,linethick2;
VarAq:=BARSCOUNT(CLOSE)*3.142/180;
Aq2: SIN(VarAq*8)*100,linethick2,coloryellow;
Aq3: COS(VarAq*8)*100,linethick2,colorred;
X1z: 0;
DRAWTEXT( CROSS(aq2,aq3),AQ2,'变盘日'),COLORwhite,align1;
DRAWTEXT( CROSS(aq3,aq2),AQ2,'变盘日'),COLORwhite,align1;
DRAWTEXT( CROSS(aq2,0),95,'时窗'),COLORwhite,align1;
DRAWTEXT( CROSS(aq3,0),95,'时窗'),COLORwhite,align1;
DRAWTEXT( CROSS(0,AQ2),95,'时窗'),COLORwhite,align1;
DRAWTEXT( CROSS(0,AQ3),95,'时窗'),COLORwhite,align1;
总天数:=HHVBARS(H,90);
交换次数:=FLOOR(总天数/21);
判断:=IF(交换次数 0,交换次数,0);
判定:=IF(判断-REF(判断,1) 0,判断,0);
距上次交换:BARSLAST(判定)+1,linethick0,COLORred;{NODRAW}
STICKLINE(判定,-100,-50,2,0),COLORyellow;
交换次数13:=FLOOR(总天数/34);
判断13:=IF(交换次数13 0,交换次数13,0);
判定13:=IF(判断13-REF(判断13,1) 0,判断13,0);
距上次交换13:BARSLAST(判定13)+1,linethick0,COLORGREEN;
STICKLINE(判定13,-100,-20,2,0),COLORred;
交换次数21:=FLOOR(总天数/55);
判断21:=IF(交换次数21 0,交换次数21,0);
判定21:=IF(判断21-REF(判断21,1) 0,判断21,0);
距上次交换21:BARSLAST(判定21)+1,linethick0,COLORGREEN;
STICKLINE(判定21,-100,0,2,0),COLORFFF00F;
STICKLINE(距上次交换+距上次交换13+距上次交换21=3 ,0 ,100 ,2 ,0 ),COLORRED;
总天数2:=LLVBARS(L,90);
交换次数212:=FLOOR(总天数2/21);
判断212:=IF(交换次数212 0,交换次数212,0);
判定212:=IF(判断212-REF(判断212,1) 0,判断212,0);
距上次交换212:BARSLAST(判定212)+1,linethick0,COLORGREEN;{NODRAW}
STICKLINE(判定212,100,50,2,0),COLORGREEN;
交换次数34:=FLOOR(总天数2/34);
判断34:=IF(交换次数34 0,交换次数34,0);
判定34:=IF(判断34-REF(判断34,1) 0,判断34,0);
距上次交换34:BARSLAST(判定34)+1,linethick0,COLORGREEN;
STICKLINE(判定34,100,20,2,0),COLORFFFFFF;
交换次数55:=FLOOR(总天数2/55);
判断55:=IF(交换次数55 0,交换次数55,0);
判定55:=IF(判断55-REF(判断55,1) 0,判断55,0);
距上次交换55:BARSLAST(判定55)+1,linethick0,COLORGREEN;
STICKLINE(判定55,100,100,2,0),COLORFFF00F;
STICKLINE(距上次交换212+距上次交换34+距上次交换55=3 ,100 ,100 ,2 ,0 ),COLORMAGENTA;
立春:=FILTER(MONTH=2 AND (DAY=3 OR DAY=5 ),2);
雨水:=FILTER(MONTH=2 AND (DAY=18 OR DAY=20),2);
惊蛰:=FILTER(MONTH=3 AND (DAY=5 OR DAY=7 ),2);
春分:=FILTER(MONTH=3 AND (DAY=20 OR DAY=22),2);
清明:=FILTER(MONTH=4 AND (DAY=3 OR DAY=6 ),2);
谷雨:=FILTER(MONTH=4 AND (DAY=19 OR DAY=21),2);
立夏:=FILTER(MONTH=5 AND (DAY=6 OR DAY=8 ),2);
小满:=FILTER(MONTH=5 AND (DAY=20 OR DAY=22),2);
芒种:=FILTER(MONTH=6 AND (DAY=5 OR DAY=7 ),2);
夏至:=FILTER(MONTH=6 AND (DAY=20 OR DAY=22),2);
小暑:=FILTER(MONTH=7 AND (DAY=6 OR DAY=8 ),2);
大署:=FILTER(MONTH=7 AND (DAY=22 OR DAY=24),2);
立秋:=FILTER(MONTH=8 AND (DAY=7 OR DAY=9 ),2);
处暑:=FILTER(MONTH=8 AND (DAY=22 OR DAY=24),2);
白露:=FILTER(MONTH=9 AND (DAY=7 OR DAY=9 ),2);
秋分:=FILTER(MONTH=9 AND (DAY=22 OR DAY=24),2);
寒露:=FILTER(MONTH=10 AND (DAY=7 OR DAY=9 ),2);
霜降:=FILTER(MONTH=10 AND (DAY=22 OR DAY=24),2);
立冬:=FILTER(MONTH=11 AND (DAY=7 OR DAY=9 ),2);
小雪:=FILTER(MONTH=11 AND (DAY=22 OR DAY=24),2);
大雪:=FILTER(MONTH=12 AND (DAY=6 OR DAY=8 ),2);
冬至:=FILTER(MONTH=12 AND (DAY=21 OR DAY=23),2);
小寒:=FILTER(MONTH=1 AND (DAY=5 OR DAY=7 ),2);
大寒:=FILTER(MONTH=1 AND (DAY=19 OR DAY=21),2);
DRAWTEXT(立春,50,'立春'),COLORgreen,ALIGN1;
DRAWTEXT(雨水,50,'雨水'),COLORgreen,ALIGN1;
DRAWTEXT(惊蛰,50,'惊蛰'),COLORgreen,ALIGN1;
DRAWTEXT(春分,50,'春分'),COLORgreen,ALIGN1;
DRAWTEXT(清明,50,'清明'),COLORgreen,ALIGN1;
DRAWTEXT(谷雨,50,'谷雨'),COLORgreen,ALIGN1;
DRAWTEXT(立夏,50,'立夏'),COLORMAGENTA,ALIGN1;
DRAWTEXT(小满,50,'小满'),COLORMAGENTA,ALIGN1;
DRAWTEXT(芒种,50,'芒种'),COLORMAGENTA,ALIGN1;
DRAWTEXT(夏至,50,'夏至'),COLORMAGENTA,ALIGN1;
DRAWTEXT(小暑,50,'小暑'),COLORMAGENTA,ALIGN1;
DRAWTEXT(大署,50,'大署'),COLORMAGENTA,ALIGN1;
DRAWTEXT(立秋,50,'立秋'),COLORYELLOW,ALIGN1;
DRAWTEXT(处暑,50,'处暑'),COLORYELLOW,ALIGN1;
DRAWTEXT(白露,50,'白露'),COLORYELLOW,ALIGN1;
DRAWTEXT(秋分,50,'秋分'),COLORYELLOW,ALIGN1;
DRAWTEXT(寒露,50,'寒露'),COLORYELLOW,ALIGN1;
DRAWTEXT(霜降,50,'霜降'),COLORYELLOW,ALIGN1;
DRAWTEXT(立冬,50,'立冬'),COLORWHITE,ALIGN1;
DRAWTEXT(小雪,50,'小雪'),COLORWHITE,ALIGN1;
DRAWTEXT(大雪,50,'大雪'),COLORWHITE,ALIGN1;
DRAWTEXT(冬至,50,'冬至'),COLORWHITE,ALIGN1;
DRAWTEXT(小寒,50,'小寒'),COLORWHITE,ALIGN1;
DRAWTEXT(大寒,50,'大寒'),COLORWHITE,ALIGN1;
Az:=BARSCOUNT(C);
DRAWTEXT((Az+0)/13=FLOOR((Az+0)/13),-50,'转13天'),Color00C5FF;
DRAWTEXT((Az+0)/21=FLOOR((Az+0)/21),-50,'转21天'),Color0000FF;
DRAWTEXT((Az+0)/34=FLOOR((Az+0)/34),-50,'转34天'),Color00FF00;
DRAWTEXT((Az+0)/55=FLOOR((Az+0)/55),-50,'转55天'),Color0078FF;
DRAWTEXT((Az+0)/89=FLOOR((Az+0)/89),-50,'转89天'),Color00F8B9;
费氏数:={ZIG(3, 18) REF(ZIG(3,18),1)}H=HHV(H,120);
成立距今:=BARSLAST(费氏数);
DRAWTEXT(成立距今=(32*1)-1,-20,'费氏数'),COLORYELLOW;
DRAWTEXT(成立距今=(32*2)-1,-20,'费氏数'),COLORYELLOW;
DRAWTEXT(成立距今=(32*3)-1,-20,'费氏数'),COLORYELLOW;
DRAWTEXT(成立距今=(32*4)-1,-20,'费氏数'),COLORYELLOW;
DRAWTEXT(成立距今=(32*5)-1,-20,'费氏数'),COLORYELLOW;
DRAWTEXT(成立距今=(32*6)-1,-20,'费氏数'),COLORYELLOW;
DRAWTEXT(成立距今=(32*7)-1,-20,'费氏数'),COLORYELLOW;
DRAWTEXT(成立距今=(32*8)-1,-20,'费氏数'),COLORYELLOW;
DRAWTEXT(成立距今=(32*9)-1,-20,'费氏数'),COLORYELLOW;
DRAWTEXT(成立距今=(32*10)-1,-20,'费氏数'),COLORYELLOW;
DRAWTEXT(成立距今=(32*11)-1,-20,'费氏数'),COLORYELLOW;
DRAWTEXT(成立距今=(32*12)-1,-20,'费氏数'),COLORYELLOW;
DRAWTEXT(成立距今=(32*13)-1,-20,'费氏数'),COLORYELLOW;
DRAWTEXT(成立距今=(32*14)-1,-20,'费氏数'),COLORYELLOW;
DRAWTEXT(成立距今=(32*15)-1,-20,'费氏数'),COLORYELLOW;
DRAWTEXT(成立距今=(32*16)-1,-20,'费氏数'),COLORYELLOW;
DRAWTEXT(成立距今=(32*17)-1,-20,'费氏数'),COLORYELLOW;
DRAWTEXT(成立距今=(32*18)-1,-20,'费氏数'),COLORYELLOW;
DRAWTEXT(成立距今=(32*19)-1,-20,'费氏数'),COLORYELLOW;
DRAWTEXT(成立距今=(32*20)-1,-20,'费氏数'),COLORYELLOW;
DRAWTEXT(成立距今=(32*21)-1,-20,'费氏数'),COLORYELLOW;
DRAWTEXT(成立距今=(32*22)-1,-20,'费氏数'),COLORYELLOW;
月1:=MONTH=1 AND (DAY=6 OR DAY=21 OR DAY=25);
月2:=MONTH=2 AND (DAY=6 OR DAY=15 OR DAY=21);
月3:=MONTH=3 AND (DAY=6 OR DAY=20 OR DAY=21);
月4:=MONTH=4 AND (DAY=6 OR DAY=15 OR DAY=21);
月5:=MONTH=5 AND (DAY=6 OR DAY=12 OR DAY=21);
月6:=MONTH=6 AND (DAY=6 OR DAY=14 OR DAY=21);
月7:=MONTH=7 AND (DAY=8 OR DAY=19 OR DAY=23);
月8:=MONTH=8 AND (DAY=6 OR DAY=8 OR DAY=23);
月9:=MONTH=9 AND (DAY=8 OR DAY=18 OR DAY=23);
月10:=MONTH=10 AND (DAY=8 OR DAY=23 OR DAY=31);
月11:=MONTH=11 AND (DAY=8 OR DAY=23 OR DAY=28);
月12:=MONTH=12 AND (DAY=8 OR DAY=23 OR DAY=31);
时间窗:=月1 OR 月2 OR 月3 OR 月4 OR 月5 OR 月6 OR 月7 OR 月8 OR 月9 OR 月10
OR 月11 OR 月12;
DRAWTEXT(时间窗 0,-90,'月时窗'),Colorwhite,align1;
XG:=(H=HHV(H,1200));
JO:=(BARSLAST(L=LLV(L,1200))-BARSLAST(H=HHV(H,1200)));
JA:=INTPART(JO*0.125);
JB:=INTPART(JO*0.25) ;
JC:=INTPART(JO*0.333);
JD:=INTPART(JO*0.375);
JE:=INTPART(JO*0.5);
JF:=INTPART(JO*0.625);
JG:=INTPART(JO*0.666);
JH:=INTPART(JO*0.75);
jJA:=INTPART(JO*1.125);
jJB:=INTPART(JO*1.25) ;
jJC:=INTPART(JO*1.333);
jJD:=INTPART(JO*1.375);
jJE:=INTPART(JO*1.5);
jJF:=INTPART(JO*1.625);
jJG:=INTPART(JO*1.666);
jJH:=INTPART(JO*1.75);
jjJA:=INTPART(JO*2.125);
jjJB:=INTPART(JO*2.25) ;
jjJC:=INTPART(JO*2.333);
jjJD:=INTPART(JO*2.375);
jjJE:=INTPART(JO*2.5);
jjJF:=INTPART(JO*2.625);
jjJG:=INTPART(JO*2.666);
jjJH:=INTPART(JO*2.75);
qjjJA:=INTPART(JO*3.125);
qjjJB:=INTPART(JO*3.25) ;
qjjJC:=INTPART(JO*3.333);
qjjJD:=INTPART(JO*3.375);
qjjJE:=INTPART(JO*3.5);
qjjJF:=INTPART(JO*3.625);
qjjJG:=INTPART(JO*3.666);
qjjJH:=INTPART(JO*3.75);
rqjjJA:=INTPART(JO*4.125);
rqjjJB:=INTPART(JO*4.25) ;
rqjjJC:=INTPART(JO*4.333);
rqjjJD:=INTPART(JO*4.375);
rqjjJE:=INTPART(JO*4.5);
rqjjJF:=INTPART(JO*4.625);
rqjjJG:=INTPART(JO*4.666);
rqjjJH:=INTPART(JO*4.75);
DRAWTEXT(BARSLAST(XG)=JA or BARSLAST(XG)=Jb or BARSLAST(XG)=Jc or BARSLAST(XG)=Jd or BARSLAST(XG)=Je or BARSLAST(XG)=Jf or BARSLAST(XG)=Jg or BARSLAST(XG)=Jh or BARSLAST(XG)=jJA or BARSLAST(XG)=Jjb or BARSLAST(XG)=Jjc or BARSLAST(XG)=Jjd or BARSLAST(XG)=Jje or BARSLAST(XG)=Jjf or BARSLAST(XG)=Jjg or BARSLAST(XG)=Jjh
Or BARSLAST(XG)=jjJA or BARSLAST(XG)=Jjjb or BARSLAST(XG)=Jjjc or BARSLAST(XG)=Jjjd or BARSLAST(XG)=Jjje or BARSLAST(XG)=Jjjf or BARSLAST(XG)=Jjjg or BARSLAST(XG)=Jjjh
Or BARSLAST(XG)=qjjJA or BARSLAST(XG)=qJjjb or BARSLAST(XG)=qJjjc or BARSLAST(XG)=qJjjd or BARSLAST(XG)=qJjje or BARSLAST(XG)=qJjjf or BARSLAST(XG)=qJjjg or BARSLAST(XG)=qJjjh
Or BARSLAST(XG)=rqjjJA or BARSLAST(XG)=rqJjjb or BARSLAST(XG)=rqJjjc or BARSLAST(XG)=rqJjjd or BARSLAST(XG)=rqJjje or BARSLAST(XG)=rqJjjf or BARSLAST(XG)=rqJjjg or BARSLAST(XG)=rqJjjh
,-10,'等周期'),COLORYELLOW,align1;
SW1Z:= (EMA(CLOSE,5)*7+EMA(CLOSE,10)*3)/10;
TTC:=(C-SW1Z)/SW1Z*100;
PTC:=MA(TTC,6);
VARF:=TROUGHBARS(3,15,1)
hcA:=REF(VARF,1);
hcB:=REF(VARF,2);
hcD:=REF(VARF,3);
启动1:=IF(FILTER(VARF=1,5) AND CROSS(TTC,PTC),0,-20);
启动2:=IF(FILTER(hcA=1,5) AND CROSS(TTC,PTC),0,-20);
启动3:=IF(FILTER(hcB=1,5) AND CROSS(TTC,PTC),0,-20);
启动4:=IF(FILTER(hcD=1,5) AND CROSS(TTC,PTC),0,-20);
启动:if((启动1 -10 or 启动2 -10 or 启动3 -10 or 启动4 -10),60,0),linethick3;
VARF1:=PEAKBARS(3,15,1)
hcW:=REF(VARF1,1);
hcP:=REF(VARF1,2);
hcQ:=REF(VARF1,3);
回落g1:=IF(FILTER(VARF1=1,5) AND CROSS(PTC,TTC),0,20);
回落g2:=IF(FILTER(hcW=1,5) AND CROSS(PTC,TTC),0,20);
回落g3:=IF(FILTER(hcP=1,5) AND CROSS(PTC,TTC),0,20);
回落g4:=IF(FILTER(hcQ=1,5) AND CROSS(PTC,TTC),0,20);
回落g:if((回落g1 10 or 回落g2 10 or 回落g3 10 or 回落g4 10),80,0),colorgreen,linethick3 ;
DRAWTEXT(启动=60,1,'波段启'),COLORWHITE,align1;
DRAWTEXT(回落g=80,1,'波段回'),COLORWHITE,align1;
VARZXCA1:=ZIG(1,13,1);
北狼㊣买:IF(REF(VARZXCA1,2) REF(VARZXCA1,1) AND VARZXCA1 REF(VARZXCA1,1),30,0);
北狼㊣卖:IF(REF(VARZXCA1,2) REF(VARZXCA1,1) AND VARZXCA1 REF(VARZXCA1,1),30,0);
DRAWTEXT(北狼㊣买=30,35,'北㊣买'),COLORWHITE,align1;
DRAWTEXT(北狼㊣卖=30,35,'北㊣卖'),COLORWHITE,align1;
VARZA10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH LOW+0.04,4,0);
VARZA11:=ZIG(3,6) REF(ZIG(3,6),1) AND REF(ZIG(3,6),1) =REF(ZIG(3,6),2) AND REF(ZIG(3,6),2) =REF(ZIG(3,6),3);
VARZA12:=ZIG(3,6) REF(ZIG(3,6),1) AND REF(ZIG(3,6),1) =REF(ZIG(3,6),2) AND REF(ZIG(3,6),2) =REF(ZIG(3,6),3);
VARZA13:=ZIG(3,22) REF(ZIG(3,22),1) AND REF(ZIG(3,22),1) =REF(ZIG(3,22),2) AND REF(ZIG(3,22),2) =REF(ZIG(3,22),3);
VARZA14:=ZIG(3,22) REF(ZIG(3,22),1) AND REF(ZIG(3,22),1) =REF(ZIG(3,22),2) AND REF(ZIG(3,22),2) =REF(ZIG(3,22),3);
VARZA15:=ZIG(3,51) REF(ZIG(3,51),1) AND REF(ZIG(3,51),1) =REF(ZIG(3,51),2) AND REF(ZIG(3,51),2) =REF(ZIG(3,51),3);
VARZA16:=ZIG(3,51) REF(ZIG(3,51),1) AND REF(ZIG(3,51),1) =REF(ZIG(3,51),2) AND REF(ZIG(3,51),2) =REF(ZIG(3,51),3);
VARZA17:=ZIG(3,72) REF(ZIG(3,72),1) AND REF(ZIG(3,72),1) =REF(ZIG(3,72),2) AND REF(ZIG(3,72),2) =REF(ZIG(3,72),3);
VARZA18:=ZIG(3,72) REF(ZIG(3,72),1) AND REF(ZIG(3,72),1) =REF(ZIG(3,72),2) AND REF(ZIG(3,72),2) =REF(ZIG(3,72),3);
买D１:=VARZA10;
买D２:=(VARZA11+VARZA13+VARZA15+VARZA17);
卖D１:=(VARZA12+VARZA14+VARZA16+VARZA18);
DRAWTEXT(买D１ 0 ,12,'异动'),ALIGN1,COLORWHITE;
DRAWTEXT(买D２ 0,12,'买ZIG'),ALIGN1,COLORWHITE;
DRAWTEXT(卖D１ 0,12,'卖ZIG'),ALIGN1,COLORWHITE;
VARm7:=TROUGHBARS(3,15,1)
VARM8:=IF(VARM7=1,50,0);
底部:=IF(VARM8=50,10,0);
未来买入:=(底部=10 AND REF(底部,1)=10 AND REF(底部,2)=0);
买入M:COUNT(未来买入,3)=1;
DRAWTEXT(买入M 0,25,'参考'),ALIGN1,COLORWHITE;
partline(短期强弱,短期强弱 =ref(短期强弱,1),rgb(255,0,0),短期强弱 ref(短期强弱,1),rgb(0,250,0)),linethick3;
