Добавил:

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

Вуз:

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

Предмет:

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

Файл:

BASCOM AVR, help reference (2007).PDF

Скачиваний:

305

Добавлен:

12.08.2013

Размер:

17.02 Mб

Скачать

☆

►Содержание►

<<< < Предыдущая 70 71 72 73 74 75 76 77 78 79 80 8182 / 16382 83 84 85 86 87 88 89 90 91 92 93 94 > Следующая >>>

'this label is called when the master receives data and needs a byte

'the variable twi_btr is a byte variable that holds the index of the needed byte 'so when sending multiple bytes from an array, twi_btr can be used for the index Twi_master_needs_byte:

'Print "Master needs byte : " ; Twi_btr
Select Case Twi_btr	'firstbyte
Case 1:	'firstbyte
W= Getadc(0)	'in this example the conversion is done here
' but a better option would have been to just pass the value of W and do the conversion in the main
loop
Twi= Low(w)	' send second byte
Case 2	' send second byte
Twi= High(w)
End Select
Return

'when the mast has all bytes received this label will be called Twi_master_need_nomore_byte:

' Print "Master does not need anymore bytes"

Return

CONFIG WAITSUART

Action

Compiler directive that specifies that software UART waits after sending the last byte.

Syntax

CONFIG WAITSUART = value

Remarks

value	A numeric value in the range of 1-255.
	A higher value means a longer delay in mS.

When the software UART routine are used in combination with serial LCD displays it can be convenient to specify a delay so the display can process the data.

CONFIG WATCHDOG

Action

Configures the watchdog timer.

page -399-

Syntax

CONFIG WATCHDOG = time

Remarks

Time	The interval constant in mS the watchdog timer will count to before it
	will reset your program.

Possible settings :

16 , 32, 64 , 128 , 256 , 512 , 1024 and 2048. Some chips : 4098, 8192.

Note that some new AVR's might have additional reset values such as 4098 and 8192.

When the WD is started, a reset will occur after the specified number of mS.

With 2048, a reset will occur after 2 seconds, so you need to reset the WD in your programs periodically with the RESET WATCHDOG statement.

Some AVR's might have the WD timer enabled by default. You can change this with the Fuse Bits.

CONFIG X10

Action

Configures the pins used for X10.

Syntax

CONFIG X10 = pinZC , TX = portpin

Remarks

PinZC	The pin that is connected to the zero cross output of the TW-523. This si a
	pin that will be used as INPUT.
Portpin	The pin that is connected to the TX pin of the Tw-523.
	TX is used to send X10 data to the TW-523. This pin will be used in output
	mode.
The TW-523 RJ-11 connector has the following pinout:
Pin		Description	Connect to micro
1		Zero Cross	Input pin. Add 5.1K pull up.
2		GND	GND
3		RX	Not used.
4		TX	Output pin. Add 1K pull up.

See also

X10DETECT , X10SEND

Example

'-----------------------------------------------------------------------------
------------	: x10.bas
'name	: x10.bas
'copyright	: (c) 1995-2005, MCS Electronics
'purpose	: example needs a TW-523 X10 interface
'micro	: Mega48
'suited for demo	: yes
'commercial addon needed	: no

'-----------------------------------------------------------------------------

------------

$regfile = "m48def.dat"	' specify the used
micro	' used crystal
$crystal = 8000000	' used crystal
frequency	' use baud rate
$baud = 19200	' use baud rate
	page -401-

^--- transmission pin

$hwstack = 32

for the hardware stack $swstack = 10

for the SW stack $framesize = 40

for the frame space

'define the house code Const House = "M"

Waitms 500

not really needed

'dim the used variables

Dim X As Byte

'configure the zero cross pin and TX pin Config X10 = Pind.4 , Tx = Portb.0

'^--zero cross

'detect the TW-523 X = X10detect() Print X

means 50 Hz, 2 means 60 Hz

Input "Send (1-32) " , X 'enter a key code from 1-31 '1-16 to address a unit '17 all units off

'18 all lights on '19 ON

'20 OFF

'21 DIM '22 BRIGHT

'23 All lights off '24 extended code '25 hail request '26 hail acknowledge '27 preset dim

'28 preset dim

'29 extended data analog '30 status on

'31 status off '32 status request

X10send House , X

Loop

Dim Ar(4) As Byte

X10send House , X , Ar(1) , 4 additional bytes

End

'default use 32

'default use 10

'default use 40

'use code A-P

'optional delay

' 0 means error, 1

'send the code

'send 4

CONFIG XRAM

Action

Instruct the compiler to set options for external memory access.

page -402-

<<< < Предыдущая 70 71 72 73 74 75 76 77 78 79 80 8182 / 16382 83 84 85 86 87 88 89 90 91 92 93 94 > Следующая >>>

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

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

'-----------------------------------------------------------------------------
------------	: watchd.bas
'name	: watchd.bas
'copyright	: (c) 1995-2005, MCS Electronics
'purpose	: demonstrates the watchdog timer
'micro	: Mega48
'suited for demo	: yes
'commercial addon needed	: no