Blue Ice Failure


TC2000

ABS(XAVGC8 - AVGC200) / XAVGC8 > .10 AND
C > AVGC200 AND
C < AVGC50 AND
C > 10 AND
( (H5 > AVGC50.5) OR
  (H4 > AVGC50.4) OR
  (H3 > AVGC50.3) OR
  (H2 > AVGC50.2) OR
  (H1 > AVGC50.1) ) 
  
  
-----------------------------------------------------------------  
TOS

# Blue Ice Failure
# Written by Rick Saddler
# Converted to TOS by Ed Carter
#
def XAVGC8 = ExpAverage(close, 8);
def AVGC50 = Average(close, 50);
def AVGC200 = Average(close, 200);
def C = close;
def H = high;
#
plot BlueIceFail = (
AbsValue(XAVGC8 - AVGC200) / XAVGC8 > .10 and
C > AVGC200 and
C < AVGC50 and
C > 10 and
( (H[5] > AVGC50[5]) or
  (H[4] > AVGC50[4]) or
  (H[3] > AVGC50[3]) or
  (H[2] > AVGC50[2]) or
  (H[1] > AVGC50[1] ))
);