通达信修改整理的张氏糸列副图源码 有未来

谈谈未来.大家注意图中提示.很能说明问题.张氏买卖适合各种周期.对长周期更加有味道请仔细品味
未来出现信号表示一个方向的终止.虽有漂移但是方向即将发生转变.我用这个指标几年了.可以称是未来中的极品.配合张氏波段更佳.个人见解供参考.大家使用中去体会谢谢
忘了对不起
高抛低吸
n 1 100 1
n2 1 100 1
n3 1 100 1
n4 1 100 1
 

张氏波段

VARA:=LLV(LOW,35);
VARB:=HHV(HIGH,30);
VARC:=EMA((CLOSE-VARA)/(VARB-VARA)*4,4)*25;
QS:= VARC,COLORWHITE;
STICKLINE(VARC<10 && 100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14))>97,0,25,3,0),COLORYELLOW;
STICKLINE(VARC>90,100,85,3,0),COLORRED;
VARD:=87.5;
VARE:=(VARC-LLV(VARC,4))/(HHV(VARC,4)-LLV(VARC,4))*4*25;
一:=CROSS(QS,VARD) AND VARE=100;
二:=CROSS(VARD,QS);
三:=CROSS(QS,VARE) AND QS>87;
DRAWTEXT(一,56,'目标');
DRAWTEXT(二,85,'跑');
DRAWTEXT(三,70,'卖');
VAR6:=(2*CLOSE+HIGH+LOW)/4;
VAR8:=LLV(LOW,30);
VARAA:=HHV(HIGH,30);
B:=EMA((VAR6-VAR8)/(VARAA-VAR8)*100,8);
B1:=EMA(B,5);
STICKLINE(B>0 && B-B1>=0,79,80,3,0),COLORWHITE;
STICKLINE(B>0 && B-B1<0,79,80,3,0),COLORCYAN;
STICKLINE(B>0 && B-B1>=0,49,50,3,0),COLORRED;
STICKLINE(B>0 && B-B1<0,49,50,3,0),COLORRED;
STICKLINE(B>0 && B-B1>=0,19,20,3,0),COLORWHITE;
STICKLINE(B>0 && B-B1<0,19,20,3,0),COLORCYAN;
STICKLINE(B-B1>0,B,B1,3,1),COLORRED;
STICKLINE(B-B1<0,B,B1,3,1),COLORWHITE;

张氏买卖

VAR3:=(CLOSE-MA(CLOSE,0))/MA(CLOSE,0)*100;
VAR4:=(CLOSE-MA(CLOSE,0))/MA(CLOSE,0)*100;
VAR5:=(CLOSE-MA(CLOSE,0))/MA(CLOSE,0)*100;
VAR6:=(VAR3+VAR4+VAR5)/3;
VAR7:=EMA(VAR6,5);
VAR8:=IF(VAR6<=-20,10,0);
VAR9:=HHV(VAR8,10);
STICKLINE(VAR8=10,20,10,3,0),COLORRED;
VARA:=IF(VAR9 && CROSS(MA(CLOSE,3),MA(CLOSE,5)),20,0);
STICKLINE((VARA=20),0,10,3,0),COLORWHITE;
VARC:=(ZIG(3,5)>REF(ZIG(3,5),1)) && (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) && (REF(ZIG
(3,5),2)<=REF(ZIG(3,5),3));
VARD:=(ZIG(3,5)=REF(ZIG(3,5),2)) && (REF(ZIG
(3,5),2)>=REF(ZIG(3,5),3));
STICKLINE((VARC=1),(-14),0,3,0),COLORMAGENTA;
DRAWTEXT((VARC=1),(-14),'买');
STICKLINE((VARD=1),14,0,3,0),COLORGREEN;
DRAWTEXT((VARD=1),18,'卖');
VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VARF:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA
((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR10:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA
((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR11:=VARFREF(VOL,1) && CLOSE>REF(CLOSE,1);
DRAWTEXT(VAR11 && COUNT(VAR11,30)=1,15,'大资金活动');
STICKLINE(VAR11 && COUNT(VAR11,30)=1,1,10,3,0),COLORCYAN;
VAR12:=(HIGH+LOW+CLOSE)/3;
VAR13:=(VAR12-MA(VAR12,14))/(0.015*AVEDEV(VAR12,14));
VAR14:=(VAR12-MA(VAR12,70))/(0.015*AVEDEV(VAR12,70));
VAR15:=IF(VAR13>=150 && VAR13<200 && VAR14>=150 && VAR14<200,10,0);
VAR16:=IF(VAR13<=-150 && VAR13>-200 && VAR14<=-150 && VAR14>-200,-10,VAR15);
VAR17:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
VAR18:=100-ABS(VAR17);
VAR19:=IF(VAR18<90,VAR18,100);
VAR1A:=IF(VARE>0,VARE,0);
VAR1B:=IF(VAR14>=200 && VAR13>=150,15,IF(VAR14<=-200 && VAR13<=-150,-15,VAR16))+60;
VAR1C:=VAR1A>48 && VAR1B>60 && VAR19<100;
DRAWTEXT(VAR1