Setvirtualresolution(640,480) ResetTimer() CreateText(1,"Process Started") SetTextSize(1,25) SetTextPosition(1,10,100) Repeat If Timer()>3 SetTextString(1,"Process Completed") EndIf Sync() Until Timer()>6 End