LOOKDOWN/de

From MCS Wiki AVR
< LOOKDOWN
Revision as of 22:33, 4 March 2013 by Galahat (Talk | contribs)
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to: navigation, search

Contents

Funktion

Gibt einen Index einer Serie von Daten zurück.

 

 

Syntax

var = LOOKDOWN( value, label, entries)

 

 

Anmerkungen

Var

Der zurückgegebene Index

Value

Der zu suchende Wert

Label

Programmmarke an der die Datenserie beginnt.

entries

Die Anzahl der Daten einer zu durchsuchenden Datenserie.

 

Wenn Sie eine Serie von Bytes durchsuchen, muß VALUE vom Typ Byte sein. Wenn Sie eine Serie von Integer oder Words durchsuchen, muß VALUE vom Typ Integer sein.

 

Die LookDOWN Funktion ist der Zählerteil der LookUP Funktion.

LOOKDOWN durchsucht eine Datenserie nach einem Wert und gibt dessen Index zurück wenn er gefunden wurde, andernfalls -1.

 

 

Siehe auch

LOOKUPSTR , LOOKUP

 

 

 

Beispiel


'-----------------------------------------------------------------------------------------
'name : lookdown.bas
'copyright : (c) 1995-2005, MCS Electronics
'purpose : demo : LOOKDOWN
'micro : Mega48
'suited for demo : yes
'commercial addon needed : no
'-----------------------------------------------------------------------------------------
 
$regfile = "m48def.dat" ' specify the used micro
$crystal = 4000000 ' used crystal frequency
$baud = 19200 ' use baud rate
$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
 
Dim Idx As Integer , Search As Byte , Entries As Byte
 
'we want to search for the value 3
Search = 3
'there are 5 entries in the table
Entries = 5
 
'lookup and return the index
Idx = Lookdown(search , Label , Entries)
Print Idx
 
Search = 1
Idx = Lookdown(search , Label , Entries)
Print Idx
 
 
Search = 100
Idx = Lookdown(search , Label , Entries)
Print Idx ' return -1 if not found
 
 
'looking for integer or word data requires that the search variable is
'of the type integer !
Dim Isearch As Integer
Isearch = 400
Idx = Lookdown(isearch , Label2 , Entries)
Print Idx ' return 3
End
 
Label:
Data 1 , 2 , 3 , 4 , 5
 
Label2:
Data 1000% , 200% , 400% , 300%

Languages   English Deutsch  
Personal tools
Namespaces
Variants
Actions
Navigation
In other languages
Language