01-d03.ijs

]i=:'467..114..',LF,'...*......',LF,'..35..633.',LF,'......#...'
]l=:;;. _1 (LF,i)
]n=:a.{~48+i.10	
]b=:n,'.'
]q=:l e.n
]s=:((-.l e.b),0),.(5 $ 0)
]r=:a:-.~"1(1,"1-.q)<;._2 i.>:{:$q
]p=:,{{ (}.y),"0&.>"0(>{.y)}}"1 ((;/i.4),.r)
]w=:{{0>.(({.y)-0 1),y,(({:y)+0 1)}}&.>"0 p
]f=:{{0>.(y-"1 (1 0)),y,(y+"1 (1 0))}}&.>"0 w
{{(<"1 (1 { y) (0 { y})}}&.>"0 f
(20 20 $ 0) (+"0) s
]j=:(,>{{({{<(({:y),{.y)}}"1 y) }}&.>"0 f) -. a:
]k=:><"1&.>"1 f
k
s

02-f.txt

   k
+---+---+---+---+----+---+---+---+---+----+---+---+---+---+----+
|0 0|0 1|0 2|0 3|0 4 |0 0|0 1|0 2|0 3|0 4 |1 0|1 1|1 2|1 3|1 4 |
+---+---+---+---+----+---+---+---+---+----+---+---+---+---+----+
|0 5|0 6|0 7|0 8|0 9 |0 5|0 6|0 7|0 8|0 9 |1 5|1 6|1 7|1 8|1 9 |
+---+---+---+---+----+---+---+---+---+----+---+---+---+---+----+
|0 0|0 1|0 0|0 1|1 0 |1 1|   |   |   |    |   |   |   |   |    |
+---+---+---+---+----+---+---+---+---+----+---+---+---+---+----+
|0 0|0 1|0 0|0 1|1 0 |1 1|   |   |   |    |   |   |   |   |    |
+---+---+---+---+----+---+---+---+---+----+---+---+---+---+----+
|1 2|1 3|1 4|1 5|2 2 |2 3|2 4|2 5|3 2|3 3 |3 4|3 5|   |   |    |
+---+---+---+---+----+---+---+---+---+----+---+---+---+---+----+
|1 6|1 7|1 8|1 9|1 10|2 6|2 7|2 8|2 9|2 10|3 6|3 7|3 8|3 9|3 10|
+---+---+---+---+----+---+---+---+---+----+---+---+---+---+----+
|0 0|0 1|0 0|0 1|1 0 |1 1|   |   |   |    |   |   |   |   |    |
+---+---+---+---+----+---+---+---+---+----+---+---+---+---+----+
|0 0|0 1|0 0|0 1|1 0 |1 1|   |   |   |    |   |   |   |   |    |
+---+---+---+---+----+---+---+---+---+----+---+---+---+---+----+
   s
0 0 0 0 0 0 0 0 0 0 0
0 0 0 1 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 1 0 0 0 0
0 0 0 0 0 0 0 0 0 0 0