fixed: "00" must be replaced before "0" #204 (#241)

I have responded to mike's comment. 00 must be replaced before 0.


2b56510#r138520966

Station.pas

@@ -365,8 +365,8 @@ function TStation.NrAsText: string;
     (MyCall <> Ini.Call) then
     begin
     if Random < 0.4 then begin
-      Result := StringReplace(Result, '0', 'O', [rfReplaceAll]);
       Result := StringReplace(Result, '00', 'TT', [rfReplaceAll]);
+      Result := StringReplace(Result, '0', 'O', [rfReplaceAll]);
     end
     else if Random < 0.8
       then Result := StringReplace(Result, '0', 'T', [rfReplaceAll]);