--- CodesED.h.original	Tue Sep  7 06:57:28 1999
+++ CodesED.h	Tue Apr 25 08:23:04 2000
@@ -168,7 +168,7 @@
 case OUTI:
   OutZ80(R->BC.B.l,RdZ80(R->HL.W++));
   R->BC.B.h--;
-  R->AF.B.l=N_FLAG|(R->BC.B.h? 0:Z_FLAG);
+  R->AF.B.l=(R->AF.B.l&S_FLAG)|N_FLAG|(R->BC.B.h? 0:Z_FLAG);
   break;
 
 case OTIR: