Bachelorthesis/Modbus-CAPL/include/CAPL/DEU Power.can

/*@!Encoding:1252*/
includes
{
  
}

variables
{
  
}

on sysvar sysvar::Airbus::ESS_DC1
{
  if (@this)
  {
    @sysvar::Airbus::DEU223RH06::B_DC1_E=@this;
    @sysvar::Airbus::DEU226RH06::B_DC1_E=@this;
    @sysvar::Airbus::DEU228RH06::B_DC1_E=@this;
    @sysvar::Airbus::DEU229RH06::B_DC1_E=@this;
  }
}

on sysvar sysvar::Airbus::ESS_DC2
{
  if (@this)
  {
    @sysvar::Airbus::DEU223RH06::B_DC2_E=@this;
    @sysvar::Airbus::DEU226RH06::B_DC2_E=@this;
    @sysvar::Airbus::DEU228RH06::B_DC2_E=@this;
    @sysvar::Airbus::DEU229RH06::B_DC2_E=@this;
  }
}

on sysvar sysvar::Airbus::NORM_DC1
{
  if (@this)
  {
    @sysvar::Airbus::DEU223RH06::B_DC1_N=@this;
    @sysvar::Airbus::DEU226RH06::B_DC1_N=@this;
    @sysvar::Airbus::DEU228RH06::B_DC1_N=@this;
    @sysvar::Airbus::DEU229RH06::B_DC1_N=@this;
  }
}

on sysvar sysvar::Airbus::NORM_DC2
{
  if (@this)
  {
    @sysvar::Airbus::DEU223RH06::B_DC2_N=@this;
    @sysvar::Airbus::DEU226RH06::B_DC2_N=@this;
    @sysvar::Airbus::DEU228RH06::B_DC2_N=@this;
    @sysvar::Airbus::DEU229RH06::B_DC2_N=@this;
  };
}



on sysvar sysvar::Airbus::DEU223RH06::B_DC1_E
{
  if (@this)
    @sysvar::Airbus::DEU223RH06::B_DC2_E=0;

  update();
}

on sysvar sysvar::Airbus::DEU223RH06::B_DC2_E
{
  if (@this)
    @sysvar::Airbus::DEU223RH06::B_DC1_E=0;

  update();
}

on sysvar sysvar::Airbus::DEU223RH06::B_DC1_N
{
  if (@this)
    @sysvar::Airbus::DEU223RH06::B_DC2_N=0;

  update();
}

on sysvar sysvar::Airbus::DEU223RH06::B_DC2_N
{
  if (@this)
    @sysvar::Airbus::DEU223RH06::B_DC1_N=0;

  update();
}



on sysvar sysvar::Airbus::DEU226RH06::B_DC1_E
{
  if (@this)
    @sysvar::Airbus::DEU226RH06::B_DC2_E=0;

  update();
}

on sysvar sysvar::Airbus::DEU226RH06::B_DC2_E
{
  if (@this)
    @sysvar::Airbus::DEU226RH06::B_DC1_E=0;

  
  update();
}

on sysvar sysvar::Airbus::DEU226RH06::B_DC1_N
{
  if (@this)
    @sysvar::Airbus::DEU226RH06::B_DC2_N=0;

  update();
}

on sysvar sysvar::Airbus::DEU226RH06::B_DC2_N
{
  if (@this)
    @sysvar::Airbus::DEU226RH06::B_DC1_N=0;

  update();
}



on sysvar sysvar::Airbus::DEU228RH06::B_DC1_E
{
  if (@this)
    @sysvar::Airbus::DEU228RH06::B_DC2_E=0;

  update();
}

on sysvar sysvar::Airbus::DEU228RH06::B_DC2_E
{
  if (@this)
    @sysvar::Airbus::DEU228RH06::B_DC1_E=0;

  update();
}

on sysvar sysvar::Airbus::DEU228RH06::B_DC1_N
{
  if (@this)
    @sysvar::Airbus::DEU228RH06::B_DC2_N=0;

  update();
}

on sysvar sysvar::Airbus::DEU228RH06::B_DC2_N
{
  if (@this)
    @sysvar::Airbus::DEU228RH06::B_DC1_N=0;

  update();
}



on sysvar sysvar::Airbus::DEU229RH06::B_DC1_E
{
  if (@this)
    @sysvar::Airbus::DEU229RH06::B_DC2_E=0;

  update();
}

on sysvar sysvar::Airbus::DEU229RH06::B_DC2_E
{
  if (@this)
    @sysvar::Airbus::DEU229RH06::B_DC1_E=0;

  update();
}

