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]
Note that non-ascii characters in the above source code will be escaped (such as \x9f).