Отправлено Aleksey75 21 октября 2006 г. 09:49 В ответ на: вот!+ отправлено Aleksey75 21 октября 2006 г. 09:19

< pre >
; Кварц 16 MHz, ADXL202 AN604
;Таймеры CK/8
.include "d:\my code\m8def.inc"

.def tmp =r16
.def tmpL =r17
.def tmpH =r18
.def lc =r19
.def cikl =r20




.cseg
.org $0000
rjmp reset

reset:

ldi tmp,0x5f ;$035f
out spl,tmp ;Определение вершины стека
ldi tmp,0x03 ;$035f
out sph,tmp ;Определение вершины стека

;---------------Определяем напраление работы портов -----------------------------------------------------
;Направление работы портов

;PORTB
ser tmp
out DDRB,tmp ;Выход
clr tmp
out PORTB,tmp ;Низкий уровень на выходе порта
out PINB,tmp ;Низкий уровень на выходе порта
;PORTD
ser tmp ;tmp=0xFF
out DDRD,tmp ;
clr tmp
out PORTD,tmp ;Низкий уровень на выходе порта
out PIND,tmp ;низкий уровень на выходе порта

;PORTC
ser tmp ;tmp=0xFF
cbr tmp,(1< out DDRC,tmp ;PС1 и PС0 Входы
clr tmp
out PORTC,tmp ;Низкий уровень на выходе порта
out PINC,tmp ;Низкий уровень на выходе порта

;---------------Разрешаем работу сторожевого таймера , сброс через 2 сек---------------------------------
; wdr
; ldi tmp,0b00011000 ;WDP=110(1сек),WDE=1,
; out WDTCR,tmp
; ldi tmp,0b00001111
; out WDTCR,tmp ;Установка сторожевого таймера
;:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

;---------------Выключаем аналоговый компоратор----------------------- ldi tmp,0b10000000
out acsr,tmp ;выключение аналогово компаратора
;:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

main:
ldi zL,low(65535) ;Загрузка в YH:YL константы 65535
ldi zH,high(65535)
sbiw zL,1 ;вычитание из YH:YL еденицы
brne pc-1 ;Если результат вычитания не равен 0 перейти

;************test USaRT


ldi tmp,0x67
out UBRRL,tmp ;UBRR = c = 9600
sbi UCSRB,txen

sbis ucsra,udre
rjmp pc-1
ldi tmp,0x01
out udr,tmp

sbis ucsra,udre
rjmp pc-1

ldi tmp,0x02
out udr,tmp

sbis ucsra,udre
rjmp pc-1

ldi tmp,0x03
out udr,tmp

sbis ucsra,udre
rjmp pc-1

ldi tmp,0x04
out udr,tmp

sbis ucsra,udre
rjmp pc-1

ldi tmp,0x05
out udr,tmp

sbis ucsra,udre
rjmp pc-1

ldi tmp,0x06
out udr,tmp

nop
Rjmp pc-1
;*************
< / pre >

<