program BINGEBOT 2015;

uses
    BigMacs;

var i: integer;
var has_peen: boolean;
var this_alt: TCharacter;
begin
 i:=0;
 has_peen:=false;
 while i<=this_alt.peencount do
  begin
   if this_alt.peens[i].bumtring=="I'll BINGE to that" then
    has_peen := true;
   i:=i+1;
  end; 
 if !has_peen and IsAlive('BINGEBOT 2015') writeln('Happy Activation Day, BINGEBOT 2015!');
end.