Bit-Verarbeitung

Harry
Moderator
Avatar
Gender:
Location: zwischen Augsburg und Ulm
Age: 59
Posts: 2134
Registered: 03 / 2003
Subject:

Bit-Verarbeitung

 · 
Posted: 13.04.2017 - 11:50  ·  #1
Hallo @ all,

auch wenn ich mich jetzt als Unwissender oute ....

Ich kann ja einen Port so definieren:
LCD_E[@PORTC, 7] : Bit;

und dann diesen mit
LCD_E:=true; oder LCD_E:=false; setzen.

Da aber Enable low-aktiv ist würde ich mir wünschen, daß LCD_E:=true; gleichbedeutend ist mit LCD_E:=0; .... geht das und wenn ja wie?

Gruss
Harry
rage
Benutzer
Avatar
Gender: n/a
Age: 65
Homepage: processanalytik.de
Posts: 237
Registered: 02 / 2007
Subject:

Re: Bit-Verarbeitung

 · 
Posted: 13.04.2017 - 13:48  ·  #2
Hey Harry

ich mach das mit meinen LEDs immer so
Code

Const
  LEDOn                               : Boolean  = False;
  LEDOff                              : Boolean  = True;
.......
Procedure SetLED(Channel:Byte;Mode:TLEDMode);
Begin
  LEDState[Channel]:=Mode;
  if Channel=0 then
    Case Mode of
      lmOff   :PortR.0:=LEDOff; PortR.1:=LEDOff;|
      lmGreen :PortR.0:=LEDOn;  PortR.1:=LEDOff;|
      lmRed   :PortR.0:=LEDOff; PortR.1:=LEDOn;|
      lmOrange:PortR.0:=LEDOn;  PortR.1:=LEDOn;|
    endcase;
  elsif Channel=1 then
    Case Mode of
      lmOff   :PortA.0:=LEDOff; PortC.4:=LEDOff;|
      lmGreen :PortA.0:=LEDOn;  PortC.4:=LEDOff;|
      lmRed   :PortA.0:=LEDOff; PortC.4:=LEDOn;|
      lmOrange:PortA.0:=LEDOn;  PortC.4:=LEDOn;|
    endcase;
  endif;
end;


Vieleicht hilft Dir das.

cu rage
Harry
Moderator
Avatar
Gender:
Location: zwischen Augsburg und Ulm
Age: 59
Posts: 2134
Registered: 03 / 2003
Subject:

Re: Bit-Verarbeitung

 · 
Posted: 13.04.2017 - 15:17  ·  #3
Hallo Rage,

danke :) so gehts. Wenn ich die Konstanten als
Code

Const
  enable  : Boolean=false;
  disable : Boolean=true;

definiere, hab ich genau, was ich will.

Gruss
Harry
Selected quotes for multi-quoting:   0

Registered users in this topic

Currently no registered users in this section

The statistic shows who was online during the last 5 minutes. Updated every 90 seconds.
MySQL Queries: 15 · Cache Hits: 14   64   78 · Page-Gen-Time: 0.039749s · Memory Usage: 2 MB · GZIP: on · Viewport: SMXL-HiDPI