相關標簽:

?

指標比【BS買賣優】指標更優秀，該指標是機構相關指標經過優化的出來的。

//{1.機構部分}
買線:=ZIG(3,10);
賣線:=MA(買線,2);
BU:=CROSS(買線,賣線);
SEL:=CROSS(賣線,買線);
DRAWTEXT(BU,L*0.95,'機構進場'),coloryellow;
DRAWTEXT(SEL,H*1.05,'機構清倉'),colorblue;
STICKLINE(買線>=賣線,LOW,HIGH,0,0),colorred;
STICKLINE(買線>=賣線,CLOSE,OPEN,2,0),colorred;
STICKLINE(買線<賣線,CLOSE,OPEN,2,0),COLORGREEN;//http://www.kzuj.com.cn
STICKLINE(買線<賣線,LOW,HIGH,0,0),COLORGREEN;//http://www.kzuj.com.cn
STICKLINE(CROSS(買線,賣線),OPEN,CLOSE,2,0),coloryellow;
STICKLINE(CROSS(賣線,買線),OPEN,CLOSE,2,0),colorblue;
DRAWICON((ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND(REF(ZIG(3,5),2)<=REF(ZIG(3,5),3)),LOW*0.99,1);
DRAWICON((ZIG(3,5)=REF(ZIG(3,5),2)) AND(REF(ZIG(3,5),2)>=REF(ZIG(3,5),3)),H,2);
//{2.買賣}//www.kzuj.com.cn
CXHC:=(ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3,5),1)<=REF(ZIG(3,5),2)) AND(REF(ZIG(3,5),2)<=REF(ZIG(3,5),3));
CXHD:=(ZIG(3,5)=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)>=REF(ZIG(3,5),3));
DRAWTEXT((CXHC=1),L,'買'),coloryellow;
DRAWTEXT((CXHD=1),H,'賣'),colorblue;
//{3.頭部}
V10:=PEAKBARS(3,15,1)<10;
V12:=IF(V10=1,50,0);
頭部:= IF(V12=50,100,0);
DRAWTEXT(頭部>REF(頭部,1),H*1.02,'拉升減倉'),colorwhite,LINETHICK1;
//{4.抄底部分}
V9:=TROUGHBARS(3,15,1)<10;
V11:=IF(V9=1,50,0);
DRAWTEXT(V11>REF(V11,1),L*0.95,'抄底'),colormagenta;
//{5.短線部分}//www.kzuj.com.cn
CXHE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
CXHF:=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);
CXH10:=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);
CXH11:=CXHF<REF(CXH10,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
DRAWTEXT(CXH11 AND COUNT(CXH11,30)=1,L*0.95,'短線資金進'),colorlimagenta;
CXH12:=(HIGH+LOW+CLOSE)/3;
CXH13:=(CXH12-MA(CXH12,14))/(0.015*AVEDEV(CXH12,14));
CXH14:=(CXH12-MA(CXH12,70))/(0.015*AVEDEV(CXH12,70));
CXH15:=IF(CXH13>=150 AND CXH13<200 AND CXH14>=150 AND CXH14<200,10,0);
CXH16:=IF(CXH13<=-150 AND CXH13>-200 AND CXH14<=-150 AND CXH14>-200,-10,CXH15);
CXH17:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
CXH18:=100-ABS(CXH17);
CXH19:=IF(CXH18<90,CXH18,100);
CXH1A:=IF(CXHE>0,CXHE,0);
CXH1B:=IF(CXH14>=200 AND CXH13>=150,15,IF(CXH14<=-200 AND CXH13<=-150,-15,CXH16))+60;
CXH1C:=CXH1A>48 AND CXH1B>60 AND CXH19<100;
DRAWTEXT(CXH1C AND COUNT(CXH1C,30)=1,H*1.05,'短線資金出'),COLORGREEN;//http://www.kzuj.com.cn
//{6.基金部分}
VRE2:=REF(LOW,1)*0.9;
VRF2:=LOW*0.9;
VR10:=(VRF2*VOL+VRE2*(CAPITAL-VOL))/CAPITAL;
VR11:=EMA(VR10,30);
VR12:=CLOSE-REF(CLOSE,1);
VR13:=MAX(VR12,0);
VR14:=ABS(VR12);
VR15:=SMA(VR13,7,1)/SMA(VR14,7,1)*100;
VR16:=SMA(VR13,13,1)/SMA(VR14,13,1)*100;
VR17:=BARSCOUNT(CLOSE);
VR18:=SMA(MAX(VR12,0),6,1)/SMA(ABS(VR12),6,1)*100;
VR19:=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100;
VR1A:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
VR1B:=SMA((SMA(VR1A,4,1)-50)*2,3,1);
VR1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;
VR1D:=SMA(VR1C,4,1);
VR1E:=SMA(VR1D,3,1);
VR1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;
VR20:=VR18<=25 AND VR19<-95 AND VR1F>20 AND VR1B<-30 AND VR1E<30 AND VR11-CLOSE>=-0.25 AND VR15<22 AND VR16<28 AND VR17>50;
VR21:=(HIGH+LOW+CLOSE)/3;
VR22:=(VR21-MA(VR21,14))/(0.015*AVEDEV(VR21,14));
VR23:=(VR21-MA(VR21,70))/(0.015*AVEDEV(VR21,70));
VR24:=VR22>=150 AND VR22<200 AND VR23>=150 AND VR23<200;
DRAWTEXT(VR20 AND COUNT(VR20,1)=1,H*0.99,'基金建倉'),colormagenta;
DRAWTEXT(VR24 AND COUNT(VR24,1)=1,L*1.1,'基金清倉'),colorblue;

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?