Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Convert:# Chuyen doi kieu dinh dang cua time
- # Tham so: a0: time, a1: type, a2: buffer1, a3: buffer2
- addi $sp, $sp, -8
- sw $a0, ($sp)
- sw $ra, 4($sp)
- beq $a1, 'A', Convert.Do1
- beq $a1, 'B', Convert.Do2
- beq $a1, 'C', Convert.Do3
- j Convert.Exit
- Convert.Do1:
- # toString(time.month)
- jal Month
- move $a0, $v0
- move $a1, $a2
- jal ToString
- # + '/'
- move $a0, $v0
- la $a1, seperate # /
- move $a2, $v0
- jal StrConCat
- move $t0, $v0
- # + toString(time.day)
- lw $a0, ($sp)
- jal Day
- sw $a0, ($sp)
- move $a0, $v0
- move $a1, $a3
- jal ToString
- move $a0, $t0
- move $a1, $v0
- move $a2, $t0
- jal StrConCat
- # + '/'
- move $a0, $v0
- la $a1, seperate # /
- move $a2, $v0
- jal StrConCat
- move $t0, $v0
- # + toString(time.year)
- lw $a0, ($sp)
- jal Year
- sw $a0, ($sp)
- move $a0, $v0
- move $a1, $a3
- jal ToString
- move $a0, $t0
- move $a1, $v0
- move $a2, $t0
- jal StrConCat
- j Convert.Exit
- Convert.Do2:
- # month[time.month - 1]
- jal Month
- addi $t0, $v0, -1
- li $t1, 4
- mult $t0, $t1
- mflo $t0
- la $t0, month($t0)
- # + ' '
- move $a0, $t0
- la $a1, seperate + 2 # ' '
- move $a2, $a2
- jal StrConCat
- move $t0, $v0
- # + toString(time.day)
- lw $a0, ($sp)
- jal Day
- sw $a0, ($sp)
- move $a0, $v0
- move $a1, $a3
- jal ToString
- move $a0, $t0
- move $a1, $v0
- move $a2, $t0
- jal StrConCat
- # + ", "
- move $a0, $v0
- la $a1, seperate + 4 # ", "
- move $a2, $v0
- jal StrConCat
- move $t0, $v0
- # + toString(time.year)
- lw $a0, ($sp)
- jal Year
- sw $a0, ($sp)
- move $a0, $v0
- move $a1, $a3
- jal ToString
- move $a0, $t0
- move $a1, $v0
- move $a2, $t0
- jal StrConCat
- j Convert.Exit
- Convert.Do3:
- # toString(time.day)
- jal Day
- move $a0, $v0
- move $a1, $a2
- jal ToString
- # + ' '
- move $a0, $v0
- la $a1, seperate + 2 # " "
- move $a2, $v0
- jal StrConCat
- move $t0, $v0
- # + month[time.month - 1]
- lw $a0, ($sp)
- jal Month
- addi $v0, $v0, -1
- li $t1, 4
- mult $v0, $t1
- mflo $t1
- sw $a0, ($sp)
- move $a0, $t0
- la $a1, month($t1)
- move $a2, $t0
- jal StrConCat
- # + ", "
- move $a0, $v0
- la $a1, seperate + 4 #------------------------ ERROR ???-----------------------
- move $a2, $v0
- jal StrConCat
- move $t0, $v0
- # + toString(time.year)
- lw $a0, ($sp)
- jal Year
- sw $a0, ($sp)
- move $a0, $v0
- move $a1, $a3
- jal ToString
- move $a0, $t0
- move $a1, $v0
- move $a2, $t0
- jal StrConCat
- Convert.Exit:
- lw $a0, ($sp)
- lw $ra, 4($sp)
- addi $sp, $sp, 8
- jr $ra
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement