main:	
	lodr $0 5.0
	lodi $1 50000
	lodi $2 0
	lodi $3 -1
loop_body:	
	lodr $5 5.0
	addr $0 $0 $5
	addi $1 $1 $3
	lodu $4 &loop_body
	jgei $4 $1 $2
	rtou $1 $0
	strs "Enter a string:"
	ladu $5 0
	puts $5
	gets $2
	utos $3 $1
	puts $3
	rtos $3 $0
	puts $3
	puts $2
	halt