1WSEARCHFIRST/de

From MCS Wiki AVR
< 1WSEARCHFIRST(Difference between revisions)
Jump to: navigation, search
m (1 revision)
(→Siehe auch)
 
(7 intermediate revisions by one user not shown)
Line 1: Line 1:
−
== (**COPIED FROM ENGLISH PAGE**) === <span class="f_Header">Action</span><br/> =
+
= <span class="f_Header">Funktion</span><br/> =
  
−
This statement reads the first ID from the 1wire bus into a variable(array).
+
Liest die erste ID vom 1-wire-Bus in ein Variablen-Array
  
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
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%" |  
−
A variable or array that should be at least 8 bytes long that will be assigned with the 8 byte ID from the first 1wire device on the bus.
+
Eine Variable oder Array mit mindestens 8 Byte Länge, in welche die 8-Byte-ID von 1. 1wire-Gerät am Bus übertragen wird.
  
 
|- style="text-align:left;  vertical-align:top"
 
|- style="text-align:left;  vertical-align:top"
Line 32: Line 32:
  
 
| 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 39: Line 39:
  
 
| 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 45: Line 45:
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
  
−
The 1wireSearchFirst() function must be called once to initiate the ID retrieval process. After the 1wireSearchFirst() function is used you should use successive function calls to the [[1WSEARCHNEXT|1wSearchNext]] function to retrieve other ID's on the bus.
+
Die 1wireSearchFirst() Funktion muss einmal aufgerufen werden, um den ID-Suchprozess zu starten. Nach der 1wireSearchFirst() Funktion können fortlaufend zusätzliche IDs mit der  [[1WSEARCHNEXT|1wSearchNext]] Funktion gesucht werden.
  
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
  
−
A string can not be assigned to get the values from the bus. This because a null may be returned as a value and the null is also used as a string terminator.
+
Ein String kann nicht zur Übertragung der Werte vom Bus benutzt werden, da eine Null als Wert in einem String als Ende-Zeichen interpretiert wird.
  
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
  
−
I would advice to use a byte array as shown in the example.
+
Am besten ist es, ein Byte-Array zu verwenden, wie im Code-Beispiel gezeigt.  
  
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
  
−
The 1wirecount function will take 4 bytes of SRAM.
+
Die 1wsearchfirst Funktion benötigt 4 Bytes SRAM.
  
−
___1w_bitstorage , Byte used for bit storage&nbsp;:
+
___1w_bitstorage , Byte zur Speicherung von Bits&nbsp;:
  
−
lastdeviceflag bit 0
+
lastdeviceflag Bit 0
  
−
id_bit bit 1
+
id_bit Bit 1
  
−
cmp_id_bit bit 2
+
cmp_id_bit Bit 2
  
−
search_dir bit 3
+
search_dir Bit 3
  
 
___1wid_bit_number, Byte
 
___1wid_bit_number, Byte
Line 83: Line 83:
 
= <span class="f_Header">ASM</span><br/> =
 
= <span class="f_Header">ASM</span><br/> =
  
−
The following asm routines are called from mcs.lib.
+
Folgende Assembler-Routinen werden von der mcs.lib aufgerufen.  
  
−
_1wire_Search_First&nbsp;: (calls _1WIRE, _ADJUST_PIN , _ADJUST_BIT_ADDRESS)
+
_1wire_Search_First&nbsp;: (ruft auf _1WIRE, _ADJUST_PIN , _ADJUST_BIT_ADDRESS)
  
−
Parameters passed&nbsp;: R24&nbsp;: pin number, R30&nbsp;: port , X&nbsp;: address of target array
+
Übergebene Parameter&nbsp;: R24&nbsp;: Pin-Nummer, R30&nbsp;: Port , X&nbsp;: Adresse des Ziel-Arrays
  
−
Returns nothing.
+
Rückgabewert: keiner.
  
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
 
<span style="font-family: 'Arial';  color: #000000">&nbsp;</span>
Line 95: Line 95:
 
