added hidden "goobers" console command to turn on cheats

[d2df-sdl.git] / src / game / g_console.pas

diff --git a/src/game/g_console.pas b/src/game/g_console.pas
index 31bce9a1aa2ef7f026ce71cd57e55637a6373b19..72503f28f5695686087b8d6f5f74bb6f654e172a 100644 (file)
--- a/src/game/g_console.pas
+++ b/src/game/g_console.pas
@@ -1,3 +1,4 @@
+{$MODE DELPHI}
 unit g_console;
 
 interface
@@ -832,7 +833,7 @@ begin
       Time := MsgTime;
     end;
   end;
-  
+
 {$IFDEF HEADLESS}
   e_WriteLog('CON: ' + L, MSG_NOTIFY);
 {$ENDIF}
@@ -891,6 +892,15 @@ begin
   if Trim(L) = '' then
     Exit;
 
+  if L = 'goobers' then
+  begin
+    Line := '';
+    CPos := 1;
+    gCheats := true;
+    g_Console_Add('Your memory serves you well.');
+    exit;
+  end;
+
   if not Quiet then
   begin
     g_Console_Add('> '+L);