1WREAD/de

(Unterschied zwischen Versionen)
Wechseln zu: Navigation, Suche
(→Beschreibung)
(→Beschreibung)
Zeile 43: Zeile 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.
  
 
|}
 
|}
Zeile 51: Zeile 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 statement]] eingestellt werden.
  
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
Zeile 63: Zeile 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
Zeile 69: Zeile 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>

Version vom 19. Februar 2013, 15:37 Uhr

Inhaltsverzeichnis

Action

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 statement 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

 

 

See also

1WWRITE , 1WRESET

 

 

 

Example

'--------------------------------------------------------------------------------
'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 'default use 32 for the hardware stack
$swstack = 10 'default use 10 for the SW stack
$framesize = 40 'default use 40 for the frame space
 
 
'when only bytes are used, use the following lib for smaller code
$lib "mcsbyte.lib"
 
 
Config 1wire = Portb.0 'use this pin
'On the STK200 jumper B.0 must be inserted
Dim Ar(8) As Byte , A As Byte , I As Byte
 
 
Do
Wait 1
1wreset 'reset the device
Print Err 'print error 1 if error
1wwrite &H33 'read ROM command
For I = 1 To 8
 Ar(i) = 1wread() 'place into array
Next
 
 
'You could also read 8 bytes a time by unremarking the next line
'and by deleting the for next above
'Ar(1) = 1wread(8) 'read 8 bytes
 
 
For I = 1 To 8
 Print Hex(ar(i)); 'print output
Next
Print 'linefeed
Loop
 
 
'NOTE THAT WHEN YOU COMPILE THIS SAMPLE THE CODE WILL RUN TO THIS POINT
'THIS because of the DO LOOP that is never terminated!!!
 
 
'New is the possibility to use more than one 1 wire bus
'The following syntax must be used:
For I = 1 To 8
Ar(i) = 0 'clear array to see that it works
Next
 
 
1wreset Pinb , 2 'use this port and pin for the second device
1wwrite &H33 , 1 , Pinb , 2 'note that now the number of bytes must be specified!
'1wwrite Ar(1) , 5,pinb,2
 
 
'reading is also different
Ar(1) = 1wread(8 , Pinb , 2) 'read 8 bytes from portB on pin 2
 
 
For I = 1 To 8
Print Hex(ar(i));
Next
 
 
'you could create a loop with a variable for the bit number !
For I = 0 To 3 'for 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  
Von „http://wiki.mcselec.com/bavr/index.php?title=1WREAD/de&oldid=3418“
Meine Werkzeuge
Namensräume
Varianten
Aktionen
Navigation
In anderen Sprachen
Sprache