start:
  save
  exactf "f", find_o
  restore    #to keep the balance
  advance
  goto start

find_o:
  exactf "o", find_bar
  restore
  advance
  goto start

find_bar:
  exactf "bar", done
  goto find_o
...