diff --git a/emulator.pas b/emulator.pas
index 996ca71..d34e934 100644
--- a/emulator.pas
+++ b/emulator.pas
@@ -71,7 +71,10 @@ end;
 procedure wait;
 begin
     if IC div 500 = 0 then sleep (1)
-    else sleep (IC div 500);
+    else begin
+        sleep (IC div 500);
+        if IC mod 500 >= 250 then sleep (1);
+    end;
     IC := 0;
 end;
 {$endif}