1WREAD/de

From MCS Wiki AVR
< 1WREAD(Difference between revisions)
Jump to: navigation, search
(→(**COPIED FROM ENGLISH PAGE**) =)
(→Siehe auch)
 
(11 intermediate revisions by one user not shown)
Line 1: Line 1:
−
= <span class="f_Header">Action</span><br/> =
+
= <span class="f_Header">Funktion</span><br/> =
  
 
Dieser Befehl liest Daten vom 1wire bus in eine Variable.
 
Dieser Befehl liest Daten vom 1wire bus in eine Variable.
Line 17: Line 17:
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
  
−
= <span class="f_Header">Remarks</span><br/> =
+
= <span class="f_Header">Beschreibung</span><br/> =
 
<div style="text-align: left;  text-indent: 0px;  padding: 0px 0px 0px 0px;  margin: 0px 0px 0px 4px">
 
<div style="text-align: left;  text-indent: 0px;  padding: 0px 0px 0px 0px;  margin: 0px 0px 0px 4px">
 
{| style="border: solid 2px #000000;  border-spacing:0px;  border-collapse: collapse" border="1" cellpadding="1" cellspacing="0" width="604"
 
{| style="border: solid 2px #000000;  border-spacing:0px;  border-collapse: collapse" border="1" cellpadding="1" cellspacing="0" width="604"
Line 25: Line 25:
  
 
| style="width:100%;  border: solid 1px #000000" valign="top" width="100%" |  
 
| style="width:100%;  border: solid 1px #000000" valign="top" width="100%" |  
−
Reads a byte from the bus and places it into variable var2.
+
Liest ein Byte vom Bus und speichert es in die Variable var2.
  
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
  
−
Optional the number of bytes to read can be specified.
+
Die Anzahl der zu lesenden Bytes kann optional angegeben werden.
  
 
|- style="text-align:left;  vertical-align:top"
 
|- style="text-align:left;  vertical-align:top"
Line 36: Line 36:
  
 
| style="width:100%;  border: solid 1px #000000" valign="top" width="100%" |  
 
| style="width:100%;  border: solid 1px #000000" valign="top" width="100%" |  
−
The PIN port name like PINB or PIND.
+
Der Name des PORT PINx Registers wie z.B. PINB oder PIND.
  
 
|- style="text-align:left;  vertical-align:top"
 
|- style="text-align:left;  vertical-align:top"
Line 43: Line 43:
  
 
| style="width:100%;  border: solid 1px #000000" valign="top" width="100%" |  
 
| style="width:100%;  border: solid 1px #000000" valign="top" width="100%" |  
−
The pin number of the port. In the range from 0-7. Maybe a numeric constant or variable.
+
Die Pin-Nummer im Bereich von 0-7. Darf eine numerische Konstante oder Variable sein.
  
 
|}
 
|}
Line 51: Line 51:
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
  
−
Multi 1-wire devices on different pins are supported.
+
Mehrere 1-wire Busse an verschiedenen Pins werden unterstützt.
  
−
To use this you must specify the port pin that is used for the communication.
+
Dafür müssen die Optionen port und pin angegeben werden, die für die jeweilige Kommunikation benutzt werden.
  
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
  
−
The 1wreset, 1wwrite and 1wread statements will work together when used with the old syntax. And the pin can be configured from the compiler options or with the [[CONFIG 1WIRE|CONFIG 1WIRE statement]].
+
Die 1wreset, 1wwrite und 1wread Befehle funktionieren bei Benutzung der alten Schreibweise. Der Pin kann über die Compiler-Optionen oder mit dem [[CONFIG 1WIRE|CONFIG 1WIRE]] Befehl eingestellt werden.
  
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
Line 63: Line 63:
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
  
−
The syntax for additional 1-wire devices is&nbsp;:
+
Die Syntax für zusätzliche 1-wire Busse lautet&nbsp;:
  
 
1WRESET port, pin
 
1WRESET port, pin
Line 69: Line 69:
 
1WWRITE var/constant , bytes, port, pin
 
1WWRITE var/constant , bytes, port, pin
  
−
var = 1WREAD(bytes, port, pin) for reading multiple bytes
+
var = 1WREAD(bytes, port, pin) 'für das Lesen mehrere Bytes
  
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
Line 75: Line 75:
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
  
−
= <span class="f_Header">See also</span><br/> =
+
= <span class="f_Header">Siehe auch</span><br/> =
  
−
[[1WWRITE]] , [[1WRESET]]
+
[[CONFIG 1WIRE]] , [[1WWRITE]] , [[1WRESET]] , [[1WSEARCHFIRST]] , [[1WSEARCHNEXT]] , [[1WIRECOUNT]] , [[1WVERIFY]] , [[Using the 1 WIRE protocol|Using the 1wire protocol]]
  
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
Line 85: Line 85:
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
  
