Subroutine ea3e

ea3e cb 80       addb 0x80
ea40 a6 00       ldaa (X+0x00)
ea42 3d          mul
ea43 a3 01       subd (X+0x01)
ea45 39          rts