unit SayStuff;
begin

 procedure SayHello;
 begin
  { tworzymy okienko }
  { wywietlamy w nim napis "Hello" }
  { zamykamy okienko }
 end;

 procedure SayBye;
 begin
  { tworzymy okienko }
  { wywietlamy w nim napis "Bye" }
  { zamykamy okienko }
 end;

 procedure SayNotning;
 begin
  { tworzymy okienko }
  { wywietlamy w nim napis "NIC" }
  { zamykamy okienko }
 end;

end.