[an error occurred while processing this directive]
|
на конкретную ссылку:))
Скоро новый год. Очень надо 6-ти канальный бегущий огонь именно на Тини12 с чтением эффектов из таблицы. Все 6 каналов только на вывод, ни одной кнопки. На PICах все получилось
Благодаря http://yusoft.kulichki.com/russian/pic/my_proj.htm переписал программу с 16F84 под P12F675. Но оказалось там только 5 каналов на вывод :(( Опыта на программирования на Atmel нет, на СИ тоже. Освоить до Нового года не успею.
Приму с благодарностью код asm или на СИ.
Прошивка очень короткая:
#include org 0 ; начальный адрес программы begin: bsf STATUS,RP0 ; выбор банка 1 ;отдельный файл table.inc: tabl: addwf PCL
E-mail:
info@telesys.ru
;Определение переменных
count equ 0x21 ; указатель в таблице
d1 equ 0x0E ; 16-разрядный
d2 equ 0x0F ; код задержки
clrf GPIO ; настройка порта А на вывод
bcf STATUS,RP0 ; выбор банка 0
movlw endt-tabl-2 ; размер таблицы в W
movwf count ; записать в COUNT
mloop: movf count,w
call tabl ; выбор значения из таблицы
movwf GPIO ; и вывод в порт А
call delay ; временная задержка
decfsz count ; повтор цикла
goto mloop
goto begin
;Программа временной задержки
delay: clrf d1 ; w := 255
load2: clrf d2 ; w := 255
loop2: decfsz d2
goto loop2
loop1: decfsz d1
goto load2
return
; таблица значений
#include
end
;пример эффектов
retlw B'00000110'
retlw B'00001100'
retlw B'00011000'
retlw B'00010100'
retlw B'00001010'
retlw B'00000101'
endt:
Ответы
Перейти к списку ответов
|||
Конференция
|||
Архив
|||
Главная страница
|||
Содержание