on sysvar sysvar::Airbus::DEU229RH06::B_DC1_N
{
  if (@this)
    @sysvar::Airbus::DEU229RH06::B_DC2_N=0;

  update();
}

on sysvar sysvar::Airbus::DEU229RH06::B_DC2_N
{
  if (@this)
    @sysvar::Airbus::DEU229RH06::B_DC1_N=0;

  update();
}



on sysvar sysvar::Airbus::TL_CUT_OFF
{
  update();
}

void update()
{
  @sysvar::Airbus::DEU223RH06::DC1_E = @sysvar::Airbus::DEU223RH06::B_DC1_E && @sysvar::Airbus::TL_CUT_OFF;
  @sysvar::Airbus::DEU223RH06::DC1_N = @sysvar::Airbus::DEU223RH06::B_DC1_N && @sysvar::Airbus::TL_CUT_OFF;
  @sysvar::Airbus::DEU223RH06::DC2_E = @sysvar::Airbus::DEU223RH06::B_DC2_E && @sysvar::Airbus::TL_CUT_OFF;
  @sysvar::Airbus::DEU223RH06::DC2_N = @sysvar::Airbus::DEU223RH06::B_DC2_N && @sysvar::Airbus::TL_CUT_OFF;
  @sysvar::Airbus::DEU226RH06::DC1_E = @sysvar::Airbus::DEU226RH06::B_DC1_E && @sysvar::Airbus::TL_CUT_OFF;
  @sysvar::Airbus::DEU226RH06::DC1_N = @sysvar::Airbus::DEU226RH06::B_DC1_N && @sysvar::Airbus::TL_CUT_OFF;
  @sysvar::Airbus::DEU226RH06::DC2_E = @sysvar::Airbus::DEU226RH06::B_DC2_E && @sysvar::Airbus::TL_CUT_OFF;
  @sysvar::Airbus::DEU226RH06::DC2_N = @sysvar::Airbus::DEU226RH06::B_DC2_N && @sysvar::Airbus::TL_CUT_OFF;
  @sysvar::Airbus::DEU228RH06::DC1_E = @sysvar::Airbus::DEU228RH06::B_DC1_E && @sysvar::Airbus::TL_CUT_OFF;
  @sysvar::Airbus::DEU228RH06::DC1_N = @sysvar::Airbus::DEU228RH06::B_DC1_N && @sysvar::Airbus::TL_CUT_OFF;
  @sysvar::Airbus::DEU228RH06::DC2_E = @sysvar::Airbus::DEU228RH06::B_DC2_E && @sysvar::Airbus::TL_CUT_OFF;
  @sysvar::Airbus::DEU228RH06::DC2_N = @sysvar::Airbus::DEU228RH06::B_DC2_N && @sysvar::Airbus::TL_CUT_OFF;
  @sysvar::Airbus::DEU229RH06::DC1_E = @sysvar::Airbus::DEU229RH06::B_DC1_E && @sysvar::Airbus::TL_CUT_OFF;
  @sysvar::Airbus::DEU229RH06::DC1_N = @sysvar::Airbus::DEU229RH06::B_DC1_N && @sysvar::Airbus::TL_CUT_OFF;
  @sysvar::Airbus::DEU229RH06::DC2_E = @sysvar::Airbus::DEU229RH06::B_DC2_E && @sysvar::Airbus::TL_CUT_OFF;
  @sysvar::Airbus::DEU229RH06::DC2_N = @sysvar::Airbus::DEU229RH06::B_DC2_N && @sysvar::Airbus::TL_CUT_OFF;

  if (@sysvar::Airbus::TL_CUT_OFF == -1)  // value could not be read
  {
    @sysvar::Airbus::DEU223RH06::E = -1;
    @sysvar::Airbus::DEU223RH06::N = -1;
    @sysvar::Airbus::DEU226RH06::E = -1;
    @sysvar::Airbus::DEU226RH06::N = -1;
    @sysvar::Airbus::DEU228RH06::E = -1;
    @sysvar::Airbus::DEU228RH06::N = -1;
    @sysvar::Airbus::DEU229RH06::E = -1;
    @sysvar::Airbus::DEU229RH06::N = -1;
  }
  else
  {
    @sysvar::Airbus::DEU223RH06::E = (@sysvar::Airbus::DEU223RH06::B_DC1_E || @sysvar::Airbus::DEU223RH06::B_DC2_E);
    @sysvar::Airbus::DEU223RH06::N = (@sysvar::Airbus::DEU223RH06::B_DC1_N || @sysvar::Airbus::DEU223RH06::B_DC2_N);

    @sysvar::Airbus::DEU226RH06::E = (@sysvar::Airbus::DEU226RH06::B_DC1_E || @sysvar::Airbus::DEU226RH06::B_DC2_E);
    @sysvar::Airbus::DEU226RH06::N = (@sysvar::Airbus::DEU226RH06::B_DC1_N || @sysvar::Airbus::DEU226RH06::B_DC2_N);

    @sysvar::Airbus::DEU228RH06::E = (@sysvar::Airbus::DEU228RH06::B_DC1_E || @sysvar::Airbus::DEU228RH06::B_DC2_E);
    @sysvar::Airbus::DEU228RH06::N = (@sysvar::Airbus::DEU228RH06::B_DC1_N || @sysvar::Airbus::DEU228RH06::B_DC2_N);

    @sysvar::Airbus::DEU229RH06::E = (@sysvar::Airbus::DEU229RH06::B_DC1_E || @sysvar::Airbus::DEU229RH06::B_DC2_E);
    @sysvar::Airbus::DEU229RH06::N = (@sysvar::Airbus::DEU229RH06::B_DC1_N || @sysvar::Airbus::DEU229RH06::B_DC2_N);
  }
}



