[AC2] Aula02 Finished
Signed-off-by: TiagoRG <tiago.rgarcia@ua.pt>
This commit is contained in:
parent
4d80ab7936
commit
79485544bc
|
@ -0,0 +1,23 @@
|
||||||
|
.equ READ_CORE_TIMER, 11
|
||||||
|
.equ RESET_CORE_TIMER, 12
|
||||||
|
|
||||||
|
.data
|
||||||
|
.text
|
||||||
|
|
||||||
|
timedone:
|
||||||
|
li $t0, 0
|
||||||
|
timedone_if:
|
||||||
|
blez $a1, timedone_else
|
||||||
|
li $v0, RESET_CORE_TIMER
|
||||||
|
syscall
|
||||||
|
j timedone_return
|
||||||
|
timedone_else:
|
||||||
|
li $v0, READ_CORE_TIMER
|
||||||
|
syscall
|
||||||
|
move $t1, $v0
|
||||||
|
mul $t2, $a0, 20000
|
||||||
|
ble $t1, $t2, timedone_return
|
||||||
|
div $t0, $t1, 20000
|
||||||
|
timedown_return:
|
||||||
|
move $v0, $t0
|
||||||
|
jr $ra
|
|
@ -1,3 +1,4 @@
|
||||||
|
.equ INKEY, 1
|
||||||
.equ READ_CORE_TIMER, 11
|
.equ READ_CORE_TIMER, 11
|
||||||
.equ RESET_CORE_TIMER, 12
|
.equ RESET_CORE_TIMER, 12
|
||||||
.equ PUT_CHAR, 3
|
.equ PUT_CHAR, 3
|
||||||
|
@ -11,10 +12,12 @@
|
||||||
# cnt1: $s0
|
# cnt1: $s0
|
||||||
# cnt5: $s1
|
# cnt5: $s1
|
||||||
# cnt10: $s2
|
# cnt10: $s2
|
||||||
|
# factor: $s3
|
||||||
|
|
||||||
main: li $s0, 0
|
main: li $s0, 0
|
||||||
li $s1, 0
|
li $s1, 0
|
||||||
li $s2, 0
|
li $s2, 0
|
||||||
|
li $s3, 100
|
||||||
|
|
||||||
while: li $a0, '\r'
|
while: li $a0, '\r'
|
||||||
li $v0, PUT_CHAR
|
li $v0, PUT_CHAR
|
||||||
|
@ -49,21 +52,39 @@ while: li $a0, '\r'
|
||||||
li $v0, PRINT_INT
|
li $v0, PRINT_INT
|
||||||
syscall
|
syscall
|
||||||
|
|
||||||
|
li $v0, INKEY
|
||||||
|
syscall
|
||||||
|
move $t0, $v0
|
||||||
|
beq $t0, 'A', increase_speed
|
||||||
|
beq $t0, 'N', decrease_speed
|
||||||
|
beq $t0, 'S', suspend
|
||||||
|
j continue
|
||||||
|
|
||||||
|
increase_speed:
|
||||||
|
div $s3, $s3, 2
|
||||||
|
j continue
|
||||||
|
decrease_speed:
|
||||||
|
li $s3, 100
|
||||||
|
j continue
|
||||||
|
suspend:
|
||||||
|
li $v0, INKEY
|
||||||
|
syscall
|
||||||
|
beq $v0, 'R', continue
|
||||||
|
j suspend
|
||||||
|
continue:
|
||||||
addu $sp, $sp, -4
|
addu $sp, $sp, -4
|
||||||
sw $ra, 0($sp)
|
sw $ra, 0($sp)
|
||||||
li $a0, 100
|
move $a0, $s3
|
||||||
jal delay
|
jal delay
|
||||||
|
|
||||||
remi $t0, $s0, 10
|
rem $t0, $s2, 10
|
||||||
bnez $t0, ignore1
|
bnez $t0, ignore1
|
||||||
addi $s0, $s0, 1
|
addi $s0, $s0, 1
|
||||||
li $s3, 0
|
|
||||||
|
|
||||||
ignore1:
|
ignore1:
|
||||||
remi $t0, $s1, 2
|
rem $t0, $s2, 2
|
||||||
bnez $t0, ignore5
|
bnez $t0, ignore5
|
||||||
addi $s1, $s1, 1
|
addi $s1, $s1, 1
|
||||||
li $s4, 0
|
|
||||||
|
|
||||||
ignore5:
|
ignore5:
|
||||||
addi $s2, $s2, 1
|
addi $s2, $s2, 1
|
||||||
|
|
Loading…
Reference in New Issue