 bely.asm
;
; Created: 21/05/2021 18:56:48
; Author : Bely
;


; Replace with your application code
.def contador1=r17
.def contador2=r16
.equ TAM=20
.cseg
		rcall IniciaTabla
		ldi contador1, TAM-1
		mov contador2,contador1
BUCLE2:	ldi yl,low(TABLA)
		ldi yh, high (TABLA)
		ldi contador1, TAM-1
BUCLE1:	ld r0,y
		ldd r1,y+1
		cp r1,r0
		brge INTER
		rjmp SIGUE
INTER:	std y+1,r0
		st y,r1
SIGUE:	adiw yl,1
		dec contador1
		brne BUCLE1
		dec contador2
		brne BUCLE2
FIN:	rjmp FIN
IniciaTabla:ldi zl, low(2*TABLAORG)
			ldi zh, high(2*TABLAORG)
			ldi xl,low(TABLA)
			ldi xh, high (TABLA)
			ldi contador1,TAM
	BUCLE:	lpm r3, z+
			st x+,r3
			dec contador1
			brne BUCLE
			ret
			
.org 0x100
TABLAORG: .db 20,40,3,2,1,0,9,7,8,50,3,2,1,9,18,16,13,33,19,20
.dseg
.org 0x100
TABLA: .byte 20
