 xdef getregs
getregs pulu x
 sty 0,x
 pulu x
 stu 0,x
 pulu x
 sts 0,x
 rts
 end
