Subroutine eaf0

eaf0 cb 80       addb 0x80
eaf2 a6 03       ldaa (X+0x03)
eaf4 3d          mul
eaf5 a3 04       subd (X+0x04)
eaf7 39          rts