以下是分时决策资源码2个指标合2为一
分时决策资源码2个指标合2为一
A1:=(DVOL/C)/2,NODRAW;
A2:=SUM(IF(A1>100 AND CLOSE>REF(CLOSE,1),A1,0),0);
A3:=SUM(IF(A1>100 AND CLOSE<REF(CLOSE,1),A1,0),0);
A4:=SUM(IF(A1<100 AND CLOSE>REF(CLOSE,1),A1,0),0);
A5:=SUM(IF(A1<100 AND CLOSE<REF(CLOSE,1),A1,0),0);
A6:=A2+A3+A4+A5;
机买:(A2/A6)*100,LINETHICK2,COLORRED;
机卖:(A3/A6)*100,LINETHICK2,COLORGREEN;
散买:(A4/A6)*100,LINETHICK0;
散卖:(A5/A6)*100,LINETHICK0;
主力差:机买-机卖,LINETHICK2,NODRAW;
小股民差:散买-散卖,LINETHICK0,NODRAW;
DRAWTEXT(主力差>0 AND REF(主力差,1)<=0,C*0.85,’●机构‘),COLORRED;
DRAWTEXT(主力差<0 AND REF(主力差,1)>=0,-C*0.85,’○机构’),COLORWHITE;
DRAWTEXT(小股民差>0 AND REF(小股民差,1)<=0,C*0.15,’▲小股民’),COLORCYAN;
DRAWTEXT(小股民差<0 AND REF(小股民差,1)>=0,-C*0.15,’△小股民’),COLORWHITE;N:=150;
BU:=BARSLAST((CLOSE = HHV(CLOSE,N)));
SE:=BARSLAST((CLOSE = LLV(CLOSE,N)));
KK1:=SE;
KK2:=BU;
LM1:=SE;
LM2:=BU;
OK:=((KK1 > KK2) AND (LM1 > LM2));
OK1:=((KK1 > KK2) AND (LM1 < LM2));
NOK:=((KK2 > KK1) AND (LM2 > LM1));
NOK1:=((KK2 > KK1) AND (LM2 < LM1));
STICKLINE(OK1,CLOSE,OPEN,8,0),COLORFFFF00;
STICKLINE(OK1,HIGH,LOW,0,0),COLORFFFF00;
STICKLINE(OK,CLOSE,OPEN,8,0),COLORRED;
STICKLINE(OK,HIGH,LOW,0,0),COLORRED;
STICKLINE(NOK,CLOSE,OPEN,8,0),COLORFFFF00;
STICKLINE(NOK,HIGH,LOW,0,0),COLORFFFF00;
STICKLINE(NOK1,CLOSE,OPEN,8,0),COLORRED;
STICKLINE(NOK1,HIGH,LOW,0,0),COLORRED;
DRAWICON(CROSS(KK1,KK2),(OPEN * 0.9999),1);
DRAWICON(CROSS(KK2,KK1),(OPEN * 1.0009),2);
DRAWTEXT(CROSS(KK1,KK2),(OPEN * 0.99),’跟\N进’),COLORRED;
评论(0)