New version programm on Pascal