src/task1/task1.awk

   1 #!/usr/bin/awk -f
   2
   3 BEGIN {
   4     x = 0
   5     y = 0
   6     d = 90
   7 }
   8
   9 function forward (distance) {
  10     if (d == 0)   y += distance
  11     if (d == 90)  x += distance
  12     if (d == 180) y -= distance
  13     if (d == 270) x -= distance
  14 }
  15
  16 function abs(v) {
  17     return v < 0 ? -v : v
  18     }
  19
  20 /^C/ {d = (d +  90) % 360}
  21 /^A/ {d = (d + 270) % 360}
  22 /^F[0-9]+/ {forward(substr($0, 2))}
  23
  24 END {
  25     print abs(x) + abs(y)
  26 }