diff --git a/src/game/g_basic.pas b/src/game/g_basic.pas
index e1ce980bc548a2f5e0e7ed16a7f745daab755fe0..4b505ab50bcd76074c76e772a25b76c9aec226f0 100644 (file)
--- a/src/game/g_basic.pas
+++ b/src/game/g_basic.pas
var
a: Integer;
begin
+ Result := '';
for a := 1 to Length(Str) do
if (a = Length(Str)) or (Str[a+1] = ' ') then
begin
n := 1;
m := 1;
Result := 0;
+ s1 := '';
for i := 0 to High(Pointers) do
begin