Aus verschiedenen PortPins ein Byte zusammenbauen

Wartbichler

Benutzer

Gender: n/a
Age: 63
Posts: 19
Registered: 12 / 2018

Subject:

Aus verschiedenen PortPins ein Byte zusammenbauen

· Posted: 10.12.2023 - 22:52 · #1

Hallo,
ein Beispiel:
Ich deklariere eine Variable - X : Byte;
Ich möchte dieses Byte aus dem z.B. PortD.5 und PortB.4 usw. bis das Byte komplett ist, zusammenbauen.
Im Compiler Handbuch auf Seite 116 ist dies kompliziert beschrieben.
Ich habe verschiedene Varianten probiert, nichts funktioniert.
z.B.:
x : Byte;
x.0 [@PortD,5] : Bit;
Kann mir bitte bei diesem Problem jemand helfen.
GLG Johann

golf

Benutzer

Gender:
Location: Donauwörth
Age: 71
Posts: 256
Registered: 11 / 2009

Subject:

Re: Aus verschiedenen PortPins ein Byte zusammenbauen

· Posted: 11.12.2023 - 11:45 · #2

Hallo Johann,

das könnte vielleicht so in der Art funktionieren :

var
x: byte;
y: byte;

// x0[@PortD,1] : bit;
// x1[@PortC,3] : bit;

x0[@PinD,1] : bit;
x1[@PinC,3] : bit;

// z.b. in der main
y.0:= x0;
y.1:= x1;

usw.

golf

TheBeginner

Schreiberling

Gender: n/a
Location: Wunsiedel Bayern
Age: 67
Posts: 765
Registered: 06 / 2013

Subject:

Re: Aus verschiedenen PortPins ein Byte zusammenbauen

· Posted: 11.12.2023 - 15:52 · #3

Hallo,

genau wie Golf würde ich das auch machen.

Code

var
  PC1[@PinC.1] : Bit;
  PC3[@PinC.3] : Bit;
  PD1[@PinD.1] : Bit;
  PD7[@PinD.7] : Bit;

  MyByte : Byte;
{--------------------------------------------------------------}
{ functions }

Procedure Byte_Lesen;
Begin
  MyByte:= 0;
  MyByte.0:= PC1;
  MyByte.1:= PC3;
  MyByte.2:= PD1;
  MyByte.3:= PD7;
end;

Gruß Frank

Harry

Moderator

Gender:
Location: zwischen Augsburg und Ulm
Age: 59
Posts: 2132
Registered: 03 / 2003

Subject:

Re: Aus verschiedenen PortPins ein Byte zusammenbauen

· Posted: 11.12.2023 - 17:42 · #4

Ich vermute mal, daß es Johann darum geht, alle Pins nur durch Benutzung der einen Variable auszulesen.

Gruss
Harry

Wartbichler

Benutzer

Gender: n/a
Age: 63
Posts: 19
Registered: 12 / 2018

Subject:

Re: Aus verschiedenen PortPins ein Byte zusammenbauen

· Posted: 11.12.2023 - 21:45 · #5

Grüß Euch,
danke für die Vorschläge, werde diese gleich ausprobieren.
Es ist so wie Harry meint, ich möchte das zusammengefügte Byte als ganzes beschreiben bzw. auslesen.

GLG aus Österreich
Johann

Aus verschiedenen PortPins ein Byte zusammenbauen

Registered users in this topic