−
= <span class="f_Header">Example</span><br/> =
+
= <span class="f_Header">Beispiel</span><br/> =
  
 
<source lang="bascomavr">
 
<source lang="bascomavr">
Line 102: Line 102:
 
$crystal = 4000000
 
$crystal = 4000000
  
−
$hwstack = 32 'default use 32 for the hardware stack
+
$hwstack = 32 'Grundeinstellung 32 für den Hardware Stack
−
$swstack = 10 'default use 10 for the SW stack
+
$swstack = 10 'Grundeinstellung 10 für den Software Stack
−
$framesize = 40 'default use 40 for the frame space
+
$framesize = 40 'Grundeinstellung 40 für den Frame Space
  
−
 
+
'wenn nur Bytes benutzt werden, folgende Lib für kleineren Code verwenden
−
'when only bytes are used, use the following lib for smaller code
+
 
$lib "mcsbyte.lib"
 
$lib "mcsbyte.lib"
  
 
   
 
   
−
Config 1wire = Portb.0 'use this pin
+
Config 1wire = Portb.0 'Angabe des Pins
−
'On the STK200 jumper B.0 must be inserted
+
'Am STK200 muß Jumper B.0 gesteckt sein
 
Dim Ar(8) As Byte , A As Byte , I As Byte
 
Dim Ar(8) As Byte , A As Byte , I As Byte
 
   
 
   
Line 118: Line 117:
 
Do
 
Do
 
Wait 1
 
Wait 1
−
1wreset 'reset the device
+
1wreset 'Resettet den Bus
−
Print Err 'print error 1 if error
+
Print Err 'Gibt bei einem Fehler eine 1 aus
−
1wwrite &H33 'read ROM command
+
1wwrite &H33 'Kommando ROM lesen
 
For I = 1 To 8
 
For I = 1 To 8
−
  Ar(i) = 1wread() 'place into array
+
  Ar(i) = 1wread() 'Array beschreiben
 
Next
 
Next
  
−
+
'8 Bytes können auch mit einem mal gelesen werden, dazu folgende Zeile auskommentieren
−
'You could also read 8 bytes a time by unremarking the next line
+
'und die For-Next-Schleife oben löschen
−
'and by deleting the for next above
+
 
 
'Ar(1) = 1wread(8) 'read 8 bytes
 
'Ar(1) = 1wread(8) 'read 8 bytes
 
   
 
   
  
 
For I = 1 To 8
 
For I = 1 To 8
−
  Print Hex(ar(i)); 'print output
+
  Print Hex(ar(i)); 'Ausgabe der gelesenen Werte
 
Next
 
Next
−
Print 'linefeed
+
Print 'Zeilenwechsel
 
Loop
 
Loop
 
   
 
   
 +
'Achtung, der Beispielcode läuft bis zu diesem Punkt,
 +
'weil die Do-Loop-Schleife nicht verlassen wird
  
−
'NOTE THAT WHEN YOU COMPILE THIS SAMPLE THE CODE WILL RUN TO THIS POINT
+
'neu ist die Möglichkeit, mehr als einen 1-Wire-Bus zu benutzen
−
'THIS because of the DO LOOP that is never terminated!!!
+
'Dazu muß folgende Syntax verwendet werden:
−
+
  
−
'New is the possibility to use more than one 1 wire bus
 
−
'The following syntax must be used:
 
 
For I = 1 To 8
 
For I = 1 To 8
−
Ar(i) = 0 'clear array to see that it works
+
Ar(i) = 0 'Array löschen, um zu sehen, daß es funktioniert
 
Next
 
Next
 
   
 
   
  
−
1wreset Pinb , 2 'use this port and pin for the second device
+
1wreset Pinb , 2 'Verwendung von port und pin für den 2. Bus
−
1wwrite &H33 , 1 , Pinb , 2 'note that now the number of bytes must be specified!
+
1wwrite &H33 , 1 , Pinb , 2 'die Anzahl Bytes muß angegeben werden
 
'1wwrite Ar(1) , 5,pinb,2
 
'1wwrite Ar(1) , 5,pinb,2
 
   
 
   
  
−
'reading is also different
+
'lesen ist auch verschieden
−
Ar(1) = 1wread(8 , Pinb , 2) 'read 8 bytes from portB on pin 2
+
Ar(1) = 1wread(8 , Pinb , 2) 'liest 8 Bytes von Pin 2 an PortB
 
   
 
   
  
Line 162: Line 160:
 
Next
 
Next
 
   
 
   
−
 
+
'man kann auch eine Schleife mit einer Variable für die Bitnummer erzeugen!
−
'you could create a loop with a variable for the bit number !
+
For I = 0 To 3 'für Pin 0-3
−
For I = 0 To 3 'for pin 0-3
+
 
1wreset Pinb , I
 
1wreset Pinb , I
 
1wwrite &H33 , 1 , Pinb , I
 
