Some little bug fixes

SPS_EMU.000

@@ -3,7 +3,7 @@ LSUTextFile=1
 Copyrigth=MCS Media Computer Software
 [LSUInfo]
 CompileDate=15.05.2021
-CompileTime=10:36:14
+CompileTime=11:32:02
 Name=Wilfried Klaas
 LSUBinFile=C:\e-platte\daten\git-sourcen\SPS_Emulator\SPS_Emu.lsu
 LSUTextFile=C:\e-platte\daten\git-sourcen\SPS_Emulator\SPS_Emu.

ugui.pas

@@ -810,14 +810,14 @@ begin
   else
   begin
     acNextStep.Enabled := False;
-    acStop.Enabled := not singleStep;
+    acStop.Enabled := True;
     inputMicrobit();
     inputSps();
     sps.nextStep();
     outputSps();
     outputMicrobit();
     acNextStep.Enabled := singleStep;
-    acStop.Enabled := not singleStep;
+    acStop.Enabled := True;
   end;
 end;
 

usps.pas

@@ -845,7 +845,7 @@ begin
         end
         else
         begin
-          image := IMAGE_MAP[5];
+          image := IMAGE_MAP[4];
           if a <= length(IMAGE_MAP) then
           begin
             DebugLn('display an image');