Добавил:

fench Опубликованный материал нарушает ваши авторские права? Сообщите нам.

Вуз:

Сумский государственный университет

Предмет:

Микроконтроллеры ЭВМ

Файл:

BASCOM AVR, help reference (2007).PDF

Скачиваний:

281

Добавлен:

12.08.2013

Размер:

17.02 Mб

Скачать

☆

<<< < Предыдущая 126 127 128 129 130 131 132 133 134 135 136 137138 / 163138 139 140 141 142 143 144 145 146 147 148 149 150 > Следующая >>>

Config Spi = Soft , Din = Pinb.0 , Dout = Portb.1 , Ss = Portb.2 , Clock = Portb.3

Spiinit
Dim a(10) as Byte , X As Byte
Spiout A(1) , 5	'send 5	bytes
Spiout X , 1	'send 1	byte
A(1) = Spimove(5)	' move 5 to SPI
and store result in a(1)
End

SPIOUT

Action

Sends a value of a variable to the SPI-bus.

Syntax

SPIOUT var , bytes

Remarks

var	The variable whose content must be send to the SPI-bus.
bytes	The number of bytes to send. Maximum value is 255.

When SPI is used in HW(hardware) mode, there might be a small delay/pause after each byte that is sent. This is caused by the SPI hardware and the speed of the bus. After a byte is transmitted, SPSR bit 7 is checked. This bit 7 indicates that the SPI is ready for sending a new byte.

SPLIT

Action

Split a string into a number of array elements.

Syntax

page -670-

count = SPLIT (source, array, search)

Remarks

count	The number of elements that SPLIT() returned. When the array is not big
	enough to fill the array, this will be the maximum size of the array. So
	make sure the array is big enough to hold the results.
source	The source string or string constant to search for.
array	The index of the first element of the array that will be filled
search	The character to search for. This can be a string or string constant.

When you use the serial port to receive data, in some cases you need to process the data in parts.

For example when you need to split an IP number as "123.45.24.12" you could use INSTR() or you can use SPLIT().

You must DIM the array yourself. The content of the array will be overwritten.

It is also important to know that the individual elements of the array need to be big enough to store the string part.

For example when the array has 5 elements and each element may be 10 characters long, a string that is 11 bytes long will not fit. Another element will be used in that case to store the additional info.

The SPLIT function takes care not to overwrite other memory. So when you split "1.2.2.2.2.2.2.3.3.3" into an array of 3 elelements, you will loose the data.

See also

INSTR

Example
'--------------------------------------------------------------	mega48.bas
'	mega48.bas
'	mega48 sample file
'	(c) 1995-2005, MCS Electronics
'--------------------------------------------------------------

$regfile = "m48def.dat" $crystal = 8000000 $baud = 19200

Config Com1 = Dummy , Synchrone = 0 , Parity = None , Stopbits = 1 , Databits = 8 , Clockpol = 0

Dim S As String * 80

Dim Ar(5) As String * 10

Dim Bcount As Byte

'The split function can split a string or string constant into elements 'It returns the number of elements

'You need to take care that there are enough elements and that each element is big enough

'to hold the result

'When a result does not fit into 1 element it will be put into the next element

'The memory is protected against overwriting.

S = "this is a test"

Bcount = Split( "this is a test" , Ar(1) , " ")

page -671-

'bcount will get the number of filled elements 'ar(1) is the starting address to use

'" " means that we check for a space

'When you use " aa" , the first element will contain a space Bcount = Split( "thiscannotfit! into the element" , Ar(1) , " ")

Dim J As Byte

For J = 1 To Bcount

Print Ar(j)

'this demonstrates that your memory is safe and will not be overwritten when there are too many string parts

Bcount = Split( "do not overflow the array please" , Ar(1) , " ")

For J = 1 To Bcount

Print Ar(j)

End

SQR

Action

Returns the Square root of a variable.

Syntax

var = SQR( source )

Remarks

var	A numeric single or double variable that is assigned with the SQR
	of variable source.
source	The single or double variable to get the SQR of.

When SQR is used with a single, the FP_TRIG library will be used.

When SQR is used with bytes, integers, words and longs, the SQR routine from MCS.LBX will be used.

START

Action

Start the specified device.

Syntax

START device

Remarks

Device TIMER0, TIMER1, COUNTER0 or COUNTER1, WATCHDOG, AC (Analog comparator power) or ADC(A/D converter power)

You must start a timer/counter in order for an interrupt to occur (when the external gate is disabled).

TIMER0 and COUNTER0 are the same device.

The AC and ADC parameters will switch power to the device and thus enabling it to work.

See also

STOP

Example

'-----------------------------------------------------------------------------
---	: adc.bas
'name	: adc.bas
'copyright	: (c) 1995-2005, MCS Electronics
'purpose	: demonstration of GETADC() function for 8535 or
M163 micro	: Mega163
'micro	: Mega163
'suited for demo	: yes
'commercial addon needed	: no
'use in simulator	: possible

page -673-

<<< < Предыдущая 126 127 128 129 130 131 132 133 134 135 136 137138 / 163138 139 140 141 142 143 144 145 146 147 148 149 150 > Следующая >>>

Соседние файлы в предмете Микроконтроллеры ЭВМ

#
12.08.20132.71 Mб158Advanced control engineering (S.R. Burns, 2001).pdf
#
12.08.201322.95 Mб100Advanced Digital Design with the Verilog HDL (M.D.Cilett)i.djvu
#
12.08.20138.13 Mб134Advanced Robotics with the Toddler (Paralax, student guide, v1.3, 2004).pdf
#
12.08.20138.85 Mб113ARM cross development with Eclipse, version 2 (J.P. Lynch, 2005).pdf
#
12.08.201317.02 Mб281BASCOM AVR, help reference (2007).PDF
#
12.08.20132.61 Mб160Basic Analog and Digital (Students guide, v13).pdf
#
12.08.20132.46 Mб131Basic for PIC Microcontrollers ( M. Nebojsa, 2000).pdf
#
12.08.20131.35 Mб168Basic for PIC Microcontrollers (M. Nebojsa, 2001).PDF
#
12.08.2013962.21 Кб99Beginers introduction to the Assebly Language of ATMEL-AVR Microprocessors (Gerhard Schmidt,2003, англ).pdf
#
12.08.20131.1 Mб126Beginers introduction to the Assebly Language of ATMEL-AVR Microprocessors (Gerhard Schmidt,2004, англ).pdf

$regfile = "m48def.dat"	' specify the used
micro	' used crystal
$crystal = 8000000	' used crystal
frequency	' use baud rate
$baud = 19200	' use baud rate
$hwstack = 32	' default use 32

	© MCS Electronics, 1995-2007
for the hardware stack	' default use 10
$swstack = 40	' default use 10
for the SW stack	' default use 40
$framesize = 40	' default use 40
for the frame space
Dim A As Single
Dim B As Double
A = 9.0
B = 12345678.123
A =Sqr(A)	' prints 3.0
Print A	' prints 3.0
B = Sqr(b)
Print B
End