C:={'::'}.49to:stdin nextByte do:[:z|A:={}.C do:[:r|1to:3 do:[:i|T:='%0  %0'.i=2or:[T:='%0%0%0'].A:=A,{r copyReplacingAllRegex:'..'with:T}]].C:=A].C do:[:x|x displayNl]