diff --git a/emulator.pas b/emulator.pas index 34b983d..6d09976 100644 --- a/emulator.pas +++ b/emulator.pas @@ -213,7 +213,7 @@ begin close (TapeIn); Reader.Pos := Reader.Pos + 1; except - R [X] := 0; + R [X] := $ff; end; //Save the reader state if FileExists (ExpandFileName ('~/.tapes.thingamajig')) then begin