Просмотр этой темы:
1 анонимных пользователей
Технолог
Зарегистрирован:
24.01.2010 19:37 Из: Львов,Укриана.
Сообщений:
152
|
Я знаю но не умею ею пользоваться
Отправлено: 17.12.2010 19:39
Отредактировано пользователем MACTEP 26.12.2010 3:54:02
|
|
Технический Директор
Зарегистрирован:
09.01.2009 0:19 Из: Tallinn
Сообщений:
2303
|
Жди *Папку*,мож Эвил поможет.
Или *Гнусс* все же сделает (Geniuzz)
Отправлено: 17.12.2010 19:45
|
|
Администратор
Зарегистрирован:
07.08.2008 20:40 Из: Тирасполь
Сообщений:
7270
|
Отправлено: 17.12.2010 20:43
|
|
Модератор
Зарегистрирован:
26.01.2010 23:26 Из: Тирасполь
Сообщений:
3926
|
Все что не хватило- я восстановил
Отправлено: 17.12.2010 20:51
|
|
Технолог
Зарегистрирован:
24.01.2010 19:37 Из: Львов,Укриана.
Сообщений:
152
|
А мож закинуть хекс фаил?
Отправлено: 17.12.2010 21:41
|
|
Гость
|
||
---|---|---|
Гость_Гость
|
to MaRkO вольф
это не гнусс ))) плохого не насоветует )))
Отправлено: 17.12.2010 21:47
|
|
Технолог
Зарегистрирован:
24.01.2010 19:37 Из: Львов,Укриана.
Сообщений:
152
|
evildesign мож закинуть хекс фаил?
Отправлено: 17.12.2010 22:44
|
|
Модератор
Зарегистрирован:
26.01.2010 23:26 Из: Тирасполь
Сообщений:
3926
|
зачем? я уже выставил один
Отправлено: 17.12.2010 22:48
|
|
Технолог
Зарегистрирован:
24.01.2010 19:37 Из: Львов,Укриана.
Сообщений:
152
|
; Программа для простейшей цветомузыкальной приставки.
; Copyright 2006 © ARV Research ; источник: ; Const equ (0FFFFh - 1000+8); начальное значение счетчика InitTH equ high(Const) ; начальное значение TH0 InitTL equ low(Const) ; начальное значение TL0 Tickcnt equ 11 ; периодичность измерений Semafor equ PSW.5 ; семафор LED1 equ P1.7 LED2 equ P1.4 LED3 equ P1.1 ;------------------------------------------------------------------------------- dseg at 10h Cnt: ds 1 ; счетчик тиков таймера Stack: ;------------------------------------------------------------------------------- cseg org 0 jmp st ; переход на начало программы ;------------------------------------------------------------------------------- ; точка входа прерывания таймера 1 Timer1Int: ; Таймер 1 используется для счета времени org 1Bh jmp Timer1 ;------------------------------------------------------------------------------- st: mov SP, Stack ; настраиваем режимы таймеров и маску прерываний mov TMOD,#00010001b ; режимы работы таймеров T0 и Т1 ; |||||||| ; ||||||++- режим работы Т0 ; |||||+--- C/Т0: 0-таймер, 1-счетчик ; ||||+---- Т0: 0-управление по TR0, 1- управление по TR0 и INT0 ; ||++----- режим работы Т1 ; |+------- C/Т1: 0-таймер, 1-счетчик ; +-------- Т1: 0-управление по TR1, 1- управление по TR1 и INT1 mov TCON,#01000000b ; управление таймерами ; |||||||| ; |||||||+- тип INT0: 1-динамический по спаду, 0-по уровню ; ||||||+-- запрос прерывания INT0 ; |||||+--- тип INT1 ; ||||+---- запрос прерывания INT1 ; |||+----- TR0 - запуск Т0 ; ||+------ TF0 ; |+------- TR1 - запуск Т1 ; +-------- TF1 mov IE, #10001000b ; прерывания ; |||||||| ; |||||||+- INT0 ; ||||||+-- TF0 ; |||||+--- INT1 ; ||||+---- TF1 ; |||+----- TI+RI - посл. порт ; ||+------ TF2+exF2+SPI ; |+------- резерв ; +-------- общее разрешение прерываний mov Cnt, #Tickcnt clr Semafor ; сбрасываем семафор setb TF1 ; первый раз для инициализации main_loop: clr TR0 mov TH0, #0 mov TL0, #0 clr TF0 wait_semafor: ; ждем семафора jbc Semafor, Done jmp wait_semafor Done: mov P1, #0FFh ; гасим все светодиоды mov A, #1 ; измерение и анализ jb INT0, wait_0 ; если 1 на входе - ждем нуля wait_1: ; ждем 1 jb INT0, Mess1 ; если 1 - измеряем cjne A, Cnt, wait_1; если ждем не слишком долго - ждем дальше jmp main_loop ; если ждем долго - больше не ждем :-) wait_10: ; ждем нуля на входе jnb INT0, Mess1 cjne A, Cnt, wait_10; если ждем не слишком долго - ждем дальше jmp main_loop ; если ждем долго - больше не ждем :-) Mess1: ; измеряем длительность 1 setb TR0 ; включаем таймер wait_end_1: jnb INT0, stop_mess cjne A, Cnt, wait_end_1; если ждем не слишком долго - ждем дальше jmp main_loop ; если ждем долго - больше не ждем :-) stop_mess: clr TR0 jb TF0, on_3 ; если переполнились - ВЧ ; проверим значение счетчика mov A, TH0 ; берем старший байт jz on_3 ; TH=0 - ВЧ cjne A, #5, m1 m1: jnc on_1 ; если TH <= 7 - НЧ on_2: clr LED2 jmp main_loop on_1: clr LED1 jmp main_loop on_3: mov A, TL0 cjne A, #100, m2 m2: jc main_loop clr LED3 jmp main_loop wait_0: ; ждем нуля на входе jnb INT0, Mess0 cjne A, Cnt, wait_0; если ждем не слишком долго - ждем дальше jmp main_loop ; если ждем долго - больше не ждем :-) wait_01: ; ждем 1 jb INT0, Mess1 ; если 1 - измеряем cjne A, Cnt, wait_01; если ждем не слишком долго - ждем дальше jmp main_loop ; если ждем долго - больше не ждем :-) Mess0: ; измеряем длительность 1 setb TR0 ; включаем таймер wait_end_0: jb INT0, stop_mess cjne A, Cnt, wait_end_0; если ждем не слишком долго - ждем дальше jmp main_loop ; если ждем долго - больше не ждем :-) ; обработчик прерывания timer1: mov TH1, #InitTH; заносим начальное значение TH0 mov TL1, #InitTL ; заносим начальное значение TL0 djnz Cnt, tmr1_ex mov Cnt, #TickCnt ; тут включаем семафор setb Semafor tmr1_ex: reti ; обработчик завершен end А такую прогу мош сделать? Качал по такой Помогите кто может и имеет лишнее время. Заране спасибо!!!
Отправлено: 25.12.2010 15:39
Отредактировано пользователем MACTEP 26.12.2010 3:53:41
|
|
Модератор
Зарегистрирован:
26.01.2010 23:26 Из: Тирасполь
Сообщений:
3926
|
Все там прекрасно скачивается.
Отправлено: 25.12.2010 23:41
Отредактировано пользователем MACTEP 26.12.2010 3:53:26
|
|