!7

p {
  O o;
  call(o = hotwire(#1011778), 'phase1);
  print("Enter OK for phase 2");
  if (eqic(trim(readLine()), "OK"))
    call(o, 'phase2);
}