Pràctica1 - EC - S1 - FIB

# PRACTICA 1 #######################

## s1a.s ##

    .data
    aa: .byte -5
    bb: .half -344
    cc: .dword -3
    dd: .byte 0xA0
    ee: .word 5799
    ff: .half -1
    .text
    .globl main
main:
    jr $ra      # main retorna al codi de startup


## s1b.s ##

    .data
    aa: .byte -5
    bb: .half -344
    cc: .dword -3
    dd: .byte 0xA0
    ee: .word 5799
    ff: .half -1
    .text
    .globl main
main:
    la $s3, aa
    li $s4, 65535
    li $s5, 65536
    move $0, $s1

    jr $ra      # main retorna al codi de startup


## s1c.s ##

    .data
    aa: .byte -5
    bb: .half -344
    cc: .dword -3
    dd: .byte 0xA0
    ee: .word 5799
    ff: .half -1
    .text
    .globl main
main:
    la $s0, aa
    lb $s1, 0($s0)

    la $s0, bb
    lh $s2, 0($s0)

    la $s0, cc
    lw $s3, 0($s0)
    lw $s4, 4($s0)

    la $s0, dd
    lbu $s5, 0($s0)

    la $s0, ff
    lh $s6, 0($s0)

    sh $s1, 0($s0)


    jr $ra      # main retorna al codi de startup


## s1e.s ##

    .data
    A: .word 3, 5, 7
    punter: .word 0
    .text
    .globl main
main:
    la $s1, A+8
    la $s2, punter
    sw $s1, 0($s2)

    la $s3, punter
    lw $s3, 0($s3)
    lw $s3, 0($s3)
    addu $s0, $s3, $s0

    la $s3, punter
    addiu $s3, $s3, -8
    lw $s3, 0($s3)
    addu $s0, $s3, $s0

    la $s1, A+4
    sw $s0, 0($s1)

    li $v0, 1
    addu $a0, $s0, $zero
    syscall

    jr $ra      # main retorna al codi de startup


## s1g.s ##

    .data
    fib: .space 40
    .text
    .globl main
main:
    addiu $s0, $zero, 2
    la $s1, fib
    sw $zero, 0($s1)
    addiu $s2, $zero, 1
    sw $s2, 4($s1)

while:  slti $t0, $s0, 10
    beq $t0, $zero, fi

    la $s1, fib
    sll $s3, $s0, 2
    addu $s3, $s1, $s3
    lw $s4, -4($s3)
    lw $s5, -8($s3)
    addu $s2, $s5, $s4
    sw $s2, 0($s3)

    addiu $s0, $s0, 1
    b while

fi:
    jr $ra      # main retorna al codi de startup


## s1f.s ##

    .data
    cadena: .byte -1,-1,-1,-1,-1,-1
    vec: .word 5,6,8,9,1
    .text
    .globl main
main:
    addu $s0, $zero, $zero

while:  li $t0, 5
    bge $s0, $t0, fi

    la $s1, vec
    addiu $s2, $zero, 4
    subu $s2, $s2, $s0
    sll $s2, $s2, 2
    addu $s2, $s2, $s1
    lw $s2, 0($s2)
    addiu $s2, $s2, '0'
    la $s3, cadena
    addu $s3, $s3, $s0
    sb $s2, 0($s3)

    addiu $s0, $s0, 1
    b while

fi:
    la $s1, cadena
    sb $zero, 5($s1)

    li $v0, 4
    la $a0, cadena
    syscall

    jr $ra      # main retorna al codi de startup


##JosepRivaille##