HP41C - workaround for the SIZE? missing

[Werner]

Here's my non-synthetic version, 36 bytes without the END

Code:

>LBL"SIZE?"
 255
 ENTER
 ISG X
>LBL 01
 SF 25
 VIEW IND Y
 CLD
 FC?C 25
 CHS
 2
 /
 ST+ Y
 ABS
 INT
 X>0?
 GTO 01
 RDN
 LASTX
 +
 END

Cheers, Werner
*Edited a few times. Now, after 25 years or so, I seem to be able to find improvements I couldn't find before..