Subroutine f50f

f50f b6 c0 1b    ldaa (0xC01B)
f512 97 47       staa (0x0047)
f514 86 ff       ldaa 0xFF
f516 97 49       staa (0x0049)
f518 97 4a       staa (0x004A)
f51a 97 4b       staa (0x004B)
f51c b6 c0 11    ldaa (0xC011)
f51f 97 29       staa (0x0029)
f521 cc ff ff    ldd 0xFFFF
f524 dd 34       std (0x0034)
f526 dd 41       std (0x0041)
f528 b6 d0 48    ldaa (0xD048)
f52b 97 78       staa (0x0078)
f52d fc c0 09    ldd (0xC009)
f530 dd 61       std (0x0061)
f532 dd 6c       std (0x006C)
f534 fc c0 07    ldd (0xC007)
f537 dd 79       std (0x0079)
f539 dd 7b       std (0x007B)
f53b 86 86       ldaa 0x86
f53d 97 4d       staa (0x004D) ; Stick_Position
f53f 86 02       ldaa 0x02
f541 97 4f       staa (0x004F)
f543 14 0f 0c    bset (0x000F), 0x0C
f546 86 10       ldaa 0x10
f548 97 58       staa (0x0058)
f54a cc c1 3b    ldd 0xC13B
f54d dd 55       std (0x0055)
f54f 86 03       ldaa 0x03
f551 97 3a       staa (0x003A)
f553 86 01       ldaa 0x01
f555 97 84       staa (0x0084)
f557 86 1e       ldaa 0x1E
f559 97 c5       staa (0x00C5)
f55b 97 5b       staa (0x005B)
f55d 39          rts