Update main.pas

Life 1.2
Function ClearScreen optimized.