: RAND'    \ (  —  UN1 )
   0 0 0B 0
   DO RAND 0 D+ LOOP 0C U/
   8000 -     \ to signed
;