Admin: 1 revision

2013-02-15T19:16:11Z

1 revision

Admin: Created page with "= Action = Reads a value from the SPI-bus. = ..."

2013-02-12T17:24:20Z

Created page with "= Action = Reads a value from the SPI-bus. = ..."

New page

== (**COPIED FROM ENGLISH PAGE**) === Action =

Reads a value from the SPI-bus.

 

 

= Syntax =

SPIIN var, bytes

 

 

 

= Remarks =
<div style="padding: 0px; margin: 0px 0px 0px 4px;">
{| width="593" cellspacing="0" cellpadding="1" border="1" style="border: 2px solid rgb(0, 0, 0); border-spacing: 0px; border-collapse: collapse;"
|- style="vertical-align: top;"
| valign="top" width="13%" style="width: 73px; border: 1px solid rgb(0, 0, 0);" |
Var

| valign="top" width="100%" style="width: 511px; border: 1px solid rgb(0, 0, 0);" |
The variable which receives the value read from the SPI-bus.

|- style="vertical-align: top;"
| valign="top" width="13%" style="width: 73px; border: 1px solid rgb(0, 0, 0);" |
Bytes

| valign="top" width="100%" style="width: 511px; border: 1px solid rgb(0, 0, 0);" |
The number of bytes to read. The maximum is 255.

|}
</div>
 

In order to be able to read data from the SPI slave, the master need to send some data first. The master will send the value 0.

SPI is a 16 bit shift register. Thus writing 1 byte will cause 1 byte to be clocked out of the device which the SPIIN will read.

 

 

 

= See also =

[[SPIOUT]], [[SPIINIT]], [[CONFIG SPI|CONFIG SPI]] , [[SPIMOVE]]

 

 

 

= Example =

 <source lang="bascomavr">
'-----------------------------------------------------------------------------------------
'name : spi.bas
'copyright : (c) 1995-2005, MCS Electronics
'purpose : demo :SPI
'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 B As Byte
Dim A(10) As Byte

Spiinit
B = 5
Spiout A(1) , B

Spiin A(1) , B

A(1) = Spimove(a(2))
End
</source> {{Languages}}

[[Category:BASCOM Language Reference/de]]

SPIIN/de - Revision history

Admin: 1 revision

Admin: Created page with "= Action = Reads a value from the SPI-bus. = ..."