<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]] , [[1WREAD|1WREAD ]], [[1WSEARCHNEXT]], [[1WIRECOUNT]]
+
[[CONFIG 1WIRE]] , [[1WWRITE]] , [[1WRESET]] , [[1WREAD|1WREAD ]] , [[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 105: Line 105:
 
<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 117: Line 117:
 
'--------------------------------------------------------------------------------
 
'--------------------------------------------------------------------------------
 
   
 
   
−
 
+
 
$regfile = "m48def.dat"
 
$regfile = "m48def.dat"
 
$crystal = 4000000
 
$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
 
 
   
 
   
−
 
+
$hwstack = 32 'Grundeinstellung 32 für den Hardware Stack
−
Config 1wire = Portb.0 'use this pin
+
$swstack = 10 'Grundeinstellung 10 für den Software Stack
−
'On the STK200 jumper B.0 must be inserted
+
$framesize = 40 'Grundeinstellung 40 für den Frame Space
 
   
 
   
−
 
+
−
'The following internal bytes are used by the scan routines
+
Config 1wire = Portb.0 'Angabe des Pins
−
'___1w_bitstorage , Byte used for bit storage :
+
'Am STK200 muß Jumper B.0 gesteckt sein
−
' lastdeviceflag bit 0
+
−
' id_bit bit 1
+
'Folgende Bytes werden von der Scan-Routine benötigt
−
' cmp_id_bit bit 2
+
'___1w_bitstorage , Byte zur Speicherung von Bits :
−
' search_dir bit 3
+
' lastdeviceflag Bit 0
 +
' id_bit Bit 1
 +
' cmp_id_bit Bit 2
 +
' search_dir Bit 3
 
'___1wid_bit_number, Byte
 
'___1wid_bit_number, Byte
 
'___1wlast_zero, Byte
 
'___1wlast_zero, Byte
 
'___1wlast_discrepancy , Byte
 
'___1wlast_discrepancy , Byte
−
'___1wire_data , string * 7 (8 bytes)
+
'___1wire_data , String * 7 (8 Bytes)
 
   
 
   
−
 
+
−
'[DIM variables used]
+
'[DIM benutzte Variablen]
−
'we need some space from at least 8 bytes to store the ID
+
'Mindestens 8 Bytes zur Speicherung der ID werden gebraucht
 
Dim Reg_no(8) As Byte
 
Dim Reg_no(8) As Byte
 
   
 
   
−
'we need a loop counter and a word/integer for counting the ID's on the bus
+
'ein Schleifenzähler und ein Word/Integer für die Anzahl der IDs am Bus
 
Dim I As Byte , W As Word
 
Dim I As Byte , W As Word
 
   
 
   
−
 
+
−
'Now search for the first device on the bus
+
'Suchen des ersten Teilnehmers am Bus
 
Reg_no(1) = 1wsearchfirst()
 
Reg_no(1) = 1wsearchfirst()
 
   
 
   
−
 
+
−
For I = 1 To 8 'print the number
+
For I = 1 To 8 'Ausgabe der ID im Hex-Format
 
  Print Hex(reg_no(i));
 
  Print Hex(reg_no(i));
 
Next
 
Next
 
Print
 
Print
 
   
 
   
−
 
+
 
Do
 
Do
−
'Now search for other devices
+
'Suche nach anderen Teilmnehmern
 
Reg_no(1) = 1wsearchnext()
 
Reg_no(1) = 1wsearchnext()
 
For I = 1 To 8
 
For I = 1 To 8
Line 168: Line 167:
 
Next
 
Next
 
Print
 
Print
−
Loop Until Err = 1
+
Loop Until Err = 1 'Schleife bis zum ersten Fehler am Bus
 
   
 
   
−
 
+
−
'When ERR = 1 is returned it means that no device is found anymore
+
'Wenn ERR = 1 ist, wurde kein weiterer Teilnehmer gefunden
−
'You could also count the number of devices
+
'Man kann auch die Anzahl der Teilnehmer am Bus zählen lassen
 
W = 1wirecount()
 
W = 1wirecount()
−
'It is IMPORTANT that the 1wirecount function returns a word/integer
+
'Es ist WICHTIG zu beachten, daß die 1wirecount-Function ein Word/Integer zurückgibt
−
'So the result variable must be of the type word or integer
+
'Die Ergebnis-Variable muß vom Typ Word oder Integer sein
−
'But you may assign it to a byte or long too of course
+
'Man kann sie natürlich in eine Byte-oder Long-Variable übertragen
 
Print W
 
Print W
 
   
 
   
−
 
+
−
'as a bonus the next routine :
+
'als Bonus die nächste Routine :
−
' first fill the array with an existing number
+
' zuerst das Array mit einer existierenden ID füllen
 
Reg_no(1) = 1wsearchfirst()
 
Reg_no(1) = 1wsearchfirst()
−
' unremark next line to chance a byte to test the ERR flag
+
' um ein Byte zu ändern und das Err-Flag zu testen, nächste Zeile auskommentieren
 
'Reg_no(1) = 2
 
'Reg_no(1) = 2
−
'now verify if the number exists
+
'jetzt eine Prüfung, ob die ID existiert
 
1wverify Reg_no(1)
 
1wverify Reg_no(1)
 
Print Err
 
Print Err
−
'err =1 when the ID passed n reg_no() does NOT exist
+
'err =1 wenn die ID, welche mit Reg_no() übergeben wurde, nicht existiert
−
' optinal call it with pinnumber line 1wverify reg_no(1),pinb,1
+
'optionaler Aufruf mit Angabe der Pinnummer: 1wverify reg_no(1),pinb,1
 
   
 
   
−
 
+
−
'As for the other 1wire statements/functions, you can provide the port and pin number as anoption
+
'wie bei den anderen 1-Wire Befehlen/Funktionen, wird die Angabe von Port und Pinnummer unterstützt
−
'W = 1wirecount(pinb , 1) 'for example look at pin PINB.1
+
'W = 1wirecount(pinb , 1) 'als Beispiel am Pin PINB.1
 
End
 
End
 
</source><br/>{{Languages}}
 
</source><br/>{{Languages}}
  
 
[[Category:BASCOM_Language_Reference/de]]
 
[[Category:BASCOM_Language_Reference/de]]

Latest revision as of 19:29, 1 March 2013

Contents

Funktion

Liest die erste ID vom 1-wire-Bus in ein Variablen-Array

 

 

Syntax

var2 = 1WSEARCHFIRST()

var2 = 1WSEARCHFIRST( port , pin)

 

 

Beschreibung

var2

Eine Variable oder Array mit mindestens 8 Byte Länge, in welche die 8-Byte-ID von 1. 1wire-Gerät am Bus übertragen wird.

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.

 

Die 1wireSearchFirst() Funktion muss einmal aufgerufen werden, um den ID-Suchprozess zu starten. Nach der 1wireSearchFirst() Funktion können fortlaufend zusätzliche IDs mit der 1wSearchNext Funktion gesucht werden.

 

Ein String kann nicht zur Übertragung der Werte vom Bus benutzt werden, da eine Null als Wert in einem String als Ende-Zeichen interpretiert wird.

 

Am besten ist es, ein Byte-Array zu verwenden, wie im Code-Beispiel gezeigt.

 

Die 1wsearchfirst Funktion benötigt 4 Bytes SRAM.

___1w_bitstorage , Byte zur Speicherung von Bits :

lastdeviceflag Bit 0

id_bit Bit 1

cmp_id_bit Bit 2

search_dir Bit 3

___1wid_bit_number, Byte

___1wlast_zero, Byte

___1wlast_discrepancy , Byte

 

 

 

ASM

Folgende Assembler-Routinen werden von der mcs.lib aufgerufen.

_1wire_Search_First : (ruft auf _1WIRE, _ADJUST_PIN , _ADJUST_BIT_ADDRESS)

Übergebene Parameter : R24 : Pin-Nummer, R30 : Port , X : Adresse des Ziel-Arrays

Rückgabewert: keiner.

 

 

Siehe auch

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

 

 

 

Beispiel

'--------------------------------------------------------------------------------
'name : 1wireSearch.bas
'copyright : (c) 1995-2005, MCS Electronics
'purpose : demonstrates 1wsearch
'micro : Mega48
'suited for demo : yes
'commercial addon needed : no
'--------------------------------------------------------------------------------
 
 
$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
 
 
Config 1wire = Portb.0 'Angabe des Pins
'Am STK200 muß Jumper B.0 gesteckt sein
 
'Folgende Bytes werden von der Scan-Routine benötigt
'___1w_bitstorage , Byte zur Speicherung von Bits :
' lastdeviceflag Bit 0
' id_bit Bit 1
' cmp_id_bit Bit 2
' search_dir Bit 3
'___1wid_bit_number, Byte
'___1wlast_zero, Byte
'___1wlast_discrepancy , Byte
'___1wire_data , String * 7 (8 Bytes)
 
 
'[DIM benutzte Variablen]
'Mindestens 8 Bytes zur Speicherung der ID werden gebraucht
Dim Reg_no(8) As Byte
 
'ein Schleifenzähler und ein Word/Integer für die Anzahl der IDs am Bus
Dim I As Byte , W As Word
 
 
'Suchen des ersten Teilnehmers am Bus
Reg_no(1) = 1wsearchfirst()
 
 
For I = 1 To 8 'Ausgabe der ID im Hex-Format
 Print Hex(reg_no(i));
Next
Print
 
 
Do
'Suche nach anderen Teilmnehmern
Reg_no(1) = 1wsearchnext()
For I = 1 To 8
 Print Hex(reg_no(i));
Next
Print
Loop Until Err = 1 'Schleife bis zum ersten Fehler am Bus
 
 
'Wenn ERR = 1 ist, wurde kein weiterer Teilnehmer gefunden
'Man kann auch die Anzahl der Teilnehmer am Bus zählen lassen
W = 1wirecount()
'Es ist WICHTIG zu beachten, daß die 1wirecount-Function ein Word/Integer zurückgibt
'Die Ergebnis-Variable muß vom Typ Word oder Integer sein
'Man kann sie natürlich in eine Byte-oder Long-Variable übertragen
Print W
 
 
'als Bonus die nächste Routine :
' zuerst das Array mit einer existierenden ID füllen
Reg_no(1) = 1wsearchfirst()
' um ein Byte zu ändern und das Err-Flag zu testen, nächste Zeile auskommentieren
'Reg_no(1) = 2
'jetzt eine Prüfung, ob die ID existiert
1wverify Reg_no(1)
Print Err
'err =1 wenn die ID, welche mit Reg_no() übergeben wurde, nicht existiert
'optionaler Aufruf mit Angabe der Pinnummer: 1wverify reg_no(1),pinb,1
 
 
'wie bei den anderen 1-Wire Befehlen/Funktionen, wird die Angabe von Port und Pinnummer unterstützt
'W = 1wirecount(pinb , 1) 'als Beispiel am Pin PINB.1
End

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