diff --git a/backup/main.lfm b/backup/main.lfm
index 1088a4c..d77df6d 100644
--- a/backup/main.lfm
+++ b/backup/main.lfm
@@ -1,7 +1,7 @@
 object GUIForm: TGUIForm
-  Left = 2111
+  Left = 228
   Height = 668
-  Top = 138
+  Top = 132
   Width = 1014
   AlphaBlendValue = 128
   Caption = 'microM8 GUI'
@@ -10569,4 +10569,11 @@ object GUIForm: TGUIForm
       OnClick = miPRFIIplusClick
     end
   end
+  object WaitRepos: TTimer
+    Enabled = False
+    Interval = 50
+    OnTimer = WaitReposTimer
+    left = 238
+    top = 223
+  end
 end
diff --git a/backup/main.pas b/backup/main.pas
index 560652a..afadc8e 100644
--- a/backup/main.pas
+++ b/backup/main.pas
@@ -202,6 +202,7 @@ type
     sidecarPanel: TPanel;
     FSTimer: TTimer;
     tbVolDown: TToolButton;
+    WaitRepos: TTimer;
     ToolButton1: TToolButton;
     ToolButton10: TToolButton;
     tbJoystickAxisSwitch: TToolButton;
@@ -530,6 +531,7 @@ type
     function  IsMouseBtnDown(const AMouseBtn: TMouseBtnType): Boolean;
     function  IsMouseBtnDown: Boolean;
     function  IsMicroM8Active: boolean;
+    procedure WaitReposTimer(Sender: TObject);
   private
     lx, ly, lw, lh: integer;
     lastShowTime: TDateTime;
@@ -629,6 +631,13 @@ begin
   result := GetTitleOfActiveWindow = 'microM8';
 end;
 
+procedure TGUIForm.WaitReposTimer(Sender: TObject);
+begin
+  WaitRepos.Enabled := false;
+  lx:=-1;
+  ReposWindow;
+end;
+
 procedure TGUIForm.AppActivate(Sender: TObject);
 begin
      guiActive := true;
@@ -1194,7 +1203,7 @@ end;
 procedure TGUIForm.miMemoryEditClick(Sender: TObject);
 begin
   pnlMemory.Visible := (not pnlMemory.Visible);
-  ReposWindow;
+  WaitRepos.Enabled := true;
 end;
 
 procedure TGUIForm.miMMHelpClick(Sender: TObject);
diff --git a/lib/x86_64-win64/main.lfm b/lib/x86_64-win64/main.lfm
index 1088a4c..d77df6d 100644
--- a/lib/x86_64-win64/main.lfm
+++ b/lib/x86_64-win64/main.lfm
@@ -1,7 +1,7 @@
 object GUIForm: TGUIForm
-  Left = 2111
+  Left = 228
   Height = 668
-  Top = 138
+  Top = 132
   Width = 1014
   AlphaBlendValue = 128
   Caption = 'microM8 GUI'
@@ -10569,4 +10569,11 @@ object GUIForm: TGUIForm
       OnClick = miPRFIIplusClick
     end
   end
+  object WaitRepos: TTimer
+    Enabled = False
+    Interval = 50
+    OnTimer = WaitReposTimer
+    left = 238
+    top = 223
+  end
 end
diff --git a/lib/x86_64-win64/main.o b/lib/x86_64-win64/main.o
index e34ea62..14ad10e 100644
Binary files a/lib/x86_64-win64/main.o and b/lib/x86_64-win64/main.o differ
diff --git a/lib/x86_64-win64/main.ppu b/lib/x86_64-win64/main.ppu
index 6051a96..5ce799a 100644
Binary files a/lib/x86_64-win64/main.ppu and b/lib/x86_64-win64/main.ppu differ
diff --git a/lib/x86_64-win64/poc.obj b/lib/x86_64-win64/poc.obj
index 776a066..984e86c 100644
Binary files a/lib/x86_64-win64/poc.obj and b/lib/x86_64-win64/poc.obj differ
diff --git a/main.lfm b/main.lfm
index 855a593..d77df6d 100644
--- a/main.lfm
+++ b/main.lfm
@@ -10569,4 +10569,11 @@ object GUIForm: TGUIForm
       OnClick = miPRFIIplusClick
     end
   end
+  object WaitRepos: TTimer
+    Enabled = False
+    Interval = 50
+    OnTimer = WaitReposTimer
+    left = 238
+    top = 223
+  end
 end
diff --git a/main.pas b/main.pas
index 560652a..1379262 100644
--- a/main.pas
+++ b/main.pas
@@ -202,6 +202,7 @@ type
     sidecarPanel: TPanel;
     FSTimer: TTimer;
     tbVolDown: TToolButton;
+    WaitRepos: TTimer;
     ToolButton1: TToolButton;
     ToolButton10: TToolButton;
     tbJoystickAxisSwitch: TToolButton;
@@ -530,6 +531,7 @@ type
     function  IsMouseBtnDown(const AMouseBtn: TMouseBtnType): Boolean;
     function  IsMouseBtnDown: Boolean;
     function  IsMicroM8Active: boolean;
+    procedure WaitReposTimer(Sender: TObject);
   private
     lx, ly, lw, lh: integer;
     lastShowTime: TDateTime;
@@ -629,6 +631,13 @@ begin
   result := GetTitleOfActiveWindow = 'microM8';
 end;
 
+procedure TGUIForm.WaitReposTimer(Sender: TObject);
+begin
+  WaitRepos.Enabled := false;
+  lx:=-1;
+  ReposWindow;
+end;
+
 procedure TGUIForm.AppActivate(Sender: TObject);
 begin
      guiActive := true;
@@ -1194,7 +1203,7 @@ end;
 procedure TGUIForm.miMemoryEditClick(Sender: TObject);
 begin
   pnlMemory.Visible := (not pnlMemory.Visible);
-  ReposWindow;
+  WaitRepos.Enabled := true;
 end;
 
 procedure TGUIForm.miMMHelpClick(Sender: TObject);
@@ -2415,7 +2424,7 @@ end;
 procedure TGUIForm.btnHideClick(Sender: TObject);
 begin
   pnlMemory.Visible := false;
-  ReposWindow;
+  WaitRepos.Enabled := true;
 end;
 
 procedure TGUIForm.btnReadClick(Sender: TObject);