通達信兄弟投機短線波段指標公式：含有未來函數(shù)

N:=9;M1:=3;M2:=3;
 TJZB1:100*(C-LLV(L,5))/(HHV(C,5)-LLV(L,5)),COLOR0080FF;
 TJZB2:100*(C-LLV(L,10))/(HHV(C,10)-LLV(L,10)),COLORGREEN;
 TJZB3:100*(C-LLV(L,20))/(HHV(C,20)-LLV(L,20)),COLORFF8000;
 TJZB4:100*(C-LLV(L,30))/(HHV(C,30)-LLV(L,30)),COLOR00FFFF;
 {經(jīng)典KDJ}
 RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
 K:=SMA(RSV,M1,1);
 D:=SMA(K,M2,1);
 J:=3*K-2*D;
 {波段雄鷹}
 VAR5E:=LLV(LOW,26);
 VAR6E:=HHV(HIGH,34);
 VAR7E:=EMA((CLOSE-VAR5E)/(VAR6E-VAR5E)*4,4)*25;
 DRAWTEXT(VAR7E<10,10,'底'),COLORWHITE;
 DRAWTEXT(VAR7E>90,90,'頂'),COLORGREEN;
 {三色必殺}
 VVAR1:=(C-MA(C,6))/MA(C,6)*100;
 VVAR2:=(C-MA(C,24))/MA(C,24)*100;
 VVAR3:=(C-MA(C,32))/MA(C,32)*100;
 VVAR4:=(VVAR1+VVAR2+VVAR3)/3;
 VVAR5:=EMA(VVAR4,5);
 VVAR6:=MA(100*(C-LLV(C,34))/(HHV(H,34)-LLV(L,34)),5)-20;
 VVAR7:=SMA(SMA(100-3*(C-LLV(C,75))/(HHV(H,75)-LLV(L,75))*100,20,1)+SMA(2*(C-LLV(C,75))/(HHV(H,75)-LLV(L,75))*100,20,1),15,1);
 VVAR8:=VVAR7<REF(VVAR7,1) AND V>REF(V,1) AND C>REF(C,1);
 AK:=EMA(VVAR5,5)*4;
 AD:=EMA(AK,5),COLORMAGENTA,LINETHICK2;
 AJ:=AK*3-AD*2,COLORYELLOW,LINETHICK2;
 看多:IF(LLV(VVAR6,3)<VVAR6,-15,DRAWNULL),LINETHICK2,COLORRED;
 看空:IF(VVAR6=LLV(VVAR6,3),-15,DRAWNULL),LINETHICK2,COLORGREEN;
 中短線:IF(AJ>AD,-10,DRAWNULL),LINETHICK2,COLORCC66FF;
超短線:IF(VVAR8>0,-5,DRAWNULL),LINETHICK2,COLORYELLOW;
 不定區(qū):IF(AJ<AD,-10,DRAWNULL),LINETHICK2,COLORFF9900;
 牛熊戰(zhàn)區(qū):IF(VVAR8=0,-5,DRAWNULL),LINETHICK2,COLOR6B8E23;
 {黑馬偵探}
 W:=((-((100)*(HHV(H,14) - C))/(HHV(HIGH,14) - LLV(L,14))));
 A2:=MA(C,18);
 A3:=(C-A2)/A2*100>=-9.9 AND C<A2;
 RRV:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
 RRG1:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*1;
 SKK:=EMA(SMA(RRG1,3,1),2);
 SDD:=SMA(SKK,3,1);
 WAR4:=SMA(RRV,3,1);
 WAR5:=SMA(WAR4,3,1);
 腰線:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
 KKA:=EMA(C-L,5) ;
 頂線:=MA((C+REF(C,1)+REF(C,1))/3+KKA,5);
 底線:=MA(REF(C,1)-KKA,5);
 MA20:= MA(C,20);
 BBA:=MA(C,2);
 CCA:=MA(C,10);
 DDA:=MA(C,20);
 EEA:=EXIST(CROSS(BBA,CCA) AND CROSS(BBA,DDA),1);
 VAAR6:="KDJ.J#WEEK"(9,3,3);
 VAAR8:="KDJ.J#MONTH"(9,3,3);
 DEA7:="MACD.DEA#WEEK";
 DIFF7:="MACD.DIF#WEEK";
 D7:=DIFF7-DEA7;
 DEA8:="MACD.DEA#MONTH";
 DIFF8:="MACD.DIF#MONTH";
 D8:=DIFF8-DEA8;
 P:=(HIGH+LOW+CLOSE)/3;
