Changeset 704 for trunk/LocalPlayer

Timestamp:

Aug 12, 2025, 3:14:50 PM (2 weeks ago)

Author:

chronos

Message:

• Fixed: Enable map move keys also in editor mode.

File:

• trunk/LocalPlayer/Term.pas (modified) (2 diffs)

trunk/LocalPlayer/Term.pas

@@ -7160 +7160 @@
   if not Idle then Exit;
 
+  // Map move
+  if BMapMoveLeftDown.Test(ShortCut) then DoMoveMap(-1, 1)
+  else if BMapMoveDown.Test(ShortCut) then DoMoveMap(0, 2)
+  else if BMapMoveRightDown.Test(ShortCut) then DoMoveMap(1, 1)
+  else if BMapMoveLeft.Test(ShortCut) then DoMoveMap(-2, 0)
+  else if BMapMoveRight.Test(ShortCut) then DoMoveMap(2, 0)
+  else if BMapMoveLeftUp.Test(ShortCut) then DoMoveMap(-1, -1)
+  else if BMapMoveUp.Test(ShortCut) then DoMoveMap(0, -2)
+  else if BMapMoveRightUp.Test(ShortCut) then DoMoveMap(1, -1);
+
   if ClientMode = cEditMap then begin
     if BResign.Test(ShortCut) then mResign.Click
@@ -7278 +7288 @@
     else if BUnitMoveLeftUp.Test(ShortCut) then DoMoveUnit(-1, -1)
     else if BUnitMoveUp.Test(ShortCut) then  DoMoveUnit(0, -2)
-    else if BUnitMoveRightUp.Test(ShortCut) then DoMoveUnit(1, -1)
-    // Map move
-    else if BMapMoveLeftDown.Test(ShortCut) then DoMoveMap(-1, 1)
-    else if BMapMoveDown.Test(ShortCut) then DoMoveMap(0, 2)
-    else if BMapMoveRightDown.Test(ShortCut) then DoMoveMap(1, 1)
-    else if BMapMoveLeft.Test(ShortCut) then DoMoveMap(-2, 0)
-    else if BMapMoveRight.Test(ShortCut) then DoMoveMap(2, 0)
-    else if BMapMoveLeftUp.Test(ShortCut) then DoMoveMap(-1, -1)
-    else if BMapMoveUp.Test(ShortCut) then DoMoveMap(0, -2)
-    else if BMapMoveRightUp.Test(ShortCut) then DoMoveMap(1, -1);
+    else if BUnitMoveRightUp.Test(ShortCut) then DoMoveUnit(1, -1);
   end;
 end;