mikroPascal, AVR, inverted output pin

[mikroSeven]

Hi, is there a way to declare an inverted output pin?

My stepper-drivers have an /EN.

var
notEnable: sbit at portB0_bit;

Not a big deal, if I want the drives to be enabled/disabled, I can code:

(1)

Code: Select all

notEnable:= 0; // enable

notEnable:= 1; // disable

Can be a bit confusing, due of using a 0 as enable and a 1 as disable. ( kind of reverse )


Other ways, 2, 3, 4:

(2)

Code: Select all

var
  notEnable: sbit at portB0_bit;

procedure doEnDisSteppers(EnDis: boolean); // 1=enable, 0= disable 
begin
  notEnable:= NOT(EnDis);
end; // doEnable

(3)

Code: Select all

var
  notEnable: sbit at portB0_bit;

procedure enableSteppers();
begin
  notEnable:= 0;
end; // enableSteppers

procedure disableSteppers();
begin
  notEnable:= 1;
end; // disableSteppers

(4)

Code: Select all

const
  cEnabled= 0;
  cDisabled = 1;
var
  notEnable: sbit at portB0_bit; 

procedure steppersEnDis(EnDis: boolean);
begin
  notEnable:= EnDis;
end; // steppersEnDis


// code
  steppersEnDis(cEnable);
//
  steppersEnDis(cDisable);

But, is there a more direct way?

I tried things like:

Code: Select all

   Enable: NOT(sbit at portB0_bit);

Code: Select all

   Enable: NOT(sbit) at portB0_bit;

Code: Select all

   Enable:sbit at NOT(portB0_bit);

Anyone a clue?

[darko.ilijevski]

Hello

You could try something like this:

Code: Select all

program MyProject2;

const enabled : byte = 0;
const disabled : byte = 1;
var MotorEnablePin: sbit at portB0_bit;

begin
  MotorEnablePin := disabled;
end.

Best regards