.data
inpstr: .asciz "Bu stringin buyuk harfli hali lazim"
.text
main:	li a0, 1
	la a1, inpstr
	li a2, 35  #string boyutu
	li a7, 64
	ecall	  # print str

	la a0, inpstr
	call upstr
	
	li a0, 1
	la a1, inpstr
	li a2, 35	#string boyutu
	li a7, 64
	ecall	  # print str
	
	li a7, 10	# a7=10 olursa system exit
	ecall

upstr:  li t1, 97	# t1=97
loop:	lb t0, 0(a0)
	beqz t0, exit
	blt t0, t1, skip
	addi t0, t0, -32 # 32 cikart, buyuk harfe cevirir
	sb t0, 0(a0)
skip:	addi a0, a0, 1
	j loop
exit: 	ret