-7to:7 do:[:x|((16 radix:9-x)subStrings:$r)last displayNl]!