on key 'D'
{
  @sysvar::Airbus::DeuPower_Input = !@sysvar::Airbus::DeuPower_Input;
}

on key 'e'
{
  if (!@sysvar::Airbus::DeuPower_Input)
    return;
  @sysvar::Airbus::DEU223RH06::B_DC1_E=1;
  @sysvar::Airbus::DEU226RH06::B_DC1_E=1;
  @sysvar::Airbus::DEU228RH06::B_DC1_E=1;
  @sysvar::Airbus::DEU229RH06::B_DC1_E=1;
}

on key 'r'
{
  if (!@sysvar::Airbus::DeuPower_Input)
    return;
  @sysvar::Airbus::DEU223RH06::B_DC2_E=1;
  @sysvar::Airbus::DEU226RH06::B_DC2_E=1;
  @sysvar::Airbus::DEU228RH06::B_DC2_E=1;
  @sysvar::Airbus::DEU229RH06::B_DC2_E=1;
}

on key 'n'
{
  if (!@sysvar::Airbus::DeuPower_Input)
    return;
  @sysvar::Airbus::DEU223RH06::B_DC1_N=1;
  @sysvar::Airbus::DEU226RH06::B_DC1_N=1;
  @sysvar::Airbus::DEU228RH06::B_DC1_N=1;
  @sysvar::Airbus::DEU229RH06::B_DC1_N=1;
}

on key 'm'
{
  if (!@sysvar::Airbus::DeuPower_Input)
    return;
  @sysvar::Airbus::DEU223RH06::B_DC2_N=1;
  @sysvar::Airbus::DEU226RH06::B_DC2_N=1;
  @sysvar::Airbus::DEU228RH06::B_DC2_N=1;
  @sysvar::Airbus::DEU229RH06::B_DC2_N=1;
}

on key 'o'
{
  if (!@sysvar::Airbus::DeuPower_Input)
    return;
  @sysvar::Airbus::DEU223RH06::B_DC1_E = 0;
  @sysvar::Airbus::DEU223RH06::B_DC1_N = 0;
  @sysvar::Airbus::DEU223RH06::B_DC2_E = 0;
  @sysvar::Airbus::DEU223RH06::B_DC2_N = 0;
  @sysvar::Airbus::DEU226RH06::B_DC1_E = 0;
  @sysvar::Airbus::DEU226RH06::B_DC1_N = 0;
  @sysvar::Airbus::DEU226RH06::B_DC2_E = 0;
  @sysvar::Airbus::DEU226RH06::B_DC2_N = 0;
  @sysvar::Airbus::DEU228RH06::B_DC1_E = 0;
  @sysvar::Airbus::DEU228RH06::B_DC1_N = 0;
  @sysvar::Airbus::DEU228RH06::B_DC2_E = 0;
  @sysvar::Airbus::DEU228RH06::B_DC2_N = 0;
  @sysvar::Airbus::DEU229RH06::B_DC1_E = 0;
  @sysvar::Airbus::DEU229RH06::B_DC1_N = 0;
  @sysvar::Airbus::DEU229RH06::B_DC2_E = 0;
  @sysvar::Airbus::DEU229RH06::B_DC2_N = 0;
}

on start
{
  openPanel("DEU Power");
}

on preStop
{
  closePanel("DEU Power");
}