Implemented clrscr routine for C1P