Помогите с TMR1 на PIC16F873

[DmitriyVDN]

ну и какая разница, вы веди дополнительный флаг, я этот флаг получил сразу при опросе кнопок. теже я..ца только в профиль.
с той лишь разницей что у меня упростилось условие запуска
if(Button. JastRelase&(1‹‹IN1)) {StartTimer(TIMER1);Button. JastRelase=FALSE;}

[ptrots]

Я думаю тему можно закрывать. С помощью DmitriyVDN программа была успешно написана и сейчас тестируется на рабочем оборудовании.
Всем спасибо за участие!

[OakRidge]

Есть такая контора MIKROE Компиляторы для пикофф отличные
Размер только 2 раза больше чем с ассемблера.
Да много понятнее. btfss Ужос
Тюхнули раз чужой асемблер гадать.
Писал когдато, 10F200 отлично получилась сирена
Да никому не рекомендую асемлбер
Шарада и только
Да ПИК16Ф1ььь надо употреблять 873 хороший, да как Запорожец

[NewWriter]

От такой картинки у меня чуть монитор ноутбука не треснул по ширине. У него же всего 1920, а картинка 2700 пикс.

На счет ассемблера - да че там такого то, для таких как PIC10F200 он самое то! Ничего страшного в btfss нету, обычная логика условия.

[OakRidge]

PIC10F200

делал, прожект более чем успешный
Однако не вернусь к PIC10F200
Мука ужос, на асемблере
Не стоит трудов.

[varostov]

btfss Ужос
Да никому не рекомендую асемлбер
Шарада и только

Ассемблер - всего лишь инструмент, ни хороший , ни плохой. Надо всего лишь его изучить и подстроить под себя. Не нравится btfss? Напишите или возьмите макросы, облегчающие жизнь. Вот, например, мои перлы 2000-го года:

	list
;************************************************
; Макросы ред. 22.06.2000
;************************************************
	nolist
;================================================
; Загрузка регистров
;================================================
LD		macro	reg,const
		MOVLW	const
		MOVWF	reg
		endm

LDR		macro	reg,reg1
		MOVFW	reg1
		MOVWF	reg
		endm
		
LDR01		macro	reg,reg1
		BSF	RP0
		MOVFW	reg1
		BCF	RP0
		MOVWF	reg
		endm
		
LDR10		macro	reg,reg1
		MOVFW	reg1
		BSF	RP0
		MOVWF	reg
		BCF	RP0
		endm

;================================================
; Условные переходы по сравнению регистр-константа
;================================================
SKPLOW		macro	reg,const
		MOVLW	const
		SUBWF	reg,W
		SKPNC
		endm

INCSKPLOW	macro	reg,const
		INCF	reg,F
		MOVLW	const
		SUBWF	reg,W
		SKPNC
		endm

SKPHIEQ		macro	reg,const
		MOVLW	const
		SUBWF	reg,W
		SKPC
		endm

INCSKPHIEQ	macro	reg,const
		INCF	reg,F
		MOVLW	const
		SUBWF	reg,W
		SKPC
		endm

SKPHI		macro	reg,const
		MOVFW	reg
		SUBLW	const
		SKPNC
		endm

INCSKPHI	macro	reg,const
		INCF	reg,F
		MOVFW	reg
		SUBLW	const
		SKPNC
		endm

SKPLOEQ		macro	reg,const
		MOVFW	reg
		SUBLW	const
		SKPC
		endm

INCSKPLOEQ	macro	reg,const
		INCF	reg,F
		MOVFW	reg
		SUBLW	const
		SKPC
		endm

SKPEQU		macro	reg,const
		MOVLW	const
		XORWF	reg,W
		SKPZ
		endm
		
INCSKPEQU	macro	reg,const
		INCF	reg,F
		MOVLW	const
		XORWF	reg,W
		SKPZ
		endm
		
SKPNOEQ		macro	reg,const
		MOVLW	const
		XORWF	reg,W
		SKPNZ
		endm
		
INCSKPNOEQ	macro	reg,const
		INCF	reg,F
		MOVLW	const
		XORWF	reg,W
		SKPNZ
		endm
;
;================================================
; Условные переходы по сравнению регистр-регистр
;================================================
SKPLOWR		macro	reg,reg1
		MOVFW	reg1
		SUBWF	reg,W
		SKPNC
		endm

INCSKPLOWR	macro	reg,reg1
		INCF	reg,F
		MOVFW	reg1
		SUBWF	reg,W
		SKPNC
		endm

SKPHIEQR	macro	reg,reg1
		MOVFW	reg1
		SUBWF	reg,W
		SKPC
		endm

INCSKPHIEQR	macro	reg,reg1
		INCF	reg,F
		MOVFW	reg1
		SUBWF	reg,W
		SKPC
		endm

SKPHIR		macro	reg,reg1
		MOVFW	reg
		SUBWF	reg1,W
		SKPNC
		endm

INCSKPHIR	macro	reg,reg1
		INCF	reg,F
		MOVFW	reg
		SUBWF	reg1,W
		SKPNC
		endm

SKPLOEQR	macro	reg,reg1
		MOVFW	reg
		SUBWF	reg1,W
		SKPC
		endm

INCSKPLOEQR	macro	reg,reg1
		INCF	reg,F
		MOVFW	reg
		SUBWF	reg1,F
		SKPC
		endm

SKPEQUR		macro	reg,reg1
		MOVFW	reg1
		XORWF	reg,W
		SKPZ
		endm
		
INCSKPEQUR	macro	reg,reg1
		INCF	reg,F
		MOVFW	reg1
		XORWF	reg,W
		SKPZ
		endm
		
SKPNOEQR	macro	reg,reg1
		MOVFW	reg1
		XORWF	reg,W
		SKPNZ
		endm
		
INCSKPNOEQR	macro	reg,reg1
		INCF	reg,F
		MOVFW	reg1
		XORWF	reg,W
		SKPNZ
		endm
;

	list

[vavan1983]

varostov, вот поэтому и придумали после макросов язык C

[sciff]

вот tmr1

Org 0
goto start
org 4
bcf PIR1,TMR1IF
bsf status,c
retfie
start
{ваш код}
delay05
bsf t1con,T1CKPS0
bsf t1con,T1CKPS1
bsf t1con,TMR1ON
bcf t1con,TMR1CS
bsf intcon,GIE
bsf intcon,PEIE
bsf PIE,TMR1IE
wait
btfss STATUS,C
goto wait
bcf status,c
return

[sciff]

d equ 23; btfss del,0 вместо btfss status,0 и в прерывании bsf del,0