0
Add++, 46 bytes
Due to a few bugs, this is non-competing but enjoy!
D,e,@@,9=&
_
+?
$e,x,?
I,+42,O,-41
-1
I,G,*G,O
I had remembered about the O command, which outputs x (the accumulator) as a number and shaves 2 bytes off. Unfortunately, it isn't as good as the old version.
Old version, 48 ...