通达信分时博弈主图指标公式源码

现价:C,COLORFFFFFF,LINETHICK2;
VAR1:=(BARSLAST(((HOUR=9) AND (MINUTE=31)))+1);
VAR2:=SUM(C*vol,BARSCOUNT(C))/SUM(VOL,BARSCOUNT(C));
VAR3:=(SUM((C*VOL),0)/SUM(VOL,0));
VAR4:=(((SETCODE=0) OR (SETCODE=1)) AND (C< 500));
VAR5:=IF(VAR4,VAR2,VAR3);
VAR6:=REF(C,1);
VAR7:=REF(MAX(HIGH,VAR6),1);
VAR8:=REF(MIN(LOW,VAR6),1);
VAR9:=(MA((((VAR7-VAR8)/REF(C,2))*100),5) /9);
VAR10:=(VAR9*1.3);
VAR11:=((C>REF(C,1)) AND ((C/VAR5)>(1+(VAR9/100))));
VAR12:=((C< REF(C,1)) AND ((C/VAR5)< (1-(VAR9/100))));
VAR13:=((REF(SUM(VAR11,0),1)=0) AND (SUM(VAR11,0)=1));
VAR14:=((REF(SUM(VAR12,0),1)=0) AND (SUM(VAR12,0)=1));
VAR15:=(SUM(VAR13,0)*crOSS(COUNT((C< REF(C,1)),BARSLAST(VAR13)),0.5));
VAR16:=(SUM(VAR14,0)*CROSS(COUNT((C>REF(C,1)),BARSLAST(VAR14)),0.5));
分时1:CONST(SUM(IF(VAR15,REF(C,1),DRAWNULL),0)),COLOR00FF00,LINETHICK2;
博弈1:CONST(SUM(IF(VAR16,REF(C,1),DRAWNULL),0)),COLORLIMAGENTA,LINETHICK2;
VAR17:=CROSS(SUM((VAR11 AND (C>(分时1*(1+(VAR10/100))))),0),0.5);
VAR18:=CROSS(SUM((VAR12 AND (C< (博弈1*(1-(VAR10/100))))),0),0.5);
VAR19:=(SUM(VAR17,0)*CROSS(COUNT((C< REF(C,1)),BARSLAST(VAR17)),0.5));
VAR20:=(SUM(VAR18,0)*CROSS(COUNT((C>REF(C,1)),BARSLAST(VAR18)),0.5));
分时2:CONST(SUM(IF(VAR19,REF(C,1),DRAWNULL),0)),COLORGREEN,LINETHICK3;
博弈2:CONST(SUM(IF(VAR20,REF(C,1),DRAWNULL),0)),COLORLIMAGENTA,LINETHICK3;
DRAWICON((VAR13 OR VAR17),(C*1.001),2);
DRAWICON((VAR14 OR VAR18),(C*0.999),1);
DRAWICON((VAR16 OR VAR20),(REF(C,1)*0.999),25);
DRAWICON((VAR15 OR VAR19),(REF(C,1)*1.001),27);