#INCLUDE	'A:\VAR_DEF.ASM'
* GIURGIUTIU, Victor
* Define program variables
	ORG	DATA

* Start main program
	ORG	PROGRAM
START	LDX	#REGBAS
* Begin typing your code
* Clear Port B
	LDAA	#%00000000
	STAA	PORTB,X
* Select PC0, PC2, PC4, PC6 for output
	LDAA	#%01010101
	STAA	DDRC,X
* Main loop
BEGIN	LDAA	PORTC,X
	LSRA
*	STAA	PORTC,X
	STAA	PORTB,X
	BRA	BEGIN
	SWI

	ORG	$FFFE	; reset vector
	FDB	START	; set to start of program