Форум РадиоКот

Код: Выделить всё

.include "m8def.inc"


.MACRO outi		
		LDI 	R16,@1 	; This macro copies specific integer to R16
		OUT 	@0,R16 	; and copies R16 content to specific register
.ENDMACRO

.CSEG
			.ORG 	0x0000			; CPU starts from 0x0000, but there are
			RJMP 	Reset			; interrupt vectors, so we jump to
									; beginning of our program - Reset marker

			
;INTERRUPT VECTORS
			;definitions are copied from m8def.inc and therefore corresponding
			; .EQU changed to .ORG and RETI added if no action is needed for 
			;specific interrupt

.ORG	INT0addr		; External Interrupt Request 0
RETI
.ORG	INT1addr		; External Interrupt Request 1
RETI
.ORG	OC2addr			; Timer/Counter2 Compare Match
RETI
.ORG	OVF2addr		; Timer/Counter2 Overflow
RETI
.ORG	ICP1addr		; Timer/Counter1 Capture Event
RETI
.ORG	OC1Aaddr		; Timer/Counter1 Compare Match A
RETI
.ORG	OC1Baddr		; Timer/Counter1 Compare Match B
RETI
.ORG	OVF1addr		; Timer/Counter1 Overflow
RJMP Timer1OV 			;Move to Timer1OV marker code

.ORG	OVF0addr		; Timer/Counter0 Overflow
RJMP Timer0OV
.ORG	SPIaddr			; Serial Transfer Complete
RETI
.ORG	URXCaddr		; USART, Rx Complete
RETI
.ORG	UDREaddr		; USART Data Register Empty
RETI
.ORG	UTXCaddr		; USART, Tx Complete
RETI
.ORG	ADCCaddr		; ADC Conversion Complete
RETI
.ORG	ERDYaddr		; EEPROM Ready
RETI
.ORG	ACIaddr			; Analog Comparator
RETI
.ORG	TWIaddr			; 2-wire Serial Interface
RETI
.ORG	SPMRaddr		; Store Program Memory Ready
RETI
			
			.ORG	INT_VECTORS_SIZE		; END OF INTERRUPT VECTORS TABLE

			;The Program begins here

Reset:		OUTI 	SPL,low(RAMEND) 		; Initialize Stack
			OUTI	SPH,High(RAMEND)					
											
OUTI DDRB,255 ;port B initialization
OUTI DDRC,255 ;port C initialization
OUTI PORTB,0b10101010
OUTI PORTC,0b10101010
		


	LDI	R16,(1<<TOIE0)+(1<<TOIE1) ;Timer1,Timer0 Overflow Interrupt Enable set bit and load to R16
	OUT	TIMSK, R16	 ;Load R16 to TIMSK register
	
	;global interrupts disabled before 16-bit operations

	LDI	R16, High(65535-100)	 ; Here loading initial state of count registers
	OUT	TCNT1H, R16				; High byte
	LDI	R16, Low(65535-100) 	;
	OUT	TCNT1L, R16		        ; And low byte
	SEI				; Global Interrupt enable
 
	LDI	R16,1			; Start Timer1 (without prescaler - 0000 0001 (1Dec)
	OUT	TCCR1B,R16		; or with 1024 prescaler - 0000 0101 (5Dec))
	OUT TCCR0,R16		; Start Timer0 

Main:
	NOP					;Wait for counter overflow, no operation
	RJMP Main


Timer1OV: 	
		
			LDI R17,PORTB ;shift PORTB right - toggle LED
			ROR R17
			OUT PORTB,R17
	        RETI ;return 

Timer0OV:
			LDI R18,PORTC ;shift PORTC right - toggle LED
			ROR R18
			OUT PORTC,R18
			RETI ;return


	  

Код: Выделить всё

        LDI R17,PORTB ;shift PORTB right - toggle LED

Код: Выделить всё

   LDI   R16, High(65535-100)    ; Here loading initial state of count registers 
   OUT   TCNT1H, R16            ; High byte 
   LDI   R16, Low(65535-100)    ; 
   OUT   TCNT1L, R16              ; And low byte