
Start_Screen()
Hide_Mouse()
Put_Image(1,22,'BACK.PCX')
Draw_Window(145,81,560,401,1,'Email Alert')
Flood_Fill(390,261,15)
Flood_Fill(330,91,4)
Put_Image(235,116,'POSTOFF.PCX')
Standard_Text(245,316,16,3,'You have UNREAD Email Waiting.')
Draw_Button(330,361,60,13,1,4,'Okay')
Play_Sound('newmail.voc')
Show_Mouse()
End_Screen()
