
Start_Screen()
Hide_Mouse()
Put_Image(1,22,'PKZIP2.PCX')
Draw_Window(155,76,294,266,5,'Compressing ...')
Put_Image(158,102,'PKZIP1.PCX')
Flood_Fill(255,86,9)
Show_Mouse()
End_Screen()
