Victor-Mike

@sort_done:
	trp
	mov $0, 0
	mov $1, 0
	mov $2, 0
	mov $3, 0
	mov $4, 0
	mov $5, 0
	mov $6, 0
	mov $7, 0

	mov $0, >test_data
	mov $1, >test_len

	add $5, $1, $0
	loa $2, $0
	add $3, $3, 1
	loa $6, $0
	add $7, $7, 1


@main_loop:

	add $0, $0, 1
	cmp $5, $0
	bbw >done
	cmp $6, $0
	beq >add_current
	mov $7, 1
	jmp >cmp_freq



@add_current:
	add $7, $7, 1
	jmp >cmp_freq


@cmp_freq:
	cmp $7, $3
	bae >up_most_freq
	jmp >main_loop

@up_most_freq:
	mov $6, $2
	mov $3, $7
	jmp >main_loop






@done: