TYP:=(H+L+C)/3;
 LC:=REF(C,1);
 {NO.1}
 VAR001:=(TYP-MA(TYP,15))/(0.016*AVEDEV(TYP,15));
 VAR002:=SMA(MAX(C-LC,0),6,1)/SMA(ABS(C-LC),6,1)*100;
 B001:=IF(CROSS(VAR001,-150),1,0);
 S001:=IF(CROSS(80,VAR002),1,0);
 {NO.2}
 VAR003:=EMA(100*(C-LLV(L,31))/(HHV(H,31)-LLV(L,31)),3)/4;
 B002:=IF(VAR003<1,1,0);
 S002:=IF(VAR003>23,1,0);
 {NO.3}
 VAR004:=(C-LLV(L,18))/(HHV(H,18)-LLV(L,18))*100; 
 VAR005:=EMA(VAR004,3); 
 VAR006:=EMA(VAR005,3); 
 VAR007:=(3*VAR005-2*VAR006); 
 VAR008:=REF(COUNT(VAR007<REF(VAR007,1),5)>=3,1) AND REF(VAR007,1)<20; 
 VAR009:=VAR007>REF(VAR007,1); 
 B003:=IF(FILTER(VAR008 AND VAR009,3),1,0);
 {NO.4}
 VAR010:=AMOUNT/VOL/1000;
 VAR011:=(3*H+L+O+2*C)/7;
 VAR012:=SUM(AMOUNT,13)/VAR010/1000;
 VAR013:=DMA(VAR011,VOL/VAR012);
 VAR014:=(CLOSE-VAR013)/VAR013*1000;
 B004:=IF(CROSS(VAR014,-166),1,0);
 B005:=IF(CROSS(VAR014,-120),1,0);
 B006:=IF(CROSS(VAR014,-88),1,0);