// it's been a long time, dunno if this would work, but here I go...
begin
  graph = init();
  loop
    if (rand (0,100) > 25)
      banner(400,300, graph);
        end
    frame;
  end
end

process init()
begin
  set_mode(800,600,32);
  set_fps(24,4);
  return load_png('Happy_newyear_logo.png');
end

process banner(x,y, graph)
private
  struct velocity
        vangle;
        vspeed;
  end
 
begin
  velocity.vangle = rand (0,360000);
  velocity.vspeed = rand (2,12);
  while( x > 0 and x < 900 and y > 0 and y < 600)
    xadvance(velocity.vangle,velocity.vspeed); 
    frame;
  end
end