ZitierenDas mach ich auch gerade.
Je nachdem wieviele Adressen du brauchst, musst du einen entsprechenden Dipschalter verlöten----> 8 Bit wären dann 256 mögliche Adressen.
In Bascom brauchst dann nur den Port abfragen
Dim Var as Byte
Pinx=Var
Hallo,
ich möchte über einen DIP Schalter eine Variable im Programm mit einer Adresse (Hex) belegen.
Hat jemand eine Idee wie ich soetwas relisieren kann?
Ich möchte damit die Module meines kleines RS485 Netzwerk adressieren.
Das mach ich auch gerade.
Je nachdem wieviele Adressen du brauchst, musst du einen entsprechenden Dipschalter verlöten----> 8 Bit wären dann 256 mögliche Adressen.
In Bascom brauchst dann nur den Port abfragen
Dim Var as Byte
Pinx=Var
beachten: interne Pull-Ups aktivieren = Schalter gegen Masse - d.h. offener Schalter = 1, geschlossener Schalter = 0 ... oder externe Pulldowns nutzen, z.B. als Array und dan Schalter gegen +
Ich kann mir keine Signatur leisten - bin selbständig!
benötige ich dann für jeden Schalter einen Port
Jedes Bit ein Pin.
Wenn du einen 8 Bit breiten Adressraum benötigst dann z.B. Pinb=Var
Wenn du nur einzelne Pins abfragen willst dann Pinb.x=Var wobei Var dann als Bit definiert werden sollte.
o.k. !
Kannst du mir auch sagen, wie ich 3 Pins (z.B. PD3, PD4 und PD5) abfragen, und aus dem Ergebnis eine Hex Adresse basteln kann?
Dim B As Byte
B.0 = Pind.3
B.1 = Pind.4
B.2 = Pind.5
Print Hex(b)
Berechtigungen
Lesezeichen