1wwrite &H33 , 1 , Pinb , I

Latest revision as of 19:29, 1 March 2013

Contents

Funktion

Dieser Befehl liest Daten vom 1wire bus in eine Variable.

 

 

Syntax

var2 = 1WREAD( [ bytes] )

var2 = 1WREAD( bytes , port , pin)

 

 

Beschreibung

var2

Liest ein Byte vom Bus und speichert es in die Variable var2.

 

Die Anzahl der zu lesenden Bytes kann optional angegeben werden.

Port

Der Name des PORT PINx Registers wie z.B. PINB oder PIND.

Pin

Die Pin-Nummer im Bereich von 0-7. Darf eine numerische Konstante oder Variable sein.

 

 

Mehrere 1-wire Busse an verschiedenen Pins werden unterstützt.

Dafür müssen die Optionen port und pin angegeben werden, die für die jeweilige Kommunikation benutzt werden.

 

Die 1wreset, 1wwrite und 1wread Befehle funktionieren bei Benutzung der alten Schreibweise. Der Pin kann über die Compiler-Optionen oder mit dem CONFIG 1WIRE Befehl eingestellt werden.

 

 

Die Syntax für zusätzliche 1-wire Busse lautet :

1WRESET port, pin

1WWRITE var/constant , bytes, port, pin

var = 1WREAD(bytes, port, pin) 'für das Lesen mehrere Bytes

 

 

Siehe auch

CONFIG 1WIRE , 1WWRITE , 1WRESET , 1WSEARCHFIRST , 1WSEARCHNEXT , 1WIRECOUNT , 1WVERIFY , Using the 1wire protocol

 

 

 

Beispiel

'--------------------------------------------------------------------------------
'name : 1wire.bas
'copyright : (c) 1995-2005, MCS Electronics
'purpose : demonstrates 1wreset, 1wwrite and 1wread()
'micro : Mega48
'suited for demo : yes
'commercial addon needed : no
' pull-up of 4K7 required to VCC from Portb.2
' DS2401 serial button connected to Portb.2
'--------------------------------------------------------------------------------
 
$regfile = "m48def.dat"
$crystal = 4000000
 
$hwstack = 32 'Grundeinstellung 32 für den Hardware Stack
$swstack = 10 'Grundeinstellung 10 für den Software Stack
$framesize = 40 'Grundeinstellung 40 für den Frame Space
 
'wenn nur Bytes benutzt werden, folgende Lib für kleineren Code verwenden
$lib "mcsbyte.lib"
 
 
Config 1wire = Portb.0 'Angabe des Pins
'Am STK200 muß Jumper B.0 gesteckt sein
Dim Ar(8) As Byte , A As Byte , I As Byte
 
 
Do
Wait 1
1wreset 'Resettet den Bus
Print Err 'Gibt bei einem Fehler eine 1 aus
1wwrite &H33 'Kommando ROM lesen
For I = 1 To 8
 Ar(i) = 1wread() 'Array beschreiben
Next
 
'8 Bytes können auch mit einem mal gelesen werden, dazu folgende Zeile auskommentieren
'und die For-Next-Schleife oben löschen
 
'Ar(1) = 1wread(8) 'read 8 bytes
 
 
For I = 1 To 8
 Print Hex(ar(i)); 'Ausgabe der gelesenen Werte 
Next
Print 'Zeilenwechsel
Loop
 
'Achtung, der Beispielcode läuft bis zu diesem Punkt,
'weil die Do-Loop-Schleife nicht verlassen wird
 
'neu ist die Möglichkeit, mehr als einen 1-Wire-Bus zu benutzen 
'Dazu muß folgende Syntax verwendet werden:
 
For I = 1 To 8
Ar(i) = 0 'Array löschen, um zu sehen, daß es funktioniert
Next
 
 
1wreset Pinb , 2 'Verwendung von port und pin für den 2. Bus
1wwrite &H33 , 1 , Pinb , 2 'die Anzahl Bytes muß angegeben werden
'1wwrite Ar(1) , 5,pinb,2
 
 
'lesen ist auch verschieden
Ar(1) = 1wread(8 , Pinb , 2) 'liest 8 Bytes von Pin 2 an PortB
 
 
For I = 1 To 8
Print Hex(ar(i));
Next
 
'man kann auch eine Schleife mit einer Variable für die Bitnummer erzeugen!
For I = 0 To 3 'für Pin 0-3
1wreset Pinb , I
1wwrite &H33 , 1 , Pinb , I
Ar(1) = 1wread(8 , Pinb , I)
For A = 1 To 8
 Print Hex(ar(a));
Next
Print
Next
End

Languages   English • Deutsch  
Retrieved from "http://wiki.mcselec.com/bavr/index.php?title=1WREAD/de&oldid=4193"
Personal tools
Namespaces
Variants
Actions
Navigation
In other languages
Language