diff --git a/AdventOfCode.lpr b/AdventOfCode.lpr
index 173894a..08750d6 100644
--- a/AdventOfCode.lpr
+++ b/AdventOfCode.lpr
@@ -44,6 +44,7 @@ type
 
 procedure TAdventOfCode.RunPuzzleSolutions;
 begin
+  WriteLn('Advent of Code 2023');
   TTrebuchet.Solve;
 end;