lis %r3, 0x1
ori %r3, %r3, 0x68
lis %r4, 0x1005
ori %r4, %r4, 0x8
stw %r3, 0x0(%r4)
stw %r2, 0x4(%r4)
stw %r4, 0x8(%r4)
lis %r3, 0x1005
lis %r4, 0x1005
ori %r4, %r4, 0x10
li %r5, 0
li %r6, 0
li %r7, 0x300
li %r8, 0x3000
li %r9, 0
lis %r10, 0x1005
ori %r10, %r10, 0x50
li %r11, 0x34
;sc
lis %r3, 0x1005
ld %r3, 0(%r3)
li %r11, 0x35
;sc
infinite:
nop
nop
b infinite

retry:
lis %r12, 0x1005
ori %r12, %r12, 0x100
lwz %r3, 0(%r12)
cmpwi %r3, 0
beq doFuncRPC

mr %r11, %r3
li %r3, 0
stw %r3, 0(%r12)
ld %r3, 0x8(%r12)
ld %r4, 0x10(%r12)
ld %r5, 0x18(%r12)
ld %r6, 0x20(%r12)
ld %r7, 0x28(%r12)
ld %r8, 0x30(%r12)
ld %r9, 0x38(%r12)
ld %r10, 0x40(%r12)
;sc
lis %r12, 0x1005
ori %r12, %r12, 0x100
std %r3, 0x48(%r12)

doFuncRPC:
lis %r3, 0x1006
lwz %r12, 0x90(%r3)
cmpwi %r12, 0
beq doSleep

ld %r4, 0x08(%r3)
ld %r5, 0x10(%r3)
ld %r6, 0x18(%r3)
ld %r7, 0x20(%r3)
ld %r8, 0x28(%r3)
ld %r9, 0x30(%r3)
ld %r10, 0x38(%r3)
ld %r11, 0x40(%r3)
lfs %f1, 0x48(%r3)
lfs %f2, 0x50(%r3)
lfs %f3, 0x58(%r3)
lfs %f4, 0x60(%r3)
lfs %f5, 0x68(%r3)
lfs %f6, 0x70(%r3)
lfs %f7, 0x78(%r3)
lfs %f8, 0x80(%r3)
lfs %f9, 0x88(%r3)
ld %r3, 0x0(%r3)
mtctr %r12
lis %r12, 0x1006
std %r2, 0xA8(%r12)
ld %r12, 0xB0(%r12)
cmpwi %r12, 0
beq callFunction

mr %r2, %r12

callFunction:
bctrl

lis %r4, 0x1006
li %r5, 0
ld %r2, 0xA8(%r4)
std %r5, 0xB0(%r4)
stw %r5, 0x90(%r4)
std %r3, 0x98(%r4)
stfs %f1, 0xA0(%r4)

doSleep:
li %r3, 0x64
li %r11, 0x08D
;sc

b retry