start:
  exactf "f", find_o
  advance
  goto start

find_o:
  exactf "o"

  exactf "bar", done
  goto find_o

done:
  end

##</code><code>##

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
...