Pic16F870 нужна помощь ассемблерщиков

[tomitch]

Асм для меня. Есть устройство на Pic16F870, рассчитанное на питание 5В, которое и опора для АЦП.
Развёл печатку, переделал под неё исходник .
Запитал от 2,7В (Li-Ion+XC6206), функционирует и на 20 МГц, но теперь нужен перерасчёт результатов измерений (вместо 1,33В кажет 2,52).
Где это зарыто в исходнике?
Буду благодарен за помощь.

[anatol378]

А ссылку на устройство слабо дать?
Как бы неплохой пробник?

[anatol378]

Просто сделай делитель на RA0 (2 ножка), 23,5 Ом на массу. Или другие резисторы, главное пропорция в изменении питающих.

[j-Roger]

Сейчас в софте что-нибудь придумаем, там ИМХО несложно.
Опора уменьшилась в 5.0/2.7 = 1.85 раза, поэтому и результат пропорционально завышен.
Нужно результат измерения АЦП уменьшить в 1.85 раз, или, что то же, домножить на 1/1.85 = 0.54 ~= 17/32.
Если в оригинале результат измерения N с АЦП делится на 2 (т.е. N/2) и идет в работу, то нам нужно домножить его на 17/32, то есть получим искомое N*17/64.
Это можно представить как (16*N + N)/64 = 16*N/64 + N/64 = (N››2) + (N››6), то есть обойтись сдвигами и сложениями.

[j-Roger]

В Протеусе симулируется

Нет такой возможности.
Попробуйте - подправленный исходник во вложении.
По ходу там, где явно указано 'voltmeter', оригинальный фрагмент обработки результата АЦП был заменен на новый.

Т.е. закомментированы строки 1244..1254 с пометкой 'Original':

vov2	call	atod		;get 10 bits
;››› Original
	;bcf	STATUS,C
	;rrf	hi,f
	;rrf	lo,f		;scale to 9 bits (N ›› 1)
	;movf	lo,w
	;movwf	acc
	;movf	hi,w
	;movwf	acc+1
	;clrf	acc+2
	;clrf	acc+3
;‹‹‹ Original

и добавлен новый фрагмент с пометкой 'New'.

;››› New
; the goal is to obtain in acc the value (N ›› 2) + (N ››6) instead of (N ›› 1)
	bcf	STATUS,C
	rrf	hi,f
	rrf	lo,f	    ; hi:lo is shifted right by 1 (N ›› 1)
	bcf	STATUS,C
	rrf	hi,f
	rrf	lo,f	    ; hi:lo is shifted right by 2 (N ›› 2)
	movf    lo,w
	movwf   acc
	movf    hi,w
	movwf   acc+1
	clrf    acc+2
	clrf    acc+3	    ; acc now contains hi:lo shifted right by 2 (N ›› 2)

	bcf	STATUS,C
	rrf	hi,f
	rrf	lo,f	    ; hi:lo is shifted right by 3 (N ›› 3)
	bcf	STATUS,C
	rrf	hi,f
	rrf	lo,f	    ; hi:lo is shifted right by 4 (N ›› 4)
	bcf	STATUS,C
	rrf	hi,f
	rrf	lo,f	    ; hi:lo is shifted right by 5 (N ›› 5)
	bcf	STATUS,C
	rrf	hi,f
	rrf	lo,f	    ; hi:lo is shifted right by 6 (N ›› 6)

	bcf	STATUS,C    ; now we have to add hi:lo to acc
	movf    lo, w	    ; sum 0th bytes
	addwf   acc + 0,f	

	movf    hi, w       ; sum 1st bytes
	btfsc   STATUS, C 
	incfsz  hi, w 
	addwf   acc + 1, f

	clrw		    ; sum 2nd bytes
	btfsc   STATUS, C
	movlw	1
	addwf   acc + 2, f
;‹‹‹ New

SP870.zip

[j-Roger]

tomitch, удалось просимулировать, 'voltmeter' ведет себя как положено.
В посте #8 во вложении исходник, взятый из архива (пост #7) и файл *.hex

P.S.
Там еще логический пробник будет себя некорректно вести по причине изменения опоры, ибо я поправил только вольтметр

[Eddy71]

Есть устройство на Pic16F870, рассчитанное на питание 5В, которое и опора для АЦП.
...
Запитал от 2,7В , функционирует и на 20 МГц

Негоже так животину тиранить...

[j-Roger]

Eddy71, можно попробовать приличное охлаждение и по волноводу подвести 1ГГц внешний такт; во будет зверь

[Eddy71]

Дело не в перегреве, а в том, что с понижением напряжения сильно падает производительность периферии. Она начинает "отваливаться". 20МГц на 2,7в это жестко..

[tomitch]

Вопрос решён с помощью soft+MCP1640.

Подниму тему. Ещё одна модернизация без импульсника.

Расширен предел измерения напряжения до +27В с помощью насадки на щуп резистора 91кОм и изменения проги.
К сожалению не удалось погасить незначащие нули (с ассемблером на Вы)
Может кто-нибудь скорректирует прогу?