@verb #322:"create_string" this none this rxdo #55
@program #322:"create_string" this none this
{s} = args
l = $string_utils:length(s)
lstr = encode_binary(l / 256 ^ 3, l / 65536 % 256, l / 256 % 256, l % 256)
return lstr + s
"Last modified by manta (#7165) on Thu Mar  1 11:32:29 2001 MST."
"This verb previously owned by manta (#7165), and chowned to $slacker upon dewizarding (Sat Aug 17 14:50:06 2002 MDT)."
"Last modified by Dax (#789) on Sat Aug 17 14:50:06 2002 MDT."
.