.data
    a: .asciiz "a "
    b: .asciiz "b "
    c: .asciiz "c "
    d: .asciiz "d "
    wsp: .asciiz  "Podaj wspolczynniki\n"
    px: .asciiz  "Podaj x "
    powx?: .asciiz  "\nPowtorzyc oblicznia z innym x? 1-tak, 0-nie "
    abcd: .asciiz  "ax^3 + bx^2 + cx + d = "
    poww?: .asciiz  "Powtorzyc oblicznia z innym wielomianem? 1-tak, 0-nie "
.text

main:

 la $a0,wsp
 li $v0, 4
 syscall

 la $a0,a
 li $v0, 4
 syscall
 li $v0, 5  # wczytujemy współczynniki...
 syscall
 move $t0,$v0


 la $a0,b
 li $v0, 4
 syscall
 li $v0, 5
 syscall
 move $t1,$v0

 la $a0,c
 li $v0, 4
 syscall
 li $v0, 5
 syscall
 move $t2,$v0

 la $a0,d
 li $v0, 4
 syscall
 li $v0, 5
 syscall
 move $s0,$v0

 loop:

  la $a0,px
  li $v0, 4
  syscall

  li $v0, 5 # ...oraz wczytujemy x
  syscall
  move $t3,$v0

  mul $t4,$t3,$t3 # obliczenia

  mul $t5,$t0,$t4
  mul $t6,$t1,$t3
  add $t7,$t5,$t6
  add $t8,$t7,$t2

  la $a0,abcd
  li $v0, 4
  syscall

  mul $t8,$t8,$t3
  add $a0,$t8,$s0

  li $v0, 1 # wypisanie wyniku
  syscall

  la $a0,powx?
  li $v0, 4
  syscall

  li $v0, 5
  syscall

 bgtz $v0, loop

 la $a0,poww?
 li $v0, 4
 syscall

 li $v0, 5
 syscall

bgtz $v0, main

li $v0, 10
syscall