Subroutine db33

db33 b6 10 02    ldaa (0x1002) ; PIOC Register
db36 97 c9       staa (0x00C9)
db38 98 0c       eora (0x000C)
db3a 16          tab
db3b 53          comb
db3c 94 08       anda (0x0008)
db3e d4 c9       andb (0x00C9)
db40 d7 ca       stab (0x00CA)
db42 9a ca       oraa (0x00CA)
db44 97 08       staa (0x0008)
db46 96 c9       ldaa (0x00C9)
db48 97 0c       staa (0x000C)
db4a b6 10 33    ldaa (0x1033) ; ADR3 Register
db4d 97 c9       staa (0x00C9)
db4f 98 0d       eora (0x000D)
db51 16          tab
db52 53          comb
db53 94 09       anda (0x0009)
db55 d4 c9       andb (0x00C9)
db57 d7 ca       stab (0x00CA)
db59 9a ca       oraa (0x00CA)
db5b 97 09       staa (0x0009)
db5d 96 c9       ldaa (0x00C9)
db5f 97 0d       staa (0x000D)
db61 b6 10 0a    ldaa (0x100A) ; PORTE Register
db64 97 c9       staa (0x00C9)
db66 98 0b       eora (0x000B)
db68 16          tab
db69 53          comb
db6a 94 07       anda (0x0007)
db6c d4 c9       andb (0x00C9)
db6e d7 ca       stab (0x00CA)
db70 9a ca       oraa (0x00CA)
db72 97 07       staa (0x0007)
db74 96 c9       ldaa (0x00C9)
db76 97 0b       staa (0x000B)
db78 b6 10 08    ldaa (0x1008) ; PORTD Register
db7b 97 c9       staa (0x00C9)
db7d 98 0e       eora (0x000E)
db7f 16          tab
db80 53          comb
db81 94 0a       anda (0x000A)
db83 d4 c9       andb (0x00C9)
db85 d7 ca       stab (0x00CA)
db87 9a ca       oraa (0x00CA)
db89 97 0a       staa (0x000A)
db8b 96 c9       ldaa (0x00C9)
db8d 97 0e       staa (0x000E)
db8f 39          rts