An Implementation of A Screen-oriented Programming Environment