Реклама на сайте English version  DatasheetsDatasheets

KAZUS.RU - Электронный портал. Принципиальные схемы, Datasheets, Форум по электронике

Новости электроники Новости Литература, электронные книги Литература Документация, даташиты Документация Поиск даташитов (datasheets)Поиск PDF
  От производителей
Новости поставщиков
В мире электроники

  Сборник статей
Электронные книги
FAQ по электронике

  Datasheets
Поиск SMD
Он-лайн справочник

Принципиальные схемы Схемы Каталоги программ, сайтов Каталоги Общение, форум Общение Ваш аккаунтАккаунт
  Каталог схем
Избранные схемы
FAQ по электронике
  Программы
Каталог сайтов
Производители электроники
  Форумы по электронике
Удаленная работа
Помощь проекту

Микроконтроллеры, АЦП, память и т.д Темы касающиеся микроконтроллеров разных производителей, памяти, АЦП/ЦАП, периферийных модулей...

 
Опции темы
Непрочитано 02.11.2005, 01:25  
AnB
Прописка
 
Регистрация: 23.06.2005
Сообщений: 166
Сказал спасибо: 0
Сказали Спасибо 7 раз(а) в 6 сообщении(ях)
AnB на пути к лучшему
По умолчанию BIN2BCD Надо очень !

Господа, поделитесь кодом или ссылкой если не жалко.
Нужна стопудово рабочая (т.е. проверенная кем то лично) подпрограмма.
входные - два байта. Ассемблер для 18пика.
Реклама:
__________________
Главный парадокс: Оптимист верит в то, что живет в лутшем из миров - пессемист боится, что так оно и есть....
AnB вне форума  
Непрочитано 02.11.2005, 07:50  
Drex
Прописка
 
Аватар для Drex
 
Регистрация: 16.04.2004
Сообщений: 196
Сказал спасибо: 328
Сказали Спасибо 6 раз(а) в 6 сообщении(ях)
Drex на пути к лучшему
По умолчанию

Bin2BCD_16
;Переводит двоичное двухбайтовое число в BCD формат, принцип работы не знаю, я сдул этот
;кусок кода у кого-то в инете, но проверял лично - работает, причем очень быстро
Исходное число в bin1, bin2 - Результат bcd1,bcd2,bcd3 по 2 цыфры в каждом реистре

Код:
		movlw	.16 
		movwf	ctr 
		clrf	bcd1 
		clrf	bcd2 
		clrf	bcd3 
		goto	new_start 
adjdec
		movlw	0x33 
		addwf	bcd1,f 
		addwf	bcd2,f 
		addwf	bcd3,f 

		movlw	0x03 
		btfss	bcd1,3 
		subwf	bcd1,f 
		btfss	bcd2,3 
		subwf	bcd2,f 
		btfss	bcd3,3 
		subwf	bcd3,f 

		movlw	0x30 
		btfss	bcd1,7 
		subwf	bcd1,f 
		btfss	bcd2,7 
		subwf	bcd2,f 
		btfss	bcd3,7 
		subwf	bcd3,f 
new_start
		rlf		bin2,f 
		rlf		bin1,f 
		rlf		bcd3,f 
		rlf		bcd2,f 
		rlf		bcd1,f 
		decfsz	ctr,f 
		goto	adjdec 
		return
Drex вне форума  
Непрочитано 02.11.2005, 09:33  
AnB
Прописка
 
Регистрация: 23.06.2005
Сообщений: 166
Сказал спасибо: 0
Сказали Спасибо 7 раз(а) в 6 сообщении(ях)
AnB на пути к лучшему
По умолчанию

Сообщение от Drex
Bin2BCD_16
;Переводит двоичное двухбайтовое число в BCD формат, принцип работы не знаю, я сдул этот
;кусок кода у кого-то в инете, но проверял лично - работает, причем очень быстро
Исходное число в bin1, bin2 - Результат bcd1,bcd2,
Благодарю, очень помог.
__________________
Главный парадокс: Оптимист верит в то, что живет в лутшем из миров - пессемист боится, что так оно и есть....
AnB вне форума  
 

Закладки
Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Преобразователь напрежения с 12в на 15в/6а ну очень надо! vasili4 Источники питания и свет 0 24.09.2008 09:48
Умоляю! Дайте литературу по Aduc812 Очень надо. shama186 Микроконтроллеры, АЦП, память и т.д 7 10.05.2008 16:54
надо лекарство... chipman Proteus, KiCAD и другие ECAD 0 03.05.2007 17:47
очень надо MicroCap 8 AnaBolik Proteus, KiCAD и другие ECAD 18 01.11.2006 22:33


Часовой пояс GMT +4, время: 07:18.


Powered by vBulletin® Version 3.8.4
Copyright ©2000 - 2020, Jelsoft Enterprises Ltd. Перевод: zCarot