Форум

Радиолюбительский форум.

Если у Вас возникли вопросы, задавайте их на форуме.

В сети

Пользователей: 182
Из них просматривают:
Аналоги: 94. Даташиты: 27. Инструкции: 1. Новости: 21. Остальное: 1. Программы: 2. Производители: 1. Профиль пользователя: 9. Форум: 26.
Участников: 2
Гостей: 180

Google , Яндекс , далее...
Рекорд 2375 человек онлайн установлен 26.12.2015.

Партнёры


Партнёры

Новые объявления

В настоящее время нет объявлений.

Просмотр этой темы: 

 1 анонимных пользователей
Помогите создать хекс фаил
Технолог
Зарегистрирован:
24.01.2010 19:37
Из: Львов,Укриана.
Сообщений: 152
Не в сети
Я знаю но не умею ею пользоваться


Отредактировано пользователем MACTEP 26.12.2010 3:54:02


Re: Помогите
Технический Директор
Зарегистрирован:
09.01.2009 0:19
Из: Tallinn
Сообщений: 2303
Не в сети
Жди *Папку*,мож Эвил поможет.
Или *Гнусс* все же сделает
(Geniuzz)

Открыть изображение в новом окне
Открыть изображение в новом окне
Открыть изображение в новом окне


Re: Помогите
Администратор
Зарегистрирован:
07.08.2008 20:40
Из: Тирасполь
Сообщений: 7270
Не в сети
Для вставки кода используйте тег [code] кнопка Открыть изображение в новом окне





Re: Помогите
Модератор
Зарегистрирован:
26.01.2010 23:26
Из: Тирасполь
Сообщений: 3926
Не в сети
Все что не хватило- я восстановил



Re: Помогите
Технолог
Зарегистрирован:
24.01.2010 19:37
Из: Львов,Укриана.
Сообщений: 152
Не в сети
А мож закинуть хекс фаил?



Гость
Re: Помогите
Гость_Гость
to MaRkO вольф
это не гнусс ))) плохого не насоветует )))



Re: Помогите
Технолог
Зарегистрирован:
24.01.2010 19:37
Из: Львов,Укриана.
Сообщений: 152
Не в сети
evildesign мож закинуть хекс фаил?



Re: Помогите
Модератор
Зарегистрирован:
26.01.2010 23:26
Из: Тирасполь
Сообщений: 3926
Не в сети
зачем? я уже выставил один



Помогите создать хекс фаил
Технолог
Зарегистрирован:
24.01.2010 19:37
Из: Львов,Укриана.
Сообщений: 152
Не в сети
; Программа для простейшей цветомузыкальной приставки.
; Copyright 2006 © ARV Research
; источник: http://arvresearch.nm.ru
;
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



А такую прогу мош сделать? Качал по такой http://arv.radioliga.com/component/option,com_remository/Itemid,27/func,select/id,23/ ссылке х... какаята.
Помогите кто может и имеет лишнее время.
Заране спасибо!!!


Отредактировано пользователем MACTEP 26.12.2010 3:53:41


Помогите создать хекс фаил
Модератор
Зарегистрирован:
26.01.2010 23:26
Из: Тирасполь
Сообщений: 3926
Не в сети
Все там прекрасно скачивается.


Отредактировано пользователем MACTEP 26.12.2010 3:53:26


Поиск по форуму


Расширенный поиск

Разное

Интересно

Контактные щетки для микродеталей, электробритв и т.п. можно выпилить из графитовых стержней от старых батареек питания.