NewTextRoutine:
  lb      $v1, 0($a1)
  beq     $v1, $zero, EndOfString
  nop
LoopStart:
  sb      $v1, 0($a0)
  addiu   $a1, $a1, 1
  lb      $v1, 0($a1)
  addiu   $a0, $a0, 1
  bne     $v1, $zero, LoopStart
  nop
EndOfString:
  jr      $ra
  nop