BITS/de

Funktion

Setzt alle angegebenen Bits auf 1.

 

 

Syntax

Var = Bits( b1 [,bn])

 

 

Anmerkungen

Var	Die BYTE/PORT Variable die verändert werden soll.
B1 , bn	Eine Liste mit Bitnummern die auf 1 gesetzt werden soll.

 

 

Während es möglich ist, einer Byte/Port-Variablen einen Wert zuzuweisen und es auch spezielle Binärnotation mit &B gibt um die Bits zuzuweisen ermöglicht die Bits() Funktion das einfache Zuweisen einzelner Bits.

 

B = &B1000001  ' Wieviele Nullen sind das?

 

Dies ist besser lesbar: B = Bits(0, 6)

 

Man sieht sofort, dass Bit 0 und Bit 6 auf 1 gesetzt werden.

Es wird kein Programmspeicher gespart weil der Effekt derselbe ist

Kann nur für Byte-Variable und Ports verwendet werden.

 

Gültige Bitnummern sind im Bereich von 0 bis 7.

 

Siehe auch

NBITS

 

 

Beispiel

'--------------------------------------------------------------------------------
'name : bits-nbits.bas
'copyright : (c) 1995-2005, MCS Electronics
'purpose : demo for Bits() AND Nbits()
'micro : Mega48
'suited for demo : yes
'commercial addon needed : no
'use in simulator : possible
'--------------------------------------------------------------------------------
 
$regfile = "m48def.dat" ' specify the used micro
$crystal = 4000000 ' Taktfrequenz
$baud = 19200 ' Baudrate
$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 B As Byte
 
'Man kann die &B Notation zum Setzen von Bits benutzen B = &B1000_0111
'Deutlicher ist es, die zu setzenden Bits mit der BITS() Funktion anzugeben:
B = Bits(0 , 1 , 2 , 7) 'setzt nur die Bits 0,1,2 und 7
Print B
 
'Während bits() alle genannten Bits auf 1 setzt gibt es auch Nbits()
'Das N steht für NOT. Nbits(1,2) bedeutet, dass alle Bits außer 1 und 2 gesetzt werden.
B = Nbits(7) 'Setze NICHT 7
Print B
End

Languages	English • Deutsch