procedure OnTick;
begin
      if States.GameTime = 480 then
      Actions.ShowMsg(0,'<$0>');
      if States.GameTime = 480 then
      begin
      Actions.GiveGroup(0,17,39,61,2,15,5);
      Actions.GiveGroup(0,16,45,59,1,15,5);
      Actions.GiveGroup(0,16,50,61,0,15,5);
      Actions.GiveGroup(0,15,55,61,0,15,5);
      end;

end;