--- a/hedgewars/uConsole.pas	Sun Jan 15 23:56:47 2006 +0000
+++ b/hedgewars/uConsole.pas	Thu Jan 19 21:12:20 2006 +0000
@@ -44,6 +44,7 @@
 procedure WriteLnToConsole(s: shortstring);
 procedure KeyPressConsole(Key: Longword);
 procedure ParseCommand(CmdStr: shortstring);
+function  GetLastConsoleLine: shortstring;
 
 implementation
 {$J+}
@@ -260,6 +261,12 @@
      end
 end;
 
+function GetLastConsoleLine: shortstring;
+begin
+if CurrLine = 0 then Result:= ConsoleLines[Pred(cLinesCount)]
+                else Result:= ConsoleLines[Pred(CurrLine)]
+end;
+
 {$INCLUDE CCHandlers.inc}
 
 initialization