Another intermediate routine

another intermediate routine
00183e00: 27bdffe8 addiu r29,r29,0xffe8
00183e04: afbf0010 sw r31,0x0010(r29)
00183e08: 000410c0 sll r2,r4,0x03
00183e0c: 00441023 subu r2,r2,r4
00183e10: 00021180 sll r2,r2,0x06
00183e14: 3c048019 lui r4,0x8019
00183e18: 248408cc addiu r4,r4,0x08cc      r4 = unit data
00183e1c: 00442021 addu r4,r2,r4
00183e20: 0c0179ea jal 0x0005e7a8          enable/disable acting statuses
00183e24: 34050007 ori r5,r0,0x0007
00183e28: 00001021 addu r2,r0,r0
00183e2c: 8fbf0010 lw r31,0x0010(r29)
00183e30: 27bd0018 addiu r29,r29,0x0018
00183e34: 03e00008 jr r31
00183e38: 00000000 nop