Create ok1.prg