CCI1:=(P-MA(P,14))*1000/(15*AVEDEV(P,14)),COLORRED;
 CCI2:=(P-MA(P,36))*1000/(15*AVEDEV(P,36)),COLORGREEN;
 DRAWTEXT(CROSS(VAAR6,0) AND D8>0 OR CROSS(VAAR8,0) AND D7>0,70,'黑馬抄底'),COLOR0000FF;
 DRAWTEXT(CROSS(W,-2) AND CROSS(WAR4,WAR5) AND CROSS(SKK,SDD),50,'天天漲停'),COLOR0000FF;
 DRAWTEXT(A3 AND C/REF(C,1)>1.080,50,'美人如玉'),COLORRED;
 DRAWTEXT(腰線>O AND O>底線 AND C>頂線 AND C>MA20 AND C>腰線 AND EEA AND CROSS(WAR4,WAR5) AND CROSS(SKK,SDD),50,'明月戰(zhàn)
 神'),COLORGREEN;
 DRAWTEXT(CROSS(CCI1,CCI2) AND REF(CCI1,1)=LLV(CCI1,25) AND CROSS(K,D),0.4,'抄底王'),COLORYELLOW;
 {莊家抬轎}
 VAR1F:=EMA(EMA(CLOSE,9),9);
控盤:=(VAR1F-REF(VAR1F,1))/REF(VAR1F,1)*1000;
 STICKLINE(控盤<0,控盤,0,1,0),COLORWHITE;
 A10:=CROSS(控盤,0);
 無莊控盤:=IF(控盤<0,控盤,0),COLORWHITE,NODRAW;
 開始控盤:=IF(A10,5,0),LINETHICK1,COLORYELLOW;
 STICKLINE(控盤>REF(控盤,1) AND 控盤>0,控盤,0,1,0),COLORRED;
 有莊控盤:=IF(控盤>REF(控盤,1) AND 控盤>0,控盤,0),COLORRED,NODRAW;
 VAR2F:=100*WINNER(CLOSE*0.95);
 STICKLINE(VAR2F>50 AND COST(85)<CLOSE AND 控盤>0,控盤,0,1,0),COLORFF00FF;
 高度控盤:=IF(VAR2F>50 AND COST(85)<CLOSE AND 控盤>0,控盤,0),COLORFF00FF,NODRAW;
 STICKLINE(控盤<REF(控盤,1) AND 控盤>0,控盤,0,1,0),COLOR00FF00;
 主力出貨:=IF(控盤<REF(控盤,1) AND 控盤>0,控盤,0),COLOR00FF00,NODRAW;
 {明月照積雪}
 RV:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
 RG:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
 VAR4:=SMA(RV,3,1);
 VAR5:=SMA(VAR4,3,1);
 KK:=EMA(SMA(RG,3,1),2);
 DD:=SMA(KK,3,1);
 DRAWTEXT(CROSS(VAR4,VAR5) AND CROSS(KK,DD),35,'積雪'),COLOR00FFFF;
 STICKLINE(CROSS(VAR4,VAR5) AND CROSS(KK,DD),0,35,1,0),COLORMAGENTA;
 {兄弟波段戰(zhàn)法}
 DTJJ:=(CLOSE+HIGH+LOW)/3;
 DTA:=EMA(DTJJ,10);
 DTB:=REF(DTA,1);
 STICKLINE(DTA>DTB,-20,-25,5,0),COLORYELLOW;
 STICKLINE(DTA<DTB,-20,-25,5,0),COLORBLUE;
 {黃托底藍壓頂}
 VARR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
 VARR2:=REF(VARR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 VARR3:=REF(VARR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 VARR4:=REF(VARR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 VARR5:=REF(VARR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 VARR6:=REF(VARR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 VARR7:=REF(VARR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 VARR8:=REF(VARR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 VARR9:=REF(VARR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 VARRA:=REF(VARR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 VARRB:=REF(VARRA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 VARRC:=REF(VARRB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 VARRD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
 VARRE:=REF(VARRD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 VARRF:=REF(VARRE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 VARR10:=REF(VARRF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 VARR11:=REF(VARR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 VARR12:=REF(VARR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 VARR13:=REF(VARR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 VARR14:=REF(VARR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 VARR15:=REF(VARR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 VARR16:=REF(VARR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 VARR17:=REF(VARR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
 VARR18:=REF(VARR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
 VARR19:=REF(VARRD OR VARRE OR VARRF OR VARR10 OR VARR11 OR VARR12 OR VARR13 OR
 VARR14 OR VARR15 OR VARR16 OR VARR17 OR VARR18,1) AND VARR1;
 VARR1A:=REF(VARR1 OR VARR2 OR VARR3 OR VARR4 OR VARR5 OR VARR6 OR VARR7 OR
 VARR8 OR VARR9 OR VARRA OR VARRB OR VARRC,1) AND VARRD;
 DRAWTEXT(VARR19,20,'黃托底'),COLORYELLOW;
 DRAWTEXT(VARR1A,80,'藍壓頂'),COLORLICYAN;
 {紅色啟動}
 啟動線:=10*SUM(EMA((C+L)/2,2),5)/10.158,NODRAW;
 平衡線:=10*LLV(SUM( EMA((C+L)/2,2),5)/10.158,4),NODRAW;
 平臺線:=10*LLV(SUM( EMA((C+L)/2,2),5)/10.158,10),NODRAW;
 強弱線:=EMA(啟動線,21);
 VAR1:=2*MA(LLV((C+L)/2,8)*1.1,13)-EMA((C+L)/2,3)-((C+L)/2)*0.1;
 VAR2:=IF((EMA((C+L)/2,3)-VAR1)*5>0,POW((EMA((C+L)/2,3)-VAR1)*5,2)/10,-1*POW((EMA((C+L)/2,3)-VAR1)*5,2)/10);
 VAR3:=IF(VAR2>0,VAR2-0,0);
 STICKLINE(VAR3>0 AND REF(VAR3,1)=0 AND (C+L)/2>MA((C+L)/2,8),0,50,1,0),COLORYELLOW;
 DRAWTEXT(VAR3>0 AND REF(VAR3,1)=0 AND (C+L)/2>MA((C+L)/2,8),50,'紅色啟動');
 {短線高手}
 VAR1C:=1;
 VAR2C:=(2*CLOSE+HIGH+LOW)/4;
 VAR3C:=IF(YEAR>=2099 AND MONTH>2,0,1);
 VAR4C:=LLV(LOW,5);
 VAR5C:=HHV(HIGH,4);
散戶:=EMA((VAR2C-VAR4C)/(VAR5C-VAR4C)*100,4)*VAR3C*VAR1C;
 莊家:=EMA(0.667*REF(散戶,1)+0.333*散戶,2)*VAR3C*VAR1C;
 DRAWTEXT(CROSS(散戶,莊家) AND 散戶<50 AND 29<散戶,40,'短快進'),COLOR00FF00;
 DRAWTEXT(CROSS(散戶,莊家) AND 散戶<30,50,'低吸'),COLOR3399CC;
 DRAWTEXT(CROSS(莊家,散戶) AND 散戶>70,95,'高拋'),COLORMAGENTA;

通達信兄弟投機短線波段指標公式實例圖解：

通達信兄弟投機短線波段指標公式