DEADSOFTWARE

Fixed comments (UTF8<>CP1251)
authorJoseph Stalin <granminigun@pm.me>
Sat, 3 Aug 2019 19:07:37 +0000 (00:07 +0500)
committerJoseph Stalin <granminigun@pm.me>
Sat, 3 Aug 2019 19:09:00 +0000 (00:09 +0500)
src/game/g_gui.pas
src/game/g_window.pas

index ef5645962bdc2e0bcdedd2f992979fd0c816f360..e32889203b7216e27914336ce79c6bac37861a6f 100644 (file)
@@ -685,14 +685,14 @@ begin
   if len = 0 then
     Exit;
 
-// ���� � ������� ����:
+// Îêíî ñ ãëàâíûì ìåíþ:
   g_GUI_ShowWindow(Saved_Windows[len-1]);
 
-// �� ������������� (��� ������ ������):
+// Íå ïåðåêëþ÷èëîñü (èëè íåêóäà äàëüøå):
   if (len = 1) or (g_ActiveWindow = nil) then
     Exit;
 
-// ���� ������ � ��������� �����:
+// Èùåì êíîïêè â îñòàëüíûõ îêíàõ:
   for k := len-1 downto 1 do
   begin
     ok := False;
@@ -726,7 +726,7 @@ begin
         Break;
     end;
 
-  // �� �������������:
+  // Íå ïåðåêëþ÷èëîñü:
     if (not ok) or
        (g_ActiveWindow.Name = Saved_Windows[k]) then
       Break;
@@ -3241,7 +3241,7 @@ begin
                 SetActive(Self)
               else
                 begin
-                  if FItems[FIndex][1] = #29 then // �����
+                  if FItems[FIndex][1] = #29 then // Ïàïêà
                   begin
                     OpenDir(FPath+Copy(FItems[FIndex], 2, 255));
                     FIndex := 0;
@@ -3263,7 +3263,7 @@ begin
           if ( (Length(FItems[a]) > 0) and
                (LowerCase(FItems[a][1]) = LowerCase(Chr(wParam))) ) or
              ( (Length(FItems[a]) > 1) and
-               (FItems[a][1] = #29) and // �����
+               (FItems[a][1] = #29) and // Ïàïêà
                (LowerCase(FItems[a][2]) = LowerCase(Chr(wParam))) ) then
           begin
             FIndex := a;
@@ -3287,7 +3287,7 @@ begin
   path := IncludeTrailingPathDelimiter(path);
   path := ExpandFileName(path);
 
-  // ��������:
+  // Êàòàëîãè:
   if FDirs then
   begin
     if FindFirst(path+'*', faDirectory, SR) = 0 then
@@ -3304,7 +3304,7 @@ begin
     FindClose(SR);
   end;
 
-  // �����:
+  // Ôàéëû:
   sm := FFileMask;
   while sm <> '' do
   begin
index fb3c24075839614e3f77a1099744b0e74639dea1..dcd01756f8c7b58c9460a24df21dbcf19bf6c7b1 100644 (file)
@@ -916,7 +916,7 @@ begin
     exit;
   end;
 
-  // ����� ����������� ����������
+  // Âðåìÿ ïðåäûäóùåãî îáíîâëåíèÿ
   if flag then
   begin
     Time_Old := Time-(Time_Delta mod 28);
@@ -1172,10 +1172,10 @@ begin
   Init();
   Time_Old := GetTimer();
 
-  // ��������� ������
+  // Êîìàíäíàÿ ñòðîêà
   if (ParamCount > 0) then g_Game_Process_Params();
 
-  // ������ �����
+  // Çàïðîñ ÿçûêà
   if (not gGameOn) and gAskLanguage then g_Menu_AskLanguage();
 
   e_WriteLog('Entering the main loop', TMsgType.Notify);