Alerta ao acabar cap.

Const
cap = 20 \\ Altere aqui a cap para apitar

while not terminated do
begin
UpdateWorld;
if self.capacity < cap then
PlaySound('C:\Windows\Media\notify.wav');
Sleep(100);
end;