计组作业二QWQ

# 石宇堃 1600012967
	.data
msg_s:  .asciiz "\r\nSuccess! Location: "
msg_f:  .asciiz "\r\nFail!\r\n"
s_end:  .asciiz "\r\n"
buf:    .space 100


	.text
	.globl main
main:   la $a0, buf
	li $a1, 100
	li $v0, 8
	syscall
	
readc:  li $v0, 12
	syscall
	sub $t1, $v0, 63
	beq $t1, $0, end
	la $s1, buf
	li $t0, 0
find:   lb $s0, ($s1)
	sub $t1, $v0, $s0
	beq $t1, $0, suc
	addi $t0, $t0, 1 #t0 is a counter
	slt $t3, $t0, $a1
	beqz $t3, fail
	addi $s1, $s1, 1
	j find
suc:    la $a0, msg_s
	li $v0, 4
	syscall
	addi $a0, $t0, 1
	li $v0, 1
	syscall
	la $a0, s_end
	li $v0, 4
	syscall
	j readc
fail:   la $a0, msg_f
	li $v0, 4
	syscall
	j readc
end:	li $v0, 10
	syscall