master.asm

;--------- подпрограммы Buffalo ------------------------------------------------------------------------------

.WARMST	equ	$FF7C
.OUTSTR	equ	$FFC7
.INPUT	equ	$FFAC
.OUTPUT	equ	$FFAF
.OUT2BS	equ	$FFC1
.OUTRHL	equ	$FFB5

;------------ регистры ---------------------------------------------------------------------------------------

TCNT	equ	$100E	;текущее значение таймера
TCTL2	equ	$1021	;выбор фронта для события
TIC1	equ	$1010	;входной регистр 1
TOC2	equ	$1018	;значение компаратора 2
TFLG1	equ	$1023	;флаги событий
AUTOLF	equ	$10A6

PORTD	equ	$1008
DDRD	equ	$1009
SPCR	equ	$1028	; начальная установка
SPDR	equ	$102a	; данные
SPSR	equ	$1029	; статус

;--------------- коды ----------------------------------------------------------------------------------------

FLIC1_WMASK	equ	%11111011	;маска для сброса флага события IC1 (через BCLR)
FLIC1_RMASK	equ	%00000100	;маска для чтения флага события IC1 (через BRCLR)

FLOC2_WMASK	equ	%10111111	;маска для сброса флага события OC2 (через BCLR)
FLOC2_RMASK	equ	%01000000	;маска для чтения флага события OC2 (через BRCLR)

TCTL2_WMASK	equ	%00010000	;маска для выбора события IC1 ( 01 - по переднему фронту )

;-------------- константы ------------------------------------------------------------------------------------

EOT	equ	$04
ENDL	equ	$0D


;-------- public static void main ----------------------------------------------------------------------------

	org	$100
	
	ldaa	#$2F
	staa	PORTD

	ldaa	#%111000	; slave: #%  000100
	staa	DDRD

	ldaa	#%01010001	; slave: #%01000001
	staa	SPCR

	ldaa	SPSR

Loop:	ldaa	Buffer
	staa	SPDR

	ldaa	#'.'
	jsr	.OUTPUT

Wait:	ldaa	SPSR
	bita	#%10000000
	beq	Wait

	bra	Loop
	
	
Exit:	jsr	.WARMST

Buffer	fcb	$5A